#include "M3Runtime.h"

typedef struct { int tc; char* str; int len; } TXT; PRIVATE TXT txt1 = { 3, "expression must be a mutex", 27}; PRIVATE TXT txt2 = { 3, "mutex must be a designator", 27};
PRIVATE TXT txt3 = { 3, "mutex must be writeable", 24}; PRIVATE TXT txt4 = { 3, "lock_", 6}; PRIVATE TXT txt5 = { 3, "{\001\012register t@ mu = (t@)", 25};
PRIVATE TXT txt6 = { 3, "@;\012", 4}; PRIVATE TXT txt7 = { 3, "_Thread__Acquire (mu);\012", 24}; PRIVATE TXT txt8 = { 3, "_Thread__Release (mu);\012", 24};
PRIVATE TXT txt9 = { 3, "\002};\012", 5}; 
#define t27 ADDRESS
#define t83 void
#define TC27 TC_REFANY
IMPORT TYPE TC_REFANY; IMPORT char VS_REFANY__4b8748e831fc107a;
#line 14 "../Interfaces/Expr.i3"
#define t36 ADDRESS
#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_UNTRACED_ROOT
IMPORT TYPE TC_UNTRACED_ROOT; IMPORT char VS_UNTRACED_ROOT__3e0964513fd6da20;
#line 16 "../Interfaces/M3.i3"
#define t14 ADDRESS
#define TC14 TC_M3__Expr
IMPORT TYPE TC_M3__Expr;
#line 16
IMPORT char VS_M3__Expr__8ae39aaa2d432477;
#line 116 ".ROOT/.boots/corelib/Interfaces/Wr.i3"
typedef struct { char* elts; int size[1]; } t71;
#line 14 "../Interfaces/Expr.i3"
#define t57 t71
#define TC36 TC_Expr__List
IMPORT TYPE TC_Expr__List;
#line 14
IMPORT char VS_Expr__List__3f87eceb2b9a246a; 
#define t39 ADDRESS
typedef int t4; 
#define TC39 TC_ADDRESS
IMPORT TYPE TC_ADDRESS; IMPORT char VS_ADDRESS__30f7308738738b44;
#line 17 "../Interfaces/Scope.i3"
#define t47 ADDRESS
#define t35 ADDRESS
#define TC35 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 t51 t71
#define TC47 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 t71
#define TC53 TC_Type__Map
IMPORT TYPE TC_Type__Map;
#line 16
IMPORT char VS_Type__Map__41dd9f4b33104fce;
#define t60 ADDRESS
#define t8 ADDRESS
#define TC8 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; t8 _type; } t61; 
#define TC60 TC_Type__List
IMPORT TYPE TC_Type__List;
#line 17
IMPORT char VS_Type__List__5791758e343becc1; 
#define t84 ADDRESS
#define TC84 TC_NULL
IMPORT TYPE TC_NULL; IMPORT char VS_NULL__fb50c7d53bec30dc;
#line 16 "./Stmt.i3"
typedef unsigned char t63;
typedef struct { int elts[1]; } t1; typedef unsigned char t2;
#line 19 "../Interfaces/M3.i3"
#define t3 ADDRESS
#define TC3 TC_M3__Temp
IMPORT TYPE TC_M3__Temp;
#line 19
IMPORT char VS_M3__Temp__450b691937f03dae;
#line 18 "LockStmt.m3"
#define t5 ADDRESS

#line 17 "../Interfaces/M3.i3"
#define t10 ADDRESS
#define TC10 TC_M3__Stmt
IMPORT TYPE TC_M3__Stmt;
#line 17
IMPORT char VS_M3__Stmt__376b307627fc1f2f;
#line 38 "../Interfaces/Scanner.i3"
typedef t83 (*t7)();
#line 20 "./StmtRep.i3"
typedef void (*t6)();
#line 18 "LockStmt.m3"
typedef struct { int filler; } t5_methods; 
#define t5_msize (sizeof (t5_methods))
typedef struct {
#line 18
 t14 _mutex; t10 _body; } t5_fields; 
