#include "M3Runtime.h" #define t17 ADDRESS typedef int t1; #define TC17 TC_ADDRESS IMPORT TYPE TC_ADDRESS; IMPORT char VS_ADDRESS__30f7308738738b44; #define t26 ADDRESS #define t38 void #define TC26 TC_REFANY IMPORT TYPE TC_REFANY; IMPORT char VS_REFANY__4b8748e831fc107a; #define t40 ADDRESS #define TC40 TC_NULL IMPORT TYPE TC_NULL; IMPORT char VS_NULL__fb50c7d53bec30dc; #line 27 "Error.i3" typedef t38 (*t2)(); #define t3 ADDRESS #define TC3 TC_TEXT IMPORT TYPE TC_TEXT; IMPORT char VS_TEXT__b7a92447326386f5; #define t3_MapProc TC_TEXT->mapProc #define t4 ADDRESS #define TC4 TC_String__T IMPORT TYPE TC_String__T; #line 13 "./String.i3" IMPORT char VS_String__T__3a6c7dc12615e4ee; typedef struct { t4 _module; t4 _item; } t5; #line 116 ".ROOT/.boots/corelib/Interfaces/Wr.i3" typedef struct { char* elts; int size[1]; } t24; #line 19 "./String.i3" #define t6 t24 typedef t1 (*t7)(); typedef int t8; #line 19 typedef signed_char t15; typedef struct { t4 elts[100]; } t16; #line 17 typedef struct { t1 _top; t16 _stk; } t9; #define t27 ADDRESS typedef struct { TYPE self; int private; } t27_methods; #define t27_msize (sizeof (t27_methods)) typedef struct { ADDRESS methods; } t27_fields; #define t27_size (sizeof (t27_fields)) #define TC27 TC_ROOT IMPORT TYPE TC_ROOT; IMPORT char VS_ROOT__349f58f628be0ac6; #define t27_MapProc TC_ROOT->mapProc #define t10 ADDRESS #define TC10 TC_Wr__T IMPORT TYPE TC_Wr__T; #line 90 ".ROOT/.boots/corelib/Interfaces/Wr.i3" IMPORT char VS_Wr__T__2555b70b3f7780b1; #define t10_MapProc TC_Wr__T->mapProc typedef t3 (*t11)(); #line 34 "./String.i3" typedef t4 (*t12)(); typedef unsigned char t13; #line 28 #define t14 t24 typedef signed_char t18; #line 67 ".ROOT/.boots/corelib/Interfaces/Text.i3" typedef t18 (*t19)(); typedef unsigned char t20; #line 55 typedef t20 (*t21)(); #line 26 typedef t8 (*t22)(); #line 23 typedef t13 (*t23)(); #line 91 ".ROOT/.boots/corelib/Interfaces/Wr.i3" typedef unsigned char t25; #line 15 ".ROOT/.boots/corelib/Interfaces/Thread.i3" #define t28 ADDRESS #define TC28 TC_Thread__T IMPORT TYPE TC_Thread__T; #line 15 IMPORT char VS_Thread__T__2555b70b3f7780b1; #define t28_MapProc TC_Thread__T->mapProc typedef t26 (*t29)(); #define t30 ADDRESS #define TC30 TC_Thread__Condition IMPORT TYPE TC_Thread__Condition; #line 21 IMPORT char VS_Thread__Condition__26d5968239e08f4e; #define t30_MapProc TC_Thread__Condition->mapProc #define t31 ADDRESS #define TC31 TC_MUTEX IMPORT TYPE TC_MUTEX; IMPORT char VS_MUTEX__1f9d4e89391ab815; #define t31_MapProc TC_MUTEX->mapProc typedef t28 (*t32)(); #line 23 #define t33 ADDRESS #line 23 typedef struct { t29 _apply; } t33_methods; #define t33_msize (sizeof (t33_methods)) typedef struct { #line 23 int filler; } t33_fields; #define t33_size (sizeof (t33_fields)) #define TC33 TC_Thread__Closure IMPORT TYPE TC_Thread__Closure; #line 23 IMPORT char VS_Thread__Closure__7fb5c6232c5a658a; #define t33_MapProc TC_Thread__Closure->mapProc typedef t30 (*t34)(); typedef t31 (*t35)(); #line 28 #define t36 ADDRESS #line 28 typedef struct { int filler; } t36_methods; #define t36_msize (sizeof (t36_methods)) typedef struct { #line 28 t8 _stackSize; } t36_fields; #define t36_size (sizeof (t36_fields)) #define TC36 TC_Thread__SizedClosure IMPORT TYPE TC_Thread__SizedClosure; #line 28 IMPORT char VS_Thread__SizedClosure__8a46717d2eae7b07; #define t36_MapProc TC_Thread__SizedClosure->mapProc typedef CLOSURE t37; #define t39 ADDRESS typedef struct { TYPE self; int private; } t39_methods; #define t39_msize (sizeof (t39_methods)) typedef struct { ADDRESS methods; } t39_fields; #define t39_size (sizeof (t39_fields)) #define TC39 TC_UNTRACED_ROOT IMPORT TYPE TC_UNTRACED_ROOT; IMPORT char VS_UNTRACED_ROOT__3e0964513fd6da20; typedef double t41; typedef float t42; #line 9 "Error.i3" IMPORT INITLINK* Text__init; IMPORT INITLINK* String__init; EXPORT INITLINK* Error__init = (INITLINK*) 0; IMPORT TYPE TC_Text__T; #line 9 IMPORT char VS_Text__T__fc4b369f3ab271fd; IMPORT t38 _Error__Msg (); IMPORT char VS_Error__Msg__4d119a332467757f; IMPORT t38 _Error__Int (); #line 9 IMPORT char VS_Error__Int__05fff4c5263ea533; IMPORT t38 _Error__Str (); IMPORT char VS_Error__Str__2bd0723e3872e90c; IMPORT t38 _Error__QID (); #line 9 IMPORT char VS_Error__QID__84a7ccd932b81b86; IMPORT t38 _Error__ID (); IMPORT char VS_Error__ID__b86d646b21a8cf59; IMPORT t38 _Error__Warn (); #line 9 IMPORT char VS_Error__Warn__38cf6ace3df14804; IMPORT t38 _Error__WarnStr (); IMPORT char VS_Error__WarnStr__aa8e70c53534552c; #line 9 IMPORT t38 _Error__WarnNonStandard (); IMPORT char VS_Error__WarnNonStandard__28b127cf2d45026a; IMPORT t38 _Error__IgnoreWarning (); #line 9 IMPORT char VS_Error__IgnoreWarning__b99be2f12e366d68; IMPORT t38 _Error__Info (); IMPORT char VS_Error__Info__c5b4711436dbf5da; #line 9 IMPORT t38 _Error__Count (); IMPORT char VS_Error__Count__56133f452e061a4a; PRIVATE int init_done = -1; #line 9 "Error.i3" PRIVATE void Error__initProc (g) int g; { #line 9 "Error.i3" if (init_done >= g) return; init_done = g; INITIALIZE (& Text__init); INITIALIZE (& String__init); }; PRIVATE INITLINK me = {(INITLINK*)NIL, 1, Error__initProc }; static char* VSimports[] = { &VS_Text__T__fc4b369f3ab271fd, &VS_String__T__3a6c7dc12615e4ee, &VS_Error__Msg__4d119a332467757f, &VS_Error__Int__05fff4c5263ea533, &VS_Error__Str__2bd0723e3872e90c, &VS_Error__QID__84a7ccd932b81b86, &VS_Error__ID__b86d646b21a8cf59, &VS_Error__Warn__38cf6ace3df14804, &VS_Error__WarnStr__aa8e70c53534552c, &VS_Error__WarnNonStandard__28b127cf2d45026a, &VS_Error__IgnoreWarning__b99be2f12e366d68, &VS_Error__Info__c5b4711436dbf5da, &VS_Error__Count__56133f452e061a4a, NIL }; void Error__ILink (phase) int phase; { switch (phase) { case 0: { me.link = Error__init; Error__init = & me; break; }; case 1: { break; }; case 2: { break; }; }; };