#include "M3Runtime.h"

#define t8 ADDRESS
#define t33 void
typedef unsigned char t9;
#line 173 "./Rd.i3"
typedef struct { char* elts; int size[1]; } t14;
#line 27 "RdClass.i3"
#define t10 t14
PRIVATE void t8_PrintProc ();
#line 27
PRIVATE typecell t8_TC; PRIVATE typecell t8_TC_init = {0, 0, 0, 0, 0, (PROC)NIL,   -2, 0, NIL, 1, 1, (PROC)NIL, (PROC)NIL, t8_PrintProc,
#line 27
  "", 991118862, 833218118}; PRIVATE TYPE TC8 = &t8_TC;  
#define t21 ADDRESS
#define TC21 TC_REFANY
IMPORT TYPE TC_REFANY; IMPORT char VS_REFANY__4b8748e831fc107a; 
#define t35 ADDRESS
typedef int t18; 
#define TC35 TC_ADDRESS
IMPORT TYPE TC_ADDRESS; IMPORT char VS_ADDRESS__30f7308738738b44; 
#define t36 ADDRESS
#define TC36 TC_NULL
IMPORT TYPE TC_NULL; IMPORT char VS_NULL__fb50c7d53bec30dc; 
#define t13 ADDRESS
 typedef struct { TYPE self; int private; } t13_methods; 
#define t13_msize (sizeof (t13_methods))
typedef struct { ADDRESS methods; } t13_fields; 
#define t13_size (sizeof (t13_fields))
#define TC13 TC_ROOT
IMPORT TYPE TC_ROOT; IMPORT char VS_ROOT__349f58f628be0ac6; 
#define t13_MapProc TC_ROOT->mapProc
#define t1 ADDRESS
#define TC1 TC_Rd__T
IMPORT TYPE TC_Rd__T;
#line 83 "./Rd.i3"
IMPORT char VS_Rd__T__2555b70b3f7780b1; 
#define t1_MapProc TC_Rd__T->mapProc
typedef t33 (*t2)(); typedef int t3;
#line 130 "RdClass.i3"
typedef t3 (*t4)();
#line 23
typedef unsigned char t5; typedef unsigned char t6;








typedef t5 (*t7)();
#line 26
#define t11 ADDRESS

#line 22
#define t12 ADDRESS
PRIVATE typecell t12_TC = {0, 0, 0, 0, 0, (PROC)NIL,
#line 22
  0, 0, NIL, 0, 0, (PROC)NIL, (PROC)NIL,   (PROC)NIL, NIL, 0, 0}; PRIVATE TYPE TC12 = &t12_TC;  
#define t12_MapProc t12_TC.mapProc
typedef struct {

   t7 _seek; t4 _length; t2 _close; } t11_methods; 
#define t11_msize (sizeof (t11_methods))
typedef struct {
#line 26
 t8 _buff; t3 _st; t3 _lo; t3 _hi; t3 _cur; t6 _closed; t6 _seekable; t6 _intermittent; } t11_fields; 
#define t11_size (sizeof (t11_fields))
PRIVATE void t11_InitProc ();
#line 26
PRIVATE void t11_SetupProc (); PRIVATE void t11_PrintProc (); PRIVATE void t11_MapProc (); PRIVATE typecell t11_TC; PRIVATE typecell t11_TC_init = {0, 0, 0, &t12_TC, 0, t11_MapProc,
#line 26
  t11_size, t11_msize, NIL, 0, 0, t11_InitProc,   t11_SetupProc,   t11_PrintProc, "RdClass#$%^_0001", 234348515, 970091082}; PRIVATE TYPE TC11 = &t11_TC;
#line 26

