#include "M3Runtime.h"

typedef struct { int tc; char* str; int len; } TXT; PRIVATE TXT txt1 = { 3, "missing case", 13}; PRIVATE TXT txt2 = { 3, "invalid expression type for case selector", 42};
PRIVATE TXT txt3 = { 3, "CASE statement does not handle all possible values", 51 }; PRIVATE TXT txt4 = { 3, "case labels out of range", 25};
PRIVATE TXT txt5 = { 3, "case label must be constant", 28}; PRIVATE TXT txt6 = { 3, "case label not compatible with selector", 40};
PRIVATE TXT txt7 = { 3, "duplicate labels in case statement", 35}; PRIVATE TXT txt8 = { 3, "switch (@) {\012", 14}; PRIVATE TXT txt9 = { 3, "case @:\012", 9};
PRIVATE TXT txt10 = { 3, "\001", 2}; PRIVATE TXT txt11 = { 3, "break;\012", 8}; PRIVATE TXT txt12 = { 3, "\002", 2}; PRIVATE TXT txt13 = { 3, "default: /**/;\012\001", 17};
PRIVATE TXT txt14 = { 3, "CASEFAULT;\012", 12}; PRIVATE TXT txt15 = { 3, "\002};\012", 5}; PRIVATE TXT txt16 = { 3, "{\001\012register t@ ", 16};
PRIVATE TXT txt17 = { 3, "e = @;\012", 8}; PRIVATE TXT txt18 = { 3, "if (e < @) goto c@_else;\012", 26}; PRIVATE TXT txt19 = { 3, "if (e <= @) goto c@_@;\012", 24};
PRIVATE TXT txt20 = { 3, "goto c@_else;\012", 15}; PRIVATE TXT txt21 = { 3, "c@_@:;\012\001", 9}; PRIVATE TXT txt22 = { 3, "goto c@_exit;\012", 15};
PRIVATE TXT txt23 = { 3, "c@_else:;\012\001", 12}; PRIVATE TXT txt24 = { 3, "c@_exit: /* exit */;\012", 22};
#line 41 "CaseStmt.m3"
#define t2 ADDRESS
#define t65 ADDRESS
 
#define t84 void
typedef struct { TYPE self; int private; } t65_methods; 
#define t65_msize (sizeof (t65_methods))
typedef struct { ADDRESS methods; } t65_fields; 
#define t65_size (sizeof (t65_fields))
#define TC65 TC_UNTRACED_ROOT
IMPORT TYPE TC_UNTRACED_ROOT; IMPORT char VS_UNTRACED_ROOT__3e0964513fd6da20;
#line 16 "../Interfaces/M3.i3"
#define t12 ADDRESS
#define TC12 TC_M3__Expr
IMPORT TYPE TC_M3__Expr;
#line 16
IMPORT char VS_M3__Expr__8ae39aaa2d432477; typedef int t1;
#line 33 "CaseStmt.m3"
typedef struct { t2 _less; t2 _greater; t12 _emin; t12 _emax; t1 _min; t1 _max; t1 _body; } t20;







PRIVATE void t2_PrintProc (); PRIVATE typecell t2_TC; PRIVATE typecell t2_TC_init = {0, 0, 0, 0, 0, (PROC)NIL,   28, 0, NIL,   0, 0, (PROC)NIL, (PROC)NIL, t2_PrintProc,
#line 41
  "", 1119598456, 589871196}; PRIVATE TYPE TC2 = &t2_TC; 


#define t14 ADDRESS
#define t17 ADDRESS
#define TC17 TC_M3__Stmt
IMPORT TYPE TC_M3__Stmt;
#line 17 "../Interfaces/M3.i3"
IMPORT char VS_M3__Stmt__376b307627fc1f2f;
#line 116 ".ROOT/.boots/corelib/Interfaces/Wr.i3"
typedef struct { char* elts; int size[1]; } t72;
#line 44 "CaseStmt.m3"
#define t19 t72
PRIVATE void t14_PrintProc ();
#line 44
PRIVATE typecell t14_TC; PRIVATE typecell t14_TC_init = {0, 0, 0, 0, 0, (PROC)NIL,   -2, 0, NIL, 1, 4, (PROC)NIL, (PROC)NIL, t14_PrintProc,
#line 44
  "", 1265883080, 675416200}; PRIVATE TYPE TC14 = &t14_TC;  
#define t33 ADDRESS
#define TC33 TC_REFANY
IMPORT TYPE TC_REFANY; IMPORT char VS_REFANY__4b8748e831fc107a;
#line 17 "../Interfaces/Scope.i3"
#define t45 ADDRESS
#define t39 ADDRESS
#define TC39 TC_M3__Value
IMPORT TYPE TC_M3__Value;
#line 15 "../Interfaces/M3.i3"
IMPORT char VS_M3__Value__6f64cf9c2cae25fb;
#line 17 "../Interfaces/Scope.i3"
#define t49 t72
#define TC45 TC_Scope__ValueList
IMPORT TYPE TC_Scope__ValueList;
#line 17
IMPORT char VS_Scope__ValueList__64bf053e22e4e53c;
#line 16 "../Interfaces/Type.i3"
#define t53 ADDRESS
#define t62 t72
#define TC53 TC_Type__Map
IMPORT TYPE TC_Type__Map;
#line 16
IMPORT char VS_Type__Map__41dd9f4b33104fce;
#line 14 "../Interfaces/Expr.i3"
#define t57 ADDRESS
#define t58 t72
#define TC57 TC_Expr__List
IMPORT TYPE TC_Expr__List;
#line 14
IMPORT char VS_Expr__List__3f87eceb2b9a246a;
#line 17 "../Interfaces/Type.i3"
#define t60 ADDRESS
#define t11 ADDRESS
#define TC11 TC_M3__Type
IMPORT TYPE TC_M3__Type;
#line 18 "../Interfaces/M3.i3"
IMPORT char VS_M3__Type__4d87bc25311f81d2;
#line 17 "../Interfaces/Type.i3"
typedef struct { t60 _next; t11 _type; } t61; 
#define TC60 TC_Type__List
IMPORT TYPE TC_Type__List;
#line 17
IMPORT char VS_Type__List__5791758e343becc1; 
#define t64 ADDRESS
#define TC64 TC_ADDRESS
IMPORT TYPE TC_ADDRESS; IMPORT char VS_ADDRESS__30f7308738738b44; 
#define t85 ADDRESS
#define TC85 TC_NULL
IMPORT TYPE TC_NULL; IMPORT char VS_NULL__fb50c7d53bec30dc;
#line 363 "CaseStmt.m3"
typedef t2 (*t3)(); typedef unsigned char t4;
#line 16 "./Stmt.i3"
typedef unsigned char t63;
typedef struct { int elts[1]; } t5;
#line 19 "../Interfaces/M3.i3"
#define t6 ADDRESS
#define TC6 TC_M3__Temp
IMPORT TYPE TC_M3__Temp;
#line 19
IMPORT char VS_M3__Temp__450b691937f03dae;
#line 17 "CaseStmt.m3"
#define t7 ADDRESS

#line 38 "../Interfaces/Scanner.i3"
typedef t84 (*t9)();
#line 20 "./StmtRep.i3"
typedef void (*t8)();
#line 17 "CaseStmt.m3"
typedef struct { int filler; } t7_methods; 
#define t7_msize (sizeof (t7_methods))
typedef struct {
#line 17
 t12 _expr; t2 _tree; t14 _bodies; t4 _complete; t4 _else; t17 _elseBody; t1 _nCases; } t7_fields; 
#define t7_size (sizeof (t7_fields))
PRIVATE void t7_InitProc ();
#line 17
PRIVATE void t7_SetupProc (); PRIVATE void t7_PrintProc (); PRIVATE typecell t7_TC; PRIVATE typecell t7_TC_init = {0, 0, 0, 0, 0, (PROC)NIL,
#line 17
  t7_size, t7_msize, NIL, 0, 0, t7_InitProc,   t7_SetupProc,   t7_PrintProc, "", -95448223, 551397097}; PRIVATE TYPE TC7 = &t7_TC; 
