#include "M3Runtime.h" #define t20 ADDRESS #define t32 void #define TC20 TC_REFANY IMPORT TYPE TC_REFANY; IMPORT char VS_REFANY__4b8748e831fc107a; #define t34 ADDRESS typedef int t7; #define TC34 TC_ADDRESS IMPORT TYPE TC_ADDRESS; IMPORT char VS_ADDRESS__30f7308738738b44; #define t35 ADDRESS #define TC35 TC_NULL IMPORT TYPE TC_NULL; IMPORT char VS_NULL__fb50c7d53bec30dc; #define t21 ADDRESS typedef struct { TYPE self; int private; } t21_methods; #define t21_msize (sizeof (t21_methods)) typedef struct { ADDRESS methods; } t21_fields; #define t21_size (sizeof (t21_fields)) #define TC21 TC_ROOT IMPORT TYPE TC_ROOT; IMPORT char VS_ROOT__349f58f628be0ac6; #define t21_MapProc TC_ROOT->mapProc #define t4 ADDRESS #define TC4 TC_Rd__T IMPORT TYPE TC_Rd__T; #line 83 ".ROOT/.boots/corelib/Interfaces/Rd.i3" IMPORT char VS_Rd__T__2555b70b3f7780b1; #define t4_MapProc TC_Rd__T->mapProc #define t1 ADDRESS PRIVATE typecell t1_TC = {0, 0, 0, 0, 0, (PROC)NIL, #line 13 "TextRd.i3" 0, 0, NIL, 0, 0, (PROC)NIL, (PROC)NIL, (PROC)NIL, NIL, 0, 0}; PRIVATE TYPE TC1 = &t1_TC; #define t1_MapProc t1_TC.mapProc #define t2 ADDRESS #define TC2 TC_TEXT IMPORT TYPE TC_TEXT; IMPORT char VS_TEXT__b7a92447326386f5; #define t2_MapProc TC_TEXT->mapProc typedef t1 (*t3)(); #line 67 ".ROOT/.boots/corelib/Interfaces/Text.i3" typedef signed_char t5; typedef t5 (*t6)(); typedef unsigned char t8; #line 63 typedef t7 (*t9)(); typedef unsigned char t10; #line 55 typedef t10 (*t11)(); #line 173 ".ROOT/.boots/corelib/Interfaces/Rd.i3" typedef struct { char* elts; int size[1]; } t18; #line 52 ".ROOT/.boots/corelib/Interfaces/Text.i3" #define t12 t18 typedef t2 (*t13)(); #line 49 typedef t32 (*t14)(); typedef int t15; #line 26 typedef t15 (*t16)(); #line 23 typedef t8 (*t17)(); #line 84 ".ROOT/.boots/corelib/Interfaces/Rd.i3" typedef unsigned char t19; #line 15 ".ROOT/.boots/corelib/Interfaces/Thread.i3" #define t22 ADDRESS #define TC22 TC_Thread__T IMPORT TYPE TC_Thread__T; #line 15 IMPORT char VS_Thread__T__2555b70b3f7780b1; #define t22_MapProc TC_Thread__T->mapProc typedef t20 (*t23)(); #define t24 ADDRESS #define TC24 TC_Thread__Condition IMPORT TYPE TC_Thread__Condition; #line 21 IMPORT char VS_Thread__Condition__26d5968239e08f4e; #define t24_MapProc TC_Thread__Condition->mapProc #define t25 ADDRESS #define TC25 TC_MUTEX IMPORT TYPE TC_MUTEX; IMPORT char VS_MUTEX__1f9d4e89391ab815; #define t25_MapProc TC_MUTEX->mapProc typedef t22 (*t26)(); #line 23 #define t27 ADDRESS #line 23 typedef struct { t23 _apply; } t27_methods; #define t27_msize (sizeof (t27_methods)) typedef struct { #line 23 int filler; } t27_fields; #define t27_size (sizeof (t27_fields)) #define TC27 TC_Thread__Closure IMPORT TYPE TC_Thread__Closure; #line 23 IMPORT char VS_Thread__Closure__7fb5c6232c5a658a; #define t27_MapProc TC_Thread__Closure->mapProc typedef t24 (*t28)(); typedef t25 (*t29)(); #line 28 #define t30 ADDRESS #line 28 typedef struct { int filler; } t30_methods; #define t30_msize (sizeof (t30_methods)) typedef struct { #line 28 t15 _stackSize; } t30_fields; #define t30_size (sizeof (t30_fields)) #define TC30 TC_Thread__SizedClosure IMPORT TYPE TC_Thread__SizedClosure; #line 28 IMPORT char VS_Thread__SizedClosure__8a46717d2eae7b07; #define t30_MapProc TC_Thread__SizedClosure->mapProc typedef CLOSURE t31; #define t33 ADDRESS typedef struct { TYPE self; int private; } t33_methods; #define t33_msize (sizeof (t33_methods)) typedef struct { ADDRESS methods; } t33_fields; #define t33_size (sizeof (t33_fields)) #define TC33 TC_UNTRACED_ROOT IMPORT TYPE TC_UNTRACED_ROOT; IMPORT char VS_UNTRACED_ROOT__3e0964513fd6da20; typedef double t36; typedef float t37; #line 8 "TextRd.i3" IMPORT INITLINK* Text__init; IMPORT INITLINK* Rd__init; EXPORT INITLINK* TextRd__init = (INITLINK*) 0; IMPORT TYPE TC_Text__T; #line 8 IMPORT char VS_Text__T__fc4b369f3ab271fd; IMPORT EXCEPTION_NAME _Thread__Alerted; IMPORT char VS_Thread__Alerted__fc88feb43485af46; #line 8 IMPORT EXCEPTION_NAME _Rd__EndOfFile; IMPORT char VS_Rd__EndOfFile__f4a9d2f63b7e105d; IMPORT EXCEPTION_NAME _Rd__Failure; #line 8 IMPORT char VS_Rd__Failure__e4a829e331222b6d; IMPORT EXCEPTION_NAME _Rd__Error; IMPORT char VS_Rd__Error__5ca07bfe2ba90cfc; #line 8 EXPORT TYPE TC_TextRd__T = &t1_TC; EXPORT char VS_TextRd__T__aa7fbe4a3afd8be5 = '\0'; IMPORT t1 _TextRd__New (); IMPORT char VS_TextRd__New__4194d0fe285dac05; #line 8 PRIVATE int init_done = -1; #line 8 "TextRd.i3" PRIVATE void TextRd__initProc (g) int g; { #line 8 "TextRd.i3" if (init_done >= g) return; init_done = g; INITIALIZE (& Text__init); INITIALIZE (& Rd__init); }; PRIVATE INITLINK me = {(INITLINK*)NIL, 1, TextRd__initProc }; static char* VSimports[] = { &VS_Text__T__fc4b369f3ab271fd, &VS_Thread__Alerted__fc88feb43485af46, &VS_Rd__T__2555b70b3f7780b1, &VS_Rd__EndOfFile__f4a9d2f63b7e105d, &VS_Rd__Failure__e4a829e331222b6d, &VS_Rd__Error__5ca07bfe2ba90cfc, &VS_TextRd__New__4194d0fe285dac05, NIL }; void TextRd__ILink (phase) int phase; { switch (phase) { case 0: { me.link = TextRd__init; TextRd__init = & me; REGISTEROPAQUE (TC1); break; }; case 1: { break; }; case 2: { break; }; }; };