/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1993 by Xerox Corporation.  All rights reserved. */
/* time: September 30, 1993 10:52:59 am PDT */
/* C2C version: April 20, 1993 (sun4) */
/* ref-counting: off */
/* file: X11SerialDevicesImpl, module: X11SerialDevicesImpl */ 
/* switches: bcfhklnouw */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob_version [3309719945,1682690933] X11SerialDevicesImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef word (*fPt)();
typedef struct {word f0, f1;} W2;
typedef struct {word f0, f1, f2, f3, f4, f5, f6;} W7;
typedef W2 *W2Pt;
typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8;
typedef struct {word f0, f1, f2;} W3;
typedef struct {W8 f; W3 r;} W11;
typedef struct {word f0, f1, f2, f3, f4, f5;} W6;
typedef struct {word f0, f1, f2, f3;} W4;
typedef W4 *W4Pt;
typedef struct {word f0, f1, f2, f3, f4;} W5;
typedef struct {W8 f; W5 r;} W13;
#define SOURCE(p, l) /* source p, l */
#define BCK(idx, lim) ( ((unsigned) idx) >= ((unsigned) lim) ? (XR_RaiseBoundsFault()) : (idx) )
#define SGNCK(i) ((int) (word) (i) < 0 ? XR_RaiseArithmeticFault(): i )
static void NoName_Q2004();
static void X11SerialDevicesImpl_P0();
static void Reopen_P60();
static void OpenHandle_P120();
static void Close_P180();
static void CloseDeviceInternal_P240();
static void GrabInputProcess_P300();
static word NoName_Q2064();
static void Register_P360();
static word NoName_Q2124();
static void UnRegister_P420();
static word GetClientData_P480();
static void InputProcess_P540();
static word NoName_Q2184();
static word CheckBufferSpace_P600();
static word NoName_Q2244();
static void NewEvents_P660();
static word NoName_Q2304();
static word InOrder_P720();
static void Read_P780();
static word More_P840();
static word NoName_Q2364();
static void TimeoutEvent_P900();
static void ThreadRead_P960();
static word NoName_Q2424();
static word GetEvent_P1848();
static void ProcessInput_P1020();
static word NoName_Q2484();
static void DoProcessInput_P1080();
static void SetHToNIL_P1140();
static void WaitForRegistration_P1200();
static void StartSerialDevices_P1260();
static void NoName_Q2544();
static void NoName_Q2604();
static void NoName_Q2664();
static void NoName_Q2724();
static void NoName_Q2784();
static void NoName_Q2844();
static void NoName_Q2904();
static void NoName_Q2964();
static word NoName_Q3024();
static word NoName_Q3084();
static word NoName_Q3144();
static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\326\205\271\265\300\242\132\343\272\100\164\000\000"};
static struct {unsigned f; char r[8];} string2 = {393222, "\006\0014\004C\377\000"};
static struct {unsigned f; char r[16];} string3 = {851984, "\257\300\326\205\271\265\300\242\132\343\272\100\200\000\000"};
static struct {unsigned f; char r[4];} string4 = {196611, "\004@B"};
static struct {unsigned f; char r[4];} string5 = {131076, "\216\251\000"};
static struct {unsigned f; char r[4];} string6 = {65537, "\001\000\000"};
static struct {unsigned f; char r[8];} string7 = {458760, "Timeout"};
static struct {unsigned f; char r[8];} string8 = {393224, "Closed\000"};
static struct {unsigned f; char r[16];} string9 = {851984, "\257\300\305\106\121\211\300\144\113\323\165\100\164\000\000"};
static struct {unsigned f; char r[12];} string10 = {524296, "\006\002\040\001\100\134\004\003\000\000\000"};
static struct {unsigned f; char r[16];} string11 = {851984, "\257\300\240\236\274\315\300\111\163\325\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string12 = {851984, "\257\300\211\056\077\074\300\127\047\310\242\100\150\000\000"};
static struct {unsigned f; char r[16];} string13 = {851984, "\257\300\271\306\277\300\300\056\100\244\210\100\150\000\000"};
static struct {unsigned f; char r[16];} string14 = {851984, "\257\300\006\114\211\170\300\041\050\350\270\100\150\000\000"};
static struct {unsigned f; char r[16];} string15 = {851984, "\257\300\237\037\145\112\300\016\200\115\054\100\150\000\000"};
static struct {unsigned f; char r[16];} string16 = {851984, "\257\300\362\254\236\122\300\034\373\210\247\100\150\000\000"};
static struct {unsigned f; char r[32];} string17 = {1835040, "\211\020\017\126\151\145\167\145\162\163\127\157\162\154\144\117\142\152\300\362\254\236\122\300\034\373\210\247\000\000\000"};
static struct {unsigned f; char r[16];} string18 = {851984, "\257\300\142\333\162\163\300\240\356\210\327\100\200\000\000"};
static struct {unsigned f; char r[28];} string19 = {1638425, "\006\011\000\001\004\001\020\001\034\001\040\001\054\004\100\377\100\154\001\100\160\001\100\164\001\000\000"};
static struct {
   word f0[25]; word f25; word f26; word f27; 
   word f28; word f29; word f30; word f31; 
   word f32; word f33; word f34; word f35; 
   word f36; word f37; word f38; word f39; 
   word f40; word f41; word f42; word f43; 
   word f44; word f45; word f46; word f47; 
   word f48; word f49; word f50; word f51; 
   word f52; word f53; word f54; word f55; 
   word f56; word f57; word f58; word f59; 
   word f60; word f61; word f62; word f63; 
   word f64; word f65; word f66; word f67; 
   word f68[7]; 
   } globalframe = {
   {0}, (word) StartSerialDevices_P1260, 0, (word) WaitForRegistration_P1200, 
   0, (word) SetHToNIL_P1140, 0, (word) DoProcessInput_P1080, 
   0, (word) ProcessInput_P1020, 0, (word) ThreadRead_P960, 
   0, (word) TimeoutEvent_P900, 0, (word) More_P840, 
   0, (word) Read_P780, 0, (word) InOrder_P720, 
   0, (word) NewEvents_P660, 0, (word) CheckBufferSpace_P600, 
   0, (word) InputProcess_P540, 0, (word) GetClientData_P480, 
   0, (word) UnRegister_P420, 0, (word) Register_P360, 
   0, (word) GrabInputProcess_P300, 0, (word) CloseDeviceInternal_P240, 
   0, (word) Close_P180, 0, (word) OpenHandle_P120, 
   0, (word) Reopen_P60, 0, (word) X11SerialDevicesImpl_P0, 
   {0}
   };

static void NoName_Q2004()
   {
   register ptr gf_c0207 =  (ptr) &globalframe;
   word var_c16200;
   (* (( (ptr) gf_c0207)+18) ) = (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2);
   (* (( (ptr) gf_c0207)+20) ) = (word) XR_GetTypeIndex((word) &string3, 0, (word) &string4);
   (* (( (ptr) gf_c0207)+21) ) = (word) XR_GetTypeIndex((word) &string5, 0, (word) &string6);
   (*  (ptr) (( (bPt) gf_c0207)+92) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0207)+21) ), (word) &string7);
   (*  (ptr) (( (bPt) gf_c0207)+96) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0207)+21) ), (word) &string8);
   (void) XR_DeclareGlobalFrame((word) "X11SerialDevicesImpl", &globalframe, (word) XR_GetTypeIndex((word) &string9, 0, (word) &string10)
      , (word) (( (bPt) gf_c0207)+268)/* var_c15048 */ );
   var_c16200 = (word) XR_ImportInterface((word) "Process", (word) XR_GetTypeIndexS((word) (&string11)), 22);
   (* (( (ptr) gf_c0207)+69)/* var_c15176 */  ) = var_c16200;
   (void) XR_ImportProcS(var_c16200, 526081);
   (void) XR_ImportProcS(var_c16200, 263681);
   (void) XR_ImportProcS(var_c16200, 264449);
   (void) XR_ImportProcS(var_c16200, 527105);
   (void) XR_ImportProcS(var_c16200, 266241);
   (void) XR_ImportProcS(var_c16200, 67371521);
   (void) XR_ImportProcS(var_c16200, 525570);
   var_c16200 = (word) XR_ImportInterface((word) "UnixSysCalls", (word) XR_GetTypeIndexS((word) (&string12)), 77);
   (* (( (ptr) gf_c0207)+70)/* var_c15720 */  ) = var_c16200;
   (void) XR_ImportProcS(var_c16200, 67640066);
   var_c16200 = (word) XR_ImportInterface((word) "ViewersWorld", (word) XR_GetTypeIndexS((word) (&string13)), 26);
   (* (( (ptr) gf_c0207)+71)/* var_c16008 */  ) = var_c16200;
   (void) XR_ImportProcS(var_c16200, 67371009);
   var_c16200 = (word) XR_ImportInterface((word) "ViewersWorldInstance", (word) XR_GetTypeIndexS((word) (&string14)), 2);
   (* (( (ptr) gf_c0207)+72)/* var_c16104 */  ) = var_c16200;
   (void) XR_ImportProcS(var_c16200, 67108864);
   var_c16200 = (word) XR_ExportInterface((word) "InputDevice", (word) XR_GetTypeIndexS((word) (&string15)), 7);
   (* (( (ptr) gf_c0207)+73)/* var_c16232 */  ) = var_c16200;
   (void) XR_ExportProcS(var_c16200, (word) (( (bPt) gf_c0207)+220)/* var_c14856 */ , 1835015, (word) "Register");
   (void) XR_ExportProcS(var_c16200, (word) (( (bPt) gf_c0207)+212)/* var_c14824 */ , 262401, (word) "UnRegister");
   (void) XR_ExportProcS(var_c16200, (word) (( (bPt) gf_c0207)+260)/* var_c15016 */ , 512, (word) "Reopen");
   (void) XR_ExportProcS(var_c16200, (word) (( (bPt) gf_c0207)+244)/* var_c14952 */ , 768, (word) "Close");
   (void) XR_ExportProcS(var_c16200, (word) (( (bPt) gf_c0207)+132)/* var_c14504 */ , 1049604, (word) "ProcessInput");
   (void) XR_ExportProcS(var_c16200, (word) (( (bPt) gf_c0207)+204)/* var_c14792 */ , 67372289, (word) "GetClientData");
   (void) XR_ExportProcS(var_c16200, (word) (( (bPt) gf_c0207)+156)/* var_c14600 */ , 67372545, (word) "More");
   var_c16200 = (word) XR_ExportInterface((word) "ViewersWorldRefType", (word) XR_GetTypeIndexS((word) (&string16)), 1);
   (* (( (ptr) gf_c0207)+74)/* var_c16264 */  ) = var_c16200;
   (void) XR_ExportType((word) "ViewersWorldObj", (word) XR_GetTypeIndexS((word) (&string17)), (word) XR_GetTypeIndex((word) &string18, 0, (word) &string19)
      );
   }