#line 211
typedef t4 (*t10)();
#line 180
typedef t1 (*t13)();
#line 15 "../Interfaces/Token.i3"
typedef unsigned char t16;
#line 45
typedef struct { int elts[4]; } t15;
#line 50 "CaseStmt.m3"
typedef t17 (*t18)(); 
#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_ROOT
IMPORT TYPE TC_ROOT; IMPORT char VS_ROOT__349f58f628be0ac6; 
#define t34_MapProc TC_ROOT->mapProc
#define t21 ADDRESS
#define TC21 TC_Rd__T
IMPORT TYPE TC_Rd__T;
#line 83 ".ROOT/.boots/corelib/Interfaces/Rd.i3"
IMPORT char VS_Rd__T__2555b70b3f7780b1; 
#define t21_MapProc TC_Rd__T->mapProc
#define t22 ADDRESS
#define TC22 TC_String__T
IMPORT TYPE TC_String__T;
#line 13 "../Interfaces/String.i3"
IMPORT char VS_String__T__3a6c7dc12615e4ee; 
#define t23 ADDRESS
#define TC23 TC_TEXT
IMPORT TYPE TC_TEXT; IMPORT char VS_TEXT__b7a92447326386f5; 
#define t23_MapProc TC_TEXT->mapProc
typedef t22 (*t24)();
#line 13 "../Interfaces/Scanner.i3"
typedef struct { t16 _token; t22 _string; t1 _value; t1 _offset; } t25; typedef int t26;
#line 249 ".ROOT/.boots/corelib/Interfaces/Rd.i3"
typedef t26 (*t27)();
#line 220
typedef t23 (*t28)(); typedef unsigned char t29;
#line 189
#define t30 t72
typedef t29 (*t31)();
#line 84
typedef unsigned char t32;
#line 27 "../Interfaces/Emit.i3"
typedef signed_char t35;
#line 63
typedef t35 (*t36)();
#line 19 "../Interfaces/String.i3"
typedef signed_char t68;
#line 65 "../Interfaces/Token.i3"
#define t66 t72
typedef struct { t22 elts[100]; } t69;
#line 17 "../Interfaces/String.i3"
typedef struct { t1 _top; t69 _stk; } t37;
#line 16 "../Interfaces/Variable.i3"
#define t38 ADDRESS
#define TC38 TC_Variable__T
IMPORT TYPE TC_Variable__T;
#line 16
IMPORT char VS_Variable__T__be7ead4a3afd8be5; typedef double t40;
#line 14 "../Interfaces/M3.i3"
#define t41 ADDRESS
#define TC41 TC_M3__Scope
IMPORT TYPE TC_M3__Scope;
#line 14
IMPORT char VS_M3__Scope__6e6d8848308d8a2d;
#line 38 "../Interfaces/Variable.i3"
typedef t6 (*t42)();
#line 24
typedef t38 (*t43)();
#line 14 "../Interfaces/Decl.i3"
typedef struct { t22 _alias; t4 _isExternal; t4 _isInline; t4 _isUnused; t4 _isObsolete; } t44;
#line 14 "../Interfaces/String.i3"
typedef struct { t22 _module; t22 _item; } t46;
#line 38 "../Interfaces/Scope.i3"
typedef t39 (*t47)();
#line 31
typedef t41 (*t48)();
#line 12 "../Interfaces/IntegerExpr.i3"
typedef t12 (*t50)();
#line 45 "../Interfaces/Value.i3"
typedef t11 (*t51)();
#line 90 ".ROOT/.boots/corelib/Interfaces/Wr.i3"
#define t52 ADDRESS
#define TC52 TC_Wr__T
IMPORT TYPE TC_Wr__T;
#line 90
IMPORT char VS_Wr__T__2555b70b3f7780b1; 
#define t52_MapProc TC_Wr__T->mapProc
typedef unsigned char t54;
#line 40 "../Interfaces/Value.i3"
typedef t54 (*t55)();
#line 13 "./StmtRep.i3"
#define t56 ADDRESS

#line 13
typedef struct { t9 _bind; t9 _check; t9 _precompile; t8 _compile; } t56_methods; 
#define t56_msize (sizeof (t56_methods))
typedef struct {
#line 13
 t17 _next; t1 _origin; } t56_fields; 
#define t56_size (sizeof (t56_fields))
#define TC56 TC_M3__Stmt
typedef t53 (*t59)();
#line 65 "../Interfaces/Token.i3"
typedef struct { t22 elts[97]; } t67;
#line 67 ".ROOT/.boots/corelib/Interfaces/Text.i3"
typedef signed_char t70; typedef t70 (*t71)();
#line 91 ".ROOT/.boots/corelib/Interfaces/Wr.i3"
typedef unsigned char t73;
#line 15 ".ROOT/.boots/corelib/Interfaces/Thread.i3"
#define t74 ADDRESS
#define TC74 TC_Thread__T
IMPORT TYPE TC_Thread__T;
#line 15
IMPORT char VS_Thread__T__2555b70b3f7780b1; 
#define t74_MapProc TC_Thread__T->mapProc
typedef t33 (*t75)();



#define t76 ADDRESS
#define TC76 TC_Thread__Condition
IMPORT TYPE TC_Thread__Condition;
#line 21
IMPORT char VS_Thread__Condition__26d5968239e08f4e; 
#define t76_MapProc TC_Thread__Condition->mapProc
#define t77 ADDRESS
#define TC77 TC_MUTEX
IMPORT TYPE TC_MUTEX; IMPORT char VS_MUTEX__1f9d4e89391ab815; 
#define t77_MapProc TC_MUTEX->mapProc
typedef t74 (*t78)();
#line 23
#define t79 ADDRESS

#line 23
typedef struct { t75 _apply; } t79_methods; 
#define t79_msize (sizeof (t79_methods))
typedef struct {
#line 23
 int filler; } t79_fields; 
#define t79_size (sizeof (t79_fields))
#define TC79 TC_Thread__Closure
IMPORT TYPE TC_Thread__Closure;
#line 23
IMPORT char VS_Thread__Closure__7fb5c6232c5a658a; 
#define t79_MapProc TC_Thread__Closure->mapProc
typedef t76 (*t80)();





typedef t77 (*t81)();
#line 28
#define t82 ADDRESS

#line 28
typedef struct { int filler; } t82_methods; 
#define t82_msize (sizeof (t82_methods))
typedef struct {
#line 28
 t26 _stackSize; } t82_fields; 
#define t82_size (sizeof (t82_fields))
#define TC82 TC_Thread__SizedClosure
IMPORT TYPE TC_Thread__SizedClosure;
#line 28
IMPORT char VS_Thread__SizedClosure__8a46717d2eae7b07; 
#define t82_MapProc TC_Thread__SizedClosure->mapProc
typedef CLOSURE t83; typedef float t86;
#line 10 "CaseStmt.m3"
IMPORT INITLINK* Scanner__init; IMPORT INITLINK* Emit__init; IMPORT INITLINK* IntegerExpr__init; IMPORT INITLINK* Token__init;
#line 10
IMPORT INITLINK* Temp__init; IMPORT INITLINK* EnumExpr__init; IMPORT INITLINK* Target__init; IMPORT INITLINK* Error__init;
#line 10
IMPORT INITLINK* Type__init; IMPORT INITLINK* StmtRep__init; IMPORT INITLINK* Stmt__init; IMPORT INITLINK* Expr__init; IMPORT INITLINK* CaseStmt__init;
#line 10
 IMPORT t25 _Scanner__cur; IMPORT char VS_Scanner__cur__929fa6f8367ea415; IMPORT t1 _Scanner__offset; IMPORT char VS_Scanner__offset__dfc05f042d8347f4;
#line 10
IMPORT t84 _Scanner__Match (); IMPORT char VS_Scanner__Match__aaf5b32f2f19a6d8; IMPORT t84 _Scanner__GetToken (); IMPORT char VS_Scanner__GetToken__192100a32c7e576d;
#line 10
IMPORT t84 _Scanner__Fail (); IMPORT char VS_Scanner__Fail__a15a8cf32391aa62;   IMPORT char VS_Emit__MaxStream__cf0a0e8934c9c9f3;
#line 10
IMPORT TYPE TC_Emit__Format; IMPORT char VS_Emit__Format__bc4a2b083b93bbd7; IMPORT t84 _Emit__Op (); IMPORT char VS_Emit__Op__072646cc27c8ae10;
#line 10
IMPORT t84 _Emit__OpI (); IMPORT char VS_Emit__OpI__02cb878634bb9f49; IMPORT t84 _Emit__OpII (); IMPORT char VS_Emit__OpII__2247fe46332f901b;
#line 10
IMPORT t84 _Emit__OpIII (); IMPORT char VS_Emit__OpIII__346a6aee3776eadb; IMPORT t84 _Emit__OpT (); IMPORT char VS_Emit__OpT__764bdffe21d249e8;
#line 10
  IMPORT t4 _IntegerExpr__Split (); IMPORT char VS_IntegerExpr__Split__132919062838cba6;   IMPORT t15 _Token__DeclStart; IMPORT char VS_Token__DeclStart__730c82bc2c2001b8;
