/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1992 by Xerox Corporation.  All rights reserved. */
/* time: April 21, 1992 12:44:49 pm PDT */
/* C2C version: October 16, 1990 (native) */
/* ref-counting: off */
/* file: XTkHelpStringsImpl, module: XTkHelpStringsImpl */ 
/* switches: bcfhklnouw */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob_version [689737756,1031435215] XTkHelpStringsImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8;
typedef struct {W8 f; word r;} W9;
typedef struct {word f0, f1, f2, f3;} W4;
typedef W4 *W4Pt;
typedef word (*fPt)();
#define SOURCE(p, l) /* source p, l */
static void NoName_Q768();
static void XTkHelpStringsImpl_P0();
static void Create_P60();
static word GetHandle_P120();
static void SetHandle_P180();
static word MyCreateHandle_P240();
static void MyDisplay_P300();
static void MyClear_P360();
static void NoVisible_P420();
static struct {unsigned f; char r[4];} string1 = {131076, "\216\251\000"};
static struct {unsigned f; char r[4];} string2 = {65537, "\001\000\000"};
static struct {unsigned f; char r[16];} string3 = {851984, "\257\300\051\034\220\034\300\075\172\163\317\100\274\000\000"};
static struct {unsigned f; char r[4];} string4 = {131074, "\004\007\000"};
static struct {unsigned f; char r[16];} string5 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\104\304\000\000"};
static struct {unsigned f; char r[24];} string6 = {1376277, "\007\000\001\002\007\020\001\002\000\007\036\002\004\003\002\004\014\016\015\003\001\000\000"};
static struct {unsigned f; char r[16];} string7 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"};
static struct {unsigned f; char r[16];} string8 = {851984, "\257\300\267\210\110\244\300\302\136\033\142\100\164\000\000"};
static struct {unsigned f; char r[4];} string9 = {131074, "\004\003\000"};
static struct {unsigned f; char r[16];} string10 = {851984, "\257\300\267\210\110\244\300\302\136\033\142\100\200\000\000"};
static struct {unsigned f; char r[4];} string11 = {131074, "\003\004\000"};
static struct {unsigned f; char r[36];} string12 = {2228260, "                                  \000"};
static struct {unsigned f; char r[20];} string13 = {1179668, "XTkHelpWidgetsImpl\000"};
static struct {unsigned f; char r[16];} string14 = {851984, "\257\300\051\034\220\034\300\075\172\163\317\100\164\000\000"};
static struct {unsigned f; char r[12];} string15 = {524296, "\006\002\040\001\100\104\004\003\000\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\234\350\054\033\300\120\345\145\367\100\150\000\000"};
static struct {unsigned f; char r[16];} string18 = {851984, "\257\300\000\150\313\125\300\372\040\271\021\100\150\000\000"};
static struct {unsigned f; char r[16];} string19 = {851984, "\257\300\324\061\112\362\300\056\040\271\100\100\150\000\000"};
static struct {
   word f0[19]; word f19; 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[5]; 
   } globalframe = {
   {0}, (word) NoVisible_P420, 0, (word) MyClear_P360, 
   0, (word) MyDisplay_P300, 0, (word) MyCreateHandle_P240, 
   0, (word) SetHandle_P180, 0, (word) GetHandle_P120, 
   0, (word) Create_P60, 0, (word) XTkHelpStringsImpl_P0, 
   0, 4294967295, 4294967295, {0}
   };

