/* 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); }