/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1992 by Xerox Corporation.  All rights reserved. */
/* time: April 27, 1992 11:44:32 am PDT */
/* C2C version: October 16, 1990 (native) */
/* ref-counting: off */
/* file: XTkBlinkerImpl, module: XTkBlinkerImpl */ 
/* switches: bcfhklnouw */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob_version [1102955933,146885219] XTkBlinkerImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef word (*fPt)();
typedef struct {word f0, f1;} W2;
typedef W2 *W2Pt;
typedef struct {word f0, f1, f2, f3, f4;} W5;
typedef W5 *W5Pt;
typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8;
typedef struct {word f0, f1, f2, f3, f4, f5;} W6;
typedef struct {word f0, f1, f2, f3, f4, f5, f6;} W7;
typedef struct {W8 f; W8 r;} W16;
typedef struct {word f0, f1, f2;} W3;
typedef struct {W16 f; W3 r;} W19;
typedef struct {W8 f; W7 r;} W15;
typedef W15 *W15Pt;
typedef W3 *W3Pt;
#define SOURCE(p, l) /* source p, l */
static void NoName_Q1152();
static void XTkBlinkerImpl_P0();
static void IgnoreErrors_P60();
static word NewBlinkerClass_P120();
static void InstallBlinker_P180();
static void WindowCreated_P240();
static void BlinkerSetPos_P300();
static void BlinkerOn_P360();
static void ChangeBlinkerSpeed_P420();
static void DoBlinking_P480();
static void MakeVisible_P924();
static void MakeInvisible_P984();
static void CreateWindow_P540();
static void Assign_P1044();
static void BlinkerOff_P600();
static word GetBlinker_P660();
static void Check_P720();
static word NoName_Q1212();
static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\105\154\000\000"};
static struct {unsigned f; char r[4];} string2 = {196611, "\004A\330"};
static struct {unsigned f; char r[16];} string3 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\107\320\000\000"};
static struct {unsigned f; char r[4];} string4 = {131074, "\004\016\000"};
static struct {unsigned f; char r[16];} string5 = {851984, "\257\300\067\364\334\343\300\133\256\014\325\100\164\000\000"};
static struct {unsigned f; char r[4];} string6 = {131074, "\003\002\000"};
static struct {unsigned f; char r[16];} string7 = {851984, "\257\300\101\275\305\235\300\010\301\112\143\100\200\000\000"};
static struct {unsigned f; char r[4];} string8 = {196611, "\004@C"};
static struct {unsigned f; char r[4];} string9 = {65540, "\242\000\000"};
static struct {unsigned f; char r[16];} string10 = {851984, "\257\300\101\275\305\235\300\010\301\112\143\100\214\000\000"};
static struct {unsigned f; char r[4];} string11 = {196611, "\004A\001"};
static struct {unsigned f; char r[16];} string12 = {851984, "\257\300\101\275\305\235\300\010\301\112\143\100\164\000\000"};
static struct {unsigned f; char r[4];} string13 = {131074, "\003\010\000"};
static struct {unsigned f; char r[16];} string14 = {851984, "\257\300\240\236\274\315\300\111\163\325\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string15 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\100\164\000\000"};
static struct {unsigned f; char r[16];} string16 = {851984, "\257\300\033\115\307\000\300\214\060\055\310\100\150\000\000"};
static struct {unsigned f; char r[16];} string17 = {851984, "\257\300\067\364\334\343\300\133\256\014\325\100\150\000\000"};
static struct {
   word f0[20]; word f20; word f21; word f22; 
   word f23; word f24; 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[2]; word f59; 
   word f60; word f61[4]; 
   } globalframe = {
   {0}, (word) Check_P720, 0, (word) GetBlinker_P660, 
   0, (word) BlinkerOff_P600, 0, (word) CreateWindow_P540, 
   0, (word) DoBlinking_P480, 0, (word) ChangeBlinkerSpeed_P420, 
   0, (word) BlinkerOn_P360, 0, (word) BlinkerSetPos_P300, 
   0, (word) WindowCreated_P240, 0, (word) InstallBlinker_P180, 
   0, (word) NewBlinkerClass_P120, 0, (word) IgnoreErrors_P60, 
   0, (word) XTkBlinkerImpl_P0, 0, 4294967295, 
   4294967295, 4294967295, 4294967295, 11, 
   11, 3, 4294967295, 4294967295, 
   1, 1, {0}, 4294967295, 
   4294967295, {0}
   };