static void NoName_Q768()
   {
   register ptr gf_c052 =  (ptr) &globalframe;
   word var_c11036;
   (* (( (ptr) gf_c052)+9) ) = (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2);
   (* (( (ptr) gf_c052)+10) ) = (word) XR_GetTypeIndex((word) &string3, 0, (word) &string4);
   (* (( (ptr) gf_c052)+12) ) = (word) XR_GetTypeIndex((word) &string5, 0, (word) &string6);
   (* (( (ptr) gf_c052)+13) ) = (word) XR_GetTypeIndex((word) &string7, 0, (word) &string2);
   (* (( (ptr) gf_c052)+14) ) = (word) XR_GetTypeIndex((word) &string8, 0, (word) &string9);
   (* (( (ptr) gf_c052)+15) ) = (word) XR_GetTypeIndex((word) &string10, 0, (word) &string11);
   (*  (ptr) (( (bPt) gf_c052)+68) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c052)+13) ), (word) &string12);
   (*  (ptr) (( (bPt) gf_c052)+72) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c052)+9) ), (word) &string13);
   (void) XR_DeclareGlobalFrame((word) "XTkHelpStringsImpl", &globalframe, (word) XR_GetTypeIndex((word) &string14, 0, (word) &string15)
      , (word) (( (bPt) gf_c052)+132)/* var_c10620 */ );
   var_c11036 = (word) XR_ImportInterface((word) "XTk", (word) XR_GetTypeIndexS((word) (&string16)), 50);
   (* (( (ptr) gf_c052)+40)/* var_c10780 */  ) = var_c11036;
   (void) XR_ImportProcS(var_c11036, 788227);
   (void) XR_ImportProcS(var_c11036, 67378433);
   (void) XR_ImportProcS(var_c11036, 67634690);
   var_c11036 = (word) XR_ImportInterface((word) "XTkLabels", (word) XR_GetTypeIndexS((word) (&string17)), 9);
   (* (( (ptr) gf_c052)+39)/* var_c10748 */  ) = var_c11036;
   (void) XR_ImportProcS(var_c11036, 787203);
   (void) XR_ImportProcS(var_c11036, 70778883);
   var_c11036 = (word) XR_ExportInterface((word) "XTkHelpStrings", (word) XR_GetTypeIndexS((word) (&string18)), 2);
   (* (( (ptr) gf_c052)+41)/* var_c11068 */  ) = var_c11036;
   (void) XR_ExportProcS(var_c11036, (word) (( (bPt) gf_c052)+116)/* var_c10556 */ , 67371009);
   (void) XR_ExportProcS(var_c11036, (word) (( (bPt) gf_c052)+108)/* var_c10524 */ , 524546);
   var_c11036 = (word) XR_ExportInterface((word) "XTkHelpWidgets", (word) XR_GetTypeIndexS((word) (&string19)), 1);
   (* (( (ptr) gf_c052)+41)/* var_c11068 */  ) = var_c11036;
   (void) XR_ExportProcS(var_c11036, (word) (( (bPt) gf_c052)+124)/* var_c10588 */ , 136577025);
   }

static void XTkHelpStringsImpl_P0(formal_c020, formal_c018)
   word formal_c020;
   word formal_c018;
   {
   register ptr gf_c11100 =  (ptr) &globalframe;
   /* XTkHelpStringsImpl: */ 
SOURCE(82, 1753)
   /* moved to installation proc */ 
   /* moved to installation proc */ 
SOURCE(899, 158)
   {
      word var_c10716;
      var_c10716 = XR_NewObject(20, (* (( (ptr) gf_c11100)+15) ));
      (*  (ptr) var_c10716 ) = (word) (( (bPt) gf_c11100)+92)/* var_c10460 */ ;
      (* (( (ptr) var_c10716)+1) ) = (word) (( (bPt) gf_c11100)+84)/* var_c10428 */ ;
      (* (( (ptr) var_c10716)+2) ) = (word) (( (bPt) gf_c11100)+76)/* var_c10396 */ ;
      (* (( (ptr) var_c10716)+3) ) = (word) (( (bPt) gf_c11100)+76)/* var_c10396 */ ;
      (* (( (ptr) gf_c11100)+8)/* myHelpClass_v2776 */  ) = var_c10716;
      };
   }

static void Create_P60(formal_c024, widgetSpec_v2996)
   word formal_c024;
   W9 widgetSpec_v2996;
   {
   register ptr gf_c11132 =  (ptr) &globalframe;
   word w_v3040;
   word h_v3068;
   /* Create: */ 
SOURCE(282, 189)
SOURCE(282, 189)
   w_v3040 = 0;
SOURCE(282, 189)
   h_v3068 = 0;
SOURCE(387, 44)
   {
      word pd20;
      pd20 = (* (( (ptr) (* (( (ptr) gf_c11132)+39)/* var_c10748 */  ))+4) );
      w_v3040 = (word) ( *( (fPt) ((*  (ptr) pd20 ))))(widgetSpec_v2996, (* (( (ptr) gf_c11132)+17) ), (*  (W4Pt) (( (ptr) gf_c11132)+35)
         /* var_c10684 */  ), pd20);
      };
SOURCE(433, 21)
   h_v3068 = (word) MyCreateHandle_P240(w_v3040);
SOURCE(456, 15)
   (void) SetHandle_P180(w_v3040, h_v3068);
   /* removed tail goto */ 
   (*  (ptr) formal_c024 ) = w_v3040;
   (* (( (ptr) formal_c024)+1) ) = h_v3068;
   return;
   }