#line 10
IMPORT t15 _Token__TypeStart; IMPORT char VS_Token__TypeStart__f71616cb38a20d02; IMPORT t15 _Token__ExprStart; IMPORT char VS_Token__ExprStart__21dc8a0a27344836;
#line 10
IMPORT t15 _Token__StmtStart; IMPORT char VS_Token__StmtStart__d5f1dc8e390e874c;   IMPORT TYPE TC_Temp__T; IMPORT char VS_Temp__T__3a6c7dc12615e4ee;
#line 10
IMPORT t84 _Temp__Free (); IMPORT char VS_Temp__Free__3b952a2225c26846;   IMPORT t4 _EnumExpr__Split (); IMPORT char VS_EnumExpr__Split__cac875982d1549f5;
#line 10
  IMPORT char VS_Target__MAXINT__6ffcde5a2f0f51a2; IMPORT char VS_Target__MININT__62f667293f10b631;   IMPORT t84 _Error__Msg ();
#line 10
IMPORT char VS_Error__Msg__4d119a332467757f; IMPORT t84 _Error__Warn (); IMPORT char VS_Error__Warn__38cf6ace3df14804;   IMPORT TYPE TC_Type__T;
#line 10
IMPORT char VS_Type__T__2446b70b3f7780a5; IMPORT t1 _Type__Number (); IMPORT char VS_Type__Number__f5ca10923ed3cf22; IMPORT t84 _Type__GetBounds ();
#line 10
IMPORT char VS_Type__GetBounds__9a241b2b3c98ad98; IMPORT t1 _Type__Name (); IMPORT char VS_Type__Name__f99416972257a869; IMPORT t4 _Type__IsSubtype ();
#line 10
IMPORT char VS_Type__IsSubtype__8591fba5245cb882;   IMPORT t84 _StmtRep__Init (); IMPORT char VS_StmtRep__Init__fe14377c36e397de;
#line 10
  IMPORT TYPE TC_Stmt__T; IMPORT char VS_Stmt__T__2446b70b3f7780a5; IMPORT t17 _Stmt__Parse (); IMPORT char VS_Stmt__Parse__35df10ad3fd1dfe6;
#line 10
IMPORT t84 _Stmt__Bind (); IMPORT char VS_Stmt__Bind__55f2c79a304c25df; IMPORT t84 _Stmt__TypeCheck (); IMPORT char VS_Stmt__TypeCheck__e228c94928564a9d;
#line 10
IMPORT t84 _Stmt__Precompile (); IMPORT char VS_Stmt__Precompile__68dddedb3aa69659; IMPORT void _Stmt__Compile (); IMPORT char VS_Stmt__Compile__53f9f2c43edb087a;
#line 10
  IMPORT TYPE TC_Expr__T; IMPORT char VS_Expr__T__2446b70b3f7780a5; IMPORT t12 _Expr__Parse (); IMPORT char VS_Expr__Parse__193c41662e6da77f;
#line 10
IMPORT t84 _Expr__Bind (); IMPORT char VS_Expr__Bind__7e2752da3eaf56eb; IMPORT t11 _Expr__TypeOf (); IMPORT char VS_Expr__TypeOf__fef0a11b388c64fa;
#line 10
IMPORT t12 _Expr__ConstValue (); IMPORT char VS_Expr__ConstValue__ce4fd448218fe483; IMPORT t84 _Expr__GetBounds (); IMPORT char VS_Expr__GetBounds__b20ec781333da5e4;
#line 10
IMPORT t84 _Expr__TypeCheck (); IMPORT char VS_Expr__TypeCheck__af9aa9073729e7f7; IMPORT t6 _Expr__Compile (); IMPORT char VS_Expr__Compile__a7e0cc4029a2ec76;
#line 10
  EXPORT t17 _CaseStmt__Parse (); EXPORT char VS_CaseStmt__Parse__e3c2900e2f4a9b42 = '\0'; PRIVATE TYPE TC_CaseStmt__P; PRIVATE TYPE TC_CaseStmt__Tree;
#line 10
PRIVATE TYPE TC_CaseStmt__StmtList; PRIVATE t1 _CaseStmt__nextID; PRIVATE t1 _CaseStmt__nest; PRIVATE t84 _CaseStmt__ParseCase ();
#line 10
PRIVATE t84 _CaseStmt__ExpandBodies (); PRIVATE t84 _CaseStmt__Bind (); PRIVATE t84 _CaseStmt__Check (); PRIVATE t2 _CaseStmt__AddNode ();
#line 10
PRIVATE t1 _CaseStmt__CheckLabel (); PRIVATE t2 _CaseStmt__AddToTree (); PRIVATE t4 _CaseStmt__CompleteTree (); PRIVATE t84 _CaseStmt__Precompile ();
#line 10
PRIVATE void _CaseStmt__Compile (); PRIVATE t2 _CaseStmt__FlattenTree (); PRIVATE void _CaseStmt__GenIndexedBranch (); PRIVATE void _CaseStmt__GenIfTable ();
#line 10
PRIVATE t2 _CaseStmt__CollapseTree ();  IMPORT char VS_M3__Stmt__8851da472c4ee5cd;    
#line 50 "CaseStmt.m3"
 EXPORT t17 _CaseStmt__Parse (_fail) t15 * _fail; { t7 z0; t14 z1; t7 z2; t15 z3; t1 z4; t15 z5; t12 z6; t4 z7; t17 z8;
#line 50 "CaseStmt.m3"
{ auto t7 _p; auto t4 _bar; auto t17 __result; {

      ZERO1  (& _p); ZERO1B (& _bar);
#line 50
      CHECKSTACKOVERFLOW;



      { register char** ptr = (char**) UNEWOBJ (TC7); z0 = (t7) ptr; }; _p = z0;
      _StmtRep__Init (_p);
      { register t72* ptr; int sz[1]; sz[0] =  8 ; ptr = (t72*) UNEWA(TC14, 8 + sz[0] * 4); ptr->elts = (char*)(& ptr->size[1]);
#line 56
         ptr->size[0] = sz[0]; z1 = (t14) ptr; }; NILCHECKA (z2 = _p); (((t7_fields*)(z2+(0+t56_size+t65_size)))->_bodies) = z1;

      z3.elts [0] = 0x80000000; z3.elts [1] = 0x00200000; z3.elts [2] = 0x00000200; z3.elts [3] = 0; z5 = z3; _Scanner__Match ( 47 , &(*_fail), &z5);
      z3.elts [0] = 0x80000000; z3.elts [1] = 0x00200000; z3.elts [2] = 0x00000200; z3.elts [3] = 0; z5.elts[0] = (*_fail).elts[0] | z3.elts[0];
#line 59
      z5.elts[1] = (*_fail).elts[1] | z3.elts[1]; z5.elts[2] = (*_fail).elts[2] | z3.elts[2]; z5.elts[3] = (*_fail).elts[3] | z3.elts[3];
#line 59
      z3 = z5; z6 = _Expr__Parse (&z3); NILCHECKA (z2 = _p); (((t7_fields*)(z2+(0+t56_size+t65_size)))->_expr) = z6;
      z3.elts [0] = 0x80000000; z3.elts [1] = 0x00280000; z3.elts [2] = 0; z3.elts [3] = 0; z5 = z3; _Scanner__Match ( 73 , &(*_fail), &z5);
      z7 = ((_Scanner__cur._token) ==  31 ); _bar = z7;
      if (_bar) { _Scanner__GetToken (); goto if_1_end; }; if_1_end: /**/;
      loop_0:; z7 = ((_Scanner__cur._token) ==  51 );
         if (z7) { goto loop_exit_0; };
         z7 = ((_Scanner__cur._token) ==  53 ); if (z7) { goto loop_exit_0; };
         _bar =  0 ;
         z3.elts [0] = 0; z3.elts [1] = 0x00280000; z3.elts [2] = 0; z3.elts [3] = 0; z5.elts[0] = (*_fail).elts[0] | z3.elts[0];
#line 67
         z5.elts[1] = (*_fail).elts[1] | z3.elts[1]; z5.elts[2] = (*_fail).elts[2] | z3.elts[2]; z5.elts[3] = (*_fail).elts[3] | z3.elts[3];
#line 67
         z3 = z5; _CaseStmt__ParseCase (_p, &z3);
         z7 = ((_Scanner__cur._token) !=  31 ); if (z7) { goto loop_exit_0; };
         _Scanner__GetToken (); goto loop_0; loop_exit_0: /**/;

      if (_bar) {
         z3.elts [0] = 0; z3.elts [1] = 0x00280000; z3.elts [2] = 0; z3.elts [3] = 0; z5.elts[0] = (*_fail).elts[0] | z3.elts[0];
#line 72
         z5.elts[1] = (*_fail).elts[1] | z3.elts[1]; z5.elts[2] = (*_fail).elts[2] | z3.elts[2]; z5.elts[3] = (*_fail).elts[3] | z3.elts[3];
#line 72
         z3 = z5; _Scanner__Fail (((ADDRESS)(& txt1.str)), &z3); goto if_5_end; }; if_5_end: /**/;

      z7 = ((_Scanner__cur._token) ==  51 ); if (z7) {
         _Scanner__GetToken ();
         NILCHECKA (z2 = _p); (((t7_fields*)(z2+(0+t56_size+t65_size)))->_else) =  1 ;
         z3.elts [0] = 0; z3.elts [1] = 0x00200000; z3.elts [2] = 0; z3.elts [3] = 0; z5.elts[0] = (*_fail).elts[0] | z3.elts[0];
#line 77
         z5.elts[1] = (*_fail).elts[1] | z3.elts[1]; z5.elts[2] = (*_fail).elts[2] | z3.elts[2]; z5.elts[3] = (*_fail).elts[3] | z3.elts[3];
#line 77
         z3 = z5; z8 = _Stmt__Parse (&z3); NILCHECKA (z2 = _p); (((t7_fields*)(z2+(0+t56_size+t65_size)))->_elseBody) = z8;
#line 77
         goto if_6_end; }; if_6_end: /**/;

      z3.elts [0] = 0; z3.elts [1] = 0; z3.elts [2] = 0; z3.elts [3] = 0; z5 = z3; _Scanner__Match ( 53 , &(*_fail), &z5);

      __result = _p; return __result; } } };
