#include "M3Runtime.h"

#define t25 ADDRESS
#define t21 void
#define TC25 TC_REFANY
IMPORT TYPE TC_REFANY; IMPORT char VS_REFANY__4b8748e831fc107a; 
#define t26 ADDRESS
typedef int t8; 
#define TC26 TC_ADDRESS
IMPORT TYPE TC_ADDRESS; IMPORT char VS_ADDRESS__30f7308738738b44; 
#define t27 ADDRESS
#define TC27 TC_NULL
IMPORT TYPE TC_NULL; IMPORT char VS_NULL__fb50c7d53bec30dc; typedef unsigned char t1; 
#define t2 ADDRESS
#define TC2 TC_TEXT
IMPORT TYPE TC_TEXT; IMPORT char VS_TEXT__b7a92447326386f5; 
#define t2_MapProc TC_TEXT->mapProc
typedef t1 (*t3)(); typedef double t4;
#line 23 "Scan.i3"
typedef t4 (*t5)(); typedef float t6;
#line 21
typedef t6 (*t7)();
#line 19
typedef t8 (*t9)(); typedef unsigned char t10;
#line 15
typedef t10 (*t11)();
#line 37 ".ROOT/.boots/corelib/Interfaces/Text.i3"
typedef struct { char* elts; int size[1]; } t12;
#line 67
typedef signed_char t13; typedef t13 (*t14)();
#line 52
#define t15 t12
typedef t2 (*t16)();
#line 49
typedef t21 (*t17)(); typedef int t18;
#line 26
typedef t18 (*t19)(); typedef CLOSURE t20; 
#define t24 ADDRESS
 typedef struct { TYPE self; int private; } t24_methods; 
#define t24_msize (sizeof (t24_methods))
typedef struct { ADDRESS methods; } t24_fields; 
#define t24_size (sizeof (t24_fields))
#define TC24 TC_ROOT
IMPORT TYPE TC_ROOT; IMPORT char VS_ROOT__349f58f628be0ac6; 
#define t24_MapProc TC_ROOT->mapProc
#define t22 ADDRESS
#define TC22 TC_MUTEX
IMPORT TYPE TC_MUTEX; IMPORT char VS_MUTEX__1f9d4e89391ab815; 
#define t22_MapProc TC_MUTEX->mapProc
#define t23 ADDRESS
 typedef struct { TYPE self; int private; } t23_methods; 
#define t23_msize (sizeof (t23_methods))
typedef struct { ADDRESS methods; } t23_fields; 
#define t23_size (sizeof (t23_fields))
#define TC23 TC_UNTRACED_ROOT
IMPORT TYPE TC_UNTRACED_ROOT; IMPORT char VS_UNTRACED_ROOT__3e0964513fd6da20;
#line 8 "Scan.i3"
IMPORT INITLINK* Word__init; IMPORT INITLINK* Text__init; EXPORT INITLINK* Scan__init = (INITLINK*) 0;    IMPORT TYPE TC_Text__T;
#line 8
IMPORT char VS_Text__T__fc4b369f3ab271fd;   EXPORT EXCEPTION_NAME _Scan__BadFormat = "_Scan__BadFormat"; EXPORT char VS_Scan__BadFormat__da88aaec2fb97846 = '\0';
#line 8
IMPORT t10 _Scan__Bool (); IMPORT char VS_Scan__Bool__53c5db943265766b; IMPORT t8 _Scan__Int (); IMPORT char VS_Scan__Int__b77b6e86262d56f2;
#line 8
IMPORT t8 _Scan__Unsigned (); IMPORT char VS_Scan__Unsigned__2c083d423f589e92; IMPORT t6 _Scan__Real (); IMPORT char VS_Scan__Real__d631b36524bd9453;
#line 8
IMPORT t4 _Scan__LongReal (); IMPORT char VS_Scan__LongReal__aff8a1e33220e8f3; IMPORT t1 _Scan__Char (); IMPORT char VS_Scan__Char__9961e9d121519c16;
#line 8
  PRIVATE int init_done = -1;
#line 8 "Scan.i3"
 PRIVATE void Scan__initProc (g) int g; { 
#line 8 "Scan.i3"
if (init_done >= g) return; init_done = g; INITIALIZE (& Word__init); INITIALIZE (& Text__init); };   PRIVATE INITLINK me = {(INITLINK*)NIL, 1, Scan__initProc };
static char* VSimports[] = { &VS_Text__T__fc4b369f3ab271fd, &VS_Scan__Bool__53c5db943265766b, &VS_Scan__Int__b77b6e86262d56f2,
&VS_Scan__Unsigned__2c083d423f589e92, &VS_Scan__Real__d631b36524bd9453, &VS_Scan__LongReal__aff8a1e33220e8f3, &VS_Scan__Char__9961e9d121519c16,
NIL };  void Scan__ILink (phase) int phase; { switch (phase) { case 0: { me.link = Scan__init; Scan__init = & me; break; }; case 1: {
         break; }; case 2: { break; }; }; };