static word GetHandle_P120(w_v3128)
   word w_v3128;
   {
   register ptr gf_c11164 =  (ptr) &globalframe;
   word var_c3172;
   /* GetHandle: */ 
SOURCE(478, 295)
SOURCE(478, 295)
   var_c3172 = 0;
SOURCE(556, 80)
   {
      word var_c10812;
      {
         word pd21;
         pd21 = (* (( (ptr) (* (( (ptr) gf_c11164)+40)/* var_c10780 */  ))+10) );
         var_c10812 = (word) ( *( (fPt) ((*  (ptr) pd21 ))))(w_v3128, (* (( (ptr) gf_c11164)+18) ), pd21);
         };
      if ((var_c10812 == 0)) {
         goto lab_L100001;
         };
      if (((* (( (ptr) gf_c11164)+14) ) == XR_GetReferentType(var_c10812))) {
         {
            word h_v3912;
            h_v3912 = var_c10812;
SOURCE(626, 10)
            return(h_v3912);
            };
         }
      else {
         lab_L100001: ;
         };
      };
SOURCE(653, 21)
   {
      word pd22;
      pd22 = (* (( (ptr) (* (( (ptr) gf_c11164)+40)/* var_c10780 */  ))+33) );
      w_v3128 = (word) ( *( (fPt) ((*  (ptr) pd22 ))))(w_v3128, pd22);
      };
SOURCE(676, 97)
   if ((w_v3128 != 0)) {
SOURCE(693, 80)
      {
         word var_c10844;
         {
            word pd23;
            pd23 = (* (( (ptr) (* (( (ptr) gf_c11164)+40)/* var_c10780 */  ))+10) );
            var_c10844 = (word) ( *( (fPt) ((*  (ptr) pd23 ))))(w_v3128, (* (( (ptr) gf_c11164)+18) ), pd23);
            };
         if ((var_c10844 == 0)) {
            goto lab_L100002;
            };
         if (((* (( (ptr) gf_c11164)+14) ) == XR_GetReferentType(var_c10844))) {
            {
               word h_v3956;
               h_v3956 = var_c10844;
SOURCE(763, 10)
               return(h_v3956);
               };
            }
         else {
            lab_L100002: ;
            };
         };
      };
SOURCE(478, 295)
   return(var_c3172);
   }

static void SetHandle_P180(w_v3232, h_v3260)
   word w_v3232;
   word h_v3260;
   {
   register ptr gf_c11196 =  (ptr) &globalframe;
   /* SetHandle: */ 
SOURCE(797, 96)
SOURCE(863, 30)
   {
      word pd24;
      pd24 = (* (( (ptr) (* (( (ptr) gf_c11196)+40)/* var_c10780 */  ))+11) );
      (void) ( *( (fPt) ((*  (ptr) pd24 ))))(w_v3232, (* (( (ptr) gf_c11196)+18) ), h_v3260, pd24);
      };
   }

static word MyCreateHandle_P240(w_v3460)
   word w_v3460;
   {
   register ptr gf_c11228 =  (ptr) &globalframe;
   word h_v3504;
   word md_v4000;
   /* MyCreateHandle: */ 
SOURCE(1147, 175)
SOURCE(1147, 175)
   h_v3504 = 0;
SOURCE(1226, 41)
   md_v4000 = XR_NewObject(12, (* (( (ptr) gf_c11228)+10) ));
   (*  (ptr) md_v4000 ) = w_v3460;
SOURCE(1269, 53)
   {
      word var_c10908;
      var_c10908 = XR_NewObject(8, (* (( (ptr) gf_c11228)+14) ));
      (*  (ptr) var_c10908 ) = (* (( (ptr) gf_c11228)+8)/* myHelpClass_v2776 */  );
      (* (( (ptr) var_c10908)+1) ) = md_v4000;
      h_v3504 = var_c10908;
      };
SOURCE(1147, 175)
   return(h_v3504);
   }