#line 287 "./Rd.i3"
typedef t6 (*t15)(); 
#define t16 ADDRESS
#define TC16 TC_TEXT
IMPORT TYPE TC_TEXT; IMPORT char VS_TEXT__b7a92447326386f5; 
#define t16_MapProc TC_TEXT->mapProc
typedef t16 (*t17)();
#line 92
typedef t9 (*t19)();
#line 84
typedef unsigned char t20;
#line 15 ".ROOT/.boots/corelib/Interfaces/Thread.i3"
#define t22 ADDRESS
#define TC22 TC_Thread__T
IMPORT TYPE TC_Thread__T;
#line 15
IMPORT char VS_Thread__T__2555b70b3f7780b1; 
#define t22_MapProc TC_Thread__T->mapProc
typedef t21 (*t23)();



#define t24 ADDRESS
#define TC24 TC_Thread__Condition
IMPORT TYPE TC_Thread__Condition;
#line 21
IMPORT char VS_Thread__Condition__26d5968239e08f4e; 
#define t24_MapProc TC_Thread__Condition->mapProc
#define t25 ADDRESS
#define TC25 TC_MUTEX
IMPORT TYPE TC_MUTEX; IMPORT char VS_MUTEX__1f9d4e89391ab815; 
#define t25_MapProc TC_MUTEX->mapProc
typedef t22 (*t26)();
#line 23
#define t27 ADDRESS