static void X11SerialDevicesImpl_P0(formal_c044, formal_c043)
   word formal_c044;
   word formal_c043;
   {
   register ptr gf_c16296 =  (ptr) &globalframe;
   /* X11SerialDevicesImpl: */ 
SOURCE(186, 8791)
SOURCE(5352, 20)
   (* (( (ptr) gf_c16296)+15)/* activeReader_v3476 */  ) = (word) (( (bPt) gf_c16296)+140)/* var_c14536 */ ;
SOURCE(8957, 20)
   (void) StartSerialDevices_P1260();
   }

static void Reopen_P60()
   {
   register ptr gf_c16328 =  (ptr) &globalframe;
   word eventBuffer_v5844 = 0;
   /* Reopen: */ 
SOURCE(820, 492)
SOURCE(870, 80)
   if (((* (( (ptr) gf_c16328)+8)/* h_v3084 */  ) == 0)) {
SOURCE(884, 59)
      (void) OpenHandle_P120();
      }
   else {
SOURCE(943, 7)
      (void) Close_P180();
      };
SOURCE(1007, 305)
   {
      register word i_v5888 = 0;
      register word noName_c15080;
      noName_c15080 = (* (( (ptr) (* (( (ptr) gf_c16328)+8)/* h_v3084 */  ))+12) );
      if ((i_v5888 >= noName_c15080)) {
         goto lab_L100000;
         };
      lab_L100003: ;
SOURCE(1040, 272)
      eventBuffer_v5844 = (* ((( (ptr) (* (( (ptr) gf_c16328)+8)/* h_v3084 */  ))+13)+BCK(i_v5888, 10)) );
      if ((eventBuffer_v5844 != 0)) {
SOURCE(1080, 232)
         (void) Register_P360((* (( (ptr) eventBuffer_v5844)+1) ), (* (( (ptr) eventBuffer_v5844)+17) ), (* (( (ptr) eventBuffer_v5844)+2)
             ), (* (( (ptr) eventBuffer_v5844)+3) ), (* (( (ptr) eventBuffer_v5844)+4) ), (* (( (ptr) eventBuffer_v5844)+5) )
            , (* (( (ptr) eventBuffer_v5844)+6) ));
         };
      i_v5888 = (i_v5888 + 1);
      if ((i_v5888 < noName_c15080)) {
         goto lab_L100003;
         };
      lab_L100000: ;
      };
   }

static void OpenHandle_P120()
   {
   register ptr gf_c16360 =  (ptr) &globalframe;
   /* OpenHandle: */ 
SOURCE(1327, 159)
SOURCE(1361, 18)
   (* (( (ptr) gf_c16360)+8)/* h_v3084 */  ) = XR_NewObject(92, (* (( (ptr) gf_c16360)+18) ));
SOURCE(1381, 64)
   {
      word var_c15144;
      {
         word pd20;
         pd20 = (* (( (ptr) (* (( (ptr) gf_c16360)+69)/* var_c15176 */  ))+6) );
         var_c15144 = (word) ( *( (fPt) ((*  (ptr) pd20 ))))(1000, pd20);
         };
      {
         word pd21;
         pd21 = (* (( (ptr) (* (( (ptr) gf_c16360)+69)/* var_c15176 */  ))+9) );
         (void) ( *( (fPt) ((*  (ptr) pd21 ))))((word) (( (bPt) (* (( (ptr) gf_c16360)+8)/* h_v3084 */  ))+24), var_c15144, pd21);
         };
      };
SOURCE(1447, 39)
   {
      word pd22;
      pd22 = (* (( (ptr) (* (( (ptr) gf_c16360)+69)/* var_c15176 */  ))+20) );
      (void) ( *( (fPt) ((*  (ptr) pd22 ))))((word) ((( (bPt) (* (( (ptr) gf_c16360)+8)/* h_v3084 */  ))+24)), pd22);
      };
   }

static void Close_P180()
   {
   register ptr gf_c16392 =  (ptr) &globalframe;
   word eventBuffer_v5932 = 0;
   /* Close: */ 
SOURCE(1492, 193)
   (void) (XR_MonitorEntry((word) (( (bPt) gf_c16392)+16)/* LOCK_v2860 */ ));
SOURCE(1556, 20)
   if (((* (( (ptr) gf_c16392)+8)/* h_v3084 */  ) == 0)) {
SOURCE(1570, 6)
      (void) (XR_MonitorExit((word) (( (bPt) gf_c16392)+16)/* LOCK_v2860 */ ));
      return;
      };
SOURCE(1578, 107)
   {
      register word i_v5976 = 0;
      register word noName_c15208;
      noName_c15208 = (* (( (ptr) (* (( (ptr) gf_c16392)+8)/* h_v3084 */  ))+12) );
      if ((i_v5976 >= noName_c15208)) {
         goto lab_L100004;
         };
      lab_L100007: ;
SOURCE(1611, 74)
      eventBuffer_v5932 = (* ((( (ptr) (* (( (ptr) gf_c16392)+8)/* h_v3084 */  ))+13)+BCK(i_v5976, 10)) );
      if ((eventBuffer_v5932 != 0)) {
SOURCE(1653, 32)
         (void) CloseDeviceInternal_P240(eventBuffer_v5932);
         };
      i_v5976 = (i_v5976 + 1);
      if ((i_v5976 < noName_c15208)) {
         goto lab_L100007;
         };
      lab_L100004: ;
      };
SOURCE(1492, 193)
   (void) (XR_MonitorExit((word) (( (bPt) gf_c16392)+16)/* LOCK_v2860 */ ));
   return;
   }

static void CloseDeviceInternal_P240(b_v3856)
   word b_v3856;
   {
   register ptr gf_c16424 =  (ptr) &globalframe;
   W2 inputProcess_v6020;
   /* CloseDeviceInternal: */ 
SOURCE(1703, 355)
SOURCE(1760, 32)
   (*  (ptr) (word) &inputProcess_v6020 ) = 0;
   (* (( (ptr) (word) &inputProcess_v6020) + 1) ) = 0;
SOURCE(1794, 264)
   if ((0 != (*  (ptr) b_v3856 ))) {
SOURCE(1853, 16)
      (*  (ptr) b_v3856 ) = 0;
SOURCE(1871, 187)
      {
         W2 temp23;
         (void) GrabInputProcess_P300((word) &inputProcess_v6020, b_v3856);
         (*  (ptr) &temp23 ) = 0;
         (* (( (ptr) &temp23) + 1) ) = 0;
         if ( ! XR_EqualWords(&inputProcess_v6020, &temp23, 2)) {
SOURCE(1930, 128)
SOURCE(1932, 27)
            {
               word pd24;
               pd24 = (* (( (ptr) (* (( (ptr) gf_c16424)+69)/* var_c15176 */  ))+15) );
               (void) ( *( (fPt) ((*  (ptr) pd24 ))))(inputProcess_v6020, pd24);
               };
SOURCE(1961, 17)
             (void) XR_Join(inputProcess_v6020);
SOURCE(1980, 41)
            if (((* (( (ptr) b_v3856)+5) ) != 0)) {
SOURCE(2000, 21)
               {
                  word pd25;
                  pd25 = (* (( (ptr) b_v3856)+5) );
                  (void) ( *( (fPt) ((*  (ptr) pd25 ))))((* ((( (ptr) b_v3856)+6)) ), pd25);
                  };
               };
            };
         };
      };
   }

static void GrabInputProcess_P300(formal_c057, formal_c0271)
   word formal_c057;
   word formal_c0271;
   {
   W7 var_c16456;
   /* declaration of b_v3916 skipped */ 
   /* declaration of var_c3960 skipped */ 
   var_c16456.f4/* b_v3916 */  = formal_c0271;
   /* GrabInputProcess: */ 
SOURCE(2068, 223)
SOURCE(2145, 146)
   {
      word var_c01;
      {
         word var_c0247;
         var_c0247 = (word) &var_c16456;
         var_c01 = (word) XR_Enable(( ((word)  (fPt) NoName_Q2064) ), ( ((word)  (fPt) NoName_Q2964) ), var_c0247);
         };
      /* removed trivial cond node */ 
      };
   (*  (W2Pt) formal_c057 ) = (*  (W2Pt) (( (ptr) &var_c16456)+5)/* var_c3960 */  );
   return;
   }

