1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
|
/* file generated by oo2c -- do not edit */
#ifndef _MODULE_SymbolTable_
#define _MODULE_SymbolTable_
#define SymbolTable__predCHR 12
#define SymbolTable__predLONGCHR 13
#define SymbolTable__predENTIER 14
#define SymbolTable__predLONG 15
#define SymbolTable__predORD 16
#define SymbolTable__predSHORT 17
#define SymbolTable__predMAX 18
#define SymbolTable__predMIN 19
#define SymbolTable__predSIZE 20
#define SymbolTable__predABS 21
#define SymbolTable__predCAP 22
#define SymbolTable__predODD 23
#define SymbolTable__sysADR 24
#define SymbolTable__predASH 26
#define SymbolTable__sysBIT 27
#define SymbolTable__sysLSH 28
#define SymbolTable__sysROT 29
#define SymbolTable__predLEN 30
#define SymbolTable__sysVAL 31
#define SymbolTable__predINCL 32
#define SymbolTable__predEXCL 33
#define SymbolTable__predINC 34
#define SymbolTable__predDEC 35
#define SymbolTable__predCOPY 36
#define SymbolTable__sysMOVE 37
#define SymbolTable__sysGET 38
#define SymbolTable__sysPUT 39
#define SymbolTable__sysNEW 42
#define SymbolTable__predNEW 43
#define SymbolTable__predHALT 45
#define SymbolTable__predASSERT 46
#define SymbolTable__predFirstFree 47
#include "Data.h"
typedef struct SymbolTable__StructListDesc {
struct SymbolTable__StructListDesc* next;
Data__Struct type;
} SymbolTable__StructListDesc;
typedef struct SymbolTable__StructListDesc* SymbolTable__StructList;
#define SymbolTable__globalLevel 0
#define SymbolTable__currentModuleId 0
#define SymbolTable__predefModuleId -1
#define SymbolTable__systemModuleId -2
extern Data__Object SymbolTable__predef;
extern Data__Object SymbolTable__system;
extern Data__Object SymbolTable__mod;
extern Data__Object SymbolTable__currScope;
extern SymbolTable__StructList SymbolTable__typeConstrList;
extern Data__Object SymbolTable__importedMods;
extern Data__Const SymbolTable__constTrue;
extern Data__Const SymbolTable__constFalse;
extern Data__Object SymbolTable__mem;
extern Data__Object SymbolTable__store;
extern unsigned char(* SymbolTable__paramsMatchExt)(Data__Struct str1, Data__Struct str2);
extern Data__Struct SymbolTable__NewStruct(signed char form, int pos);
extern Data__Object SymbolTable__NewObject(const unsigned char* name__ref, int name_0d, signed char mode, int pos);
extern Data__Object SymbolTable__NewModule(const unsigned char* modName__ref, int modName_0d, int pos);
extern Data__Const SymbolTable__GetBoolConst(unsigned char bool_);
extern unsigned char SymbolTable__LocalObject(Data__Object ref, Data__Object obj);
extern unsigned char SymbolTable__ImportedObject(Data__Object ref, Data__Object obj);
extern unsigned char SymbolTable__Visible(Data__Object ref, Data__Object obj);
extern unsigned char SymbolTable__Unnamed(Data__Struct t);
extern unsigned char SymbolTable__LocalType(Data__Object ref, Data__Struct t);
extern Data__Object SymbolTable__Module(Data__Object obj);
extern int SymbolTable__NumberOfTBProcs(Data__Struct record, unsigned char baseComplete);
extern void SymbolTable__TypeName(unsigned char* descr, int descr_0d, Data__Struct str);
extern void SymbolTable__ErrT1(int pos, short int num, Data__Struct t1);
extern Data__Object SymbolTable__FindDecl(Data__Addressable scope, const unsigned char* name, int name_0d);
extern Data__Object SymbolTable__BaseDefinition(Data__Object receiver, const unsigned char* name, int name_0d);
extern void SymbolTable__OpenScope(Data__Object scope, short int moduleId, short int level);
extern void SymbolTable__CloseScope(unsigned char check);
extern unsigned char SymbolTable__GlobalDecl(Data__Object obj);
extern Data__Object SymbolTable__TransformIntoList(Data__Object root);
extern Data__Object SymbolTable__TransformIntoTree(Data__Object list);
extern void SymbolTable__BalanceTree(Data__Object scope);
extern unsigned char SymbolTable__SameType(Data__Struct a, Data__Struct b);
extern unsigned char SymbolTable__EqualTypes(Data__Struct a, Data__Struct b);
extern unsigned char SymbolTable__ExtensionOf(Data__Struct a, Data__Struct b);
extern Data__Struct SymbolTable__ParameterType(Data__Object param);
extern unsigned char SymbolTable__ParamsMatch(Data__Struct str1, Data__Struct str2, unsigned char allowResultExt);
extern unsigned char SymbolTable__TypeInGroup(Data__Struct t, signed char group);
extern unsigned char SymbolTable__Includes(Data__Struct a, Data__Struct b, signed char grp);
extern void SymbolTable__Insert(Data__Object obj);
extern void SymbolTable__InsertParams(Data__Object proc);
extern void SymbolTable__MakeFormalParsLocal(Data__Object proc);
extern Data__Object SymbolTable__Find(const unsigned char* name, int name_0d);
extern Data__Object SymbolTable__FindField(Data__Struct record, const unsigned char* name, int name_0d);
extern void SymbolTable__InsertField(Data__Struct record, Data__Object obj);
extern void SymbolTable__AddStructRef(SymbolTable__StructList *list, Data__Struct type);
extern void SymbolTable__Init(void);
extern struct _TD SymbolTable__StructListDesc_td;
extern void SymbolTable_init(void);
#endif
|
