/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1993 by Xerox Corporation.  All rights reserved. */
/* time: August 16, 1993 12:26:13 pm PDT */
/* C2C version: April 20, 1993 (sun4) */
/* ref-counting: off */
/* file: X11ViewersGCHackImpl, module: X11ViewersGCHackImpl */ 
/* switches: bcfhklnouw */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob_version [1447419778,2163387696] X11ViewersGCHackImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef struct {word f0, f1, f2, f3, f4, f5;} W6;
typedef struct {word f0, f1;} W2;
typedef word (*fPt)();
#define SOURCE(p, l) /* source p, l */
static void NoName_Q468();
static void X11ViewersGCHackImpl_P0();
static void BeforeGarbageCollection_P60();
static void AfterGarbageCollection_P120();
static word WaitForRequest_P180();
static void CursorChangeProcess_P240();
static word NoName_Q528();
static void Protected_P360();
static void Init_P300();
static void NoName_Q588();
static word NoName_Q648();
static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\126\105\337\202\300\200\362\255\060\100\164\000\000"};
static struct {unsigned f; char r[16];} string2 = {851984, "\257\300\222\112\165\150\300\015\105\213\112\100\150\000\000"};
static struct {unsigned f; char r[16];} string3 = {851984, "\257\300\240\236\274\315\300\111\163\325\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string4 = {851984, "\257\300\275\320\070\317\300\004\110\363\366\100\150\000\000"};
static struct {unsigned f; char r[16];} string5 = {851984, "\257\300\251\206\104\055\300\374\254\024\121\100\150\000\000"};
static struct {
   word f0[22]; word f22; word f23; word f24; 
   word f25; word f26; word f27; word f28; 
   word f29; word f30; word f31; word f32; 
   word f33[5]; 
   } globalframe = {
   {0}, (word) Init_P300, 0, (word) CursorChangeProcess_P240, 
   0, (word) WaitForRequest_P180, 0, (word) AfterGarbageCollection_P120, 
   0, (word) BeforeGarbageCollection_P60, 0, (word) X11ViewersGCHackImpl_P0, 
   {0}
   };

static void NoName_Q468()
   {
   register ptr gf_c038 =  (ptr) &globalframe;
   word var_c5320;
   (void) XR_DeclareGlobalFrame((word) "X11ViewersGCHackImpl", &globalframe, (word) XR_GetTypeIndexS((word) (&string1)), (word) (
         ( (bPt) gf_c038)+128)/* var_c5064 */ );
   var_c5320 = (word) XR_ImportInterface((word) "GCCallBack", (word) XR_GetTypeIndexS((word) (&string2)), 2);
   (* (( (ptr) gf_c038)+37)/* var_c5288 */  ) = var_c5320;
   (void) XR_ImportProcS(var_c5320, 524290);
   (void) XR_ImportProcS(var_c5320, 524546);
   var_c5320 = (word) XR_ImportInterface((word) "Process", (word) XR_GetTypeIndexS((word) (&string3)), 22);
   (* (( (ptr) gf_c038)+34)/* var_c5128 */  ) = var_c5320;
   (void) XR_ImportProcS(var_c5320, 526081);
   (void) XR_ImportProcS(var_c5320, 67371521);
   (void) XR_ImportProcS(var_c5320, 525570);
   (void) XR_ImportProcS(var_c5320, 266753);
   (void) XR_ImportProcS(var_c5320, 264449);
   var_c5320 = (word) XR_ImportInterface((word) "RuntimeError", (word) XR_GetTypeIndexS((word) (&string4)), 27);
   (* (( (ptr) gf_c038)+35)/* var_c5160 */  ) = var_c5320;
   var_c5320 = (word) XR_ImportInterface((word) "X11Viewers", (word) XR_GetTypeIndexS((word) (&string5)), 8);
   (* (( (ptr) gf_c038)+36)/* var_c5192 */  ) = var_c5320;
   (void) XR_ImportProcS(var_c5320, 263937);
   }

static void X11ViewersGCHackImpl_P0(formal_c019, formal_c018)
   word formal_c019;
   word formal_c018;
   {
   /* X11ViewersGCHackImpl: */ 
SOURCE(59, 1372)
SOURCE(1425, 6)
   (void) Init_P300();
   }

static void BeforeGarbageCollection_P60(x_v2940)
   word x_v2940;
   {
   register ptr gf_c5352 =  (ptr) &globalframe;
   /* BeforeGarbageCollection: */ 
SOURCE(310, 156)
   (void) (XR_MonitorEntry((word) (( (bPt) gf_c5352)+16)/* LOCK_v2608 */ ));
SOURCE(359, 25)
   (* (( (ptr) gf_c5352)+9)/* gcCursorSwitchToIt_v2664 */  ) = 1;
SOURCE(386, 26)
   (* (( (ptr) gf_c5352)+8)/* gcCursorNeedsChange_v2636 */  ) = 1;
SOURCE(414, 23)
   (void) (XR_Notify((word) (( (bPt) gf_c5352)+40)/* gcCursorJobReady_v2692 */ ));
SOURCE(439, 27)
   (void) (XR_Wait((word) (( (bPt) gf_c5352)+16)/* LOCK_v2608 */ , (word) (( (bPt) gf_c5352)+64)/* gcCursorDoneOrTimedOut_v2720 */ )
   );
SOURCE(310, 156)
   (void) (XR_MonitorExit((word) (( (bPt) gf_c5352)+16)/* LOCK_v2608 */ ));
   return;
   }

static void AfterGarbageCollection_P120(x_v3016)
   word x_v3016;
   {
   register ptr gf_c5384 =  (ptr) &globalframe;
   /* AfterGarbageCollection: */ 
SOURCE(472, 127)
   (void) (XR_MonitorEntry((word) (( (bPt) gf_c5384)+16)/* LOCK_v2608 */ ));
SOURCE(520, 26)
   (* (( (ptr) gf_c5384)+9)/* gcCursorSwitchToIt_v2664 */  ) = 0;
SOURCE(548, 26)
   (* (( (ptr) gf_c5384)+8)/* gcCursorNeedsChange_v2636 */  ) = 1;
SOURCE(576, 23)
   (void) (XR_Notify((word) (( (bPt) gf_c5384)+40)/* gcCursorJobReady_v2692 */ ));
SOURCE(472, 127)
   (void) (XR_MonitorExit((word) (( (bPt) gf_c5384)+16)/* LOCK_v2608 */ ));
   return;
   }

static word WaitForRequest_P180()
   {
   register ptr gf_c5416 =  (ptr) &globalframe;
   word switchOn_v3088;
   /* WaitForRequest: */ 
SOURCE(605, 238)
   (void) (XR_MonitorEntry((word) (( (bPt) gf_c5416)+16)/* LOCK_v2608 */ ));
SOURCE(664, 29)
   (void) (XR_Notify((word) (( (bPt) gf_c5416)+64)/* gcCursorDoneOrTimedOut_v2720 */ ));
SOURCE(724, 59)
   lab_L100002: ;
   if ((0 == (* (( (ptr) gf_c5416)+8)/* gcCursorNeedsChange_v2636 */  ))) {
      }
   else {
      goto lab_L100000;
      };
SOURCE(754, 29)
   (void) (XR_Wait((word) (( (bPt) gf_c5416)+16)/* LOCK_v2608 */ , (word) (( (bPt) gf_c5416)+40)/* gcCursorJobReady_v2692 */ )
   );
   goto lab_L100002;
   lab_L100000: ;
SOURCE(785, 27)
   (* (( (ptr) gf_c5416)+8)/* gcCursorNeedsChange_v2636 */  ) = 0;
SOURCE(814, 29)
   switchOn_v3088 = (* (( (ptr) gf_c5416)+9)/* gcCursorSwitchToIt_v2664 */  );
SOURCE(605, 238)
   (void) (XR_MonitorExit((word) (( (bPt) gf_c5416)+16)/* LOCK_v2608 */ ));
   return(switchOn_v3088);
   }

static void CursorChangeProcess_P240()
   {
   W6 var_c5448;
   register ptr gf_c5480 =  (ptr) &globalframe;
   /* declaration of var_c5096 skipped */ 
   /* CursorChangeProcess: */ 
SOURCE(849, 306)
   {
      word tmpAddr6;
      tmpAddr6 = (word) (( (ptr) &var_c5448)+4)/* var_c5096 */ ;
      (*  (ptr) tmpAddr6 ) = ( ((word)  (fPt) Protected_P360) );
      (* (( (ptr) tmpAddr6) + 1) ) = 1;
      };
SOURCE(1004, 44)
   {
      word pd7;
      pd7 = (* (( (ptr) (* (( (ptr) gf_c5480)+34)/* var_c5128 */  ))+13) );
      (void) ( *( (fPt) ((*  (ptr) pd7 ))))(4, pd7);
      };
SOURCE(1050, 105)
   lab_L100005: ;
SOURCE(1054, 67)
SOURCE(1054, 67)
   {
      word var_c01;
      {
         word var_c048;
         var_c048 = (word) &var_c5448;
         var_c01 = (word) XR_Enable(( ((word)  (fPt) NoName_Q528) ), ( ((word)  (fPt) NoName_Q588) ), var_c048);
         };
      /* removed trivial cond node */ 
      };
SOURCE(1132, 23)
   {
      word pd8;
      pd8 = (* (( (ptr) (* (( (ptr) gf_c5480)+34)/* var_c5128 */  ))+22) );
      (void) ( *( (fPt) ((*  (ptr) pd8 ))))(4000, pd8);
      };
   goto lab_L100005;
   }

static word NoName_Q528(formal_c043)
   word formal_c043;
   {
SOURCE(1054, 67)
   (void) Protected_P360((word) ((( (bPt) formal_c043)+16)));
   return(0);
   }

static void Protected_P360(formal_c5544)
   word formal_c5544;
   {
   register ptr gf_c5512 =  (ptr) &globalframe;
   formal_c5544 = (formal_c5544 - 16);
   /* Protected: */ 
SOURCE(882, 109)
SOURCE(905, 86)
   lab_L100012: ;
SOURCE(905, 86)
   {
      word needGCCursor_v3208;
SOURCE(918, 37)
      needGCCursor_v3208 = (word) WaitForRequest_P180();
SOURCE(957, 34)
      {
         word pd9;
         pd9 = (* (( (ptr) (* (( (ptr) gf_c5512)+36)/* var_c5192 */  ))+11) );
         (void) ( *( (fPt) ((*  (ptr) pd9 ))))(needGCCursor_v3208, pd9);
         };
      };
   goto lab_L100012;
   }

static void Init_P300()
   {
   register ptr gf_c5576 =  (ptr) &globalframe;
   /* Init: */ 
SOURCE(1169, 250)
SOURCE(1192, 70)
SOURCE(1193, 69)
   {
      word var_c5224;
      {
         word pd10;
         pd10 = (* (( (ptr) (* (( (ptr) gf_c5576)+34)/* var_c5128 */  ))+6) );
         var_c5224 = (word) ( *( (fPt) ((*  (ptr) pd10 ))))(300, pd10);
         };
      {
         word pd11;
         pd11 = (* (( (ptr) (* (( (ptr) gf_c5576)+34)/* var_c5128 */  ))+9) );
         (void) ( *( (fPt) ((*  (ptr) pd11 ))))((word) (( (bPt) gf_c5576)+64)/* gcCursorDoneOrTimedOut_v2720 */ , var_c5224, pd11)
         ;
         };
      };
SOURCE(1273, 43)
SOURCE(1274, 42)
   {
      W2 var_c5256;
      {
         W2 var_c028;
         word var_c027;
         var_c027 = XR_ExtensionAlloc(4);
         {
            word tmpAddr12;
            tmpAddr12 = (word) var_c027;
            (*  (ptr) tmpAddr12 ) = ( ((word)  (fPt) NoName_Q648) );
            (* (( (ptr) tmpAddr12) + 1) ) = 0;
            (* (( (ptr) tmpAddr12) + 2) ) = (word) (( (bPt) gf_c5576)+96)/* var_c4936 */ ;
            (* (( (ptr) tmpAddr12) + 3) ) = 0;
            };
         (void) XR_Fork((word) &var_c028, var_c027);
         var_c5256 = var_c028;
         };
      {
         word pd13;
         pd13 = (* (( (ptr) (* (( (ptr) gf_c5576)+34)/* var_c5128 */  ))+11) );
         (void) ( *( (fPt) ((*  (ptr) pd13 ))))(var_c5256, pd13);
         };
      };
SOURCE(1319, 48)
   {
      word pd14;
      pd14 = (* (( (ptr) (* (( (ptr) gf_c5576)+37)/* var_c5288 */  ))+5) );
      (void) ( *( (fPt) ((*  (ptr) pd14 ))))((word) (( (bPt) gf_c5576)+112)/* var_c5000 */ , 0, pd14);
      };
SOURCE(1369, 50)
   {
      word pd15;
      pd15 = (* (( (ptr) (* (( (ptr) gf_c5576)+37)/* var_c5288 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd15 ))))((word) (( (bPt) gf_c5576)+120)/* var_c5032 */ , 0, pd15);
      };
   }

static void NoName_Q588(formal_c037, formal_c200000, formal_c200001, formal_c200002, formal_c200003)
   word formal_c037;
   word formal_c200000;
   word formal_c200001;
   word formal_c200002;
   word formal_c200003;
   {
   register ptr gf_c047 =  (ptr) &globalframe;
   if ((formal_c200001 == (* (( (ptr) (* (( (ptr) gf_c047)+35)/* var_c5160 */  ))+22) ))) {
      {
         word signal_v3672;
         word parameters_v3700;
         signal_v3672 = (*  (ptr) formal_c200003 );
         parameters_v3700 = (* (( (ptr) formal_c200003)+1) );
SOURCE(1091, 30)
         if ((0 == (*  (ptr) (* (( (ptr) (* (( (ptr) gf_c047)+36)/* var_c5192 */  ))+6) ) ))) {
SOURCE(1121, 9)
            (*  (ptr) formal_c037 ) = 2;
            (* (( (ptr) formal_c037)+1) ) = 2;
            return;
            };
         };
      };
   (*  (ptr) formal_c037 ) = 0;
   (* (( (ptr) formal_c037)+1) ) = 0;
   return;
   }

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

/* file: X11ViewersGCHackImpl, module: X11ViewersGCHackImpl, compiled at: August 16, 1993 12:26:12 pm PDT */ 
extern void XR_install_X11ViewersGCHackImpl() {
   NoName_Q468();
   }
extern void XR_run_X11ViewersGCHackImpl() { XR_Start(&globalframe); }