#include "M3Runtime.h"

#define t1 ADDRESS
typedef unsigned char t17; 
#define t4 ADDRESS
typedef int t2; 
#define TC4 TC_ADDRESS
IMPORT TYPE TC_ADDRESS; IMPORT char VS_ADDRESS__30f7308738738b44; 
#define t61 void
typedef struct {
#line 58 "./Ctypes.i3"
   char* elts; int size[1]; } t29;
#line 48 "./M3toC.i3"
#define t16 t29
typedef struct { t4 elts[256]; } t18;
#line 48
#define TC1 TC_M3toC__Argv
IMPORT TYPE TC_M3toC__Argv;
#line 48
IMPORT char VS_M3toC__Argv__01eb9fa23b3b0c10;
#line 17 "./Ctypes.i3"
#define t3 ADDRESS
typedef double t43;
#line 17
#define TC3 TC_Ctypes__DoubleStar
IMPORT TYPE TC_Ctypes__DoubleStar;
#line 17
IMPORT char VS_Ctypes__DoubleStar__09a97cc036088f62;
#line 33
#define t6 ADDRESS
typedef float t8;
#line 33
#define TC6 TC_Ctypes__FloatStar
IMPORT TYPE TC_Ctypes__FloatStar;
#line 33
IMPORT char VS_Ctypes__FloatStar__6c7e0b722780a93f;
#line 21 "M3toC.m3"
#define t12 ADDRESS
typedef struct {
#line 18
 t4 _string; t2 _size; } t15;


PRIVATE void t12_PrintProc (); PRIVATE typecell t12_TC; PRIVATE typecell t12_TC_init = {0, 0, 0, 0, 0, (PROC)NIL,   8, 0, NIL,   0, 0, (PROC)NIL, (PROC)NIL, t12_PrintProc,
#line 21
  "", 1129098995, 1040586771}; PRIVATE TYPE TC12 = &t12_TC; 
