#include "M3Runtime.h" #define t21 ADDRESS #define t17 void #define TC21 TC_REFANY IMPORT TYPE TC_REFANY; IMPORT char VS_REFANY__4b8748e831fc107a; #define t22 ADDRESS typedef int t5; #define TC22 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 37 "Text.i3" typedef struct { char* elts; int size[1]; } t1; #line 67 typedef signed_char t2; #define t3 ADDRESS #define TC3 TC_TEXT IMPORT TYPE TC_TEXT; IMPORT char VS_TEXT__b7a92447326386f5; #define t3_MapProc TC_TEXT->mapProc typedef t2 (*t4)(); typedef unsigned char t6; #line 63 typedef t5 (*t7)(); typedef unsigned char t8; #line 55 typedef t8 (*t9)(); #line 52 #define t10 t1 typedef t3 (*t11)(); #line 49 typedef t17 (*t12)(); typedef int t13; #line 26 typedef t13 (*t14)(); #line 23 typedef t6 (*t15)(); typedef CLOSURE t16; #define t20 ADDRESS typedef struct { TYPE self; int private; } t20_methods; #define t20_msize (sizeof (t20_methods)) typedef struct { ADDRESS methods; } t20_fields; #define t20_size (sizeof (t20_fields)) #define TC20 TC_ROOT IMPORT TYPE TC_ROOT; IMPORT char VS_ROOT__349f58f628be0ac6; #define t20_MapProc TC_ROOT->mapProc #define t18 ADDRESS #define TC18 TC_MUTEX IMPORT TYPE TC_MUTEX; IMPORT char VS_MUTEX__1f9d4e89391ab815; #define t18_MapProc TC_MUTEX->mapProc #define t19 ADDRESS typedef struct { TYPE self; int private; } t19_methods; #define t19_msize (sizeof (t19_methods)) typedef struct { ADDRESS methods; } t19_fields; #define t19_size (sizeof (t19_fields)) #define TC19 TC_UNTRACED_ROOT IMPORT TYPE TC_UNTRACED_ROOT; IMPORT char VS_UNTRACED_ROOT__3e0964513fd6da20; typedef double t24; typedef float t25; #line 7 EXPORT INITLINK* Text__init = (INITLINK*) 0; EXPORT TYPE TC_Text__T = (TYPE) 0; EXPORT char VS_Text__T__fc4b369f3ab271fd = '\0'; #line 7 IMPORT t3 _Text__Cat (); IMPORT char VS_Text__Cat__67b157bc3c80150f; IMPORT t8 _Text__Equal (); IMPORT char VS_Text__Equal__f19b6e6f34d36826; #line 7 IMPORT t6 _Text__GetChar (); IMPORT char VS_Text__GetChar__0f4bd6e72493f4ff; IMPORT t13 _Text__Length (); IMPORT char VS_Text__Length__661a58173d76f41c; #line 7 IMPORT t8 _Text__Empty (); IMPORT char VS_Text__Empty__f8aa6446353b9de8; IMPORT t3 _Text__Sub (); IMPORT char VS_Text__Sub__ba151c702fe1a06f; #line 7 IMPORT t17 _Text__SetChars (); IMPORT char VS_Text__SetChars__bc9d6611221daa06; IMPORT t3 _Text__FromChar (); IMPORT char VS_Text__FromChar__3896ff8a3ced0505; #line 7 IMPORT t3 _Text__FromChars (); IMPORT char VS_Text__FromChars__4adb855d24ac83e3; IMPORT t17 _Text__PutStr (); IMPORT char VS_Text__PutStr__d073d76a395ab9cd; #line 7 IMPORT t3 _Text__FromStr (); IMPORT char VS_Text__FromStr__4675e29c281840d3; IMPORT t8 _Text__IsEmpty (); IMPORT char VS_Text__IsEmpty__9b3b446520741b37; #line 7 IMPORT t5 _Text__FindChar (); IMPORT char VS_Text__FindChar__e1f24fdd3abfb03c; IMPORT t5 _Text__FindCharR (); IMPORT char VS_Text__FindCharR__d752d4c536319500; #line 7 IMPORT t2 _Text__Compare (); IMPORT char VS_Text__Compare__920fdd773789443c; PRIVATE int init_done = -1; #line 7 "Text.i3" PRIVATE void Text__initProc (g) int g; { #line 7 "Text.i3" if (init_done >= g) return; init_done = g; }; PRIVATE INITLINK me = {(INITLINK*)NIL, 1, Text__initProc }; static char* VSimports[] = { &VS_Text__Cat__67b157bc3c80150f, &VS_Text__Equal__f19b6e6f34d36826, &VS_Text__GetChar__0f4bd6e72493f4ff, &VS_Text__Length__661a58173d76f41c, &VS_Text__Empty__f8aa6446353b9de8, &VS_Text__Sub__ba151c702fe1a06f, &VS_Text__SetChars__bc9d6611221daa06, &VS_Text__FromChar__3896ff8a3ced0505, &VS_Text__FromChars__4adb855d24ac83e3, &VS_Text__PutStr__d073d76a395ab9cd, &VS_Text__FromStr__4675e29c281840d3, &VS_Text__IsEmpty__9b3b446520741b37, &VS_Text__FindChar__e1f24fdd3abfb03c, &VS_Text__FindCharR__d752d4c536319500, &VS_Text__Compare__920fdd773789443c, NIL }; void Text__ILink (phase) int phase; { switch (phase) { case 0: { me.link = Text__init; Text__init = & me; TC_Text__T = TC3; break; }; case 1: { break; }; case 2: { break; }; }; };