#include "M3Runtime.h"

#define t22 ADDRESS
#define t18 void
#define TC22 TC_REFANY
IMPORT TYPE TC_REFANY; IMPORT char VS_REFANY__4b8748e831fc107a; 
#define t1 ADDRESS
#define TC1 TC_TEXT
IMPORT TYPE TC_TEXT; IMPORT char VS_TEXT__b7a92447326386f5; 
#define t1_MapProc TC_TEXT->mapProc
#define t4 ADDRESS
typedef unsigned char t5;
#line 37 "./Text.i3"
typedef struct { char* elts; int size[1]; } t7;
#line 20 "TextF.i3"
#define t6 t7
PRIVATE void t4_PrintProc ();
#line 20
PRIVATE typecell t4_TC; PRIVATE typecell t4_TC_init = {0, 0, 0, 0, 0, (PROC)NIL,   -2, 0, NIL, 1, 1, (PROC)NIL, (PROC)NIL, t4_PrintProc,
#line 20
  "Text 1.0", 733367610, 1017797205}; PRIVATE TYPE TC4 = &t4_TC;  
#define t23 ADDRESS
typedef int t10; 
#define TC23 TC_ADDRESS
IMPORT TYPE TC_ADDRESS; IMPORT char VS_ADDRESS__30f7308738738b44; 
#define t24 ADDRESS
#define TC24 TC_NULL
IMPORT TYPE TC_NULL; IMPORT char VS_NULL__fb50c7d53bec30dc; typedef int t2;
#line 22
typedef t1 (*t3)();
#line 67 "./Text.i3"
typedef signed_char t8; typedef t8 (*t9)();
#line 63
typedef t10 (*t11)(); typedef unsigned char t12;
#line 55
typedef t12 (*t13)();
#line 49
typedef t18 (*t14)();
#line 26
typedef t2 (*t15)();
#line 23
typedef t5 (*t16)(); typedef CLOSURE t17; 
#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 t19 ADDRESS
#define TC19 TC_MUTEX
IMPORT TYPE TC_MUTEX; IMPORT char VS_MUTEX__1f9d4e89391ab815; 
#define t19_MapProc TC_MUTEX->mapProc
#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_UNTRACED_ROOT
IMPORT TYPE TC_UNTRACED_ROOT; IMPORT char VS_UNTRACED_ROOT__3e0964513fd6da20; typedef double t25; typedef float t26;
#line 7 "TextF.i3"
IMPORT INITLINK* Text__init; EXPORT INITLINK* TextF__init = (INITLINK*) 0;  IMPORT TYPE TC_Text__T; IMPORT char VS_Text__T__fc4b369f3ab271fd;
#line 7
  IMPORT t1 _TextF__New (); IMPORT char VS_TextF__New__8fe5c34334e2bc1b;  EXPORT char VS_TEXT__db80a199220abd03 = '\0';  PRIVATE int init_done = -1;
#line 7 "TextF.i3"
 PRIVATE void TextF__initProc (g) int g; { 
#line 7 "TextF.i3"
if (init_done >= g) return; init_done = g; INITIALIZE (& Text__init); };  PRIVATE void t4_PrintProc (ref) t6* ref; { CHECKSTACKOVERFLOW; fprintf (stderr, "%s {", TC4->brand); fprintf (stderr, "^ = array");
   fprintf (stderr, "}\n"); };   PRIVATE INITLINK me = {(INITLINK*)NIL, 1, TextF__initProc }; static char* VSimports[] = {
   &VS_Text__T__fc4b369f3ab271fd, &VS_TextF__New__8fe5c34334e2bc1b, NIL };  void TextF__ILink (phase) int phase; { switch (phase) { case 0: { me.link = TextF__init; TextF__init = & me; t4_TC = t4_TC_init;
         REGISTERTYPE (TC4); break; }; case 1: {
#line 20 "TextF.i3"
         IDENTIFYTYPES (TC1, TC4); break; }; case 2: { break; }; }; };