static void MyDisplay_P300(h_v3564, string_v3592, key_v3620)
   word h_v3564;
   word string_v3592;
   word key_v3620;
   {
   register ptr gf_c11260 =  (ptr) &globalframe;
   /* MyDisplay: */ 
SOURCE(1326, 289)
SOURCE(1399, 216)
   {
      word var_c10940;
      var_c10940 = (* (( (ptr) h_v3564)+1) );
      if ((var_c10940 == 0)) {
         goto lab_L100003;
         };
      if (((* (( (ptr) gf_c11260)+10) ) == XR_GetReferentType(var_c10940))) {
         {
            word md_v4056;
            md_v4056 = var_c10940;
SOURCE(1441, 176)
            {
               word text_v4112 = 0;
SOURCE(1466, 67)
               {
                  word var_c10972;
                  var_c10972 = string_v3592;
                  if ((var_c10972 == 0)) {
                     goto lab_L100004;
                     };
                  {
                     word tc25;
                     if (((* (( (ptr) gf_c11260)+12) ) == XR_GetReferentType(var_c10972))) {
                        tc25 =  (word) ((*(int*)var_c10972<0) == 0);
                        }
                     else {
                        tc25 =  (word) 0;
                        };
                     if (tc25) {
                        {
                           word r_v4156;
                           r_v4156 = var_c10972;
SOURCE(1506, 8)
                           text_v4112 = r_v4156;
                           };
                        }
                     else {
                        lab_L100004: ;
SOURCE(1527, 6)
                        return;
                        };
                     };
                  };
SOURCE(1535, 18)
               (* (( (ptr) md_v4056)+1) ) = string_v3592;
SOURCE(1555, 12)
               (* (( (ptr) md_v4056)+2) ) = key_v3620;
SOURCE(1569, 46)
               {
                  word pd26;
                  pd26 = (* (( (ptr) (* (( (ptr) gf_c11260)+39)/* var_c10748 */  ))+7) );
                  (void) ( *( (fPt) ((*  (ptr) pd26 ))))((*  (ptr) md_v4056 ), text_v4112, 2, pd26);
                  };
               };
            };
         }
      else {
         lab_L100003: ;
         };
      };
   }

static void MyClear_P360(h_v3704, string_v3732, key_v3760)
   word h_v3704;
   word string_v3732;
   word key_v3760;
   {
   register ptr gf_c11292 =  (ptr) &globalframe;
   /* MyClear: */ 
SOURCE(1638, 197)
SOURCE(1709, 126)
   {
      word var_c11004;
      var_c11004 = (* (( (ptr) h_v3704)+1) );
      if ((var_c11004 == 0)) {
         goto lab_L100005;
         };
      if (((* (( (ptr) gf_c11292)+10) ) == XR_GetReferentType(var_c11004))) {
         {
            word md_v4200;
            md_v4200 = var_c11004;
SOURCE(1753, 82)
            if (((* (( (ptr) md_v4200)+1) ) == string_v3732) || ((* (( (ptr) md_v4200)+2) ) == key_v3760)) {
SOURCE(1792, 43)
               {
                  word pd27;
                  pd27 = (* (( (ptr) (* (( (ptr) gf_c11292)+39)/* var_c10748 */  ))+7) );
                  (void) ( *( (fPt) ((*  (ptr) pd27 ))))((*  (ptr) md_v4200 ), (* (( (ptr) gf_c11292)+17) ), 1, pd27);
                  };
               };
            };
         }
      else {
         lab_L100005: ;
         };
      };
   }

static void NoVisible_P420(h_v3844, data_v3872)
   word h_v3844;
   word data_v3872;
   {
   /* NoVisible: */ 
   }

/* file: XTkHelpStringsImpl, module: XTkHelpStringsImpl, compiled at: April 21, 1992 12:44:47 pm PDT */ 
extern void XR_install_XTkHelpStringsImpl() {
   NoName_Q768();
   }
extern void XR_run_XTkHelpStringsImpl() { XR_Start(&globalframe); }