static void NoName_Q1152()
   {
   register ptr gf_c0102 =  (ptr) &globalframe;
   word var_c13724;
   (* (( (ptr) gf_c0102)+9) ) = (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2);
   (* (( (ptr) gf_c0102)+10) ) = (word) XR_GetTypeIndex((word) &string3, 0, (word) &string4);
   (* (( (ptr) gf_c0102)+16) ) = (word) XR_GetTypeIndex((word) &string5, 0, (word) &string6);
   (* (( (ptr) gf_c0102)+17) ) = (word) XR_GetTypeIndex((word) &string7, 0, (word) &string8);
   (* (( (ptr) gf_c0102)+18) ) = (word) XR_GetTypeIndexS((word) (&string9));
   (* (( (ptr) gf_c0102)+19) ) = (word) XR_GetTypeIndex((word) &string10, 0, (word) &string11);
   (void) XR_DeclareGlobalFrame((word) "XTkBlinkerImpl", &globalframe, (word) XR_GetTypeIndex((word) &string12, 0, (word) &string13)
      , (word) (( (bPt) gf_c0102)+176)/* var_c13084 */ );
   var_c13724 = (word) XR_ImportInterface((word) "Process", (word) XR_GetTypeIndexS((word) (&string14)), 22);
   (* (( (ptr) gf_c0102)+61)/* var_c13308 */  ) = var_c13724;
   (void) XR_ImportProcS(var_c13724, 266497);
   (void) XR_ImportProcS(var_c13724, 526081);
   (void) XR_ImportProcS(var_c13724, 67371521);
   var_c13724 = (word) XR_ImportInterface((word) "Xl", (word) XR_GetTypeIndexS((word) (&string15)), 218);
   (* (( (ptr) gf_c0102)+63)/* var_c13468 */  ) = var_c13724;
   (void) XR_ImportProcS(var_c13724, 806147);
   (void) XR_ImportProcS(var_c13724, 805635);
   (void) XR_ImportProcS(var_c13724, 2641670);
   var_c13724 = (word) XR_ImportInterface((word) "XTk", (word) XR_GetTypeIndexS((word) (&string16)), 50);
   (* (( (ptr) gf_c0102)+62)/* var_c13436 */  ) = var_c13724;
   (void) XR_ImportProcS(var_c13724, 67634690);
   (void) XR_ImportProcS(var_c13724, 1050628);
   (void) XR_ImportProcS(var_c13724, 788227);
   var_c13724 = (word) XR_ExportInterface((word) "XTkBlinker", (word) XR_GetTypeIndexS((word) (&string17)), 6);
   (* (( (ptr) gf_c0102)+64)/* var_c13756 */  ) = var_c13724;
   (void) XR_ExportProcS(var_c13724, (word) (( (bPt) gf_c0102)+160)/* var_c13020 */ , 68419589);
   (void) XR_ExportProcS(var_c13724, (word) (( (bPt) gf_c0102)+152)/* var_c12988 */ , 1048836);
   (void) XR_ExportProcS(var_c13724, (word) (( (bPt) gf_c0102)+136)/* var_c12924 */ , 1049091);
   (void) XR_ExportProcS(var_c13724, (word) (( (bPt) gf_c0102)+128)/* var_c12892 */ , 787203);
   (void) XR_ExportProcS(var_c13724, (word) (( (bPt) gf_c0102)+96)/* var_c12764 */ , 525314);
   (void) XR_ExportProcS(var_c13724, (word) (( (bPt) gf_c0102)+120)/* var_c12860 */ , 1049860);
   }