#line 84 "CaseStmt.m3"
 PRIVATE t84 _CaseStmt__ParseCase (_p, _fail) t7 _p; t15 * _fail; { t15 z1; t1 z2; t15 z3; t2 z0; t7 z4; t2 z5; t12 z6; t4 z7;
t15 z8; t14 z9; t17 z10; t1 z11; t1 z12;
#line 84 "CaseStmt.m3"
{ auto t2 _t; auto t15 _fail2; { CHECKSTACKOVERFLOW;



      z1.elts [0] = 0x04004000; z1.elts [1] = 0x00000002; z1.elts [2] = 0; z1.elts [3] = 0; z3.elts[0] = (*_fail).elts[0] | z1.elts[0];
#line 88
      z3.elts[1] = (*_fail).elts[1] | z1.elts[1]; z3.elts[2] = (*_fail).elts[2] | z1.elts[2]; z3.elts[3] = (*_fail).elts[3] | z1.elts[3];
#line 88
      _fail2.elts[0] = z3.elts[0]; _fail2.elts[1] = z3.elts[1]; _fail2.elts[2] = z3.elts[2]; _fail2.elts[3] = z3.elts[3];
      loop_1:; {
            register t20* ptr = (t20*) UNEW (TC2); z0 = (t2) ptr; }; _t = z0;
         NILCHECKA (z4 = _p); NILCHECKA (z5 = _t); ((*((t20*) z5))._less) = (((t7_fields*)(z4+(0+t56_size+t65_size)))->_tree);
#line 91
         NILCHECKA (z4 = _p); (((t7_fields*)(z4+(0+t56_size+t65_size)))->_tree) = _t;
         NILCHECKA (z5 = _t); ((*((t20*) z5))._greater) = (t2) 0;
         z6 = _Expr__Parse (&_fail2); NILCHECKA (z5 = _t); ((*((t20*) z5))._emin) = z6;
         NILCHECKA (z5 = _t); ((*((t20*) z5))._emax) = (t12) 0;
         NILCHECKA (z4 = _p); NILCHECKA (z5 = _t); ((*((t20*) z5))._body) = (((t7_fields*)(z4+(0+t56_size+t65_size)))->_nCases);
         z7 = ((_Scanner__cur._token) ==  26 ); if (z7) {
            _Scanner__GetToken ();
            z6 = _Expr__Parse (&_fail2); NILCHECKA (z5 = _t); ((*((t20*) z5))._emax) = z6; goto if_7_end; }; if_7_end: /**/;

         z7 = ((_Scanner__cur._token) !=  14 ); if (z7) { goto loop_exit_1; };
         _Scanner__GetToken (); goto loop_1; loop_exit_1: /**/;

      z8 = _Token__StmtStart; _Scanner__Match ( 33 , &(*_fail), &z8);
      NILCHECKA (z4 = _p); NILCHECKB (z9 = (((t7_fields*)(z4+(0+t56_size+t65_size)))->_bodies)); z2 = (*((t19*) z9)).size[0] - 1;
#line 104
      z7 = ((((t7_fields*)(z4+(0+t56_size+t65_size)))->_nCases) > z2); if (z7) { _CaseStmt__ExpandBodies (_p); goto if_9_end;
#line 104
 }; if_9_end: /**/;
      z10 = _Stmt__Parse (&(*_fail)); NILCHECKA (z4 = _p); NILCHECKB (z9 = (((t7_fields*)(z4+(0+t56_size+t65_size)))->_bodies));
#line 105
      NILCHECKA (z4 = _p); z2 = (((t7_fields*)(z4+(0+t56_size+t65_size)))->_nCases); if (z2 < 0) RANGEFAULT; { register t72* array = & (*((t19*) z9));
#line 105
         z12 = z2; if (z12 >= (array->size[0])) RANGEFAULT; z11 = (int)(array->elts + (z12 * 4)); }; (*(t17*)z11) = z10;
      NILCHECKA (z4 = _p); (((t7_fields*)(z4+(0+t56_size+t65_size)))->_nCases) +=  1 ; } } };
#line 109 "CaseStmt.m3"
 PRIVATE t84 _CaseStmt__ExpandBodies (_p) t7 _p; { t7 z1; t14 z0; t26 z2; t14 z3; t1 z4; t1 z5; t1 z6; t7 z7;
#line 109 "CaseStmt.m3"
{ auto t14 _old; auto t14 _new; { CHECKSTACKOVERFLOW;


      NILCHECKA (z1 = _p); _old = (((t7_fields*)(z1+(0+t56_size+t65_size)))->_bodies);
      { register t72* ptr; int sz[1]; NILCHECKB (z3 = _old); z2 = (*((t19*) z3)).size[0]; z4 = z2 *  2 ; sz[0] = z4; ptr = (t72*) UNEWA(TC14, 8 + sz[0] * 4);
#line 113
         ptr->elts = (char*)(& ptr->size[1]); ptr->size[0] = sz[0]; z0 = (t14) ptr; }; _new = z0;
      { int from, to, index; from =  0 ; NILCHECKB (z3 = _old); z4 = (*((t19*) z3)).size[0] - 1; to = z4; { auto t1 _i; {
#line 114
               for (index = from; index <= to; index += 1) { _i = (t1) index; NILCHECKB (z3 = _old); { register t72* array = & (*((t19*) z3));
#line 114
                     z5 = _i; if (z5 >= (array->size[0])) RANGEFAULT; z4 = (int)(array->elts + (z5 * 4)); }; NILCHECKB (z3 = _new);
#line 114
                  { register t72* array = & (*((t19*) z3)); z6 = _i; if (z6 >= (array->size[0])) RANGEFAULT; z5 = (int)(array->elts + (z6 * 4));
#line 114
 }; (*(t17*)z5) = (*(t17*)z4); } } }; };
      NILCHECKA (z7 = _p); (((t7_fields*)(z7+(0+t56_size+t65_size)))->_bodies) = _new; } } };
#line 118 "CaseStmt.m3"
 PRIVATE t84 _CaseStmt__Bind (_p) t7 _p; { t7 z2; t7 z1; t4 z3; t2 z4; t1 z5; t14 z6; t1 z7;
#line 118 "CaseStmt.m3"
{ auto t2 _t; { CHECKSTACKOVERFLOW;


      NILCHECKA (z2 = _p); _Expr__Bind ((((t7_fields*)(z2+(0+t56_size+t65_size)))->_expr));
      NILCHECKA (z1 = _p); _t = (((t7_fields*)(z1+(0+t56_size+t65_size)))->_tree);
      z3 = (_t != 0); if (z3) do { NILCHECKA (z4 = _t);
         _Expr__Bind (((*((t20*) z4))._emin));
         NILCHECKA (z4 = _t); _Expr__Bind (((*((t20*) z4))._emax));
         NILCHECKA (z4 = _t); _t = ((*((t20*) z4))._less); z3 = (_t != 0); } while (z3);

      { int from, to, index; from =  0 ; NILCHECKA (z1 = _p); z5 = (((t7_fields*)(z1+(0+t56_size+t65_size)))->_nCases) -  1 ;
#line 128
         to = z5; { auto t1 _i; { for (index = from; index <= to; index += 1) { _i = (t1) index; NILCHECKA (z2 = _p); NILCHECKB (z6 = (((t7_fields*)(z2+(0+t56_size+t65_size)))->_bodies));
#line 128
                  { register t72* array = & (*((t19*) z6)); z7 = _i; if (z7 >= (array->size[0])) RANGEFAULT; z5 = (int)(array->elts + (z7 * 4));
#line 128
 }; _Stmt__Bind ((*(t17*)z5)); } } }; };
      NILCHECKA (z2 = _p); _Stmt__Bind ((((t7_fields*)(z2+(0+t56_size+t65_size)))->_elseBody)); } } };
