libInit.cc
author Claus Gittinger <cg@exept.de>
Thu, 05 Aug 1999 12:08:09 +0200
changeset 4567 cdf2c2f5b422
parent 4047 ca2199fb2d73
child 4571 e0868568929e
permissions -rw-r--r--
*** empty log message ***
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
3415
20ca4cea6f94 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
     1
/*
20ca4cea6f94 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
     2
 * DO NOT EDIT 
20ca4cea6f94 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
     3
 * automatically generated from Make.proto
20ca4cea6f94 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
     4
 */
20ca4cea6f94 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
     5
#define __INDIRECTVMINITCALLS__
2902
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     6
#include <stc.h>
4047
ca2199fb2d73 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3856
diff changeset
     7
#ifdef WIN32
3856
14018c6cd493 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3577
diff changeset
     8
#pragma codeseg INITCODE "INITCODE"
4047
ca2199fb2d73 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3856
diff changeset
     9
#endif
2902
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    10
_libbasic_Init(pass, __pRT__, snd)
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    11
OBJ snd; struct __vmData__ *__pRT__; {
3415
20ca4cea6f94 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
    12
__BEGIN_PACKAGE__("libbasic", _libbasic_Init);
2902
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    13
_Object_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    14
_Autoload_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    15
_Behavior_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    16
_ClassDescription_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    17
_Class_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    18
_Metaclass_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
_PrivateMetaclass_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
_Project_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    21
_Namespace_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    22
_Boolean_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    23
_True_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    24
_False_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    25
_ClassCategoryReader_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    26
_Collection_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    27
_Bag_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    28
_SequenceableCollection_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    29
_ArrayedCollection_Init(pass,__pRT__,snd);
3415
20ca4cea6f94 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
    30
_UninterpretedBytes_Init(pass,__pRT__,snd);
2902
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    31
_Array_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    32
_WeakArray_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    33
_ByteArray_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    34
_CharacterArray_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    35
_String_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    36
_Symbol_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    37
_DoubleArray_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    38
_FloatArray_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    39
_Interval_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    40
_LinkedList_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    41
_Semaphore_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    42
_OrderedCollection_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    43
_SortedCollection_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    44
_Set_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    45
_Dictionary_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    46
_IdentityDictionary_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    47
_WeakIdentityDictionary_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    48
_WeakDependencyDictionary_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    49
_WeakValueDictionary_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    50
_IdentitySet_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    51
_WeakIdentitySet_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    52
_SignalSet_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    53
_SemaphoreSet_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    54
_Context_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    55
_BlockContext_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    56
_Delay_Init(pass,__pRT__,snd);
4567
cdf2c2f5b422 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 4047
diff changeset
    57
_GenericException_Init(pass,__pRT__,snd);
2902
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    58
_Exception_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    59
_ExecutableFunction_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    60
_CompiledCode_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    61
_Block_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    62
_VarArgBlock_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    63
_CheapBlock_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    64
_VarArgCheapBlock_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    65
_Method_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    66
_Filename_Init(pass,__pRT__,snd);
3415
20ca4cea6f94 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
    67
#ifndef WIN32
20ca4cea6f94 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
    68
# ifndef VMS
2940
2dfe03724ec3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 2908
diff changeset
    69
_UnixFilename_Init(pass,__pRT__,snd);
2dfe03724ec3 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 2908
diff changeset
    70
# endif
2908
b3be3629fcb1 vms stuff
Claus Gittinger <cg@exept.de>
parents: 2902
diff changeset
    71
#endif
2902
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    72
_InterestConverter_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    73
_WeakInterestConverter_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    74
_Link_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    75
_Process_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    76
_Magnitude_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    77
_LookupKey_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    78
_Association_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    79
_AbstractTime_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    80
_AbsoluteTime_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    81
_Time_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    82
_ArithmeticValue_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    83
_Number_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    84
_Fraction_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    85
_Integer_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    86
_LargeInteger_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    87
_SmallInteger_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    88
_LimitedPrecisionReal_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    89
_Float_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    90
_ShortFloat_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    91
_Point_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    92
_Character_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    93
_Date_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    94
_Message_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    95
_MiniDebugger_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    96
_MiniInspector_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    97
_ObjectMemory_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    98
_ProcessorScheduler_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    99
_Geometric_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   100
_Rectangle_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   101
_Registry_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   102
_HandleRegistry_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   103
_Signal_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   104
_QuerySignal_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   105
_Smalltalk_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   106
_Stream_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   107
_PeekableStream_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   108
_PositionableStream_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   109
_ReadStream_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   110
_WriteStream_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   111
_ReadWriteStream_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   112
_ExternalStream_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   113
_FileStream_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   114
_DirectoryStream_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   115
_NonPositionableExternalStream_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   116
_PipeStream_Init(pass,__pRT__,snd);
3577
6e2e48919aea *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3514
diff changeset
   117
_FileDirectory_Init(pass,__pRT__,snd);
2902
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   118
_UndefinedObject_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   119
_ExternalAddress_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   120
_ExternalBytes_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   121
_ExternalFunction_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   122
_MethodDictionary_Init(pass,__pRT__,snd);
3514
4458b3a59579 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3415
diff changeset
   123
_AbstractOperatingSystem_Init(pass,__pRT__,snd);
3577
6e2e48919aea *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3514
diff changeset
   124
#ifndef WIN32
6e2e48919aea *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3514
diff changeset
   125
# ifndef VMS
6e2e48919aea *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3514
diff changeset
   126
_UnixOperatingSystem_Init(pass,__pRT__,snd);
6e2e48919aea *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3514
diff changeset
   127
# endif
6e2e48919aea *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3514
diff changeset
   128
#endif
2902
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   129
_ObsoleteObject_Init(pass,__pRT__,snd);
3415
20ca4cea6f94 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
   130
_UserPreferences_Init(pass,__pRT__,snd);
2902
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   131
_BinaryObjectStorage_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   132
_BinaryIOManager_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   133
_BinaryInputManager_Init(pass,__pRT__,snd);
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   134
_BinaryOutputManager_Init(pass,__pRT__,snd);
3415
20ca4cea6f94 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
   135
#ifdef WIN32
20ca4cea6f94 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
   136
_PCFilename_Init(pass,__pRT__,snd);
3577
6e2e48919aea *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3514
diff changeset
   137
#endif
6e2e48919aea *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3514
diff changeset
   138
#ifdef WIN32
3514
4458b3a59579 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3415
diff changeset
   139
_Win32OperatingSystem_Init(pass,__pRT__,snd);
3415
20ca4cea6f94 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
   140
#endif
20ca4cea6f94 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
   141
#ifdef VMS
20ca4cea6f94 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
   142
_OpenVMSFilename_Init(pass,__pRT__,snd);
3577
6e2e48919aea *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3514
diff changeset
   143
#endif
6e2e48919aea *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3514
diff changeset
   144
#ifdef VMS
3514
4458b3a59579 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3415
diff changeset
   145
_OpenVMSOperatingSystem_Init(pass,__pRT__,snd);
3415
20ca4cea6f94 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
   146
#endif
20ca4cea6f94 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 3412
diff changeset
   147
__END_PACKAGE__();
2902
55d3c293f055 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   148
}