#define t5_size (sizeof (t5_fields))
PRIVATE void t5_InitProc ();
#line 18
PRIVATE void t5_SetupProc (); PRIVATE void t5_PrintProc (); PRIVATE typecell t5_TC; PRIVATE typecell t5_TC_init = {0, 0, 0, 0, 0, (PROC)NIL,
#line 18
  t5_size, t5_msize, NIL, 0, 0, t5_InitProc,   t5_SetupProc,   t5_PrintProc, "", -1290364608, 829165957}; PRIVATE TYPE TC5 = &t5_TC; 
#line 15 "../Interfaces/Token.i3"
typedef unsigned char t9;
#line 45
typedef struct { int elts[4]; } t11;
#line 32 "LockStmt.m3"
typedef t10 (*t12)();
#line 13 "../Interfaces/String.i3"
#define t13 ADDRESS
#define TC13 TC_String__T
IMPORT TYPE TC_String__T;
#line 13
IMPORT char VS_String__T__3a6c7dc12615e4ee; 
#define t28 ADDRESS
 typedef struct { TYPE self; int private; } t28_methods; 
#define t28_msize (sizeof (t28_methods))
typedef struct { ADDRESS methods; } t28_fields; 
#define t28_size (sizeof (t28_fields))
#define TC28 TC_ROOT
IMPORT TYPE TC_ROOT; IMPORT char VS_ROOT__349f58f628be0ac6; 
#define t28_MapProc TC_ROOT->mapProc
#define t15 ADDRESS
#define TC15 TC_Rd__T
IMPORT TYPE TC_Rd__T;
#line 83 ".ROOT/.boots/corelib/Interfaces/Rd.i3"
IMPORT char VS_Rd__T__2555b70b3f7780b1; 
#define t15_MapProc TC_Rd__T->mapProc
#define t16 ADDRESS
#define TC16 TC_TEXT
IMPORT TYPE TC_TEXT; IMPORT char VS_TEXT__b7a92447326386f5; 
#define t16_MapProc TC_TEXT->mapProc
typedef t13 (*t17)();
#line 13 "../Interfaces/Scanner.i3"
typedef struct { t9 _token; t13 _string; t4 _value; t4 _offset; } t18;
#line 287 ".ROOT/.boots/corelib/Interfaces/Rd.i3"
typedef t2 (*t19)(); typedef int t20;
#line 249
typedef t20 (*t21)();
#line 220
typedef t16 (*t22)(); typedef unsigned char t23;
#line 189
#define t24 t71
typedef t23 (*t25)();
#line 84
typedef unsigned char t26;
#line 37 "../Interfaces/Procedure.i3"
#define t29 t71
#define t30 ADDRESS
#define TC30 TC_Procedure__T
IMPORT TYPE TC_Procedure__T;
#line 15
IMPORT char VS_Procedure__T__be7ead4a3afd8be5;
#line 37
typedef t3 (*t31)();
#line 17 "../Interfaces/CallExpr.i3"
#define t32 ADDRESS
#define TC32 TC_CallExpr__MethodList
IMPORT TYPE TC_CallExpr__MethodList;
#line 17
IMPORT char VS_CallExpr__MethodList__7e87c2d720444b71;
#line 21 "../Interfaces/Procedure.i3"
typedef t8 (*t33)();
#line 14 "../Interfaces/Decl.i3"
typedef struct { t13 _alias; t2 _isExternal; t2 _isInline; t2 _isUnused; t2 _isObsolete; } t34;
#line 39 "../Interfaces/CallExpr.i3"
typedef t14 (*t37)();
#line 27
typedef t32 (*t38)();
#line 27 "../Interfaces/Emit.i3"
typedef signed_char t40;
#line 63
typedef t40 (*t41)();
#line 19 "../Interfaces/String.i3"
typedef signed_char t67;
#line 65 "../Interfaces/Token.i3"
#define t65 t71
typedef struct { t13 elts[100]; } t68;
#line 17 "../Interfaces/String.i3"
typedef struct { t4 _top; t68 _stk; } t42;
#line 16 "../Interfaces/Variable.i3"
#define t43 ADDRESS
#define TC43 TC_Variable__T
IMPORT TYPE TC_Variable__T;
#line 16
IMPORT char VS_Variable__T__be7ead4a3afd8be5; typedef double t44;
#line 14 "../Interfaces/M3.i3"
#define t45 ADDRESS
#define TC45 TC_M3__Scope
IMPORT TYPE TC_M3__Scope;
#line 14
IMPORT char VS_M3__Scope__6e6d8848308d8a2d;
#line 24 "../Interfaces/Variable.i3"
typedef t43 (*t46)();
#line 14 "../Interfaces/String.i3"
typedef struct { t13 _module; t13 _item; } t48;
#line 38 "../Interfaces/Scope.i3"
typedef t35 (*t49)();
#line 31
typedef t45 (*t50)();
#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 { t7 _bind; t7 _check; t7 _precompile; t6 _compile; } t56_methods; 
#define t56_msize (sizeof (t56_methods))
typedef struct {
#line 13
 t10 _next; t4 _origin; } t56_fields; 