#line 132 "CaseStmt.m3"
 PRIVATE t84 _CaseStmt__Check (_p) t7 _p; { t7 z2; t11 z3; t1 z4; t4 z1; t4 z5; t2 z6; t2 z7; t14 z8; t1 z9; t7 z10;
#line 132 "CaseStmt.m3"
{ auto t2 _t; auto t2 _u; auto t11 _type; auto t1 _min; auto t1 _max; auto t1 _minE; auto t1 _maxE; { CHECKSTACKOVERFLOW;



      NILCHECKA (z2 = _p); _Expr__TypeCheck ((((t7_fields*)(z2+(0+t56_size+t65_size)))->_expr));
      NILCHECKA (z2 = _p); z3 = _Expr__TypeOf ((((t7_fields*)(z2+(0+t56_size+t65_size)))->_expr)); _type = z3;
      z4 = _Type__Number (_type); z1 = (z4 <  0 ); if (z1) {
         _Error__Msg (((ADDRESS)(& txt2.str))); goto if_10_end; }; if_10_end: /**/;



      _Type__GetBounds (_type, &_min, &_max);
      NILCHECKA (z2 = _p); _t = (((t7_fields*)(z2+(0+t56_size+t65_size)))->_tree);
      NILCHECKA (z2 = _p); (((t7_fields*)(z2+(0+t56_size+t65_size)))->_tree) = (t2) 0;
      z5 = (_t != 0); if (z5) do { NILCHECKA (z6 = _t);
         _u = ((*((t20*) z6))._less);
         NILCHECKA (z2 = _p); z7 = _CaseStmt__AddNode ((((t7_fields*)(z2+(0+t56_size+t65_size)))->_tree), _t, _type, _min, _max);
#line 148
         NILCHECKA (z2 = _p); (((t7_fields*)(z2+(0+t56_size+t65_size)))->_tree) = z7;
         _t = _u; z5 = (_t != 0); } while (z5);



      { int from, to, index; from =  0 ; NILCHECKA (z2 = _p); z4 = (((t7_fields*)(z2+(0+t56_size+t65_size)))->_nCases) -  1 ;
#line 153
         to = z4; { auto t1 _i; { for (index = from; index <= to; index += 1) { _i = (t1) index; NILCHECKA (z2 = _p); NILCHECKB (z8 = (((t7_fields*)(z2+(0+t56_size+t65_size)))->_bodies));
#line 153
                  { register t72* array = & (*((t19*) z8)); z9 = _i; if (z9 >= (array->size[0])) RANGEFAULT; z4 = (int)(array->elts + (z9 * 4));
#line 153
 }; _Stmt__TypeCheck ((*(t17*)z4)); } } }; };


      NILCHECKA (z2 = _p); if ((((t7_fields*)(z2+(0+t56_size+t65_size)))->_else)) { NILCHECKA (z2 = _p); _Stmt__TypeCheck ((((t7_fields*)(z2+(0+t56_size+t65_size)))->_elseBody));
#line 156
         goto if_11_end; }; if_11_end: /**/;


      NILCHECKA (z2 = _p); _Expr__GetBounds ((((t7_fields*)(z2+(0+t56_size+t65_size)))->_expr), &_minE, &_maxE);
      NILCHECKA (z2 = _p); z1 = 1; if (! (((t7_fields*)(z2+(0+t56_size+t65_size)))->_else)) { NILCHECKA (z10 = _p); z5 = _CaseStmt__CompleteTree ((((t7_fields*)(z10+(0+t56_size+t65_size)))->_tree), _minE, _maxE);
#line 160
         z1 = z5; }; NILCHECKA (z2 = _p); (((t7_fields*)(z2+(0+t56_size+t65_size)))->_complete) = z1;
      NILCHECKA (z2 = _p); z1 = ! (((t7_fields*)(z2+(0+t56_size+t65_size)))->_complete); if (z1) {
         NILCHECKA (z2 = _p); _Scanner__offset = (((t56_fields*)(z2+(0+t65_size)))->_origin);
         _Error__Warn ( 1 , ((ADDRESS)(& txt3.str))); goto if_12_end; }; if_12_end: /**/; } } };
#line 167 "CaseStmt.m3"
 PRIVATE t2 _CaseStmt__AddNode (_old, _new, _type, _min, _max) t2 _old; t2 _new; t11 _type; t1 _min; t1 _max; { t2 z2; t1 z5;
t2 z1; t4 z4; t4 z0; t2 z3; t4 z6;
#line 167 "CaseStmt.m3"
{ auto t2 __result; { CHECKSTACKOVERFLOW;

      NILCHECKA (z2 = _new); z5 = _CaseStmt__CheckLabel (((*((t20*) z2))._emin), _type); NILCHECKA (z1 = _new); ((*((t20*) z1))._min) = z5;
      NILCHECKA (z1 = _new); z4 = (((*((t20*) z1))._emax) != 0); if (z4) {
         NILCHECKA (z2 = _new); z5 = _CaseStmt__CheckLabel (((*((t20*) z2))._emax), _type); NILCHECKA (z1 = _new); ((*((t20*) z1))._max) = z5;
#line 171
         goto if_13_end; }; NILCHECKA (z1 = _new);
         ((*((t20*) z1))._max) = ((*((t20*) z1))._min); if_13_end: /**/;

      NILCHECKA (z1 = _new); z4 = (((*((t20*) z1))._min) < _min); z0 = 1; if (! z4) { NILCHECKA (z3 = _new); z6 = (_max < ((*((t20*) z3))._max));
#line 174
         z0 = z6; }; if (z0) {
         _Error__Msg (((ADDRESS)(& txt4.str))); goto if_14_end; }; if_14_end: /**/;

      z3 = _CaseStmt__AddToTree (_old, _new); __result = z3; return __result; } } };
#line 180 "CaseStmt.m3"
 PRIVATE t1 _CaseStmt__CheckLabel (_e, _type) t12 _e; t11 _type; { t11 z2; t12 z3; t4 z4; t4 z0; t4 z5;
#line 180 "CaseStmt.m3"
{ auto t11 _t; auto t1 _i; auto t1 __result; { CHECKSTACKOVERFLOW;


      _Expr__TypeCheck (_e);
      z2 = _Expr__TypeOf (_e); _t = z2;
      z3 = _Expr__ConstValue (_e); _e = z3;
      z4 = (_e == 0); if (z4) { _Error__Msg (((ADDRESS)(& txt5.str))); goto if_15_end; }; if_15_end: /**/;
      z4 = _Type__IsSubtype (_type, _t); z0 = ! z4; if (z0) {
         _Error__Msg (((ADDRESS)(& txt6.str))); goto if_16_end; }; if_16_end: /**/;

      _i =  0 ;
      z4 = _IntegerExpr__Split (_e, &_i); z0 = 1; if (! z4) { z5 = _EnumExpr__Split (_e, &_i, &_t); z0 = z5; }; if (z0) {
#line 191
         goto if_17_end; }; if_17_end: /**/;
      __result = _i; return __result; } } };
#line 195 "CaseStmt.m3"
 PRIVATE t2 _CaseStmt__AddToTree (_old, _new) t2 _old; t2 _new; { t2 z2; t4 z3; t2 z1; t2 z4; t4 z6; t2 z5;
#line 195 "CaseStmt.m3"
{ auto t2 __result; { CHECKSTACKOVERFLOW;

      NILCHECKA (z2 = _new); ((*((t20*) z2))._less) = (t2) 0;
      NILCHECKA (z2 = _new); ((*((t20*) z2))._greater) = (t2) 0;
      z3 = (_old == 0); if (z3) {
         _old = _new; goto if_18_end; }; NILCHECKA (z1 = _new); NILCHECKA (z4 = _old); z6 = (((*((t20*) z1))._max) < ((*((t20*) z4))._min));
#line 200
      if (z6) {

         NILCHECKA (z2 = _old); z5 = _CaseStmt__AddToTree (((*((t20*) z2))._less), _new); NILCHECKA (z1 = _old); ((*((t20*) z1))._less) = z5;
#line 202
         goto if_18_end; }; NILCHECKA (z1 = _old); NILCHECKA (z4 = _new); z6 = (((*((t20*) z1))._max) < ((*((t20*) z4))._min));
#line 202
      if (z6) {

         NILCHECKA (z2 = _old); z5 = _CaseStmt__AddToTree (((*((t20*) z2))._greater), _new); NILCHECKA (z1 = _old); ((*((t20*) z1))._greater) = z5;
#line 204
         goto if_18_end; }; _Error__Msg (((ADDRESS)(& txt7.str)));

 if_18_end: /**/;

      __result = _old; return __result; } } };