#line 63 "./Ctypes.i3"
#define t30 ADDRESS
typedef short t49; typedef unsigned char t21;
#line 52 ".ROOT/.boots/corelib/Interfaces/Text.i3"
#define t24 t29
typedef struct { t21 elts[4096]; } t50;
#line 63 "./Ctypes.i3"
#define TC30 TC_Ctypes__String4096
IMPORT TYPE TC_Ctypes__String4096;
#line 63
IMPORT char VS_Ctypes__String4096__8d2ce04b3a64ff9f;
#line 62
#define t31 ADDRESS
typedef short t51;
#line 62
typedef struct { t21 elts[1024]; } t52; 
#define TC31 TC_Ctypes__String1024
IMPORT TYPE TC_Ctypes__String1024;
#line 62
IMPORT char VS_Ctypes__String1024__85fe08042cc88853;
#line 61
#define t32 ADDRESS
typedef struct { t21 elts[256]; } t53;
#line 61
#define TC32 TC_Ctypes__String256
IMPORT TYPE TC_Ctypes__String256;
#line 61
IMPORT char VS_Ctypes__String256__e84eeb8129c76f43;
#line 60
#define t33 ADDRESS
typedef signed_char t54;
#line 60
typedef struct { t21 elts[64]; } t55; 
#define TC33 TC_Ctypes__String64
IMPORT TYPE TC_Ctypes__String64;
#line 60
IMPORT char VS_Ctypes__String64__e232939e2f4ff601;
#line 59
#define t34 ADDRESS
typedef signed_char t56;
#line 59
typedef struct { t21 elts[16]; } t57; 
#define TC34 TC_Ctypes__String16
IMPORT TYPE TC_Ctypes__String16;
#line 59
IMPORT char VS_Ctypes__String16__46fccbf225a113eb;
#line 58
#define t35 ADDRESS
typedef signed_char t58;
#line 58
typedef struct { t21 elts[4]; } t59; 
#define TC35 TC_Ctypes__String4
IMPORT TYPE TC_Ctypes__String4;
#line 58
IMPORT char VS_Ctypes__String4__1ecbc452350ba764;
#line 52
#define t36 ADDRESS
typedef unsigned short t37;
#line 52
#define TC36 TC_Ctypes__UnsignedShortStar
IMPORT TYPE TC_Ctypes__UnsignedShortStar;
#line 52
IMPORT char VS_Ctypes__UnsignedShortStar__ba7321c22f5477f7;
#line 50
#define t38 ADDRESS
#define t39 ADDRESS
typedef short t40;
#line 49
#define TC39 TC_Ctypes__ShortStar
IMPORT TYPE TC_Ctypes__ShortStar;
#line 49
IMPORT char VS_Ctypes__ShortStar__ceeffab3338d5be6;
#define TC38 TC_Ctypes__ShortStarStar
IMPORT TYPE TC_Ctypes__ShortStarStar;
#line 50
IMPORT char VS_Ctypes__ShortStarStar__1827fd6f22a4a56a;
#line 46
#define t41 ADDRESS
#define TC41 TC_Ctypes__IntStar
IMPORT TYPE TC_Ctypes__IntStar;
#line 46
IMPORT char VS_Ctypes__IntStar__e39a77b6392d7c83;
#line 44
#define t42 ADDRESS
#define TC42 TC_Ctypes__IntStarStar
IMPORT TYPE TC_Ctypes__IntStarStar;
#line 44
IMPORT char VS_Ctypes__IntStarStar__a46afe5b32b9d475;
#line 26
#define t44 ADDRESS
#define TC44 TC_Ctypes__UnsignedCharStar
IMPORT TYPE TC_Ctypes__UnsignedCharStar;
#line 26
IMPORT char VS_Ctypes__UnsignedCharStar__5ba21f95225c580b;
#define t45 ADDRESS
#define TC45 TC_Ctypes__UnsignedCharStarStar
IMPORT TYPE TC_Ctypes__UnsignedCharStarStar;
#line 27
IMPORT char VS_Ctypes__UnsignedCharStarStar__64970e213b9e555a;
#line 24
#define t46 ADDRESS
#define t47 ADDRESS
#define TC47 TC_Ctypes__CharStarStar
IMPORT TYPE TC_Ctypes__CharStarStar;
#line 23
IMPORT char VS_Ctypes__CharStarStar__5cd33554337263a0;
#define TC46 TC_Ctypes__CharStarStarStar
IMPORT TYPE TC_Ctypes__CharStarStarStar;
#line 24
IMPORT char VS_Ctypes__CharStarStarStar__a792f1ad3925ee76; 
#define t65 ADDRESS
#define TC65 TC_REFANY
IMPORT TYPE TC_REFANY; IMPORT char VS_REFANY__4b8748e831fc107a; 
#define t66 ADDRESS
#define TC66 TC_NULL
IMPORT TYPE TC_NULL; IMPORT char VS_NULL__fb50c7d53bec30dc;
#line 84 "M3toC.m3"
typedef t3 (*t5)();
#line 78
typedef t6 (*t7)();
#line 72
typedef t8 (*t9)();
#line 66
typedef t2 (*t10)();
#line 60
typedef t4 (*t11)(); 
#define t13 ADDRESS
#define TC13 TC_TEXT
IMPORT TYPE TC_TEXT; IMPORT char VS_TEXT__b7a92447326386f5; 
#define t13_MapProc TC_TEXT->mapProc
typedef t13 (*t14)();
#line 67 ".ROOT/.boots/corelib/Interfaces/Text.i3"
typedef signed_char t19; typedef t19 (*t20)(); typedef unsigned char t22;
#line 55
typedef t22 (*t23)();
#line 49
typedef t61 (*t25)(); typedef int t26;
#line 26
typedef t26 (*t27)();
#line 23
typedef t21 (*t28)();
#line 19 "./Ctypes.i3"
typedef signed_char t48; typedef CLOSURE t60; 
#define t64 ADDRESS
 typedef struct { TYPE self; int private; } t64_methods; 
#define t64_msize (sizeof (t64_methods))
typedef struct { ADDRESS methods; } t64_fields; 
#define t64_size (sizeof (t64_fields))
#define TC64 TC_ROOT
IMPORT TYPE TC_ROOT; IMPORT char VS_ROOT__349f58f628be0ac6; 
#define t64_MapProc TC_ROOT->mapProc
#define t62 ADDRESS
#define TC62 TC_MUTEX
IMPORT TYPE TC_MUTEX; IMPORT char VS_MUTEX__1f9d4e89391ab815; 
#define t62_MapProc TC_MUTEX->mapProc
#define t63 ADDRESS
 typedef struct { TYPE self; int private; } t63_methods; 
