libInit.cc
author Stefan Vogel <sv@exept.de>
Fri, 06 Mar 1998 16:38:37 +0100
changeset 657 0ecf1ff6f6bf
parent 609 dfae7c6eea05
child 696 ca72e0576589
permissions -rw-r--r--
Fix #makeMethod:
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
606
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     1
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     2
#ifndef OLDVMDATA
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     3
# define __INDIRECTVMINITCALLS__
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     4
#endif
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     5
#include <stc.h>
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     6
_libcomp_Init(pass, __pRT__, snd)
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     7
#ifdef OLDVMDATA
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     8
OBJ snd; struct __initTab__ *__pRT__; {
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     9
#else
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    10
OBJ snd; struct __vmData__ *__pRT__; {
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    11
#endif
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    12
 __BEGIN_PACKAGE__("libcomp", _libcomp_Init);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    13
_AssignmentNode_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    14
_ByteCodeCompiler_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    15
_BinaryNode_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    16
_BlockNode_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    17
_CascadeNode_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    18
_ConstantNode_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
_Explainer_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
_ImmutableArray_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    21
_LazyMethod_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    22
_MessageNode_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    23
_ObjectFileHandle_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    24
_ParseNode_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    25
_Parser_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    26
_PrimitiveNode_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    27
_PrimaryNode_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    28
_ProgramNodeEnumerator_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    29
_ReturnNode_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    30
_Scanner_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    31
_SelfNode_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    32
_SourceFileLoader_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    33
_StatementNode_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    34
_SuperNode_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    35
_UnaryNode_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    36
_UndefinedVariable_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    37
_VariableNode_Init(pass,__pRT__,snd);
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    38
_Variable_Init(pass,__pRT__,snd);
609
dfae7c6eea05 vms changes
Claus Gittinger <cg@exept.de>
parents: 606
diff changeset
    39
_ObjectFileLoader_Init(pass,__pRT__,snd);
606
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    40
 __END_PACKAGE__();
97cfe3347761 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    41
}