#line 211 "CaseStmt.m3"
 PRIVATE t4 _CaseStmt__CompleteTree (_t, _min, _max) t2 _t; t1 _min; t1 _max; { t4 z2; t2 z1; t4 z4; t4 z0; t2 z3; t4 z5;
t1 z6; t1 z7;
#line 211 "CaseStmt.m3"
{ auto t4 __result; { ZERO1B (& __result); CHECKSTACKOVERFLOW;

      z2 = (_t != 0); if (z2) do { NILCHECKA (z1 = _t);
         z4 = (((*((t20*) z1))._max) < _min); z0 = 1; if (! z4) { NILCHECKA (z3 = _t); z5 = (_max < ((*((t20*) z3))._min));
#line 214
            z0 = z5; }; if (z0) {
            z2 = (_min > _max); __result = z2; return __result; }; NILCHECKA (z1 = _t); z6 = ((*((t20*) z1))._min) - _min;
#line 215
         NILCHECKA (z3 = _t); z7 = _max - ((*((t20*) z3))._max); z0 = (z6 > z7); if (z0) {

            NILCHECKA (z3 = _t); z6 = ((*((t20*) z3))._max) +  1 ; z5 = _CaseStmt__CompleteTree (((*((t20*) z3))._greater), z6, _max);
#line 217
            z0 = ! z5; if (z0) { __result =  0 ; return __result; };
            NILCHECKA (z1 = _t); z6 = ((*((t20*) z1))._min) -  1 ; _max = z6; NILCHECKA (z1 = _t); _t = ((*((t20*) z1))._less);
#line 218
            goto if_19_end; }; NILCHECKA (z3 = _t);

            z7 = ((*((t20*) z3))._min) -  1 ; z5 = _CaseStmt__CompleteTree (((*((t20*) z3))._less), _min, z7); z0 = ! z5;
#line 220
            if (z0) { __result =  0 ; return __result; };
            NILCHECKA (z1 = _t); z6 = ((*((t20*) z1))._max) +  1 ; _min = z6; NILCHECKA (z1 = _t); _t = ((*((t20*) z1))._greater);
#line 221
 if_19_end: /**/; z2 = (_t != 0); } while (z2);


      z2 = (_min > _max); __result = z2; return __result; } } };
#line 227 "CaseStmt.m3"
 PRIVATE t84 _CaseStmt__Precompile (_p) t7 _p; { t7 z1; t1 z3; t7 z2; t14 z4; t1 z5;
#line 227 "CaseStmt.m3"
{ { CHECKSTACKOVERFLOW;

      { int from, to, index; from =  0 ; NILCHECKA (z1 = _p); z3 = (((t7_fields*)(z1+(0+t56_size+t65_size)))->_nCases) -  1 ;
#line 229
         to = z3; { auto t1 _i; { for (index = from; index <= to; index += 1) { _i = (t1) index; NILCHECKA (z2 = _p); NILCHECKB (z4 = (((t7_fields*)(z2+(0+t56_size+t65_size)))->_bodies));
#line 229
                  { register t72* array = & (*((t19*) z4)); z5 = _i; if (z5 >= (array->size[0])) RANGEFAULT; z3 = (int)(array->elts + (z5 * 4));
#line 229
 }; _Stmt__Precompile ((*(t17*)z3)); } } }; };
      NILCHECKA (z2 = _p); _Stmt__Precompile ((((t7_fields*)(z2+(0+t56_size+t65_size)))->_elseBody)); } } };
#line 233 "CaseStmt.m3"
 PRIVATE void _CaseStmt__Compile (_p, _return) t7 _p; t5* _return; { t7 z1; t4 z2; t2 z3; t7 z4; t4 z0; t1 z5; t1 z6; t5 z7;
#line 233 "CaseStmt.m3"
{ auto t1 _minL; auto t1 _maxL; auto t2 _t; auto t5 _oc; auto t5 __result; { CHECKSTACKOVERFLOW;



      _minL =  2147483647 ;
      NILCHECKA (z1 = _p); _t = (((t7_fields*)(z1+(0+t56_size+t65_size)))->_tree);
      z2 = (_t != 0); if (z2) do { NILCHECKA (z3 = _t);
         _minL = ((*((t20*) z3))._min);
         NILCHECKA (z3 = _t); _t = ((*((t20*) z3))._less); z2 = (_t != 0); } while (z2);



      _maxL =  -2147483648 ;
      NILCHECKA (z1 = _p); _t = (((t7_fields*)(z1+(0+t56_size+t65_size)))->_tree);
      z2 = (_t != 0); if (z2) do { NILCHECKA (z3 = _t);
         _maxL = ((*((t20*) z3))._max);
         NILCHECKA (z3 = _t); _t = ((*((t20*) z3))._greater); z2 = (_t != 0); } while (z2);



      NILCHECKA (z4 = _p); z3 = _CaseStmt__FlattenTree ((((t7_fields*)(z4+(0+t56_size+t65_size)))->_tree), 0); NILCHECKA (z1 = _p);
#line 253
      (((t7_fields*)(z1+(0+t56_size+t65_size)))->_tree) = z3;

      z2 = (_CaseStmt__nest ==  0 ); z0 = 0; if (z2) { NILCHECKA (z4 = _p); z5 = (((t7_fields*)(z4+(0+t56_size+t65_size)))->_nCases) *  4 ;
#line 255
         z6 = _maxL - _minL; z2 = (z5 > z6); z0 = z2; }; if (z0) {

         _CaseStmt__nest +=  1 ;
         _CaseStmt__GenIndexedBranch (_p, &z7); _oc.elts[0] = z7.elts[0];
         _CaseStmt__nest -=  1 ; goto if_22_end; }; _CaseStmt__GenIfTable (_p, &z7);


         _oc.elts[0] = z7.elts[0]; if_22_end: /**/;


      __result = _oc; *_return = __result; return; } } };
#line 268 "CaseStmt.m3"
 PRIVATE t2 _CaseStmt__FlattenTree (_t, _tail) t2 _t; t2 _tail; { t4 z2; t2 z3; t2 z5; t2 z1;
#line 268 "CaseStmt.m3"
{ auto t2 __result; { CHECKSTACKOVERFLOW;

      z2 = (_t == 0); if (z2) { __result = _tail; return __result; };
      NILCHECKA (z3 = _t); z5 = _CaseStmt__FlattenTree (((*((t20*) z3))._greater), _tail); NILCHECKA (z1 = _t); ((*((t20*) z1))._greater) = z5;
      NILCHECKA (z3 = _t); z5 = _CaseStmt__FlattenTree (((*((t20*) z3))._less), _t); __result = z5; return __result; } } };