#define t63_msize (sizeof (t63_methods))
typedef struct { ADDRESS methods; } t63_fields; 
#define t63_size (sizeof (t63_fields))
#define TC63 TC_UNTRACED_ROOT
IMPORT TYPE TC_UNTRACED_ROOT; IMPORT char VS_UNTRACED_ROOT__3e0964513fd6da20;
#line 10 "M3toC.m3"
IMPORT INITLINK* Text__init; IMPORT INITLINK* Cstring__init; IMPORT INITLINK* Ctypes__init; IMPORT INITLINK* M3toC__init;
#line 10
 IMPORT TYPE TC_Text__T; IMPORT char VS_Text__T__fc4b369f3ab271fd;   IMPORT TYPE TC_Ctypes__void_star; IMPORT char VS_Ctypes__void_star__19d3329e3120388d;
#line 10
IMPORT TYPE TC_Ctypes__const_void_star; IMPORT char VS_Ctypes__const_void_star__08cf56d720e0de78; IMPORT TYPE TC_Ctypes__const_char_star;
#line 10
IMPORT char VS_Ctypes__const_char_star__81d35d212987031d; IMPORT TYPE TC_Ctypes__char_star; IMPORT char VS_Ctypes__char_star__90cf39683847e5e8;
#line 10
IMPORT t2 strlen (); IMPORT char VSstrlen__605b084b3b840fdb;   IMPORT TYPE TC_Ctypes__CharStar; IMPORT char VS_Ctypes__CharStar__b572ca6529b36ad7;
#line 10
IMPORT TYPE TC_Ctypes__ConstCharStar; IMPORT char VS_Ctypes__ConstCharStar__37c477b630dfe7ea; IMPORT TYPE TC_Ctypes__ConstUnsignedCharStar;
#line 10
IMPORT char VS_Ctypes__ConstUnsignedCharStar__f525c9c3227353c4; IMPORT TYPE TC_Ctypes__UnsignedIntStar; IMPORT char VS_Ctypes__UnsignedIntStar__6d339fe62d80b701;
#line 10
IMPORT TYPE TC_Ctypes__LongStar; IMPORT char VS_Ctypes__LongStar__12d8d184219ae8d1; IMPORT TYPE TC_Ctypes__LongStarStar; IMPORT char VS_Ctypes__LongStarStar__27213362342d5591;
#line 10
IMPORT TYPE TC_Ctypes__UnsignedLongStar; IMPORT char VS_Ctypes__UnsignedLongStar__97de60e23d6e542a; IMPORT TYPE TC_Ctypes__Void;
#line 10
IMPORT char VS_Ctypes__Void__997514843af25a5a; IMPORT TYPE TC_Ctypes__VoidStar; IMPORT char VS_Ctypes__VoidStar__82afd9b23510125c;
#line 10
IMPORT TYPE TC_Ctypes__ConstVoidStar; IMPORT char VS_Ctypes__ConstVoidStar__001964612c7c9f61;   IMPORT t4 _M3toC__nullString;
#line 10
IMPORT char VS_M3toC__nullString__f51d6643329218d2; EXPORT t4 _M3toC__TtoS (); EXPORT char VS_M3toC__TtoS__f9cd287822393639 = '\0';
#line 10
EXPORT t13 _M3toC__StoT (); EXPORT char VS_M3toC__StoT__101c3d9d28a7443d = '\0'; EXPORT t4 _M3toC__ItoP (); EXPORT char VS_M3toC__ItoP__995b620c39131c2d = '\0';
#line 10
EXPORT t4 _M3toC__RtoP (); EXPORT char VS_M3toC__RtoP__d57d49003a12f8b0 = '\0'; EXPORT t4 _M3toC__UtoP (); EXPORT char VS_M3toC__UtoP__5eaa6999345213cd = '\0';
#line 10
EXPORT t2 _M3toC__PtoI (); EXPORT char VS_M3toC__PtoI__97df5943352a9a22 = '\0'; EXPORT t8 _M3toC__PtoR (); EXPORT char VS_M3toC__PtoR__3f4dd0cc200025f6 = '\0';
#line 10
EXPORT t6 _M3toC__PtoFS (); EXPORT char VS_M3toC__PtoFS__17bf90e82351646f = '\0'; EXPORT t3 _M3toC__PtoDS (); EXPORT char VS_M3toC__PtoDS__c83918323d847afc = '\0';
#line 10
IMPORT t2 _M3toC__argc; IMPORT char VS_M3toC__argc__f42210eb2023df94; IMPORT t4 _M3toC__adr_argc; IMPORT char VS_M3toC__adr_argc__202b033c3cead2b4;
#line 10
IMPORT t1 _M3toC__argv; IMPORT char VS_M3toC__argv__3c866cc820c0118f; IMPORT t4 _M3toC__null; IMPORT char VS_M3toC__null__c6cfbca534eaabf9;
#line 10
PRIVATE t2 _M3toC__zeroValue; PRIVATE TYPE TC_M3toC__M3Text; IMPORT t2 env_argc; IMPORT t1 env_argv;     
#line 24 "M3toC.m3"
 EXPORT t4 _M3toC__TtoS (_t) t13 _t; { t22 z2; t22 z0; t22 z3; t4 z1; t12 z4;
#line 24 "M3toC.m3"
{ auto t12 _tmp; auto t4 __result; {

      ZERO1  (& _tmp);
#line 24
      CHECKSTACKOVERFLOW;



      z2 = (_t == 0); z0 = 1; if (! z2) { z3 = (_t == NULLTEXT); z0 = z3; }; if (z0) {
         z1 = (char*)(& _M3toC__zeroValue); __result = z1; return __result; }; _tmp = (*((t12*)(& _t)));

         NILCHECKA (z4 = _tmp); __result = ((*((t15*) z4))._string); return __result; } } };