static word NoName_Q2064(formal_c0213)
   word formal_c0213;
   {
SOURCE(2168, 107)
   if (((* (( (ptr) formal_c0213)+4) ) != 0)) {
SOURCE(2184, 91)
      {
         W2 inputProcess_v6080;
SOURCE(2186, 43)
         inputProcess_v6080 = (*  (W2Pt) (( (ptr) (* (( (ptr) formal_c0213)+4) ))+13) );
SOURCE(2231, 20)
         {
            word tmpAddr26;
            tmpAddr26 = (word) (( (ptr) (* (( (ptr) formal_c0213)+4) ))+13);
            (*  (ptr) tmpAddr26 ) = 0;
            (* (( (ptr) tmpAddr26) + 1) ) = 0;
            };
SOURCE(2253, 22)
         (*  (W2Pt) (( (ptr) formal_c0213)+5) ) = inputProcess_v6080;
         return(2);
         };
      };
SOURCE(2278, 13)
   {
      W2 var_c15240;
      (*  (ptr) (word) &var_c15240 ) = 0;
      (* (( (ptr) (word) &var_c15240) + 1) ) = 0;
      (*  (W2Pt) (( (ptr) formal_c0213)+5) ) = var_c15240;
      return(2);
      };
   /* c2c skipped dead code */ 
   }

static void Register_P360(formal_c0272, formal_c0273, formal_c0274, formal_c0275, formal_c0276, formal_c0277, formal_c0278)
   word formal_c0272;
   word formal_c0273;
   word formal_c0274;
   word formal_c0275;
   word formal_c0276;
   word formal_c0277;
   word formal_c0278;
   {
   W11 var_c16488;
   /* declaration of deviceName_v4036 skipped */ 
   /* declaration of bufferLength_v4064 skipped */ 
   /* declaration of open_v4092 skipped */ 
   /* declaration of eventReader_v4120 skipped */ 
   /* declaration of eventDispatch_v4148 skipped */ 
   /* declaration of close_v4176 skipped */ 
   /* declaration of clientData_v4204 skipped */ 
   register ptr gf_c16520 =  (ptr) &globalframe;
   (* (( (ptr) &var_c16488)+4)/* deviceName_v4036 */  ) = formal_c0272;
   (* (( (ptr) &var_c16488)+5)/* bufferLength_v4064 */  ) = formal_c0273;
   (* (( (ptr) &var_c16488)+6)/* open_v4092 */  ) = formal_c0274;
   (* (( (ptr) &var_c16488)+7)/* eventReader_v4120 */  ) = formal_c0275;
   (* (( (ptr) &var_c16488)+8)/* eventDispatch_v4148 */  ) = formal_c0276;
   (* (( (ptr) &var_c16488)+9)/* close_v4176 */  ) = formal_c0277;
   (* (( (ptr) &var_c16488)+10)/* clientData_v4204 */  ) = formal_c0278;
   /* Register: */ 
SOURCE(2295, 1430)
   (void) (XR_MonitorEntry((word) (( (bPt) gf_c16520)+16)/* LOCK_v2860 */ ));
SOURCE(2505, 1220)
   {
      word var_c0248;
      var_c0248 = (word) &var_c16488;
       (void) (word) XR_Enable(( ((word)  (fPt) NoName_Q2124) ), ( ((word)  (fPt) NoName_Q2904) ), var_c0248);
      };
SOURCE(2295, 1430)
   (void) (XR_MonitorExit((word) (( (bPt) gf_c16520)+16)/* LOCK_v2860 */ ));
   return;
   }

static word NoName_Q2124(formal_c0216)
   word formal_c0216;
   {
   register ptr gf_c0215 =  (ptr) &globalframe;
SOURCE(2528, 24)
   {
      word eventBuffer_v6140 = 0;
      word notifyRegister_v6168 = 0;
SOURCE(2584, 92)
      if (((* (( (ptr) gf_c0215)+8)/* h_v3084 */  ) == 0)) {
SOURCE(2640, 12)
         (void) OpenHandle_P120();
SOURCE(2655, 21)
         notifyRegister_v6168 = 1;
         };
SOURCE(2681, 421)
      {
         register word i_v6212 = 0;
         if (( (int)i_v6212 >  (int)9)) {
            goto lab_L100013;
            };
         lab_L100016: ;
SOURCE(2731, 177)
         if (((* ((( (ptr) (* (( (ptr) gf_c0215)+8)/* h_v3084 */  ))+13)+BCK(i_v6212, 10)) ) == 0)) {
SOURCE(2797, 61)
            {
               word var_c15272;
               {
                  word var_c15304;
                  word var_c15336;
                  word var_c15368;
                  {
                     word idx27;
                     var_c15304 = (
                        idx27 = (* (( (ptr) formal_c0216)+5) ),
                        BCK(idx27, 16777215)
                        );
                     };
                  var_c15336 = ((word) var_c15304 << 4);
                  var_c15368 = XR_NewObject((72 + var_c15336), (* (( (ptr) gf_c0215)+20) ));
                  (* (( (ptr) var_c15368)+17) ) = var_c15304;
                  var_c15272 = var_c15368;
                  };
               (* ((( (ptr) (* (( (ptr) gf_c0215)+8)/* h_v3084 */  ))+13)+BCK(i_v6212, 10)) ) = var_c15272;
               eventBuffer_v6140 = var_c15272;
               };
SOURCE(2860, 48)
            if (( (int)i_v6212 ==  (int)(* (( (ptr) (* (( (ptr) gf_c0215)+8)/* h_v3084 */  ))+12) ))) {
SOURCE(2881, 27)
               (* (( (ptr) (* (( (ptr) gf_c0215)+8)/* h_v3084 */  ))+12) ) = ((* (( (ptr) (* (( (ptr) gf_c0215)+8)/* h_v3084 */  ))+12) ) + 
               1);
               };
SOURCE(2954, 4)
            goto lab_L100014;
            };
SOURCE(2963, 139)
         if (((* (( (ptr) (* ((( (ptr) (* (( (ptr) gf_c0215)+8)/* h_v3084 */  ))+13)+BCK(i_v6212, 10)) ))+1) ) == (* (( (ptr) formal_c0216)+4)
          ))) {
SOURCE(3043, 25)
            eventBuffer_v6140 = (* ((( (ptr) (* (( (ptr) gf_c0215)+8)/* h_v3084 */  ))+13)+BCK(i_v6212, 10)) );
SOURCE(3070, 32)
            (void) CloseDeviceInternal_P240(eventBuffer_v6140);
SOURCE(3137, 4)
            goto lab_L100014;
            };
         if (( (int)i_v6212 >=  (int)9)) {
            goto lab_L100013;
            };
         i_v6212 = (i_v6212 + 1);
         goto lab_L100016;
         lab_L100013: ;
         lab_L100014: ;
         };
SOURCE(3156, 24)
      if ((eventBuffer_v6140 == 0)) {
SOURCE(3180, 5)
         (void) XR_RaiseUnnamedError();
         };
SOURCE(3203, 25)
      (*  (ptr) eventBuffer_v6140 ) = 1;
SOURCE(3230, 23)
      (* (( (ptr) eventBuffer_v6140)+2) ) = (* (( (ptr) formal_c0216)+6) );
SOURCE(3255, 35)
      (* (( (ptr) eventBuffer_v6140)+1) ) = (* (( (ptr) formal_c0216)+4) );
SOURCE(3292, 30)
      (* (( (ptr) eventBuffer_v6140)+3) ) = (* (( (ptr) formal_c0216)+7) );
SOURCE(3324, 36)
      (* (( (ptr) eventBuffer_v6140)+4) ) = (* (( (ptr) formal_c0216)+8) );
SOURCE(3362, 25)
      (* (( (ptr) eventBuffer_v6140)+5) ) = (* (( (ptr) formal_c0216)+9) );
SOURCE(3389, 35)
      (* (( (ptr) eventBuffer_v6140)+6) ) = (* (( (ptr) formal_c0216)+10) );
SOURCE(3426, 39)
      (* (( (ptr) eventBuffer_v6140)+16) ) = 0;
      (* (( (ptr) eventBuffer_v6140)+15) ) = 0;
SOURCE(3467, 58)
      if (((* (( (ptr) formal_c0216)+6) ) != 0)) {
SOURCE(3484, 41)
         {
            word pd28;
            pd28 = (* (( (ptr) formal_c0216)+6) );
            (* (( (ptr) eventBuffer_v6140)+6) ) = (word) ( *( (fPt) ((*  (ptr) pd28 ))))((* ((( (ptr) formal_c0216)+10)) ), pd28);
            };
         };
SOURCE(3565, 46)
      {
         word pd29;
         pd29 = (* (( (ptr) (* (( (ptr) gf_c0215)+69)/* var_c15176 */  ))+20) );
         (void) ( *( (fPt) ((*  (ptr) pd29 ))))((word) ((( (bPt) eventBuffer_v6140)+28)), pd29);
         };
SOURCE(3613, 70)
      {
         W2 var_c15400;
         {
            W2 var_c076;
            word var_c075;
            var_c075 = XR_ExtensionAlloc(6);
            {
               word tmpAddr30;
               tmpAddr30 = (word) var_c075;
               (*  (ptr) tmpAddr30 ) = ( ((word)  (fPt) NoName_Q3024) );
               (* (( (ptr) tmpAddr30) + 1) ) = 0;
               (* (( (ptr) tmpAddr30) + 2) ) = (word) (( (bPt) gf_c0215)+196)/* var_c14760 */ ;
               (* (( (ptr) tmpAddr30) + 3) ) = 0;
               (* (( (ptr) tmpAddr30) + 4) ) = eventBuffer_v6140;
               (* (( (ptr) tmpAddr30) + 5) ) = (* (( (ptr) formal_c0216)+7) );
               };
            (void) XR_Fork((word) &var_c076, var_c075);
            var_c15400 = var_c076;
            };
         (*  (W2Pt) (( (ptr) eventBuffer_v6140)+13) ) = var_c15400;
         };
SOURCE(3685, 40)
      if ((0 != notifyRegister_v6168)) {
SOURCE(3708, 17)
         (void) (XR_Notify((word) (( (bPt) gf_c0215)+36)/* registerCV_v3112 */ ));
         };
      };
   return(0);
   }