#line 275 "CaseStmt.m3"
 PRIVATE void _CaseStmt__GenIndexedBranch (_p, _return) t7 _p; t5* _return; { t7 z2; t6 z3; t5 z0; t1 z1; t1 z4; t4 z5; t2 z6;
t14 z7; t1 z8; t5 z9; t7 z10; t5 z11;
#line 275 "CaseStmt.m3"
{ auto t2 _t; auto t6 _x; auto t5 _oc; auto t5 _xc; auto t5 __result; { CHECKSTACKOVERFLOW;


      NILCHECKA (z2 = _p); z3 = _Expr__Compile ((((t7_fields*)(z2+(0+t56_size+t65_size)))->_expr)); _x = z3;
      _Emit__OpT (((ADDRESS)(& txt8.str)), _x);
      _Temp__Free (_x);
      z0.elts [0] = 0; _oc.elts[0] = z0.elts[0];


      { int from, to, index; from =  0 ; NILCHECKA (z2 = _p); z4 = (((t7_fields*)(z2+(0+t56_size+t65_size)))->_nCases) -  1 ;
#line 284
         to = z4; { auto t1 _i; { for (index = from; index <= to; index += 1) { _i = (t1) index;
                  NILCHECKA (z2 = _p); _t = (((t7_fields*)(z2+(0+t56_size+t65_size)))->_tree);
                  z5 = (_t != 0); if (z5) do { NILCHECKA (z6 = _t);
                     z5 = (((*((t20*) z6))._body) == _i); if (z5) {
                        { int from, to, index; NILCHECKA (z6 = _t); from = ((*((t20*) z6))._min); NILCHECKA (z6 = _t); to = ((*((t20*) z6))._max);
#line 288
                           { auto t1 _j; { for (index = from; index <= to; index += 1) { _j = (t1) index; _Emit__OpI (((ADDRESS)(& txt9.str)), _j);
#line 288
                                    } } }; }; goto if_24_end; }; if_24_end: /**/;

                     NILCHECKA (z6 = _t); _t = ((*((t20*) z6))._greater); z5 = (_t != 0); } while (z5);

                  _Emit__Op (((ADDRESS)(& txt10.str)));
                  NILCHECKA (z2 = _p); NILCHECKB (z7 = (((t7_fields*)(z2+(0+t56_size+t65_size)))->_bodies)); { register t72* array = & (*((t19*) z7));
#line 293
                     z8 = _i; if (z8 >= (array->size[0])) RANGEFAULT; z4 = (int)(array->elts + (z8 * 4)); }; _Stmt__Compile ((*(t17*)z4), &z9);
#line 293
                  _xc.elts[0] = z9.elts[0];
                  z9.elts[0] = _oc.elts[0] | _xc.elts[0]; _oc.elts[0] = z9.elts[0];
                  z5 = ((_xc.elts [0]  &  (1<<0)) != 0); if (z5) { _Emit__Op (((ADDRESS)(& txt11.str))); goto if_25_end; };
#line 295
                  if_25_end: /**/;
                  _Emit__Op (((ADDRESS)(& txt12.str))); } } }; };



      _Emit__Op (((ADDRESS)(& txt13.str)));
      NILCHECKA (z2 = _p); if ((((t7_fields*)(z2+(0+t56_size+t65_size)))->_else)) {
         NILCHECKA (z10 = _p); _Stmt__Compile ((((t7_fields*)(z10+(0+t56_size+t65_size)))->_elseBody), &z9); z11.elts[0] = _oc.elts[0] | z9.elts[0];
#line 302
         _oc.elts[0] = z11.elts[0]; goto if_26_end; }; NILCHECKA (z2 = _p); z5 = ! (((t7_fields*)(z2+(0+t56_size+t65_size)))->_complete);
#line 302
      if (z5) {

         _Emit__Op (((ADDRESS)(& txt14.str))); goto if_26_end; }; if_26_end: /**/;

      _Emit__Op (((ADDRESS)(& txt15.str)));
      __result = _oc; *_return = __result; return; } } };
#line 310 "CaseStmt.m3"
 PRIVATE void _CaseStmt__GenIfTable (_p, _return) t7 _p; t5* _return; { t7 z2; t2 z3; t7 z1; t5 z0; t1 z4; t6 z5; t7 z6; t11 z7;
t4 z8; t1 z9; t14 z10; t5 z11; t5 z12;
#line 310 "CaseStmt.m3"
{ auto t1 _last; auto t1 _id; auto t2 _t; auto t6 _x; auto t5 _oc; auto t5 _xc; auto t4 _goto; auto t5 __result; {

      ZERO1B (& _goto);
#line 310
      CHECKSTACKOVERFLOW;



      NILCHECKA (z2 = _p); z3 = _CaseStmt__CollapseTree ((((t7_fields*)(z2+(0+t56_size+t65_size)))->_tree)); NILCHECKA (z1 = _p);
#line 314
      (((t7_fields*)(z1+(0+t56_size+t65_size)))->_tree) = z3;
      _id = _CaseStmt__nextID; _CaseStmt__nextID +=  1 ;
      z0.elts [0] = 0; _oc.elts[0] = z0.elts[0];


      NILCHECKA (z2 = _p); z5 = _Expr__Compile ((((t7_fields*)(z2+(0+t56_size+t65_size)))->_expr)); _x = z5;
      NILCHECKA (z6 = _p); z7 = _Expr__TypeOf ((((t7_fields*)(z6+(0+t56_size+t65_size)))->_expr)); z4 = _Type__Name (z7);
#line 320
      _Emit__OpI (((ADDRESS)(& txt16.str)), z4);
      _Emit__OpT (((ADDRESS)(& txt17.str)), _x);
      _Temp__Free (_x);


      _last =  -2147483648 ;
      NILCHECKA (z1 = _p); _t = (((t7_fields*)(z1+(0+t56_size+t65_size)))->_tree);
      z8 = (_t != 0); if (z8) do { NILCHECKA (z3 = _t);
         z9 = ((*((t20*) z3))._min) -  1 ; z8 = (_last < z9); if (z8) {
            NILCHECKA (z3 = _t); _Emit__OpII (((ADDRESS)(& txt18.str)), ((*((t20*) z3))._min), _id); goto if_27_end; }; if_27_end: /**/;

         NILCHECKA (z3 = _t); _Emit__OpIII (((ADDRESS)(& txt19.str)), ((*((t20*) z3))._max), _id, ((*((t20*) z3))._body));
         NILCHECKA (z3 = _t); _last = ((*((t20*) z3))._max);
         NILCHECKA (z3 = _t); _t = ((*((t20*) z3))._greater); z8 = (_t != 0); } while (z8);

      _Emit__OpI (((ADDRESS)(& txt20.str)), _id);


      _goto =  0 ;
      { int from, to, index; from =  0 ; NILCHECKA (z1 = _p); z4 = (((t7_fields*)(z1+(0+t56_size+t65_size)))->_nCases) -  1 ;
#line 339
         to = z4; { auto t1 _i; { for (index = from; index <= to; index += 1) { _i = (t1) index;
                  _Emit__OpII (((ADDRESS)(& txt21.str)), _id, _i);
                  NILCHECKA (z2 = _p); NILCHECKB (z10 = (((t7_fields*)(z2+(0+t56_size+t65_size)))->_bodies)); { register t72* array = & (*((t19*) z10));
#line 341
                     z9 = _i; if (z9 >= (array->size[0])) RANGEFAULT; z4 = (int)(array->elts + (z9 * 4)); }; _Stmt__Compile ((*(t17*)z4), &z11);
#line 341
                  _xc.elts[0] = z11.elts[0];
                  z11.elts[0] = _oc.elts[0] | _xc.elts[0]; _oc.elts[0] = z11.elts[0];
                  z8 = ((_xc.elts [0]  &  (1<<0)) != 0); if (z8) {
                     _Emit__OpI (((ADDRESS)(& txt22.str)), _id);
                     _goto =  1 ; goto if_28_end; }; if_28_end: /**/;

                  _Emit__Op (((ADDRESS)(& txt12.str))); } } }; };



      _Emit__OpI (((ADDRESS)(& txt23.str)), _id);
      NILCHECKA (z1 = _p); if ((((t7_fields*)(z1+(0+t56_size+t65_size)))->_else)) {
         NILCHECKA (z6 = _p); _Stmt__Compile ((((t7_fields*)(z6+(0+t56_size+t65_size)))->_elseBody), &z11); z12.elts[0] = _oc.elts[0] | z11.elts[0];
#line 353
         _oc.elts[0] = z12.elts[0]; goto if_29_end; }; NILCHECKA (z1 = _p); z8 = ! (((t7_fields*)(z1+(0+t56_size+t65_size)))->_complete);
#line 353
      if (z8) {

         _Emit__Op (((ADDRESS)(& txt14.str))); goto if_29_end; }; if_29_end: /**/;

      _Emit__Op (((ADDRESS)(& txt12.str)));
      if (_goto) { _Emit__OpI (((ADDRESS)(& txt24.str)), _id); goto if_30_end; }; if_30_end: /**/;
      _Emit__Op (((ADDRESS)(& txt15.str)));
      __result = _oc; *_return = __result; return; } } };
#line 363 "CaseStmt.m3"
 PRIVATE t2 _CaseStmt__CollapseTree (_t) t2 _t; { t4 z2; t2 z1; t4 z0; t2 z3; t4 z5; t1 z4;
#line 363 "CaseStmt.m3"
{ auto t2 _t1; auto t2 _t2; auto t1 _x; auto t1 _c; auto t2 __result; { CHECKSTACKOVERFLOW;


      _t1 = _t;
      z2 = (_t1 != 0); if (z2) do { NILCHECKA (z1 = _t1);
         _c = ((*((t20*) z1))._body);
         NILCHECKA (z1 = _t1); _x = ((*((t20*) z1))._max);
         NILCHECKA (z1 = _t1); _t2 = ((*((t20*) z1))._greater);
         z2 = (_t2 != 0); z0 = 0; if (z2) { NILCHECKA (z3 = _t2); z5 = (((*((t20*) z3))._body) == _c); z0 = z5; }; z2 = 0;
#line 371
         if (z0) { z4 = _x +  1 ; NILCHECKA (z1 = _t2); z5 = (z4 == ((*((t20*) z1))._min)); z2 = z5; }; if (z2) do { NILCHECKA (z1 = _t2);
            _x = ((*((t20*) z1))._max);
            NILCHECKA (z1 = _t2); _t2 = ((*((t20*) z1))._greater); z2 = (_t2 != 0); z0 = 0; if (z2) { NILCHECKA (z3 = _t2);
#line 373
               z5 = (((*((t20*) z3))._body) == _c); z0 = z5; }; z2 = 0; if (z0) { z4 = _x +  1 ; NILCHECKA (z1 = _t2); z5 = (z4 == ((*((t20*) z1))._min));
#line 373
               z2 = z5; }; } while (z2);

         NILCHECKA (z3 = _t1); ((*((t20*) z3))._greater) = _t2;
         NILCHECKA (z3 = _t1); ((*((t20*) z3))._max) = _x;
         _t1 = _t2; z2 = (_t1 != 0); } while (z2);

      __result = _t; return __result; } } };  PRIVATE int init_done = -1;
