#include "M3Runtime.h"

#define t1 ADDRESS
#define t5 ADDRESS
#define t22 void
#define TC5 TC_REFANY
IMPORT TYPE TC_REFANY; IMPORT char VS_REFANY__4b8748e831fc107a;
#line 33 ".ROOT/.boots/corelib/Interfaces/List.i3"
typedef struct { t5 _first; t1 _tail; } t20;
#line 32
#define TC1 TC_List__T
IMPORT TYPE TC_List__T;
#line 32
IMPORT char VS_List__T__c661f0b12f626d56;
#line 248
#define t14 ADDRESS
typedef struct {
#line 244
   char* elts; int size[1]; } t11;



#define t15 t11
PRIVATE void t14_MapProc ();
#line 248
PRIVATE void t14_PrintProc (); PRIVATE typecell t14_TC; PRIVATE typecell t14_TC_init = {0, 0, 0, 0, 0, t14_MapProc,   -2, 0, NIL, 1, 4, (PROC)NIL, (PROC)NIL, t14_PrintProc,
#line 248
  "", -38782153, 817587111}; PRIVATE TYPE TC14 = &t14_TC;  
#define t27 ADDRESS
typedef int t6; 
#define TC27 TC_ADDRESS
IMPORT TYPE TC_ADDRESS; IMPORT char VS_ADDRESS__30f7308738738b44; 
#define t28 ADDRESS
#define TC28 TC_NULL
IMPORT TYPE TC_NULL; IMPORT char VS_NULL__fb50c7d53bec30dc;
#line 13 "IntTable.i3"
#define t2 ADDRESS
PRIVATE typecell t2_TC = {0, 0, 0, 0, 0, (PROC)NIL,
#line 13
  0, 0, NIL, 0, 0, (PROC)NIL, (PROC)NIL,   (PROC)NIL, NIL, 0, 0}; PRIVATE TYPE TC2 = &t2_TC;  
#define t2_MapProc t2_TC.mapProc
typedef t1 (*t3)(); typedef unsigned char t4;
#line 31
typedef t4 (*t7)();
#line 26
typedef t2 (*t8)();
#line 22
typedef t22 (*t9)(); typedef int t10;
#line 273 ".ROOT/.boots/corelib/Interfaces/List.i3"
typedef t6 (*t12)();
#line 41
typedef t5 (*t13)();
#line 248
typedef t14 (*t16)();
#line 189
typedef signed_char t18;
#line 38
typedef t18 (*t17)();
#line 85
typedef t10 (*t19)(); typedef CLOSURE t21; 
#define t26 ADDRESS
 typedef struct { TYPE self; int private; } t26_methods; 
#define t26_msize (sizeof (t26_methods))
typedef struct { ADDRESS methods; } t26_fields; 
#define t26_size (sizeof (t26_fields))
#define TC26 TC_ROOT
IMPORT TYPE TC_ROOT; IMPORT char VS_ROOT__349f58f628be0ac6; 
#define t26_MapProc TC_ROOT->mapProc
#define t23 ADDRESS
#define TC23 TC_MUTEX
IMPORT TYPE TC_MUTEX; IMPORT char VS_MUTEX__1f9d4e89391ab815; 
#define t23_MapProc TC_MUTEX->mapProc
#define t24 ADDRESS
#define TC24 TC_TEXT
IMPORT TYPE TC_TEXT; IMPORT char VS_TEXT__b7a92447326386f5; 
#define t24_MapProc TC_TEXT->mapProc
#define t25 ADDRESS
 typedef struct { TYPE self; int private; } t25_methods; 
#define t25_msize (sizeof (t25_methods))
typedef struct { ADDRESS methods; } t25_fields; 
#define t25_size (sizeof (t25_fields))
#define TC25 TC_UNTRACED_ROOT
IMPORT TYPE TC_UNTRACED_ROOT; IMPORT char VS_UNTRACED_ROOT__3e0964513fd6da20; typedef unsigned char t29; typedef double t30;
typedef float t31;
#line 8 "IntTable.i3"
IMPORT INITLINK* List__init; EXPORT INITLINK* IntTable__init = (INITLINK*) 0;    EXPORT TYPE TC_IntTable__T = &t2_TC; EXPORT char VS_IntTable__T__e38bb59132b51757 = '\0';
#line 8
IMPORT t2 _IntTable__New (); IMPORT char VS_IntTable__New__3dc7ffff24de1d12; IMPORT t4 _IntTable__Get (); IMPORT char VS_IntTable__Get__d252c369205f828a;
#line 8
IMPORT t4 _IntTable__Put (); IMPORT char VS_IntTable__Put__2e50da8725271a2d; IMPORT t4 _IntTable__Delete (); IMPORT char VS_IntTable__Delete__243ffdac2131e630;
#line 8
IMPORT t22 _IntTable__Clear (); IMPORT char VS_IntTable__Clear__98ad75fe3056e268; IMPORT t2 _IntTable__Copy (); IMPORT char VS_IntTable__Copy__2ea3f11830e8ebf5;
#line 8
IMPORT t4 _IntTable__Enumerate (); IMPORT char VS_IntTable__Enumerate__d2bfc5a83d802d46; IMPORT t1 _IntTable__ToValuesList ();
#line 8
IMPORT char VS_IntTable__ToValuesList__511cc59c2eaddb9d; IMPORT t1 _IntTable__ToAssocList (); IMPORT char VS_IntTable__ToAssocList__1de89ec7273ddba3;
#line 8
  PRIVATE int init_done = -1;
#line 8 "IntTable.i3"
 PRIVATE void IntTable__initProc (g) int g; { 
#line 8 "IntTable.i3"
if (init_done >= g) return; init_done = g; INITIALIZE (& List__init); };  PRIVATE void t14_PrintProc (ref) t15* ref; { CHECKSTACKOVERFLOW; fprintf (stderr, "%s {", TC14->brand); fprintf (stderr, "^ = array");
   fprintf (stderr, "}\n"); };  PRIVATE void t1_MapProc (p, r, c) void (*p) (); register t20* r; ADDRESS c; { CHECKSTACKOVERFLOW;
   p (& ((*r)._first), r, c); p (& ((*r)._tail), r, c); };  PRIVATE void t14_MapProc (p, r, c) void (*p) (); register t15* r;
ADDRESS c; { CHECKSTACKOVERFLOW; { int i1, j; t11* zz; t5* aptr; zz = & ((*r)); j = zz->size[0]; aptr = (t5*) zz->elts; for (i1 = 0; i1 < j; i1++) {
         p (& (aptr[i1]), r, c); }; }; };   PRIVATE INITLINK me = {(INITLINK*)NIL, 1, IntTable__initProc }; static char* VSimports[] = {
   &VS_List__T__c661f0b12f626d56, &VS_IntTable__New__3dc7ffff24de1d12, &VS_IntTable__Get__d252c369205f828a, &VS_IntTable__Put__2e50da8725271a2d,
   &VS_IntTable__Delete__243ffdac2131e630, &VS_IntTable__Clear__98ad75fe3056e268, &VS_IntTable__Copy__2ea3f11830e8ebf5, &VS_IntTable__Enumerate__d2bfc5a83d802d46,
   &VS_IntTable__ToValuesList__511cc59c2eaddb9d, &VS_IntTable__ToAssocList__1de89ec7273ddba3, NIL };  void IntTable__ILink (phase) int phase; { switch (phase) { case 0: { me.link = IntTable__init; IntTable__init = & me; REGISTEROPAQUE (TC2);
         t14_TC = t14_TC_init; REGISTERTYPE (TC14); break; }; case 1: { break; }; case 2: { break; }; }; };