#line 36 "M3toC.m3"
 EXPORT t13 _M3toC__StoT (_s) t4 _s; { t12 z0; t12 z2; t2 z3; t2 z1;
#line 36 "M3toC.m3"
{ auto t12 _tmp; auto t13 __result; {

      ZERO1  (& _tmp);
#line 36
      ZERO1  (& __result); CHECKSTACKOVERFLOW;



      { register t15* ptr = (t15*) TNEW (TC12); z0 = (t12) ptr; }; _tmp = z0;
      NILCHECKA (z2 = _tmp); ((*((t15*) z2))._string) = _s;
      z3 = strlen (_s); z1 =  1  + z3; NILCHECKA (z2 = _tmp); ((*((t15*) z2))._size) = z1;
      __result = (*((t13*)(& _tmp))); return __result; } } };
#line 47 "M3toC.m3"
 EXPORT t4 _M3toC__ItoP (_t) t2 _t; {
#line 47 "M3toC.m3"
{ auto t4 __result; { CHECKSTACKOVERFLOW;

      __result = (*((t4*)(& _t))); return __result; } } };
#line 53 "M3toC.m3"
 EXPORT t4 _M3toC__RtoP (_t) t8 _t; {
#line 53 "M3toC.m3"
{ auto t4 __result; { CHECKSTACKOVERFLOW;

      __result = (*((t4*)(& _t))); return __result; } } };
#line 60 "M3toC.m3"
 EXPORT t4 _M3toC__UtoP (_t) t2 _t; {
#line 60 "M3toC.m3"
{ auto t4 __result; { CHECKSTACKOVERFLOW;

      __result = (*((t4*)(& _t))); return __result; } } };
#line 66 "M3toC.m3"
 EXPORT t2 _M3toC__PtoI (_t) t4 _t; {
#line 66 "M3toC.m3"
{ auto t2 __result; { CHECKSTACKOVERFLOW;

      __result = (*((t2*)(& _t))); return __result; } } };
#line 72 "M3toC.m3"
 EXPORT t8 _M3toC__PtoR (_t) t4 _t; {
#line 72 "M3toC.m3"
{ auto t8 __result; { ZERO1  (& __result); CHECKSTACKOVERFLOW;

      __result = (*((t8*)(& _t))); return __result; } } };
#line 78 "M3toC.m3"
 EXPORT t6 _M3toC__PtoFS (_t) t4 _t; {
#line 78 "M3toC.m3"
{ auto t6 __result; { CHECKSTACKOVERFLOW;

      __result = (*((t6*)(& _t))); return __result; } } };
#line 84 "M3toC.m3"
 EXPORT t3 _M3toC__PtoDS (_t) t4 _t; {
#line 84 "M3toC.m3"
{ auto t3 __result; { CHECKSTACKOVERFLOW;

      __result = (*((t3*)(& _t))); return __result; } } };  PRIVATE int init_done = -1;