static void UnRegister_P420(deviceName_v4280)
   word deviceName_v4280;
   {
   register ptr gf_c16552 =  (ptr) &globalframe;
   word eventBuffer_v6256 = 0;
   /* UnRegister: */ 
SOURCE(3731, 265)
   (void) (XR_MonitorEntry((word) (( (bPt) gf_c16552)+16)/* LOCK_v2860 */ ));
SOURCE(3810, 20)
   if (((* (( (ptr) gf_c16552)+8)/* h_v3084 */  ) == 0)) {
SOURCE(3824, 6)
      (void) (XR_MonitorExit((word) (( (bPt) gf_c16552)+16)/* LOCK_v2860 */ ));
      return;
      };
SOURCE(3832, 164)
   {
      register word i_v6300 = 0;
      register word noName_c15432;
      noName_c15432 = (* (( (ptr) (* (( (ptr) gf_c16552)+8)/* h_v3084 */  ))+12) );
      if ((i_v6300 >= noName_c15432)) {
         goto lab_L100017;
         };
      lab_L100020: ;
SOURCE(3865, 131)
      {
         word tc31;
         eventBuffer_v6256 = (* ((( (ptr) (* (( (ptr) gf_c16552)+8)/* h_v3084 */  ))+13)+BCK(i_v6300, 10)) );
         if ((eventBuffer_v6256 != 0)) {
            tc31 =  (word) ((* (( (ptr) eventBuffer_v6256)+1) ) == deviceName_v4280);
            }
         else {
            tc31 =  (word) 0;
            };
         if (tc31) {
SOURCE(3945, 32)
            (void) CloseDeviceInternal_P240(eventBuffer_v6256);
SOURCE(3979, 17)
            (* ((( (ptr) (* (( (ptr) gf_c16552)+8)/* h_v3084 */  ))+13)+BCK(i_v6300, 10)) ) = 0;
            };
         };
      i_v6300 = (i_v6300 + 1);
      if ((i_v6300 < noName_c15432)) {
         goto lab_L100020;
         };
      lab_L100017: ;
      };
SOURCE(3731, 265)
   (void) (XR_MonitorExit((word) (( (bPt) gf_c16552)+16)/* LOCK_v2860 */ ));
   return;
   }

static word GetClientData_P480(deviceName_v4340)
   word deviceName_v4340;
   {
   register ptr gf_c16584 =  (ptr) &globalframe;
   word var_c4384;
   word eventBuffer_v6344 = 0;
   /* GetClientData: */ 
SOURCE(4065, 259)
   (void) (XR_MonitorEntry((word) (( (bPt) gf_c16584)+16)/* LOCK_v2860 */ ));
SOURCE(4161, 141)
   {
      register word i_v6388 = 0;
      register word noName_c15464;
      noName_c15464 = (* (( (ptr) (* (( (ptr) gf_c16584)+8)/* h_v3084 */  ))+12) );
      if ((i_v6388 >= noName_c15464)) {
         goto lab_L100021;
         };
      lab_L100024: ;
SOURCE(4194, 108)
      {
         word tc32;
         eventBuffer_v6344 = (* ((( (ptr) (* (( (ptr) gf_c16584)+8)/* h_v3084 */  ))+13)+BCK(i_v6388, 10)) );
         if ((eventBuffer_v6344 != 0)) {
            tc32 =  (word) ((* (( (ptr) eventBuffer_v6344)+1) ) == deviceName_v4340);
            }
         else {
            tc32 =  (word) 0;
            };
         if (tc32) {
SOURCE(4272, 30)
            {
               word var_c15496;
               var_c15496 = (* (( (ptr) eventBuffer_v6344)+6) );
               (void) (XR_MonitorExit((word) (( (bPt) gf_c16584)+16)/* LOCK_v2860 */ ));
               return(var_c15496);
               };
            };
         };
      i_v6388 = (i_v6388 + 1);
      if ((i_v6388 < noName_c15464)) {
         goto lab_L100024;
         };
      lab_L100021: ;
      };
SOURCE(4313, 11)
   (void) (XR_MonitorExit((word) (( (bPt) gf_c16584)+16)/* LOCK_v2860 */ ));
   return(0);
   }

static void InputProcess_P540(formal_c0279, formal_c0280)
   word formal_c0279;
   word formal_c0280;
   {
   W6 var_c16616;
   /* declaration of b_v4456 skipped */ 
   /* declaration of eventReader_v4484 skipped */ 
   var_c16616.f4/* b_v4456 */  = formal_c0279;
   var_c16616.f5/* eventReader_v4484 */  = formal_c0280;
   /* InputProcess: */ 
SOURCE(4330, 239)
SOURCE(4413, 156)
SOURCE(4413, 156)
   {
      word var_c02;
      {
         word var_c0249;
         var_c0249 = (word) &var_c16616;
         var_c02 = (word) XR_Enable(( ((word)  (fPt) NoName_Q2184) ), ( ((word)  (fPt) NoName_Q2844) ), var_c0249);
         };
      /* removed trivial cond node */ 
      };
   }

static word NoName_Q2184(formal_c0220)
   word formal_c0220;
   {
   register ptr gf_c0219 =  (ptr) &globalframe;
SOURCE(4441, 45)
   {
      word pd33;
      pd33 = (* (( (ptr) (* (( (ptr) gf_c0219)+69)/* var_c15176 */  ))+13) );
      (void) ( *( (fPt) ((*  (ptr) pd33 ))))(6, pd33);
      };
SOURCE(4488, 81)
   lab_L100031: ;
   if ((*  (ptr) (* (( (ptr) formal_c0220)+4) ) )) {
      }
   else {
      goto lab_L100029;
      };
SOURCE(4506, 63)
   {
      word var_c15528;
      {
         word var_c15560;
         var_c15560 = (word) CheckBufferSpace_P600((* ((( (ptr) formal_c0220)+4)) ));
         {
            word pd34;
            pd34 = (* (( (ptr) formal_c0220)+5) );
            var_c15528 = (word) ( *( (fPt) ((*  (ptr) pd34 ))))((* (( (ptr) formal_c0220)+4) ), var_c15560, (* (( (ptr) (* (( (ptr) formal_c0220)+4)
                   ))+6) ), pd34);
            };
         };
      (void) NewEvents_P660((* (( (ptr) formal_c0220)+4) ), var_c15528);
      };
   goto lab_L100031;
   lab_L100029: ;
   return(0);
   }

static word CheckBufferSpace_P600(formal_c0281)
   word formal_c0281;
   {
   W6 var_c16648;
   /* declaration of b_v4544 skipped */ 
   register ptr gf_c16680 =  (ptr) &globalframe;
   /* declaration of var_c03 skipped */ 
   word var_c4588;
   var_c16648.f4/* b_v4544 */  = formal_c0281;
   /* CheckBufferSpace: */ 
SOURCE(4584, 501)
   (void) (XR_MonitorEntry((word) (( (bPt) gf_c16680)+16)/* LOCK_v2860 */ ));
SOURCE(4656, 429)
   {
      word var_c04;
      {
         word var_c0250;
         var_c0250 = (word) &var_c16648;
         var_c04 = (word) XR_Enable(( ((word)  (fPt) NoName_Q2244) ), ( ((word)  (fPt) NoName_Q2784) ), var_c0250);
         };
      /* removed trivial cond node */ 
      };
   return(var_c16648.f5/* var_c03 */ );
   }