#define t56_size (sizeof (t56_fields))
#define TC56 TC_M3__Stmt
typedef t53 (*t58)();
#line 97 "../Interfaces/Type.i3"
typedef t4 (*t59)();
#line 65 "../Interfaces/Token.i3"
typedef struct { t13 elts[97]; } t66;
#line 67 ".ROOT/.boots/corelib/Interfaces/Text.i3"
typedef signed_char t69; typedef t69 (*t70)();
#line 91 ".ROOT/.boots/corelib/Interfaces/Wr.i3"
typedef unsigned char t72;
#line 15 ".ROOT/.boots/corelib/Interfaces/Thread.i3"
#define t73 ADDRESS
#define TC73 TC_Thread__T
IMPORT TYPE TC_Thread__T;
#line 15
IMPORT char VS_Thread__T__2555b70b3f7780b1; 
#define t73_MapProc TC_Thread__T->mapProc
typedef t27 (*t74)();



#define t75 ADDRESS
#define TC75 TC_Thread__Condition
IMPORT TYPE TC_Thread__Condition;
#line 21
IMPORT char VS_Thread__Condition__26d5968239e08f4e; 
#define t75_MapProc TC_Thread__Condition->mapProc
#define t76 ADDRESS
#define TC76 TC_MUTEX
IMPORT TYPE TC_MUTEX; IMPORT char VS_MUTEX__1f9d4e89391ab815; 
#define t76_MapProc TC_MUTEX->mapProc
typedef t73 (*t77)();
#line 23
#define t78 ADDRESS

#line 23
typedef struct { t74 _apply; } t78_methods; 
#define t78_msize (sizeof (t78_methods))
typedef struct {
#line 23
 int filler; } t78_fields; 
#define t78_size (sizeof (t78_fields))
#define TC78 TC_Thread__Closure
IMPORT TYPE TC_Thread__Closure;
#line 23
IMPORT char VS_Thread__Closure__7fb5c6232c5a658a; 
#define t78_MapProc TC_Thread__Closure->mapProc
typedef t75 (*t79)();





typedef t76 (*t80)();
#line 28
#define t81 ADDRESS

#line 28
typedef struct { int filler; } t81_methods; 
#define t81_msize (sizeof (t81_methods))
typedef struct {
#line 28
 t20 _stackSize; } t81_fields; 
