/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1993 by Xerox Corporation. All rights reserved. */
/* time: October 27, 1993 3:02:47 pm PDT */
/* C2C version: April 20, 1993 (sun4) */
/* ref-counting: off */
/* file: XlImplSetup, module: XlImplSetup */
/* switches: bcfhklnouw */
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
#define XRM←BITAND(x, y) (((word)(x)) & ((word)(y)))
#define XRM←BITOR(x, y) (((word)(x)) | ((word)(y)))
static char versionStamp[] = "@(#)mob←version [3545067075,3188031143] XlImplSetup";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef word (*fPt)();
typedef struct {word f0, f1, f2;} W3;
typedef W3 *W3Pt;
typedef struct {word f0, f1, f2, f3, f4, f5;} W6;
typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8;
typedef struct {word f0, f1, f2, f3, f4;} W5;
typedef struct {W8 f; W5 r;} W13;
typedef W6 *W6Pt;
typedef struct {word f0, f1;} W2;
typedef struct {W8 f; W8 r;} W16;
typedef struct {W16 f; W16 r;} W32;
typedef struct {W32 f; W32 r;} W64;
typedef W64 *W64Pt;
typedef struct {W8 f; W3 r;} W11;
typedef struct {W16 f; W11 r;} W27;
typedef W2 *W2Pt;
typedef struct {word f0, f1, f2, f3, f4, f5, f6;} W7;
typedef struct {W8 f; W7 r;} W15;
typedef W15 *W15Pt;
#define SOURCE(p, l) /* source p, l */
#define BCK(idx, lim) ( ((unsigned) idx) >= ((unsigned) lim) ? (XR←RaiseBoundsFault()) : (idx) )
#define IOP2(op, x, y) ( (word) ((x) op (y)) )
#define SGNCK(i) ((int) (word) (i) < 0 ? XR←RaiseArithmeticFault(): i )
static void NoName←Q6936();
static void XlImplSetup←P0();
static void ProduceConnectionNotCreated←P60();
static void PutConnectionInitialization←P120();
static word GetBYTE←P180();
static word GetCARD16←P240();
static word GetCARD32←P300();
static void GetFormat←P360();
static word GetFormats←P420();
static word ReadScreen←P480();
static word ReadScreens←P540();
static word CreateScreenDepthS←P600();
static word GetDepth←P660();
static word GetDepths←P720();
static word GetVisualType←P780();
static word GetVisualTypes←P840();
static void GetPAD←P900();
static word GetSTRING8←P960();
static word GetInitialConnectionResponse←P1020();
static void CloseStream←P1080();
static word NoName←Q6996();
static void ScanName←P1140();
static word NoName←Q7056();
static word NoName←Q7116();
static word NoName←Q7176();
static word ErrorFromStream←P1200();
static word ErrorDetails←P1260();
static word DeadConnection←P1320();
static word CreateConnection←P1380();
static word NoName←Q7236();
static void Failure←P3468();
static word TryOnce←P3528();
static word NoName←Q7296();
static void CloseConnection←P1440();
static word CalledJustOnce←P3828();
static void DetachedClose←P1500();
static word NoName←Q7356();
static void DetachedKilling←P1560();
static void ConnectionPeriodical←P1620();
static void EnsureReplyModulus←P1680();
static void CheckReply←P1740();
static void NotAReply←P1800();
static word EventRope←P1860();
static word EventCodeRope←P1920();
static word FirstRoot←P1980();
static word DefaultRoot←P2040();
static word LegalEvents←P2100();
static word PointerEvents←P2160();
static word DeviceEvents←P2220();
static void MergeAttributes←P2280();
static word FullCreateEventFilter←P2340();
static word CreateEventFilter←P2400();
static void SetEventCodes←P2460();
static word QueryScreen←P2520();
static word QueryScreenDepth←P2580();
static void IgnoreErrors←P2640();
static void NoName←Q7416();
static void NoName←Q7476();
static void NoName←Q7536();
static void NoName←Q7596();
static void NoName←Q7656();
static void NoName←Q7716();
static void NoName←Q7776();
static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\012\063\155\016\300\130\140\234\375\100\164\000\000"};
static struct {unsigned f; char r[40];} string2 = {2424869, "\006\016\000\001\004\001\010\001\014\001\020\001\024\001\030\001\034\001\040\001\044\001\060\001\070\010\000\004\100\100\001\101\070\001\101\074\001\000\000"};
static struct {unsigned f; char r[4];} string3 = {65540, "\241\000\000"};
static struct {unsigned f; char r[16];} string4 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\105\154\000\000"};
static struct {unsigned f; char r[4];} string5 = {196611, "\004A\330"};
static struct {unsigned f; char r[16];} string6 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\107\320\000\000"};
static struct {unsigned f; char r[4];} string7 = {131074, "\004\016\000"};
static struct {unsigned f; char r[44];} string8 = {2752556, "\260\006\005\146\151\162\163\164\257\300\351\276\264\273\300\115\104\320\264\101\320\005\004\162\145\163\164\214\257\300\351\276\264\273\300\115\104\320\264\101\320\261\000"};
static struct {unsigned f; char r[4];} string9 = {131074, "\003\003\000"};
static struct {unsigned f; char r[16];} string10 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\101\270\000\000"};
static struct {unsigned f; char r[12];} string11 = {720907, "\006\003\100\100\001\100\110\001\100\114\001"};
static struct {unsigned f; char r[16];} string12 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\101\254\000\000"};
static struct {unsigned f; char r[12];} string13 = {524296, "\011\000\004\000\040\000\004\001\000\000\000"};
static struct {unsigned f; char r[16];} string14 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\101\334\000\000"};
static struct {unsigned f; char r[16];} string15 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\101\364\000\000"};
static struct {unsigned f; char r[4];} string16 = {131074, "\004&\000"};
static struct {unsigned f; char r[48];} string17 = {3014704, "\260\006\005\146\151\162\163\164\255\216\257\300\351\276\264\273\300\115\104\320\264\101\364\005\004\162\145\163\164\214\255\216\257\300\351\276\264\273\300\115\104\320\264\101\364\261\000"};
static struct {unsigned f; char r[4];} string18 = {131074, "\004\003\000"};
static struct {unsigned f; char r[16];} string19 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\102\030\000\000"};
static struct {unsigned f; char r[4];} string20 = {131074, "\003\007\000"};
static struct {unsigned f; char r[48];} string21 = {3014704, "\260\006\005\146\151\162\163\164\255\216\257\300\351\276\264\273\300\115\104\320\264\102\030\005\004\162\145\163\164\214\255\216\257\300\351\276\264\273\300\115\104\320\264\102\030\261\000"};
static struct {unsigned f; char r[16];} string22 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\102\140\000\000"};
static struct {unsigned f; char r[12];} string23 = {655370, "\006\003\074\001\100\100\001\100\104\001\000"};
static struct {unsigned f; char r[16];} string24 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\105\014\000\000"};
static struct {unsigned f; char r[4];} string25 = {131074, "\003\001\000"};
static struct {unsigned f; char r[16];} string26 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"};
static struct {unsigned f; char r[4];} string27 = {65537, "\001\000\000"};
static struct {unsigned f; char r[16];} string28 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\126\364\000\000"};
static struct {unsigned f; char r[4];} string29 = {131074, "\003\002\000"};
static struct {unsigned f; char r[4];} string30 = {131076, "\216\251\000"};
static struct {unsigned f; char r[16];} string31 = {851984, "\257\300\015\277\004\146\300\034\367\146\045\112\064\000\000"};
static struct {unsigned f; char r[4];} string32 = {131074, "\004\037\000"};
static struct {unsigned f; char r[4];} string33 = {65540, "\251\000\000"};
static struct {unsigned f; char r[16];} string34 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\126\304\000\000"};
static struct {unsigned f; char r[60];} string35 = {3735609, "\006\023\040\001\070\001\100\100\001\100\104\001\100\110\001\100\140\001\100\144\001\100\150\001\100\154\001\100\160\001\100\164\001\100\170\001\100\174\001\100\200\001\100\224\001\100\234\001\100\240\001\100\244\001\100\250\001\000\000"};
static struct {unsigned f; char r[16];} string36 = {917520, "\216\257\300\351\276\264\273\300\115\104\320\264\126\304\000"};
static struct {unsigned f; char r[8];} string37 = {262152, "dead\000\000\000"};
static struct {unsigned f; char r[16];} string38 = {917520, "DeadConnection\000"};
static struct {unsigned f; char r[4];} string39 = {131076, "] \000"};
static struct {unsigned f; char r[4];} string40 = {131076, ", \000"};
static struct {unsigned f; char r[12];} string41 = {720908, " [details: "};
static struct {unsigned f; char r[20];} string42 = {1048596, "BadDisplayNumber\000\000\000"};
static struct {unsigned f; char r[12];} string43 = {655372, "0123456789\000"};
static struct {unsigned f; char r[4];} string44 = {65540, ".\000\000"};
static struct {unsigned f; char r[12];} string45 = {589836, "127.0.0.1\000\000"};
static struct {unsigned f; char r[48];} string46 = {2883632, " (Before establishing connection to display)\000\000\000"};
static struct {unsigned f; char r[8];} string47 = {262152, " \011\015\012\000\000\000"};
static struct {unsigned f; char r[4];} string48 = {196612, "\015\012;"};
static struct {unsigned f; char r[24];} string49 = {1441816, "server name problem : \000"};
static struct {unsigned f; char r[68];} string50 = {4390980, " (Trying to open streams to display machine but not yet on X level)"};
static struct {unsigned f; char r[8];} string51 = {327688, "%g:%g\000\000"};
static struct {unsigned f; char r[12];} string52 = {655372, " [server: \000"};
static struct {unsigned f; char r[4];} string53 = {65540, "]\000\000"};
static struct {unsigned f; char r[16];} string54 = {851984, "end of stream\000\000"};
static struct {unsigned f; char r[68];} string55 = {4194372, " (Stream to display machine created; Trying to send first bytes)\000\000\000"};
static struct {unsigned f; char r[4];} string56 = {196612, "TCP"};
static struct {unsigned f; char r[76];} string57 = {4915276, " (Stream to display machine created; Awaiting first response from X server)"};
static struct {unsigned f; char r[80];} string58 = {5046352, " (Initial communication established; Retrieving X server display information)\000\000"};
static struct {unsigned f; char r[20];} string59 = {1179668, "XlImplOutputStream\000"};
static struct {unsigned f; char r[20];} string60 = {1179668, "XlImplSomeResource\000"};
static struct {unsigned f; char r[4];} string61 = {65540, "x\000\000"};
static struct {unsigned f; char r[8];} string62 = {393224, "unique\000"};
static struct {unsigned f; char r[8];} string63 = {262152, "ARPA\000\000\000"};
static struct {unsigned f; char r[12];} string64 = {589836, "NIL-Event\000\000"};
static struct {unsigned f; char r[8];} string65 = {393224, "%g(%g)\000"};
static struct {unsigned f; char r[8];} string66 = {327688, "local\000\000"};
static struct {unsigned f; char r[12];} string67 = {589836, "extension\000\000"};
static struct {unsigned f; char r[12];} string68 = {720908, "errorNotify"};
static struct {unsigned f; char r[12];} string69 = {524300, "keyPress\000\000\000"};
static struct {unsigned f; char r[12];} string70 = {655372, "keyRelease\000"};
static struct {unsigned f; char r[12];} string71 = {720908, "buttonPress"};
static struct {unsigned f; char r[16];} string72 = {851984, "buttonRelease\000\000"};
static struct {unsigned f; char r[16];} string73 = {786448, "motionNotify\000\000\000"};
static struct {unsigned f; char r[12];} string74 = {720908, "enterNotify"};
static struct {unsigned f; char r[12];} string75 = {720908, "leaveNotify"};
static struct {unsigned f; char r[8];} string76 = {458760, "focusIn"};
static struct {unsigned f; char r[12];} string77 = {524300, "focusOut\000\000\000"};
static struct {unsigned f; char r[16];} string78 = {786448, "keymapNotify\000\000\000"};
static struct {unsigned f; char r[8];} string79 = {393224, "expose\000"};
static struct {unsigned f; char r[20];} string80 = {1048596, "graphicsExposure\000\000\000"};
static struct {unsigned f; char r[12];} string81 = {655372, "noExposure\000"};
static struct {unsigned f; char r[20];} string82 = {1048596, "visibilityNotify\000\000\000"};
static struct {unsigned f; char r[16];} string83 = {786448, "createNotify\000\000\000"};
static struct {unsigned f; char r[16];} string84 = {851984, "destroyNotify\000\000"};
static struct {unsigned f; char r[12];} string85 = {720908, "unmapNotify"};
static struct {unsigned f; char r[12];} string86 = {589836, "mapNotify\000\000"};
static struct {unsigned f; char r[12];} string87 = {655372, "mapRequest\000"};
static struct {unsigned f; char r[16];} string88 = {917520, "reparentNotify\000"};
static struct {unsigned f; char r[16];} string89 = {983056, "configureNotify"};
static struct {unsigned f; char r[20];} string90 = {1048596, "configureRequest\000\000\000"};
static struct {unsigned f; char r[16];} string91 = {851984, "gravityNotify\000\000"};
static struct {unsigned f; char r[16];} string92 = {851984, "resizeRequest\000\000"};
static struct {unsigned f; char r[16];} string93 = {983056, "circulateNotify"};
static struct {unsigned f; char r[20];} string94 = {1048596, "circulateRequest\000\000\000"};
static struct {unsigned f; char r[16];} string95 = {917520, "propertyNotify\000"};
static struct {unsigned f; char r[16];} string96 = {917520, "selectionClear\000"};
static struct {unsigned f; char r[20];} string97 = {1048596, "selectionRequest\000\000\000"};
static struct {unsigned f; char r[16];} string98 = {983056, "selectionNotify"};
static struct {unsigned f; char r[16];} string99 = {917520, "colorMapNotify\000"};
static struct {unsigned f; char r[16];} string100 = {851984, "clientMessage\000\000"};
static struct {unsigned f; char r[16];} string101 = {851984, "mappingNotify\000\000"};
static struct {unsigned f; char r[12];} string102 = {524300, "tipEvent\000\000\000"};
static struct {unsigned f; char r[8];} string103 = {327688, "event\000\000"};
static struct {unsigned f; char r[4];} string104 = {65540, ":\000\000"};
static struct {unsigned f; char r[24];} string105 = {1441816, " (refused by X server)\000"};
static struct {unsigned f; char r[16];} string106 = {851984, "\257\300\323\115\156\103\300\276\005\176\247\100\200\000\000"};
static struct {unsigned f; char r[24];} string107 = {1441814, "\006\007\020\001\024\001\040\001\044\001\054\001\060\001\100\374\010\000\004\100\105\001\000"};
static struct {unsigned f; char r[16];} string108 = {851984, "\257\300\055\153\222\376\300\327\164\352\142\100\150\000\000"};
static struct {unsigned f; char r[16];} string109 = {851984, "\257\300\255\053\300\023\300\142\135\315\105\100\150\000\000"};
static struct {unsigned f; char r[16];} string110 = {851984, "\257\300\263\064\342\215\300\063\160\325\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string111 = {851984, "\257\300\015\277\004\146\300\034\367\146\045\100\164\000\000"};
static struct {unsigned f; char r[16];} string112 = {851984, "\257\300\325\152\052\015\300\232\303\013\007\100\150\000\000"};
static struct {unsigned f; char r[16];} string113 = {851984, "\257\300\240\236\274\315\300\111\163\325\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string114 = {851984, "\257\300\256\042\060\232\300\060\151\325\207\100\150\000\000"};
static struct {unsigned f; char r[16];} string115 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\100\150\000\000"};
static struct {unsigned f; char r[16];} string116 = {851984, "\257\300\275\320\070\317\300\004\110\363\366\100\150\000\000"};
static unsigned string117 = 1483472896;
static struct {unsigned f; char r[16];} string118 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\100\164\000\000"};
static struct {unsigned f; char r[16];} string119 = {851984, "\257\300\156\124\232\133\300\236\077\321\110\100\150\000\000"};
static struct {unsigned f; char r[16];} string120 = {851984, "\257\300\122\362\040\033\300\221\350\241\274\100\150\000\000"};
static struct {unsigned f; char r[16];} string121 = {851984, "\257\300\156\242\124\004\300\131\031\215\125\100\150\000\000"};
static struct {unsigned f; char r[8];} string122 = {1483493490, "ivate"};
static struct {unsigned f; char r[16];} string123 = {851984, "\257\300\304\042\023\266\300\315\144\243\337\100\150\000\000"};
static struct {unsigned f; char r[16];} string124 = {851984, "\257\300\212\247\207\172\300\123\222\237\073\100\150\000\000"};
static struct {unsigned f; char r[16];} string125 = {851984, "\257\300\044\126\136\322\300\125\273\233\107\100\150\000\000"};
static struct {unsigned f; char r[16];} string126 = {851984, "\257\300\234\252\236\205\300\126\010\241\274\100\150\000\000"};
static struct {unsigned f; char r[32];} string127 = {1966112, "\211\022\021\103\157\156\156\145\143\164\151\157\156\120\162\151\166\141\164\145\300\351\276\264\273\300\115\104\320\264\000"};
static struct {unsigned f; char r[16];} string128 = {851984, "\257\300\373\026\306\327\300\127\347\125\066\100\150\000\000"};
static struct {unsigned f; char r[16];} string129 = {851984, "\257\300\337\070\153\303\300\227\216\321\214\100\150\000\000"};
static struct {unsigned f; char r[16];} string130 = {851984, "\257\300\124\050\115\007\300\350\036\172\334\100\150\000\000"};
static struct {
word f0[132]; word f132; word f133; word f134;
word f135; word f136; word f137; word f138;
word f139; word f140; word f141; word f142;
word f143; word f144; word f145; word f146;
word f147; word f148; word f149; word f150;
word f151; word f152; word f153; word f154;
word f155; word f156; word f157; word f158;
word f159; word f160; word f161; word f162;
word f163; word f164; word f165; word f166;
word f167; word f168; word f169; word f170;
word f171; word f172; word f173; word f174;
word f175; word f176; word f177; word f178;
word f179; word f180; word f181; word f182;
word f183; word f184; word f185; word f186;
word f187; word f188; word f189; word f190;
word f191; word f192; word f193; word f194;
word f195; word f196; word f197; word f198;
word f199; word f200; word f201; word f202;
word f203; word f204; word f205; word f206;
word f207; word f208; word f209; word f210;
word f211; word f212; word f213; word f214;
word f215; word f216; word f217; word f218;
word f219; word f220; word f221[83];
} globalframe = {
{0}, (word) IgnoreErrors←P2640, 0, (word) QueryScreenDepth←P2580,
0, (word) QueryScreen←P2520, 0, (word) SetEventCodes←P2460,
0, (word) CreateEventFilter←P2400, 0, (word) FullCreateEventFilter←P2340,
0, (word) MergeAttributes←P2280, 0, (word) DeviceEvents←P2220,
0, (word) PointerEvents←P2160, 0, (word) LegalEvents←P2100,
0, (word) DefaultRoot←P2040, 0, (word) FirstRoot←P1980,
0, (word) EventCodeRope←P1920, 0, (word) EventRope←P1860,
0, (word) NotAReply←P1800, 0, (word) CheckReply←P1740,
0, (word) EnsureReplyModulus←P1680, 0, (word) ConnectionPeriodical←P1620,
0, (word) DetachedKilling←P1560, 0, (word) DetachedClose←P1500,
0, (word) CloseConnection←P1440, 0, (word) CreateConnection←P1380,
0, (word) DeadConnection←P1320, 0, (word) ErrorDetails←P1260,
0, (word) ErrorFromStream←P1200, 0, (word) ScanName←P1140,
0, (word) CloseStream←P1080, 0, (word) GetInitialConnectionResponse←P1020,
0, (word) GetSTRING8←P960, 0, (word) GetPAD←P900,
0, (word) GetVisualTypes←P840, 0, (word) GetVisualType←P780,
0, (word) GetDepths←P720, 0, (word) GetDepth←P660,
0, (word) CreateScreenDepthS←P600, 0, (word) ReadScreens←P540,
0, (word) ReadScreen←P480, 0, (word) GetFormats←P420,
0, (word) GetFormat←P360, 0, (word) GetCARD32←P300,
0, (word) GetCARD16←P240, 0, (word) GetBYTE←P180,
0, (word) PutConnectionInitialization←P120, 0, (word) ProduceConnectionNotCreated←P60,
0, (word) XlImplSetup←P0, {0}
};
static void NoName←Q6936()
{
register ptr gf←c0498 = (ptr) &globalframe;
word var←c61592;
(* (( (ptr) gf←c0498)+13) ) = (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2);
(* (( (ptr) gf←c0498)+14) ) = (word) XR←GetTypeIndexS((word) (&string3));
(* (( (ptr) gf←c0498)+15) ) = (word) XR←GetTypeIndex((word) &string4, 0, (word) &string5);
(* (( (ptr) gf←c0498)+18) ) = (word) XR←GetTypeIndex((word) &string6, 0, (word) &string7);
(* (( (ptr) gf←c0498)+20) ) = (word) XR←GetTypeIndex((word) &string8, 0, (word) &string9);
(* (( (ptr) gf←c0498)+21) ) = (word) XR←GetTypeIndex((word) &string10, 0, (word) &string11);
(* (( (ptr) gf←c0498)+23) ) = (word) XR←GetTypeIndex((word) &string12, 0, (word) &string13);
(* (( (ptr) gf←c0498)+24) ) = (word) XR←GetTypeIndex((word) &string14, 0, (word) &string13);
(* (( (ptr) gf←c0498)+25) ) = (word) XR←GetTypeIndex((word) &string15, 0, (word) &string16);
(* (( (ptr) gf←c0498)+26) ) = (word) XR←GetTypeIndex((word) &string17, 0, (word) &string18);
(* (( (ptr) gf←c0498)+27) ) = (word) XR←GetTypeIndex((word) &string19, 0, (word) &string20);
(* (( (ptr) gf←c0498)+28) ) = (word) XR←GetTypeIndex((word) &string21, 0, (word) &string18);
(* (( (ptr) gf←c0498)+29) ) = (word) XR←GetTypeIndex((word) &string22, 0, (word) &string23);
(* (( (ptr) gf←c0498)+30) ) = (word) XR←GetTypeIndex((word) &string24, 0, (word) &string25);
(* (( (ptr) gf←c0498)+32) ) = (word) XR←GetTypeIndex((word) &string26, 0, (word) &string27);
(* (( (ptr) gf←c0498)+34) ) = (word) XR←GetTypeIndex((word) &string28, 0, (word) &string29);
(* (( (ptr) gf←c0498)+35) ) = (word) XR←GetTypeIndex((word) &string30, 0, (word) &string27);
(* (( (ptr) gf←c0498)+36) ) = (word) XR←GetTypeIndex((word) &string31, 0, (word) &string32);
(* (( (ptr) gf←c0498)+37) ) = (word) XR←GetTypeIndexS((word) (&string33));
(* (( (ptr) gf←c0498)+46) ) = (word) XR←GetTypeIndex((word) &string34, 0, (word) &string35);
(* (( (ptr) gf←c0498)+59) ) = (word) XR←GetTypeIndex((word) &string36, 0, (word) &string27);
(* (ptr) (( (bPt) gf←c0498)+252) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string37);
(* (ptr) (( (bPt) gf←c0498)+256) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+35) ), (word) &string38);
(* (ptr) (( (bPt) gf←c0498)+260) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string39);
(* (ptr) (( (bPt) gf←c0498)+264) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string40);
(* (ptr) (( (bPt) gf←c0498)+268) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string41);
(* (ptr) (( (bPt) gf←c0498)+272) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string42);
(* (ptr) (( (bPt) gf←c0498)+276) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string43);
(* (ptr) (( (bPt) gf←c0498)+280) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string44);
(* (ptr) (( (bPt) gf←c0498)+284) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string45);
(* (ptr) (( (bPt) gf←c0498)+288) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string46);
(* (ptr) (( (bPt) gf←c0498)+292) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string47);
(* (ptr) (( (bPt) gf←c0498)+296) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string48);
(* (ptr) (( (bPt) gf←c0498)+300) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string49);
(* (ptr) (( (bPt) gf←c0498)+304) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string50);
(* (ptr) (( (bPt) gf←c0498)+308) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string51);
(* (ptr) (( (bPt) gf←c0498)+312) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string52);
(* (ptr) (( (bPt) gf←c0498)+316) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string53);
(* (ptr) (( (bPt) gf←c0498)+320) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string54);
(* (ptr) (( (bPt) gf←c0498)+324) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string55);
(* (ptr) (( (bPt) gf←c0498)+328) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+35) ), (word) &string56);
(* (ptr) (( (bPt) gf←c0498)+332) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string57);
(* (ptr) (( (bPt) gf←c0498)+336) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string58);
(* (ptr) (( (bPt) gf←c0498)+340) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+35) ), (word) &string59);
(* (ptr) (( (bPt) gf←c0498)+344) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+35) ), (word) &string60);
(* (ptr) (( (bPt) gf←c0498)+348) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+35) ), (word) &string61);
(* (ptr) (( (bPt) gf←c0498)+352) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+35) ), (word) &string62);
(* (ptr) (( (bPt) gf←c0498)+356) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+35) ), (word) &string63);
(* (ptr) (( (bPt) gf←c0498)+360) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string64);
(* (ptr) (( (bPt) gf←c0498)+364) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string65);
(* (ptr) (( (bPt) gf←c0498)+368) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string66);
(* (ptr) (( (bPt) gf←c0498)+372) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string67);
(* (ptr) (( (bPt) gf←c0498)+376) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string68);
(* (ptr) (( (bPt) gf←c0498)+380) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string69);
(* (ptr) (( (bPt) gf←c0498)+384) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string70);
(* (ptr) (( (bPt) gf←c0498)+388) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string71);
(* (ptr) (( (bPt) gf←c0498)+392) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string72);
(* (ptr) (( (bPt) gf←c0498)+396) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string73);
(* (ptr) (( (bPt) gf←c0498)+400) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string74);
(* (ptr) (( (bPt) gf←c0498)+404) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string75);
(* (ptr) (( (bPt) gf←c0498)+408) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string76);
(* (ptr) (( (bPt) gf←c0498)+412) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string77);
(* (ptr) (( (bPt) gf←c0498)+416) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string78);
(* (ptr) (( (bPt) gf←c0498)+420) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string79);
(* (ptr) (( (bPt) gf←c0498)+424) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string80);
(* (ptr) (( (bPt) gf←c0498)+428) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string81);
(* (ptr) (( (bPt) gf←c0498)+432) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string82);
(* (ptr) (( (bPt) gf←c0498)+436) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string83);
(* (ptr) (( (bPt) gf←c0498)+440) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string84);
(* (ptr) (( (bPt) gf←c0498)+444) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string85);
(* (ptr) (( (bPt) gf←c0498)+448) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string86);
(* (ptr) (( (bPt) gf←c0498)+452) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string87);
(* (ptr) (( (bPt) gf←c0498)+456) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string88);
(* (ptr) (( (bPt) gf←c0498)+460) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string89);
(* (ptr) (( (bPt) gf←c0498)+464) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string90);
(* (ptr) (( (bPt) gf←c0498)+468) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string91);
(* (ptr) (( (bPt) gf←c0498)+472) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string92);
(* (ptr) (( (bPt) gf←c0498)+476) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string93);
(* (ptr) (( (bPt) gf←c0498)+480) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string94);
(* (ptr) (( (bPt) gf←c0498)+484) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string95);
(* (ptr) (( (bPt) gf←c0498)+488) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string96);
(* (ptr) (( (bPt) gf←c0498)+492) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string97);
(* (ptr) (( (bPt) gf←c0498)+496) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string98);
(* (ptr) (( (bPt) gf←c0498)+500) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string99);
(* (ptr) (( (bPt) gf←c0498)+504) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string100);
(* (ptr) (( (bPt) gf←c0498)+508) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string101);
(* (ptr) (( (bPt) gf←c0498)+512) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string102);
(* (ptr) (( (bPt) gf←c0498)+516) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string103);
(* (ptr) (( (bPt) gf←c0498)+520) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string104);
(* (ptr) (( (bPt) gf←c0498)+524) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0498)+32) ), (word) &string105);
(void) XR←DeclareGlobalFrame((word) "XlImplSetup", &globalframe, (word) XR←GetTypeIndex((word) &string106, 0, (word) &string107)
, (word) (( (bPt) gf←c0498)+880)/* var←c55320 */ );
var←c61592 = (word) XR←ImportInterface((word) "Atom", (word) XR←GetTypeIndexS((word) (&string108)), 16);
(* (( (ptr) gf←c0498)+296)/* var←c59416 */ ) = var←c61592;
(void) XR←ImportProcS(var←c61592, 67372289);
var←c61592 = (word) XR←ImportInterface((word) "Convert", (word) XR←GetTypeIndexS((word) (&string109)), 73);
(* (( (ptr) gf←c0498)+294)/* var←c59288 */ ) = var←c61592;
(void) XR←ImportProcS(var←c61592, 67901187);
(void) XR←ImportProcS(var←c61592, 67634690);
var←c61592 = (word) XR←ImportInterface((word) "ForkOps", (word) XR←GetTypeIndexS((word) (&string110)), 4);
(* (( (ptr) gf←c0498)+302)/* var←c60600 */ ) = var←c61592;
(void) XR←ImportProcS(var←c61592, 1048836);
(void) XR←ImportProcS(var←c61592, 787203);
(void) XR←ImportProcS(var←c61592, 786435);
(void) XR←ImportProcS(var←c61592, 1049092);
var←c61592 = (word) XR←ImportInterface((word) "IO", (word) XR←GetTypeIndexS((word) (&string111)), 103);
(* (( (ptr) gf←c0498)+290)/* var←c56024 */ ) = var←c61592;
(void) XR←ImportProcS(var←c61592, 1053698);
(void) XR←ImportProcS(var←c61592, 68958724);
(void) XR←ImportProcS(var←c61592, 530434);
(void) XR←ImportProcS(var←c61592, 67917827);
(void) XR←ImportProcS(var←c61592, 267521);
var←c61592 = (word) XR←ImportInterface((word) "NetworkStream", (word) XR←GetTypeIndexS((word) (&string112)), 23);
(* (( (ptr) gf←c0498)+295)/* var←c59352 */ ) = var←c61592;
(void) XR←ImportProcS(var←c61592, 135529221);
(void) XR←ImportProcS(var←c61592, 134480385);
var←c61592 = (word) XR←ImportInterface((word) "Process", (word) XR←GetTypeIndexS((word) (&string113)), 22);
(* (( (ptr) gf←c0498)+286)/* var←c55416 */ ) = var←c61592;
(void) XR←ImportProcS(var←c61592, 67371521);
var←c61592 = (word) XR←ImportInterface((word) "PropList", (word) XR←GetTypeIndexS((word) (&string114)), 13);
(* (( (ptr) gf←c0498)+291)/* var←c57784 */ ) = var←c61592;
(void) XR←ImportProcS(var←c61592, 67109632);
var←c61592 = (word) XR←ImportInterface((word) "Rope", (word) XR←GetTypeIndexS((word) (&string115)), 43);
(* (( (ptr) gf←c0498)+289)/* var←c55960 */ ) = var←c61592;
(void) XR←ImportProcS(var←c61592, 68419845);
(void) XR←ImportProcS(var←c61592, 67900675);
(void) XR←ImportProcS(var←c61592, 67373313);
(void) XR←ImportProcS(var←c61592, 67898627);
(void) XR←ImportProcS(var←c61592, 67900419);
(void) XR←ImportProcS(var←c61592, 67373569);
(void) XR←ImportProcS(var←c61592, 67633666);
(void) XR←ImportProcS(var←c61592, 67373825);
var←c61592 = (word) XR←ImportInterface((word) "RuntimeError", (word) XR←GetTypeIndexS((word) (&string116)), 27);
(* (( (ptr) gf←c0498)+292)/* var←c59160 */ ) = var←c61592;
var←c61592 = (word) XR←ImportInterface((word) &string117, (word) XR←GetTypeIndexS((word) (&string118)), 218);
(* (( (ptr) gf←c0498)+287)/* var←c55544 */ ) = var←c61592;
(void) XR←ImportProcS(var←c61592, 470307586);
(void) XR←ImportProcS(var←c61592, 534530);
(void) XR←ImportProcS(var←c61592, 534274);
(void) XR←ImportProcS(var←c61592, 67639298);
(void) XR←ImportProcS(var←c61592, 67901699);
(void) XR←ImportProcS(var←c61592, 68705285);
(void) XR←ImportProcS(var←c61592, 792323);
(void) XR←ImportProcS(var←c61592, 67910403);
var←c61592 = (word) XR←ImportInterface((word) "XlAccess", (word) XR←GetTypeIndexS((word) (&string119)), 4);
(* (( (ptr) gf←c0498)+293)/* var←c59224 */ ) = var←c61592;
(void) XR←ImportProcS(var←c61592, 67371009);
(void) XR←ImportProcS(var←c61592, 67371521);
var←c61592 = (word) XR←ImportInterface((word) "XlDispatch", (word) XR←GetTypeIndexS((word) (&string120)), 18);
(* (( (ptr) gf←c0498)+300)/* var←c60344 */ ) = var←c61592;
(void) XR←ImportProcS(var←c61592, 265473);
var←c61592 = (word) XR←ImportInterface((word) "XlFinalizePrivate", (word) XR←GetTypeIndexS((word) (&string121)), 1);
(* (( (ptr) gf←c0498)+301)/* var←c60376 */ ) = var←c61592;
(void) XR←ImportProcS(var←c61592, 524290);
var←c61592 = (word) XR←ImportInterface((word) &string122, (word) XR←GetTypeIndexS((word) (&string123)), 77);
(* (( (ptr) gf←c0498)+288)/* var←c55896 */ ) = var←c61592;
(void) XR←ImportProcS(var←c61592, 528642);
(void) XR←ImportProcS(var←c61592, 1051908);
(void) XR←ImportProcS(var←c61592, 525314);
(void) XR←ImportProcS(var←c61592, 1060612);
(void) XR←ImportProcS(var←c61592, 535042);
(void) XR←ImportProcS(var←c61592, 534786);
var←c61592 = (word) XR←ImportInterface((word) "XlPrivateErrorHandling", (word) XR←GetTypeIndexS((word) (&string124)), 10)
;
(* (( (ptr) gf←c0498)+299)/* var←c60312 */ ) = var←c61592;
(void) XR←ImportProcS(var←c61592, 263681);
(void) XR←ImportProcS(var←c61592, 67896579);
(void) XR←ImportProcS(var←c61592, 524802);
var←c61592 = (word) XR←ImportInterface((word) "XlPrivateResources", (word) XR←GetTypeIndexS((word) (&string125)), 9);
(* (( (ptr) gf←c0498)+298)/* var←c60280 */ ) = var←c61592;
(void) XR←ImportProcS(var←c61592, 262401);
(void) XR←ImportProcS(var←c61592, 786435);
var←c61592 = (word) XR←ImportInterface((word) "XlPrivateSplit", (word) XR←GetTypeIndexS((word) (&string126)), 7);
(* (( (ptr) gf←c0498)+297)/* var←c59640 */ ) = var←c61592;
(void) XR←ImportProcS(var←c61592, 525826);
(void) XR←ImportProcS(var←c61592, 263169);
(void) XR←ImportProcS(var←c61592, 262401);
(void) XR←ImportProcS(var←c61592, 262145);
(void) XR←ImportProcS(var←c61592, 262657);
(void) XR←ImportProcS(var←c61592, 262913);
var←c61592 = (word) XR←ExportInterface((word) &string117, (word) XR←GetTypeIndexS((word) (&string118)), 218);
(* (( (ptr) gf←c0498)+303)/* var←c61624 */ ) = var←c61592;
(void) XR←ExportProcS(var←c61592, (word) (( (bPt) gf←c0498)+616)/* var←c54264 */ , 67375105, (word) "FirstRoot");
(void) XR←ExportProcS(var←c61592, (word) (( (bPt) gf←c0498)+608)/* var←c54232 */ , 67375361, (word) "DefaultRoot");
(void) XR←ExportProcS(var←c61592, (word) (( (bPt) gf←c0498)+696)/* var←c54584 */ , 68690438, (word) "CreateConnection");
(void) XR←ExportProcS(var←c61592, (word) (( (bPt) gf←c0498)+688)/* var←c54552 */ , 271873, (word) "CloseConnection");
(void) XR←ExportProcS(var←c61592, (word) (( (bPt) gf←c0498)+576)/* var←c54104 */ , 1014514946, (word) "MergeAttributes");
(void) XR←ExportProcS(var←c61592, (word) (( (bPt) gf←c0498)+544)/* var←c53976 */ , 67654914, (word) "QueryScreen");
(void) XR←ExportProcS(var←c61592, (word) (( (bPt) gf←c0498)+536)/* var←c53944 */ , 67655170, (word) "QueryScreenDepth");
(void) XR←ExportProcS(var←c61592, (word) (( (bPt) gf←c0498)+552)/* var←c54008 */ , 134529793, (word) "SetEventCodes");
(void) XR←ExportProcS(var←c61592, (word) (( (bPt) gf←c0498)+624)/* var←c54296 */ , 67421185, (word) "EventCodeRope");
(void) XR←ExportProcS(var←c61592, (word) (( (bPt) gf←c0498)+560)/* var←c54040 */ , 68207876, (word) "CreateEventFilter");
(void) XR←ExportProcS(var←c61592, (word) (( (bPt) gf←c0498)+568)/* var←c54072 */ , 68208131, (word) "FullCreateEventFilter")
;
(void) XR←ExportProcS(var←c61592, (word) (( (bPt) gf←c0498)+632)/* var←c54328 */ , 67421953, (word) "EventRope");
(void) XR←ExportProcS(var←c61592, (word) (( (bPt) gf←c0498)+600)/* var←c54200 */ , 67422465, (word) "LegalEvents");
(void) XR←ExportProcS(var←c61592, (word) (( (bPt) gf←c0498)+592)/* var←c54168 */ , 67422721, (word) "PointerEvents");
(void) XR←ExportProcS(var←c61592, (word) (( (bPt) gf←c0498)+584)/* var←c54136 */ , 67422977, (word) "DeviceEvents");
(void) XR←ExportType((word) "ConnectionPrivate", (word) XR←GetTypeIndexS((word) (&string127)), (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2)
);
var←c61592 = (word) XR←ExportInterface((word) "XlAuthFriends", (word) XR←GetTypeIndexS((word) (&string128)), 1);
(* (( (ptr) gf←c0498)+303)/* var←c61624 */ ) = var←c61592;
(void) XR←ExportVar(var←c61592, 0, (word) (( (bPt) gf←c0498)+24)/* authentifier←v3784 */ );
var←c61592 = (word) XR←ExportInterface((word) "XlDetails", (word) XR←GetTypeIndexS((word) (&string129)), 4);
(* (( (ptr) gf←c0498)+303)/* var←c61624 */ ) = var←c61592;
(void) XR←ExportVar(var←c61592, 0, (word) (( (bPt) gf←c0498)+32)/* synchronousErrors←v5072 */ );
(void) XR←ExportVar(var←c61592, 1, (word) (( (bPt) gf←c0498)+36)/* ignoreErrors←v5100 */ );
(void) XR←ExportVar(var←c61592, 2, (word) (( (bPt) gf←c0498)+44)/* flushIgnoreErrors←v5184 */ );
(void) XR←ExportVar(var←c61592, 3, (word) (( (bPt) gf←c0498)+48)/* flushSoonIgnoreErrors←v5212 */ );
var←c61592 = (word) XR←ExportInterface((word) &string122, (word) XR←GetTypeIndexS((word) (&string123)), 77);
(* (( (ptr) gf←c0498)+303)/* var←c61624 */ ) = var←c61592;
(void) XR←ExportProcS(var←c61592, (word) (( (bPt) gf←c0498)+648)/* var←c54392 */ , 278529, (word) "CheckReply");
var←c61592 = (word) XR←ExportInterface((word) "XlUtils", (word) XR←GetTypeIndexS((word) (&string130)), 1);
(* (( (ptr) gf←c0498)+303)/* var←c61624 */ ) = var←c61592;
(void) XR←ExportProcS(var←c61592, (word) (( (bPt) gf←c0498)+704)/* var←c54616 */ , 67371009, (word) "DeadConnection");
}
static void XlImplSetup←P0(formal←c0108, formal←c094)
word formal←c0108;
word formal←c094;
{
register ptr gf←c61656 = (ptr) &globalframe;
/* XlImplSetup: */
SOURCE(289, 22080)
SOURCE(1099, 41)
(* (( (ptr) gf←c61656)+5)/* replyModulusKey←v3756 */ ) = XR←NewObject(4, (* (( (ptr) gf←c61656)+14) ));
SOURCE(7390, 56)
{
word pd131;
pd131 = (* (( (ptr) (* (( (ptr) gf←c61656)+286)/* var←c55416 */ ))+6) );
(* (( (ptr) gf←c61656)+7)/* replyTimeout←v4288 */ ) = (word) ( *( (fPt) ((* (ptr) pd131 ))))(10000, pd131);
};
SOURCE(22012, 100)
{
word var←c55448;
var←c55448 = XR←NewObject(36, (* (( (ptr) gf←c61656)+15) ));
(* (( (ptr) var←c55448)+1) ) = 1;
(* (( (ptr) var←c55448)+2) ) = 1;
(* (( (ptr) gf←c61656)+8)/* synchronousErrors←v5072 */ ) = var←c55448;
};
SOURCE(22115, 162)
{
word var←c55480;
word var←c55608;
{
word var←c55512;
word var←c55576;
{
word pd132;
pd132 = (* (( (ptr) (* (( (ptr) gf←c61656)+287)/* var←c55544 */ ))+63) );
var←c55512 = (word) ( *( (fPt) ((* (ptr) pd132 ))))(0, 0, 0, pd132);
};
var←c55576 = XR←NewObject(16, (* (( (ptr) gf←c61656)+18) ));
(* (ptr) var←c55576 ) = (word) (( (bPt) gf←c61656)+528)/* var←c53912 */ ;
(* (( (ptr) var←c55576)+2) ) = var←c55512;
var←c55480 = var←c55576;
};
var←c55608 = XR←NewObject(36, (* (( (ptr) gf←c61656)+15) ));
(* (( (ptr) var←c55608)+3) ) = var←c55480;
(* (( (ptr) gf←c61656)+9)/* ignoreErrors←v5100 */ ) = var←c55608;
};
SOURCE(22373, 158)
{
word var←c55640;
word var←c55736;
{
word var←c55672;
word var←c55704;
{
word pd133;
pd133 = (* (( (ptr) (* (( (ptr) gf←c61656)+287)/* var←c55544 */ ))+63) );
var←c55672 = (word) ( *( (fPt) ((* (ptr) pd133 ))))(0, 0, 0, pd133);
};
var←c55704 = XR←NewObject(16, (* (( (ptr) gf←c61656)+18) ));
(* (ptr) var←c55704 ) = (word) (( (bPt) gf←c61656)+528)/* var←c53912 */ ;
(* (( (ptr) var←c55704)+2) ) = var←c55672;
var←c55640 = var←c55704;
};
var←c55736 = XR←NewObject(36, (* (( (ptr) gf←c61656)+15) ));
(* (( (ptr) var←c55736)+3) ) = var←c55640;
(* (( (ptr) var←c55736)+5) ) = 3;
(* (( (ptr) gf←c61656)+11)/* flushIgnoreErrors←v5184 */ ) = var←c55736;
};
SOURCE(22534, 163)
{
word var←c55768;
word var←c55864;
{
word var←c55800;
word var←c55832;
{
word pd134;
pd134 = (* (( (ptr) (* (( (ptr) gf←c61656)+287)/* var←c55544 */ ))+63) );
var←c55800 = (word) ( *( (fPt) ((* (ptr) pd134 ))))(0, 0, 0, pd134);
};
var←c55832 = XR←NewObject(16, (* (( (ptr) gf←c61656)+18) ));
(* (ptr) var←c55832 ) = (word) (( (bPt) gf←c61656)+528)/* var←c53912 */ ;
(* (( (ptr) var←c55832)+2) ) = var←c55800;
var←c55768 = var←c55832;
};
var←c55864 = XR←NewObject(36, (* (( (ptr) gf←c61656)+15) ));
(* (( (ptr) var←c55864)+3) ) = var←c55768;
(* (( (ptr) var←c55864)+5) ) = 2;
(* (( (ptr) gf←c61656)+12)/* flushSoonIgnoreErrors←v5212 */ ) = var←c55864;
};
}
static void ProduceConnectionNotCreated←P60(rejected←v5328)
word rejected←v5328;
{
register ptr gf←c61688 = (ptr) &globalframe;
/* ProduceConnectionNotCreated: */
SOURCE(1221, 112)
SOURCE(1296, 37)
{
word var←c0110;
var←c0110 = rejected←v5328;
(void) (XR←RaiseSignal((* (( (ptr) (* (( (ptr) gf←c61688)+287)/* var←c55544 */ ))+39) ), 0, (word) &var←c0110));
};
}
static void PutConnectionInitialization←P120(c←v5400, authorizationProtocolName←v5428, authorizationProtocolData←v5456)
word c←v5400;
word authorizationProtocolName←v5428;
word authorizationProtocolData←v5456;
{
register ptr gf←c61720 = (ptr) &globalframe;
/* PutConnectionInitialization: */
SOURCE(1339, 699)
SOURCE(1459, 27)
if (((* (( (ptr) c←v5400)+13) ) != 0)) {
SOURCE(1486, 5)
(void) XR←RaiseUnnamedError();
};
SOURCE(1493, 112)
SOURCE(1556, 17)
{
word pd135;
pd135 = (* (( (ptr) (* (( (ptr) gf←c61720)+288)/* var←c55896 */ ))+45) );
(void) ( *( (fPt) ((* (ptr) pd135 ))))(c←v5400, 66, pd135);
};
SOURCE(1626, 17)
{
word pd136;
pd136 = (* (( (ptr) (* (( (ptr) gf←c61720)+288)/* var←c55896 */ ))+45) );
(void) ( *( (fPt) ((* (ptr) pd136 ))))(c←v5400, 0, pd136);
};
SOURCE(1655, 17)
{
word pd137;
pd137 = (* (( (ptr) (* (( (ptr) gf←c61720)+288)/* var←c55896 */ ))+46) );
(void) ( *( (fPt) ((* (ptr) pd137 ))))(c←v5400, 11, pd137);
};
SOURCE(1700, 16)
{
word pd138;
pd138 = (* (( (ptr) (* (( (ptr) gf←c61720)+288)/* var←c55896 */ ))+46) );
(void) ( *( (fPt) ((* (ptr) pd138 ))))(c←v5400, 0, pd138);
};
SOURCE(1744, 51)
{
word var←c55928;
{
word pd139;
word idx140;
pd139 = (* (( (ptr) (* (( (ptr) gf←c61720)+289)/* var←c55960 */ ))+15) );
var←c55928 = (
idx140 = (word) ( *( (fPt) ((* (ptr) pd139 ))))(authorizationProtocolName←v5428, pd139),
BCK(idx140, 65536)
);
};
{
word pd141;
pd141 = (* (( (ptr) (* (( (ptr) gf←c61720)+288)/* var←c55896 */ ))+46) );
(void) ( *( (fPt) ((* (ptr) pd141 ))))(c←v5400, var←c55928, pd141);
};
};
SOURCE(1814, 51)
{
word var←c55992;
{
word pd142;
word idx143;
pd142 = (* (( (ptr) (* (( (ptr) gf←c61720)+289)/* var←c55960 */ ))+15) );
var←c55992 = (
idx143 = (word) ( *( (fPt) ((* (ptr) pd142 ))))(authorizationProtocolData←v5456, pd142),
BCK(idx143, 65536)
);
};
{
word pd144;
pd144 = (* (( (ptr) (* (( (ptr) gf←c61720)+288)/* var←c55896 */ ))+46) );
(void) ( *( (fPt) ((* (ptr) pd144 ))))(c←v5400, var←c55992, pd144);
};
};
SOURCE(1884, 16)
{
word pd145;
pd145 = (* (( (ptr) (* (( (ptr) gf←c61720)+288)/* var←c55896 */ ))+46) );
(void) ( *( (fPt) ((* (ptr) pd145 ))))(c←v5400, 0, pd145);
};
SOURCE(1912, 44)
{
word pd146;
pd146 = (* (( (ptr) (* (( (ptr) gf←c61720)+288)/* var←c55896 */ ))+51) );
(void) ( *( (fPt) ((* (ptr) pd146 ))))(c←v5400, authorizationProtocolName←v5428, 0, 2147483647, pd146);
};
SOURCE(1958, 44)
{
word pd147;
pd147 = (* (( (ptr) (* (( (ptr) gf←c61720)+288)/* var←c55896 */ ))+51) );
(void) ( *( (fPt) ((* (ptr) pd147 ))))(c←v5400, authorizationProtocolData←v5456, 0, 2147483647, pd147);
};
SOURCE(2004, 16)
(* (( (ptr) c←v5400)+10) ) = 0;
SOURCE(2022, 16)
{
word pd148;
pd148 = (* (( (ptr) (* (( (ptr) gf←c61720)+290)/* var←c56024 */ ))+25) );
(void) ( *( (fPt) ((* (ptr) pd148 ))))((* ((( (ptr) c←v5400)+31)) ), pd148);
};
}
static word GetBYTE←P180(c←v5516)
word c←v5516;
{
word var←c5560;
/* GetBYTE: */
SOURCE(2045, 88)
SOURCE(2094, 39)
{
word var←c56088;
word byte←v21448;
{
word self←v22692;
self←v22692 = (* (( (ptr) c←v5516)+32) );
{
word i←v22772;
i←v22772 = (* (( (ptr) self←v22692)+7) );
{
word pd149;
if ((i←v22772 < (* (( (ptr) self←v22692)+5) ))) {
{
word var←c56184;
word buffer←v22812;
(* (( (ptr) self←v22692)+7) ) = (i←v22772 + 1);
buffer←v22812 = (* (( (ptr) self←v22692)+4) );
var←c56184 = (unsigned) (word) (* ((( (bPt) buffer←v22812)+4)+i←v22772) );
byte←v21448 = var←c56184;
};
}
else {
pd149 = (* (ptr) (* (ptr) self←v22692 ) );
byte←v21448 = (word) ( *( (fPt) ((* (ptr) pd149 ))))(self←v22692, pd149);
};
};
};
};
var←c56088 = byte←v21448;
return(var←c56088);
};
}
static word GetCARD16←P240(c←v5620)
word c←v5620;
{
word var←c5664;
/* GetCARD16: */
SOURCE(2137, 93)
SOURCE(2190, 40)
{
word var←c56280;
word c←v53752;
c←v53752 = c←v5620;
{
word byte0←v23188;
word byte1←v23752;
{
word self←v23616;
self←v23616 = (* (( (ptr) c←v53752)+32) );
{
word i←v23664;
i←v23664 = (* (( (ptr) self←v23616)+7) );
{
word pd150;
if ((i←v23664 < (* (( (ptr) self←v23616)+5) ))) {
{
word var←c56376;
word buffer←v23704;
(* (( (ptr) self←v23616)+7) ) = (i←v23664 + 1);
buffer←v23704 = (* (( (ptr) self←v23616)+4) );
var←c56376 = (unsigned) (word) (* ((( (bPt) buffer←v23704)+4)+i←v23664) );
byte0←v23188 = var←c56376;
};
}
else {
pd150 = (* (ptr) (* (ptr) self←v23616 ) );
byte0←v23188 = (word) ( *( (fPt) ((* (ptr) pd150 ))))(self←v23616, pd150);
};
};
};
};
{
word self←v23784;
self←v23784 = (* (( (ptr) c←v53752)+32) );
{
word i←v23832;
i←v23832 = (* (( (ptr) self←v23784)+7) );
{
word pd151;
if ((i←v23832 < (* (( (ptr) self←v23784)+5) ))) {
{
word var←c56504;
word buffer←v23864;
(* (( (ptr) self←v23784)+7) ) = (i←v23832 + 1);
buffer←v23864 = (* (( (ptr) self←v23784)+4) );
var←c56504 = (unsigned) (word) (* ((( (bPt) buffer←v23864)+4)+i←v23832) );
byte1←v23752 = var←c56504;
};
}
else {
pd151 = (* (ptr) (* (ptr) self←v23784 ) );
byte1←v23752 = (word) ( *( (fPt) ((* (ptr) pd151 ))))(self←v23784, pd151);
};
};
};
};
var←c56280 = (((word) byte0←v23188 << 8) + byte1←v23752);
};
return(var←c56280);
};
}
static word GetCARD32←P300(c←v5724)
word c←v5724;
{
word var←c5768;
/* GetCARD32: */
SOURCE(2234, 93)
SOURCE(2287, 40)
{
word var←c56600;
word c←v53576;
c←v53576 = c←v5724;
{
word byte0←v24160;
word byte1←v24332;
word byte2←v24492;
word byte3←v24652;
word ln←v24864;
{
word self←v24192;
self←v24192 = (* (( (ptr) c←v53576)+32) );
{
word i←v24240;
i←v24240 = (* (( (ptr) self←v24192)+7) );
{
word pd152;
if ((i←v24240 < (* (( (ptr) self←v24192)+5) ))) {
{
word var←c56696;
word buffer←v24272;
(* (( (ptr) self←v24192)+7) ) = (i←v24240 + 1);
buffer←v24272 = (* (( (ptr) self←v24192)+4) );
var←c56696 = (unsigned) (word) (* ((( (bPt) buffer←v24272)+4)+i←v24240) );
byte0←v24160 = var←c56696;
};
}
else {
pd152 = (* (ptr) (* (ptr) self←v24192 ) );
byte0←v24160 = (word) ( *( (fPt) ((* (ptr) pd152 ))))(self←v24192, pd152);
};
};
};
};
{
word self←v24364;
self←v24364 = (* (( (ptr) c←v53576)+32) );
{
word i←v24412;
i←v24412 = (* (( (ptr) self←v24364)+7) );
{
word pd153;
if ((i←v24412 < (* (( (ptr) self←v24364)+5) ))) {
{
word var←c56824;
word buffer←v24444;
(* (( (ptr) self←v24364)+7) ) = (i←v24412 + 1);
buffer←v24444 = (* (( (ptr) self←v24364)+4) );
var←c56824 = (unsigned) (word) (* ((( (bPt) buffer←v24444)+4)+i←v24412) );
byte1←v24332 = var←c56824;
};
}
else {
pd153 = (* (ptr) (* (ptr) self←v24364 ) );
byte1←v24332 = (word) ( *( (fPt) ((* (ptr) pd153 ))))(self←v24364, pd153);
};
};
};
};
{
word self←v24524;
self←v24524 = (* (( (ptr) c←v53576)+32) );
{
word i←v24572;
i←v24572 = (* (( (ptr) self←v24524)+7) );
{
word pd154;
if ((i←v24572 < (* (( (ptr) self←v24524)+5) ))) {
{
word var←c56952;
word buffer←v24604;
(* (( (ptr) self←v24524)+7) ) = (i←v24572 + 1);
buffer←v24604 = (* (( (ptr) self←v24524)+4) );
var←c56952 = (unsigned) (word) (* ((( (bPt) buffer←v24604)+4)+i←v24572) );
byte2←v24492 = var←c56952;
};
}
else {
pd154 = (* (ptr) (* (ptr) self←v24524 ) );
byte2←v24492 = (word) ( *( (fPt) ((* (ptr) pd154 ))))(self←v24524, pd154);
};
};
};
};
{
word self←v24684;
self←v24684 = (* (( (ptr) c←v53576)+32) );
{
word i←v24732;
i←v24732 = (* (( (ptr) self←v24684)+7) );
{
word pd155;
if ((i←v24732 < (* (( (ptr) self←v24684)+5) ))) {
{
word var←c57080;
word buffer←v24764;
(* (( (ptr) self←v24684)+7) ) = (i←v24732 + 1);
buffer←v24764 = (* (( (ptr) self←v24684)+4) );
var←c57080 = (unsigned) (word) (* ((( (bPt) buffer←v24764)+4)+i←v24732) );
byte3←v24652 = var←c57080;
};
}
else {
pd155 = (* (ptr) (* (ptr) self←v24684 ) );
byte3←v24652 = (word) ( *( (fPt) ((* (ptr) pd155 ))))(self←v24684, pd155);
};
};
};
};
ln←v24864 = (((word) (((word) (((word) (unsigned) (byte0←v24160 & 0377) << 8) + (unsigned) (byte1←v24332 & 0377)) << 8) +
(unsigned) (byte2←v24492 & 0377)) << 8) + (unsigned) (byte3←v24652 & 0377));
var←c56600 = ln←v24864;
};
return(var←c56600);
};
}
static void GetFormat←P360(formal←c0167, c←v5828)
word formal←c0167;
word c←v5828;
{
W3 f←v5872;
/* GetFormat: */
SOURCE(2331, 170)
SOURCE(2387, 20)
f←v5872.f0 = (word) GetBYTE←P180(c←v5828);
SOURCE(2409, 27)
f←v5872.f1 = (word) GetBYTE←P180(c←v5828);
SOURCE(2438, 26)
f←v5872.f2 = (word) GetBYTE←P180(c←v5828);
SOURCE(2466, 15)
{
word var←c57176;
var←c57176 = (word) GetBYTE←P180(c←v5828);
};
SOURCE(2484, 17)
{
word var←c57208;
var←c57208 = (word) GetCARD32←P300(c←v5828);
};
/* removed tail goto */
(* (W3Pt) formal←c0167 ) = f←v5872;
return;
}
static word GetFormats←P420(c←v5932, n←v5960)
word c←v5932;
word n←v5960;
{
register ptr gf←c61752 = (ptr) &globalframe;
word list←v6004;
/* GetFormats: */
SOURCE(2508, 209)
SOURCE(2508, 209)
list←v6004 = 0;
SOURCE(2590, 127)
if (( (int)n←v5960 > (int)0)) {
SOURCE(2604, 124)
{
word last←v10872;
SOURCE(2606, 6)
{
word var←c57240;
word var←c57272;
var←c57240 = XR←NewObject(16, (* (( (ptr) gf←c61752)+20) ));
var←c57272 = var←c57240;
(void) GetFormat←P360((word) var←c57272, c←v5932);
list←v6004 = var←c57240;
};
last←v10872 = list←v6004;
SOURCE(2656, 61)
{
register word i←v11000 = 1;
register word noName←c57336;
noName←c57336 = n←v5960;
if (( (int)i←v11000 >= (int)noName←c57336)) {
goto lab←L100018;
};
lab←L100021: ;
SOURCE(2680, 37)
{
word var←c57368;
{
word var←c57400;
word var←c57432;
var←c57400 = XR←NewObject(16, (* (( (ptr) gf←c61752)+20) ));
var←c57432 = var←c57400;
(void) GetFormat←P360((word) var←c57432, c←v5932);
var←c57368 = var←c57400;
};
(* (( (ptr) last←v10872)+3) ) = var←c57368;
last←v10872 = var←c57368;
};
i←v11000 = (i←v11000 + 1);
if (( (int)i←v11000 < (int)noName←c57336)) {
goto lab←L100021;
};
lab←L100018: ;
};
};
};
SOURCE(2508, 209)
return(list←v6004);
}
static word ReadScreen←P480(c←v6148, i←v6176)
word c←v6148;
word i←v6176;
{
register ptr gf←c61784 = (ptr) &globalframe;
word s←v6220;
/* ReadScreen: */
SOURCE(2735, 808)
SOURCE(2735, 808)
s←v6220 = 0;
SOURCE(2807, 21)
s←v6220 = XR←NewObject(80, (* (( (ptr) gf←c61784)+21) ));
SOURCE(2830, 34)
{
word var←c57528;
{
word var←c57560;
word c←v53500;
word id←v53528;
c←v53500 = c←v6148;
id←v53528 = (word) GetCARD32←P300(c←v6148);
var←c57560 = id←v53528;
var←c57528 = var←c57560;
};
(* (ptr) s←v6220 ) = var←c57528;
};
SOURCE(2866, 34)
(* (( (ptr) s←v6220)+1) ) = (word) GetCARD32←P300(c←v6148);
SOURCE(2902, 27)
(* (( (ptr) s←v6220)+2) ) = (word) GetCARD32←P300(c←v6148);
SOURCE(2931, 27)
(* (( (ptr) s←v6220)+3) ) = (word) GetCARD32←P300(c←v6148);
SOURCE(2960, 44)
(* (( (ptr) s←v6220)+4) ) = (word) GetCARD32←P300(c←v6148);
SOURCE(3006, 64)
{
word var←c57592;
word var←c57624;
var←c57592 = (word) GetCARD16←P240(c←v6148);
var←c57624 = (word) GetCARD16←P240(c←v6148);
(* (( (ptr) s←v6220)+5) ) = var←c57592;
(* (( (ptr) s←v6220)+6) ) = var←c57624;
};
SOURCE(3072, 69)
{
word var←c57656;
word var←c57688;
var←c57656 = (word) GetCARD16←P240(c←v6148);
var←c57688 = (word) GetCARD16←P240(c←v6148);
(* (( (ptr) s←v6220)+7) ) = var←c57656;
(* (( (ptr) s←v6220)+8) ) = var←c57688;
};
SOURCE(3143, 33)
(* (( (ptr) s←v6220)+9) ) = (word) GetCARD16←P240(c←v6148);
SOURCE(3178, 33)
(* (( (ptr) s←v6220)+10) ) = (word) GetCARD16←P240(c←v6148);
SOURCE(3213, 40)
{
word var←c57720;
{
word var←c57752;
word c←v53424;
word id←v53452;
c←v53424 = c←v6148;
id←v53452 = (word) GetCARD32←P300(c←v6148);
var←c57752 = id←v53452;
var←c57720 = var←c57752;
};
(* (( (ptr) s←v6220)+11) ) = var←c57720;
};
SOURCE(3255, 97)
{
word b←v11044;
SOURCE(3261, 20)
b←v11044 = (word) GetBYTE←P180(c←v6148);
SOURCE(3283, 66)
if ((b←v11044 <= 2)) {
SOURCE(3296, 30)
(* (( (ptr) s←v6220)+12) ) = BCK(b←v11044, 3);
}
else {
SOURCE(3326, 23)
(* (( (ptr) s←v6220)+12) ) = 0;
};
};
SOURCE(3357, 25)
(* (( (ptr) s←v6220)+13) ) = (word) GetBYTE←P180(c←v6148);
SOURCE(3384, 24)
(* (( (ptr) s←v6220)+14) ) = (word) GetBYTE←P180(c←v6148);
SOURCE(3410, 22)
(* (( (ptr) s←v6220)+15) ) = (word) GetBYTE←P180(c←v6148);
SOURCE(3434, 16)
(* (( (ptr) s←v6220)+16) ) = c←v6148;
SOURCE(3452, 18)
(* (( (ptr) s←v6220)+17) ) = i←v6176;
SOURCE(3472, 37)
{
word pd156;
pd156 = (* (( (ptr) (* (( (ptr) gf←c61784)+291)/* var←c57784 */ ))+7) );
(* (( (ptr) s←v6220)+18) ) = (word) ( *( (fPt) ((* (ptr) pd156 ))))(pd156);
};
SOURCE(3511, 32)
(* (( (ptr) s←v6220)+19) ) = (word) GetDepths←P720(c←v6148, s←v6220);
SOURCE(2735, 808)
return(s←v6220);
}
static word ReadScreens←P540(c←v6292, n←v6320)
word c←v6292;
word n←v6320;
{
register ptr gf←c61816 = (ptr) &globalframe;
word s←v6364;
/* ReadScreens: */
SOURCE(3549, 153)
SOURCE(3549, 153)
s←v6364 = 0;
SOURCE(3627, 26)
{
word var←c57816;
word var←c57848;
word var←c57880;
var←c57816 = BCK(n←v6320, 67108863);
var←c57848 = ((word) var←c57816 << 2);
var←c57880 = XR←NewObject((4 + var←c57848), (* (( (ptr) gf←c61816)+23) ));
(* (ptr) var←c57880 ) = var←c57816;
s←v6364 = var←c57880;
};
SOURCE(3655, 47)
{
register word i←v11088 = 0;
register word noName←c57912;
noName←c57912 = n←v6320;
if (( (int)i←v11088 >= (int)noName←c57912)) {
goto lab←L100024;
};
lab←L100027: ;
SOURCE(3679, 23)
{
word var←c57944;
var←c57944 = (word) ReadScreen←P480(c←v6292, i←v11088);
{
word limit157;
(* ((( (ptr) s←v6364)+1)+(
limit157 = (* (ptr) s←v6364 ),
BCK(i←v11088, limit157)
)) ) = var←c57944;
};
};
i←v11088 = (i←v11088 + 1);
if (( (int)i←v11088 < (int)noName←c57912)) {
goto lab←L100027;
};
lab←L100024: ;
};
SOURCE(3549, 153)
return(s←v6364);
}
static word CreateScreenDepthS←P600(c←v6436)
word c←v6436;
{
register ptr gf←c61848 = (ptr) &globalframe;
word t←v6480;
/* CreateScreenDepthS: */
SOURCE(3717, 322)
SOURCE(3717, 322)
t←v6480 = 0;
SOURCE(3797, 52)
{
word var←c57976;
word var←c58008;
word var←c58040;
{
word idx158;
var←c57976 = (
idx158 = (* (( (ptr) c←v6436)+22) ),
BCK(idx158, 67108863)
);
};
var←c58008 = ((word) var←c57976 << 2);
var←c58040 = XR←NewObject((4 + var←c58008), (* (( (ptr) gf←c61848)+24) ));
(* (ptr) var←c58040 ) = var←c57976;
t←v6480 = var←c58040;
};
SOURCE(3851, 188)
{
register word sno←v11132 = 0;
register word noName←c58072;
noName←c58072 = (* (ptr) (* (( (ptr) (* (( (ptr) c←v6436)+16) ))+17) ) );
if ((sno←v11132 >= noName←c58072)) {
goto lab←L100028;
};
lab←L100031: ;
{
word s←v11176;
SOURCE(3890, 29)
{
word var←c58104;
var←c58104 = (* (( (ptr) (* (( (ptr) c←v6436)+16) ))+17) );
{
word limit159;
s←v11176 = (* ((( (ptr) var←c58104)+1)+(
limit159 = (* (ptr) var←c58104 ),
BCK(sno←v11132, limit159)
)) );
};
};
SOURCE(3921, 118)
{
register word dl←v11220;
dl←v11220 = (* (( (ptr) s←v11176)+19) );
lab←L100035: ;
if ((dl←v11220 != 0)) {
}
else {
goto lab←L100032;
};
SOURCE(4000, 39)
{
word idx160;
word limit161;
(* ((( (ptr) t←v6480)+1)+(
idx160 = (* (ptr) (* (ptr) dl←v11220 ) ),
limit161 = (* (ptr) t←v6480 ),
BCK(idx160, limit161)
)) ) = (* (ptr) dl←v11220 );
};
dl←v11220 = (* (( (ptr) dl←v11220)+1) );
goto lab←L100035;
lab←L100032: ;
};
};
sno←v11132 = (sno←v11132 + 1);
if ((sno←v11132 < noName←c58072)) {
goto lab←L100031;
};
lab←L100028: ;
};
SOURCE(3717, 322)
return(t←v6480);
}
static word GetDepth←P660(c←v6552, s←v6580)
word c←v6552;
word s←v6580;
{
register ptr gf←c61880 = (ptr) &globalframe;
word d←v6636;
/* GetDepth: */
SOURCE(4063, 417)
SOURCE(4063, 417)
d←v6636 = 0;
SOURCE(4148, 23)
d←v6636 = XR←NewObject(24, (* (( (ptr) gf←c61880)+25) ));
SOURCE(4173, 45)
(* (ptr) d←v6636 ) = (* (( (ptr) c←v6552)+22) );
SOURCE(4220, 53)
(* (( (ptr) c←v6552)+22) ) = ((* (( (ptr) c←v6552)+22) ) + 1);
SOURCE(4275, 12)
(* (( (ptr) d←v6636)+1) ) = s←v6580;
SOURCE(4289, 20)
(* (( (ptr) d←v6636)+3) ) = (word) GetBYTE←P180(c←v6552);
SOURCE(4311, 15)
{
word var←c58168;
var←c58168 = (word) GetBYTE←P180(c←v6552);
};
SOURCE(4337, 29)
(* (( (ptr) d←v6636)+4) ) = (word) GetCARD16←P240(c←v6552);
SOURCE(4368, 17)
{
word var←c58200;
var←c58200 = (word) GetCARD32←P300(c←v6552);
};
SOURCE(4396, 45)
(* (( (ptr) d←v6636)+5) ) = (word) GetVisualTypes←P840(c←v6552, (* (( (ptr) d←v6636)+4) ));
SOURCE(4443, 37)
{
word pd162;
pd162 = (* (( (ptr) (* (( (ptr) gf←c61880)+291)/* var←c57784 */ ))+7) );
(* (( (ptr) d←v6636)+2) ) = (word) ( *( (fPt) ((* (ptr) pd162 ))))(pd162);
};
SOURCE(4063, 417)
return(d←v6636);
}
static word GetDepths←P720(c←v6708, s←v6736)
word c←v6708;
word s←v6736;
{
register ptr gf←c61912 = (ptr) &globalframe;
word list←v6792;
/* GetDepths: */
SOURCE(4486, 248)
SOURCE(4486, 248)
list←v6792 = 0;
SOURCE(4582, 152)
if (((* (( (ptr) s←v6736)+15) ) > 0)) {
SOURCE(4604, 141)
{
word last←v11348;
SOURCE(4606, 6)
{
word var←c58232;
word var←c58264;
var←c58232 = XR←NewObject(8, (* (( (ptr) gf←c61912)+26) ));
var←c58264 = var←c58232;
(* (ptr) var←c58264 ) = (word) GetDepth←P660(c←v6708, s←v6736);
list←v6792 = var←c58232;
};
last←v11348 = list←v6792;
SOURCE(4663, 71)
{
register word i←v11476 = 1;
register word noName←c58328;
noName←c58328 = (* (( (ptr) s←v6736)+15) );
if (( (int)i←v11476 >= (int)noName←c58328)) {
goto lab←L100036;
};
lab←L100039: ;
SOURCE(4695, 39)
{
word var←c58360;
{
word var←c58392;
word var←c58424;
var←c58392 = XR←NewObject(8, (* (( (ptr) gf←c61912)+26) ));
var←c58424 = var←c58392;
(* (ptr) var←c58424 ) = (word) GetDepth←P660(c←v6708, s←v6736);
var←c58360 = var←c58392;
};
(* (( (ptr) last←v11348)+1) ) = var←c58360;
last←v11348 = var←c58360;
};
i←v11476 = (i←v11476 + 1);
if (( (int)i←v11476 < (int)noName←c58328)) {
goto lab←L100039;
};
lab←L100036: ;
};
};
};
SOURCE(4486, 248)
return(list←v6792);
}
static word GetVisualType←P780(c←v6936)
word c←v6936;
{
register ptr gf←c61944 = (ptr) &globalframe;
word var←c6980;
word vt←v11520;
/* GetVisualType: */
SOURCE(4752, 393)
SOURCE(4813, 42)
vt←v11520 = XR←NewObject(32, (* (( (ptr) gf←c61944)+27) ));
SOURCE(4857, 26)
(* (ptr) vt←v11520 ) = (word) GetCARD32←P300(c←v6936);
SOURCE(4885, 26)
{
word var←c58520;
{
word idx163;
var←c58520 = (
idx163 = (word) GetBYTE←P180(c←v6936),
BCK(idx163, 6)
);
};
(* (( (ptr) vt←v11520)+1) ) = var←c58520;
};
SOURCE(4913, 31)
(* (( (ptr) vt←v11520)+2) ) = (word) GetBYTE←P180(c←v6936);
SOURCE(4946, 33)
(* (( (ptr) vt←v11520)+3) ) = (word) GetCARD16←P240(c←v6936);
SOURCE(4981, 25)
(* (( (ptr) vt←v11520)+4) ) = (word) GetCARD32←P300(c←v6936);
SOURCE(5008, 27)
(* (( (ptr) vt←v11520)+5) ) = (word) GetCARD32←P300(c←v6936);
SOURCE(5037, 26)
(* (( (ptr) vt←v11520)+6) ) = (word) GetCARD32←P300(c←v6936);
SOURCE(5065, 17)
{
word var←c58552;
var←c58552 = (word) GetCARD32←P300(c←v6936);
};
SOURCE(5093, 38)
{
word pd164;
pd164 = (* (( (ptr) (* (( (ptr) gf←c61944)+291)/* var←c57784 */ ))+7) );
(* (( (ptr) vt←v11520)+7) ) = (word) ( *( (fPt) ((* (ptr) pd164 ))))(pd164);
};
SOURCE(5133, 12)
return(vt←v11520);
}
static word GetVisualTypes←P840(c←v7040, n←v7068)
word c←v7040;
word n←v7068;
{
register ptr gf←c61976 = (ptr) &globalframe;
word var←c7112;
word list←v11576 = 0;
/* GetVisualTypes: */
SOURCE(5149, 277)
SOURCE(5259, 139)
if (( (int)n←v7068 > (int)0)) {
SOURCE(5273, 136)
{
word last←v11704;
SOURCE(5275, 6)
{
word var←c58584;
word var←c58616;
var←c58584 = XR←NewObject(8, (* (( (ptr) gf←c61976)+28) ));
var←c58616 = var←c58584;
(* (ptr) var←c58616 ) = (word) GetVisualType←P780(c←v7040);
list←v11576 = var←c58584;
};
last←v11704 = list←v11576;
SOURCE(5333, 65)
{
register word i←v11832 = 1;
register word noName←c58680;
noName←c58680 = n←v7068;
if (( (int)i←v11832 >= (int)noName←c58680)) {
goto lab←L100040;
};
lab←L100043: ;
SOURCE(5357, 41)
{
word var←c58712;
{
word var←c58744;
word var←c58776;
var←c58744 = XR←NewObject(8, (* (( (ptr) gf←c61976)+28) ));
var←c58776 = var←c58744;
(* (ptr) var←c58776 ) = (word) GetVisualType←P780(c←v7040);
var←c58712 = var←c58744;
};
(* (( (ptr) last←v11704)+1) ) = var←c58712;
last←v11704 = var←c58712;
};
i←v11832 = (i←v11832 + 1);
if (( (int)i←v11832 < (int)noName←c58680)) {
goto lab←L100043;
};
lab←L100040: ;
};
};
};
SOURCE(5412, 14)
return(list←v11576);
}
static void GetPAD←P900(c←v7256, n←v7284)
word c←v7256;
word n←v7284;
{
/* GetPAD: */
SOURCE(5430, 89)
SOURCE(5472, 47)
lab←L100046: ;
if (((n←v7284 & 3) != 0)) {
}
else {
goto lab←L100044;
};
SOURCE(5493, 15)
{
word var←c58840;
var←c58840 = (word) GetBYTE←P180(c←v7256);
};
SOURCE(5510, 9)
n←v7284 = (n←v7284 + 1);
goto lab←L100046;
lab←L100044: ;
}
static word GetSTRING8←P960(c←v7344, length←v7372)
word c←v7344;
word length←v7372;
{
register ptr gf←c62008 = (ptr) &globalframe;
word rope←v7416;
/* GetSTRING8: */
SOURCE(5534, 129)
SOURCE(5534, 129)
rope←v7416 = 0;
SOURCE(5605, 58)
{
word pd165;
pd165 = (* (( (ptr) (* (( (ptr) gf←c62008)+290)/* var←c56024 */ ))+92) );
rope←v7416 = (word) ( *( (fPt) ((* (ptr) pd165 ))))((* (( (ptr) c←v7344)+32) ), length←v7372, 1, pd165);
};
SOURCE(5534, 129)
return(rope←v7416);
}
static word GetInitialConnectionResponse←P1020(c←v7476)
word c←v7476;
{
register ptr gf←c62040 = (ptr) &globalframe;
word success←v7520;
word successByte←v11876;
/* GetInitialConnectionResponse: */
SOURCE(5669, 1712)
SOURCE(5748, 30)
successByte←v11876 = (word) GetBYTE←P180(c←v7476);
SOURCE(5780, 1601)
if ((successByte←v11876 == 1)) {
SOURCE(5803, 1044)
{
word vendorLength←v11920;
word maxLength←v11948;
word noOfScreens←v11976;
word r←v12004;
SOURCE(5857, 65)
r←v12004 = XR←NewObject(72, (* (( (ptr) gf←c62040)+29) ));
SOURCE(5924, 15)
{
word var←c58904;
var←c58904 = (word) GetBYTE←P180(c←v7476);
};
SOURCE(5949, 37)
(* (ptr) r←v12004 ) = (word) GetCARD16←P240(c←v7476);
SOURCE(5988, 37)
(* (( (ptr) r←v12004)+1) ) = (word) GetCARD16←P240(c←v7476);
SOURCE(6027, 17)
{
word var←c58936;
var←c58936 = (word) GetCARD16←P240(c←v7476);
};
SOURCE(6069, 30)
(* (( (ptr) r←v12004)+2) ) = (word) GetCARD32←P300(c←v7476);
SOURCE(6101, 31)
(* (( (ptr) r←v12004)+3) ) = (word) GetCARD32←P300(c←v7476);
SOURCE(6134, 31)
(* (( (ptr) r←v12004)+4) ) = (word) GetCARD32←P300(c←v7476);
SOURCE(6167, 33)
(* (( (ptr) r←v12004)+5) ) = (word) GetCARD32←P300(c←v7476);
SOURCE(6202, 27)
vendorLength←v11920 = (word) GetCARD16←P240(c←v7476);
SOURCE(6251, 24)
maxLength←v11948 = (word) GetCARD16←P240(c←v7476);
SOURCE(6277, 32)
(* (( (ptr) r←v12004)+6) ) = (maxLength←v11948 - 8);
SOURCE(6311, 46)
(* (( (ptr) r←v12004)+7) ) = IOP2( * , (int)4, (int)(* (( (ptr) r←v12004)+6) ));
SOURCE(6359, 24)
noOfScreens←v11976 = (word) GetBYTE←P180(c←v7476);
SOURCE(6385, 30)
(* (( (ptr) r←v12004)+8) ) = (word) GetBYTE←P180(c←v7476);
SOURCE(6417, 34)
{
word var←c58968;
{
word idx166;
var←c58968 = (
idx166 = (word) GetBYTE←P180(c←v7476),
BCK(idx166, 2)
);
};
(* (( (ptr) r←v12004)+9) ) = var←c58968;
};
SOURCE(6453, 40)
{
word var←c59000;
{
word idx167;
var←c59000 = (
idx167 = (word) GetBYTE←P180(c←v7476),
BCK(idx167, 2)
);
};
(* (( (ptr) r←v12004)+10) ) = var←c59000;
};
SOURCE(6495, 39)
(* (( (ptr) r←v12004)+11) ) = (word) GetBYTE←P180(c←v7476);
SOURCE(6536, 38)
(* (( (ptr) r←v12004)+12) ) = (word) GetBYTE←P180(c←v7476);
SOURCE(6576, 30)
{
word var←c59032;
var←c59032 = (word) GetBYTE←P180(c←v7476);
(* (( (ptr) r←v12004)+13) ) = var←c59032;
};
SOURCE(6608, 30)
{
word var←c59064;
var←c59064 = (word) GetBYTE←P180(c←v7476);
(* (( (ptr) r←v12004)+14) ) = var←c59064;
};
SOURCE(6640, 17)
{
word var←c59096;
var←c59096 = (word) GetCARD32←P300(c←v7476);
};
SOURCE(6668, 38)
(* (( (ptr) r←v12004)+15) ) = (word) GetSTRING8←P960(c←v7476, vendorLength←v11920);
SOURCE(6708, 23)
(void) GetPAD←P900(c←v7476, vendorLength←v11920);
SOURCE(6733, 44)
(* (( (ptr) r←v12004)+16) ) = (word) GetFormats←P420(c←v7476, (* (( (ptr) r←v12004)+8) ));
SOURCE(6779, 39)
(* (( (ptr) r←v12004)+17) ) = (word) ReadScreens←P540(c←v7476, noOfScreens←v11976);
SOURCE(6820, 10)
(* (( (ptr) c←v7476)+16) ) = r←v12004;
SOURCE(6832, 13)
return(1);
};
}
else {
SOURCE(6854, 529)
{
word r←v12060;
word reasonBytes←v12088;
word additionalDataFWORDS←v12116;
SOURCE(6856, 55)
r←v12060 = XR←NewObject(16, (* (( (ptr) gf←c62040)+30) ));
SOURCE(6913, 30)
reasonBytes←v12088 = (word) GetBYTE←P180(c←v7476);
SOURCE(6975, 37)
(* (ptr) r←v12060 ) = 0;
SOURCE(7014, 37)
(* (( (ptr) r←v12060)+2) ) = (word) GetCARD16←P240(c←v7476);
SOURCE(7053, 37)
(* (( (ptr) r←v12060)+3) ) = (word) GetCARD16←P240(c←v7476);
SOURCE(7092, 35)
additionalDataFWORDS←v12116 = (word) GetCARD16←P240(c←v7476);
SOURCE(7129, 59)
if ((((word) (reasonBytes←v12088 + 3) >> 2) != SGNCK(additionalDataFWORDS←v12116))) {
SOURCE(7188, 5)
(void) XR←RaiseUnnamedError();
};
SOURCE(7195, 37)
(* (( (ptr) r←v12060)+1) ) = (word) GetSTRING8←P960(c←v7476, reasonBytes←v12088);
SOURCE(7234, 22)
(void) GetPAD←P900(c←v7476, reasonBytes←v12088);
SOURCE(7258, 15)
(* (( (ptr) c←v7476)+15) ) = 0;
SOURCE(7275, 58)
{
word pd168;
pd168 = (* (( (ptr) (* (( (ptr) gf←c62040)+289)/* var←c55960 */ ))+6) );
(* (( (ptr) r←v12060)+1) ) = (word) ( *( (fPt) ((* (ptr) pd168 ))))((* (( (ptr) r←v12060)+1) ), (* (( (ptr) gf←c62040)+131)
), pd168);
};
SOURCE(7335, 30)
(void) ProduceConnectionNotCreated←P60(r←v12060);
SOURCE(7367, 14)
return(0);
};
};
}
static void CloseStream←P1080(formal←c0574)
word formal←c0574;
{
W6 var←c62072;
/* declaration of s←v7580 skipped */
register ptr gf←c62104 = (ptr) &globalframe;
var←c62072.f4/* s←v7580 */ = formal←c0574;
/* CloseStream: */
SOURCE(7449, 95)
SOURCE(7486, 58)
if ((var←c62072.f4/* s←v7580 */ != 0)) {
SOURCE(7500, 44)
SOURCE(7500, 44)
{
/* declaration of var←c01 skipped */
var←c62072.f5/* var←c01 */ = (* (( (ptr) (* (( (ptr) gf←c62104)+290)/* var←c56024 */ ))+28) );
{
word var←c02;
{
word var←c0551;
var←c0551 = (word) &var←c62072;
var←c02 = (word) XR←Enable(( ((word) (fPt) NoName←Q6996) ), ( ((word) (fPt) NoName←Q7776) ), var←c0551);
};
/* removed trivial cond node */
};
};
};
}
static word NoName←Q6996(formal←c0513)
word formal←c0513;
{
SOURCE(7500, 44)
{
word pd169;
pd169 = (* (( (ptr) formal←c0513)+5) );
(void) ( *( (fPt) ((* (ptr) pd169 ))))((* (( (ptr) formal←c0513)+4) ), 1, pd169);
};
return(0);
}
static void ScanName←P1140(formal←c0282, name←v7824)
word formal←c0282;
word name←v7824;
{
W13 var←c62136;
register ptr gf←c62168 = (ptr) &globalframe;
/* declaration of sn←v7868 skipped */
/* ScanName: */
SOURCE(7728, 998)
SOURCE(7728, 998)
XR←FillWords(&(* (W6Pt) ((( (ptr) &var←c62136)+4)/* sn←v7868 */ )), 6, 0);
SOURCE(7783, 943)
SOURCE(7785, 31)
{
word length←v12172;
word colonPos←v12200;
SOURCE(7785, 31)
{
word pd170;
pd170 = (* (( (ptr) (* (( (ptr) gf←c62168)+289)/* var←c55960 */ ))+14) );
length←v12172 = (word) ( *( (fPt) ((* (ptr) pd170 ))))(name←v7824, pd170);
};
SOURCE(7818, 47)
{
word pd171;
pd171 = (* (( (ptr) (* (( (ptr) gf←c62168)+289)/* var←c55960 */ ))+24) );
colonPos←v12200 = (word) ( *( (fPt) ((* (ptr) pd171 ))))(name←v7824, 0, (* (( (ptr) gf←c62168)+130) ), pd171);
};
SOURCE(7867, 25)
(* (( (ptr) &var←c62136)+4) ) = (* (( (ptr) gf←c62168)+89) );
SOURCE(7894, 24)
(* (( (ptr) &var←c62136)+5) ) = (* (( (ptr) gf←c62168)+82) );
SOURCE(7920, 127)
{
/* declaration of var←c59192 skipped */
{
word pd172;
pd172 = (* (( (ptr) (* (( (ptr) gf←c62168)+289)/* var←c55960 */ ))+17) );
(* (( (ptr) &var←c62136)+10)/* var←c59192 */ ) = (word) ( *( (fPt) ((* (ptr) pd172 ))))(name←v7824, 0, colonPos←v12200, pd172)
;
};
{
/* declaration of var←c03 skipped */
(* (( (ptr) &var←c62136)+11)/* var←c03 */ ) = (* (( (ptr) (* (( (ptr) gf←c62168)+293)/* var←c59224 */ ))+6) );
{
/* declaration of var←c04 skipped */
{
word var←c05;
{
word var←c0552;
var←c0552 = (word) &var←c62136;
var←c05 = (word) XR←Enable(( ((word) (fPt) NoName←Q7176) ), ( ((word) (fPt) NoName←Q7716) ), var←c0552);
};
if ((var←c05 == 3)) {
goto lab←L100052;
};
};
(* (( (ptr) &var←c62136)+6) ) = (* (( (ptr) &var←c62136)+12)/* var←c04 */ );
};
};
};
SOURCE(8063, 70)
{
word pd173;
pd173 = (* (( (ptr) (* (( (ptr) gf←c62168)+289)/* var←c55960 */ ))+13) );
if ((0 != (word) ( *( (fPt) ((* (ptr) pd173 ))))((* ((( (ptr) &var←c62136)+6)) ), pd173))) {
SOURCE(8103, 30)
(* (( (ptr) &var←c62136)+6) ) = (* (( (ptr) gf←c62168)+71) );
};
};
SOURCE(8166, 522)
if (( (int)(colonPos←v12200 + 1) < (int)length←v12172)) {
SOURCE(8194, 511)
{
word dotPos←v12244;
word lastNumberPos←v12272;
SOURCE(8196, 60)
{
word pd174;
pd174 = (* (( (ptr) (* (( (ptr) gf←c62168)+289)/* var←c55960 */ ))+24) );
dotPos←v12244 = (word) ( *( (fPt) ((* (ptr) pd174 ))))(name←v7824, colonPos←v12200, (* (( (ptr) gf←c62168)+70) ), pd174)
;
};
SOURCE(8258, 80)
{
word pd175;
pd175 = (* (( (ptr) (* (( (ptr) gf←c62168)+289)/* var←c55960 */ ))+25) );
lastNumberPos←v12272 = (word) ( *( (fPt) ((* (ptr) pd175 ))))(name←v7824, (colonPos←v12200 + 1), (* (( (ptr) gf←c62168)+69)
), pd175);
};
SOURCE(8340, 348)
if (( (int)lastNumberPos←v12272 > (int)(colonPos←v12200 + 1))) {
SOURCE(8375, 164)
SOURCE(8375, 164)
{
/* declaration of var←c59256 skipped */
{
word pd176;
pd176 = (* (( (ptr) (* (( (ptr) gf←c62168)+289)/* var←c55960 */ ))+17) );
(* (( (ptr) &var←c62136)+10)/* var←c59256 */ ) = (word) ( *( (fPt) ((* (ptr) pd176 ))))(name←v7824, (colonPos←v12200 +
1), ((lastNumberPos←v12272 - colonPos←v12200) - 1), pd176);
};
{
/* declaration of var←c06 skipped */
(* (( (ptr) &var←c62136)+11)/* var←c06 */ ) = (* (( (ptr) (* (( (ptr) gf←c62168)+294)/* var←c59288 */ ))+10) );
{
/* declaration of var←c07 skipped */
{
word var←c08;
{
/*1*/ word var←c0553;
/*1*/ var←c0553 = (word) &var←c62136;
/*1*/ var←c08 = (word) XR←Enable(( ((word) (fPt) NoName←Q7116) ), ( ((word) (fPt) NoName←Q7656) ), var←c0553);
/*1*/ };
if ((var←c08 == 4)) {
/*1*/ goto lab←L100056;
/*1*/ };
};
(* (( (ptr) &var←c62136)+7) ) = (* (( (ptr) &var←c62136)+12)/* var←c07 */ );
};
};
};
lab←L100056: ;
SOURCE(8554, 134)
if (( (int)(dotPos←v12244 + 1) < (int)length←v12172)) {
SOURCE(8582, 106)
SOURCE(8582, 106)
{
/* declaration of var←c59320 skipped */
{
word pd177;
pd177 = (* (( (ptr) (* (( (ptr) gf←c62168)+289)/* var←c55960 */ ))+17) );
(* (( (ptr) &var←c62136)+10)/* var←c59320 */ ) = (word) ( *( (fPt) ((* (ptr) pd177 ))))(name←v7824, (dotPos←v12244 + 1), 2147483647, pd177)
;
};
{
/* declaration of var←c09 skipped */
(* (( (ptr) &var←c62136)+11)/* var←c09 */ ) = (* (( (ptr) (* (( (ptr) gf←c62168)+294)/* var←c59288 */ ))+10) );
{
/* declaration of var←c010 skipped */
{
/*1*/ word var←c011;
/*1*/ {
/*1*/ word var←c0554;
/*1*/ var←c0554 = (word) &var←c62136;
/*1*/ var←c011 = (word) XR←Enable(( ((word) (fPt) NoName←Q7056) ), ( ((word) (fPt) NoName←Q7596) ), var←c0554);
/*1*/ };
/*1*/ if ((var←c011 == 5)) {
/*1*/ goto lab←L100060;
/*1*/ };
/*1*/ };
(* (( (ptr) &var←c62136)+8) ) = (* (( (ptr) &var←c62136)+12)/* var←c010 */ );
};
};
};
lab←L100060: ;
};
};
};
};
};
goto lab←L100063;
lab←L100052: ;
lab←L100063: ;
/* removed tail goto */
(* (W6Pt) formal←c0282 ) = (* (W6Pt) (( (ptr) &var←c62136)+4)/* sn←v7868 */ );
return;
}
static word NoName←Q7056(formal←c0515)
word formal←c0515;
{
SOURCE(8582, 106)
{
word pd178;
pd178 = (* (( (ptr) formal←c0515)+11) );
(* (( (ptr) formal←c0515)+12) ) = (word) ( *( (fPt) ((* (ptr) pd178 ))))((* (( (ptr) formal←c0515)+10) ), 8, pd178);
};
return(0);
}
static word NoName←Q7116(formal←c0516)
word formal←c0516;
{
SOURCE(8375, 164)
{
word pd179;
pd179 = (* (( (ptr) formal←c0516)+11) );
(* (( (ptr) formal←c0516)+12) ) = (word) ( *( (fPt) ((* (ptr) pd179 ))))((* (( (ptr) formal←c0516)+10) ), 8, pd179);
};
return(0);
}
static word NoName←Q7176(formal←c0517)
word formal←c0517;
{
SOURCE(7920, 127)
{
word pd180;
pd180 = (* (( (ptr) formal←c0517)+11) );
(* (( (ptr) formal←c0517)+12) ) = (word) ( *( (fPt) ((* (ptr) pd180 ))))((* ((( (ptr) formal←c0517)+10)) ), pd180);
};
return(0);
}
static word ErrorFromStream←P1200(self←v7928)
word self←v7928;
{
register ptr gf←c62200 = (ptr) &globalframe;
word msg←v7972;
W2 var←c0285;
/* ErrorFromStream: */
SOURCE(8730, 117)
SOURCE(8730, 117)
msg←v7972 = 0;
SOURCE(8799, 48)
{
word pd181;
pd181 = (* (( (ptr) (* (( (ptr) gf←c62200)+295)/* var←c59352 */ ))+6) );
(void) ( *( (fPt) ((* (ptr) pd181 ))))((word) &var←c0285, self←v7928, pd181);
};
msg←v7972 = var←c0285.f1;
SOURCE(8730, 117)
return(msg←v7972);
}
static word ErrorDetails←P1260(codes←v8032)
word codes←v8032;
{
register ptr gf←c62232 = (ptr) &globalframe;
word r←v8160;
/* ErrorDetails: */
SOURCE(8851, 261)
SOURCE(8851, 261)
r←v8160 = 0;
SOURCE(8919, 17)
r←v8160 = (* (( (ptr) gf←c62232)+67) );
SOURCE(8938, 138)
{
register word l←v12316;
l←v12316 = codes←v8032;
lab←L100067: ;
if ((l←v12316 != 0)) {
}
else {
goto lab←L100064;
};
SOURCE(8989, 42)
{
word var←c59384;
{
word pd182;
pd182 = (* (( (ptr) (* (( (ptr) gf←c62232)+296)/* var←c59416 */ ))+9) );
var←c59384 = (word) ( *( (fPt) ((* (ptr) pd182 ))))((* (ptr) (l←v12316) ), pd182);
};
{
word pd183;
pd183 = (* (( (ptr) (* (( (ptr) gf←c62232)+289)/* var←c55960 */ ))+6) );
r←v8160 = (word) ( *( (fPt) ((* (ptr) pd183 ))))(r←v8160, var←c59384, pd183);
};
};
SOURCE(9033, 43)
if (((* (( (ptr) l←v12316)+1) ) != 0)) {
SOURCE(9052, 24)
{
word pd184;
pd184 = (* (( (ptr) (* (( (ptr) gf←c62232)+289)/* var←c55960 */ ))+6) );
r←v8160 = (word) ( *( (fPt) ((* (ptr) pd184 ))))(r←v8160, (* (( (ptr) gf←c62232)+66) ), pd184);
};
};
l←v12316 = (* (( (ptr) l←v12316)+1) );
goto lab←L100067;
lab←L100064: ;
};
SOURCE(9088, 24)
{
word pd185;
pd185 = (* (( (ptr) (* (( (ptr) gf←c62232)+289)/* var←c55960 */ ))+6) );
r←v8160 = (word) ( *( (fPt) ((* (ptr) pd185 ))))(r←v8160, (* (( (ptr) gf←c62232)+65) ), pd185);
};
SOURCE(8851, 261)
return(r←v8160);
}
static word DeadConnection←P1320(debugHelp←v8220)
word debugHelp←v8220;
{
register ptr gf←c62264 = (ptr) &globalframe;
word c←v8280;
/* DeadConnection: */
SOURCE(9118, 923)
SOURCE(9118, 923)
c←v8280 = 0;
SOURCE(9200, 694)
{
word var←c59448;
word var←c59512;
{
word var←c59480;
var←c59480 = XR←NewObject(72, (* (( (ptr) gf←c62264)+29) ));
(* (( (ptr) var←c59480)+6) ) = 10000;
(* (( (ptr) var←c59480)+7) ) = 10000;
(* (( (ptr) var←c59480)+9) ) = 1;
(* (( (ptr) var←c59480)+11) ) = 32;
(* (( (ptr) var←c59480)+12) ) = 32;
(* (( (ptr) var←c59480)+14) ) = 255;
var←c59448 = var←c59480;
};
var←c59512 = XR←NewObject(172, (* (( (ptr) gf←c62264)+46) ));
(* (( (ptr) var←c59512)+14) ) = (* (( (ptr) gf←c62264)+64) );
(* (( (ptr) var←c59512)+16) ) = var←c59448;
(* (( (ptr) var←c59512)+18) ) = (* (( (ptr) gf←c62264)+63) );
(* (( (ptr) var←c59512)+31) ) = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c62264)+290)/* var←c56024 */ ))+39) ) );
(* (( (ptr) var←c59512)+32) ) = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c62264)+290)/* var←c56024 */ ))+40) ) );
(* (( (ptr) var←c59512)+34) ) = XR←CheckProc(0);
(* (( (ptr) var←c59512)+40) ) = (* (( (ptr) gf←c62264)+64) );
c←v8280 = var←c59512;
};
SOURCE(9896, 75)
{
word var←c59544;
word var←c59608;
var←c59544 = XR←NewObject(4, (* (( (ptr) gf←c62264)+59) ));
var←c59608 = XR←NewObject(320, (* (( (ptr) gf←c62264)+13) ));
(* (ptr) var←c59608 ) = var←c59544;
(* (W64Pt) (( (ptr) var←c59608)+14) ) = (* (W64Pt) (( (ptr) gf←c62264)+222)/* var←c55384 */ );
(* (( (ptr) c←v8280)+24) ) = var←c59608;
};
SOURCE(9973, 35)
{
word pd186;
pd186 = (* (( (ptr) (* (( (ptr) gf←c62264)+288)/* var←c55896 */ ))+8) );
(void) ( *( (fPt) ((* (ptr) pd186 ))))(c←v8280, 1000, pd186);
};
SOURCE(10010, 31)
{
word pd187;
pd187 = (* (( (ptr) (* (( (ptr) gf←c62264)+297)/* var←c59640 */ ))+7) );
(void) ( *( (fPt) ((* (ptr) pd187 ))))(c←v8280, pd187);
};
SOURCE(9118, 923)
return(c←v8280);
}
static word CreateConnection←P1380(formal←c0575, formal←c0576, formal←c0577, formal←c0578, formal←c0579, formal←c0580)
word formal←c0575;
word formal←c0576;
word formal←c0577;
word formal←c0578;
word formal←c0579;
word formal←c0580;
{
W27 var←c62296;
/* declaration of server←v8340 skipped */
/* declaration of synchronized←v8368 skipped */
/* declaration of applicationKey←v8396 skipped */
/* declaration of errorMatch←v8424 skipped */
/* declaration of finalMatch←v8452 skipped */
/* declaration of debugHelp←v8480 skipped */
register ptr gf←c62328 = (ptr) &globalframe;
word var←c8536;
/* declaration of var←c59672 skipped */
/* declaration of var←c59704 skipped */
word c←v12444 = 0;
/* declaration of success←v12472 skipped */
/* declaration of beforeReachingXServer←v12500 skipped */
/* declaration of state←v12528 skipped */
/* declaration of sn←v12612 skipped */
word pStart←v12640;
word pStop←v12668;
(* (( (ptr) &var←c62296)+4)/* server←v8340 */ ) = formal←c0575;
(* (( (ptr) &var←c62296)+5)/* synchronized←v8368 */ ) = formal←c0576;
(* (( (ptr) &var←c62296)+6)/* applicationKey←v8396 */ ) = formal←c0577;
(* (( (ptr) &var←c62296)+7)/* errorMatch←v8424 */ ) = formal←c0578;
(* (( (ptr) &var←c62296)+8)/* finalMatch←v8452 */ ) = formal←c0579;
(* (( (ptr) &var←c62296)+9)/* debugHelp←v8480 */ ) = formal←c0580;
/* CreateConnection: */
SOURCE(10047, 4111)
{
word tmpAddr188;
tmpAddr188 = (word) (( (ptr) &var←c62296)+10)/* var←c59672 */ ;
(* (ptr) tmpAddr188 ) = ( ((word) (fPt) TryOnce←P3528) );
(* (( (ptr) tmpAddr188) + 1) ) = 1;
};
{
word tmpAddr189;
tmpAddr189 = (word) (( (ptr) &var←c62296)+12)/* var←c59704 */ ;
(* (ptr) tmpAddr189 ) = ( ((word) (fPt) Failure←P3468) );
(* (( (ptr) tmpAddr189) + 1) ) = 1;
};
SOURCE(10047, 4111)
var←c8536 = 0;
SOURCE(10287, 34)
(* (( (ptr) &var←c62296)+15)/* beforeReachingXServer←v12500 */ ) = 1;
SOURCE(10323, 65)
(* (( (ptr) &var←c62296)+16)/* state←v12528 */ ) = (* (( (ptr) gf←c62328)+72) );
SOURCE(13128, 14)
XR←FillWords(&(* (W6Pt) ((( (ptr) &var←c62296)+17)/* sn←v12612 */ )), 6, 0);
SOURCE(13144, 49)
{
word pd190;
pd190 = (* (( (ptr) (* (( (ptr) gf←c62328)+289)/* var←c55960 */ ))+25) );
pStart←v12640 = (word) ( *( (fPt) ((* (ptr) pd190 ))))((* (( (ptr) &var←c62296)+4)/* server←v8340 */ ), 0, (* (( (ptr) gf←c62328)+73)
), pd190);
};
SOURCE(13222, 49)
{
word pd191;
pd191 = (* (( (ptr) (* (( (ptr) gf←c62328)+289)/* var←c55960 */ ))+24) );
pStop←v12668 = (word) ( *( (fPt) ((* (ptr) pd191 ))))((* (( (ptr) &var←c62296)+4)/* server←v8340 */ ), pStart←v12640, (* (
( (ptr) gf←c62328)+74) ), pd191);
};
SOURCE(13298, 90)
if (( (int)pStart←v12640 >= (int)pStop←v12668)) {
SOURCE(13320, 18)
(* (( (ptr) &var←c62296)+4)/* server←v8340 */ ) = 0;
}
else {
SOURCE(13338, 50)
{
word pd192;
pd192 = (* (( (ptr) (* (( (ptr) gf←c62328)+289)/* var←c55960 */ ))+17) );
(* (( (ptr) &var←c62296)+4)/* server←v8340 */ ) = (word) ( *( (fPt) ((* (ptr) pd192 ))))((* (( (ptr) &var←c62296)+4)/* server←v8340 */ ), pStart←v12640, (pStop←v12668 - pStart←v12640), pd192)
;
};
};
SOURCE(13390, 78)
{
word pd193;
pd193 = (* (( (ptr) (* (( (ptr) gf←c62328)+289)/* var←c55960 */ ))+13) );
if ((0 != (word) ( *( (fPt) ((* (ptr) pd193 ))))((* ((( (ptr) &var←c62296)+4)/* server←v8340 */ ) ), pd193))) {
SOURCE(13421, 47)
{
word pd194;
pd194 = (* (( (ptr) (* (( (ptr) gf←c62328)+293)/* var←c59224 */ ))+4) );
(* (( (ptr) &var←c62296)+4)/* server←v8340 */ ) = (word) ( *( (fPt) ((* (ptr) pd194 ))))((* ((( (ptr) &var←c62296)+6)/* applicationKey←v8396 */ ) ), pd194)
;
};
};
};
SOURCE(13473, 21)
(void) ScanName←P1140((word) (( (bPt) &var←c62296)+68)/* sn←v12612 */ , (* (( (ptr) &var←c62296)+4)/* server←v8340 */ ))
;
SOURCE(13496, 77)
{
word pd195;
pd195 = (* (( (ptr) (* (( (ptr) gf←c62328)+289)/* var←c55960 */ ))+13) );
if ((0 == (word) ( *( (fPt) ((* (ptr) pd195 ))))((* ((( (ptr) &var←c62296)+22)) ), pd195))) {
SOURCE(13530, 43)
(void) Failure←P3468((* (( (ptr) gf←c62328)+75) ), (* (( (ptr) &var←c62296)+22) ), (word) (( (bPt) &var←c62296)+48)/* var←c59704 */ )
;
SOURCE(13575, 5)
(void) XR←RaiseUnnamedError();
};
};
SOURCE(13606, 552)
lab←L100070: ;
SOURCE(13606, 552)
{
word in←v12932 = 0;
word out←v12960 = 0;
SOURCE(13687, 77)
(* (( (ptr) &var←c62296)+16)/* state←v12528 */ ) = (* (( (ptr) gf←c62328)+76) );
SOURCE(13766, 14)
(* (( (ptr) &var←c62296)+14)/* success←v12472 */ ) = 1;
SOURCE(13782, 7)
c←v12444 = 0;
SOURCE(13791, 281)
SOURCE(13791, 281)
{
W2 var←c59992;
{
/* declaration of var←c59768 skipped */
{
W2 var←c59800;
{
word v←v53328;
v←v53328 = ((* (( (ptr) &var←c62296)+20) ) + 6000);
var←c59800.f0 = 5;
var←c59800.f1 = v←v53328;
};
{
W2 var←c59896;
W2 var←c0555;
var←c59896.f0 = 11;
var←c59896.f1 = (* (( (ptr) &var←c62296)+19) );
(* (ptr) (word) &var←c0555 ) = 0;
(* (( (ptr) (word) &var←c0555) + 1) ) = 0;
{
word pd196;
pd196 = (* (( (ptr) (* (( (ptr) gf←c62328)+290)/* var←c56024 */ ))+62) );
(* (( (ptr) &var←c62296)+23)/* var←c59768 */ ) = (word) ( *( (fPt) ((* (ptr) pd196 ))))((* (( (ptr) gf←c62328)+77) ), var←c59896, var←c59800, var←c0555, pd196)
;
};
};
};
{
/* declaration of var←c012 skipped */
(* (( (ptr) &var←c62296)+24)/* var←c012 */ ) = (* (( (ptr) (* (( (ptr) gf←c62328)+295)/* var←c59352 */ ))+7) );
{
/* declaration of var←c013 skipped */
{
word var←c014;
{
word var←c0556;
var←c0556 = (word) &var←c62296;
var←c014 = (word) XR←Enable(( ((word) (fPt) NoName←Q7236) ), ( ((word) (fPt) NoName←Q7536) ), var←c0556);
};
if ((var←c014 == 6)) {
goto lab←L100072;
};
};
var←c59992 = (* (W2Pt) (( (ptr) &var←c62296)+25)/* var←c013 */ );
};
};
};
out←v12960 = var←c59992.f1;
in←v12932 = var←c59992.f0;
};
lab←L100072: ;
SOURCE(14088, 70)
if ((0 != (* (( (ptr) &var←c62296)+14)/* success←v12472 */ ))) {
SOURCE(14106, 20)
c←v12444 = (word) TryOnce←P3528(in←v12932, out←v12960, (word) (( (bPt) &var←c62296)+40)/* var←c59672 */ );
SOURCE(14128, 30)
if ( ( (c←v12444 != 0) ? (0 != (* (( (ptr) c←v12444)+15) )) : 0 ) ) {
SOURCE(14148, 10)
return(c←v12444);
};
};
};
goto lab←L100070;
}
static word NoName←Q7236(formal←c0522)
word formal←c0522;
{
SOURCE(13791, 281)
{
word pd197;
pd197 = (* (( (ptr) formal←c0522)+24) );
(void) ( *( (fPt) ((* (ptr) pd197 ))))((word) (( (bPt) formal←c0522)+100), (* (( (ptr) formal←c0522)+17) ), (* (( (ptr) formal←c0522)+23)
), (* (( (ptr) formal←c0522)+18) ), (word) -1, 0, pd197);
};
return(0);
}
static void Failure←P3468(r1←v12744, r2←v12772, formal←c62392)
word r1←v12744;
word r2←v12772;
word formal←c62392;
{
register ptr gf←c62360 = (ptr) &globalframe;
word serverPart←v13004;
word rejected←v13032;
formal←c62392 = (formal←c62392 - 48);
/* Failure: */
SOURCE(10390, 330)
SOURCE(10429, 54)
{
word pd198;
pd198 = (* (( (ptr) (* (( (ptr) gf←c62360)+289)/* var←c55960 */ ))+5) );
serverPart←v13004 = (word) ( *( (fPt) ((* (ptr) pd198 ))))((* (( (ptr) gf←c62360)+78) ), (* (( (ptr) formal←c62392)+4) ), (* (
( (ptr) gf←c62360)+79) ), 0, 0, pd198);
};
SOURCE(10485, 62)
rejected←v13032 = XR←NewObject(16, (* (( (ptr) gf←c62360)+30) ));
SOURCE(10549, 60)
(* (ptr) rejected←v13032 ) = (* (( (ptr) formal←c62392)+15) );
SOURCE(10611, 53)
{
word pd199;
pd199 = (* (( (ptr) (* (( (ptr) gf←c62360)+289)/* var←c55960 */ ))+5) );
(* (( (ptr) rejected←v13032)+1) ) = (word) ( *( (fPt) ((* (ptr) pd199 ))))(r1←v12744, r2←v12772, (* (( (ptr) formal←c62392)+16)
), serverPart←v13004, 0, pd199);
};
SOURCE(10666, 15)
(* (( (ptr) formal←c62392)+14) ) = 0;
SOURCE(10683, 37)
(void) ProduceConnectionNotCreated←P60(rejected←v13032);
}
static word TryOnce←P3528(formal←c0581, formal←c0582, formal←c62456)
word formal←c0581;
word formal←c0582;
word formal←c62456;
{
W7 var←c62424;
/* declaration of in←v12832 skipped */
/* declaration of out←v12860 skipped */
/* declaration of var←c015 skipped */
word var←c12904;
formal←c62456 = (formal←c62456 - 40);
var←c62424.f4/* in←v12832 */ = formal←c0581;
var←c62424.f5/* out←v12860 */ = formal←c0582;
var←c62424.f0 = formal←c62456;
/* TryOnce: */
SOURCE(10725, 2400)
SOURCE(10725, 2400)
var←c12904 = 0;
SOURCE(10792, 2333)
SOURCE(10794, 2309)
{
word var←c016;
{
word var←c0557;
var←c0557 = (word) &var←c62424;
var←c016 = (word) XR←Enable(( ((word) (fPt) NoName←Q7296) ), ( ((word) (fPt) NoName←Q7476) ), var←c0557);
};
if ((var←c016 == 7)) {
goto lab←L100076;
}
else {
if ((var←c016 == 1)) {
goto lab←L07;
};
};
};
goto lab←L100079;
lab←L100076: ;
SOURCE(13111, 12)
return(0);
lab←L100079: ;
lab←L07: ;
return(var←c62424.f6/* var←c015 */ );
}
static word NoName←Q7296(formal←c0527)
word formal←c0527;
{
register ptr gf←c0526 = (ptr) &globalframe;
SOURCE(10973, 16)
{
word c←v13088 = 0;
SOURCE(10991, 74)
(* (( (ptr) (* (ptr) formal←c0527 ))+16) ) = (* (( (ptr) gf←c0526)+81) );
SOURCE(11067, 308)
{
word var←c60088;
var←c60088 = XR←NewObject(172, (* (( (ptr) gf←c0526)+46) ));
(* (( (ptr) var←c60088)+15) ) = 1;
(* (( (ptr) var←c60088)+18) ) = (* (( (ptr) (* (ptr) formal←c0527 ))+4) );
if ((0 != (* (( (ptr) (* (ptr) formal←c0527 ))+5) ))) {
(* (( (ptr) var←c60088)+23) ) = 1000;
}
else {
(* (( (ptr) var←c60088)+23) ) = 0;
};
(* (( (ptr) var←c60088)+31) ) = (* (( (ptr) formal←c0527)+5) );
(* (( (ptr) var←c60088)+32) ) = (* (( (ptr) formal←c0527)+4) );
(* (( (ptr) var←c60088)+34) ) = (word) (( (bPt) gf←c0526)+720)/* var←c54680 */ ;
(* (( (ptr) var←c60088)+40) ) = (* (( (ptr) (* (ptr) formal←c0527 ))+6) );
(* (( (ptr) var←c60088)+42) ) = (* (( (ptr) (* (ptr) formal←c0527 ))+9) );
c←v13088 = var←c60088;
};
SOURCE(11377, 37)
{
word pd200;
pd200 = (* (( (ptr) (* (( (ptr) gf←c0526)+291)/* var←c57784 */ ))+7) );
(* (( (ptr) c←v13088)+29) ) = (word) ( *( (fPt) ((* (ptr) pd200 ))))(pd200);
};
SOURCE(11416, 36)
{
word pd201;
if ((((* (( (ptr) c←v13088)+6) ) - (* (( (ptr) c←v13088)+4) )) < 4000)) {
pd201 = (* (( (ptr) (* (( (ptr) gf←c0526)+288)/* var←c55896 */ ))+8) );
(void) ( *( (fPt) ((* (ptr) pd201 ))))(c←v13088, 4000, pd201);
};
};
SOURCE(11454, 324)
{
word generator←v13132;
word method←v13160 = 0;
word data←v13188 = 0;
SOURCE(11460, 56)
generator←v13132 = (* (( (ptr) gf←c0526)+6)/* authentifier←v3784 */ );
SOURCE(11549, 181)
if ((generator←v13132 != 0)) {
SOURCE(11572, 158)
{
W2 var←c60152;
{
word var←c60120;
{
word pd202;
pd202 = (* (( (ptr) (* (( (ptr) gf←c0526)+294)/* var←c59288 */ ))+27) );
var←c60120 = (word) ( *( (fPt) ((* (ptr) pd202 ))))((* (( (ptr) (* (ptr) formal←c0527 ))+20) ), 8, 1, pd202);
};
(void) ( *( (fPt) ((* (ptr) generator←v13132 ))))((word) &var←c60152, 0, (* (( (ptr) (* (ptr) formal←c0527 ))+19) ), var←c60120, 0, generator←v13132)
;
};
data←v13188 = var←c60152.f1;
method←v13160 = var←c60152.f0;
};
};
SOURCE(11732, 44)
(void) PutConnectionInitialization←P120(c←v13088, method←v13160, data←v13188);
};
SOURCE(11783, 85)
(* (( (ptr) (* (ptr) formal←c0527 ))+16) ) = (* (( (ptr) gf←c0526)+83) );
SOURCE(11870, 29)
(* (( (ptr) (* (ptr) formal←c0527 ))+15) ) = 0;
SOURCE(11901, 41)
(* (( (ptr) (* (ptr) formal←c0527 ))+14) ) = (word) GetInitialConnectionResponse←P1020(c←v13088);
SOURCE(11944, 68)
if ((0 == (* (( (ptr) (* (ptr) formal←c0527 ))+14) ))) {
SOURCE(11963, 15)
(void) CloseStream←P1080((* ((( (ptr) formal←c0527)+4)) ));
SOURCE(11981, 16)
(void) CloseStream←P1080((* ((( (ptr) formal←c0527)+5)) ));
SOURCE(11999, 13)
(* (( (ptr) formal←c0527)+6) ) = 0;
return(1);
};
SOURCE(12015, 87)
(* (( (ptr) (* (ptr) formal←c0527 ))+16) ) = (* (( (ptr) gf←c0526)+84) );
SOURCE(12104, 122)
if ( ( ( (int)(* (( (ptr) (* (ptr) formal←c0527 ))+21) ) >= (int)0) ? ( (int)(* (( (ptr) (* (ptr) formal←c0527 ))+21) ) < (int)(* (ptr) (* (
( (ptr) (* (( (ptr) c←v13088)+16) ))+17) ) )) : 0 ) ) {
SOURCE(12180, 46)
(* (( (ptr) c←v13088)+20) ) = (* (( (ptr) (* (ptr) formal←c0527 ))+21) );
};
SOURCE(12228, 38)
(* (( (ptr) c←v13088)+17) ) = (word) CreateScreenDepthS←P600(c←v13088);
SOURCE(12268, 73)
{
word var←c60184;
word var←c60248;
{
word var←c60216;
var←c60216 = XR←NewObject(4, (* (( (ptr) gf←c0526)+59) ));
(* (ptr) var←c60216 ) = c←v13088;
var←c60184 = var←c60216;
};
var←c60248 = XR←NewObject(320, (* (( (ptr) gf←c0526)+13) ));
(* (ptr) var←c60248 ) = var←c60184;
(* (W64Pt) (( (ptr) var←c60248)+14) ) = (* (W64Pt) (( (ptr) gf←c0526)+222)/* var←c55384 */ );
(* (( (ptr) c←v13088)+24) ) = var←c60248;
};
SOURCE(12343, 90)
{
word pd203;
pd203 = (* (( (ptr) (* (( (ptr) gf←c0526)+298)/* var←c60280 */ ))+4) );
(void) ( *( (fPt) ((* (ptr) pd203 ))))(c←v13088, (* (( (ptr) (* (( (ptr) c←v13088)+16) ))+3) ), (* (( (ptr) (* (( (ptr) c←v13088)+16)
))+4) ), pd203);
};
SOURCE(12435, 31)
{
word pd204;
pd204 = (* (( (ptr) (* (( (ptr) gf←c0526)+297)/* var←c59640 */ ))+6) );
(void) ( *( (fPt) ((* (ptr) pd204 ))))(c←v13088, pd204);
};
SOURCE(12468, 23)
(* (( (ptr) gf←c0526)+4)/* debugLastConnection←v3700 */ ) = c←v13088;
SOURCE(12493, 49)
{
word pd205;
pd205 = (* (( (ptr) (* (( (ptr) gf←c0526)+287)/* var←c55544 */ ))+27) );
(void) ( *( (fPt) ((* (ptr) pd205 ))))(c←v13088, (* (( (ptr) gf←c0526)+85) ), (* (( (ptr) c←v13088)+31) ), pd205);
};
SOURCE(12544, 56)
{
word pd206;
pd206 = (* (( (ptr) (* (( (ptr) gf←c0526)+299)/* var←c60312 */ ))+6) );
(void) ( *( (fPt) ((* (ptr) pd206 ))))(c←v13088, (* (( (ptr) (* (ptr) formal←c0527 ))+7) ), pd206);
};
SOURCE(12602, 28)
{
word pd207;
pd207 = (* (( (ptr) (* (( (ptr) gf←c0526)+300)/* var←c60344 */ ))+17) );
(void) ( *( (fPt) ((* (ptr) pd207 ))))(c←v13088, pd207);
};
SOURCE(12632, 37)
{
word pd208;
pd208 = (* (( (ptr) (* (( (ptr) gf←c0526)+301)/* var←c60376 */ ))+4) );
(void) ( *( (fPt) ((* (ptr) pd208 ))))(c←v13088, (* (( (ptr) (* (ptr) formal←c0527 ))+8) ), pd208);
};
SOURCE(12671, 31)
{
word pd209;
pd209 = (* (( (ptr) (* (( (ptr) gf←c0526)+297)/* var←c59640 */ ))+7) );
(void) ( *( (fPt) ((* (ptr) pd209 ))))(c←v13088, pd209);
};
SOURCE(12704, 34)
{
word pd210;
pd210 = (* (( (ptr) (* (( (ptr) gf←c0526)+297)/* var←c59640 */ ))+4) );
(void) ( *( (fPt) ((* (ptr) pd210 ))))(c←v13088, pd210);
};
SOURCE(12740, 31)
{
word pd211;
pd211 = (* (( (ptr) (* (( (ptr) gf←c0526)+297)/* var←c59640 */ ))+5) );
(void) ( *( (fPt) ((* (ptr) pd211 ))))(c←v13088, pd211);
};
SOURCE(12773, 194)
{
word s←v13232;
word pixmap←v13260;
SOURCE(12779, 26)
{
word var←c60408;
var←c60408 = (* (( (ptr) (* (( (ptr) c←v13088)+16) ))+17) );
{
word limit212;
s←v13232 = (* ((( (ptr) var←c60408)+1)+(
limit212 = (* (ptr) var←c60408 ),
BCK(0, limit212)
)) );
};
};
SOURCE(12807, 87)
{
W2 var←c60440;
var←c60440.f0 = 1;
var←c60440.f1 = 1;
{
word pd213;
pd213 = (* (( (ptr) (* (( (ptr) gf←c0526)+287)/* var←c55544 */ ))+96) );
pixmap←v13260 = (word) ( *( (fPt) ((* (ptr) pd213 ))))(c←v13088, (* (ptr) s←v13232 ), var←c60440, (* (( (ptr) s←v13232)+14)
), 0, pd213);
};
};
SOURCE(12896, 69)
{
word var←c60472;
{
word var←c60504;
var←c60504 = XR←NewObject(4, (* (( (ptr) gf←c0526)+14) ));
(* (ptr) var←c60504 ) = pixmap←v13260;
var←c60472 = var←c60504;
};
{
word pd214;
pd214 = (* (( (ptr) (* (( (ptr) gf←c0526)+287)/* var←c55544 */ ))+27) );
(void) ( *( (fPt) ((* (ptr) pd214 ))))(c←v13088, (* (( (ptr) gf←c0526)+86) ), var←c60472, pd214);
};
};
};
SOURCE(12972, 57)
{
word var←c60536;
var←c60536 = XR←NewObject(4, (* (( (ptr) gf←c0526)+14) ));
{
word pd215;
pd215 = (* (( (ptr) (* (( (ptr) gf←c0526)+287)/* var←c55544 */ ))+27) );
(void) ( *( (fPt) ((* (ptr) pd215 ))))(c←v13088, (* (( (ptr) gf←c0526)+5)/* replyModulusKey←v3756 */ ), var←c60536, pd215)
;
};
};
SOURCE(13031, 53)
{
word pd216;
pd216 = (* (( (ptr) (* (( (ptr) gf←c0526)+302)/* var←c60600 */ ))+6) );
(void) ( *( (fPt) ((* (ptr) pd216 ))))(99, (word) (( (bPt) gf←c0526)+664)/* var←c54456 */ , c←v13088, 2, pd216);
};
SOURCE(13086, 17)
(* (( (ptr) formal←c0527)+6) ) = c←v13088;
return(1);
};
/* c2c skipped dead code */
}
static void CloseConnection←P1440(c←v8596)
word c←v8596;
{
W7 var←c62488;
register ptr gf←c62520 = (ptr) &globalframe;
/* declaration of var←c60632 skipped */
/* CloseConnection: */
SOURCE(14177, 278)
{
word tmpAddr217;
tmpAddr217 = (word) (( (ptr) &var←c62488)+4)/* var←c60632 */ ;
(* (ptr) tmpAddr217 ) = ( ((word) (fPt) CalledJustOnce←P3828) );
(* (( (ptr) tmpAddr217) + 1) ) = 1;
};
SOURCE(14226, 229)
if ((c←v8596 != 0)) {
SOURCE(14242, 15)
(* (( (ptr) c←v8596)+15) ) = 0;
SOURCE(14260, 197)
{
/* declaration of firstTime←v13332 skipped */
SOURCE(14323, 23)
var←c62488.f6/* firstTime←v13332 */ = 0;
SOURCE(14348, 57)
{
word var←c60664;
word pd218;
pd218 = (* (( (ptr) (* (( (ptr) gf←c62520)+287)/* var←c55544 */ ))+29) );
var←c60664 = (word) ( *( (fPt) ((* (ptr) pd218 ))))(c←v8596, (* (( (ptr) gf←c62520)+88) ), (word) (( (bPt) &var←c62488)+16)
/* var←c60632 */ , pd218);
};
SOURCE(14407, 48)
if ((0 != var←c62488.f6/* firstTime←v13332 */ )) {
SOURCE(14425, 30)
{
word pd219;
pd219 = (* (( (ptr) (* (( (ptr) gf←c62520)+302)/* var←c60600 */ ))+4) );
(void) ( *( (fPt) ((* (ptr) pd219 ))))((word) (( (bPt) gf←c62520)+680)/* var←c54520 */ , c←v8596, 2, pd219);
};
};
};
};
}
static word CalledJustOnce←P3828(c←v44876, key←v44904, formal←c62584)
word c←v44876;
word key←v44904;
word formal←c62584;
{
register ptr gf←c62552 = (ptr) &globalframe;
word val←v44948;
formal←c62584 = (formal←c62584 - 16);
/* CalledJustOnce: */
SOURCE(14266, 37)
SOURCE(14266, 37)
val←v44948 = (* (( (ptr) gf←c62552)+87) );
SOURCE(14304, 16)
(* (( (ptr) formal←c62584)+6) ) = 1;
SOURCE(14266, 37)
return(val←v44948);
}
static void DetachedClose←P1500(formal←c0583)
word formal←c0583;
{
W5 var←c62616;
/* declaration of data←v8656 skipped */
var←c62616.f4/* data←v8656 */ = formal←c0583;
/* DetachedClose: */
SOURCE(14469, 836)
SOURCE(14503, 802)
SOURCE(14505, 780)
{
word var←c017;
{
word var←c0558;
var←c0558 = (word) &var←c62616;
var←c017 = (word) XR←Enable(( ((word) (fPt) NoName←Q7356) ), ( ((word) (fPt) NoName←Q7416) ), var←c0558);
};
if ((var←c017 == 8)) {
goto lab←L100080;
};
};
goto lab←L100085;
lab←L100080: ;
lab←L100085: ;
}
static word NoName←Q7356(formal←c0532)
word formal←c0532;
{
register ptr gf←c0531 = (ptr) &globalframe;
SOURCE(14587, 28)
{
word c←v13376;
word rid←v13404 = 0;
word xmit←v13432;
SOURCE(14587, 28)
c←v13376 = XR←Narrow((* (( (ptr) formal←c0532)+4) ), (* (( (ptr) gf←c0531)+46) ));
SOURCE(14637, 24)
xmit←v13432 = (* (( (ptr) c←v13376)+31) );
SOURCE(14663, 139)
{
word var←c60696;
{
word pd220;
pd220 = (* (( (ptr) (* (( (ptr) gf←c0531)+287)/* var←c55544 */ ))+28) );
var←c60696 = (word) ( *( (fPt) ((* (ptr) pd220 ))))(c←v13376, (* (( (ptr) gf←c0531)+85) ), pd220);
};
if ((var←c60696 == 0)) {
goto lab←L100083;
};
if (((* (( (ptr) gf←c0531)+36) ) == XR←GetReferentType(var←c60696))) {
{
word s←v13488;
s←v13488 = var←c60696;
SOURCE(14743, 8)
xmit←v13432 = s←v13488;
SOURCE(14753, 49)
{
word pd221;
pd221 = (* (( (ptr) (* (( (ptr) gf←c0531)+287)/* var←c55544 */ ))+27) );
(void) ( *( (fPt) ((* (ptr) pd221 ))))(c←v13376, (* (( (ptr) gf←c0531)+85) ), 0, pd221);
};
};
}
else {
lab←L100083: ;
};
};
SOURCE(14822, 135)
{
word var←c60728;
{
word pd222;
pd222 = (* (( (ptr) (* (( (ptr) gf←c0531)+287)/* var←c55544 */ ))+28) );
var←c60728 = (word) ( *( (fPt) ((* (ptr) pd222 ))))(c←v13376, (* (( (ptr) gf←c0531)+86) ), pd222);
};
if ((var←c60728 == 0)) {
goto lab←L100084;
};
if (((* (( (ptr) gf←c0531)+14) ) == XR←GetReferentType(var←c60728))) {
{
word i←v13532;
i←v13532 = var←c60728;
SOURCE(14899, 7)
rid←v13404 = i←v13532;
SOURCE(14908, 49)
{
word pd223;
pd223 = (* (( (ptr) (* (( (ptr) gf←c0531)+287)/* var←c55544 */ ))+27) );
(void) ( *( (fPt) ((* (ptr) pd223 ))))(c←v13376, (* (( (ptr) gf←c0531)+86) ), 0, pd223);
};
};
}
else {
lab←L100084: ;
};
};
SOURCE(14977, 284)
if ( ( (xmit←v13432 != 0) ? (xmit←v13432 != (* (ptr) (* (( (ptr) (* (( (ptr) gf←c0531)+290)/* var←c56024 */ ))+39) ) )) : 0 ) ) {
SOURCE(15022, 192)
if ( ( (rid←v13404 != 0) ? ((* (( (ptr) c←v13376)+4) ) == 0) : 0 ) ) {
SOURCE(15062, 152)
SOURCE(15064, 19)
{
word pd224;
pd224 = (* (( (ptr) (* (( (ptr) gf←c0531)+288)/* var←c55896 */ ))+17) );
(void) ( *( (fPt) ((* (ptr) pd224 ))))(c←v13376, 113, 0, 2, pd224);
};
SOURCE(15106, 15)
{
word pd225;
pd225 = (* (( (ptr) (* (( (ptr) gf←c0531)+288)/* var←c55896 */ ))+21) );
(void) ( *( (fPt) ((* (ptr) pd225 ))))(c←v13376, (* (ptr) rid←v13404 ), pd225);
};
SOURCE(15123, 73)
{
W3 var←c60760;
var←c60760.f0 = (* (( (ptr) c←v13376)+7) );
var←c60760.f1 = 0;
var←c60760.f2 = 8;
{
word pd226;
pd226 = (* (( (ptr) (* (( (ptr) gf←c0531)+290)/* var←c56024 */ ))+24) );
(void) ( *( (fPt) ((* (ptr) pd226 ))))(xmit←v13432, var←c60760, pd226);
};
};
SOURCE(15198, 14)
{
word pd227;
pd227 = (* (( (ptr) (* (( (ptr) gf←c0531)+290)/* var←c56024 */ ))+25) );
(void) ( *( (fPt) ((* (ptr) pd227 ))))(xmit←v13432, pd227);
};
};
SOURCE(15217, 25)
(* (( (ptr) c←v13376)+31) ) = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c0531)+290)/* var←c56024 */ ))+39) ) );
SOURCE(15244, 17)
(void) CloseStream←P1080(xmit←v13432);
};
SOURCE(15266, 19)
(void) CloseStream←P1080((* ((( (ptr) c←v13376)+32)) ));
};
return(0);
}
static void DetachedKilling←P1560(data←v8728)
word data←v8728;
{
register ptr gf←c62648 = (ptr) &globalframe;
word c←v13588;
word recv←v13616;
/* DetachedKilling: */
SOURCE(15309, 456)
SOURCE(15347, 28)
c←v13588 = XR←Narrow(data←v8728, (* (( (ptr) gf←c62648)+46) ));
SOURCE(15377, 24)
recv←v13616 = (* (( (ptr) c←v13588)+32) );
SOURCE(15403, 25)
(* (( (ptr) c←v13588)+32) ) = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c62648)+290)/* var←c56024 */ ))+40) ) );
SOURCE(15430, 151)
{
word var←c60792;
{
word pd228;
pd228 = (* (( (ptr) (* (( (ptr) gf←c62648)+287)/* var←c55544 */ ))+28) );
var←c60792 = (word) ( *( (fPt) ((* (ptr) pd228 ))))(c←v13588, (* (( (ptr) gf←c62648)+85) ), pd228);
};
if ((var←c60792 == 0)) {
goto lab←L100086;
};
if (((* (( (ptr) gf←c62648)+36) ) == XR←GetReferentType(var←c60792))) {
{
word xmit←v13660;
xmit←v13660 = var←c60792;
SOURCE(15513, 49)
{
word pd229;
pd229 = (* (( (ptr) (* (( (ptr) gf←c62648)+287)/* var←c55544 */ ))+27) );
(void) ( *( (fPt) ((* (ptr) pd229 ))))(c←v13588, (* (( (ptr) gf←c62648)+85) ), 0, pd229);
};
SOURCE(15564, 17)
(void) CloseStream←P1080(xmit←v13660);
};
}
else {
lab←L100086: ;
};
};
SOURCE(15601, 32)
{
word pd230;
pd230 = (* (( (ptr) (* (( (ptr) gf←c62648)+297)/* var←c59640 */ ))+8) );
(void) ( *( (fPt) ((* (ptr) pd230 ))))(c←v13588, pd230);
};
SOURCE(15635, 36)
{
word pd231;
pd231 = (* (( (ptr) (* (( (ptr) gf←c62648)+297)/* var←c59640 */ ))+10) );
(void) ( *( (fPt) ((* (ptr) pd231 ))))(c←v13588, 0, pd231);
};
SOURCE(15673, 30)
{
word pd232;
pd232 = (* (( (ptr) (* (( (ptr) gf←c62648)+298)/* var←c60280 */ ))+5) );
(void) ( *( (fPt) ((* (ptr) pd232 ))))(c←v13588, pd232);
};
SOURCE(15705, 60)
if ( ( (recv←v13616 != 0) ? (recv←v13616 != (* (ptr) (* (( (ptr) (* (( (ptr) gf←c62648)+290)/* var←c56024 */ ))+40) ) )) : 0 ) ) {
SOURCE(15748, 17)
(void) CloseStream←P1080(recv←v13616);
};
}
static void ConnectionPeriodical←P1620(data←v8800)
word data←v8800;
{
register ptr gf←c62680 = (ptr) &globalframe;
word c←v13704;
/* ConnectionPeriodical: */
SOURCE(15771, 548)
SOURCE(15814, 28)
c←v13704 = XR←Narrow(data←v8800, (* (( (ptr) gf←c62680)+46) ));
SOURCE(15844, 169)
if (((c←v13704 == 0) || (0 == (* (( (ptr) c←v13704)+15) ))) || ((* (( (ptr) c←v13704)+14) ) != 0)) {
SOURCE(15887, 15)
(* (( (ptr) c←v13704)+15) ) = 0;
SOURCE(15904, 40)
{
word pd233;
pd233 = (* (( (ptr) (* (( (ptr) gf←c62680)+302)/* var←c60600 */ ))+7) );
(void) ( *( (fPt) ((* (ptr) pd233 ))))((word) (( (bPt) gf←c62680)+664)/* var←c54456 */ , data←v8800, 0, pd233);
};
SOURCE(15946, 44)
{
word pd234;
pd234 = (* (( (ptr) (* (( (ptr) gf←c62680)+302)/* var←c60600 */ ))+5) );
(void) ( *( (fPt) ((* (ptr) pd234 ))))(200, (word) (( (bPt) gf←c62680)+672)/* var←c54488 */ , c←v13704, 2, pd234);
};
SOURCE(16006, 7)
return;
};
SOURCE(16016, 223)
{
word var←c60824;
{
word pd235;
pd235 = (* (( (ptr) (* (( (ptr) gf←c62680)+287)/* var←c55544 */ ))+28) );
var←c60824 = (word) ( *( (fPt) ((* (ptr) pd235 ))))(c←v13704, (* (( (ptr) gf←c62680)+5)/* replyModulusKey←v3756 */ ), pd235)
;
};
if ((var←c60824 == 0)) {
goto lab←L100087;
};
if (((* (( (ptr) gf←c62680)+14) ) == XR←GetReferentType(var←c60824))) {
{
word ri←v13748;
ri←v13748 = var←c60824;
SOURCE(16091, 148)
if ( ( ((* (ptr) ri←v13748 ) != (word) -1) ? (( (((unsigned)((* (( (ptr) c←v13704)+13) ) - (* (ptr) ri←v13748 )) << 16) >> 16) ) > 4000) : 0 ) ) {
SOURCE(16184, 18)
(* (ptr) ri←v13748 ) = (word) -1;
SOURCE(16204, 35)
{
word pd236;
pd236 = (* (( (ptr) (* (( (ptr) gf←c62680)+302)/* var←c60600 */ ))+4) );
(void) ( *( (fPt) ((* (ptr) pd236 ))))((word) (( (bPt) gf←c62680)+656)/* var←c54424 */ , c←v13704, 2, pd236);
};
};
};
}
else {
lab←L100087: ;
};
};
SOURCE(16262, 57)
if ((0 != (* (( (ptr) c←v13704)+35) )) || ((* (( (ptr) c←v13704)+5) ) != 0)) {
SOURCE(16301, 18)
{
word pd237;
pd237 = (* (( (ptr) (* (( (ptr) gf←c62680)+287)/* var←c55544 */ ))+43) );
(void) ( *( (fPt) ((* (ptr) pd237 ))))(c←v13704, 0, pd237);
};
};
}
static void EnsureReplyModulus←P1680(data←v8872)
word data←v8872;
{
register ptr gf←c62712 = (ptr) &globalframe;
word c←v13804;
/* EnsureReplyModulus: */
SOURCE(16325, 199)
SOURCE(16366, 28)
c←v13804 = XR←Narrow(data←v8872, (* (( (ptr) gf←c62712)+46) ));
SOURCE(16396, 128)
{
word var←c60856;
{
word pd238;
pd238 = (* (( (ptr) (* (( (ptr) gf←c62712)+287)/* var←c55544 */ ))+28) );
var←c60856 = (word) ( *( (fPt) ((* (ptr) pd238 ))))(c←v13804, (* (( (ptr) gf←c62712)+5)/* replyModulusKey←v3756 */ ), pd238)
;
};
if ((var←c60856 == 0)) {
goto lab←L100088;
};
if (((* (( (ptr) gf←c62712)+14) ) == XR←GetReferentType(var←c60856))) {
{
word ri←v13848;
ri←v13848 = var←c60856;
SOURCE(16471, 29)
{
word pd239;
pd239 = (* (( (ptr) (* (( (ptr) gf←c62712)+287)/* var←c55544 */ ))+44) );
(void) ( *( (fPt) ((* (ptr) pd239 ))))(c←v13804, (* (( (ptr) gf←c62712)+9)/* ignoreErrors←v5100 */ ), pd239);
};
SOURCE(16502, 22)
(* (ptr) ri←v13848 ) = (* (( (ptr) c←v13804)+13) );
};
}
else {
lab←L100088: ;
};
};
}
static void CheckReply←P1740(r←v8944)
word r←v8944;
{
/* CheckReply: */
SOURCE(16548, 93)
SOURCE(16587, 40)
if ((r←v8944 == 0)) { goto then0240;};
if (( (unsigned) (* (bPt) r←v8944 ) != 1)) {
then0240: ;
SOURCE(16615, 12)
(void) NotAReply←P1800(r←v8944);
};
SOURCE(16630, 11)
(* (( (ptr) r←v8944)+10) ) = 1;
}
static void NotAReply←P1800(r←v9004)
word r←v9004;
{
register ptr gf←c62744 = (ptr) &globalframe;
word ev←v13904;
/* NotAReply: */
SOURCE(16645, 172)
SOURCE(16676, 70)
{
word pd241;
pd241 = (* (( (ptr) (* (( (ptr) gf←c62744)+299)/* var←c60312 */ ))+9) );
ev←v13904 = (word) ( *( (fPt) ((* (ptr) pd241 ))))(r←v9004, 0, 0, pd241);
};
SOURCE(16748, 25)
(* (( (ptr) ev←v13904)+7) ) = 1;
SOURCE(16775, 42)
{
word pd242;
pd242 = (* (( (ptr) (* (( (ptr) gf←c62744)+299)/* var←c60312 */ ))+10) );
(void) ( *( (fPt) ((* (ptr) pd242 ))))(ev←v13904, pd242);
};
}
static word EventRope←P1860(event←v9064)
word event←v9064;
{
register ptr gf←c62776 = (ptr) &globalframe;
word r←v9108;
/* EventRope: */
SOURCE(16823, 207)
SOURCE(16823, 207)
r←v9108 = 0;
SOURCE(16888, 38)
if ((event←v9064 == 0)) {
SOURCE(16906, 20)
return((* (( (ptr) gf←c62776)+90) ));
};
SOURCE(16928, 29)
r←v9108 = (word) EventCodeRope←P1920((* ((( (ptr) event←v9064)+4)) ));
SOURCE(16959, 71)
{
W2 var←c60888;
{
W2 var←c60920;
word v←v53280;
v←v53280 = (* (ptr) event←v9064 );
var←c60920.f0 = 5;
var←c60920.f1 = v←v53280;
var←c60888 = var←c60920;
};
{
W2 var←c60984;
W2 var←c0559;
var←c60984.f0 = 11;
var←c60984.f1 = r←v9108;
(* (ptr) (word) &var←c0559 ) = 0;
(* (( (ptr) (word) &var←c0559) + 1) ) = 0;
{
word pd243;
pd243 = (* (( (ptr) (* (( (ptr) gf←c62776)+290)/* var←c56024 */ ))+62) );
r←v9108 = (word) ( *( (fPt) ((* (ptr) pd243 ))))((* (( (ptr) gf←c62776)+91) ), var←c60984, var←c60888, var←c0559, pd243)
;
};
};
};
SOURCE(16823, 207)
return(r←v9108);
}
static word EventCodeRope←P1920(code←v9168)
word code←v9168;
{
register ptr gf←c62808 = (ptr) &globalframe;
word r←v9212;
/* EventCodeRope: */
SOURCE(17036, 1435)
SOURCE(17036, 1435)
r←v9212 = 0;
SOURCE(17108, 1363)
{
word var←c61048;
var←c61048 = code←v9168;
switch (var←c61048) {
case 0:
SOURCE(17134, 11)
r←v9212 = (* (( (ptr) gf←c62808)+92) );
break;
case 35:
SOURCE(17160, 15)
r←v9212 = (* (( (ptr) gf←c62808)+93) );
break;
case 1:
SOURCE(17192, 17)
r←v9212 = (* (( (ptr) gf←c62808)+94) );
break;
case 2:
SOURCE(17223, 14)
r←v9212 = (* (( (ptr) gf←c62808)+95) );
break;
case 3:
SOURCE(17253, 16)
r←v9212 = (* (( (ptr) gf←c62808)+96) );
break;
case 4:
SOURCE(17286, 17)
r←v9212 = (* (( (ptr) gf←c62808)+97) );
break;
case 5:
SOURCE(17322, 19)
r←v9212 = (* (( (ptr) gf←c62808)+98) );
break;
case 6:
SOURCE(17359, 18)
r←v9212 = (* (( (ptr) gf←c62808)+99) );
break;
case 7:
SOURCE(17394, 17)
r←v9212 = (* (( (ptr) gf←c62808)+100) );
break;
case 8:
SOURCE(17428, 17)
r←v9212 = (* (( (ptr) gf←c62808)+101) );
break;
case 9:
SOURCE(17458, 13)
r←v9212 = (* (( (ptr) gf←c62808)+102) );
break;
case 10:
SOURCE(17485, 14)
r←v9212 = (* (( (ptr) gf←c62808)+103) );
break;
case 11:
SOURCE(17517, 18)
r←v9212 = (* (( (ptr) gf←c62808)+104) );
break;
case 12:
SOURCE(17547, 12)
r←v9212 = (* (( (ptr) gf←c62808)+105) );
break;
case 13:
SOURCE(17581, 22)
r←v9212 = (* (( (ptr) gf←c62808)+106) );
break;
case 14:
SOURCE(17619, 16)
r←v9212 = (* (( (ptr) gf←c62808)+107) );
break;
case 15:
SOURCE(17657, 22)
r←v9212 = (* (( (ptr) gf←c62808)+108) );
break;
case 16:
SOURCE(17697, 18)
r←v9212 = (* (( (ptr) gf←c62808)+109) );
break;
case 17:
SOURCE(17734, 19)
r←v9212 = (* (( (ptr) gf←c62808)+110) );
break;
case 18:
SOURCE(17770, 17)
r←v9212 = (* (( (ptr) gf←c62808)+111) );
break;
case 19:
SOURCE(17802, 15)
r←v9212 = (* (( (ptr) gf←c62808)+112) );
break;
case 20:
SOURCE(17833, 16)
r←v9212 = (* (( (ptr) gf←c62808)+113) );
break;
case 21:
SOURCE(17869, 20)
r←v9212 = (* (( (ptr) gf←c62808)+114) );
break;
case 22:
SOURCE(17910, 21)
r←v9212 = (* (( (ptr) gf←c62808)+115) );
break;
case 23:
SOURCE(17953, 22)
r←v9212 = (* (( (ptr) gf←c62808)+116) );
break;
case 24:
SOURCE(17994, 19)
r←v9212 = (* (( (ptr) gf←c62808)+117) );
break;
case 25:
SOURCE(18032, 19)
r←v9212 = (* (( (ptr) gf←c62808)+118) );
break;
case 26:
SOURCE(18072, 21)
r←v9212 = (* (( (ptr) gf←c62808)+119) );
break;
case 27:
SOURCE(18115, 22)
r←v9212 = (* (( (ptr) gf←c62808)+120) );
break;
case 28:
SOURCE(18157, 20)
r←v9212 = (* (( (ptr) gf←c62808)+121) );
break;
case 29:
SOURCE(18197, 20)
r←v9212 = (* (( (ptr) gf←c62808)+122) );
break;
case 30:
SOURCE(18239, 22)
r←v9212 = (* (( (ptr) gf←c62808)+123) );
break;
case 31:
SOURCE(18282, 21)
r←v9212 = (* (( (ptr) gf←c62808)+124) );
break;
case 32:
SOURCE(18323, 20)
r←v9212 = (* (( (ptr) gf←c62808)+125) );
break;
case 33:
SOURCE(18362, 19)
r←v9212 = (* (( (ptr) gf←c62808)+126) );
break;
case 34:
SOURCE(18400, 19)
r←v9212 = (* (( (ptr) gf←c62808)+127) );
break;
case 37:
SOURCE(18433, 14)
r←v9212 = (* (( (ptr) gf←c62808)+128) );
break;
default:
SOURCE(18460, 11)
r←v9212 = (* (( (ptr) gf←c62808)+129) );
break;
};
};
SOURCE(17036, 1435)
return(r←v9212);
}
static word FirstRoot←P1980(c←v9272)
word c←v9272;
{
word w←v9316;
/* FirstRoot: */
SOURCE(18477, 95)
SOURCE(18540, 32)
{
word var←c0560;
word var←c61080;
{
word limit244;
var←c61080 = (* (( (ptr) (* (( (ptr) c←v9272)+16) ))+17) );
var←c0560 = (* (ptr) (* ((( (ptr) var←c61080)+1)+(
limit244 = (* (ptr) var←c61080 ),
BCK(0, limit244)
)) ) );
};
return(var←c0560);
};
}
static word DefaultRoot←P2040(c←v9376)
word c←v9376;
{
word w←v9420;
/* DefaultRoot: */
SOURCE(18576, 99)
SOURCE(18641, 34)
{
word var←c0561;
word var←c61112;
{
word idx245;
word limit246;
var←c61112 = (* (( (ptr) (* (( (ptr) c←v9376)+16) ))+17) );
var←c0561 = (* (ptr) (* ((( (ptr) var←c61112)+1)+(
idx245 = (* (( (ptr) c←v9376)+20) ),
limit246 = (* (ptr) var←c61112 ),
BCK(idx245, limit246)
)) ) );
};
return(var←c0561);
};
}
static word LegalEvents←P2100(e←v9480)
word e←v9480;
{
word var←c9524;
/* LegalEvents: */
SOURCE(18679, 124)
SOURCE(18745, 58)
return((word) XRM←BITAND(e←v9480, 33554431));
}
static word PointerEvents←P2160(e←v9584)
word e←v9584;
{
word var←c9628;
/* PointerEvents: */
SOURCE(18807, 124)
SOURCE(18875, 56)
return((word) XRM←BITAND(e←v9584, 32764));
}
static word DeviceEvents←P2220(e←v9688)
word e←v9688;
{
word var←c9732;
/* DeviceEvents: */
SOURCE(18935, 123)
SOURCE(19002, 56)
return((word) XRM←BITAND(e←v9688, 12367));
}
static void MergeAttributes←P2280(formal←c0404, formal←c0402)
word formal←c0404;
word formal←c0402;
{
W15 x←v9864;
/* MergeAttributes: */
SOURCE(19062, 1160)
SOURCE(19062, 1160)
(* (ptr) &x←v9864 ) = (word) -1;
(* (( (ptr) &x←v9864)+1) ) = (word) -1;
(* (( (ptr) &x←v9864)+2) ) = (word) -1;
(* (( (ptr) &x←v9864)+3) ) = (word) -1;
(* (( (ptr) &x←v9864)+4) ) = 11;
(* (( (ptr) &x←v9864)+5) ) = 11;
(* (( (ptr) &x←v9864)+6) ) = 3;
(* (( (ptr) &x←v9864)+7) ) = (word) -1;
(* (( (ptr) &x←v9864)+8) ) = (word) -1;
(* (( (ptr) &x←v9864)+9) ) = 2;
(* (( (ptr) &x←v9864)+10) ) = 2;
(* (( (ptr) &x←v9864)+11) ) = 0;
(* (( (ptr) &x←v9864)+12) ) = 0;
(* (( (ptr) &x←v9864)+13) ) = (word) -1;
(* (( (ptr) &x←v9864)+14) ) = (word) -1;
SOURCE(19144, 9)
x←v9864 = (* (W15Pt) (( (ptr) formal←c0402)+15)/* loose←v9820 */ );
SOURCE(19155, 84)
if (((* (ptr) formal←c0402 ) != (word) -1)) {
SOURCE(19198, 41)
(* (ptr) &x←v9864 ) = (* (ptr) formal←c0402 );
};
SOURCE(19241, 80)
if (((* (( (ptr) formal←c0402)+1) ) != (word) -1)) {
SOURCE(19282, 39)
(* (( (ptr) &x←v9864)+1) ) = (* (( (ptr) formal←c0402)+1) );
};
SOURCE(19323, 72)
if (((* (( (ptr) formal←c0402)+2) ) != (word) -1)) {
SOURCE(19362, 33)
(* (( (ptr) &x←v9864)+2) ) = (* (( (ptr) formal←c0402)+2) );
};
SOURCE(19397, 68)
if (((* (( (ptr) formal←c0402)+3) ) != (word) -1)) {
SOURCE(19434, 31)
(* (( (ptr) &x←v9864)+3) ) = (* (( (ptr) formal←c0402)+3) );
};
SOURCE(19467, 60)
if (((* (( (ptr) formal←c0402)+4) ) != 11)) {
SOURCE(19498, 29)
(* (( (ptr) &x←v9864)+4) ) = (* (( (ptr) formal←c0402)+4) );
};
SOURCE(19529, 60)
if (((* (( (ptr) formal←c0402)+5) ) != 11)) {
SOURCE(19560, 29)
(* (( (ptr) &x←v9864)+5) ) = (* (( (ptr) formal←c0402)+5) );
};
SOURCE(19591, 66)
if (((* (( (ptr) formal←c0402)+6) ) != 3)) {
SOURCE(19624, 33)
(* (( (ptr) &x←v9864)+6) ) = (* (( (ptr) formal←c0402)+6) );
};
SOURCE(19659, 84)
if (((* (( (ptr) formal←c0402)+7) ) != (word) -1)) {
SOURCE(19708, 35)
(* (( (ptr) &x←v9864)+7) ) = (* (( (ptr) formal←c0402)+7) );
};
SOURCE(19745, 71)
if (((* (( (ptr) formal←c0402)+8) ) != (word) -1)) {
SOURCE(19783, 33)
(* (( (ptr) &x←v9864)+8) ) = (* (( (ptr) formal←c0402)+8) );
};
SOURCE(19818, 78)
if (((* (( (ptr) formal←c0402)+9) ) != 2)) {
SOURCE(19855, 41)
(* (( (ptr) &x←v9864)+9) ) = (* (( (ptr) formal←c0402)+9) );
};
SOURCE(19898, 57)
if (((* (( (ptr) formal←c0402)+10) ) != 2)) {
SOURCE(19928, 27)
(* (( (ptr) &x←v9864)+10) ) = (* (( (ptr) formal←c0402)+10) );
};
SOURCE(19957, 58)
(* (( (ptr) &x←v9864)+11) ) = (word) XRM←BITOR((* (( (ptr) &x←v9864)+11) ), (* (( (ptr) formal←c0402)+11) ));
SOURCE(20017, 85)
(* (( (ptr) &x←v9864)+12) ) = (word) XRM←BITOR((* (( (ptr) &x←v9864)+12) ), (* (( (ptr) formal←c0402)+12) ));
SOURCE(20104, 62)
if (((* (( (ptr) formal←c0402)+13) ) != (word) -1)) {
SOURCE(20141, 25)
(* (( (ptr) &x←v9864)+13) ) = (* (( (ptr) formal←c0402)+13) );
};
SOURCE(20168, 54)
if (((* (( (ptr) formal←c0402)+14) ) != (word) -1)) {
SOURCE(20201, 21)
(* (( (ptr) &x←v9864)+14) ) = (* (( (ptr) formal←c0402)+14) );
};
/* removed tail goto */
(* (W15Pt) formal←c0404 ) = x←v9864;
return;
}
static word FullCreateEventFilter←P2340(eventCodes←v9924, activate←v9952, extensions←v9980)
word eventCodes←v9924;
W2 activate←v9952;
word extensions←v9980;
{
register ptr gf←c62840 = (ptr) &globalframe;
word filter←v10204;
/* FullCreateEventFilter: */
SOURCE(20228, 363)
SOURCE(20228, 363)
filter←v10204 = 0;
SOURCE(20405, 83)
{
word var←c61240;
var←c61240 = XR←NewObject(12, (* (( (ptr) gf←c62840)+34) ));
(* (W2Pt) var←c61240 ) = activate←v9952;
(* (( (ptr) var←c61240)+2) ) = extensions←v9980;
filter←v10204 = var←c61240;
};
SOURCE(20490, 101)
{
register word l←v13960;
l←v13960 = eventCodes←v9924;
lab←L100094: ;
if ((l←v13960 != 0)) {
}
else {
goto lab←L100091;
};
SOURCE(20551, 40)
{
word xs247;
xs247 = (* (ptr) l←v13960 );
(* (ptr) (( (ptr) filter←v10204) + ((word) xs247 >> 5)) ) |= ((unsigned) 1 << 32 - ((word) (xs247 & 037)+1));
};
l←v13960 = (* (( (ptr) l←v13960)+1) );
goto lab←L100094;
lab←L100091: ;
};
SOURCE(20228, 363)
return(filter←v10204);
}
static word CreateEventFilter←P2400(c1←v10264, c2←v10292, c3←v10320, c4←v10348)
word c1←v10264;
word c2←v10292;
word c3←v10320;
word c4←v10348;
{
register ptr gf←c62872 = (ptr) &globalframe;
word filter←v10392;
/* CreateEventFilter: */
SOURCE(20596, 281)
SOURCE(20596, 281)
filter←v10392 = 0;
SOURCE(20701, 28)
filter←v10392 = XR←NewObject(12, (* (( (ptr) gf←c62872)+34) ));
SOURCE(20731, 26)
(* (ptr) (( (ptr) filter←v10392) + ((word) c1←v10264 >> 5)) ) |= ((unsigned) 1 << 32 - ((word) (c1←v10264 & 037)+1));
SOURCE(20759, 26)
(* (ptr) (( (ptr) filter←v10392) + ((word) c2←v10292 >> 5)) ) |= ((unsigned) 1 << 32 - ((word) (c2←v10292 & 037)+1));
SOURCE(20787, 26)
(* (ptr) (( (ptr) filter←v10392) + ((word) c3←v10320 >> 5)) ) |= ((unsigned) 1 << 32 - ((word) (c3←v10320 & 037)+1));
SOURCE(20815, 26)
(* (ptr) (( (ptr) filter←v10392) + ((word) c4←v10348 >> 5)) ) |= ((unsigned) 1 << 32 - ((word) (c4←v10348 & 037)+1));
SOURCE(20843, 34)
(* (( (ptr) filter←v10392) + 1) ) &= 4026531839;
SOURCE(20596, 281)
return(filter←v10392);
}
static void SetEventCodes←P2460(formal←c0419, list←v10452)
word formal←c0419;
word list←v10452;
{
W2 ec←v10580;
/* SetEventCodes: */
SOURCE(20884, 177)
SOURCE(20884, 177)
ec←v10580.f0 = 0;
ec←v10580.f1 = 0;
SOURCE(20979, 82)
{
register word l←v14088;
l←v14088 = list←v10452;
lab←L100099: ;
if ((l←v14088 != 0)) {
}
else {
goto lab←L100096;
};
SOURCE(21034, 27)
{
word xs248;
xs248 = (* (ptr) l←v14088 );
(* (ptr) (( (ptr) &ec←v10580) + ((word) xs248 >> 5)) ) |= ((unsigned) 1 << 32 - ((word) (xs248 & 037)+1));
};
l←v14088 = (* (( (ptr) l←v14088)+1) );
goto lab←L100099;
lab←L100096: ;
};
/* removed tail goto */
(* (W2Pt) formal←c0419 ) = ec←v10580;
return;
}
static word QueryScreen←P2520(c←v10640, drawable←v10668)
word c←v10640;
word drawable←v10668;
{
register ptr gf←c62904 = (ptr) &globalframe;
word var←c10712;
/* QueryScreen: */
SOURCE(21065, 420)
SOURCE(21147, 338)
{
word var←c61304;
var←c61304 = (* (ptr) (* (( (ptr) (* (( (ptr) c←v10640)+16) ))+17) ) );
if ((var←c61304 == 1)) {
SOURCE(21179, 23)
{
word var←c61336;
var←c61336 = (* (( (ptr) (* (( (ptr) c←v10640)+16) ))+17) );
{
word limit249;
return((* ((( (ptr) var←c61336)+1)+(
limit249 = (* (ptr) var←c61336 ),
BCK(0, limit249)
)) ));
};
};
}
else {
SOURCE(21217, 55)
if ((drawable←v10668 == 0)) {
SOURCE(21247, 25)
{
word var←c61368;
var←c61368 = (* (( (ptr) (* (( (ptr) c←v10640)+16) ))+17) );
{
word idx250;
word limit251;
return((* ((( (ptr) var←c61368)+1)+(
idx250 = (* (( (ptr) c←v10640)+20) ),
limit251 = (* (ptr) var←c61368 ),
BCK(idx250, limit251)
)) ));
};
};
};
SOURCE(21274, 109)
{
register word i←v14216 = 0;
register word noName←c61400;
noName←c61400 = (* (ptr) (* (( (ptr) (* (( (ptr) c←v10640)+16) ))+17) ) );
if (( (int)i←v14216 >= (int)noName←c61400)) {
goto lab←L100100;
};
lab←L100103: ;
{
word s←v14260;
SOURCE(21311, 27)
{
word i←v53376;
i←v53376 = SGNCK(i←v14216);
{
word var←c61464;
var←c61464 = (* (( (ptr) (* (( (ptr) c←v10640)+16) ))+17) );
{
word limit252;
s←v14260 = (* ((( (ptr) var←c61464)+1)+(
/*1*/ limit252 = (* (ptr) var←c61464 ),
/*1*/ BCK(i←v53376, limit252)
/*1*/ )) );
};
};
};
SOURCE(21340, 43)
if (((* (ptr) s←v14260 ) == drawable←v10668)) {
SOURCE(21373, 10)
return(s←v14260);
};
};
i←v14216 = (i←v14216 + 1);
if (( (int)i←v14216 < (int)noName←c61400)) {
goto lab←L100103;
};
lab←L100100: ;
};
SOURCE(21394, 93)
{
W7 gr←v14304;
SOURCE(21400, 42)
{
word pd253;
pd253 = (* (( (ptr) (* (( (ptr) gf←c62904)+287)/* var←c55544 */ ))+87) );
(void) ( *( (fPt) ((* (ptr) pd253 ))))((word) &gr←v14304, c←v10640, drawable←v10668, pd253);
};
SOURCE(21444, 41)
return((word) QueryScreen←P2520(c←v10640, gr←v14304.f0));
};
};
};
}
static word QueryScreenDepth←P2580(c←v10772, drawable←v10800)
word c←v10772;
word drawable←v10800;
{
register ptr gf←c62936 = (ptr) &globalframe;
word depth←v10844;
W7 gr←v14348;
word s←v14376 = 0;
/* QueryScreenDepth: */
SOURCE(21499, 491)
SOURCE(21499, 491)
depth←v10844 = 0;
SOURCE(21598, 15)
XR←FillWords(&gr←v14348, 7, 0);
SOURCE(21626, 96)
if (((* (ptr) (* (( (ptr) (* (( (ptr) c←v10772)+16) ))+17) ) ) == 1)) {
SOURCE(21653, 18)
{
word var←c61560;
var←c61560 = (* (( (ptr) (* (( (ptr) c←v10772)+16) ))+17) );
{
word limit254;
s←v14376 = (* ((( (ptr) var←c61560)+1)+(
limit254 = (* (ptr) var←c61560 ),
BCK(0, limit254)
)) );
};
};
SOURCE(21673, 49)
if (((* (( (ptr) s←v14376)+15) ) == 1)) {
SOURCE(21693, 29)
return((* (ptr) (* (( (ptr) s←v14376)+19) ) ));
};
};
SOURCE(21727, 64)
if ((drawable←v10800 == 0)) {
SOURCE(21757, 34)
drawable←v10800 = (word) DefaultRoot←P2040(c←v10772);
};
SOURCE(21793, 29)
{
word pd255;
pd255 = (* (( (ptr) (* (( (ptr) gf←c62936)+287)/* var←c55544 */ ))+87) );
(void) ( *( (fPt) ((* (ptr) pd255 ))))((word) &gr←v14348, c←v10772, drawable←v10800, pd255);
};
SOURCE(21824, 36)
s←v14376 = (word) QueryScreen←P2520(c←v10772, gr←v14348.f0);
SOURCE(21862, 128)
{
register word ld←v14420;
ld←v14420 = (* (( (ptr) s←v14376)+19) );
lab←L100108: ;
if ((ld←v14420 != 0)) {
}
else {
goto lab←L100105;
};
SOURCE(21941, 49)
if (((* (( (ptr) (* (ptr) ld←v14420 ))+3) ) == gr←v14348.f1)) {
SOURCE(21973, 17)
return((* (ptr) ld←v14420 ));
};
ld←v14420 = (* (( (ptr) ld←v14420)+1) );
goto lab←L100108;
lab←L100105: ;
};
SOURCE(22001, 5)
(void) XR←RaiseUnnamedError();
}
static void IgnoreErrors←P2640(event←v19808, clientData←v19836, tq←v19864)
word event←v19808;
word clientData←v19836;
word tq←v19864;
{
register ptr gf←c62968 = (ptr) &globalframe;
/* IgnoreErrors: */
SOURCE(22304, 65)
SOURCE(22338, 31)
(* (( (ptr) gf←c62968)+10)/* debugErrCount←v5128 */ ) = ((* (( (ptr) gf←c62968)+10)/* debugErrCount←v5128 */ ) + 1);
}
static void NoName←Q7416(formal←c0450, formal←c200024, formal←c200025, formal←c200026, formal←c200027)
word formal←c0450;
word formal←c200024;
word formal←c200025;
word formal←c200026;
word formal←c200027;
{
register ptr gf←c0544 = (ptr) &globalframe;
if ((formal←c200025 == (* (( (ptr) (* (( (ptr) gf←c0544)+292)/* var←c59160 */ ))+22) ))) {
{
word signal←v45456;
word parameters←v45484;
signal←v45456 = (* (ptr) formal←c200027 );
parameters←v45484 = (* (( (ptr) formal←c200027)+1) );
SOURCE(14576, 9)
(* (ptr) formal←c0450 ) = 2;
(* (( (ptr) formal←c0450)+1) ) = 8;
return;
};
};
(* (ptr) formal←c0450 ) = 0;
(* (( (ptr) formal←c0450)+1) ) = 0;
return;
}
static void NoName←Q7476(formal←c0461, formal←c200020, formal←c200021, formal←c200022, formal←c200023)
word formal←c0461;
word formal←c200020;
word formal←c200021;
word formal←c200022;
word formal←c200023;
{
register ptr gf←c0545 = (ptr) &globalframe;
if ((formal←c200021 == (* (( (ptr) (* (( (ptr) gf←c0545)+290)/* var←c56024 */ ))+5) ))) {
{
word ec←v41456;
word stream←v41484;
word details←v41512;
word msg←v41540;
ec←v41456 = (* (ptr) formal←c200023 );
stream←v41484 = (* (( (ptr) formal←c200023)+1) );
details←v41512 = (* (( (ptr) formal←c200023)+2) );
msg←v41540 = (* (( (ptr) formal←c200023)+3) );
SOURCE(10816, 32)
{
word var←c60056;
var←c60056 = (word) ErrorFromStream←P1200(stream←v41484);
(void) Failure←P3468(var←c60056, 0, (word) (( (bPt) (* (ptr) formal←c200020 ))+48));
};
SOURCE(10850, 9)
(* (ptr) formal←c0461 ) = 2;
(* (( (ptr) formal←c0461)+1) ) = 7;
return;
};
}
else {
if ((formal←c200021 == (* (( (ptr) (* (( (ptr) gf←c0545)+290)/* var←c56024 */ ))+4) ))) {
{
word stream←v41692;
stream←v41692 = (* (ptr) formal←c200023 );
SOURCE(10881, 24)
(void) Failure←P3468((* (( (ptr) gf←c0545)+80) ), 0, (word) (( (bPt) (* (ptr) formal←c200020 ))+48));
SOURCE(10907, 9)
(* (ptr) formal←c0461 ) = 2;
(* (( (ptr) formal←c0461)+1) ) = 7;
return;
};
}
else {
if ((formal←c200021 == XR←Unwind)) {
SOURCE(10931, 15)
(void) CloseStream←P1080((* ((( (ptr) formal←c200020)+4)) ));
SOURCE(10949, 16)
(void) CloseStream←P1080((* ((( (ptr) formal←c200020)+5)) ));
};
};
};
(* (ptr) formal←c0461 ) = 0;
(* (( (ptr) formal←c0461)+1) ) = 0;
return;
}
static void NoName←Q7536(formal←c0470, formal←c200016, formal←c200017, formal←c200018, formal←c200019)
word formal←c0470;
word formal←c200016;
word formal←c200017;
word formal←c200018;
word formal←c200019;
{
register ptr gf←c0546 = (ptr) &globalframe;
if ((formal←c200017 == (* (( (ptr) (* (( (ptr) gf←c0546)+295)/* var←c59352 */ ))+4) ))) {
{
word which←v40520;
word codes←v40548;
word msg←v40576;
which←v40520 = (* (ptr) formal←c200019 );
codes←v40548 = (* (( (ptr) formal←c200019)+1) );
msg←v40576 = (* (( (ptr) formal←c200019)+2) );
SOURCE(14022, 33)
{
word var←c59960;
var←c59960 = (word) ErrorDetails←P1260(codes←v40548);
(void) Failure←P3468(msg←v40576, var←c59960, (word) (( (bPt) formal←c200016)+48));
};
SOURCE(14057, 15)
(* (( (ptr) formal←c200016)+14) ) = 0;
SOURCE(14074, 8)
(* (ptr) formal←c0470 ) = 2;
(* (( (ptr) formal←c0470)+1) ) = 6;
return;
};
};
(* (ptr) formal←c0470 ) = 0;
(* (( (ptr) formal←c0470)+1) ) = 0;
return;
}
static void NoName←Q7596(formal←c0477, formal←c200012, formal←c200013, formal←c200014, formal←c200015)
word formal←c0477;
word formal←c200012;
word formal←c200013;
word formal←c200014;
word formal←c200015;
{
register ptr gf←c0547 = (ptr) &globalframe;
if ((formal←c200013 == (* (( (ptr) (* (( (ptr) gf←c0547)+294)/* var←c59288 */ ))+7) ))) {
{
word reason←v35696;
word index←v35724;
reason←v35696 = (* (ptr) formal←c200015 );
index←v35724 = (* (( (ptr) formal←c200015)+1) );
SOURCE(8688, 10)
(* (ptr) formal←c0477 ) = 2;
(* (( (ptr) formal←c0477)+1) ) = 5;
return;
};
};
(* (ptr) formal←c0477 ) = 0;
(* (( (ptr) formal←c0477)+1) ) = 0;
return;
}
static void NoName←Q7656(formal←c0484, formal←c200008, formal←c200009, formal←c200010, formal←c200011)
word formal←c0484;
word formal←c200008;
word formal←c200009;
word formal←c200010;
word formal←c200011;
{
register ptr gf←c0548 = (ptr) &globalframe;
if ((formal←c200009 == (* (( (ptr) (* (( (ptr) gf←c0548)+294)/* var←c59288 */ ))+7) ))) {
{
word reason←v35608;
word index←v35636;
reason←v35608 = (* (ptr) formal←c200011 );
index←v35636 = (* (( (ptr) formal←c200011)+1) );
SOURCE(8510, 29)
(* (( (ptr) formal←c200008)+9) ) = (* (( (ptr) gf←c0548)+68) );
SOURCE(8541, 8)
(* (ptr) formal←c0484 ) = 2;
(* (( (ptr) formal←c0484)+1) ) = 4;
return;
};
};
(* (ptr) formal←c0484 ) = 0;
(* (( (ptr) formal←c0484)+1) ) = 0;
return;
}
static void NoName←Q7716(formal←c0490, formal←c200004, formal←c200005, formal←c200006, formal←c200007)
word formal←c0490;
word formal←c200004;
word formal←c200005;
word formal←c200006;
word formal←c200007;
{
register ptr gf←c0549 = (ptr) &globalframe;
if ((formal←c200005 == (* (( (ptr) (* (( (ptr) gf←c0549)+293)/* var←c59224 */ ))+7) ))) {
{
word msg←v34804;
msg←v34804 = (* (ptr) formal←c200007 );
SOURCE(8033, 14)
(* (( (ptr) formal←c200004)+9) ) = msg←v34804;
SOURCE(8049, 9)
(* (ptr) formal←c0490 ) = 2;
(* (( (ptr) formal←c0490)+1) ) = 3;
return;
};
};
(* (ptr) formal←c0490 ) = 0;
(* (( (ptr) formal←c0490)+1) ) = 0;
return;
}
static void NoName←Q7776(formal←c0497, formal←c200000, formal←c200001, formal←c200002, formal←c200003)
word formal←c0497;
word formal←c200000;
word formal←c200001;
word formal←c200002;
word formal←c200003;
{
register ptr gf←c0550 = (ptr) &globalframe;
if ((formal←c200001 == (* (( (ptr) (* (( (ptr) gf←c0550)+292)/* var←c59160 */ ))+22) ))) {
{
word signal←v33936;
word parameters←v33964;
signal←v33936 = (* (ptr) formal←c200003 );
parameters←v33964 = (* (( (ptr) formal←c200003)+1) );
SOURCE(7544, 9)
(* (ptr) formal←c0497 ) = 2;
(* (( (ptr) formal←c0497)+1) ) = 2;
return;
};
};
(* (ptr) formal←c0497 ) = 0;
(* (( (ptr) formal←c0497)+1) ) = 0;
return;
}
/* file: XlImplSetup, module: XlImplSetup, compiled at: October 27, 1993 3:02:46 pm PDT */
extern void XR←install←XlImplSetup() {
NoName←Q6936();
}
extern void XR←run←XlImplSetup() { XR←Start(&globalframe); }