#line 23
typedef struct { t23 _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 t24 (*t28)();





typedef t25 (*t29)();
#line 28
#define t30 ADDRESS

#line 28
typedef struct { int filler; } t30_methods; 
#define t30_msize (sizeof (t30_methods))
typedef struct {
#line 28
 t3 _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 t18 (*t31)(); typedef CLOSURE t32; 
#define t34 ADDRESS
 typedef struct { TYPE self; int private; } t34_methods; 
#define t34_msize (sizeof (t34_methods))
typedef struct { ADDRESS methods; } t34_fields; 
#define t34_size (sizeof (t34_fields))
#define TC34 TC_UNTRACED_ROOT
IMPORT TYPE TC_UNTRACED_ROOT; IMPORT char VS_UNTRACED_ROOT__3e0964513fd6da20; typedef double t37; typedef float t38;
#line 16 "RdClass.i3"
IMPORT INITLINK* Rd__init; IMPORT INITLINK* Thread__init; EXPORT INITLINK* RdClass__init = (INITLINK*) 0;  IMPORT EXCEPTION_NAME _Thread__Alerted;
#line 16
IMPORT char VS_Thread__Alerted__fc88feb43485af46; IMPORT EXCEPTION_NAME _Rd__EndOfFile; IMPORT char VS_Rd__EndOfFile__f4a9d2f63b7e105d;
#line 16
IMPORT EXCEPTION_NAME _Rd__Failure; IMPORT char VS_Rd__Failure__e4a829e331222b6d; IMPORT EXCEPTION_NAME _Rd__Error; IMPORT char VS_Rd__Error__5ca07bfe2ba90cfc;
#line 16
  IMPORT char VS_Thread__DefaultStackSize__0c949e2e2def4e40; IMPORT TYPE TC_Thread__Mutex; IMPORT char VS_Thread__Mutex__4f5c12072cdeec3e;
#line 16
  EXPORT TYPE TC_RdClass__Private = &t12_TC; EXPORT char VS_RdClass__Private__5594af883f1b8361 = '\0'; IMPORT t33 _RdClass__Lock ();
#line 16
IMPORT char VS_RdClass__Lock__18b695322b66d4f7; IMPORT t33 _RdClass__Unlock (); IMPORT char VS_RdClass__Unlock__95d99bea22c580a4;
#line 16
IMPORT t3 _RdClass__LengthDefault (); IMPORT char VS_RdClass__LengthDefault__76d0ecc72f6b16a1; IMPORT t33 _RdClass__CloseDefault ();
#line 16
IMPORT char VS_RdClass__CloseDefault__f0ed7e3d26d0db8a;  EXPORT char VS_Rd__T__3cb9710e23a32fd2 = '\0';  PRIVATE int init_done = -1;
#line 16 "RdClass.i3"
 PRIVATE void RdClass__initProc (g) int g; { 
#line 16 "RdClass.i3"
if (init_done >= g) return; init_done = g; INITIALIZE (& Rd__init); INITIALIZE (& Thread__init); };  PRIVATE void t8_PrintProc (ref) t10* ref; { CHECKSTACKOVERFLOW; fprintf (stderr, "%s {", TC8->brand); fprintf (stderr, "^ = array");
   fprintf (stderr, "}\n"); };  PRIVATE void t11_InitProc (obj) char* obj; { register t11_fields* p; CHECKSTACKOVERFLOW; p = (t11_fields*) (obj + TC12->datasize); };  PRIVATE void t11_SetupProc () { register int* p; t11_TC.datasize += TC12->datasize; t11_TC.methodsize += TC12->methodsize; p = (int*) UALLOC (t11_TC.methodsize); COPY (TC12->defaultMethods, p, (TC12->methodsize));
p[0] = (int)(& t11_TC); p[1] = 0; ((t11_methods*) (((char*)p) + TC12->methodsize))->_length = _RdClass__LengthDefault; ((t11_methods*) (((char*)p) + TC12->methodsize))->_close = _RdClass__CloseDefault;
t11_TC.defaultMethods = (char*) p; };  PRIVATE void t11_PrintProc (obj) char *obj; { t11_fields* o; CHECKSTACKOVERFLOW; if (TC12->printProc != 0) {TC12->printProc (obj); } fprintf (stderr, "{%s} ", TC11->brand); o = (t11_fields*) (obj + TC12->datasize);
fprintf (stderr, "buff = %#x", o->_buff); fprintf (stderr, ", "); fprintf (stderr, "st = %d", o->_st); fprintf (stderr, ", ");
fprintf (stderr, "lo = %d", o->_lo); fprintf (stderr, ", "); fprintf (stderr, "hi = %d", o->_hi); fprintf (stderr, ", ");
fprintf (stderr, "cur = %d", o->_cur); fprintf (stderr, ", "); fprintf (stderr, "closed = %d", o->_closed); fprintf (stderr, ", ");
fprintf (stderr, "seekable = %d", o->_seekable); fprintf (stderr, ", "); fprintf (stderr, "intermittent = %d", o->_intermittent);
fprintf (stderr, ", "); };  PRIVATE void t11_MapProc (p, r, c) void (*p) (); char*  r; ADDRESS c; { register t11_fields*  o;
CHECKSTACKOVERFLOW; t12_MapProc (p, r, c); o = (t11_fields*) (r + TC12->datasize); p (& (o->_buff), r, c); };   PRIVATE INITLINK me = {(INITLINK*)NIL, 1, RdClass__initProc };
static char* VSimports[] = { &VS_Thread__Alerted__fc88feb43485af46, &VS_Rd__T__2555b70b3f7780b1, &VS_Rd__EndOfFile__f4a9d2f63b7e105d,
&VS_Rd__Failure__e4a829e331222b6d, &VS_Rd__Error__5ca07bfe2ba90cfc, &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_Rd__Error__5ca07bfe2ba90cfc, &VS_Rd__Failure__e4a829e331222b6d, &VS_Thread__Alerted__fc88feb43485af46,
&VS_RdClass__Lock__18b695322b66d4f7, &VS_RdClass__Unlock__95d99bea22c580a4, &VS_RdClass__LengthDefault__76d0ecc72f6b16a1,
&VS_RdClass__CloseDefault__f0ed7e3d26d0db8a, NIL };  void RdClass__ILink (phase) int phase; { switch (phase) { case 0: { me.link = RdClass__init; RdClass__init = & me; t8_TC = t8_TC_init;
         REGISTERTYPE (TC8); t11_TC = t11_TC_init; REGISTERTYPE (TC11); REGISTEROPAQUE (TC12); break; }; case 1: {
#line 26 "RdClass.i3"
         IDENTIFYTYPES (TC1, TC11); break; }; case 2: { break; }; }; };