#define t81_size (sizeof (t81_fields))
#define TC81 TC_Thread__SizedClosure
IMPORT TYPE TC_Thread__SizedClosure;
#line 28
IMPORT char VS_Thread__SizedClosure__8a46717d2eae7b07; 
#define t81_MapProc TC_Thread__SizedClosure->mapProc
typedef CLOSURE t82; typedef float t85;
#line 11 "LockStmt.m3"
IMPORT INITLINK* Scanner__init; IMPORT INITLINK* Procedure__init; IMPORT INITLINK* Scope__init; IMPORT INITLINK* Value__init;
#line 11
IMPORT INITLINK* String__init; IMPORT INITLINK* Token__init; IMPORT INITLINK* Variable__init; IMPORT INITLINK* Emit__init;
#line 11
IMPORT INITLINK* Temp__init; IMPORT INITLINK* Marker__init; IMPORT INITLINK* StmtRep__init; IMPORT INITLINK* Stmt__init; IMPORT INITLINK* Type__init;
#line 11
IMPORT INITLINK* Error__init; IMPORT INITLINK* Mutex__init; IMPORT INITLINK* Expr__init; IMPORT INITLINK* LockStmt__init;
#line 11
 IMPORT t83 _Scanner__Match (); IMPORT char VS_Scanner__Match__aaf5b32f2f19a6d8;     IMPORT TYPE TC_Scope__T; IMPORT char VS_Scope__T__3a6c7dc12615e4ee;
#line 11
  IMPORT TYPE TC_Value__T; IMPORT char VS_Value__T__2446b70b3f7780a5;   IMPORT t13 _String__Add (); IMPORT char VS_String__Add__0f5e21cc3d204b63;
#line 11
  IMPORT t11 _Token__DeclStart; IMPORT char VS_Token__DeclStart__730c82bc2c2001b8; IMPORT t11 _Token__TypeStart; IMPORT char VS_Token__TypeStart__f71616cb38a20d02;
#line 11
IMPORT t11 _Token__ExprStart; IMPORT char VS_Token__ExprStart__21dc8a0a27344836;     IMPORT char VS_Emit__MaxStream__cf0a0e8934c9c9f3;
#line 11
IMPORT TYPE TC_Emit__Format; IMPORT char VS_Emit__Format__bc4a2b083b93bbd7; IMPORT t83 _Emit__Op (); IMPORT char VS_Emit__Op__072646cc27c8ae10;
#line 11
IMPORT t83 _Emit__OpII (); IMPORT char VS_Emit__OpII__2247fe46332f901b; IMPORT t83 _Emit__OpT (); IMPORT char VS_Emit__OpT__764bdffe21d249e8;
#line 11
  IMPORT TYPE TC_Temp__T; IMPORT char VS_Temp__T__3a6c7dc12615e4ee; IMPORT t83 _Temp__Free (); IMPORT char VS_Temp__Free__3b952a2225c26846;
#line 11
  IMPORT TYPE TC_Marker__Prefix; IMPORT char VS_Marker__Prefix__819dde3f21a97326; IMPORT t83 _Marker__Pop (); IMPORT char VS_Marker__Pop__e998f6f7244b0f3e;
#line 11
IMPORT t83 _Marker__PushFinally (); IMPORT char VS_Marker__PushFinally__0a3f25a0352cef57; IMPORT t83 _Marker__StartOfFinally ();
#line 11
IMPORT char VS_Marker__StartOfFinally__c8ccfcac30ec0eb4; IMPORT t83 _Marker__MiddleOfFinally (); IMPORT char VS_Marker__MiddleOfFinally__4f35fb60268cef8a;
#line 11
IMPORT t83 _Marker__EndOfFinally (); IMPORT char VS_Marker__EndOfFinally__40d9236d36eae813;   IMPORT t83 _StmtRep__Init ();
#line 11
IMPORT char VS_StmtRep__Init__fe14377c36e397de;   IMPORT TYPE TC_Stmt__T; IMPORT char VS_Stmt__T__2446b70b3f7780a5; IMPORT t10 _Stmt__Parse ();
#line 11
IMPORT char VS_Stmt__Parse__35df10ad3fd1dfe6; IMPORT t83 _Stmt__Bind (); IMPORT char VS_Stmt__Bind__55f2c79a304c25df; IMPORT t83 _Stmt__TypeCheck ();
#line 11
IMPORT char VS_Stmt__TypeCheck__e228c94928564a9d; IMPORT t83 _Stmt__Precompile (); IMPORT char VS_Stmt__Precompile__68dddedb3aa69659;
#line 11
IMPORT void _Stmt__Compile (); IMPORT char VS_Stmt__Compile__53f9f2c43edb087a;   IMPORT TYPE TC_Type__T; IMPORT char VS_Type__T__2446b70b3f7780a5;
#line 11
IMPORT t4 _Type__Name (); IMPORT char VS_Type__Name__f99416972257a869; IMPORT t2 _Type__IsSubtype (); IMPORT char VS_Type__IsSubtype__8591fba5245cb882;
#line 11
  IMPORT t83 _Error__Msg (); IMPORT char VS_Error__Msg__4d119a332467757f;   IMPORT t8 _Mutex__T; IMPORT char VS_Mutex__T__da6a23733f9a6521;