static word NoName_Q2244(formal_c0223)
   word formal_c0223;
   {
   register ptr gf_c0222 =  (ptr) &globalframe;
SOURCE(4679, 364)
   lab_L100036: ;
   if ((*  (ptr) (* (( (ptr) formal_c0223)+4) ) )) {
      }
   else {
      goto lab_L100034;
      };
   {
      word n_v6432;
SOURCE(4697, 24)
      n_v6432 = ((* (( (ptr) (* (( (ptr) formal_c0223)+4) ))+16) ) - (* (( (ptr) (* (( (ptr) formal_c0223)+4) ))+15) ));
SOURCE(4723, 53)
      if ((n_v6432 == 0)) {
SOURCE(4738, 19)
         (* (( (ptr) (* (( (ptr) formal_c0223)+4) ))+16) ) = 0;
         (* (( (ptr) (* (( (ptr) formal_c0223)+4) ))+15) ) = 0;
SOURCE(4759, 17)
         {
            word var_c15592;
            var_c15592 = (* (( (ptr) (* (( (ptr) formal_c0223)+4) ))+17) );
            (void) (XR_MonitorExit((word) (( (bPt) gf_c0222)+16)/* LOCK_v2860 */ ));
            (* (( (ptr) formal_c0223)+5) ) = var_c15592;
            return(1);
            };
         };
SOURCE(4779, 191)
      if (((* (( (ptr) (* (( (ptr) formal_c0223)+4) ))+15) ) > n_v6432) ||  ( ((* (( (ptr) (* (( (ptr) formal_c0223)+4) ))+15) ) > 0) ? ( (int)((* (
         ( (ptr) (* (( (ptr) formal_c0223)+4) ))+17) ) - (* (( (ptr) (* (( (ptr) formal_c0223)+4) ))+16) )) <  (int)2) : 0 ) ) {
SOURCE(4853, 93)
         {
            word limit35;
            word idx36;
            word limit37;
            (void) Basics_MoveWords((word) (( (W4Pt) (( (bPt) (* (( (ptr) formal_c0223)+4) ))+72))+(
                     limit35 = (* (( (ptr) (* (( (ptr) formal_c0223)+4) ))+17) ),
                     BCK(0, limit35)
                     )), (word) (( (W4Pt) (( (bPt) (* (( (ptr) formal_c0223)+4) ))+72))+(
                     idx36 = (* (( (ptr) (* (( (ptr) formal_c0223)+4) ))+15) ),
                     limit37 = (* (( (ptr) (* (( (ptr) formal_c0223)+4) ))+17) ),
                     BCK(idx36, limit37)
                     )), ((word) n_v6432 << 2));
            };
SOURCE(4948, 11)
         (* (( (ptr) (* (( (ptr) formal_c0223)+4) ))+15) ) = 0;
SOURCE(4961, 9)
         (* (( (ptr) (* (( (ptr) formal_c0223)+4) ))+16) ) = n_v6432;
         };
SOURCE(4975, 48)
      if (((* (( (ptr) (* (( (ptr) formal_c0223)+4) ))+16) ) < (* (( (ptr) (* (( (ptr) formal_c0223)+4) ))+17) ))) {
SOURCE(5000, 23)
         {
            word var_c15624;
            var_c15624 = ((* (( (ptr) (* (( (ptr) formal_c0223)+4) ))+17) ) - (* (( (ptr) (* (( (ptr) formal_c0223)+4) ))+16) ));
            (void) (XR_MonitorExit((word) (( (bPt) gf_c0222)+16)/* LOCK_v2860 */ ));
            (* (( (ptr) formal_c0223)+5) ) = var_c15624;
            return(1);
            };
         };
SOURCE(5025, 18)
      (void) (XR_Wait((word) (( (bPt) gf_c0222)+16)/* LOCK_v2860 */ , (word) (( (bPt) (* (( (ptr) formal_c0223)+4) ))+28)));
      };
   goto lab_L100036;
   lab_L100034: ;
SOURCE(5054, 19)
   (* (( (ptr) (* (( (ptr) formal_c0223)+4) ))+16) ) = 0;
   (* (( (ptr) (* (( (ptr) formal_c0223)+4) ))+15) ) = 0;
SOURCE(5075, 10)
   (void) (XR_MonitorExit((word) (( (bPt) gf_c0222)+16)/* LOCK_v2860 */ ));
   (* (( (ptr) formal_c0223)+5) ) = 0;
   return(1);
   /* c2c skipped dead code */ 
   }

static void NewEvents_P660(formal_c0282, formal_c0283)
   word formal_c0282;
   word formal_c0283;
   {
   W6 var_c16712;
   /* declaration of b_v4648 skipped */ 
   /* declaration of n_v4676 skipped */ 
   register ptr gf_c16744 =  (ptr) &globalframe;
   var_c16712.f4/* b_v4648 */  = formal_c0282;
   var_c16712.f5/* n_v4676 */  = formal_c0283;
   /* NewEvents: */ 
SOURCE(5091, 119)
   (void) (XR_MonitorEntry((word) (( (bPt) gf_c16744)+16)/* LOCK_v2860 */ ));
SOURCE(5142, 68)
   {
      word var_c0251;
      var_c0251 = (word) &var_c16712;
       (void) (word) XR_Enable(( ((word)  (fPt) NoName_Q2304) ), ( ((word)  (fPt) NoName_Q2724) ), var_c0251);
      };
SOURCE(5091, 119)
   (void) (XR_MonitorExit((word) (( (bPt) gf_c16744)+16)/* LOCK_v2860 */ ));
   return;
   }

static word NoName_Q2304(formal_c0226)
   word formal_c0226;
   {
   register ptr gf_c0225 =  (ptr) &globalframe;
SOURCE(5165, 17)
   {
      word idx38;
      (* (( (ptr) (* (( (ptr) formal_c0226)+4) ))+16) ) = (
         idx38 = (word) ((* (( (ptr) (* (( (ptr) formal_c0226)+4) ))+16) ) + (* (( (ptr) formal_c0226)+5) )),
         SGNCK(idx38)
         );
      };
SOURCE(5184, 26)
   (void) (XR_Broadcast((word) (( (bPt) (* (( (ptr) gf_c0225)+8)/* h_v3084 */  ))+24)));
   return(0);
   }

static word InOrder_P720(t1_v4736, t2_v4764)
   W2 t1_v4736;
   W2 t2_v4764;
   {
   word var_c4808;
   /* InOrder: */ 
SOURCE(5216, 132)
SOURCE(5277, 71)
   {
      word tc39;
      if ((t1_v4736.f0 < t2_v4764.f0)) {
         tc39 =  (word)  (unsigned) 1;
         }
      else {
         if ((t1_v4736.f0 == t2_v4764.f0)) {
            tc39 =  (word)  (unsigned) (t1_v4736.f1 <= t2_v4764.f1);
            }
         else {
            tc39 =  (word)  (unsigned) 0;
            };
         };
      return(tc39);
      };
   }

static void Read_P780(formal_c0110, timeout_v5028)
   word formal_c0110;
   word timeout_v5028;
   {
   register ptr gf_c16776 =  (ptr) &globalframe;
   W4 e_v5072;
   word deviceName_v5100;
   word dispatch_v5128;
   /* Read: */ 
SOURCE(5503, 186)
SOURCE(5503, 186)
   deviceName_v5100 = 0;
SOURCE(5503, 186)
   dispatch_v5128 = 0;
SOURCE(5640, 49)
   {
      W6 var_c15656;
      {
         word pd40;
         pd40 = (* (( (ptr) gf_c16776)+15)/* activeReader_v3476 */  );
         (void) ( *( (fPt) ((*  (ptr) pd40 ))))((word) &var_c15656, timeout_v5028, pd40);
         };
      dispatch_v5128 = XR_CheckProc(var_c15656.f5);
      deviceName_v5100 = var_c15656.f4;
      e_v5072 = (*  (W4Pt) &var_c15656 );
      };
   /* removed tail goto */ 
   (*  (W4Pt) formal_c0110 ) = e_v5072;
   (* (( (ptr) formal_c0110)+4) ) = deviceName_v5100;
   (* (( (ptr) formal_c0110)+5) ) = dispatch_v5128;
   return;
   }

static word More_P840(formal_c0284)
   word formal_c0284;
   {
   W6 var_c16808;
   /* declaration of deviceName_v5188 skipped */ 
   register ptr gf_c16840 =  (ptr) &globalframe;
   /* declaration of var_c05 skipped */ 
   word var_c5232;
   var_c16808.f4/* deviceName_v5188 */  = formal_c0284;
   /* More: */ 
SOURCE(5695, 386)
   (void) (XR_MonitorEntry((word) (( (bPt) gf_c16840)+16)/* LOCK_v2860 */ ));
SOURCE(5762, 319)
   {
      word var_c06;
      {
         word var_c0252;
         var_c0252 = (word) &var_c16808;
         var_c06 = (word) XR_Enable(( ((word)  (fPt) NoName_Q2364) ), ( ((word)  (fPt) NoName_Q2664) ), var_c0252);
         };
      /* removed trivial cond node */ 
      };
   return(var_c16808.f5/* var_c05 */ );
   }