static void XTkBlinkerImpl_P0(formal_c027, formal_c023)
   word formal_c027;
   word formal_c023;
   {
   register ptr gf_c13788 =  (ptr) &globalframe;
   /* XTkBlinkerImpl: */ 
SOURCE(42, 4615)
   /* moved to installation proc */ 
   /* moved to installation proc */ 
   /* moved to installation proc */ 
   /* moved to installation proc */ 
   /* moved to installation proc */ 
   /* moved to installation proc */ 
   /* moved to installation proc */ 
   /* moved to installation proc */ 
   /* moved to installation proc */ 
   /* moved to installation proc */ 
   /* moved to installation proc */ 
   /* moved to installation proc */ 
   /* moved to installation proc */ 
SOURCE(587, 108)
   {
      word var_c13180;
      word var_c13244;
      {
         word var_c13212;
         var_c13212 = XR_NewObject(16, (* (( (ptr) gf_c13788)+10) ));
         (*  (ptr) var_c13212 ) = (word) (( (bPt) gf_c13788)+168)/* var_c13052 */ ;
         var_c13180 = var_c13212;
         };
      var_c13244 = XR_NewObject(36, (* (( (ptr) gf_c13788)+9) ));
      (* (( (ptr) var_c13244)+3) ) = var_c13180;
      (* (( (ptr) var_c13244)+5) ) = 3;
      (* (( (ptr) gf_c13788)+8)/* flush_v2692 */  ) = var_c13244;
      };
   }

static void IgnoreErrors_P60(event_v8492, clientData_v8520, tq_v8548)
   word event_v8492;
   word clientData_v8520;
   word tq_v8548;
   {
   /* IgnoreErrors: */ 
   }

static word NewBlinkerClass_P120(createProc_v3584, installProc_v3612, classData_v3640, onMsec_v3668, offMsec_v3696)
   word createProc_v3584;
   word installProc_v3612;
   word classData_v3640;
   word onMsec_v3668;
   word offMsec_v3696;
   {
   register ptr gf_c13820 =  (ptr) &globalframe;
   word var_c3752;
   word c_v4896;
   /* NewBlinkerClass: */ 
SOURCE(735, 329)
SOURCE(916, 136)
   {
      word var_c13276;
      word var_c13340;
      word var_c13372;
      {
         word pd18;
         pd18 = (* (( (ptr) (* (( (ptr) gf_c13820)+61)/* var_c13308 */  ))+6) );
         var_c13276 = (word) ( *( (fPt) ((*  (ptr) pd18 ))))(onMsec_v3668, pd18);
         };
      {
         word pd19;
         pd19 = (* (( (ptr) (* (( (ptr) gf_c13820)+61)/* var_c13308 */  ))+6) );
         var_c13340 = (word) ( *( (fPt) ((*  (ptr) pd19 ))))(offMsec_v3696, pd19);
         };
      var_c13372 = XR_NewObject(20, (* (( (ptr) gf_c13820)+16) ));
      (*  (ptr) var_c13372 ) = XR_CheckProc(createProc_v3584);
      (* (( (ptr) var_c13372)+1) ) = XR_CheckProc(installProc_v3612);
      (* (( (ptr) var_c13372)+2) ) = classData_v3640;
      (* (( (ptr) var_c13372)+3) ) = var_c13276;
      (* (( (ptr) var_c13372)+4) ) = var_c13340;
      c_v4896 = var_c13372;
      };
SOURCE(1054, 10)
   return(c_v4896);
   }