#line 11
  IMPORT TYPE TC_Expr__T; IMPORT char VS_Expr__T__2446b70b3f7780a5; IMPORT t14 _Expr__Parse (); IMPORT char VS_Expr__Parse__193c41662e6da77f;
#line 11
IMPORT t83 _Expr__Bind (); IMPORT char VS_Expr__Bind__7e2752da3eaf56eb; IMPORT t8 _Expr__TypeOf (); IMPORT char VS_Expr__TypeOf__fef0a11b388c64fa;
#line 11
IMPORT t2 _Expr__IsDesignator (); IMPORT char VS_Expr__IsDesignator__e3556614321cb906; IMPORT t2 _Expr__IsWritable (); IMPORT char VS_Expr__IsWritable__85b9bb292e4a0f55;
#line 11
IMPORT t83 _Expr__TypeCheck (); IMPORT char VS_Expr__TypeCheck__af9aa9073729e7f7; IMPORT t3 _Expr__CompileLValue (); IMPORT char VS_Expr__CompileLValue__46b9da092357ba5c;
#line 11
  EXPORT t10 _LockStmt__Parse (); EXPORT char VS_LockStmt__Parse__585f341225cf8881 = '\0'; PRIVATE TYPE TC_LockStmt__P; PRIVATE t13 _LockStmt__labelPrefix;
