Artifact
54b6423105a920a1af9ce16c697b8e2bbbeadc9e:
0000: 2f 2f 20 42 65 67 69 6e 20 66 6f 72 77 61 72 64 // Begin forward
0010: 20 64 65 63 6c 61 72 61 74 69 6f 6e 73 0d 0a 0d declarations...
0020: 0a 63 6c 61 73 73 20 20 43 42 4c 4d 6f 64 75 6c .class CBLModul
0030: 65 3b 0d 0a 63 6c 61 73 73 20 20 43 42 4c 50 72 e;..class CBLPr
0040: 6f 63 49 6e 66 6f 3b 0d 0a 63 6c 61 73 73 20 20 ocInfo;..class
0050: 43 42 4c 56 61 72 49 6e 66 6f 3b 0d 0a 63 6c 61 CBLVarInfo;..cla
0060: 73 73 20 20 43 53 74 64 4f 6c 65 42 4c 43 6f 6e ss CStdOleBLCon
0070: 74 65 78 74 3b 0d 0a 63 6c 61 73 73 20 20 43 54 text;..class CT
0080: 6f 6b 65 6e 73 42 6f 78 3b 0d 0a 0d 0a 2f 2f 20 okensBox;....//
0090: 45 6e 64 20 66 6f 72 77 61 72 64 20 64 65 63 6c End forward decl
00a0: 61 72 61 74 69 6f 6e 73 0d 0a 2f 2f 20 42 65 67 arations..// Beg
00b0: 69 6e 20 63 6c 61 73 73 20 64 65 73 63 72 69 70 in class descrip
00c0: 74 69 6f 6e 73 0d 0a 0d 0a 0d 0a 63 6c 61 73 73 tions......class
00d0: 20 43 55 6e 6b 42 4c 61 6e 67 43 6c 61 73 73 0d CUnkBLangClass.
00e0: 0a 7b 0d 0a 09 76 69 72 74 75 61 6c 20 76 6f 69 .{...virtual voi
00f0: 64 2a 20 66 75 6e 6b 30 30 28 75 6e 73 69 67 6e d* funk00(unsign
0100: 65 64 20 69 6e 74 29 3b 20 2f 2f 3f 3f 5f 47 66 ed int); //??_Gf
0110: 69 6c 65 62 75 66 40 40 55 41 45 50 41 58 49 40 ilebuf@@UAEPAXI@
0120: 5a 3b 20 70 75 62 6c 69 63 3a 20 76 69 72 74 75 Z; public: virtu
0130: 61 6c 20 76 6f 69 64 20 2a 20 5f 5f 74 68 69 73 al void * __this
0140: 63 61 6c 6c 20 66 69 6c 65 62 75 66 3a 3a 60 73 call filebuf::`s
0150: 63 61 6c 61 72 20 64 65 6c 65 74 69 6e 67 20 64 calar deleting d
0160: 65 73 74 72 75 63 74 6f 72 27 28 75 6e 73 69 67 estructor'(unsig
0170: 6e 65 64 20 69 6e 74 29 0d 0a 09 76 69 72 74 75 ned int)...virtu
0180: 61 6c 20 69 6e 74 20 66 75 6e 6b 30 31 28 76 6f al int funk01(vo
0190: 69 64 29 3b 0d 0a 7d 3b 0d 0a 0d 0a 63 6c 61 73 id);..};....clas
01a0: 73 20 43 50 72 6f 63 4c 61 62 65 6c 49 6e 66 6f s CProcLabelInfo
01b0: 0d 0a 7b 0d 0a 70 75 62 6c 69 63 3a 0d 0a 09 43 ..{..public:...C
01c0: 53 74 72 69 6e 67 20 6d 5f 4e 61 6d 65 3b 0d 0a String m_Name;..
01d0: 09 69 6e 74 20 6d 5f 41 64 64 72 3b 0d 0a 0d 0a .int m_Addr;....
01e0: 70 75 62 6c 69 63 3a 0d 0a 09 76 69 72 74 75 61 public:...virtua
01f0: 6c 20 7e 43 50 72 6f 63 4c 61 62 65 6c 49 6e 66 l ~CProcLabelInf
0200: 6f 28 76 6f 69 64 29 3b 0d 0a 09 76 69 72 74 75 o(void);...virtu
0210: 61 6c 20 4c 50 43 53 54 52 20 47 65 74 4e 61 6d al LPCSTR GetNam
0220: 65 28 76 6f 69 64 29 3b 0d 0a 7d 3b 0d 0a 0d 0a e(void);..};....
0230: 63 6c 61 73 73 20 43 50 72 6f 63 56 61 72 49 6e class CProcVarIn
0240: 66 6f 0d 0a 7b 0d 0a 70 75 62 6c 69 63 3a 0d 0a fo..{..public:..
0250: 09 43 53 74 72 69 6e 67 20 6d 5f 4e 61 6d 65 3b .CString m_Name;
0260: 20 20 20 20 20 20 20 2f 2f 30 34 68 0d 0a 09 69 //04h...i
0270: 6e 74 20 6d 5f 41 72 72 61 79 53 69 7a 65 3b 20 nt m_ArraySize;
0280: 20 20 20 20 20 2f 2f 30 38 68 0d 0a 09 42 4f 4f //08h...BOO
0290: 4c 20 6d 5f 49 73 45 78 70 6f 72 74 3b 20 20 20 L m_IsExport;
02a0: 20 20 20 2f 2f 30 43 68 0d 0a 09 69 6e 74 20 6d //0Ch...int m
02b0: 5f 46 6c 61 67 73 3b 20 20 20 20 20 20 20 20 20 _Flags;
02c0: 20 2f 2f 31 30 68 20 20 2f 2f 20 26 31 3d 3d 30 //10h // &1==0
02d0: 20 2d 20 c7 ed e0 f7 20 2c 20 26 32 3d 3d 31 20 - .... , &2==1
02e0: 2d 20 69 6e 2d ef e0 f0 e0 ec e5 f2 f0 0d 0a 09 - in-...........
02f0: 69 6e 74 20 6d 5f 43 6f 6e 73 74 49 6e 66 6f 49 int m_ConstInfoI
0300: 6e 64 65 78 3b 20 2f 2f 31 34 68 20 20 2f 2f e7 ndex; //14h //.
0310: ed e0 f7 e5 ed e8 e5 20 ef ee 2d f3 ec ee eb f7 ....... ..-.....
0320: e0 ed e8 fe 0d 0a 0d 0a 70 75 62 6c 69 63 3a 0d ........public:.
0330: 0a 09 76 69 72 74 75 61 6c 20 7e 43 50 72 6f 63 ..virtual ~CProc
0340: 56 61 72 49 6e 66 6f 28 76 6f 69 64 29 3b 0d 0a VarInfo(void);..
0350: 09 76 69 72 74 75 61 6c 20 4c 50 43 53 54 52 20 .virtual LPCSTR
0360: 47 65 74 4e 61 6d 65 28 76 6f 69 64 29 3b 0d 0a GetName(void);..
0370: 7d 3b 0d 0a 0d 0a 63 6c 61 73 73 20 43 43 6f 6e };....class CCon
0380: 73 74 49 6e 66 6f 0d 0a 7b 0d 0a 70 75 62 6c 69 stInfo..{..publi
0390: 63 3a 0d 0a 09 43 54 79 70 65 64 56 61 6c 75 65 c:...CTypedValue
03a0: 20 6d 5f 56 61 6c 75 65 3b 0d 0a 0d 0a 70 75 62 m_Value;....pub
03b0: 6c 69 63 3a 0d 0a 09 76 69 72 74 75 61 6c 20 7e lic:...virtual ~
03c0: 43 43 6f 6e 73 74 49 6e 66 6f 28 76 6f 69 64 29 CConstInfo(void)
03d0: 3b 0d 0a 09 76 69 72 74 75 61 6c 20 76 6f 69 64 ;...virtual void
03e0: 2a 20 47 65 74 55 6e 6b 44 61 74 61 28 76 6f 69 * GetUnkData(voi
03f0: 64 29 3b 0d 0a 7d 3b 0d 0a 0d 0a 63 6c 61 73 73 d);..};....class
0400: 20 43 50 72 6f 63 49 6e 66 6f 0d 0a 7b 0d 0a 70 CProcInfo..{..p
0410: 75 62 6c 69 63 3a 0d 0a 09 43 53 74 72 69 6e 67 ublic:...CString
0420: 20 6d 5f 4e 61 6d 65 3b 20 20 20 20 20 20 2f 2f m_Name; //
0430: 30 34 68 0d 0a 09 69 6e 74 20 6d 5f 54 79 70 65 04h...int m_Type
0440: 3b 20 20 20 20 20 20 20 20 20 20 2f 2f 30 38 68 ; //08h
0450: 20 2f 2f 30 20 2d 20 ef e5 f0 e5 ec e5 ed ed e0 //0 - .........
0460: ff 3b 20 31 20 2d 20 ef f0 ee f6 e5 e4 f3 f0 e0 .; 1 - .........
0470: 3b 20 32 20 2d 20 f4 f3 ed ea f6 e8 ff 3b 20 33 ; 2 - .......; 3
0480: 20 2d 20 f2 e5 eb ee 20 ec ee e4 f3 eb ff 0d 0a - .... ........
0490: 09 69 6e 74 20 6d 5f 42 61 73 65 41 64 64 72 3b .int m_BaseAddr;
04a0: 20 20 20 20 20 20 2f 2f 30 43 68 0d 0a 09 69 6e //0Ch...in
04b0: 74 20 6d 5f 4e 50 61 72 61 6d 73 3b 20 20 20 20 t m_NParams;
04c0: 20 20 20 2f 2f 31 30 68 0d 0a 09 43 55 6e 6b 42 //10h...CUnkB
04d0: 4c 61 6e 67 43 6c 61 73 73 20 55 6e 6b 31 3b 20 LangClass Unk1;
04e0: 2f 2f 31 34 68 0d 0a 09 43 54 79 70 65 64 50 74 //14h...CTypedPt
04f0: 72 41 72 72 61 79 3c 43 50 74 72 41 72 72 61 79 rArray<CPtrArray
0500: 2c 43 50 72 6f 63 56 61 72 49 6e 66 6f 2a 3e 20 ,CProcVarInfo*>
0510: 6d 5f 56 61 72 41 72 72 3b 20 20 20 20 2f 2f 31 m_VarArr; //1
0520: 38 68 20 2f 2f ef e5 f0 e5 ec e5 ed ed fb e5 20 8h //..........
0530: ec ee e4 f3 eb ff 0d 0a 09 43 55 6e 6b 42 4c 61 .........CUnkBLa
0540: 6e 67 43 6c 61 73 73 20 55 6e 6b 32 3b 20 2f 2f ngClass Unk2; //
0550: 32 43 68 0d 0a 09 43 54 79 70 65 64 50 74 72 41 2Ch...CTypedPtrA
0560: 72 72 61 79 3c 43 50 74 72 41 72 72 61 79 2c 43 rray<CPtrArray,C
0570: 50 72 6f 63 4c 61 62 65 6c 49 6e 66 6f 2a 3e 20 ProcLabelInfo*>
0580: 6d 5f 4c 61 62 65 6c 41 72 72 3b 2f 2f 33 30 68 m_LabelArr;//30h
0590: 20 2f 2f ec e5 f2 ea e8 20 ec ee e4 f3 eb ff 0d //..... .......
05a0: 0a 09 76 6f 69 64 2a 20 6d 5f 44 61 74 61 31 3b ..void* m_Data1;
05b0: 20 20 20 20 20 20 20 2f 2f 33 43 68 0d 0a 09 42 //3Ch...B
05c0: 4f 4f 4c 20 6d 5f 49 73 45 78 70 6f 72 74 3b 20 OOL m_IsExport;
05d0: 20 20 20 20 2f 2f 34 30 68 0d 0a 09 69 6e 74 20 //40h...int
05e0: 6d 5f 44 61 74 61 32 3b 20 20 20 20 20 20 20 20 m_Data2;
05f0: 20 2f 2f 34 34 68 0d 0a 09 69 6e 74 20 6d 5f 44 //44h...int m_D
0600: 61 74 61 33 3b 20 20 20 20 20 20 20 20 20 2f 2f ata3; //
0610: 34 38 68 0d 0a 09 44 57 4f 52 44 20 6d 5f 44 61 48h...DWORD m_Da
0620: 74 61 34 3b 20 20 20 20 20 20 20 2f 2f 34 43 68 ta4; //4Ch
0630: 0d 0a 09 0d 0a 09 76 69 72 74 75 61 6c 20 7e 43 ......virtual ~C
0640: 50 72 6f 63 49 6e 66 6f 28 76 6f 69 64 29 3b 0d ProcInfo(void);.
0650: 0a 09 76 69 72 74 75 61 6c 20 4c 50 43 53 54 52 ..virtual LPCSTR
0660: 20 47 65 74 4e 61 6d 65 28 76 6f 69 64 29 3b 0d GetName(void);.
0670: 0a 7d 3b 0d 0a 0d 0a 63 6c 61 73 73 20 43 43 6f .};....class CCo
0680: 6d 70 69 6c 65 64 4d 6f 64 75 6c 65 0d 0a 7b 0d mpiledModule..{.
0690: 0a 70 75 62 6c 69 63 3a 0d 0a 09 43 55 6e 6b 42 .public:...CUnkB
06a0: 4c 61 6e 67 43 6c 61 73 73 20 55 6e 6b 31 3b 20 LangClass Unk1;
06b0: 20 20 20 2f 2f 30 30 68 0d 0a 09 43 54 79 70 65 //00h...CType
06c0: 64 50 74 72 41 72 72 61 79 3c 43 50 74 72 41 72 dPtrArray<CPtrAr
06d0: 72 61 79 2c 20 43 43 6f 6e 73 74 49 6e 66 6f 2a ray, CConstInfo*
06e0: 3e 20 6d 5f 43 6f 6e 73 74 41 72 72 3b 20 2f 2f > m_ConstArr; //
06f0: 30 34 68 20 2f 2f ea ee ed f1 f2 e0 ed f2 fb 20 04h //.........
0700: ec ee e4 f3 eb ff 0d 0a 09 43 55 6e 6b 42 4c 61 .........CUnkBLa
0710: 6e 67 43 6c 61 73 73 20 55 6e 6b 32 3b 20 20 20 ngClass Unk2;
0720: 20 2f 2f 31 38 68 0d 0a 09 43 54 79 70 65 64 50 //18h...CTypedP
0730: 74 72 41 72 72 61 79 3c 43 50 74 72 41 72 72 61 trArray<CPtrArra
0740: 79 2c 20 43 50 72 6f 63 49 6e 66 6f 2a 3e 20 6d y, CProcInfo*> m
0750: 5f 50 72 6f 63 41 72 72 3b 20 20 20 2f 2f 31 43 _ProcArr; //1C
0760: 68 20 2f 2f ef f0 ee f6 e5 e4 f3 f0 fb 20 ec ee h //......... ..
0770: e4 f3 eb ff 0d 0a 09 43 44 57 6f 72 64 41 72 72 .......CDWordArr
0780: 61 79 20 6d 5f 50 43 6f 64 65 3b 20 20 20 20 2f ay m_PCode; /
0790: 2f 33 30 68 0d 0a 09 76 6f 69 64 2a 20 6d 5f 44 /30h...void* m_D
07a0: 61 74 61 31 3b 20 20 20 20 20 20 20 20 20 20 2f ata1; /
07b0: 2f 34 30 68 0d 0a 09 76 6f 69 64 2a 20 6d 5f 44 /40h...void* m_D
07c0: 61 74 61 32 3b 20 20 20 20 20 20 20 20 20 20 2f ata2; /
07d0: 2f 34 34 68 0d 0a 7d 3b 0d 0a 0d 0a 63 6c 61 73 /44h..};....clas
07e0: 73 20 43 43 6f 6d 70 69 6c 65 72 3b 0d 0a 0d 0a s CCompiler;....
07f0: 63 6c 61 73 73 20 49 4d 50 4f 52 54 5f 31 43 20 class IMPORT_1C
0800: 43 42 4c 4d 6f 64 75 6c 65 49 6e 74 65 72 6e 61 CBLModuleInterna
0810: 6c 73 0d 0a 7b 0d 0a 70 75 62 6c 69 63 3a 0d 0a ls..{..public:..
0820: 09 43 42 4c 4d 6f 64 75 6c 65 2a 20 6d 5f 70 4d .CBLModule* m_pM
0830: 6f 64 75 6c 65 3b 20 20 20 20 20 20 20 20 20 20 odule;
0840: 20 20 20 20 20 2f 2f 30 30 68 0d 0a 09 43 42 4c //00h...CBL
0850: 43 6f 6e 74 65 78 74 2a 20 6d 5f 70 43 6f 6e 74 Context* m_pCont
0860: 65 78 74 3b 20 20 20 20 20 2f 2f 30 34 68 0d 0a ext; //04h..
0870: 09 44 57 4f 52 44 20 6d 5f 44 61 74 61 31 3b 20 .DWORD m_Data1;
0880: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0890: 20 20 20 20 20 2f 2f 30 38 68 0d 0a 09 43 42 4c //08h...CBL
08a0: 53 70 65 6c 6c 65 72 2a 20 6d 5f 70 42 4c 53 70 Speller* m_pBLSp
08b0: 65 6c 6c 65 72 3b 20 20 20 20 20 20 20 20 20 20 eller;
08c0: 20 2f 2f 30 43 68 0d 0a 09 44 57 4f 52 44 20 6d //0Ch...DWORD m
08d0: 5f 44 61 74 61 32 3b 20 20 20 20 20 20 20 20 20 _Data2;
08e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2f 31 //1
08f0: 30 68 0d 0a 09 43 53 74 72 69 6e 67 20 6d 5f 53 0h...CString m_S
0900: 6f 75 72 63 65 53 74 72 3b 20 20 20 20 20 20 20 ourceStr;
0910: 20 20 20 20 20 20 20 20 20 2f 2f 31 34 68 0d 0a //14h..
0920: 09 44 57 4f 52 44 2a 20 6d 5f 70 53 74 61 72 74 .DWORD* m_pStart
0930: 49 44 41 72 72 61 79 3b 20 20 20 20 20 20 20 20 IDArray;
0940: 20 20 20 20 20 2f 2f 31 38 68 0d 0a 09 44 57 4f //18h...DWO
0950: 52 44 2a 20 6d 5f 70 45 6e 64 49 44 41 72 72 61 RD* m_pEndIDArra
0960: 79 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 y1;
0970: 20 2f 2f 31 43 68 0d 0a 09 44 57 4f 52 44 2a 20 //1Ch...DWORD*
0980: 6d 5f 70 45 6e 64 49 44 41 72 72 61 79 32 3b 20 m_pEndIDArray2;
0990: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2f 32 //2
09a0: 30 68 0d 0a 09 43 43 6f 6d 70 69 6c 65 72 2a 20 0h...CCompiler*
09b0: 6d 5f 70 43 6f 6d 70 69 6c 65 72 3b 20 20 20 20 m_pCompiler;
09c0: 20 20 20 20 20 20 20 20 20 2f 2f 32 34 68 0d 0a //24h..
09d0: 09 43 43 6f 6d 70 69 6c 65 64 4d 6f 64 75 6c 65 .CCompiledModule
09e0: 2a 20 6d 5f 70 43 6f 6d 70 69 6c 65 64 4d 6f 64 * m_pCompiledMod
09f0: 75 6c 65 3b 20 2f 2f 32 38 68 0d 0a 09 43 42 4c ule; //28h...CBL
0a00: 4d 6f 64 75 6c 65 2a 2a 20 6d 5f 70 70 45 78 65 Module** m_ppExe
0a10: 63 75 74 65 64 4d 6f 64 75 6c 65 3b 20 20 20 20 cutedModule;
0a20: 20 2f 2f 32 43 68 0d 0a 09 63 68 61 72 2a 2a 20 //2Ch...char**
0a30: 6d 5f 70 70 44 61 74 61 33 3b 20 20 20 20 20 20 m_ppData3;
0a40: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2f 33 //3
0a50: 30 68 0d 0a 09 20 20 20 20 20 20 20 20 20 20 20 0h...
0a60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0a70: 20 20 20 20 20 20 20 20 20 2f 2f 73 69 7a 65 20 //size
0a80: 33 34 68 0d 0a 7d 3b 0d 0a 0d 0a 0d 0a 63 6c 61 34h..};......cla
0a90: 73 73 20 49 4d 50 4f 52 54 5f 31 43 20 43 42 4c ss IMPORT_1C CBL
0aa0: 4d 6f 64 75 6c 65 20 2f 2f 56 46 20 54 61 62 6c Module //VF Tabl
0ab0: 65 20 4f 4b 0d 0a 7b 0d 0a 70 75 62 6c 69 63 3a e OK..{..public:
0ac0: 0d 0a 09 43 42 4c 4d 6f 64 75 6c 65 49 6e 74 65 ...CBLModuleInte
0ad0: 72 6e 61 6c 73 2a 20 6d 5f 70 49 6e 74 49 6e 66 rnals* m_pIntInf
0ae0: 6f 3b 0d 0a 0d 0a 09 43 42 4c 4d 6f 64 75 6c 65 o;.....CBLModule
0af0: 28 63 6c 61 73 73 20 43 42 4c 4d 6f 64 75 6c 65 (class CBLModule
0b00: 20 63 6f 6e 73 74 20 26 29 3b 09 2f 2f 31 0d 0a const &);.//1..
0b10: 09 43 42 4c 4d 6f 64 75 6c 65 28 63 6c 61 73 73 .CBLModule(class
0b20: 20 43 42 4c 43 6f 6e 74 65 78 74 20 2a 2c 63 68 CBLContext *,ch
0b30: 61 72 20 63 6f 6e 73 74 20 2a 29 3b 09 2f 2f 32 ar const *);.//2
0b40: 0d 0a 0d 0a 09 76 69 72 74 75 61 6c 09 09 09 09 .....virtual....
0b50: 09 7e 43 42 4c 4d 6f 64 75 6c 65 28 76 6f 69 64 .~CBLModule(void
0b60: 29 3b 09 0d 0a 09 76 69 72 74 75 61 6c 20 69 6e );....virtual in
0b70: 74 09 09 09 09 47 65 74 4b 69 6e 64 28 76 6f 69 t....GetKind(voi
0b80: 64 29 63 6f 6e 73 74 3b 09 0d 0a 09 76 69 72 74 d)const;....virt
0b90: 75 61 6c 20 4c 50 43 53 54 52 09 09 09 47 65 74 ual LPCSTR...Get
0ba0: 53 79 6e 74 61 78 4d 61 72 6b 28 76 6f 69 64 29 SyntaxMark(void)
0bb0: 3b 09 0d 0a 09 76 69 72 74 75 61 6c 20 69 6e 74 ;....virtual int
0bc0: 09 09 09 09 4f 6e 53 79 6e 74 61 78 45 72 72 6f ....OnSyntaxErro
0bd0: 72 28 76 6f 69 64 29 3b 09 2f 2f 31 32 38 0d 0a r(void);.//128..
0be0: 09 76 69 72 74 75 61 6c 20 69 6e 74 09 09 09 09 .virtual int....
0bf0: 4f 6e 52 75 6e 74 69 6d 65 45 72 72 6f 72 28 76 OnRuntimeError(v
0c00: 6f 69 64 29 3b 09 2f 2f 31 32 34 0d 0a 09 76 69 oid);.//124...vi
0c10: 72 74 75 61 6c 20 69 6e 74 09 09 09 09 4f 6e 53 rtual int....OnS
0c20: 74 61 72 74 45 78 65 63 75 74 69 6f 6e 28 76 6f tartExecution(vo
0c30: 69 64 29 3b 09 2f 2f 31 32 36 0d 0a 09 76 69 72 id);.//126...vir
0c40: 74 75 61 6c 20 69 6e 74 09 09 09 09 4f 6e 4e 65 tual int....OnNe
0c50: 78 74 4c 69 6e 65 28 76 6f 69 64 29 3b 09 2f 2f xtLine(void);.//
0c60: 31 32 33 0d 0a 09 76 69 72 74 75 61 6c 20 76 6f 123...virtual vo
0c70: 69 64 09 09 09 4f 6e 45 6e 74 65 72 50 72 6f 63 id...OnEnterProc
0c80: 28 69 6e 74 29 3b 09 2f 2f 31 31 39 0d 0a 09 76 (int);.//119...v
0c90: 69 72 74 75 61 6c 20 76 6f 69 64 09 09 09 4f 6e irtual void...On
0ca0: 45 78 69 74 50 72 6f 63 28 69 6e 74 29 3b 09 2f ExitProc(int);./
0cb0: 2f 31 32 31 0d 0a 09 76 69 72 74 75 61 6c 20 76 /121...virtual v
0cc0: 6f 69 64 09 09 09 4f 6e 53 74 6f 70 45 78 65 63 oid...OnStopExec
0cd0: 75 74 69 6f 6e 28 76 6f 69 64 29 3b 09 2f 2f 31 ution(void);.//1
0ce0: 32 37 0d 0a 09 76 69 72 74 75 61 6c 20 76 6f 69 27...virtual voi
0cf0: 64 09 09 09 4f 6e 45 72 72 6f 72 4d 65 73 73 61 d...OnErrorMessa
0d00: 67 65 28 63 68 61 72 20 63 6f 6e 73 74 20 2a 29 ge(char const *)
0d10: 3b 09 2f 2f 31 32 30 0d 0a 09 76 69 72 74 75 61 ;.//120...virtua
0d20: 6c 20 76 6f 69 64 09 09 09 4f 6e 53 65 74 53 70 l void...OnSetSp
0d30: 65 6c 6c 65 72 28 63 6c 61 73 73 20 43 56 61 6c eller(class CVal
0d40: 75 65 20 63 6f 6e 73 74 20 26 29 3b 09 2f 2f 31 ue const &);.//1
0d50: 32 35 0d 0a 09 76 69 72 74 75 61 6c 20 69 6e 74 25...virtual int
0d60: 09 09 09 09 4f 6e 44 6f 4d 65 73 73 61 67 65 42 ....OnDoMessageB
0d70: 6f 78 28 63 68 61 72 20 63 6f 6e 73 74 20 2a 2c ox(char const *,
0d80: 75 6e 73 69 67 6e 65 64 20 69 6e 74 2c 75 6e 73 unsigned int,uns
0d90: 69 67 6e 65 64 20 69 6e 74 29 3b 09 2f 2f 31 31 igned int);.//11
0da0: 38 0d 0a 09 76 69 72 74 75 61 6c 20 76 6f 69 64 8...virtual void
0db0: 09 09 09 4f 6e 47 65 74 45 72 72 6f 72 44 65 73 ...OnGetErrorDes
0dc0: 63 72 69 70 74 69 6f 6e 28 63 6c 61 73 73 20 43 cription(class C
0dd0: 53 74 72 69 6e 67 20 26 29 3b 09 2f 2f 31 32 32 String &);.//122
0de0: 0d 0a 0d 0a 09 73 74 61 74 69 63 20 76 6f 69 64 .....static void
0df0: 20 20 41 64 64 54 6f 4b 65 79 77 6f 72 64 43 6f AddToKeywordCo
0e00: 6c 6f 72 4c 69 73 74 28 63 68 61 72 20 63 6f 6e lorList(char con
0e10: 73 74 20 2a 29 3b 09 2f 2f 32 31 0d 0a 09 73 74 st *);.//21...st
0e20: 61 74 69 63 20 76 6f 69 64 20 20 41 64 64 54 6f atic void AddTo
0e30: 4b 65 79 77 6f 72 64 43 6f 6c 6f 72 4c 69 73 74 KeywordColorList
0e40: 28 63 6c 61 73 73 20 43 42 4c 43 6f 6e 74 65 78 (class CBLContex
0e50: 74 20 63 6f 6e 73 74 20 2a 29 3b 09 2f 2f 32 32 t const *);.//22
0e60: 0d 0a 09 73 74 61 74 69 63 20 69 6e 74 20 20 43 ...static int C
0e70: 6f 6c 6f 72 53 6f 75 72 63 65 4c 69 6e 65 28 63 olorSourceLine(c
0e80: 68 61 72 20 63 6f 6e 73 74 20 2a 2c 63 6c 61 73 har const *,clas
0e90: 73 20 43 42 4c 53 79 6e 74 61 78 43 6f 6c 6f 72 s CBLSyntaxColor
0ea0: 69 6e 67 20 26 29 3b 09 2f 2f 33 33 0d 0a 09 73 ing &);.//33...s
0eb0: 74 61 74 69 63 20 76 6f 69 64 20 20 45 6e 61 62 tatic void Enab
0ec0: 6c 65 44 65 62 75 67 44 75 6d 70 28 69 6e 74 29 leDebugDump(int)
0ed0: 3b 09 2f 2f 33 36 0d 0a 09 73 74 61 74 69 63 20 ;.//36...static
0ee0: 63 6c 61 73 73 20 43 42 4c 4d 6f 64 75 6c 65 20 class CBLModule
0ef0: 2a 20 20 47 65 74 45 78 65 63 75 74 65 64 4d 6f * GetExecutedMo
0f00: 64 75 6c 65 28 76 6f 69 64 29 3b 09 2f 2f 35 33 dule(void);.//53
0f10: 0d 0a 09 73 74 61 74 69 63 20 75 6e 73 69 67 6e ...static unsign
0f20: 65 64 20 6c 6f 6e 67 20 20 47 65 74 46 69 72 73 ed long GetFirs
0f30: 74 4c 6f 61 64 65 64 4d 6f 64 75 6c 65 49 44 28 tLoadedModuleID(
0f40: 76 6f 69 64 29 3b 09 2f 2f 35 34 0d 0a 09 73 74 void);.//54...st
0f50: 61 74 69 63 20 63 6c 61 73 73 20 43 42 4c 4d 6f atic class CBLMo
0f60: 64 75 6c 65 20 2a 20 20 47 65 74 4c 6f 61 64 65 dule * GetLoade
0f70: 64 4d 6f 64 75 6c 65 28 75 6e 73 69 67 6e 65 64 dModule(unsigned
0f80: 20 6c 6f 6e 67 29 3b 09 2f 2f 35 39 0d 0a 09 73 long);.//59...s
0f90: 74 61 74 69 63 20 75 6e 73 69 67 6e 65 64 20 6c tatic unsigned l
0fa0: 6f 6e 67 20 20 47 65 74 4e 65 78 74 4c 6f 61 64 ong GetNextLoad
0fb0: 65 64 4d 6f 64 75 6c 65 49 44 28 75 6e 73 69 67 edModuleID(unsig
0fc0: 6e 65 64 20 6c 6f 6e 67 29 3b 09 2f 2f 37 34 0d ned long);.//74.
0fd0: 0a 09 73 74 61 74 69 63 20 76 6f 69 64 20 20 47 ..static void G
0fe0: 65 74 53 79 6e 74 61 78 45 72 72 44 65 73 63 72 etSyntaxErrDescr
0ff0: 28 69 6e 74 2c 63 6c 61 73 73 20 43 53 74 72 69 (int,class CStri
1000: 6e 67 20 26 29 3b 09 2f 2f 39 33 0d 0a 09 73 74 ng &);.//93...st
1010: 61 74 69 63 20 69 6e 74 20 20 49 73 44 65 62 75 atic int IsDebu
1020: 67 44 75 6d 70 45 6e 61 62 6c 65 64 28 76 6f 69 gDumpEnabled(voi
1030: 64 29 3b 09 2f 2f 31 30 36 0d 0a 09 73 74 61 74 d);.//106...stat
1040: 69 63 20 69 6e 74 20 20 49 73 4c 65 66 74 41 64 ic int IsLeftAd
1050: 6a 46 6f 72 6d 61 74 28 63 68 61 72 20 63 6f 6e jFormat(char con
1060: 73 74 20 2a 29 3b 09 2f 2f 31 31 31 0d 0a 09 73 st *);.//111...s
1070: 74 61 74 69 63 20 76 6f 69 64 20 20 52 61 69 73 tatic void Rais
1080: 65 45 78 74 52 75 6e 74 69 6d 65 45 72 72 6f 72 eExtRuntimeError
1090: 28 63 68 61 72 20 63 6f 6e 73 74 20 2a 2c 69 6e (char const *,in
10a0: 74 29 3b 09 2f 2f 31 33 30 0d 0a 09 73 74 61 74 t);.//130...stat
10b0: 69 63 20 76 6f 69 64 20 20 52 65 6d 6f 76 65 46 ic void RemoveF
10c0: 72 6f 6d 4b 65 79 77 6f 72 64 43 6f 6c 6f 72 4c romKeywordColorL
10d0: 69 73 74 28 63 68 61 72 20 63 6f 6e 73 74 20 2a ist(char const *
10e0: 29 3b 09 2f 2f 31 33 31 0d 0a 09 73 74 61 74 69 );.//131...stati
10f0: 63 20 76 6f 69 64 20 20 52 65 6d 6f 76 65 46 72 c void RemoveFr
1100: 6f 6d 4b 65 79 77 6f 72 64 43 6f 6c 6f 72 4c 69 omKeywordColorLi
1110: 73 74 28 63 6c 61 73 73 20 43 42 4c 43 6f 6e 74 st(class CBLCont
1120: 65 78 74 20 63 6f 6e 73 74 20 2a 29 3b 09 2f 2f ext const *);.//
1130: 31 33 32 0d 0a 09 73 74 61 74 69 63 20 76 6f 69 132...static voi
1140: 64 20 20 53 65 74 4f 6e 43 6f 6d 6d 61 6e 64 45 d SetOnCommandE
1150: 78 63 65 70 74 69 6f 6e 48 61 6e 64 6c 65 72 28 xceptionHandler(
1160: 76 6f 69 64 20 28 5f 5f 63 64 65 63 6c 2a 29 28 void (__cdecl*)(
1170: 63 6c 61 73 73 20 43 45 78 63 65 70 74 69 6f 6e class CException
1180: 20 2a 2c 69 6e 74 20 26 29 29 3b 09 2f 2f 31 33 *,int &));.//13
1190: 36 0d 0a 09 73 74 61 74 69 63 20 69 6e 74 20 20 6...static int
11a0: 54 6f 6b 65 6e 69 7a 65 53 6f 75 72 63 65 4c 69 TokenizeSourceLi
11b0: 6e 65 28 63 68 61 72 20 63 6f 6e 73 74 20 2a 2c ne(char const *,
11c0: 69 6e 74 20 26 2c 63 6c 61 73 73 20 43 53 74 72 int &,class CStr
11d0: 69 6e 67 20 2a 29 3b 09 2f 2f 31 33 39 0d 0a 0d ing *);.//139...
11e0: 0a 09 63 6c 61 73 73 20 43 42 4c 4d 6f 64 75 6c ..class CBLModul
11f0: 65 20 26 20 20 6f 70 65 72 61 74 6f 72 3d 28 63 e & operator=(c
1200: 6c 61 73 73 20 43 42 4c 4d 6f 64 75 6c 65 20 63 lass CBLModule c
1210: 6f 6e 73 74 20 26 29 3b 09 2f 2f 31 31 0d 0a 2f onst &);.//11../
1220: 2f 09 76 6f 69 64 20 20 60 64 65 66 61 75 6c 74 /.void `default
1230: 20 63 6f 6e 73 74 72 75 63 74 6f 72 20 63 6c 6f constructor clo
1240: 73 75 72 65 27 28 76 6f 69 64 29 3b 09 2f 2f 31 sure'(void);.//1
1250: 38 0d 0a 09 76 6f 69 64 20 20 41 64 64 53 6f 75 8...void AddSou
1260: 72 63 65 4c 69 6e 65 28 63 68 61 72 20 63 6f 6e rceLine(char con
1270: 73 74 20 2a 29 3b 09 2f 2f 32 30 0d 0a 09 76 6f st *);.//20...vo
1280: 69 64 20 20 41 73 73 69 67 6e 43 6f 6d 70 69 6c id AssignCompil
1290: 65 64 28 63 6c 61 73 73 20 43 42 4c 4d 6f 64 75 ed(class CBLModu
12a0: 6c 65 20 63 6f 6e 73 74 20 26 29 3b 09 2f 2f 32 le const &);.//2
12b0: 33 0d 0a 09 76 6f 69 64 20 20 41 73 73 69 67 6e 3...void Assign
12c0: 43 6f 6e 74 65 78 74 28 63 6c 61 73 73 20 43 42 Context(class CB
12d0: 4c 43 6f 6e 74 65 78 74 20 2a 29 3b 09 2f 2f 32 LContext *);.//2
12e0: 34 0d 0a 09 76 6f 69 64 20 20 41 73 73 69 67 6e 4...void Assign
12f0: 46 72 69 65 6e 64 4d 6f 64 75 6c 65 28 63 6c 61 FriendModule(cla
1300: 73 73 20 43 42 4c 4d 6f 64 75 6c 65 20 2a 29 3b ss CBLModule *);
1310: 09 2f 2f 32 35 0d 0a 09 76 6f 69 64 20 20 41 73 .//25...void As
1320: 73 69 67 6e 53 6f 75 72 63 65 28 63 6c 61 73 73 signSource(class
1330: 20 43 42 4c 4d 6f 64 75 6c 65 20 63 6f 6e 73 74 CBLModule const
1340: 20 26 29 3b 09 2f 2f 32 36 0d 0a 09 76 6f 69 64 &);.//26...void
1350: 20 20 41 73 73 69 67 6e 53 6f 75 72 63 65 28 63 AssignSource(c
1360: 68 61 72 20 63 6f 6e 73 74 20 2a 29 3b 09 2f 2f har const *);.//
1370: 32 37 0d 0a 09 76 6f 69 64 20 20 41 73 73 69 67 27...void Assig
1380: 6e 53 70 65 6c 6c 65 72 28 63 6c 61 73 73 20 43 nSpeller(class C
1390: 42 4c 53 70 65 6c 6c 65 72 20 2a 29 3b 09 2f 2f BLSpeller *);.//
13a0: 32 38 0d 0a 09 69 6e 74 20 20 43 61 6c 6c 41 73 28...int CallAs
13b0: 46 75 6e 63 28 69 6e 74 2c 63 6c 61 73 73 20 43 Func(int,class C
13c0: 56 61 6c 75 65 20 26 2c 69 6e 74 2c 63 6c 61 73 Value &,int,clas
13d0: 73 20 43 56 61 6c 75 65 20 2a 20 2a 29 3b 09 2f s CValue * *);./
13e0: 2f 32 39 0d 0a 09 69 6e 74 20 20 43 61 6c 6c 41 /29...int CallA
13f0: 73 50 72 6f 63 28 69 6e 74 2c 69 6e 74 2c 63 6c sProc(int,int,cl
1400: 61 73 73 20 43 56 61 6c 75 65 20 2a 20 2a 29 3b ass CValue * *);
1410: 09 2f 2f 33 31 0d 0a 09 69 6e 74 20 20 43 6f 6d .//31...int Com
1420: 70 69 6c 65 28 76 6f 69 64 29 3b 09 2f 2f 33 34 pile(void);.//34
1430: 0d 0a 09 69 6e 74 20 20 45 76 61 6c 45 78 70 72 ...int EvalExpr
1440: 28 63 68 61 72 20 63 6f 6e 73 74 20 2a 2c 63 6c (char const *,cl
1450: 61 73 73 20 43 56 61 6c 75 65 20 26 2c 63 6c 61 ass CValue &,cla
1460: 73 73 20 43 56 61 6c 75 65 20 2a 20 2a 29 3b 09 ss CValue * *);.
1470: 2f 2f 33 37 0d 0a 09 69 6e 74 20 20 45 78 65 63 //37...int Exec
1480: 75 74 65 28 76 6f 69 64 29 3b 09 2f 2f 33 38 0d ute(void);.//38.
1490: 0a 09 69 6e 74 20 20 45 78 65 63 75 74 65 42 61 ..int ExecuteBa
14a0: 74 63 68 28 63 68 61 72 20 63 6f 6e 73 74 20 2a tch(char const *
14b0: 2c 63 6c 61 73 73 20 43 56 61 6c 75 65 20 2a 20 ,class CValue *
14c0: 2a 29 3b 09 2f 2f 33 39 0d 0a 09 69 6e 74 20 20 *);.//39...int
14d0: 46 69 6e 64 46 75 6e 63 28 63 68 61 72 20 63 6f FindFunc(char co
14e0: 6e 73 74 20 2a 29 63 6f 6e 73 74 3b 09 2f 2f 34 nst *)const;.//4
14f0: 30 0d 0a 09 69 6e 74 20 20 46 69 6e 64 50 72 6f 0...int FindPro
1500: 63 28 63 68 61 72 20 63 6f 6e 73 74 20 2a 2c 69 c(char const *,i
1510: 6e 74 29 63 6f 6e 73 74 3b 09 2f 2f 34 32 0d 0a nt)const;.//42..
1520: 09 69 6e 74 20 20 46 69 6e 64 53 74 61 74 69 63 .int FindStatic
1530: 56 61 72 28 63 68 61 72 20 63 6f 6e 73 74 20 2a Var(char const *
1540: 29 63 6f 6e 73 74 3b 09 2f 2f 34 34 0d 0a 09 63 )const;.//44...c
1550: 6c 61 73 73 20 43 53 74 72 69 6e 67 20 20 20 46 lass CString F
1560: 6f 72 6d 61 74 56 61 6c 75 65 28 63 6c 61 73 73 ormatValue(class
1570: 20 43 56 61 6c 75 65 20 63 6f 6e 73 74 20 26 2c CValue const &,
1580: 63 68 61 72 20 63 6f 6e 73 74 20 2a 29 3b 09 2f char const *);./
1590: 2f 34 35 0d 0a 09 69 6e 74 20 20 47 65 74 43 61 /45...int GetCa
15a0: 6c 6c 4c 65 76 65 6c 50 72 6f 63 49 6e 66 6f 28 llLevelProcInfo(
15b0: 69 6e 74 2c 63 6c 61 73 73 20 43 42 4c 50 72 6f int,class CBLPro
15c0: 63 49 6e 66 6f 20 26 2c 69 6e 74 20 26 29 63 6f cInfo &,int &)co
15d0: 6e 73 74 3b 09 2f 2f 34 36 0d 0a 09 69 6e 74 20 nst;.//46...int
15e0: 20 47 65 74 43 61 6c 6c 53 74 61 63 6b 44 65 70 GetCallStackDep
15f0: 74 68 28 76 6f 69 64 29 63 6f 6e 73 74 3b 09 2f th(void)const;./
1600: 2f 34 37 0d 0a 09 69 6e 74 20 20 47 65 74 43 75 /47...int GetCu
1610: 72 53 6f 75 72 63 65 4c 69 6e 65 28 69 6e 74 2c rSourceLine(int,
1620: 63 6c 61 73 73 20 43 53 74 72 69 6e 67 20 26 29 class CString &)
1630: 63 6f 6e 73 74 3b 09 2f 2f 34 38 0d 0a 09 63 6c const;.//48...cl
1640: 61 73 73 20 43 42 4c 4d 6f 64 75 6c 65 20 63 6f ass CBLModule co
1650: 6e 73 74 20 2a 20 20 47 65 74 43 75 72 72 65 6e nst * GetCurren
1660: 74 4d 6f 64 75 6c 65 28 76 6f 69 64 29 63 6f 6e tModule(void)con
1670: 73 74 3b 09 2f 2f 34 39 0d 0a 09 75 6e 73 69 67 st;.//49...unsig
1680: 6e 65 64 20 6c 6f 6e 67 20 20 47 65 74 45 78 65 ned long GetExe
1690: 63 75 74 65 64 43 6d 64 41 64 64 72 28 76 6f 69 cutedCmdAddr(voi
16a0: 64 29 63 6f 6e 73 74 3b 09 2f 2f 35 31 0d 0a 09 d)const;.//51...
16b0: 69 6e 74 20 20 47 65 74 45 78 65 63 75 74 65 64 int GetExecuted
16c0: 4c 69 6e 65 4e 75 6d 28 76 6f 69 64 29 63 6f 6e LineNum(void)con
16d0: 73 74 3b 09 2f 2f 35 32 0d 0a 09 69 6e 74 20 20 st;.//52...int
16e0: 47 65 74 46 69 72 73 74 53 72 63 4c 69 6e 65 49 GetFirstSrcLineI
16f0: 6e 66 6f 28 63 6c 61 73 73 20 43 42 4c 53 72 63 nfo(class CBLSrc
1700: 4c 69 6e 65 49 6e 66 6f 20 26 29 63 6f 6e 73 74 LineInfo &)const
1710: 3b 09 2f 2f 35 35 0d 0a 09 63 6c 61 73 73 20 43 ;.//55...class C
1720: 42 4c 4d 6f 64 75 6c 65 49 6e 74 65 72 6e 61 6c BLModuleInternal
1730: 73 20 2a 20 20 47 65 74 49 6e 74 65 72 6e 61 6c s * GetInternal
1740: 44 61 74 61 28 76 6f 69 64 29 63 6f 6e 73 74 3b Data(void)const;
1750: 09 2f 2f 35 36 0d 0a 09 75 6e 73 69 67 6e 65 64 .//56...unsigned
1760: 20 6c 6f 6e 67 20 20 47 65 74 4c 6f 61 64 65 64 long GetLoaded
1770: 49 44 28 76 6f 69 64 29 63 6f 6e 73 74 3b 09 2f ID(void)const;./
1780: 2f 35 38 0d 0a 09 69 6e 74 20 20 47 65 74 4e 43 /58...int GetNC
1790: 75 72 53 6f 75 72 63 65 4c 69 6e 65 73 28 76 6f urSourceLines(vo
17a0: 69 64 29 63 6f 6e 73 74 3b 09 2f 2f 36 33 0d 0a id)const;.//63..
17b0: 09 69 6e 74 20 20 47 65 74 4e 50 72 6f 63 73 28 .int GetNProcs(
17c0: 76 6f 69 64 29 63 6f 6e 73 74 3b 09 2f 2f 36 37 void)const;.//67
17d0: 0d 0a 09 69 6e 74 20 20 47 65 74 4e 53 6f 75 72 ...int GetNSour
17e0: 63 65 4c 69 6e 65 73 28 76 6f 69 64 29 63 6f 6e ceLines(void)con
17f0: 73 74 3b 09 2f 2f 36 39 0d 0a 09 69 6e 74 20 20 st;.//69...int
1800: 47 65 74 4e 53 74 61 74 69 63 56 61 72 73 28 76 GetNStaticVars(v
1810: 6f 69 64 29 63 6f 6e 73 74 3b 09 2f 2f 37 30 0d oid)const;.//70.
1820: 0a 09 69 6e 74 20 20 47 65 74 4e 65 78 74 53 72 ..int GetNextSr
1830: 63 4c 69 6e 65 49 6e 66 6f 28 63 6c 61 73 73 20 cLineInfo(class
1840: 43 42 4c 53 72 63 4c 69 6e 65 49 6e 66 6f 20 26 CBLSrcLineInfo &
1850: 29 63 6f 6e 73 74 3b 09 2f 2f 37 35 0d 0a 09 69 )const;.//75...i
1860: 6e 74 20 20 47 65 74 50 72 6f 63 49 6e 66 6f 28 nt GetProcInfo(
1870: 69 6e 74 2c 63 6c 61 73 73 20 43 42 4c 50 72 6f int,class CBLPro
1880: 63 49 6e 66 6f 20 26 29 63 6f 6e 73 74 3b 09 2f cInfo &)const;./
1890: 2f 37 36 0d 0a 09 69 6e 74 20 20 47 65 74 52 75 /76...int GetRu
18a0: 6e 74 69 6d 65 45 72 72 43 6f 64 65 28 76 6f 69 ntimeErrCode(voi
18b0: 64 29 63 6f 6e 73 74 3b 09 2f 2f 38 32 0d 0a 09 d)const;.//82...
18c0: 76 6f 69 64 20 20 47 65 74 52 75 6e 74 69 6d 65 void GetRuntime
18d0: 45 72 72 44 65 73 63 72 28 69 6e 74 2c 63 6c 61 ErrDescr(int,cla
18e0: 73 73 20 43 53 74 72 69 6e 67 20 26 29 63 6f 6e ss CString &)con
18f0: 73 74 3b 09 2f 2f 38 33 0d 0a 09 63 68 61 72 20 st;.//83...char
1900: 63 6f 6e 73 74 20 2a 20 20 47 65 74 52 75 6e 74 const * GetRunt
1910: 69 6d 65 45 72 72 49 64 65 6e 74 28 76 6f 69 64 imeErrIdent(void
1920: 29 63 6f 6e 73 74 3b 09 2f 2f 38 34 0d 0a 09 69 )const;.//84...i
1930: 6e 74 20 20 47 65 74 52 75 6e 74 69 6d 65 45 72 nt GetRuntimeEr
1940: 72 4c 69 6e 65 4e 75 6d 28 76 6f 69 64 29 63 6f rLineNum(void)co
1950: 6e 73 74 3b 09 2f 2f 38 35 0d 0a 09 63 6c 61 73 nst;.//85...clas
1960: 73 20 43 42 4c 4d 6f 64 75 6c 65 20 2a 20 20 47 s CBLModule * G
1970: 65 74 52 75 6e 74 69 6d 65 45 72 72 4d 6f 64 75 etRuntimeErrModu
1980: 6c 65 28 76 6f 69 64 29 63 6f 6e 73 74 3b 09 2f le(void)const;./
1990: 2f 38 36 0d 0a 09 76 6f 69 64 20 20 47 65 74 52 /86...void GetR
19a0: 75 6e 74 69 6d 65 45 72 72 53 6f 75 72 63 65 4c untimeErrSourceL
19b0: 69 6e 65 28 63 6c 61 73 73 20 43 53 74 72 69 6e ine(class CStrin
19c0: 67 20 26 29 63 6f 6e 73 74 3b 09 2f 2f 38 37 0d g &)const;.//87.
19d0: 0a 09 69 6e 74 20 20 47 65 74 53 6f 75 72 63 65 ..int GetSource
19e0: 4c 69 6e 65 28 69 6e 74 2c 63 6c 61 73 73 20 43 Line(int,class C
19f0: 53 74 72 69 6e 67 20 26 29 63 6f 6e 73 74 3b 09 String &)const;.
1a00: 2f 2f 38 38 0d 0a 09 63 6c 61 73 73 20 43 42 4c //88...class CBL
1a10: 53 70 65 6c 6c 65 72 20 2a 20 20 47 65 74 53 70 Speller * GetSp
1a20: 65 6c 6c 65 72 28 76 6f 69 64 29 63 6f 6e 73 74 eller(void)const
1a30: 3b 09 2f 2f 38 39 0d 0a 09 69 6e 74 20 20 47 65 ;.//89...int Ge
1a40: 74 53 74 61 74 69 63 56 61 72 44 65 73 63 72 28 tStaticVarDescr(
1a50: 69 6e 74 2c 63 6c 61 73 73 20 43 42 4c 56 61 72 int,class CBLVar
1a60: 49 6e 66 6f 20 26 29 63 6f 6e 73 74 3b 09 2f 2f Info &)const;.//
1a70: 39 30 0d 0a 09 69 6e 74 20 20 47 65 74 53 74 61 90...int GetSta
1a80: 74 69 63 56 61 72 56 61 6c 75 65 28 69 6e 74 2c ticVarValue(int,
1a90: 63 6c 61 73 73 20 43 56 61 6c 75 65 20 26 2c 69 class CValue &,i
1aa0: 6e 74 29 63 6f 6e 73 74 3b 09 2f 2f 39 31 0d 0a nt)const;.//91..
1ab0: 09 69 6e 74 20 20 47 65 74 53 79 6e 74 61 78 45 .int GetSyntaxE
1ac0: 72 72 43 6f 64 65 28 76 6f 69 64 29 63 6f 6e 73 rrCode(void)cons
1ad0: 74 3b 09 2f 2f 39 32 0d 0a 09 63 68 61 72 20 63 t;.//92...char c
1ae0: 6f 6e 73 74 20 2a 20 20 47 65 74 53 79 6e 74 61 onst * GetSynta
1af0: 78 45 72 72 49 64 65 6e 74 28 76 6f 69 64 29 63 xErrIdent(void)c
1b00: 6f 6e 73 74 3b 09 2f 2f 39 34 0d 0a 09 69 6e 74 onst;.//94...int
1b10: 20 20 47 65 74 53 79 6e 74 61 78 45 72 72 4c 69 GetSyntaxErrLi
1b20: 6e 65 4e 75 6d 28 76 6f 69 64 29 63 6f 6e 73 74 neNum(void)const
1b30: 3b 09 2f 2f 39 35 0d 0a 09 63 68 61 72 20 63 6f ;.//95...char co
1b40: 6e 73 74 20 2a 20 20 47 65 74 53 79 6e 74 61 78 nst * GetSyntax
1b50: 45 72 72 4d 61 72 6b 65 64 4c 69 6e 65 28 76 6f ErrMarkedLine(vo
1b60: 69 64 29 63 6f 6e 73 74 3b 09 2f 2f 39 36 0d 0a id)const;.//96..
1b70: 09 69 6e 74 20 20 48 61 73 53 6f 75 72 63 65 28 .int HasSource(
1b80: 76 6f 69 64 29 63 6f 6e 73 74 3b 09 2f 2f 31 30 void)const;.//10
1b90: 34 0d 0a 09 69 6e 74 20 20 49 73 43 6f 6d 70 69 4...int IsCompi
1ba0: 6c 65 64 28 76 6f 69 64 29 63 6f 6e 73 74 3b 09 led(void)const;.
1bb0: 2f 2f 31 30 35 0d 0a 09 69 6e 74 20 20 49 73 45 //105...int IsE
1bc0: 78 65 63 75 74 65 64 28 76 6f 69 64 29 63 6f 6e xecuted(void)con
1bd0: 73 74 3b 09 2f 2f 31 30 37 0d 0a 09 69 6e 74 20 st;.//107...int
1be0: 20 49 73 49 6e 42 61 74 63 68 4d 6f 64 65 28 76 IsInBatchMode(v
1bf0: 6f 69 64 29 63 6f 6e 73 74 3b 09 2f 2f 31 31 30 oid)const;.//110
1c00: 0d 0a 09 69 6e 74 20 20 49 73 4c 6f 61 64 65 64 ...int IsLoaded
1c10: 28 76 6f 69 64 29 63 6f 6e 73 74 3b 09 2f 2f 31 (void)const;.//1
1c20: 31 32 0d 0a 09 69 6e 74 20 20 49 73 56 61 6c 69 12...int IsVali
1c30: 64 4f 62 6a 65 63 74 28 76 6f 69 64 29 63 6f 6e dObject(void)con
1c40: 73 74 3b 09 2f 2f 31 31 35 0d 0a 09 69 6e 74 20 st;.//115...int
1c50: 20 4c 6f 61 64 28 76 6f 69 64 29 3b 09 2f 2f 31 Load(void);.//1
1c60: 31 36 0d 0a 09 69 6e 74 20 20 4c 6f 61 64 53 6f 16...int LoadSo
1c70: 75 72 63 65 28 63 68 61 72 20 63 6f 6e 73 74 20 urce(char const
1c80: 2a 29 3b 09 2f 2f 31 31 37 0d 0a 09 69 6e 74 20 *);.//117...int
1c90: 20 50 72 65 70 61 72 65 54 6f 4c 6f 61 64 28 76 PrepareToLoad(v
1ca0: 6f 69 64 29 3b 09 2f 2f 31 32 39 0d 0a 09 76 6f oid);.//129...vo
1cb0: 69 64 20 20 52 65 73 65 74 28 76 6f 69 64 29 3b id Reset(void);
1cc0: 09 2f 2f 31 33 33 0d 0a 09 76 6f 69 64 20 20 52 .//133...void R
1cd0: 65 73 65 74 43 6f 6d 70 69 6c 65 64 28 76 6f 69 esetCompiled(voi
1ce0: 64 29 3b 09 2f 2f 31 33 34 0d 0a 09 76 6f 69 64 d);.//134...void
1cf0: 20 20 52 65 73 65 74 45 78 65 63 75 74 65 64 28 ResetExecuted(
1d00: 76 6f 69 64 29 3b 09 2f 2f 31 33 35 0d 0a 09 69 void);.//135...i
1d10: 6e 74 20 20 53 65 74 53 74 61 74 69 63 56 61 72 nt SetStaticVar
1d20: 56 61 6c 75 65 28 69 6e 74 2c 63 6c 61 73 73 20 Value(int,class
1d30: 43 56 61 6c 75 65 20 63 6f 6e 73 74 20 26 2c 69 CValue const &,i
1d40: 6e 74 29 3b 09 2f 2f 31 33 38 0d 0a 09 76 6f 69 nt);.//138...voi
1d50: 64 20 20 55 6e 6c 6f 61 64 28 76 6f 69 64 29 3b d Unload(void);
1d60: 09 2f 2f 31 34 31 0d 0a 7d 3b 0d 0a 0d 0a 63 6c .//141..};....cl
1d70: 61 73 73 20 49 4d 50 4f 52 54 5f 31 43 20 43 42 ass IMPORT_1C CB
1d80: 4c 50 72 6f 63 49 6e 66 6f 0d 0a 7b 0d 0a 70 75 LProcInfo..{..pu
1d90: 62 6c 69 63 3a 0d 0a 09 2f 2f 63 68 61 72 20 73 blic:...//char s
1da0: 69 7a 65 5f 62 75 66 66 65 72 5b 31 30 30 30 5d ize_buffer[1000]
1db0: 3b 0d 0a 09 43 42 4c 4d 6f 64 75 6c 65 2a 20 6d ;...CBLModule* m
1dc0: 5f 4d 6f 64 75 6c 65 3b 0d 0a 09 55 4c 4f 4e 47 _Module;...ULONG
1dd0: 20 6d 5f 50 72 6f 63 49 44 3b 0d 0a 09 44 57 4f m_ProcID;...DWO
1de0: 52 44 20 6d 5f 55 6e 6b 6e 6f 77 6e 3b 0d 0a 09 RD m_Unknown;...
1df0: 20 43 42 4c 50 72 6f 63 49 6e 66 6f 28 76 6f 69 CBLProcInfo(voi
1e00: 64 29 3b 09 2f 2f 33 0d 0a 09 63 6c 61 73 73 20 d);.//3...class
1e10: 43 42 4c 50 72 6f 63 49 6e 66 6f 20 26 20 20 6f CBLProcInfo & o
1e20: 70 65 72 61 74 6f 72 3d 28 63 6c 61 73 73 20 43 perator=(class C
1e30: 42 4c 50 72 6f 63 49 6e 66 6f 20 63 6f 6e 73 74 BLProcInfo const
1e40: 20 26 29 3b 09 2f 2f 31 32 0d 0a 09 63 6c 61 73 &);.//12...clas
1e50: 73 20 43 42 4c 4d 6f 64 75 6c 65 20 2a 20 20 47 s CBLModule * G
1e60: 65 74 4d 6f 64 75 6c 65 28 76 6f 69 64 29 63 6f etModule(void)co
1e70: 6e 73 74 3b 09 2f 2f 36 31 0d 0a 09 69 6e 74 20 nst;.//61...int
1e80: 20 47 65 74 4e 50 61 72 61 6d 73 28 76 6f 69 64 GetNParams(void
1e90: 29 63 6f 6e 73 74 3b 09 2f 2f 36 35 0d 0a 09 69 )const;.//65...i
1ea0: 6e 74 20 20 47 65 74 4e 56 61 72 73 28 76 6f 69 nt GetNVars(voi
1eb0: 64 29 63 6f 6e 73 74 3b 09 2f 2f 37 31 0d 0a 09 d)const;.//71...
1ec0: 63 68 61 72 20 63 6f 6e 73 74 20 2a 20 20 47 65 char const * Ge
1ed0: 74 4e 61 6d 65 28 76 6f 69 64 29 63 6f 6e 73 74 tName(void)const
1ee0: 3b 09 2f 2f 37 32 0d 0a 09 69 6e 74 20 20 47 65 ;.//72...int Ge
1ef0: 74 50 72 6f 63 50 6f 73 28 76 6f 69 64 29 63 6f tProcPos(void)co
1f00: 6e 73 74 3b 09 2f 2f 37 37 0d 0a 09 69 6e 74 20 nst;.//77...int
1f10: 20 47 65 74 54 79 70 65 28 76 6f 69 64 29 63 6f GetType(void)co
1f20: 6e 73 74 3b 09 2f 2f 39 38 0d 0a 09 69 6e 74 20 nst;.//98...int
1f30: 20 47 65 74 56 61 72 44 65 73 63 72 28 69 6e 74 GetVarDescr(int
1f40: 2c 63 6c 61 73 73 20 43 42 4c 56 61 72 49 6e 66 ,class CBLVarInf
1f50: 6f 20 26 29 63 6f 6e 73 74 3b 09 2f 2f 31 30 30 o &)const;.//100
1f60: 0d 0a 09 69 6e 74 20 20 48 61 73 52 65 74 56 61 ...int HasRetVa
1f70: 6c 28 76 6f 69 64 29 63 6f 6e 73 74 3b 09 2f 2f l(void)const;.//
1f80: 31 30 32 0d 0a 09 69 6e 74 20 20 49 73 45 78 70 102...int IsExp
1f90: 6f 72 74 65 64 28 76 6f 69 64 29 63 6f 6e 73 74 orted(void)const
1fa0: 3b 09 2f 2f 31 30 38 0d 0a 7d 3b 0d 0a 0d 0a 0d ;.//108..};.....
1fb0: 0a 63 6c 61 73 73 20 49 4d 50 4f 52 54 5f 31 43 .class IMPORT_1C
1fc0: 20 43 42 4c 56 61 72 49 6e 66 6f 0d 0a 7b 0d 0a CBLVarInfo..{..
1fd0: 70 75 62 6c 69 63 3a 0d 0a 09 43 42 4c 4d 6f 64 public:...CBLMod
1fe0: 75 6c 65 2a 20 70 4d 6f 64 3b 0d 0a 09 69 6e 74 ule* pMod;...int
1ff0: 20 6e 50 72 6f 63 50 6f 73 3b 0d 0a 09 69 6e 74 nProcPos;...int
2000: 20 6e 56 61 72 50 6f 73 3b 0d 0a 09 44 57 4f 52 nVarPos;...DWOR
2010: 44 20 73 69 7a 65 5f 62 75 66 66 65 72 5b 30 78 D size_buffer[0x
2020: 46 46 5d 3b 0d 0a 09 20 43 42 4c 56 61 72 49 6e FF];... CBLVarIn
2030: 66 6f 28 76 6f 69 64 29 3b 09 2f 2f 34 0d 0a 09 fo(void);.//4...
2040: 63 6c 61 73 73 20 43 42 4c 56 61 72 49 6e 66 6f class CBLVarInfo
2050: 20 26 20 20 6f 70 65 72 61 74 6f 72 3d 28 63 6c & operator=(cl
2060: 61 73 73 20 43 42 4c 56 61 72 49 6e 66 6f 20 63 ass CBLVarInfo c
2070: 6f 6e 73 74 20 26 29 3b 09 2f 2f 31 33 0d 0a 09 onst &);.//13...
2080: 69 6e 74 20 20 47 65 74 44 69 6d 28 76 6f 69 64 int GetDim(void
2090: 29 63 6f 6e 73 74 3b 09 2f 2f 35 30 0d 0a 09 63 )const;.//50...c
20a0: 6c 61 73 73 20 43 42 4c 4d 6f 64 75 6c 65 20 2a lass CBLModule *
20b0: 20 20 47 65 74 4d 6f 64 75 6c 65 28 76 6f 69 64 GetModule(void
20c0: 29 63 6f 6e 73 74 3b 09 2f 2f 36 32 0d 0a 09 63 )const;.//62...c
20d0: 68 61 72 20 63 6f 6e 73 74 20 2a 20 20 47 65 74 har const * Get
20e0: 4e 61 6d 65 28 76 6f 69 64 29 63 6f 6e 73 74 3b Name(void)const;
20f0: 09 2f 2f 37 33 0d 0a 09 69 6e 74 20 20 47 65 74 .//73...int Get
2100: 50 72 6f 63 50 6f 73 28 76 6f 69 64 29 63 6f 6e ProcPos(void)con
2110: 73 74 3b 09 2f 2f 37 38 0d 0a 09 69 6e 74 20 20 st;.//78...int
2120: 47 65 74 56 61 72 50 6f 73 28 76 6f 69 64 29 63 GetVarPos(void)c
2130: 6f 6e 73 74 3b 09 2f 2f 31 30 31 0d 0a 09 69 6e onst;.//101...in
2140: 74 20 20 49 73 45 78 70 6f 72 74 65 64 28 76 6f t IsExported(vo
2150: 69 64 29 63 6f 6e 73 74 3b 09 2f 2f 31 30 39 0d id)const;.//109.
2160: 0a 7d 3b 0d 0a 0d 0a 0d 0a 2f 2f 3c 2d 43 53 74 .};......//<-CSt
2170: 64 4f 6c 65 42 4c 43 6f 6e 74 65 78 74 28 33 30 dOleBLContext(30
2180: 68 2f 38 68 29 3c 2d 43 4f 6c 65 47 65 6e 65 72 h/8h)<-COleGener
2190: 69 63 42 4c 43 6f 6e 74 65 78 74 28 32 38 68 2f icBLContext(28h/
21a0: 38 68 29 3c 2d 43 42 4c 43 6f 6e 74 65 78 74 28 8h)<-CBLContext(
21b0: 32 30 68 2f 31 43 68 29 3c 2d 43 4f 62 6a 65 63 20h/1Ch)<-CObjec
21c0: 74 28 34 68 2f 34 68 29 0d 0a 63 6c 61 73 73 20 t(4h/4h)..class
21d0: 49 4d 50 4f 52 54 5f 31 43 20 43 53 74 64 4f 6c IMPORT_1C CStdOl
21e0: 65 42 4c 43 6f 6e 74 65 78 74 3a 70 75 62 6c 69 eBLContext:publi
21f0: 63 20 43 4f 6c 65 47 65 6e 65 72 69 63 42 4c 43 c COleGenericBLC
2200: 6f 6e 74 65 78 74 0d 0a 7b 0d 0a 44 45 43 4c 41 ontext..{..DECLA
2210: 52 45 5f 44 59 4e 43 52 45 41 54 45 28 43 53 74 RE_DYNCREATE(CSt
2220: 64 4f 6c 65 42 4c 43 6f 6e 74 65 78 74 29 0d 0a dOleBLContext)..
2230: 0d 0a 70 75 62 6c 69 63 3a 0d 0a 09 43 53 74 72 ..public:...CStr
2240: 69 6e 67 20 6d 5f 43 6c 61 73 73 4e 61 6d 65 3b ing m_ClassName;
2250: 0d 0a 09 44 57 4f 52 44 20 6d 5f 64 61 74 61 32 ...DWORD m_data2
2260: 3b 0d 0a 0d 0a 09 20 43 53 74 64 4f 6c 65 42 4c ;..... CStdOleBL
2270: 43 6f 6e 74 65 78 74 28 69 6e 74 29 3b 09 2f 2f Context(int);.//
2280: 35 0d 0a 09 76 69 72 74 75 61 6c 20 20 7e 43 53 5...virtual ~CS
2290: 74 64 4f 6c 65 42 4c 43 6f 6e 74 65 78 74 28 76 tdOleBLContext(v
22a0: 6f 69 64 29 3b 09 2f 2f 39 0d 0a 2f 2f 09 76 6f oid);.//9..//.vo
22b0: 69 64 20 20 60 64 65 66 61 75 6c 74 20 63 6f 6e id `default con
22c0: 73 74 72 75 63 74 6f 72 20 63 6c 6f 73 75 72 65 structor closure
22d0: 27 28 76 6f 69 64 29 3b 09 2f 2f 31 39 0d 0a 09 '(void);.//19...
22e0: 76 69 72 74 75 61 6c 20 69 6e 74 20 20 43 61 6c virtual int Cal
22f0: 6c 41 73 46 75 6e 63 28 69 6e 74 2c 63 6c 61 73 lAsFunc(int,clas
2300: 73 20 43 56 61 6c 75 65 20 26 2c 63 6c 61 73 73 s CValue &,class
2310: 20 43 56 61 6c 75 65 20 2a 20 2a 29 3b 09 2f 2f CValue * *);.//
2320: 33 30 0d 0a 09 76 69 72 74 75 61 6c 20 69 6e 74 30...virtual int
2330: 20 20 43 61 6c 6c 41 73 50 72 6f 63 28 69 6e 74 CallAsProc(int
2340: 2c 63 6c 61 73 73 20 43 56 61 6c 75 65 20 2a 20 ,class CValue *
2350: 2a 29 3b 09 2f 2f 33 32 0d 0a 09 76 69 72 74 75 *);.//32...virtu
2360: 61 6c 20 69 6e 74 20 20 46 69 6e 64 4d 65 74 68 al int FindMeth
2370: 6f 64 28 63 68 61 72 20 63 6f 6e 73 74 20 2a 29 od(char const *)
2380: 63 6f 6e 73 74 3b 09 2f 2f 34 31 0d 0a 09 76 69 const;.//41...vi
2390: 72 74 75 61 6c 20 69 6e 74 20 20 46 69 6e 64 50 rtual int FindP
23a0: 72 6f 70 28 63 68 61 72 20 63 6f 6e 73 74 20 2a rop(char const *
23b0: 29 63 6f 6e 73 74 3b 09 2f 2f 34 33 0d 0a 09 76 )const;.//43...v
23c0: 69 72 74 75 61 6c 20 63 68 61 72 20 63 6f 6e 73 irtual char cons
23d0: 74 20 2a 20 20 47 65 74 4d 65 74 68 6f 64 4e 61 t * GetMethodNa
23e0: 6d 65 28 69 6e 74 2c 69 6e 74 29 63 6f 6e 73 74 me(int,int)const
23f0: 3b 09 2f 2f 36 30 0d 0a 09 76 69 72 74 75 61 6c ;.//60...virtual
2400: 20 69 6e 74 20 20 47 65 74 4e 4d 65 74 68 6f 64 int GetNMethod
2410: 73 28 76 6f 69 64 29 63 6f 6e 73 74 3b 09 2f 2f s(void)const;.//
2420: 36 34 0d 0a 09 76 69 72 74 75 61 6c 20 69 6e 74 64...virtual int
2430: 20 20 47 65 74 4e 50 61 72 61 6d 73 28 69 6e 74 GetNParams(int
2440: 29 63 6f 6e 73 74 3b 09 2f 2f 36 36 0d 0a 09 76 )const;.//66...v
2450: 69 72 74 75 61 6c 20 69 6e 74 20 20 47 65 74 4e irtual int GetN
2460: 50 72 6f 70 73 28 76 6f 69 64 29 63 6f 6e 73 74 Props(void)const
2470: 3b 09 2f 2f 36 38 0d 0a 09 76 69 72 74 75 61 6c ;.//68...virtual
2480: 20 63 68 61 72 20 63 6f 6e 73 74 20 2a 20 20 47 char const * G
2490: 65 74 50 72 6f 70 4e 61 6d 65 28 69 6e 74 2c 69 etPropName(int,i
24a0: 6e 74 29 63 6f 6e 73 74 3b 09 2f 2f 37 39 0d 0a nt)const;.//79..
24b0: 09 76 69 72 74 75 61 6c 20 69 6e 74 20 20 47 65 .virtual int Ge
24c0: 74 50 72 6f 70 56 61 6c 28 69 6e 74 2c 63 6c 61 tPropVal(int,cla
24d0: 73 73 20 43 56 61 6c 75 65 20 26 29 63 6f 6e 73 ss CValue &)cons
24e0: 74 3b 09 2f 2f 38 30 0d 0a 09 76 69 72 74 75 61 t;.//80...virtua
24f0: 6c 20 63 68 61 72 20 63 6f 6e 73 74 20 2a 20 20 l char const *
2500: 47 65 74 54 79 70 65 53 74 72 69 6e 67 28 76 6f GetTypeString(vo
2510: 69 64 29 63 6f 6e 73 74 3b 09 2f 2f 39 39 0d 0a id)const;.//99..
2520: 09 76 69 72 74 75 61 6c 20 69 6e 74 20 20 48 61 .virtual int Ha
2530: 73 52 65 74 56 61 6c 28 69 6e 74 29 63 6f 6e 73 sRetVal(int)cons
2540: 74 3b 09 2f 2f 31 30 33 0d 0a 09 76 69 72 74 75 t;.//103...virtu
2550: 61 6c 20 69 6e 74 20 20 49 73 50 72 6f 70 52 65 al int IsPropRe
2560: 61 64 61 62 6c 65 28 69 6e 74 29 63 6f 6e 73 74 adable(int)const
2570: 3b 09 2f 2f 31 31 33 0d 0a 09 76 69 72 74 75 61 ;.//113...virtua
2580: 6c 20 69 6e 74 20 20 49 73 50 72 6f 70 57 72 69 l int IsPropWri
2590: 74 61 62 6c 65 28 69 6e 74 29 63 6f 6e 73 74 3b table(int)const;
25a0: 09 2f 2f 31 31 34 0d 0a 09 76 69 72 74 75 61 6c .//114...virtual
25b0: 20 69 6e 74 20 20 53 65 74 50 72 6f 70 56 61 6c int SetPropVal
25c0: 28 69 6e 74 2c 63 6c 61 73 73 20 43 56 61 6c 75 (int,class CValu
25d0: 65 20 63 6f 6e 73 74 20 26 29 3b 09 2f 2f 31 33 e const &);.//13
25e0: 37 0d 0a 09 69 6e 74 20 20 54 72 79 46 69 6e 64 7...int TryFind
25f0: 46 72 69 65 6e 64 49 6e 74 65 72 66 61 63 65 28 FriendInterface(
2600: 76 6f 69 64 29 3b 09 2f 2f 31 34 30 0d 0a 7d 3b void);.//140..};
2610: 0d 0a 0d 0a 0d 0a 63 6c 61 73 73 20 49 4d 50 4f ......class IMPO
2620: 52 54 5f 31 43 20 43 54 6f 6b 65 6e 73 42 6f 78 RT_1C CTokensBox
2630: 3a 20 70 75 62 6c 69 63 20 43 54 65 72 6d 73 42 : public CTermsB
2640: 6f 78 0d 0a 7b 0d 0a 70 75 62 6c 69 63 3a 0d 0a ox..{..public:..
2650: 09 63 68 61 72 20 62 75 66 66 5b 35 31 32 5d 3b .char buff[512];
2660: 0d 0a 09 20 43 54 6f 6b 65 6e 73 42 6f 78 28 63 ... CTokensBox(c
2670: 6c 61 73 73 20 43 54 6f 6b 65 6e 73 42 6f 78 20 lass CTokensBox
2680: 63 6f 6e 73 74 20 26 29 3b 09 2f 2f 36 0d 0a 09 const &);.//6...
2690: 20 43 54 6f 6b 65 6e 73 42 6f 78 28 76 6f 69 64 CTokensBox(void
26a0: 29 3b 09 2f 2f 37 0d 0a 09 20 7e 43 54 6f 6b 65 );.//7... ~CToke
26b0: 6e 73 42 6f 78 28 76 6f 69 64 29 3b 09 2f 2f 31 nsBox(void);.//1
26c0: 30 0d 0a 09 63 6c 61 73 73 20 43 54 6f 6b 65 6e 0...class CToken
26d0: 73 42 6f 78 20 26 20 20 6f 70 65 72 61 74 6f 72 sBox & operator
26e0: 3d 28 63 6c 61 73 73 20 43 54 6f 6b 65 6e 73 42 =(class CTokensB
26f0: 6f 78 20 63 6f 6e 73 74 20 26 29 3b 09 2f 2f 31 ox const &);.//1
2700: 34 0d 0a 7d 3b 0d 0a 0d 0a 2f 2f 20 45 6e 64 20 4..};....// End
2710: 63 6c 61 73 73 20 64 65 73 63 72 69 70 74 69 6f class descriptio
2720: 6e 73 0d 0a 2f 2f 20 42 65 67 69 6e 20 66 72 65 ns..// Begin fre
2730: 65 20 66 75 6e 63 74 69 6f 6e 73 20 64 65 66 69 e functions defi
2740: 6e 69 74 69 6f 6e 73 0d 0a 2f 2f 20 45 6e 64 20 nitions..// End
2750: 66 72 65 65 20 66 75 6e 63 74 69 6f 6e 73 20 64 free functions d
2760: 65 66 69 6e 69 74 69 6f 6e 73 0d 0a 0d 0a 0d 0a efinitions......
2770: 49 4d 50 4f 52 54 5f 31 43 20 76 6f 69 64 20 5f IMPORT_1C void _
2780: 5f 63 64 65 63 6c 20 44 69 73 70 45 72 72 6f 72 _cdecl DispError
2790: 32 53 74 72 69 6e 67 28 63 6c 61 73 73 20 43 53 2String(class CS
27a0: 74 72 69 6e 67 20 26 2c 6c 6f 6e 67 29 3b 0d 0a tring &,long);..