/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1992 by Xerox Corporation.  All rights reserved. */
/* time: October 9, 1992 0:48:53 am PDT */
/* C2C version: October 16, 1990 (native) */
/* ref-counting: off */
/* file: X11FontCommandsImpl, module: X11FontCommandsImpl */ 
/* switches: bcfhklnouw */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob_version [2977366625,3315543322] X11FontCommandsImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef word (*fPt)();
typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8;
typedef struct {word f0, f1;} W2;
typedef struct {word f0, f1, f2, f3, f4, f5;} W6;
typedef struct {word f0, f1, f2, f3, f4, f5, f6;} W7;
#define SOURCE(p, l) /* source p, l */
#define SGNCK(i) ((int) (word) (i) < 0 ? XR_RaiseArithmeticFault(): i )
static void NoName_Q2028();
static void X11FontCommandsImpl_P0();
static void ListFontsWithInfoCommand_P60();
static void Inner_P420();
static word Each_P480();
static word NoName_Q2088();
static void EnumerateFontsCommand_P120();
static void Inner_P540();
static word Each_P600();
static word NoName_Q2148();
static void GetFontPathCommand_P180();
static void Inner_P660();
static void ListExtensionsCommand_P240();
static void Inner_P768();
static void ServerInfoCommand_P300();
static void Inner_P876();
static void OtherServerInfoCommand_P360();
static void Inner_P936();
static void NoName_Q2208();
static void NoName_Q2268();
static struct {unsigned f; char r[16];} string1 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"};
static struct {unsigned f; char r[4];} string2 = {65537, "\001\000\000"};
static struct {unsigned f; char r[28];} string3 = {1638428, "...query default X server\000\000"};
static struct {unsigned f; char r[24];} string4 = {1310744, "X11ListFontsWithInfo\000\000\000"};
static struct {unsigned f; char r[20];} string5 = {1114132, "X11EnumerateFonts\000\000"};
static struct {unsigned f; char r[16];} string6 = {917520, "X11GetFontPath\000"};
static struct {unsigned f; char r[20];} string7 = {1114132, "X11ListExtensions\000\000"};
static struct {unsigned f; char r[16];} string8 = {851984, "X11ServerInfo\000\000"};
static struct {unsigned f; char r[20];} string9 = {1114132, "X11MoreServerInfo\000\000"};
static struct {unsigned f; char r[24];} string10 = {1441816, "needs pattern argument\000"};
static struct {unsigned f; char r[4];} string11 = {196612, "%g\012"};
static struct {unsigned f; char r[36];} string12 = {2162724, "   fontAscent %g  fontDescent %g\012\000\000"};
static struct {unsigned f; char r[12];} string13 = {589836, "name: %g\012\000\000"};
static struct {unsigned f; char r[32];} string14 = {1966112, "protocol major: %g  minor: %g\012\000"};
static struct {unsigned f; char r[16];} string15 = {786448, "release: %g\012\000\000\000"};
static struct {unsigned f; char r[12];} string16 = {720908, "vendor: %g\012"};
static struct {unsigned f; char r[24];} string17 = {1441816, "number of screens: %g\012\000"};
static struct {unsigned f; char r[24];} string18 = {1441816, "number of formats: %g\012\000"};
static struct {unsigned f; char r[32];} string19 = {1900576, "bitmapFormatScanlineUnit: %g\012\000\000"};
static struct {unsigned f; char r[32];} string20 = {1835040, "bitmapFormatScanlinePad: %g\012\000\000\000"};
static struct {unsigned f; char r[32];} string21 = {1900576, "max request length words: %g\012\000\000"};
static struct {unsigned f; char r[32];} string22 = {1900576, "max request length bytes: %g\012\000\000"};
static struct {unsigned f; char r[28];} string23 = {1638428, "imageByteOrder: lsbFirst\012\000\000"};
static struct {unsigned f; char r[28];} string24 = {1638428, "imageByteOrder: msbFirst\012\000\000"};
static struct {unsigned f; char r[40];} string25 = {2555944, "bitmapFormatBitOrder: leastSignificant\012"};
static struct {unsigned f; char r[40];} string26 = {2490408, "bitmapFormatBitOrder: mostSignificant\012\000"};
static struct {unsigned f; char r[16];} string27 = {851984, "\257\300\261\167\002\141\300\305\237\055\032\100\164\000\000"};
static struct {unsigned f; char r[12];} string28 = {524296, "\006\001\054\010\000\004\030\001\000\000\000"};
static struct {unsigned f; char r[16];} string29 = {851984, "\257\300\373\225\000\071\300\362\156\307\320\100\150\000\000"};
static struct {unsigned f; char r[16];} string30 = {851984, "\257\300\311\235\133\064\300\165\175\234\175\100\150\000\000"};
static struct {unsigned f; char r[16];} string31 = {851984, "\257\300\015\277\004\146\300\034\367\146\045\100\164\000\000"};
static struct {unsigned f; char r[16];} string32 = {851984, "\257\300\240\236\274\315\300\111\163\325\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string33 = {851984, "\257\300\273\033\216\325\300\071\334\365\112\100\150\000\000"};
static struct {unsigned f; char r[16];} string34 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\100\164\000\000"};
static struct {
   word f0[35]; 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[7]; 
   } globalframe = {
   {0}, (word) OtherServerInfoCommand_P360, 0, (word) ServerInfoCommand_P300, 
   0, (word) ListExtensionsCommand_P240, 0, (word) GetFontPathCommand_P180, 
   0, (word) EnumerateFontsCommand_P120, 0, (word) ListFontsWithInfoCommand_P60, 
   0, (word) X11FontCommandsImpl_P0, {0}
   };

static void NoName_Q2028()
   {
   register ptr gf_c0136 =  (ptr) &globalframe;
   word var_c17472;
   (* (( (ptr) gf_c0136)+9) ) = (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2);
   (*  (ptr) (( (bPt) gf_c0136)+44) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string3);
   (*  (ptr) (( (bPt) gf_c0136)+48) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string4);
   (*  (ptr) (( (bPt) gf_c0136)+52) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string5);
   (*  (ptr) (( (bPt) gf_c0136)+56) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string6);
   (*  (ptr) (( (bPt) gf_c0136)+60) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string7);
   (*  (ptr) (( (bPt) gf_c0136)+64) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string8);
   (*  (ptr) (( (bPt) gf_c0136)+68) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string9);
   (*  (ptr) (( (bPt) gf_c0136)+72) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string10);
   (*  (ptr) (( (bPt) gf_c0136)+76) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string11);
   (*  (ptr) (( (bPt) gf_c0136)+80) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string12);
   (*  (ptr) (( (bPt) gf_c0136)+84) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string13);
   (*  (ptr) (( (bPt) gf_c0136)+88) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string14);
   (*  (ptr) (( (bPt) gf_c0136)+92) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string15);
   (*  (ptr) (( (bPt) gf_c0136)+96) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string16);
   (*  (ptr) (( (bPt) gf_c0136)+100) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string17);
   (*  (ptr) (( (bPt) gf_c0136)+104) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string18);
   (*  (ptr) (( (bPt) gf_c0136)+108) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string19);
   (*  (ptr) (( (bPt) gf_c0136)+112) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string20);
   (*  (ptr) (( (bPt) gf_c0136)+116) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string21);
   (*  (ptr) (( (bPt) gf_c0136)+120) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string22);
   (*  (ptr) (( (bPt) gf_c0136)+124) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string23);
   (*  (ptr) (( (bPt) gf_c0136)+128) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string24);
   (*  (ptr) (( (bPt) gf_c0136)+132) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string25);
   (*  (ptr) (( (bPt) gf_c0136)+136) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0136)+9) ), (word) &string26);
   (void) XR_DeclareGlobalFrame((word) "X11FontCommandsImpl", &globalframe, (word) XR_GetTypeIndex((word) &string27, 0, (word) &string28)
      , (word) (( (bPt) gf_c0136)+188)/* var_c15424 */ );
   var_c17472 = (word) XR_ImportInterface((word) "Commander", (word) XR_GetTypeIndexS((word) (&string29)), 3);
   (* (( (ptr) gf_c0136)+49)/* var_c15456 */  ) = var_c17472;
   (void) XR_ImportProcS(var_c17472, 1310725);
   var_c17472 = (word) XR_ImportInterface((word) "CommanderOps", (word) XR_GetTypeIndexS((word) (&string30)), 14);
   (* (( (ptr) gf_c0136)+50)/* var_c15520 */  ) = var_c17472;
   (void) XR_ImportProcS(var_c17472, 67896579);
   (void) XR_ImportProcS(var_c17472, 67371777);
   var_c17472 = (word) XR_ImportInterface((word) "IO", (word) XR_GetTypeIndexS((word) (&string31)), 103);
   (* (( (ptr) gf_c0136)+54)/* var_c15712 */  ) = var_c17472;
   (void) XR_ImportProcS(var_c17472, 1071364);
   (void) XR_ImportProcS(var_c17472, 2111493);
   (void) XR_ImportProcS(var_c17472, 1063171);
   var_c17472 = (word) XR_ImportInterface((word) "Process", (word) XR_GetTypeIndexS((word) (&string32)), 22);
   (* (( (ptr) gf_c0136)+53)/* var_c15648 */  ) = var_c17472;
   (void) XR_ImportProcS(var_c17472, 3584);
   var_c17472 = (word) XR_ImportInterface((word) "X11CommanderOps", (word) XR_GetTypeIndexS((word) (&string33)), 1);
   (* (( (ptr) gf_c0136)+51)/* var_c15552 */  ) = var_c17472;
   (void) XR_ImportProcS(var_c17472, 786435);
   var_c17472 = (word) XR_ImportInterface((word) "Xl", (word) XR_GetTypeIndexS((word) (&string34)), 218);
   (* (( (ptr) gf_c0136)+52)/* var_c15616 */  ) = var_c17472;
   (void) XR_ImportProcS(var_c17472, 67379457);
   (void) XR_ImportProcS(var_c17472, 67396097);
   (void) XR_ImportProcS(var_c17472, 1336837);
   (void) XR_ImportProcS(var_c17472, 68445957);
   }