#line 11
PRIVATE t4 _LockStmt__nextID; PRIVATE t83 _LockStmt__Bind (); PRIVATE t83 _LockStmt__Check (); PRIVATE t83 _LockStmt__Precompile ();
#line 11
PRIVATE void _LockStmt__Compile ();  IMPORT char VS_M3__Stmt__8851da472c4ee5cd;    
#line 32 "LockStmt.m3"
 EXPORT t10 _LockStmt__Parse (_fail) t11 * _fail; { t5 z0; t11 z3; t4 z4; t11 z5; t11 z2; t11 z1; t14 z6; t5 z7; t10 z8;
#line 32 "LockStmt.m3"
{ auto t5 _p; auto t10 __result; {

      ZERO1  (& _p);
#line 32
      CHECKSTACKOVERFLOW;



      { register char** ptr = (char**) UNEWOBJ (TC5); z0 = (t5) ptr; }; _p = z0;
      _StmtRep__Init (_p);
      z3.elts [0] = 0; z3.elts [1] = 0x00240000; z3.elts [2] = 0; z3.elts [3] = 0; z5 = z3; _Scanner__Match ( 66 , &(*_fail), &z5);
      z2.elts [0] = 0; z2.elts [1] = 0x00240000; z2.elts [2] = 0; z2.elts [3] = 0; z3.elts[0] = (*_fail).elts[0] | z2.elts[0];
#line 39
      z3.elts[1] = (*_fail).elts[1] | z2.elts[1]; z3.elts[2] = (*_fail).elts[2] | z2.elts[2]; z3.elts[3] = (*_fail).elts[3] | z2.elts[3];
#line 39
      z1 = z3; z6 = _Expr__Parse (&z1); NILCHECKA (z7 = _p); (((t5_fields*)(z7+(0+t56_size+t64_size)))->_mutex) = z6;
      z3.elts [0] = 0; z3.elts [1] = 0x00200000; z3.elts [2] = 0; z3.elts [3] = 0; z5 = z3; _Scanner__Match ( 50 , &(*_fail), &z5);
      z2.elts [0] = 0; z2.elts [1] = 0x00200000; z2.elts [2] = 0; z2.elts [3] = 0; z3.elts[0] = (*_fail).elts[0] | z2.elts[0];
#line 41
      z3.elts[1] = (*_fail).elts[1] | z2.elts[1]; z3.elts[2] = (*_fail).elts[2] | z2.elts[2]; z3.elts[3] = (*_fail).elts[3] | z2.elts[3];
#line 41
      z1 = z3; z8 = _Stmt__Parse (&z1); NILCHECKA (z7 = _p); (((t5_fields*)(z7+(0+t56_size+t64_size)))->_body) = z8;
      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 46 "LockStmt.m3"
 PRIVATE t83 _LockStmt__Bind (_p) t5 _p; { t5 z2;
#line 46 "LockStmt.m3"
{ { CHECKSTACKOVERFLOW;

      NILCHECKA (z2 = _p); _Expr__Bind ((((t5_fields*)(z2+(0+t56_size+t64_size)))->_mutex));
      NILCHECKA (z2 = _p); _Stmt__Bind ((((t5_fields*)(z2+(0+t56_size+t64_size)))->_body)); } } };
#line 52 "LockStmt.m3"
 PRIVATE t83 _LockStmt__Check (_p) t5 _p; { t5 z2; t8 z3; t2 z4; t2 z0;
#line 52 "LockStmt.m3"
{ auto t8 _t; { CHECKSTACKOVERFLOW;


      NILCHECKA (z2 = _p); _Expr__TypeCheck ((((t5_fields*)(z2+(0+t56_size+t64_size)))->_mutex));
      NILCHECKA (z2 = _p); z3 = _Expr__TypeOf ((((t5_fields*)(z2+(0+t56_size+t64_size)))->_mutex)); _t = z3;
      z4 = _Type__IsSubtype (_t, _Mutex__T); z0 = ! z4; if (z0) {
         _Error__Msg (((ADDRESS)(& txt1.str))); goto if_1_end; }; NILCHECKA (z2 = _p); z4 = _Expr__IsDesignator ((((t5_fields*)(z2+(0+t56_size+t64_size)))->_mutex));
#line 58
      z0 = ! z4; if (z0) {

         _Error__Msg (((ADDRESS)(& txt2.str))); goto if_1_end; }; NILCHECKA (z2 = _p); z4 = _Expr__IsWritable ((((t5_fields*)(z2+(0+t56_size+t64_size)))->_mutex));
#line 60
      z0 = ! z4; if (z0) {

         _Error__Msg (((ADDRESS)(& txt3.str))); goto if_1_end; }; if_1_end: /**/;

      _Marker__PushFinally (0,  0 );
      NILCHECKA (z2 = _p); _Stmt__TypeCheck ((((t5_fields*)(z2+(0+t56_size+t64_size)))->_body));
      _Marker__Pop (); } } };
#line 69 "LockStmt.m3"
 PRIVATE t83 _LockStmt__Precompile (_p) t5 _p; { t5 z2;
#line 69 "LockStmt.m3"
{ { CHECKSTACKOVERFLOW;

      _Marker__PushFinally (0,  0 );
      NILCHECKA (z2 = _p); _Stmt__Precompile ((((t5_fields*)(z2+(0+t56_size+t64_size)))->_body));
      _Marker__Pop (); } } };
#line 76 "LockStmt.m3"
 PRIVATE void _LockStmt__Compile (_p, _return) t5 _p; t1* _return; { t4 z2; t5 z3; t3 z4; t2 z5; t13 z6; t1 z7;
#line 76 "LockStmt.m3"
{ auto t4 _i; auto t4 _label; auto t3 _x; auto t2 _returnSeen; auto t2 _exitSeen; auto t1 _oc; auto t1 __result; {

      ZERO1B (& _returnSeen); ZERO1B (& _exitSeen);
#line 76
      CHECKSTACKOVERFLOW;



      z2 = _Type__Name (_Mutex__T); _i = z2;
      NILCHECKA (z3 = _p); z4 = _Expr__CompileLValue ((((t5_fields*)(z3+(0+t56_size+t64_size)))->_mutex)); _x = z4;
      z5 = (_LockStmt__labelPrefix == 0); if (z5) { z6 = _String__Add (((ADDRESS)(& txt4.str)),  999999 ); _LockStmt__labelPrefix = z6;
#line 82
         goto if_2_end; }; if_2_end: /**/;
      _label = _LockStmt__nextID; _LockStmt__nextID +=  1 ;
      _Emit__OpII (((ADDRESS)(& txt5.str)), _i, _i);
      _Emit__OpT (((ADDRESS)(& txt6.str)), _x);
      _Temp__Free (_x);
      _Emit__Op (((ADDRESS)(& txt7.str)));
      _Marker__StartOfFinally (_LockStmt__labelPrefix, _label);
      NILCHECKA (z3 = _p); _Stmt__Compile ((((t5_fields*)(z3+(0+t56_size+t64_size)))->_body), &z7); _oc.elts[0] = z7.elts[0];
      _Marker__MiddleOfFinally (_LockStmt__labelPrefix, _label, &_returnSeen, &_exitSeen);
      _Emit__Op (((ADDRESS)(& txt8.str)));
      _Marker__EndOfFinally (_LockStmt__labelPrefix, _label, _returnSeen, _exitSeen);
      _Emit__Op (((ADDRESS)(& txt9.str)));
      __result = _oc; *_return = __result; return; } } };  PRIVATE int init_done = -1;
#line 94 "LockStmt.m3"
 PRIVATE void LockStmt__initProc (g) int g; {
#line 94 "LockStmt.m3"
if (init_done >= g) return; init_done = g; INITIALIZE (& LockStmt__init); INITIALIZE (& Scanner__init); INITIALIZE (& Procedure__init);
#line 94
INITIALIZE (& Scope__init); INITIALIZE (& Value__init); INITIALIZE (& String__init); INITIALIZE (& Token__init); INITIALIZE (& Variable__init);
#line 94
INITIALIZE (& Emit__init); INITIALIZE (& Temp__init); INITIALIZE (& Marker__init); INITIALIZE (& StmtRep__init); INITIALIZE (& Stmt__init);
#line 94
INITIALIZE (& Type__init); INITIALIZE (& Error__init); INITIALIZE (& Mutex__init); INITIALIZE (& Expr__init);
#line 29
ZERO1  ((& _LockStmt__labelPrefix));
ZERO1  ((& _LockStmt__nextID));
#line 94
return; }; 
#line 94 "LockStmt.m3"
PRIVATE void t5_InitProc (obj) char* obj; { register t5_fields* p;
#line 94 "LockStmt.m3"
CHECKSTACKOVERFLOW; p = (t5_fields*) (obj + TC10->datasize); }; 
#line 94 "LockStmt.m3"
PRIVATE void t5_SetupProc () { register int* p;
#line 94 "LockStmt.m3"
t5_TC.datasize += TC10->datasize; t5_TC.methodsize += TC10->methodsize; p = (int*) UALLOC (t5_TC.methodsize); COPY (TC10->defaultMethods, p, (TC10->methodsize));
#line 94
p[0] = (int)(& t5_TC); p[1] = 0; ((t56_methods*) (((char*)p) + TC64->methodsize))->_bind = _LockStmt__Bind; ((t56_methods*) (((char*)p) + TC64->methodsize))->_check = _LockStmt__Check;
#line 94
((t56_methods*) (((char*)p) + TC64->methodsize))->_precompile = _LockStmt__Precompile; ((t56_methods*) (((char*)p) + TC64->methodsize))->_compile = _LockStmt__Compile;
#line 94
t5_TC.defaultMethods = (char*) p; }; 
#line 94 "LockStmt.m3"
PRIVATE void t5_PrintProc (obj) char *obj; { t5_fields* o;
#line 94 "LockStmt.m3"
CHECKSTACKOVERFLOW; if (TC10->printProc != 0) {TC10->printProc (obj); } fprintf (stderr, "{%s} ", TC5->brand); o = (t5_fields*) (obj + TC10->datasize);
#line 94
fprintf (stderr, "mutex = %#x", o->_mutex); fprintf (stderr, ", "); fprintf (stderr, "body = %#x", o->_body); fprintf (stderr, ", ");
#line 94
 };   PRIVATE INITLINK me_0 ={(INITLINK*)NIL, 0, LockStmt__initProc}; static char* VSimports[] = { &VS_Scanner__Match__aaf5b32f2f19a6d8,
&VS_Procedure__T__be7ead4a3afd8be5, &VS_Scope__T__3a6c7dc12615e4ee, &VS_Scope__ValueList__64bf053e22e4e53c, &VS_Value__T__2446b70b3f7780a5,
&VS_String__T__3a6c7dc12615e4ee, &VS_String__Add__0f5e21cc3d204b63, &VS_Token__DeclStart__730c82bc2c2001b8, &VS_Token__TypeStart__f71616cb38a20d02,
&VS_Token__ExprStart__21dc8a0a27344836, &VS_Variable__T__be7ead4a3afd8be5, &VS_Emit__MaxStream__cf0a0e8934c9c9f3, &VS_Emit__Format__bc4a2b083b93bbd7,
&VS_Emit__Op__072646cc27c8ae10, &VS_Emit__OpII__2247fe46332f901b, &VS_Emit__OpT__764bdffe21d249e8, &VS_Temp__T__3a6c7dc12615e4ee,
&VS_Temp__Free__3b952a2225c26846, &VS_Marker__Prefix__819dde3f21a97326, &VS_Marker__Pop__e998f6f7244b0f3e, &VS_Marker__PushFinally__0a3f25a0352cef57,
&VS_Marker__StartOfFinally__c8ccfcac30ec0eb4, &VS_Marker__MiddleOfFinally__4f35fb60268cef8a, &VS_Marker__EndOfFinally__40d9236d36eae813,
&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_Type__T__2446b70b3f7780a5,
&VS_Type__Map__41dd9f4b33104fce, &VS_Type__List__5791758e343becc1, &VS_Type__Name__f99416972257a869, &VS_Type__IsSubtype__8591fba5245cb882,
&VS_Error__Msg__4d119a332467757f, &VS_Mutex__T__da6a23733f9a6521, &VS_Expr__T__2446b70b3f7780a5, &VS_Expr__List__3f87eceb2b9a246a,
&VS_Expr__Parse__193c41662e6da77f, &VS_Expr__Bind__7e2752da3eaf56eb, &VS_Expr__TypeOf__fef0a11b388c64fa, &VS_Expr__IsDesignator__e3556614321cb906,
&VS_Expr__IsWritable__85b9bb292e4a0f55, &VS_Expr__TypeCheck__af9aa9073729e7f7, &VS_Expr__CompileLValue__46b9da092357ba5c,
&VS_Scanner__Match__aaf5b32f2f19a6d8, NIL };  void LockStmt__MLink (phase) int phase; { switch (phase) { case 0: { me_0.link = LockStmt__init; LockStmt__init = & me_0;
         t5_TC = t5_TC_init; REGISTERTYPE (TC5); break; }; case 1: { t5_TC.parent = TC_M3__Stmt; break; }; case 2: { break; }; };
 };