static word NoName_Q2364(formal_c0230)
   word formal_c0230;
   {
   register ptr gf_c0229 =  (ptr) &globalframe;
SOURCE(5785, 271)
   {
      register word i_v6476 = 0;
      register word noName_c15688;
      noName_c15688 = (* (( (ptr) (* (( (ptr) gf_c0229)+8)/* h_v3084 */  ))+12) );
      if ((i_v6476 >= noName_c15688)) {
         goto lab_L100042;
         };
      lab_L100045: ;
      {
         word b_v6520;
SOURCE(5818, 28)
         b_v6520 = (* ((( (ptr) (* (( (ptr) gf_c0229)+8)/* h_v3084 */  ))+13)+BCK(i_v6476, 10)) );
SOURCE(5848, 14)
         if ((b_v6520 == 0)) {
SOURCE(5862, 4)
            goto lab_L100044;
            };
SOURCE(5925, 131)
         if (((* (( (ptr) formal_c0230)+4) ) == 0) || ((* (( (ptr) b_v6520)+1) ) == (* (( (ptr) formal_c0230)+4) ))) {
SOURCE(5977, 79)
            {
               word tc41;
               word idx42;
               word limit43;
               if (((* (( (ptr) b_v6520)+15) ) < (* (( (ptr) b_v6520)+16) ))) {
                  tc41 =  (word) XR_EqualWords((( (ptr) (( (W4Pt) (( (ptr) b_v6520)+18))+(
/*1*/   idx42 = (* (( (ptr) b_v6520)+15) ),
/*1*/   limit43 = (* (( (ptr) b_v6520)+17) ),
/*1*/   BCK(idx42, limit43)
/*1*/   )))+2), (( (ptr) (* (( (ptr) gf_c0229)+8)/* h_v3084 */  ))+4), 2);
                  }
               else {
                  tc41 =  (word) 0;
                  };
               if (tc41) {
SOURCE(6043, 13)
                  (void) (XR_MonitorExit((word) (( (bPt) gf_c0229)+16)/* LOCK_v2860 */ ));
                  (* (( (ptr) formal_c0230)+5) ) = 1;
                  return(1);
                  };
               };
            };
         };
      lab_L100044: ;
      i_v6476 = (i_v6476 + 1);
      if ((i_v6476 < noName_c15688)) {
         goto lab_L100045;
         };
      lab_L100042: ;
      };
SOURCE(6067, 14)
   (void) (XR_MonitorExit((word) (( (bPt) gf_c0229)+16)/* LOCK_v2860 */ ));
   (* (( (ptr) formal_c0230)+5) ) = 0;
   return(1);
   /* c2c skipped dead code */ 
   }

static void TimeoutEvent_P900(formal_c0122)
   word formal_c0122;
   {
   register ptr gf_c16872 =  (ptr) &globalframe;
   W4 var_c5292;
   word var_c5320;
   W2 now_v6564;
   W2 tz_v6592;
   /* TimeoutEvent: */ 
SOURCE(6087, 224)
SOURCE(6188, 41)
   {
      word var_c15752;
      word pd44;
      pd44 = (* (( (ptr) (* (( (ptr) gf_c16872)+70)/* var_c15720 */  ))+31) );
      var_c15752 = (word) ( *( (fPt) ((*  (ptr) pd44 ))))((word) &now_v6564, (word) &tz_v6592, pd44);
      };
SOURCE(6231, 80)
   {
      word var_c15816;
      var_c15816 = (* (( (ptr) gf_c16872)+23) );
      var_c5292.f0 = 4294901760;
      var_c5292.f1 = 0;
      (*  (W2Pt) (( (ptr) &var_c5292)+2) ) = now_v6564;
      var_c5320 = var_c15816;
      /* removed tail goto */ 
      };
   (*  (W4Pt) formal_c0122 ) = var_c5292;
   (* (( (ptr) formal_c0122)+4) ) = var_c5320;
   return;
   }

static void ThreadRead_P960(formal_c0128, formal_c0285)
   word formal_c0128;
   word formal_c0285;
   {
   W13 var_c16904;
   /* declaration of timeout_v5380 skipped */ 
   register ptr gf_c16936 =  (ptr) &globalframe;
   /* declaration of e_v5424 skipped */ 
   /* declaration of deviceName_v5452 skipped */ 
   /* declaration of dispatch_v5480 skipped */ 
   /* declaration of var_c15848 skipped */ 
   (* (( (ptr) &var_c16904)+4)/* timeout_v5380 */  ) = formal_c0285;
   /* ThreadRead: */ 
SOURCE(6317, 1270)
   {
      word tmpAddr45;
      tmpAddr45 = (word) (( (ptr) &var_c16904)+11)/* var_c15848 */ ;
      (*  (ptr) tmpAddr45 ) = ( ((word)  (fPt) GetEvent_P1848) );
      (* (( (ptr) tmpAddr45) + 1) ) = 1;
      };
   (void) (XR_MonitorEntry((word) (( (bPt) gf_c16936)+16)/* LOCK_v2860 */ ));
SOURCE(6317, 1270)
   (* (( (ptr) &var_c16904)+9)/* deviceName_v5452 */  ) = 0;
SOURCE(6317, 1270)
   (* (( (ptr) &var_c16904)+10)/* dispatch_v5480 */  ) = 0;
SOURCE(6461, 1126)
   {
      word var_c0253;
      var_c0253 = (word) &var_c16904;
       (void) (word) XR_Enable(( ((word)  (fPt) NoName_Q2424) ), ( ((word)  (fPt) NoName_Q2604) ), var_c0253);
      };
   /* removed tail goto */ 
   (void) (XR_MonitorExit((word) (( (bPt) gf_c16936)+16)/* LOCK_v2860 */ ));
   (*  (W4Pt) formal_c0128 ) = (*  (W4Pt) (( (ptr) &var_c16904)+5)/* e_v5424 */  );
   (* (( (ptr) formal_c0128)+4) ) = (* (( (ptr) &var_c16904)+9)/* deviceName_v5452 */  );
   (* (( (ptr) formal_c0128)+5) ) = (* (( (ptr) &var_c16904)+10)/* dispatch_v5480 */  );
   return;
   }

static word NoName_Q2424(formal_c0234)
   word formal_c0234;
   {
   register ptr gf_c0233 =  (ptr) &globalframe;
SOURCE(6484, 33)
SOURCE(7165, 388)
   if ((0 == (word) GetEvent_P1848((word) ((( (bPt) formal_c0234)+44))))) {
SOURCE(7190, 363)
      if (( (int)(* (( (ptr) formal_c0234)+4) ) ==  (int)0)) {
SOURCE(7210, 46)
         {
            W5 var_c15880;
            (void) TimeoutEvent_P900((word) (&var_c15880));
            (* (( (ptr) formal_c0234)+9) ) = var_c15880.f4;
            (*  (W4Pt) (( (ptr) formal_c0234)+5) ) = (*  (W4Pt) &var_c15880 );
            };
         }
      else {
SOURCE(7256, 297)
SOURCE(7258, 151)
         if (( (int)(* (( (ptr) formal_c0234)+4) ) ==  (int)2147483647)) {
SOURCE(7295, 47)
            {
               word pd46;
               pd46 = (* (( (ptr) (* (( (ptr) gf_c0233)+69)/* var_c15176 */  ))+10) );
               (void) ( *( (fPt) ((*  (ptr) pd46 ))))((word) ((( (bPt) (* (( (ptr) gf_c0233)+8)/* h_v3084 */  ))+24)), pd46);
               };
            }
         else {
SOURCE(7342, 67)
            {
               word var_c15912;
               {
                  word pd47;
                  word idx48;
                  pd47 = (* (( (ptr) (* (( (ptr) gf_c0233)+69)/* var_c15176 */  ))+6) );
                  var_c15912 = (word) ( *( (fPt) ((*  (ptr) pd47 ))))((
                        idx48 = (* (( (ptr) formal_c0234)+4) ),
                        SGNCK(idx48)
                        ), pd47);
                  };
               {
                  word pd49;
                  pd49 = (* (( (ptr) (* (( (ptr) gf_c0233)+69)/* var_c15176 */  ))+9) );
                  (void) ( *( (fPt) ((*  (ptr) pd49 ))))((word) (( (bPt) (* (( (ptr) gf_c0233)+8)/* h_v3084 */  ))+24), var_c15912, pd49);
                  };
               };
            };
SOURCE(7411, 122)
         lab_L100053: ;
SOURCE(7414, 21)
         (void) (XR_Wait((word) (( (bPt) gf_c0233)+16)/* LOCK_v2860 */ , (word) (( (bPt) (* (( (ptr) gf_c0233)+8)/* h_v3084 */  ))+24)
            ));
SOURCE(7437, 19)
         if ((0 != (word) GetEvent_P1848((word) ((( (bPt) formal_c0234)+44))))) {
SOURCE(7456, 4)
            goto lab_L100052;
            };
SOURCE(7462, 71)
         if (( (int)(* (( (ptr) formal_c0234)+4) ) !=  (int)2147483647)) {
SOURCE(7501, 32)
            {
               W5 var_c15944;
               (void) TimeoutEvent_P900((word) (&var_c15944));
               (* (( (ptr) formal_c0234)+9) ) = var_c15944.f4;
               (*  (W4Pt) (( (ptr) formal_c0234)+5) ) = (*  (W4Pt) &var_c15944 );
               };
SOURCE(7535, 4)
            goto lab_L100052;
            };
         goto lab_L100053;
         lab_L100052: ;
         };
      };
SOURCE(7559, 28)
   (*  (W2Pt) (( (ptr) (* (( (ptr) gf_c0233)+8)/* h_v3084 */  ))+4) ) = (*  (W2Pt) (( (ptr) formal_c0234)+7) );
   return(0);
   }

