#include "M3Runtime.h" #define t21 ADDRESS #define t32 void #define TC21 TC_REFANY IMPORT TYPE TC_REFANY; IMPORT char VS_REFANY__4b8748e831fc107a; #define t34 ADDRESS typedef int t6; #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; typedef int t1; typedef double t2; #define t22 ADDRESS typedef struct { TYPE self; int private; } t22_methods; #define t22_msize (sizeof (t22_methods)) typedef struct { ADDRESS methods; } t22_fields; #define t22_size (sizeof (t22_fields)) #define TC22 TC_ROOT IMPORT TYPE TC_ROOT; IMPORT char VS_ROOT__349f58f628be0ac6; #define t22_MapProc TC_ROOT->mapProc #define t3 ADDRESS #define TC3 TC_Wr__T IMPORT TYPE TC_Wr__T; #line 90 "./Wr.i3" IMPORT char VS_Wr__T__2555b70b3f7780b1; #define t3_MapProc TC_Wr__T->mapProc typedef t32 (*t4)(); typedef float t5; typedef unsigned char t7; #line 116 typedef struct { char* elts; int size[1]; } t17; #line 70 "UnsafeWr.i3" #define t8 t17 #define t9 ADDRESS #define TC9 TC_TEXT IMPORT TYPE TC_TEXT; IMPORT char VS_TEXT__b7a92447326386f5; #define t9_MapProc TC_TEXT->mapProc #define t10 ADDRESS #define TC10 TC_MUTEX IMPORT TYPE TC_MUTEX; IMPORT char VS_MUTEX__1f9d4e89391ab815; #define t10_MapProc TC_MUTEX->mapProc typedef t2 (*t11)(); #line 92 ".ROOT/.boots/corelib/Interfaces/Convert.i3" typedef t5 (*t12)(); #line 19 typedef signed_char t13; #line 86 typedef t6 (*t14)(); typedef unsigned char t15; #line 22 typedef unsigned char t16; #line 161 "./Wr.i3" typedef t15 (*t18)(); #line 155 typedef t1 (*t19)(); #line 91 typedef unsigned char t20; #line 15 ".ROOT/.boots/corelib/Interfaces/Thread.i3" #define t23 ADDRESS #define TC23 TC_Thread__T IMPORT TYPE TC_Thread__T; #line 15 IMPORT char VS_Thread__T__2555b70b3f7780b1; #define t23_MapProc TC_Thread__T->mapProc typedef t21 (*t24)(); #define t25 ADDRESS #define TC25 TC_Thread__Condition IMPORT TYPE TC_Thread__Condition; #line 21 IMPORT char VS_Thread__Condition__26d5968239e08f4e; #define t25_MapProc TC_Thread__Condition->mapProc typedef t23 (*t26)(); #define t27 ADDRESS #line 23 typedef struct { t24 _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 t25 (*t28)(); typedef t10 (*t29)(); #line 28 #define t30 ADDRESS #line 28 typedef struct { int filler; } t30_methods; #define t30_msize (sizeof (t30_methods)) typedef struct { #line 28 t1 _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; #line 49 "UnsafeWr.i3" IMPORT INITLINK* Convert__init; IMPORT INITLINK* Wr__init; IMPORT INITLINK* Thread__init; EXPORT INITLINK* UnsafeWr__init = (INITLINK*) 0; #line 49 IMPORT EXCEPTION_NAME _Convert__Failed; IMPORT char VS_Convert__Failed__2816e40d3f5c20d1; IMPORT EXCEPTION_NAME _Thread__Alerted; #line 49 IMPORT char VS_Thread__Alerted__fc88feb43485af46; IMPORT EXCEPTION_NAME _Wr__Failure; IMPORT char VS_Wr__Failure__5f82cfb43dabf527; #line 49 IMPORT EXCEPTION_NAME _Wr__Error; IMPORT char VS_Wr__Error__c367253d3ed4fd15; IMPORT char VS_Thread__DefaultStackSize__0c949e2e2def4e40; #line 49 IMPORT TYPE TC_Thread__Mutex; IMPORT char VS_Thread__Mutex__4f5c12072cdeec3e; IMPORT t32 _UnsafeWr__FastPutChar (); IMPORT char VS_UnsafeWr__FastPutChar__b1a53b0220cb969f; #line 49 IMPORT t32 _UnsafeWr__FastPutText (); IMPORT char VS_UnsafeWr__FastPutText__a6a617eb3f19afd1; IMPORT t32 _UnsafeWr__FastPutString (); #line 49 IMPORT char VS_UnsafeWr__FastPutString__3489317e38b7823c; IMPORT t32 _UnsafeWr__FastPutInt (); IMPORT char VS_UnsafeWr__FastPutInt__da9571263c7312f3; #line 49 IMPORT t32 _UnsafeWr__FastPutReal (); IMPORT char VS_UnsafeWr__FastPutReal__48d0debd304cb5da; IMPORT t32 _UnsafeWr__FastPutLongReal (); #line 49 IMPORT char VS_UnsafeWr__FastPutLongReal__3a7f546321c8abf3; PRIVATE int init_done = -1; #line 49 "UnsafeWr.i3" PRIVATE void UnsafeWr__initProc (g) int g; { #line 49 "UnsafeWr.i3" if (init_done >= g) return; init_done = g; INITIALIZE (& Convert__init); INITIALIZE (& Wr__init); INITIALIZE (& Thread__init); #line 49 }; PRIVATE INITLINK me = {(INITLINK*)NIL, 1, UnsafeWr__initProc }; static char* VSimports[] = { &VS_Convert__Failed__2816e40d3f5c20d1, &VS_Thread__Alerted__fc88feb43485af46, &VS_Wr__T__2555b70b3f7780b1, &VS_Wr__Failure__5f82cfb43dabf527, &VS_Wr__Error__c367253d3ed4fd15, &VS_Thread__DefaultStackSize__0c949e2e2def4e40, &VS_Thread__T__2555b70b3f7780b1, &VS_Thread__Mutex__4f5c12072cdeec3e, &VS_Thread__Condition__26d5968239e08f4e, &VS_Thread__Closure__7fb5c6232c5a658a, &VS_Thread__SizedClosure__8a46717d2eae7b07, &VS_Thread__Alerted__fc88feb43485af46, &VS_Wr__Error__c367253d3ed4fd15, &VS_Wr__Failure__5f82cfb43dabf527, &VS_Thread__Alerted__fc88feb43485af46, &VS_UnsafeWr__FastPutChar__b1a53b0220cb969f, &VS_UnsafeWr__FastPutText__a6a617eb3f19afd1, &VS_UnsafeWr__FastPutString__3489317e38b7823c, &VS_UnsafeWr__FastPutInt__da9571263c7312f3, &VS_UnsafeWr__FastPutReal__48d0debd304cb5da, &VS_UnsafeWr__FastPutLongReal__3a7f546321c8abf3, NIL }; void UnsafeWr__ILink (phase) int phase; { switch (phase) { case 0: { me.link = UnsafeWr__init; UnsafeWr__init = & me; break; }; case 1: { break; }; case 2: { #line 57 "UnsafeWr.i3" CHECKSUBTYPE (TC3, TC10); break; }; }; };