#include "M3Runtime.h" #define t1 ADDRESS #define t20 void #define TC1 TC_REFANY IMPORT TYPE TC_REFANY; IMPORT char VS_REFANY__4b8748e831fc107a; #define t4 ADDRESS typedef int t6; #define TC4 TC_ADDRESS IMPORT TYPE TC_ADDRESS; IMPORT char VS_ADDRESS__30f7308738738b44; #define t23 ADDRESS #define TC23 TC_NULL IMPORT TYPE TC_NULL; IMPORT char VS_NULL__fb50c7d53bec30dc; #line 23 "./Thread.i3" #define t2 ADDRESS typedef t1 (*t3)(); #define t17 ADDRESS typedef struct { TYPE self; int private; } t17_methods; #define t17_msize (sizeof (t17_methods)) typedef struct { ADDRESS methods; } t17_fields; #define t17_size (sizeof (t17_fields)) #define TC17 TC_ROOT IMPORT TYPE TC_ROOT; IMPORT char VS_ROOT__349f58f628be0ac6; #define t17_MapProc TC_ROOT->mapProc typedef struct { #line 23 t3 _apply; } t2_methods; #define t2_msize (sizeof (t2_methods)) typedef struct { #line 23 int filler; } t2_fields; #define t2_size (sizeof (t2_fields)) #define TC2 TC_Thread__Closure IMPORT TYPE TC_Thread__Closure; #line 23 IMPORT char VS_Thread__Closure__7fb5c6232c5a658a; #define t2_MapProc TC_Thread__Closure->mapProc typedef t20 (*t5)(); #line 15 #define t7 ADDRESS #define TC7 TC_Thread__T IMPORT TYPE TC_Thread__T; #line 15 IMPORT char VS_Thread__T__2555b70b3f7780b1; #define t7_MapProc TC_Thread__T->mapProc #define t8 ADDRESS #define TC8 TC_Thread__Condition IMPORT TYPE TC_Thread__Condition; IMPORT char VS_Thread__Condition__26d5968239e08f4e; #define t8_MapProc TC_Thread__Condition->mapProc #define t9 ADDRESS #define TC9 TC_MUTEX IMPORT TYPE TC_MUTEX; IMPORT char VS_MUTEX__1f9d4e89391ab815; #define t9_MapProc TC_MUTEX->mapProc typedef unsigned char t10; #line 71 typedef t10 (*t11)(); #line 61 typedef t7 (*t12)(); #line 34 typedef t8 (*t13)(); #line 31 typedef t9 (*t14)(); typedef int t15; #line 28 #define t16 ADDRESS #line 28 typedef struct { int filler; } t16_methods; #define t16_msize (sizeof (t16_methods)) typedef struct { #line 28 t15 _stackSize; } t16_fields; #define t16_size (sizeof (t16_fields)) #define TC16 TC_Thread__SizedClosure IMPORT TYPE TC_Thread__SizedClosure; #line 28 IMPORT char VS_Thread__SizedClosure__8a46717d2eae7b07; #define t16_MapProc TC_Thread__SizedClosure->mapProc typedef t6 (*t18)(); typedef CLOSURE t19; #define t21 ADDRESS #define TC21 TC_TEXT IMPORT TYPE TC_TEXT; IMPORT char VS_TEXT__b7a92447326386f5; #define t21_MapProc TC_TEXT->mapProc #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_UNTRACED_ROOT IMPORT TYPE TC_UNTRACED_ROOT; IMPORT char VS_UNTRACED_ROOT__3e0964513fd6da20; typedef unsigned char t24; typedef double t25; typedef float t26; #line 8 "ThreadSup.i3" IMPORT INITLINK* Thread__init; EXPORT INITLINK* ThreadSup__init = (INITLINK*) 0; IMPORT char VS_Thread__DefaultStackSize__0c949e2e2def4e40; #line 8 IMPORT TYPE TC_Thread__Mutex; IMPORT char VS_Thread__Mutex__4f5c12072cdeec3e; IMPORT EXCEPTION_NAME _Thread__Alerted; IMPORT char VS_Thread__Alerted__fc88feb43485af46; #line 8 EXPORT t7 _ThreadSup__self; EXPORT char VS_ThreadSup__self__d8ab6afe2b3c018a = '\0'; EXPORT t6 _ThreadSup__inCritical; EXPORT char VS_ThreadSup__inCritical__651d6d3526469249 = '\0'; #line 8 IMPORT t6 contextSize; EXPORT char VScontextSize__87adc53d28d0aa85 = '\0'; IMPORT t20 InitTopContext (); EXPORT char VSInitTopContext__8b85691223fe4223; #line 8 IMPORT t20 InitContext (); EXPORT char VSInitContext__5129e16e3dfdd6e5; IMPORT t20 Transfer (); EXPORT char VSTransfer__b3d736b72e581f3a; #line 8 IMPORT t20 Tos (); EXPORT char VSTos__31b0b5672ac220f0; IMPORT t20 SelfTos (); EXPORT char VSSelfTos__a70cc057275952d8; IMPORT t1 UserMain (); #line 8 EXPORT char VSUserMain__20ce9975318a52d4; void ThreadSup__IMap (p) void (*p) (); { ADDRESS r = NIL; ADDRESS c = NIL; CHECKSTACKOVERFLOW; #line 8 p (& (_ThreadSup__self), r, c); }; PRIVATE int init_done = -1; #line 8 "ThreadSup.i3" PRIVATE void ThreadSup__initProc (g) int g; { #line 8 "ThreadSup.i3" if (init_done >= g) return; init_done = g; INITIALIZE (& Thread__init); #line 29 ZERO1 (& _ThreadSup__self); #line 8 }; PRIVATE INITLINK me = {(INITLINK*)NIL, 1, ThreadSup__initProc }; static char* VSimports[] = { &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, NIL }; void ThreadSup__ILink (phase) int phase; { switch (phase) { case 0: { me.link = ThreadSup__init; ThreadSup__init = & me; break; }; case 1: { ZERO1 (& _ThreadSup__self); break; }; case 2: { break; }; }; };