static word GetEvent_P1848(formal_c17000)
   word formal_c17000;
   {
   register ptr gf_c16968 =  (ptr) &globalframe;
   word var_c6712;
   word best_v6740 = 0;
   word anyActive_v6768 = 0;
   formal_c17000 = (formal_c17000 - 44);
   /* GetEvent: */ 
SOURCE(6484, 33)
SOURCE(6577, 288)
   {
      register word i_v6812 = 0;
      register word noName_c15976;
      noName_c15976 = (* (( (ptr) (* (( (ptr) gf_c16968)+8)/* h_v3084 */  ))+12) );
      if ((i_v6812 >= noName_c15976)) {
         goto lab_L100054;
         };
      lab_L100057: ;
      {
         word b_v6856;
SOURCE(6610, 28)
         b_v6856 = (* ((( (ptr) (* (( (ptr) gf_c16968)+8)/* h_v3084 */  ))+13)+BCK(i_v6812, 10)) );
SOURCE(6640, 14)
         if ((b_v6856 == 0)) {
SOURCE(6654, 4)
            goto lab_L100056;
            };
SOURCE(6660, 33)
         if ((0 != anyActive_v6768)) {
            anyActive_v6768 =  (unsigned) 1;
            }
         else {
            anyActive_v6768 =  (unsigned) (0 != (*  (ptr) b_v6856 ));
            };
SOURCE(6695, 170)
         if ( ( (0 != (*  (ptr) b_v6856 )) ? ((* (( (ptr) b_v6856)+15) ) < (* (( (ptr) b_v6856)+16) )) : 0 ) ) {
SOURCE(6734, 131)
            {
               word idx51;
               word limit52;
               if ((best_v6740 == 0)) { goto then050;};
               if ((0 != (word) InOrder_P720((*  (W2Pt) (( (ptr) (( (W4Pt) (( (ptr) b_v6856)+18))+(
                           idx51 = (* (( (ptr) b_v6856)+15) ),
                           limit52 = (* (( (ptr) b_v6856)+17) ),
                           BCK(idx51, limit52)
                           )))+2) ), (*  (W2Pt) (( (ptr) formal_c17000)+7) )))) {
                  then050: ;
SOURCE(6791, 8)
                  best_v6740 = b_v6856;
SOURCE(6801, 14)
                  {
                     word idx53;
                     word limit54;
                     (*  (W4Pt) (( (ptr) formal_c17000)+5) ) = (* (( (W4Pt) (( (ptr) b_v6856)+18))+(
                           idx53 = (* (( (ptr) b_v6856)+15) ),
                           limit54 = (* (( (ptr) b_v6856)+17) ),
                           BCK(idx53, limit54)
                           )) );
                     };
SOURCE(6817, 25)
                  (* (( (ptr) formal_c17000)+9) ) = (* (( (ptr) b_v6856)+1) );
SOURCE(6844, 21)
                  (* (( (ptr) formal_c17000)+10) ) = XR_CheckProc(* (( (ptr) b_v6856)+4) );
                  };
               };
            };
         };
      lab_L100056: ;
      i_v6812 = (i_v6812 + 1);
      if ((i_v6812 < noName_c15976)) {
         goto lab_L100057;
         };
      lab_L100054: ;
      };
SOURCE(6882, 142)
   if ((0 == anyActive_v6768)) {
SOURCE(6906, 81)
      (* (( (ptr) formal_c17000)+5) ) = 4294901760;
      (* (( (ptr) formal_c17000)+6) ) = 0;
      (*  (W2Pt) (( (ptr) formal_c17000)+7) ) = (*  (W2Pt) (( (ptr) (* (( (ptr) gf_c16968)+8)/* h_v3084 */  ))+4) );
SOURCE(6989, 20)
      (* (( (ptr) formal_c17000)+9) ) = (* (( (ptr) gf_c16968)+24) );
SOURCE(7011, 13)
      return(1);
      };
SOURCE(7029, 33)
   if ((best_v6740 == 0)) {
SOURCE(7048, 14)
      return(0);
      };
SOURCE(7064, 27)
   (* (( (ptr) best_v6740)+15) ) = ((* (( (ptr) best_v6740)+15) ) + 1);
SOURCE(7093, 53)
   if (((* (( (ptr) best_v6740)+15) ) == (* (( (ptr) best_v6740)+16) ))) {
SOURCE(7123, 23)
      (void) (XR_Notify((word) (( (bPt) best_v6740)+28)));
      };
SOURCE(7148, 14)
   return(1);
   }

static void ProcessInput_P1020(formal_c0286, formal_c0287, formal_c0288, formal_c0289)
   word formal_c0286;
   word formal_c0287;
   word formal_c0288;
   word formal_c0289;
   {
   W8 var_c17032;
   /* declaration of viewersWorld_v5540 skipped */ 
   /* declaration of goAway_v5568 skipped */ 
   /* declaration of updateMouse_v5596 skipped */ 
   /* declaration of updatePen_v5624 skipped */ 
   var_c17032.f4/* viewersWorld_v5540 */  = formal_c0286;
   var_c17032.f5/* goAway_v5568 */  = formal_c0287;
   var_c17032.f6/* updateMouse_v5596 */  = formal_c0288;
   var_c17032.f7/* updatePen_v5624 */  = formal_c0289;
   /* ProcessInput: */ 
SOURCE(7593, 265)
SOURCE(7756, 88)
SOURCE(7756, 88)
   {
      word var_c07;
      {
         word var_c0254;
         var_c0254 = (word) &var_c17032;
         var_c07 = (word) XR_Enable(( ((word)  (fPt) NoName_Q2484) ), ( ((word)  (fPt) NoName_Q2544) ), var_c0254);
         };
      /* removed trivial cond node */ 
      };
SOURCE(7851, 7)
   (void) Close_P180();
   }

static word NoName_Q2484(formal_c0237)
   word formal_c0237;
   {
SOURCE(7784, 60)
   (void) DoProcessInput_P1080((* (( (ptr) formal_c0237)+4) ), (* (( (ptr) formal_c0237)+5) ), (* (( (ptr) formal_c0237)+6) ), (* (
         ( (ptr) formal_c0237)+7) ));
   return(0);
   }

static void DoProcessInput_P1080(viewersWorld_v5684, goAway_v5712, updateMouse_v5740, updatePen_v5768)
   word viewersWorld_v5684;
   word goAway_v5712;
   word updateMouse_v5740;
   word updatePen_v5768;
   {
   register ptr gf_c17064 =  (ptr) &globalframe;
   W4 e_v6928;
   word deviceName_v6956 = 0;
   word dispatch_v6984 = 0;
   word userInput_v7012;
   /* DoProcessInput: */ 
SOURCE(7864, 798)
SOURCE(8306, 71)
   {
      word pd55;
      pd55 = (* (( (ptr) (* (( (ptr) gf_c17064)+71)/* var_c16008 */  ))+4) );
      userInput_v7012 = (word) ( *( (fPt) ((*  (ptr) pd55 ))))(viewersWorld_v5684, pd55);
      };
SOURCE(8380, 44)
   {
      word pd56;
      pd56 = (* (( (ptr) (* (( (ptr) gf_c17064)+69)/* var_c15176 */  ))+13) );
      (void) ( *( (fPt) ((*  (ptr) pd56 ))))(4, pd56);
      };
SOURCE(8426, 179)
   lab_L100064: ;
SOURCE(8429, 36)
   {
      W6 var_c16040;
      (void) Read_P780((word) &var_c16040, 50);
      dispatch_v6984 = XR_CheckProc(var_c16040.f5);
      deviceName_v6956 = var_c16040.f4;
      e_v6928 = (*  (W4Pt) &var_c16040 );
      };
SOURCE(8467, 27)
   if ((deviceName_v6956 == (* (( (ptr) gf_c17064)+24) ))) {
SOURCE(8494, 4)
      goto lab_L100063;
      };
SOURCE(8521, 84)
   if ((dispatch_v6984 != 0)) {
SOURCE(8544, 61)
      {
         word var_c16072;
         var_c16072 = (word) GetClientData_P480(deviceName_v6956);
         (void) ( *( (fPt) ((*  (ptr) dispatch_v6984 ))))(e_v6928, deviceName_v6956, 0, var_c16072, dispatch_v6984);
         };
      };
   goto lab_L100064;
   lab_L100063: ;
SOURCE(8629, 11)
   (void) SetHToNIL_P1140();
SOURCE(8642, 20)
   (void) StartSerialDevices_P1260();
   }

static void SetHToNIL_P1140()
   {
   register ptr gf_c17096 =  (ptr) &globalframe;
   /* SetHToNIL: */ 
SOURCE(8669, 33)
   (void) (XR_MonitorEntry((word) (( (bPt) gf_c17096)+16)/* LOCK_v2860 */ ));
SOURCE(8696, 6)
   (* (( (ptr) gf_c17096)+8)/* h_v3084 */  ) = 0;
SOURCE(8669, 33)
   (void) (XR_MonitorExit((word) (( (bPt) gf_c17096)+16)/* LOCK_v2860 */ ));
   return;
   }