static void InstallBlinker_P180(w_v3812, key_v3840, blinkerClass_v3868, persistent_v3896)
   word w_v3812;
   word key_v3840;
   word blinkerClass_v3868;
   word persistent_v3896;
   {
   register ptr gf_c13852 =  (ptr) &globalframe;
   word bd_v4940;
   /* InstallBlinker: */ 
SOURCE(1070, 451)
SOURCE(1182, 37)
   bd_v4940 = XR_NewObject(36, (* (( (ptr) gf_c13852)+17) ));
   (* (( (ptr) bd_v4940)+5) ) =  (word) -1;
SOURCE(1221, 23)
   (*  (ptr) bd_v4940 ) = blinkerClass_v3868;
SOURCE(1246, 32)
   (* (( (ptr) bd_v4940)+7) ) = (* (( (ptr) blinkerClass_v3868)+3) );
SOURCE(1280, 34)
   (* (( (ptr) bd_v4940)+8) ) = (* (( (ptr) blinkerClass_v3868)+4) );
SOURCE(1316, 29)
   {
      word pd20;
      pd20 = (* (( (ptr) (* (( (ptr) gf_c13852)+62)/* var_c13436 */  ))+11) );
      (void) ( *( (fPt) ((*  (ptr) pd20 ))))(w_v3812, key_v3840, bd_v4940, pd20);
      };
SOURCE(1347, 83)
   if (((* (( (ptr) blinkerClass_v3868)+1) ) != 0)) {
SOURCE(1384, 46)
      {
         word pd21;
         pd21 = (* (( (ptr) blinkerClass_v3868)+1) );
         (void) ( *( (fPt) ((*  (ptr) pd21 ))))(w_v3812, key_v3840, blinkerClass_v3868, pd21);
         };
      };
SOURCE(1432, 89)
   if ((0 != persistent_v3896)) {
SOURCE(1451, 70)
      {
         word pd22;
         pd22 = (* (( (ptr) (* (( (ptr) gf_c13852)+62)/* var_c13436 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd22 ))))(w_v3812, (*  (ptr) (* (( (ptr) (* (( (ptr) gf_c13852)+62)/* var_c13436 */  ))+17) ) ), (word) (
               ( (bPt) gf_c13852)+144)/* var_c12956 */ , key_v3840, pd22);
         };
      };
   }

static void WindowCreated_P240(widget_v8640, registerData_v8668, callData_v8696, event_v8724)
   word widget_v8640;
   word registerData_v8668;
   word callData_v8696;
   word event_v8724;
   {
   word b_v4984;
   /* WindowCreated: */ 
SOURCE(1527, 152)
SOURCE(1567, 49)
   b_v4984 = (word) GetBlinker_P660(widget_v8640, registerData_v8668);
SOURCE(1618, 61)
   if ((0 != (* (( (ptr) b_v4984)+4) ))) {
SOURCE(1639, 40)
      (void) BlinkerOn_P360(widget_v8640, registerData_v8668, (* (( (ptr) b_v4984)+5) ));
      };
   }

static void BlinkerSetPos_P300(w_v3968, key_v3996, pos_v4024)
   word w_v3968;
   word key_v3996;
   W2 pos_v4024;
   {
   register ptr gf_c13884 =  (ptr) &globalframe;
   word b_v5028;
   /* BlinkerSetPos: */ 
SOURCE(1685, 510)
SOURCE(1757, 35)
   b_v5028 = (word) GetBlinker_P660(w_v3968, key_v3996);
SOURCE(1794, 401)
   if ((b_v5028 != 0)) {
SOURCE(1809, 519)
      {
         word life_v5072;
SOURCE(1811, 28)
         life_v5072 = (* (( (ptr) b_v5028)+1) );
SOURCE(1841, 11)
         (*  (W2Pt) (( (ptr) b_v5028)+2) ) = pos_v4024;
SOURCE(1854, 341)
         if ((life_v5072 != 0)) {
SOURCE(1873, 322)
            if ( (  ( ((* (( (ptr) w_v3968)+37) ) == 0) ? ((* (( (ptr) w_v3968)+34) ) == (*  (ptr) life_v5072 )) : 0 )  ? ((* (( (ptr) w_v3968)+35)
             ) == (* (( (ptr) life_v5072)+1) )) : 0 ) ) {
SOURCE(1963, 359)
               {
                  W5 geometry_v5128;
SOURCE(1965, 37)
                  geometry_v5128 = (*  (W5Pt) (( (ptr) life_v5072)+3) );
SOURCE(2004, 37)
                  geometry_v5128.f0 = (geometry_v5128.f0 + pos_v4024.f0);
SOURCE(2043, 37)
                  geometry_v5128.f1 = (geometry_v5128.f1 + pos_v4024.f1);
SOURCE(2082, 113)
                  {
                     word pd23;
                     pd23 = (* (( (ptr) (* (( (ptr) gf_c13884)+63)/* var_c13468 */  ))+83) );
                     (void) ( *( (fPt) ((*  (ptr) pd23 ))))((*  (ptr) life_v5072 ), (* (( (ptr) life_v5072)+2) ), geometry_v5128, 0, 2, (* (( (ptr) gf_c13884)+8)
                        /* flush_v2692 */  ), pd23);
                     };
                  };
               };
            };
         };
      };
   }