#line 100 "M3toC.m3"
 PRIVATE void M3toC__initProc (g) int g; { t4 z1; t4 z2;
#line 100 "M3toC.m3"
if (init_done >= g) return; init_done = g; INITIALIZE (& M3toC__init); INITIALIZE (& Text__init); INITIALIZE (& Cstring__init);
#line 100
INITIALIZE (& Ctypes__init);
#line 15
ZERO1  ((& _M3toC__zeroValue));
#line 95
_M3toC__argc = env_argc;
z1 = (char*)(& env_argc); _M3toC__adr_argc = z1;
_M3toC__argv = env_argv;

z2 = _M3toC__TtoS (NULLTEXT); _M3toC__null = z2;
z1 = (char*)(& _M3toC__zeroValue); _M3toC__nullString = z1; return; }; 
#line 100 "M3toC.m3"
PRIVATE void t12_PrintProc (ref) t15* ref; { CHECKSTACKOVERFLOW; fprintf (stderr, "%s {", TC12->brand); fprintf (stderr, "^ = { ");
#line 100
   fprintf (stderr, "string = %#x", (*ref)._string); fprintf (stderr, "size = %d", (*ref)._size); fprintf (stderr, "}"); fprintf (stderr, "}\n");
#line 100
 };   PRIVATE INITLINK me_0 ={(INITLINK*)NIL, 0, M3toC__initProc}; static char* VSimports[] = { &VS_Text__T__fc4b369f3ab271fd,
   &VS_Ctypes__void_star__19d3329e3120388d, &VS_Ctypes__const_void_star__08cf56d720e0de78, &VS_Ctypes__const_char_star__81d35d212987031d,
   &VS_Ctypes__char_star__90cf39683847e5e8, &VS_Ctypes__DoubleStar__09a97cc036088f62, &VS_Ctypes__CharStar__b572ca6529b36ad7,
   &VS_Ctypes__CharStarStar__5cd33554337263a0, &VS_Ctypes__CharStarStarStar__a792f1ad3925ee76, &VS_Ctypes__UnsignedCharStar__5ba21f95225c580b,
   &VS_Ctypes__UnsignedCharStarStar__64970e213b9e555a, &VS_Ctypes__ConstCharStar__37c477b630dfe7ea, &VS_Ctypes__ConstUnsignedCharStar__f525c9c3227353c4,
   &VS_Ctypes__FloatStar__6c7e0b722780a93f, &VS_Ctypes__IntStar__e39a77b6392d7c83, &VS_Ctypes__IntStarStar__a46afe5b32b9d475,
   &VS_Ctypes__UnsignedIntStar__6d339fe62d80b701, &VS_Ctypes__LongStar__12d8d184219ae8d1, &VS_Ctypes__LongStarStar__27213362342d5591,
   &VS_Ctypes__UnsignedLongStar__97de60e23d6e542a, &VS_Ctypes__ShortStar__ceeffab3338d5be6, &VS_Ctypes__ShortStarStar__1827fd6f22a4a56a,
   &VS_Ctypes__UnsignedShortStar__ba7321c22f5477f7, &VS_Ctypes__Void__997514843af25a5a, &VS_Ctypes__VoidStar__82afd9b23510125c,
   &VS_Ctypes__ConstVoidStar__001964612c7c9f61, &VS_Ctypes__String4__1ecbc452350ba764, &VS_Ctypes__String16__46fccbf225a113eb,
   &VS_Ctypes__String64__e232939e2f4ff601, &VS_Ctypes__String256__e84eeb8129c76f43, &VS_Ctypes__String1024__85fe08042cc88853,
   &VS_Ctypes__String4096__8d2ce04b3a64ff9f, &VS_Ctypes__char_star__90cf39683847e5e8, &VS_Ctypes__const_char_star__81d35d212987031d,
   &VS_Ctypes__void_star__19d3329e3120388d, &VS_Ctypes__const_void_star__08cf56d720e0de78, &VS_M3toC__nullString__f51d6643329218d2,
   &VS_M3toC__Argv__01eb9fa23b3b0c10, &VS_M3toC__argc__f42210eb2023df94, &VS_M3toC__adr_argc__202b033c3cead2b4, &VS_M3toC__argv__3c866cc820c0118f,
   &VS_M3toC__null__c6cfbca534eaabf9, NIL };  void M3toC__MLink (phase) int phase; { switch (phase) { case 0: { me_0.link = M3toC__init; M3toC__init = & me_0; t12_TC = t12_TC_init;
         REGISTERTYPE (TC12); break; }; case 1: { break; }; case 2: { break; }; }; };