static void X11FontCommandsImpl_P0(formal_c023, formal_c022)
   word formal_c023;
   word formal_c022;
   {
   register ptr gf_c17504 =  (ptr) &globalframe;
   /* X11FontCommandsImpl: */ 
SOURCE(82, 4079)
SOURCE(3660, 89)
   {
      word pd35;
      pd35 = (* (( (ptr) (* (( (ptr) gf_c17504)+49)/* var_c15456 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd35 ))))((* (( (ptr) gf_c17504)+12) ), (word) (( (bPt) gf_c17504)+180)/* var_c15392 */ , (* (
            ( (ptr) gf_c17504)+11) ), 0, 1, pd35);
      };
SOURCE(3751, 83)
   {
      word pd36;
      pd36 = (* (( (ptr) (* (( (ptr) gf_c17504)+49)/* var_c15456 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd36 ))))((* (( (ptr) gf_c17504)+13) ), (word) (( (bPt) gf_c17504)+172)/* var_c15360 */ , (* (
            ( (ptr) gf_c17504)+11) ), 0, 1, pd36);
      };
SOURCE(3836, 77)
   {
      word pd37;
      pd37 = (* (( (ptr) (* (( (ptr) gf_c17504)+49)/* var_c15456 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd37 ))))((* (( (ptr) gf_c17504)+14) ), (word) (( (bPt) gf_c17504)+164)/* var_c15328 */ , (* (
            ( (ptr) gf_c17504)+11) ), 0, 1, pd37);
      };
SOURCE(3915, 83)
   {
      word pd38;
      pd38 = (* (( (ptr) (* (( (ptr) gf_c17504)+49)/* var_c15456 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd38 ))))((* (( (ptr) gf_c17504)+15) ), (word) (( (bPt) gf_c17504)+156)/* var_c15296 */ , (* (
            ( (ptr) gf_c17504)+11) ), 0, 1, pd38);
      };
SOURCE(4000, 75)
   {
      word pd39;
      pd39 = (* (( (ptr) (* (( (ptr) gf_c17504)+49)/* var_c15456 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd39 ))))((* (( (ptr) gf_c17504)+16) ), (word) (( (bPt) gf_c17504)+148)/* var_c15264 */ , (* (
            ( (ptr) gf_c17504)+11) ), 0, 1, pd39);
      };
SOURCE(4077, 84)
   {
      word pd40;
      pd40 = (* (( (ptr) (* (( (ptr) gf_c17504)+49)/* var_c15456 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd40 ))))((* (( (ptr) gf_c17504)+17) ), (word) (( (bPt) gf_c17504)+140)/* var_c15232 */ , (* (
            ( (ptr) gf_c17504)+11) ), 0, 1, pd40);
      };
   }

static void ListFontsWithInfoCommand_P60(formal_c030, formal_c0186)
   word formal_c030;
   word formal_c0186;
   {
   W8 var_c17536;
   /* declaration of cmd_v4428 skipped */ 
   register ptr gf_c17568 =  (ptr) &globalframe;
   word result_v4472;
   word msg_v4500;
   /* declaration of var_c15488 skipped */ 
   /* declaration of pattern_v3020 skipped */ 
   var_c17536.f4/* cmd_v4428 */  = formal_c0186;
   /* ListFontsWithInfoCommand: */ 
SOURCE(194, 682)
   {
      word tmpAddr41;
      tmpAddr41 = (word) (( (ptr) &var_c17536)+5)/* var_c15488 */ ;
      (*  (ptr) tmpAddr41 ) = ( ((word)  (fPt) Inner_P420) );
      (* (( (ptr) tmpAddr41) + 1) ) = 1;
      };
SOURCE(194, 682)
   result_v4472 = 0;
SOURCE(194, 682)
   msg_v4500 = 0;
SOURCE(685, 18)
   var_c17536.f7/* pattern_v3020 */  = 0;
SOURCE(706, 89)
   {
      word pd42;
      pd42 = (* (( (ptr) (* (( (ptr) gf_c17568)+50)/* var_c15520 */  ))+7) );
      if (( (int)(word) ( *( (fPt) ((*  (ptr) pd42 ))))(var_c17536.f4/* cmd_v4428 */ , pd42) !=  (int)2)) {
SOURCE(744, 51)
         {
            word var_c029;
            var_c029 = (* (( (ptr) gf_c17568)+18) );
            (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c17568)+50)/* var_c15520 */  ))+4) ), (word) &var_c029);
            };
         };
      };
SOURCE(800, 35)
   {
      word pd43;
      pd43 = (* (( (ptr) (* (( (ptr) gf_c17568)+50)/* var_c15520 */  ))+9) );
      var_c17536.f7/* pattern_v3020 */  = (word) ( *( (fPt) ((*  (ptr) pd43 ))))(var_c17536.f4/* cmd_v4428 */ , 1, 0, pd43);
      };
SOURCE(837, 39)
   {
      word pd44;
      pd44 = (* (( (ptr) (* (( (ptr) gf_c17568)+51)/* var_c15552 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd44 ))))((word) (( (bPt) &var_c17536)+20)/* var_c15488 */ , 1, 0, pd44);
      };
   /* removed tail goto */ 
   (*  (ptr) formal_c030 ) = result_v4472;
   (* (( (ptr) formal_c030)+1) ) = msg_v4500;
   return;
   }

static void Inner_P420(connection_v8144, formal_c17664)
   word connection_v8144;
   word formal_c17664;
   {
   W6 var_c17600;
   register ptr gf_c17632 =  (ptr) &globalframe;
   /* declaration of var_c15584 skipped */ 
   word count_v3092;
   formal_c17664 = (formal_c17664 - 20);
   var_c17600.f0 = formal_c17664;
   /* Inner: */ 
SOURCE(246, 360)
   {
      word tmpAddr45;
      tmpAddr45 = (word) (( (ptr) &var_c17600)+4)/* var_c15584 */ ;
      (*  (ptr) tmpAddr45 ) = ( ((word)  (fPt) Each_P480) );
      (* (( (ptr) tmpAddr45) + 1) ) = 1;
      };
SOURCE(609, 71)
   {
      word pd46;
      pd46 = (* (( (ptr) (* (( (ptr) gf_c17632)+52)/* var_c15616 */  ))+107) );
      count_v3092 = (word) ( *( (fPt) ((*  (ptr) pd46 ))))(connection_v8144, (word) (( (bPt) &var_c17600)+16)/* var_c15584 */ , (* (
            ( (ptr) formal_c17664)+7) ), 1000, (* (( (ptr) formal_c17664)+4) ), pd46);
      };
   }

static word Each_P480(formal_c0187, formal_c0188, data_v9208, formal_c17728)
   word formal_c0187;
   word formal_c0188;
   word data_v9208;
   word formal_c17728;
   {
   W7 var_c17696;
   /* declaration of name_v9152 skipped */ 
   /* declaration of info_v9180 skipped */ 
   /* declaration of var_c01 skipped */ 
   word quit_v9252;
   formal_c17728 = (formal_c17728 - 16);
   var_c17696.f4/* name_v9152 */  = formal_c0187;
   var_c17696.f5/* info_v9180 */  = formal_c0188;
   var_c17696.f0 = formal_c17728;
   /* Each: */ 
SOURCE(288, 318)
SOURCE(288, 318)
   quit_v9252 = 0;
SOURCE(312, 294)
SOURCE(314, 262)
   {
      word var_c02;
      {
         word var_c0162;
         var_c0162 = (word) &var_c17696;
         var_c02 = (word) XR_Enable(( ((word)  (fPt) NoName_Q2088) ), ( ((word)  (fPt) NoName_Q2268) ), var_c0162);
         };
      if ((var_c02 == 2)) {
         goto lab_L100001;
         }
      else {
         if ((var_c02 == 1)) {
            goto lab_L02;
            };
         };
      };
   goto lab_L100006;
   lab_L100001: ;
SOURCE(592, 14)
   return(1);
   lab_L100006: ;
   lab_L02: ;
   return(var_c17696.f6/* var_c01 */ );
   }

static word NoName_Q2088(formal_c0143)
   word formal_c0143;
   {
   register ptr gf_c0142 =  (ptr) &globalframe;
SOURCE(388, 23)
   {
      word pd47;
      pd47 = (* (( (ptr) (* (( (ptr) gf_c0142)+53)/* var_c15648 */  ))+18) );
      (void) ( *( (fPt) ((*  (ptr) pd47 ))))(pd47);
      };
SOURCE(413, 40)
   {
      W2 var_c15680;
      var_c15680.f0 = 11;
      var_c15680.f1 = (* (( (ptr) formal_c0143)+4) );
      {
         word pd48;
         pd48 = (* (( (ptr) (* (( (ptr) gf_c0142)+54)/* var_c15712 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd48 ))))((* (( (ptr) (* (( (ptr) (*  (ptr) (*  (ptr) formal_c0143 ) ))+4) ))+1) ), (* (( (ptr) gf_c0142)+19)
             ), var_c15680, pd48);
         };
      };
SOURCE(455, 105)
   {
      W2 var_c15744;
      W2 var_c15840;
      {
         W2 var_c15776;
         word v_v14992;
         v_v14992 = (* (( (ptr) (* (( (ptr) formal_c0143)+5) ))+11) );
         var_c15776.f0 = 5;
         var_c15776.f1 = v_v14992;
         var_c15744 = var_c15776;
         };
      {
         W2 var_c15872;
         word v_v14944;
         v_v14944 = (* (( (ptr) (* (( (ptr) formal_c0143)+5) ))+12) );
         var_c15872.f0 = 5;
         var_c15872.f1 = v_v14944;
         var_c15840 = var_c15872;
         };
      {
         W2 var_c0163;
         (*  (ptr) (word) &var_c0163 ) = 0;
         (* (( (ptr) (word) &var_c0163) + 1) ) = 0;
         {
            word pd49;
            pd49 = (* (( (ptr) (* (( (ptr) gf_c0142)+54)/* var_c15712 */  ))+60) );
            (void) ( *( (fPt) ((*  (ptr) pd49 ))))((* (( (ptr) (* (( (ptr) (*  (ptr) (*  (ptr) formal_c0143 ) ))+4) ))+1) ), (* (( (ptr) gf_c0142)+20)
                ), var_c15744, var_c15840, var_c0163, pd49);
            };
         };
      };
SOURCE(562, 14)
   (* (( (ptr) formal_c0143)+6) ) = 0;
   return(1);
   /* c2c skipped dead code */ 
   }

static void EnumerateFontsCommand_P120(formal_c051, formal_c0189)
   word formal_c051;
   word formal_c0189;
   {
   W8 var_c17760;
   /* declaration of cmd_v4560 skipped */ 
   register ptr gf_c17792 =  (ptr) &globalframe;
   word result_v4604;
   word msg_v4632;
   /* declaration of var_c15968 skipped */ 
   /* declaration of pattern_v3136 skipped */ 
   var_c17760.f4/* cmd_v4560 */  = formal_c0189;
   /* EnumerateFontsCommand: */ 
SOURCE(882, 546)
   {
      word tmpAddr50;
      tmpAddr50 = (word) (( (ptr) &var_c17760)+5)/* var_c15968 */ ;
      (*  (ptr) tmpAddr50 ) = ( ((word)  (fPt) Inner_P540) );
      (* (( (ptr) tmpAddr50) + 1) ) = 1;
      };
SOURCE(882, 546)
   result_v4604 = 0;
SOURCE(882, 546)
   msg_v4632 = 0;
SOURCE(931, 18)
   var_c17760.f7/* pattern_v3136 */  = 0;
SOURCE(1258, 89)
   {
      word pd51;
      pd51 = (* (( (ptr) (* (( (ptr) gf_c17792)+50)/* var_c15520 */  ))+7) );
      if (( (int)(word) ( *( (fPt) ((*  (ptr) pd51 ))))(var_c17760.f4/* cmd_v4560 */ , pd51) !=  (int)2)) {
SOURCE(1296, 51)
         {
            word var_c050;
            var_c050 = (* (( (ptr) gf_c17792)+18) );
            (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c17792)+50)/* var_c15520 */  ))+4) ), (word) &var_c050);
            };
         };
      };
SOURCE(1352, 35)
   {
      word pd52;
      pd52 = (* (( (ptr) (* (( (ptr) gf_c17792)+50)/* var_c15520 */  ))+9) );
      var_c17760.f7/* pattern_v3136 */  = (word) ( *( (fPt) ((*  (ptr) pd52 ))))(var_c17760.f4/* cmd_v4560 */ , 1, 0, pd52);
      };
SOURCE(1389, 39)
   {
      word pd53;
      pd53 = (* (( (ptr) (* (( (ptr) gf_c17792)+51)/* var_c15552 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd53 ))))((word) (( (bPt) &var_c17760)+20)/* var_c15968 */ , 1, 0, pd53);
      };
   /* removed tail goto */ 
   (*  (ptr) formal_c051 ) = result_v4604;
   (* (( (ptr) formal_c051)+1) ) = msg_v4632;
   return;
   }

static void Inner_P540(connection_v11116, formal_c17888)
   word connection_v11116;
   word formal_c17888;
   {
   W6 var_c17824;
   register ptr gf_c17856 =  (ptr) &globalframe;
   /* declaration of var_c16000 skipped */ 
   formal_c17888 = (formal_c17888 - 20);
   var_c17824.f0 = formal_c17888;
   /* Inner: */ 
SOURCE(951, 302)
   {
      word tmpAddr54;
      tmpAddr54 = (word) (( (ptr) &var_c17824)+4)/* var_c16000 */ ;
      (*  (ptr) tmpAddr54 ) = ( ((word)  (fPt) Each_P600) );
      (* (( (ptr) tmpAddr54) + 1) ) = 1;
      };
SOURCE(1203, 50)
   {
      word pd55;
      pd55 = (* (( (ptr) (* (( (ptr) gf_c17856)+52)/* var_c15616 */  ))+106) );
      (void) ( *( (fPt) ((*  (ptr) pd55 ))))(connection_v11116, (word) (( (bPt) &var_c17824)+16)/* var_c16000 */ , (* (( (ptr) formal_c17888)+7)
          ), 1000, 0, pd55);
      };
   }

static word Each_P600(formal_c0190, data_v11380, formal_c17952)
   word formal_c0190;
   word data_v11380;
   word formal_c17952;
   {
   W6 var_c17920;
   /* declaration of name_v11352 skipped */ 
   /* declaration of var_c03 skipped */ 
   word quit_v11424;
   formal_c17952 = (formal_c17952 - 16);
   var_c17920.f4/* name_v11352 */  = formal_c0190;
   var_c17920.f0 = formal_c17952;
   /* Each: */ 
SOURCE(993, 207)
SOURCE(993, 207)
   quit_v11424 = 0;
SOURCE(1013, 187)
SOURCE(1015, 155)
   {
      word var_c04;
      {
         word var_c0164;
         var_c0164 = (word) &var_c17920;
         var_c04 = (word) XR_Enable(( ((word)  (fPt) NoName_Q2148) ), ( ((word)  (fPt) NoName_Q2208) ), var_c0164);
         };
      if ((var_c04 == 3)) {
         goto lab_L100008;
         }
      else {
         if ((var_c04 == 1)) {
            goto lab_L04;
            };
         };
      };
   goto lab_L100011;
   lab_L100008: ;
SOURCE(1186, 14)
   return(1);
   lab_L100011: ;
   lab_L04: ;
   return(var_c17920.f5/* var_c03 */ );
   }

static word NoName_Q2148(formal_c0149)
   word formal_c0149;
   {
   register ptr gf_c0148 =  (ptr) &globalframe;
SOURCE(1089, 23)
   {
      word pd56;
      pd56 = (* (( (ptr) (* (( (ptr) gf_c0148)+53)/* var_c15648 */  ))+18) );
      (void) ( *( (fPt) ((*  (ptr) pd56 ))))(pd56);
      };
SOURCE(1114, 40)
   {
      W2 var_c16032;
      var_c16032.f0 = 11;
      var_c16032.f1 = (* (( (ptr) formal_c0149)+4) );
      {
         word pd57;
         pd57 = (* (( (ptr) (* (( (ptr) gf_c0148)+54)/* var_c15712 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd57 ))))((* (( (ptr) (* (( (ptr) (*  (ptr) (*  (ptr) formal_c0149 ) ))+4) ))+1) ), (* (( (ptr) gf_c0148)+19)
             ), var_c16032, pd57);
         };
      };
SOURCE(1156, 14)
   (* (( (ptr) formal_c0149)+5) ) = 0;
   return(1);
   /* c2c skipped dead code */ 
   }

static void GetFontPathCommand_P180(formal_c062, formal_c0191)
   word formal_c062;
   word formal_c0191;
   {
   W7 var_c17984;
   /* declaration of cmd_v4692 skipped */ 
   register ptr gf_c18016 =  (ptr) &globalframe;
   word result_v4736;
   word msg_v4764;
   /* declaration of var_c16064 skipped */ 
   var_c17984.f4/* cmd_v4692 */  = formal_c0191;
   /* GetFontPathCommand: */ 
SOURCE(1434, 273)
   {
      word tmpAddr58;
      tmpAddr58 = (word) (( (ptr) &var_c17984)+5)/* var_c16064 */ ;
      (*  (ptr) tmpAddr58 ) = ( ((word)  (fPt) Inner_P660) );
      (* (( (ptr) tmpAddr58) + 1) ) = 1;
      };
SOURCE(1434, 273)
   result_v4736 = 0;
SOURCE(1434, 273)
   msg_v4764 = 0;
SOURCE(1668, 39)
   {
      word pd59;
      pd59 = (* (( (ptr) (* (( (ptr) gf_c18016)+51)/* var_c15552 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd59 ))))((word) (( (bPt) &var_c17984)+20)/* var_c16064 */ , 1, 0, pd59);
      };
   /* removed tail goto */ 
   (*  (ptr) formal_c062 ) = result_v4736;
   (* (( (ptr) formal_c062)+1) ) = msg_v4764;
   return;
   }

static void Inner_P660(connection_v11716, formal_c18080)
   word connection_v11716;
   word formal_c18080;
   {
   register ptr gf_c18048 =  (ptr) &globalframe;
   formal_c18080 = (formal_c18080 - 20);
   /* Inner: */ 
SOURCE(1480, 174)
SOURCE(1522, 132)
   {
      register word list_v3296;
      {
         word pd60;
         pd60 = (* (( (ptr) (* (( (ptr) gf_c18048)+52)/* var_c15616 */  ))+102) );
         list_v3296 = (word) ( *( (fPt) ((*  (ptr) pd60 ))))(connection_v11716, pd60);
         };
      lab_L100016: ;
      if ((list_v3296 != 0)) {
         }
      else {
         goto lab_L100013;
         };
SOURCE(1608, 46)
      {
         W2 var_c16096;
         {
            W2 var_c16128;
            word v_v15184;
            v_v15184 = (*  (ptr) list_v3296 );
            var_c16128.f0 = 11;
            var_c16128.f1 = v_v15184;
            var_c16096 = var_c16128;
            };
         {
            word pd61;
            pd61 = (* (( (ptr) (* (( (ptr) gf_c18048)+54)/* var_c15712 */  ))+61) );
            (void) ( *( (fPt) ((*  (ptr) pd61 ))))((* (( (ptr) (* (( (ptr) formal_c18080)+4) ))+1) ), (* (( (ptr) gf_c18048)+19) ), var_c16096, pd61)
            ;
            };
         };
      list_v3296 = (* (( (ptr) list_v3296)+1) );
      goto lab_L100016;
      lab_L100013: ;
      };
   }

static void ListExtensionsCommand_P240(formal_c072, formal_c0192)
   word formal_c072;
   word formal_c0192;
   {
   W7 var_c18112;
   /* declaration of cmd_v4824 skipped */ 
   register ptr gf_c18144 =  (ptr) &globalframe;
   word result_v4868;
   word msg_v4896;
   /* declaration of var_c16192 skipped */ 
   var_c18112.f4/* cmd_v4824 */  = formal_c0192;
   /* ListExtensionsCommand: */ 
SOURCE(1713, 279)
   {
      word tmpAddr62;
      tmpAddr62 = (word) (( (ptr) &var_c18112)+5)/* var_c16192 */ ;
      (*  (ptr) tmpAddr62 ) = ( ((word)  (fPt) Inner_P768) );
      (* (( (ptr) tmpAddr62) + 1) ) = 1;
      };
SOURCE(1713, 279)
   result_v4868 = 0;
SOURCE(1713, 279)
   msg_v4896 = 0;
SOURCE(1953, 39)
   {
      word pd63;
      pd63 = (* (( (ptr) (* (( (ptr) gf_c18144)+51)/* var_c15552 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd63 ))))((word) (( (bPt) &var_c18112)+20)/* var_c16192 */ , 1, 0, pd63);
      };
   /* removed tail goto */ 
   (*  (ptr) formal_c072 ) = result_v4868;
   (* (( (ptr) formal_c072)+1) ) = msg_v4896;
   return;
   }

static void Inner_P768(connection_v12004, formal_c18208)
   word connection_v12004;
   word formal_c18208;
   {
   register ptr gf_c18176 =  (ptr) &globalframe;
   formal_c18208 = (formal_c18208 - 20);
   /* Inner: */ 
SOURCE(1762, 177)
SOURCE(1804, 135)
   {
      register word list_v3468;
      {
         word pd64;
         pd64 = (* (( (ptr) (* (( (ptr) gf_c18176)+52)/* var_c15616 */  ))+37) );
         list_v3468 = (word) ( *( (fPt) ((*  (ptr) pd64 ))))(connection_v12004, pd64);
         };
      lab_L100022: ;
      if ((list_v3468 != 0)) {
         }
      else {
         goto lab_L100019;
         };
SOURCE(1893, 46)
      {
         W2 var_c16224;
         {
            W2 var_c16256;
            word v_v15136;
            v_v15136 = (*  (ptr) list_v3468 );
            var_c16256.f0 = 11;
            var_c16256.f1 = v_v15136;
            var_c16224 = var_c16256;
            };
         {
            word pd65;
            pd65 = (* (( (ptr) (* (( (ptr) gf_c18176)+54)/* var_c15712 */  ))+61) );
            (void) ( *( (fPt) ((*  (ptr) pd65 ))))((* (( (ptr) (* (( (ptr) formal_c18208)+4) ))+1) ), (* (( (ptr) gf_c18176)+19) ), var_c16224, pd65)
            ;
            };
         };
      list_v3468 = (* (( (ptr) list_v3468)+1) );
      goto lab_L100022;
      lab_L100019: ;
      };
   }

static void ServerInfoCommand_P300(formal_c082, formal_c0193)
   word formal_c082;
   word formal_c0193;
   {
   W7 var_c18240;
   /* declaration of cmd_v4956 skipped */ 
   register ptr gf_c18272 =  (ptr) &globalframe;
   word result_v5000;
   word msg_v5028;
   /* declaration of var_c16320 skipped */ 
   var_c18240.f4/* cmd_v4956 */  = formal_c0193;
   /* ServerInfoCommand: */ 
SOURCE(1998, 674)
   {
      word tmpAddr66;
      tmpAddr66 = (word) (( (ptr) &var_c18240)+5)/* var_c16320 */ ;
      (*  (ptr) tmpAddr66 ) = ( ((word)  (fPt) Inner_P876) );
      (* (( (ptr) tmpAddr66) + 1) ) = 1;
      };
SOURCE(1998, 674)
   result_v5000 = 0;
SOURCE(1998, 674)
   msg_v5028 = 0;
SOURCE(2633, 39)
   {
      word pd67;
      pd67 = (* (( (ptr) (* (( (ptr) gf_c18272)+51)/* var_c15552 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd67 ))))((word) (( (bPt) &var_c18240)+20)/* var_c16320 */ , 1, 0, pd67);
      };
   /* removed tail goto */ 
   (*  (ptr) formal_c082 ) = result_v5000;
   (* (( (ptr) formal_c082)+1) ) = msg_v5028;
   return;
   }

static void Inner_P876(connection_v12292, formal_c18336)
   word connection_v12292;
   word formal_c18336;
   {
   register ptr gf_c18304 =  (ptr) &globalframe;
   word info_v3640;
   word screenCount_v3668;
   formal_c18336 = (formal_c18336 - 20);
   /* Inner: */ 
SOURCE(2043, 585)
SOURCE(2085, 38)
   info_v3640 = (* (( (ptr) connection_v12292)+16) );
SOURCE(2125, 45)
   screenCount_v3668 = (*  (ptr) (* (( (ptr) (* (( (ptr) connection_v12292)+16) ))+17) ) );
SOURCE(2172, 67)
   {
      W2 var_c16352;
      {
         W2 var_c16384;
         word v_v15088;
         v_v15088 = (* (( (ptr) connection_v12292)+18) );
         var_c16384.f0 = 11;
         var_c16384.f1 = v_v15088;
         var_c16352 = var_c16384;
         };
      {
         word pd68;
         pd68 = (* (( (ptr) (* (( (ptr) gf_c18304)+54)/* var_c15712 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd68 ))))((* (( (ptr) (* (( (ptr) formal_c18336)+4) ))+1) ), (* (( (ptr) gf_c18304)+21) ), var_c16352, pd68)
         ;
         };
      };
SOURCE(2241, 123)
   {
      W2 var_c16448;
      W2 var_c16544;
      {
         W2 var_c16480;
         word v_v14608;
         v_v14608 = (*  (ptr) info_v3640 );
         var_c16480.f0 = 4;
         var_c16480.f1 = v_v14608;
         var_c16448 = var_c16480;
         };
      {
         W2 var_c16576;
         word v_v14560;
         v_v14560 = (* (( (ptr) info_v3640)+1) );
         var_c16576.f0 = 4;
         var_c16576.f1 = v_v14560;
         var_c16544 = var_c16576;
         };
      {
         W2 var_c0165;
         (*  (ptr) (word) &var_c0165 ) = 0;
         (* (( (ptr) (word) &var_c0165) + 1) ) = 0;
         {
            word pd69;
            pd69 = (* (( (ptr) (* (( (ptr) gf_c18304)+54)/* var_c15712 */  ))+60) );
            (void) ( *( (fPt) ((*  (ptr) pd69 ))))((* (( (ptr) (* (( (ptr) formal_c18336)+4) ))+1) ), (* (( (ptr) gf_c18304)+22) ), var_c16448, var_c16544, var_c0165, pd69)
            ;
            };
         };
      };
SOURCE(2366, 62)
   {
      W2 var_c16672;
      {
         W2 var_c16704;
         word v_v14896;
         {
            word idx70;
            v_v14896 = (
               idx70 = (* (( (ptr) info_v3640)+2) ),
               SGNCK(idx70)
               );
            };
         var_c16704.f0 = 5;
         var_c16704.f1 = v_v14896;
         var_c16672 = var_c16704;
         };
      {
         word pd71;
         pd71 = (* (( (ptr) (* (( (ptr) gf_c18304)+54)/* var_c15712 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd71 ))))((* (( (ptr) (* (( (ptr) formal_c18336)+4) ))+1) ), (* (( (ptr) gf_c18304)+23) ), var_c16672, pd71)
         ;
         };
      };
SOURCE(2430, 55)
   {
      W2 var_c16768;
      {
         W2 var_c16800;
         word v_v15040;
         v_v15040 = (* (( (ptr) info_v3640)+15) );
         var_c16800.f0 = 11;
         var_c16800.f1 = v_v15040;
         var_c16768 = var_c16800;
         };
      {
         word pd72;
         pd72 = (* (( (ptr) (* (( (ptr) gf_c18304)+54)/* var_c15712 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd72 ))))((* (( (ptr) (* (( (ptr) formal_c18336)+4) ))+1) ), (* (( (ptr) gf_c18304)+24) ), var_c16768, pd72)
         ;
         };
      };
SOURCE(2487, 65)
   {
      W2 var_c16864;
      var_c16864.f0 = 5;
      var_c16864.f1 = screenCount_v3668;
      {
         word pd73;
         pd73 = (* (( (ptr) (* (( (ptr) gf_c18304)+54)/* var_c15712 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd73 ))))((* (( (ptr) (* (( (ptr) formal_c18336)+4) ))+1) ), (* (( (ptr) gf_c18304)+25) ), var_c16864, pd73)
         ;
         };
      };
SOURCE(2554, 74)
   {
      W2 var_c16896;
      {
         W2 var_c16928;
         word v_v14848;
         v_v14848 = (* (( (ptr) info_v3640)+8) );
         var_c16928.f0 = 5;
         var_c16928.f1 = v_v14848;
         var_c16896 = var_c16928;
         };
      {
         word pd74;
         pd74 = (* (( (ptr) (* (( (ptr) gf_c18304)+54)/* var_c15712 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd74 ))))((* (( (ptr) (* (( (ptr) formal_c18336)+4) ))+1) ), (* (( (ptr) gf_c18304)+26) ), var_c16896, pd74)
         ;
         };
      };
   }

static void OtherServerInfoCommand_P360(formal_c0109, formal_c0194)
   word formal_c0109;
   word formal_c0194;
   {
   W7 var_c18368;
   /* declaration of cmd_v5088 skipped */ 
   register ptr gf_c18400 =  (ptr) &globalframe;
   word result_v5132;
   word msg_v5160;
   /* declaration of var_c16992 skipped */ 
   var_c18368.f4/* cmd_v5088 */  = formal_c0194;
   /* OtherServerInfoCommand: */ 
SOURCE(2678, 929)
   {
      word tmpAddr75;
      tmpAddr75 = (word) (( (ptr) &var_c18368)+5)/* var_c16992 */ ;
      (*  (ptr) tmpAddr75 ) = ( ((word)  (fPt) Inner_P936) );
      (* (( (ptr) tmpAddr75) + 1) ) = 1;
      };
SOURCE(2678, 929)
   result_v5132 = 0;
SOURCE(2678, 929)
   msg_v5160 = 0;
SOURCE(3568, 39)
   {
      word pd76;
      pd76 = (* (( (ptr) (* (( (ptr) gf_c18400)+51)/* var_c15552 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd76 ))))((word) (( (bPt) &var_c18368)+20)/* var_c16992 */ , 1, 0, pd76);
      };
   /* removed tail goto */ 
   (*  (ptr) formal_c0109 ) = result_v5132;
   (* (( (ptr) formal_c0109)+1) ) = msg_v5160;
   return;
   }

static void Inner_P936(connection_v13868, formal_c18464)
   word connection_v13868;
   word formal_c18464;
   {
   register ptr gf_c18432 =  (ptr) &globalframe;
   word info_v3756;
   formal_c18464 = (formal_c18464 - 20);
   /* Inner: */ 
SOURCE(2728, 817)
SOURCE(2770, 38)
   info_v3756 = (* (( (ptr) connection_v13868)+16) );
SOURCE(2810, 90)
   {
      W2 var_c17024;
      {
         W2 var_c17056;
         word v_v14800;
         v_v14800 = (* (( (ptr) info_v3756)+11) );
         var_c17056.f0 = 5;
         var_c17056.f1 = v_v14800;
         var_c17024 = var_c17056;
         };
      {
         word pd77;
         pd77 = (* (( (ptr) (* (( (ptr) gf_c18432)+54)/* var_c15712 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd77 ))))((* (( (ptr) (* (( (ptr) formal_c18464)+4) ))+1) ), (* (( (ptr) gf_c18432)+27) ), var_c17024, pd77)
         ;
         };
      };
SOURCE(2902, 88)
   {
      W2 var_c17120;
      {
         W2 var_c17152;
         word v_v14752;
         v_v14752 = (* (( (ptr) info_v3756)+12) );
         var_c17152.f0 = 5;
         var_c17152.f1 = v_v14752;
         var_c17120 = var_c17152;
         };
      {
         word pd78;
         pd78 = (* (( (ptr) (* (( (ptr) gf_c18432)+54)/* var_c15712 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd78 ))))((* (( (ptr) (* (( (ptr) formal_c18464)+4) ))+1) ), (* (( (ptr) gf_c18432)+28) ), var_c17120, pd78)
         ;
         };
      };
SOURCE(2992, 82)
   {
      W2 var_c17216;
      {
         W2 var_c17248;
         word v_v14704;
         v_v14704 = (* (( (ptr) info_v3756)+6) );
         var_c17248.f0 = 5;
         var_c17248.f1 = v_v14704;
         var_c17216 = var_c17248;
         };
      {
         word pd79;
         pd79 = (* (( (ptr) (* (( (ptr) gf_c18432)+54)/* var_c15712 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd79 ))))((* (( (ptr) (* (( (ptr) formal_c18464)+4) ))+1) ), (* (( (ptr) gf_c18432)+29) ), var_c17216, pd79)
         ;
         };
      };
SOURCE(3076, 87)
   {
      W2 var_c17312;
      {
         W2 var_c17344;
         word v_v14656;
         v_v14656 = (* (( (ptr) info_v3756)+7) );
         var_c17344.f0 = 5;
         var_c17344.f1 = v_v14656;
         var_c17312 = var_c17344;
         };
      {
         word pd80;
         pd80 = (* (( (ptr) (* (( (ptr) gf_c18432)+54)/* var_c15712 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd80 ))))((* (( (ptr) (* (( (ptr) formal_c18464)+4) ))+1) ), (* (( (ptr) gf_c18432)+30) ), var_c17312, pd80)
         ;
         };
      };
SOURCE(3165, 156)
   {
      word var_c17408;
      var_c17408 = (* (( (ptr) info_v3756)+9) );
      if ((var_c17408 == 0)) {
SOURCE(3209, 49)
         {
            word pd81;
            pd81 = (* (( (ptr) (* (( (ptr) gf_c18432)+54)/* var_c15712 */  ))+93) );
            (void) ( *( (fPt) ((*  (ptr) pd81 ))))((* (( (ptr) (* (( (ptr) formal_c18464)+4) ))+1) ), (* (( (ptr) gf_c18432)+31) ), 0, 2147483647, pd81)
            ;
            };
         }
      else {
         if ((var_c17408 == 1)) {
SOURCE(3272, 49)
            {
               word pd82;
               pd82 = (* (( (ptr) (* (( (ptr) gf_c18432)+54)/* var_c15712 */  ))+93) );
               (void) ( *( (fPt) ((*  (ptr) pd82 ))))((* (( (ptr) (* (( (ptr) formal_c18464)+4) ))+1) ), (* (( (ptr) gf_c18432)+32) ), 0, 2147483647, pd82)
               ;
               };
            }
         else {
SOURCE(3334, 5)
            (void) XR_RaiseUnnamedError();
            };
         };
      };
SOURCE(3341, 204)
   {
      word var_c17440;
      var_c17440 = (* (( (ptr) info_v3756)+10) );
      if ((var_c17440 == 0)) {
SOURCE(3399, 63)
         {
            word pd83;
            pd83 = (* (( (ptr) (* (( (ptr) gf_c18432)+54)/* var_c15712 */  ))+93) );
            (void) ( *( (fPt) ((*  (ptr) pd83 ))))((* (( (ptr) (* (( (ptr) formal_c18464)+4) ))+1) ), (* (( (ptr) gf_c18432)+33) ), 0, 2147483647, pd83)
            ;
            };
         }
      else {
         if ((var_c17440 == 1)) {
SOURCE(3483, 62)
            {
               word pd84;
               pd84 = (* (( (ptr) (* (( (ptr) gf_c18432)+54)/* var_c15712 */  ))+93) );
               (void) ( *( (fPt) ((*  (ptr) pd84 ))))((* (( (ptr) (* (( (ptr) formal_c18464)+4) ))+1) ), (* (( (ptr) gf_c18432)+34) ), 0, 2147483647, pd84)
               ;
               };
            }
         else {
SOURCE(3558, 5)
            (void) XR_RaiseUnnamedError();
            };
         };
      };
   }

static void NoName_Q2208(formal_c0130, formal_c200004, formal_c200005, formal_c200006, formal_c200007)
   word formal_c0130;
   word formal_c200004;
   word formal_c200005;
   word formal_c200006;
   word formal_c200007;
   {
   if ((formal_c200005 == XR_Aborted)) {
SOURCE(1033, 9)
      (*  (ptr) formal_c0130 ) = 2;
      (* (( (ptr) formal_c0130)+1) ) = 3;
      return;
      };
   (*  (ptr) formal_c0130 ) = 0;
   (* (( (ptr) formal_c0130)+1) ) = 0;
   return;
   }

static void NoName_Q2268(formal_c0135, formal_c200000, formal_c200001, formal_c200002, formal_c200003)
   word formal_c0135;
   word formal_c200000;
   word formal_c200001;
   word formal_c200002;
   word formal_c200003;
   {
   if ((formal_c200001 == XR_Aborted)) {
SOURCE(332, 9)
      (*  (ptr) formal_c0135 ) = 2;
      (* (( (ptr) formal_c0135)+1) ) = 2;
      return;
      };
   (*  (ptr) formal_c0135 ) = 0;
   (* (( (ptr) formal_c0135)+1) ) = 0;
   return;
   }

/* file: X11FontCommandsImpl, module: X11FontCommandsImpl, compiled at: October 9, 1992 0:48:52 am PDT */ 
extern void XR_install_X11FontCommandsImpl() {
   NoName_Q2028();
   }
extern void XR_run_X11FontCommandsImpl() { XR_Start(&globalframe); }