static void BlinkerOn_P360(w_v4096, key_v4124, count_v4152)
   word w_v4096;
   word key_v4124;
   word count_v4152;
   {
   register ptr gf_c13916 =  (ptr) &globalframe;
   word b_v5172;
   /* BlinkerOn: */ 
SOURCE(2335, 331)
SOURCE(2414, 35)
   b_v5172 = (word) GetBlinker_P660(w_v4096, key_v4124);
SOURCE(2451, 215)
   if ((b_v5172 != 0)) {
SOURCE(2467, 15)
      (* (( (ptr) b_v5172)+5) ) = count_v4152;
SOURCE(2484, 19)
      (* (( (ptr) b_v5172)+4) ) = 1;
SOURCE(2505, 37)
      if (((* (( (ptr) b_v5172)+1) ) == 0)) {
SOURCE(2524, 18)
         (void) CreateWindow_P540(w_v4096, b_v5172);
         };
SOURCE(2544, 122)
      if (((* (( (ptr) b_v5172)+1) ) != 0)) {
SOURCE(2563, 106)
         {
            word runKey_v5216;
SOURCE(2565, 26)
            runKey_v5216 = XR_NewObject(4, (* (( (ptr) gf_c13916)+18) ));
SOURCE(2593, 17)
            (* (( (ptr) b_v5172)+6) ) = runKey_v5216;
SOURCE(2620, 46)
SOURCE(2621, 45)
            {
               W2 var_c13500;
               {
                  W2 var_c064;
                  word var_c063;
                  var_c063 = XR_ExtensionAlloc(7);
                  {
                     word tmpAddr24;
                     tmpAddr24 = (word) var_c063;
                     (*  (ptr) tmpAddr24 ) = ( ((word)  (fPt) NoName_Q1212) );
                     (* (( (ptr) tmpAddr24) + 1) ) = 0;
                     (* (( (ptr) tmpAddr24) + 2) ) = (word) (( (bPt) gf_c13916)+112)/* var_c12828 */ ;
                     (* (( (ptr) tmpAddr24) + 3) ) = 0;
                     (* (( (ptr) tmpAddr24) + 4) ) = b_v5172;
                     (* (( (ptr) tmpAddr24) + 5) ) = w_v4096;
                     (* (( (ptr) tmpAddr24) + 6) ) = runKey_v5216;
                     };
                  (void) XR_Fork((word) &var_c064, var_c063);
                  var_c13500 = var_c064;
                  };
               {
                  word pd25;
                  pd25 = (* (( (ptr) (* (( (ptr) gf_c13916)+61)/* var_c13308 */  ))+11) );
                  (void) ( *( (fPt) ((*  (ptr) pd25 ))))(var_c13500, pd25);
                  };
               };
            };
         };
      };
   }

static void ChangeBlinkerSpeed_P420(w_v4224, key_v4252, onMsec_v4280, offMsec_v4308)
   word w_v4224;
   word key_v4252;
   word onMsec_v4280;
   word offMsec_v4308;
   {
   register ptr gf_c13948 =  (ptr) &globalframe;
   word b_v5272;
   /* ChangeBlinkerSpeed: */ 
SOURCE(2679, 236)
SOURCE(2780, 35)
   b_v5272 = (word) GetBlinker_P660(w_v4224, key_v4252);
SOURCE(2817, 98)
   if ((b_v5272 != 0)) {
SOURCE(2833, 39)
      {
         word pd26;
         pd26 = (* (( (ptr) (* (( (ptr) gf_c13948)+61)/* var_c13308 */  ))+6) );
         (* (( (ptr) b_v5272)+7) ) = (word) ( *( (fPt) ((*  (ptr) pd26 ))))(onMsec_v4280, pd26);
         };
SOURCE(2874, 41)
      {
         word pd27;
         pd27 = (* (( (ptr) (* (( (ptr) gf_c13948)+61)/* var_c13308 */  ))+6) );
         (* (( (ptr) b_v5272)+8) ) = (word) ( *( (fPt) ((*  (ptr) pd27 ))))(offMsec_v4308, pd27);
         };
      };
   }