#line 379 "CaseStmt.m3"
 PRIVATE void CaseStmt__initProc (g) int g; {
#line 379 "CaseStmt.m3"
if (init_done >= g) return; init_done = g; INITIALIZE (& CaseStmt__init); INITIALIZE (& Scanner__init); INITIALIZE (& Emit__init);
#line 379
INITIALIZE (& IntegerExpr__init); INITIALIZE (& Token__init); INITIALIZE (& Temp__init); INITIALIZE (& EnumExpr__init); INITIALIZE (& Target__init);
#line 379
INITIALIZE (& Error__init); INITIALIZE (& Type__init); INITIALIZE (& StmtRep__init); INITIALIZE (& Stmt__init); INITIALIZE (& Expr__init);
#line 47
_CaseStmt__nextID =  1 ;
ZERO1  ((& _CaseStmt__nest));
#line 379
return; }; 
#line 379 "CaseStmt.m3"
PRIVATE void t2_PrintProc (ref) t20* ref; { CHECKSTACKOVERFLOW; fprintf (stderr, "%s {", TC2->brand); fprintf (stderr, "^ = { ");
#line 379
   fprintf (stderr, "less = %#x", (*ref)._less); fprintf (stderr, "greater = %#x", (*ref)._greater); fprintf (stderr, "emin = %#x", (*ref)._emin);
#line 379
   fprintf (stderr, "emax = %#x", (*ref)._emax); fprintf (stderr, "min = %d", (*ref)._min); fprintf (stderr, "max = %d", (*ref)._max);
#line 379
   fprintf (stderr, "body = %d", (*ref)._body); fprintf (stderr, "}"); fprintf (stderr, "}\n"); }; 
#line 379 "CaseStmt.m3"
PRIVATE void t7_InitProc (obj) char* obj; { register t7_fields* p;
#line 379 "CaseStmt.m3"
CHECKSTACKOVERFLOW; p = (t7_fields*) (obj + TC17->datasize); p->_expr = 0; p->_tree = 0; p->_bodies = 0; p->_complete =  0 ;
#line 379
p->_else =  0 ; p->_elseBody = 0; p->_nCases =  0 ; }; 
#line 379 "CaseStmt.m3"
PRIVATE void t7_SetupProc () { register int* p;
#line 379 "CaseStmt.m3"
t7_TC.datasize += TC17->datasize; t7_TC.methodsize += TC17->methodsize; p = (int*) UALLOC (t7_TC.methodsize); COPY (TC17->defaultMethods, p, (TC17->methodsize));
#line 379
p[0] = (int)(& t7_TC); p[1] = 0; ((t56_methods*) (((char*)p) + TC65->methodsize))->_bind = _CaseStmt__Bind; ((t56_methods*) (((char*)p) + TC65->methodsize))->_check = _CaseStmt__Check;
#line 379
((t56_methods*) (((char*)p) + TC65->methodsize))->_precompile = _CaseStmt__Precompile; ((t56_methods*) (((char*)p) + TC65->methodsize))->_compile = _CaseStmt__Compile;
#line 379
t7_TC.defaultMethods = (char*) p; }; 
#line 379 "CaseStmt.m3"
PRIVATE void t7_PrintProc (obj) char *obj; { t7_fields* o;
#line 379 "CaseStmt.m3"
CHECKSTACKOVERFLOW; if (TC17->printProc != 0) {TC17->printProc (obj); } fprintf (stderr, "{%s} ", TC7->brand); o = (t7_fields*) (obj + TC17->datasize);
#line 379
fprintf (stderr, "expr = %#x", o->_expr); fprintf (stderr, ", "); fprintf (stderr, "tree = %#x", o->_tree); fprintf (stderr, ", ");
#line 379
fprintf (stderr, "bodies = %#x", o->_bodies); fprintf (stderr, ", "); fprintf (stderr, "complete = %d", o->_complete); fprintf (stderr, ", ");
#line 379
fprintf (stderr, "else = %d", o->_else); fprintf (stderr, ", "); fprintf (stderr, "elseBody = %#x", o->_elseBody); fprintf (stderr, ", ");
#line 379
fprintf (stderr, "nCases = %d", o->_nCases); fprintf (stderr, ", "); }; 
#line 379 "CaseStmt.m3"
PRIVATE void t14_PrintProc (ref) t19* ref; { CHECKSTACKOVERFLOW; fprintf (stderr, "%s {", TC14->brand); fprintf (stderr, "^ = array");
#line 379
   fprintf (stderr, "}\n"); };   PRIVATE INITLINK me_0 ={(INITLINK*)NIL, 0, CaseStmt__initProc}; static char* VSimports[] = {
   &VS_Scanner__cur__929fa6f8367ea415, &VS_Scanner__offset__dfc05f042d8347f4, &VS_Scanner__Match__aaf5b32f2f19a6d8, &VS_Scanner__GetToken__192100a32c7e576d,
   &VS_Scanner__Fail__a15a8cf32391aa62, &VS_Emit__MaxStream__cf0a0e8934c9c9f3, &VS_Emit__Format__bc4a2b083b93bbd7, &VS_Emit__Op__072646cc27c8ae10,
   &VS_Emit__OpI__02cb878634bb9f49, &VS_Emit__OpII__2247fe46332f901b, &VS_Emit__OpIII__346a6aee3776eadb, &VS_Emit__OpT__764bdffe21d249e8,
   &VS_IntegerExpr__Split__132919062838cba6, &VS_Token__DeclStart__730c82bc2c2001b8, &VS_Token__TypeStart__f71616cb38a20d02,
   &VS_Token__ExprStart__21dc8a0a27344836, &VS_Token__StmtStart__d5f1dc8e390e874c, &VS_Temp__T__3a6c7dc12615e4ee, &VS_Temp__Free__3b952a2225c26846,
   &VS_EnumExpr__Split__cac875982d1549f5, &VS_Target__MAXINT__6ffcde5a2f0f51a2, &VS_Target__MININT__62f667293f10b631, &VS_Error__Msg__4d119a332467757f,
   &VS_Error__Warn__38cf6ace3df14804, &VS_Type__T__2446b70b3f7780a5, &VS_Type__Map__41dd9f4b33104fce, &VS_Type__List__5791758e343becc1,
   &VS_Type__Number__f5ca10923ed3cf22, &VS_Type__GetBounds__9a241b2b3c98ad98, &VS_Type__Name__f99416972257a869, &VS_Type__IsSubtype__8591fba5245cb882,
   &VS_StmtRep__Init__fe14377c36e397de, &VS_Stmt__T__2446b70b3f7780a5, &VS_Stmt__Parse__35df10ad3fd1dfe6, &VS_Stmt__Bind__55f2c79a304c25df,
   &VS_Stmt__TypeCheck__e228c94928564a9d, &VS_Stmt__Precompile__68dddedb3aa69659, &VS_Stmt__Compile__53f9f2c43edb087a, &VS_Expr__T__2446b70b3f7780a5,
   &VS_Expr__List__3f87eceb2b9a246a, &VS_Expr__Parse__193c41662e6da77f, &VS_Expr__Bind__7e2752da3eaf56eb, &VS_Expr__TypeOf__fef0a11b388c64fa,
   &VS_Expr__ConstValue__ce4fd448218fe483, &VS_Expr__GetBounds__b20ec781333da5e4, &VS_Expr__TypeCheck__af9aa9073729e7f7, &VS_Expr__Compile__a7e0cc4029a2ec76,
   &VS_Scanner__cur__929fa6f8367ea415, &VS_Scanner__Fail__a15a8cf32391aa62, &VS_Scanner__GetToken__192100a32c7e576d, &VS_Scanner__Match__aaf5b32f2f19a6d8,
   NIL };  void CaseStmt__MLink (phase) int phase; { switch (phase) { case 0: { me_0.link = CaseStmt__init; CaseStmt__init = & me_0;
         t2_TC = t2_TC_init; REGISTERTYPE (TC2); t7_TC = t7_TC_init; REGISTERTYPE (TC7); t14_TC = t14_TC_init; REGISTERTYPE (TC14);
         break; }; case 1: { t7_TC.parent = TC_M3__Stmt; break; }; case 2: { break; }; }; };