static void WaitForRegistration_P1200()
   {
   register ptr gf_c17128 =  (ptr) &globalframe;
   word vw_v7056;
   /* WaitForRegistration: */ 
SOURCE(8708, 165)
   (void) (XR_MonitorEntry((word) (( (bPt) gf_c17128)+16)/* LOCK_v2860 */ ));
SOURCE(8745, 57)
   {
      word pd57;
      pd57 = (* (( (ptr) (* (( (ptr) gf_c17128)+72)/* var_c16104 */  ))+4) );
      vw_v7056 = (word) ( *( (fPt) ((*  (ptr) pd57 ))))(pd57);
      };
SOURCE(8804, 15)
   (void) (XR_Wait((word) (( (bPt) gf_c17128)+16)/* LOCK_v2860 */ , (word) (( (bPt) gf_c17128)+36)/* registerCV_v3112 */ ));
SOURCE(8821, 52)
   {
      W2 var_c16136;
      {
         W2 var_c0158;
         word var_c0157;
         var_c0157 = XR_ExtensionAlloc(8);
         {
            word tmpAddr58;
            tmpAddr58 = (word) var_c0157;
            (*  (ptr) tmpAddr58 ) = ( ((word)  (fPt) NoName_Q3084) );
            (* (( (ptr) tmpAddr58) + 1) ) = 0;
            (* (( (ptr) tmpAddr58) + 2) ) = (word) (( (bPt) gf_c17128)+132)/* var_c14504 */ ;
            (* (( (ptr) tmpAddr58) + 3) ) = 0;
            (* (( (ptr) tmpAddr58) + 4) ) = vw_v7056;
            (* (( (ptr) tmpAddr58) + 5) ) = 0;
            (* (( (ptr) tmpAddr58) + 6) ) = 0;
            (* (( (ptr) tmpAddr58) + 7) ) = 0;
            };
         (void) XR_Fork((word) &var_c0158, var_c0157);
         var_c16136 = var_c0158;
         };
      {
         word pd59;
         pd59 = (* (( (ptr) (* (( (ptr) gf_c17128)+69)/* var_c15176 */  ))+11) );
         (void) ( *( (fPt) ((*  (ptr) pd59 ))))(var_c16136, pd59);
         };
      };
SOURCE(8708, 165)
   (void) (XR_MonitorExit((word) (( (bPt) gf_c17128)+16)/* LOCK_v2860 */ ));
   return;
   }

static void StartSerialDevices_P1260()
   {
   register ptr gf_c17160 =  (ptr) &globalframe;
   /* StartSerialDevices: */ 
SOURCE(8879, 72)
SOURCE(8909, 42)
   {
      W2 var_c16168;
      {
         W2 var_c0164;
         word var_c0163;
         var_c0163 = XR_ExtensionAlloc(4);
         {
            word tmpAddr60;
            tmpAddr60 = (word) var_c0163;
            (*  (ptr) tmpAddr60 ) = ( ((word)  (fPt) NoName_Q3144) );
            (* (( (ptr) tmpAddr60) + 1) ) = 0;
            (* (( (ptr) tmpAddr60) + 2) ) = (word) (( (bPt) gf_c17160)+108)/* var_c14408 */ ;
            (* (( (ptr) tmpAddr60) + 3) ) = 0;
            };
         (void) XR_Fork((word) &var_c0164, var_c0163);
         var_c16168 = var_c0164;
         };
      {
         word pd61;
         pd61 = (* (( (ptr) (* (( (ptr) gf_c17160)+69)/* var_c15176 */  ))+11) );
         (void) ( *( (fPt) ((*  (ptr) pd61 ))))(var_c16168, pd61);
         };
      };
   }

static void NoName_Q2544(formal_c0171, formal_c200028, formal_c200029, formal_c200030, formal_c200031)
   word formal_c0171;
   word formal_c200028;
   word formal_c200029;
   word formal_c200030;
   word formal_c200031;
   {
   if ((formal_c200029 == XR_Aborted)) {
SOURCE(7774, 8)
      (*  (ptr) formal_c0171 ) = 2;
      (* (( (ptr) formal_c0171)+1) ) = 4;
      return;
      };
   (*  (ptr) formal_c0171 ) = 0;
   (* (( (ptr) formal_c0171)+1) ) = 0;
   return;
   }

static void NoName_Q2604(formal_c0176, formal_c200024, formal_c200025, formal_c200026, formal_c200027)
   word formal_c0176;
   word formal_c200024;
   word formal_c200025;
   word formal_c200026;
   word formal_c200027;
   {
   register ptr gf_c0242 =  (ptr) &globalframe;
   if ((formal_c200025 == XR_Unwind)) {
      (void) (XR_MonitorExit((word) (( (bPt) gf_c0242)+16)/* LOCK_v2860 */ ));
      };
   (*  (ptr) formal_c0176 ) = 0;
   (* (( (ptr) formal_c0176)+1) ) = 0;
   return;
   }

static void NoName_Q2664(formal_c0181, formal_c200020, formal_c200021, formal_c200022, formal_c200023)
   word formal_c0181;
   word formal_c200020;
   word formal_c200021;
   word formal_c200022;
   word formal_c200023;
   {
   register ptr gf_c0243 =  (ptr) &globalframe;
   if ((formal_c200021 == XR_Unwind)) {
      (void) (XR_MonitorExit((word) (( (bPt) gf_c0243)+16)/* LOCK_v2860 */ ));
      };
   (*  (ptr) formal_c0181 ) = 0;
   (* (( (ptr) formal_c0181)+1) ) = 0;
   return;
   }

static void NoName_Q2724(formal_c0186, formal_c200016, formal_c200017, formal_c200018, formal_c200019)
   word formal_c0186;
   word formal_c200016;
   word formal_c200017;
   word formal_c200018;
   word formal_c200019;
   {
   register ptr gf_c0244 =  (ptr) &globalframe;
   if ((formal_c200017 == XR_Unwind)) {
      (void) (XR_MonitorExit((word) (( (bPt) gf_c0244)+16)/* LOCK_v2860 */ ));
      };
   (*  (ptr) formal_c0186 ) = 0;
   (* (( (ptr) formal_c0186)+1) ) = 0;
   return;
   }

static void NoName_Q2784(formal_c0191, formal_c200012, formal_c200013, formal_c200014, formal_c200015)
   word formal_c0191;
   word formal_c200012;
   word formal_c200013;
   word formal_c200014;
   word formal_c200015;
   {
   register ptr gf_c0245 =  (ptr) &globalframe;
   if ((formal_c200013 == XR_Unwind)) {
      (void) (XR_MonitorExit((word) (( (bPt) gf_c0245)+16)/* LOCK_v2860 */ ));
      };
   (*  (ptr) formal_c0191 ) = 0;
   (* (( (ptr) formal_c0191)+1) ) = 0;
   return;
   }

static void NoName_Q2844(formal_c0196, formal_c200008, formal_c200009, formal_c200010, formal_c200011)
   word formal_c0196;
   word formal_c200008;
   word formal_c200009;
   word formal_c200010;
   word formal_c200011;
   {
   if ((formal_c200009 == XR_Aborted)) {
SOURCE(4431, 8)
      (*  (ptr) formal_c0196 ) = 2;
      (* (( (ptr) formal_c0196)+1) ) = 3;
      return;
      };
   (*  (ptr) formal_c0196 ) = 0;
   (* (( (ptr) formal_c0196)+1) ) = 0;
   return;
   }

static void NoName_Q2904(formal_c0201, formal_c200004, formal_c200005, formal_c200006, formal_c200007)
   word formal_c0201;
   word formal_c200004;
   word formal_c200005;
   word formal_c200006;
   word formal_c200007;
   {
   register ptr gf_c0246 =  (ptr) &globalframe;
   if ((formal_c200005 == XR_Unwind)) {
      (void) (XR_MonitorExit((word) (( (bPt) gf_c0246)+16)/* LOCK_v2860 */ ));
      };
   (*  (ptr) formal_c0201 ) = 0;
   (* (( (ptr) formal_c0201)+1) ) = 0;
   return;
   }

static void NoName_Q2964(formal_c0206, formal_c200000, formal_c200001, formal_c200002, formal_c200003)
   word formal_c0206;
   word formal_c200000;
   word formal_c200001;
   word formal_c200002;
   word formal_c200003;
   {
   if ((formal_c200001 == XR_Unwind)) {
      };
   (*  (ptr) formal_c0206 ) = 0;
   (* (( (ptr) formal_c0206)+1) ) = 0;
   return;
   }

static word NoName_Q3024(formal_c077)
   word formal_c077;
   {
   W2 var_c079;
   word var_c078;
   /* intermediary proc for a FORK, nArgs: 2, nRets: 0 */ 
   var_c079 = (*  (W2Pt) (( (ptr) formal_c077)+4) );
   var_c078 = (* (( (ptr) formal_c077)+2) );
   formal_c077 = XR_ExtensionFree(formal_c077);
   (void) ( *( (fPt) ((*  (ptr) var_c078 ))))(var_c079.f0, var_c079.f1, var_c078);
   return(0);
   }

static word NoName_Q3084(formal_c0159)
   word formal_c0159;
   {
   W4 var_c0161;
   word var_c0160;
   /* intermediary proc for a FORK, nArgs: 4, nRets: 0 */ 
   var_c0161 = (*  (W4Pt) (( (ptr) formal_c0159)+4) );
   var_c0160 = (* (( (ptr) formal_c0159)+2) );
   formal_c0159 = XR_ExtensionFree(formal_c0159);
   (void) ( *( (fPt) ((*  (ptr) var_c0160 ))))(var_c0161.f0, var_c0161.f1, var_c0161.f2, var_c0161.f3, var_c0160);
   return(0);
   }

static word NoName_Q3144(formal_c0165)
   word formal_c0165;
   {
   word var_c0166;
   /* intermediary proc for a FORK, nArgs: 0, nRets: 0 */ 
   var_c0166 = (* (( (ptr) formal_c0165)+2) );
   formal_c0165 = XR_ExtensionFree(formal_c0165);
   (void) ( *( (fPt) ((*  (ptr) var_c0166 ))))(var_c0166);
   return(0);
   }

/* file: X11SerialDevicesImpl, module: X11SerialDevicesImpl, compiled at: September 30, 1993 10:52:59 am PDT */ 
extern void XR_install_X11SerialDevicesImpl() {
   NoName_Q2004();
   }
extern void XR_run_X11SerialDevicesImpl() { XR_Start(&globalframe); }