static void DoBlinking_P480(b_v4380, parent_v4408, runKey_v4436)
   word b_v4380;
   word parent_v4408;
   word runKey_v4436;
   {
   W8 var_c13980;
   register ptr gf_c14012 =  (ptr) &globalframe;
   /* declaration of var_c13532 skipped */ 
   /* declaration of var_c13564 skipped */ 
   word life_v5372;
   /* DoBlinking: */ 
SOURCE(2924, 655)
   {
      word tmpAddr28;
      tmpAddr28 = (word) (( (ptr) &var_c13980)+4)/* var_c13532 */ ;
      (*  (ptr) tmpAddr28 ) = ( ((word)  (fPt) MakeInvisible_P984) );
      (* (( (ptr) tmpAddr28) + 1) ) = 1;
      };
   {
      word tmpAddr29;
      tmpAddr29 = (word) (( (ptr) &var_c13980)+6)/* var_c13564 */ ;
      (*  (ptr) tmpAddr29 ) = ( ((word)  (fPt) MakeVisible_P924) );
      (* (( (ptr) tmpAddr29) + 1) ) = 1;
      };
SOURCE(3203, 27)
   life_v5372 = (* (( (ptr) b_v4380)+1) );
SOURCE(3232, 23)
   if ((life_v5372 == 0)) {
SOURCE(3249, 6)
      return;
      };
SOURCE(3257, 322)
   lab_L100002: ;
   if ( (  ( ((* (( (ptr) b_v4380)+6) ) == runKey_v4436) ? ((* (( (ptr) b_v4380)+1) ) == life_v5372) : 0 )  ? ((* (( (ptr) b_v4380)+5)
    ) > 0) : 0 ) ) {
      }
   else {
      goto lab_L100000;
      };
SOURCE(3312, 72)
   if (((* (( (ptr) parent_v4408)+37) ) != 0) || ((* (( (ptr) parent_v4408)+35) ) != (* (( (ptr) life_v5372)+1) ))) {
SOURCE(3378, 6)
      return;
      };
SOURCE(3386, 17)
   (void) MakeVisible_P924(life_v5372, (word) (( (bPt) &var_c13980)+24)/* var_c13564 */ );
SOURCE(3405, 24)
   {
      word pd30;
      pd30 = (* (( (ptr) (* (( (ptr) gf_c14012)+61)/* var_c13308 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd30 ))))((* ((( (ptr) b_v4380)+7)) ), pd30);
      };
SOURCE(3431, 74)
   if (((* (( (ptr) parent_v4408)+37) ) != 0) || ((* (( (ptr) parent_v4408)+35) ) != (* (( (ptr) life_v5372)+1) ))) {
SOURCE(3499, 6)
      return;
      };
SOURCE(3510, 19)
   (void) MakeInvisible_P984(life_v5372, (word) (( (bPt) &var_c13980)+16)/* var_c13532 */ );
SOURCE(3531, 25)
   {
      word pd31;
      pd31 = (* (( (ptr) (* (( (ptr) gf_c14012)+61)/* var_c13308 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd31 ))))((* ((( (ptr) b_v4380)+8)) ), pd31);
      };
SOURCE(3558, 21)
   (* (( (ptr) b_v4380)+5) ) = ((* (( (ptr) b_v4380)+5) ) - 1);
   goto lab_L100002;
   lab_L100000: ;
   }

static void MakeVisible_P924(l_v5448, formal_c14076)
   word l_v5448;
   word formal_c14076;
   {
   register ptr gf_c14044 =  (ptr) &globalframe;
   formal_c14076 = (formal_c14076 - 24);
   /* MakeVisible: */ 
SOURCE(2995, 97)
SOURCE(3035, 57)
   if ((l_v5448 != 0)) {
SOURCE(3049, 43)
      {
         word pd32;
         pd32 = (* (( (ptr) (* (( (ptr) gf_c14044)+63)/* var_c13468 */  ))+79) );
         (void) ( *( (fPt) ((*  (ptr) pd32 ))))((*  (ptr) l_v5448 ), (* (( (ptr) l_v5448)+2) ), (* (( (ptr) gf_c14044)+8)/* flush_v2692 */  ), pd32)
         ;
         };
      };
   }

static void MakeInvisible_P984(l_v5520, formal_c14140)
   word l_v5520;
   word formal_c14140;
   {
   register ptr gf_c14108 =  (ptr) &globalframe;
   formal_c14140 = (formal_c14140 - 16);
   /* MakeInvisible: */ 
SOURCE(3097, 101)
SOURCE(3139, 59)
   if ((l_v5520 != 0)) {
SOURCE(3153, 45)
      {
         word pd33;
         pd33 = (* (( (ptr) (* (( (ptr) gf_c14108)+63)/* var_c13468 */  ))+81) );
         (void) ( *( (fPt) ((*  (ptr) pd33 ))))((*  (ptr) l_v5520 ), (* (( (ptr) l_v5520)+2) ), (* (( (ptr) gf_c14108)+8)/* flush_v2692 */  ), pd33)
         ;
         };
      };
   }

static void CreateWindow_P540(parent_v4508, b_v4536)
   word parent_v4508;
   word b_v4536;
   {
   W6 var_c14172;
   register ptr gf_c14204 =  (ptr) &globalframe;
   /* declaration of var_c13596 skipped */ 
   word life_v5600;
   /* CreateWindow: */ 
SOURCE(3593, 530)
   {
      word tmpAddr34;
      tmpAddr34 = (word) (( (ptr) &var_c14172)+4)/* var_c13596 */ ;
      (*  (ptr) tmpAddr34 ) = ( ((word)  (fPt) Assign_P1044) );
      (* (( (ptr) tmpAddr34) + 1) ) = 1;
      };
SOURCE(3827, 34)
   life_v5600 = XR_NewObject(40, (* (( (ptr) gf_c14204)+19) ));
   (* (( (ptr) life_v5600)+3) ) = 2147483648;
   (* (( (ptr) life_v5600)+4) ) = 2147483648;
   (* (( (ptr) life_v5600)+5) ) = 2147483648;
   (* (( (ptr) life_v5600)+6) ) = 2147483648;
   (* (( (ptr) life_v5600)+7) ) = 2147483648;
SOURCE(3863, 28)
   (* (( (ptr) life_v5600)+1) ) = (* (( (ptr) parent_v4508)+35) );
SOURCE(3893, 35)
   (*  (ptr) life_v5600 ) = (* (( (ptr) parent_v4508)+34) );
SOURCE(3930, 168)
   {
      W7 var_c13660;
      {
         W19 var_c086;
         (*  (ptr) (word) &var_c086 ) = (*  (ptr) b_v4536 );
         (* (( (ptr) (word) &var_c086) + 1) ) = parent_v4508;
         (*  (W15Pt) (( (ptr) (word) &var_c086) + 2) ) = (*  (W15Pt) (( (ptr) gf_c14204)+46)/* var_c13148 */  );
         (*  (W2Pt) (( (ptr) (word) &var_c086) + 17) ) = (*  (W2Pt) (( (ptr) b_v4536)+2) );
         {
            word pd35;
            pd35 = (*  (ptr) (*  (ptr) b_v4536 ) );
            (void) ( *( (fPt) ((*  (ptr) pd35 ))))((word) &var_c13660, (word) &var_c086, pd35);
            };
         };
      (* (( (ptr) life_v5600)+8) ) = var_c13660.f6;
      (*  (W5Pt) (( (ptr) life_v5600)+3) ) = (*  (W5Pt) (( (ptr) &var_c13660)+1) );
      (* (( (ptr) life_v5600)+2) ) = var_c13660.f0;
      };
SOURCE(4100, 23)
   (void) Assign_P1044(b_v4536, parent_v4508, life_v5600, (word) (( (bPt) &var_c14172)+16)/* var_c13596 */ );
   }

static void Assign_P1044(b_v5676, parent_v5704, life_v5732, formal_c14268)
   word b_v5676;
   word parent_v5704;
   word life_v5732;
   word formal_c14268;
   {
   register ptr gf_c14236 =  (ptr) &globalframe;
   formal_c14268 = (formal_c14268 - 16);
   /* Assign: */ 
SOURCE(3653, 168)
   (void) (XR_MonitorEntry((word) (( (bPt) gf_c14236)+16)/* LOCK_v2580 */ ));
SOURCE(3732, 89)
   if ( ( ((* (( (ptr) life_v5732)+1) ) == (* (( (ptr) parent_v5704)+35) )) ? ((*  (ptr) life_v5732 ) == (* (( (ptr) parent_v5704)+34)
    )) : 0 ) ) {
SOURCE(3807, 14)
      (* (( (ptr) b_v5676)+1) ) = life_v5732;
      };
SOURCE(3653, 168)
   (void) (XR_MonitorExit((word) (( (bPt) gf_c14236)+16)/* LOCK_v2580 */ ));
   return;
   }

static void BlinkerOff_P600(w_v4596, key_v4624)
   word w_v4596;
   word key_v4624;
   {
   word b_v5784;
   /* BlinkerOff: */ 
SOURCE(4129, 143)
SOURCE(4183, 35)
   b_v5784 = (word) GetBlinker_P660(w_v4596, key_v4624);
SOURCE(4220, 52)
   if ((b_v5784 != 0)) {
SOURCE(4236, 20)
      (* (( (ptr) b_v5784)+4) ) = 0;
SOURCE(4258, 14)
      (* (( (ptr) b_v5784)+6) ) = 0;
      };
   }

static word GetBlinker_P660(w_v4696, key_v4724)
   word w_v4696;
   word key_v4724;
   {
   register ptr gf_c14300 =  (ptr) &globalframe;
   word var_c4780;
   /* GetBlinker: */ 
SOURCE(4280, 158)
SOURCE(4280, 158)
   var_c4780 = 0;
SOURCE(4353, 85)
   {
      word var_c13692;
      {
         word pd36;
         pd36 = (* (( (ptr) (* (( (ptr) gf_c14300)+62)/* var_c13436 */  ))+10) );
         var_c13692 = (word) ( *( (fPt) ((*  (ptr) pd36 ))))(w_v4696, key_v4724, pd36);
         };
      if ((var_c13692 == 0)) {
         goto lab_L100003;
         };
      if (((* (( (ptr) gf_c14300)+17) ) == XR_GetReferentType(var_c13692))) {
         {
            word b_v5828;
            b_v5828 = var_c13692;
SOURCE(4415, 11)
            (void) Check_P720(w_v4696, b_v5828);
SOURCE(4428, 10)
            return(b_v5828);
            };
         }
      else {
         lab_L100003: ;
         };
      };
SOURCE(4280, 158)
   return(var_c4780);
   }

static void Check_P720(w_v4840, b_v4868)
   word w_v4840;
   word b_v4868;
   {
   word life_v5872;
   /* Check: */ 
SOURCE(4460, 197)
SOURCE(4508, 27)
   life_v5872 = (* (( (ptr) b_v4868)+1) );
SOURCE(4537, 120)
   if ((life_v5872 != 0)) {
SOURCE(4556, 101)
      if ((((* (( (ptr) w_v4840)+37) ) != 0) || ((* (( (ptr) w_v4840)+34) ) != (*  (ptr) life_v5872 ))) || ((* (( (ptr) w_v4840)+35)
       ) != (* (( (ptr) life_v5872)+1) ))) {
SOURCE(4644, 13)
         (* (( (ptr) b_v4868)+1) ) = 0;
         };
      };
   }

static word NoName_Q1212(formal_c065)
   word formal_c065;
   {
   W3 var_c067;
   word var_c066;
   /* intermediary proc for a FORK, nArgs: 3, nRets: 0 */ 
   var_c067 = (*  (W3Pt) (( (ptr) formal_c065)+4) );
   var_c066 = (* (( (ptr) formal_c065)+2) );
   formal_c065 = XR_ExtensionFree(formal_c065);
   (void) ( *( (fPt) ((*  (ptr) var_c066 ))))(var_c067.f0, var_c067.f1, var_c067.f2, var_c066);
   return(0);
   }

/* file: XTkBlinkerImpl, module: XTkBlinkerImpl, compiled at: April 27, 1992 11:44:30 am PDT */ 
extern void XR_install_XTkBlinkerImpl() {
   NoName_Q1152();
   }
extern void XR_run_XTkBlinkerImpl() { XR_Start(&globalframe); }