/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1993 by Xerox Corporation.  All rights reserved. */
/* time: September 14, 1993 4:28:29 pm PDT */
/* C2C version: April 20, 1993 (sun4) */
/* ref-counting: off */
/* file: XlImplRequests, module: XlImplRequests */ 
/* switches: bcfhklnouw */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob←version [1863366048,3177382900] XlImplRequests";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef word (*fPt)();
typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8;
typedef struct {word f0, f1, f2, f3, f4, f5, f6;} W7;
typedef struct {W8 f; W7 r;} W15;
typedef struct {word f0, f1;} W2;
typedef W15 *W15Pt;
typedef struct {word f0, f1, f2, f3, f4;} W5;
typedef struct {W8 f; W8 r;} W16;
typedef struct {W16 f; W2 r;} W18;
typedef W2 *W2Pt;
typedef struct {word f0, f1, f2, f3, f4, f5;} W6;
typedef struct {W8 f; W6 r;} W14;
typedef struct {word f0, f1, f2;} W3;
typedef struct {W8 f; W3 r;} W11;
typedef struct {W8 f; word r;} W9;
typedef W3 *W3Pt;
typedef struct {W8 f; W2 r;} W10;
typedef struct {W8 f; W5 r;} W13;
typedef W7 *W7Pt;
typedef struct {word f0, f1, f2, f3;} W4;
typedef struct {W8 f; W4 r;} W12;
typedef W8 *W8Pt;
typedef W4 *W4Pt;
typedef struct {W16 f; word r;} W17;
typedef W5 *W5Pt;
#define SOURCE(p, l) /* source p, l */
#define BCK(idx, lim) ( ((unsigned) idx) >= ((unsigned) lim) ? (XR←RaiseBoundsFault()) : (idx) )
#define SGNCK(i) ((int) (word) (i) < 0 ? XR←RaiseArithmeticFault(): i )
#define IOP2(op, x, y)  ( (word) ((x) op (y)) )
static void NoName←Q11460();
static void XlImplRequests←P0();
static void GetWindowAttributes←P60();
static void action←P4140();
static void ChangeWindowAttributes←P120();
static void action←P4200();
static void ConfigureWindow←P180();
static void action←P4308();
static word NewWindow←P240();
static word CreateWindow←P300();
static void action←P4596();
static void BPutSetOfEvent←P360();
static void BPutAttributes←P420();
static void MakeMask←P480();
static word CreatePixmap←P540();
static word NewPixmap←P4704();
static void action←P4764();
static void FreePixmap←P600();
static word CreateColorMap←P660();
static void action←P4824();
static void FreeColorMap←P720();
static void action←P4884();
static word CopyColorMapAndFree←P780();
static void action←P4944();
static void InstallColorMap←P840();
static void action←P5004();
static void UnInstallColorMap←P900();
static void action←P5064();
static word ListInstalledColorMaps←P960();
static void action←P5124();
static void AllocColor←P1020();
static void action←P5232();
static void AllocNamedColor←P1080();
static void action←P5292();
static void AllocColorCells←P1140();
static void action←P5352();
static void AllocColorPlanes←P1200();
static void action←P5508();
static void FreeColors←P1260();
static void action←P5616();
static void StoreColors←P1320();
static void action←P5772();
static void StoreNamedColor←P1380();
static void action←P5976();
static word QueryColors←P1440();
static void action←P6036();
static void LookupColor←P1500();
static void action←P6288();
static void BPutRGB←P1560();
static void BPutRGBRec←P1620();
static word NewCursor←P1680();
static word CreateCursor←P1740();
static void action←P6348();
static word CreateGlyphCursor←P1800();
static void action←P6408();
static void ReColorCursor←P1860();
static void action←P6468();
static void FreeCursor←P1920();
static void action←P6528();
static void BPutPointerEvents←P1980();
static void StartTimer←P2040();
static void TimerProcess←P2100();
static word NoName←Q11520();
static word GrabPointer←P2160();
static void action←P6588();
static void InternalUngrabPointer←P2220();
static void UngrabPointer←P2280();
static void action←P6696();
static void ChangeActivePointerGrab←P2340();
static void action←P6756();
static void GrabButton←P2400();
static void action←P6816();
static void UngrabButton←P2460();
static void action←P6876();
static void KeyboardUnWedgeProc←P2520();
static void InstallKeyboardUnWedger←P2580();
static word GrabKeyboard←P2640();
static void action←P7080();
static void UngrabKeyboard←P2700();
static void action←P7140();
static void ForcedUngrabKeyboard←P2760();
static void GrabKey←P2820();
static void action←P7200();
static void UngrabKey←P2880();
static void action←P7260();
static void AllowEvents←P2940();
static void action←P7320();
static void AddDispatch←P3000();
static void AddDispatchJunk←P3060();
static void ClearArea←P3120();
static void action←P7380();
static word InternalSomeImportantDown←P3180();
static word InternalQueryPointer←P3240();
static void QueryPointer←P3300();
static void action←P7440();
static void WarpPointer←P3360();
static void action←P7500();
static word GetMotionEvents←P3420();
static void action←P7560();
static void QueryBestSize←P3480();
static void action←P7668();
static void TranslateCoordinates←P3540();
static void action←P7728();
static void InternalUngrabServer←P3600();
static void UngrabServer←P3660();
static void action←P7788();
static void GrabServer←P3720();
static void action←P7848();
static void GetGeometry←P3780();
static void action←P7908();
static word QueryTree←P3840();
static void action←P7968();
static void CirculateWindow←P3900();
static void action←P8076();
static void ReparentWindow←P3960();
static void action←P8136();
static void SendClientMessage32←P4020();
static void action←P8196();
static void SendEvent←P4080();
static void action←P8304();
static void NoName←Q11580();
static word NoName←Q11640();
static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\121\154\000\000"};
static struct {unsigned f; char r[16];} string2 = {851984, "\257\300\157\020\265\240\300\275\143\003\364\103\024\000\000"};
static struct {unsigned f; char r[4];} string3 = {65537, "\001\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 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"};
static struct {unsigned f; char r[16];} string7 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\111\150\000\000"};
static struct {unsigned f; char r[4];} string8 = {65540, "\242\000\000"};
static struct {unsigned f; char r[16];} string9 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\121\344\000\000"};
static struct {unsigned f; char r[16];} string10 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\106\104\000\000"};
static struct {unsigned f; char r[20];} string11 = {1179668, "\260\006\005\146\151\162\163\164\241\005\004\162\145\163\164\214\241\261\000"};
static struct {unsigned f; char r[4];} string12 = {131074, "\003\001\000"};
static struct {unsigned f; char r[44];} string13 = {2752556, "\260\006\005\146\151\162\163\164\257\300\351\276\264\273\300\115\104\320\264\122\200\005\004\162\145\163\164\214\257\300\351\276\264\273\300\115\104\320\264\122\200\261\000"};
static struct {unsigned f; char r[4];} string14 = {131074, "\003\007\000"};
static struct {unsigned f; char r[4];} string15 = {131076, "\216\251\000"};
static struct {unsigned f; char r[16];} string16 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\114\244\000\000"};
static struct {unsigned f; char r[44];} string17 = {2752556, "\260\006\005\146\151\162\163\164\257\300\351\276\264\273\300\115\104\320\264\121\154\005\004\162\145\163\164\214\257\300\351\276\264\273\300\115\104\320\264\121\154\261\000"};
static struct {unsigned f; char r[4];} string18 = {131074, "\003\003\000"};
static struct {unsigned f; char r[16];} string19 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\107\320\000\000"};
static struct {unsigned f; char r[4];} string20 = {131074, "\004\016\000"};
static struct {unsigned f; char r[20];} string21 = {1048596, "\211\004\003\107\115\124\300\212\174\364\337\300\361\376\000\156\000\000\000"};
static struct {unsigned f; char r[8];} string22 = {262152, "font\000\000\000"};
static struct {unsigned f; char r[16];} string23 = {851984, "mutableCursor\000\000"};
static struct {unsigned f; char r[20];} string24 = {1048596, "keyboardUnWedger\000\000\000"};
static struct {unsigned f; char r[16];} string25 = {983056, "GetMotionEvents"};
static struct {unsigned f; char r[8];} string26 = {458760, "toolong"};
static struct {unsigned f; char r[20];} string27 = {1048596, "GrabWhileGrabbed\000\000\000"};
static struct {unsigned f; char r[28];} string28 = {1572892, "←Cedar←KeyboardGrabCheck\000\000\000"};
static struct {unsigned f; char r[16];} string29 = {851984, "\257\300\157\020\265\240\300\275\143\003\364\100\200\000\000"};
static struct {unsigned f; char r[20];} string30 = {1114129, "\006\006\020\001\024\001\030\001\034\001\040\001\100\174\004\100\177\000\000"};
static struct {unsigned f; char r[16];} string31 = {851984, "\257\300\212\174\364\337\300\361\376\000\156\100\150\000\000"};
static struct {unsigned f; char r[16];} string32 = {851984, "\257\300\240\236\274\315\300\111\163\325\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string33 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\100\150\000\000"};
static unsigned string34 = 1483472896;
static struct {unsigned f; char r[16];} string35 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\100\164\000\000"};
static struct {unsigned f; char r[16];} string36 = {851984, "\257\300\122\362\040\033\300\221\350\241\274\100\150\000\000"};
static struct {unsigned f; char r[8];} string37 = {1483493490, "ivate"};
static struct {unsigned f; char r[16];} string38 = {851984, "\257\300\304\042\023\266\300\315\144\243\337\100\150\000\000"};
static struct {unsigned f; char r[16];} string39 = {851984, "\257\300\212\247\207\172\300\123\222\237\073\100\150\000\000"};
static struct {unsigned f; char r[16];} string40 = {851984, "\257\300\044\126\136\322\300\125\273\233\107\100\150\000\000"};
static struct {unsigned f; char r[16];} string41 = {851984, "\257\300\126\372\175\303\300\214\014\321\126\100\150\000\000"};
static struct {unsigned f; char r[32];} string42 = {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];} string43 = {851984, "\257\300\012\063\155\016\300\130\140\234\375\100\164\000\000"};
static struct {unsigned f; char r[40];} string44 = {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[16];} string45 = {851984, "\257\300\012\063\155\016\300\130\140\234\375\100\150\000\000"};
static struct {unsigned f; char r[24];} string46 = {1507352, "\211\013\012\107\162\141\142\142\145\162\122\145\143\300\012\063\155\016\300\130\140\234\375"};
static struct {
   word f0[38]; word f38; word f39; word f40; 
   word f41; word f42; word f43; word f44; 
   word f45; word f46; word f47; word f48; 
   word f49; word f50; word f51; word f52; 
   word f53; word f54; word f55; word f56; 
   word f57; word f58; word f59; word f60; 
   word f61; word f62; word f63; word f64; 
   word f65; word f66; word f67; word f68; 
   word f69; word f70; word f71; word f72; 
   word f73; word f74; word f75; word f76; 
   word f77; word f78; word f79; word f80; 
   word f81; word f82; word f83; word f84; 
   word f85; word f86; word f87; word f88; 
   word f89; word f90; word f91; word f92; 
   word f93; word f94; word f95; word f96; 
   word f97; word f98; word f99; word f100; 
   word f101; word f102; word f103; word f104; 
   word f105; word f106; word f107; word f108; 
   word f109; word f110; word f111; word f112; 
   word f113; word f114; word f115; word f116; 
   word f117; word f118; word f119; word f120; 
   word f121; word f122; word f123; word f124; 
   word f125; word f126; word f127; word f128; 
   word f129; word f130; word f131; 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[12]; 
   } globalframe = {
   {0}, (word) SendEvent←P4080, 0, (word) SendClientMessage32←P4020, 
   0, (word) ReparentWindow←P3960, 0, (word) CirculateWindow←P3900, 
   0, (word) QueryTree←P3840, 0, (word) GetGeometry←P3780, 
   0, (word) GrabServer←P3720, 0, (word) UngrabServer←P3660, 
   0, (word) InternalUngrabServer←P3600, 0, (word) TranslateCoordinates←P3540, 
   0, (word) QueryBestSize←P3480, 0, (word) GetMotionEvents←P3420, 
   0, (word) WarpPointer←P3360, 0, (word) QueryPointer←P3300, 
   0, (word) InternalQueryPointer←P3240, 0, (word) InternalSomeImportantDown←P3180, 
   0, (word) ClearArea←P3120, 0, (word) AddDispatchJunk←P3060, 
   0, (word) AddDispatch←P3000, 0, (word) AllowEvents←P2940, 
   0, (word) UngrabKey←P2880, 0, (word) GrabKey←P2820, 
   0, (word) ForcedUngrabKeyboard←P2760, 0, (word) UngrabKeyboard←P2700, 
   0, (word) GrabKeyboard←P2640, 0, (word) InstallKeyboardUnWedger←P2580, 
   0, (word) KeyboardUnWedgeProc←P2520, 0, (word) UngrabButton←P2460, 
   0, (word) GrabButton←P2400, 0, (word) ChangeActivePointerGrab←P2340, 
   0, (word) UngrabPointer←P2280, 0, (word) InternalUngrabPointer←P2220, 
   0, (word) GrabPointer←P2160, 0, (word) TimerProcess←P2100, 
   0, (word) StartTimer←P2040, 0, (word) BPutPointerEvents←P1980, 
   0, (word) FreeCursor←P1920, 0, (word) ReColorCursor←P1860, 
   0, (word) CreateGlyphCursor←P1800, 0, (word) CreateCursor←P1740, 
   0, (word) NewCursor←P1680, 0, (word) BPutRGBRec←P1620, 
   0, (word) BPutRGB←P1560, 0, (word) LookupColor←P1500, 
   0, (word) QueryColors←P1440, 0, (word) StoreNamedColor←P1380, 
   0, (word) StoreColors←P1320, 0, (word) FreeColors←P1260, 
   0, (word) AllocColorPlanes←P1200, 0, (word) AllocColorCells←P1140, 
   0, (word) AllocNamedColor←P1080, 0, (word) AllocColor←P1020, 
   0, (word) ListInstalledColorMaps←P960, 0, (word) UnInstallColorMap←P900, 
   0, (word) InstallColorMap←P840, 0, (word) CopyColorMapAndFree←P780, 
   0, (word) FreeColorMap←P720, 0, (word) CreateColorMap←P660, 
   0, (word) FreePixmap←P600, 0, (word) CreatePixmap←P540, 
   0, (word) MakeMask←P480, 0, (word) BPutAttributes←P420, 
   0, (word) BPutSetOfEvent←P360, 0, (word) CreateWindow←P300, 
   0, (word) NewWindow←P240, 0, (word) ConfigureWindow←P180, 
   0, (word) ChangeWindowAttributes←P120, 0, (word) GetWindowAttributes←P60, 
   0, (word) XlImplRequests←P0, {0}
   };

static void NoName←Q11460()
   {
   register ptr gf←c0768 =  (ptr) &globalframe;
   word var←c71528;
   (* (( (ptr) gf←c0768)+10) ) = (word) XR←GetTypeIndexS((word) (&string1));
   (* (( (ptr) gf←c0768)+11) ) = (word) XR←GetTypeIndex((word) &string2, 0, (word) &string3);
   (* (( (ptr) gf←c0768)+12) ) = (word) XR←GetTypeIndex((word) &string4, 0, (word) &string5);
   (* (( (ptr) gf←c0768)+17) ) = (word) XR←GetTypeIndex((word) &string6, 0, (word) &string3);
   (* (( (ptr) gf←c0768)+18) ) = (word) XR←GetTypeIndexS((word) (&string7));
   (* (( (ptr) gf←c0768)+19) ) = (word) XR←GetTypeIndexS((word) (&string8));
   (* (( (ptr) gf←c0768)+21) ) = (word) XR←GetTypeIndexS((word) (&string9));
   (* (( (ptr) gf←c0768)+22) ) = (word) XR←GetTypeIndexS((word) (&string10));
   (* (( (ptr) gf←c0768)+23) ) = (word) XR←GetTypeIndex((word) &string11, 0, (word) &string12);
   (* (( (ptr) gf←c0768)+24) ) = (word) XR←GetTypeIndex((word) &string13, 0, (word) &string14);
   (* (( (ptr) gf←c0768)+25) ) = (word) XR←GetTypeIndex((word) &string15, 0, (word) &string3);
   (* (( (ptr) gf←c0768)+26) ) = (word) XR←GetTypeIndexS((word) (&string16));
   (* (( (ptr) gf←c0768)+28) ) = (word) XR←GetTypeIndex((word) &string17, 0, (word) &string18);
   (* (( (ptr) gf←c0768)+29) ) = (word) XR←GetTypeIndex((word) &string19, 0, (word) &string20);
   (* (( (ptr) gf←c0768)+30) ) = (word) XR←GetTypeIndexS((word) (&string21));
   (*  (ptr) (( (bPt) gf←c0768)+124) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0768)+25) ), (word) &string22);
   (*  (ptr) (( (bPt) gf←c0768)+128) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0768)+25) ), (word) &string23);
   (*  (ptr) (( (bPt) gf←c0768)+132) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0768)+25) ), (word) &string24);
   (*  (ptr) (( (bPt) gf←c0768)+136) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0768)+25) ), (word) &string25);
   (*  (ptr) (( (bPt) gf←c0768)+140) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0768)+25) ), (word) &string26);
   (*  (ptr) (( (bPt) gf←c0768)+144) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0768)+25) ), (word) &string27);
   (*  (ptr) (( (bPt) gf←c0768)+148) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0768)+17) ), (word) &string28);
   (void) XR←DeclareGlobalFrame((word) "XlImplRequests", &globalframe, (word) XR←GetTypeIndex((word) &string29, 0, (word) &string30)
      , (word) (( (bPt) gf←c0768)+696)/* var←c66248 */ );
   var←c71528 = (word) XR←ImportInterface((word) "BasicTime", (word) XR←GetTypeIndexS((word) (&string31)), 24);
   (* (( (ptr) gf←c0768)+182)/* var←c68936 */  ) = var←c71528;
   (void) XR←ImportProcS(var←c71528, 67636226);
   (void) XR←ImportProcS(var←c71528, 67111424);
   var←c71528 = (word) XR←ImportInterface((word) "Process", (word) XR←GetTypeIndexS((word) (&string32)), 22);
   (* (( (ptr) gf←c0768)+183)/* var←c69032 */  ) = var←c71528;
   (void) XR←ImportProcS(var←c71528, 266753);
   (void) XR←ImportProcS(var←c71528, 524546);
   (void) XR←ImportProcS(var←c71528, 526081);
   var←c71528 = (word) XR←ImportInterface((word) "Rope", (word) XR←GetTypeIndexS((word) (&string33)), 43);
   (* (( (ptr) gf←c0768)+180)/* var←c67720 */  ) = var←c71528;
   (void) XR←ImportProcS(var←c71528, 67373569);
   var←c71528 = (word) XR←ImportInterface((word) &string34, (word) XR←GetTypeIndexS((word) (&string35)), 218);
   (* (( (ptr) gf←c0768)+176)/* var←c66376 */  ) = var←c71528;
   (void) XR←ImportProcS(var←c71528, 67639298);
   (void) XR←ImportProcS(var←c71528, 2371849);
   (void) XR←ImportProcS(var←c71528, 67910403);
   (void) XR←ImportProcS(var←c71528, 67644930);
   (void) XR←ImportProcS(var←c71528, 534274);
   (void) XR←ImportProcS(var←c71528, 1061892);
   (void) XR←ImportProcS(var←c71528, 792323);
   (void) XR←ImportProcS(var←c71528, 67375105);
   (void) XR←ImportProcS(var←c71528, 67422721);
   (void) XR←ImportProcS(var←c71528, 67371777);
   (void) XR←ImportProcS(var←c71528, 67375361);
   (void) XR←ImportProcS(var←c71528, 68207876);
   var←c71528 = (word) XR←ImportInterface((word) "XlDispatch", (word) XR←GetTypeIndexS((word) (&string36)), 18);
   (* (( (ptr) gf←c0768)+178)/* var←c66504 */  ) = var←c71528;
   (void) XR←ImportProcS(var←c71528, 526850);
   (void) XR←ImportProcS(var←c71528, 1312517);
   (void) XR←ImportProcS(var←c71528, 1052676);
   (void) XR←ImportProcS(var←c71528, 527874);
   (void) XR←ImportProcS(var←c71528, 67899651);
   var←c71528 = (word) XR←ImportInterface((word) &string37, (word) XR←GetTypeIndexS((word) (&string38)), 77);
   (* (( (ptr) gf←c0768)+177)/* var←c66440 */  ) = var←c71528;
   (void) XR←ImportProcS(var←c71528, 529410);
   (void) XR←ImportProcS(var←c71528, 1317379);
   (void) XR←ImportProcS(var←c71528, 526594);
   (void) XR←ImportProcS(var←c71528, 531714);
   (void) XR←ImportProcS(var←c71528, 528130);
   (void) XR←ImportProcS(var←c71528, 1057028);
   (void) XR←ImportProcS(var←c71528, 67648770);
   (void) XR←ImportProcS(var←c71528, 532226);
   (void) XR←ImportProcS(var←c71528, 531458);
   (void) XR←ImportProcS(var←c71528, 531202);
   (void) XR←ImportProcS(var←c71528, 531970);
   (void) XR←ImportProcS(var←c71528, 529922);
   (void) XR←ImportProcS(var←c71528, 792834);
   (void) XR←ImportProcS(var←c71528, 792578);
   (void) XR←ImportProcS(var←c71528, 528386);
   (void) XR←ImportProcS(var←c71528, 539650);
   (void) XR←ImportProcS(var←c71528, 528642);
   (void) XR←ImportProcS(var←c71528, 67385857);
   (void) XR←ImportProcS(var←c71528, 530178);
   (void) XR←ImportProcS(var←c71528, 1051908);
   (void) XR←ImportProcS(var←c71528, 540418);
   (void) XR←ImportProcS(var←c71528, 67389953);
   (void) XR←ImportProcS(var←c71528, 67390209);
   (void) XR←ImportProcS(var←c71528, 67389697);
   (void) XR←ImportProcS(var←c71528, 278529);
   (void) XR←ImportProcS(var←c71528, 786947);
   var←c71528 = (word) XR←ImportInterface((word) "XlPrivateErrorHandling", (word) XR←GetTypeIndexS((word) (&string39)), 10);
   (* (( (ptr) gf←c0768)+181)/* var←c68424 */  ) = var←c71528;
   (void) XR←ImportProcS(var←c71528, 788483);
   (void) XR←ImportProcS(var←c71528, 526082);
   var←c71528 = (word) XR←ImportInterface((word) "XlPrivateResources", (word) XR←GetTypeIndexS((word) (&string40)), 9);
   (* (( (ptr) gf←c0768)+179)/* var←c66696 */  ) = var←c71528;
   (void) XR←ImportProcS(var←c71528, 525058);
   (void) XR←ImportProcS(var←c71528, 526082);
   (void) XR←ImportProcS(var←c71528, 67635202);
   (void) XR←ImportProcS(var←c71528, 787971);
   (void) XR←ImportProcS(var←c71528, 67371521);
   var←c71528 = (word) XR←ImportInterface((word) "XlService", (word) XR←GetTypeIndexS((word) (&string41)), 6);
   (* (( (ptr) gf←c0768)+184)/* var←c69640 */  ) = var←c71528;
   (void) XR←ImportProcS(var←c71528, 787203);
   var←c71528 = (word) XR←ExportInterface((word) &string34, (word) XR←GetTypeIndexS((word) (&string35)), 218);
   (* (( (ptr) gf←c0768)+185)/* var←c71560 */  ) = var←c71528;
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+200)/* var←c64264 */ , 534786, (word) "GrabServer");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+208)/* var←c64296 */ , 535042, (word) "UngrabServer");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+304)/* var←c64680 */ , 1059588, (word) "AllowEvents");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+288)/* var←c64616 */ , 535554, (word) "AddDispatchJunk");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+656)/* var←c66088 */ , 74204681, (word) "CreateWindow");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+680)/* var←c66184 */ , 4736772, (word) "ChangeWindowAttributes")
   ;
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+296)/* var←c64648 */ , 1329157, (word) "AddDispatch");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+672)/* var←c66152 */ , 2641670, (word) "ConfigureWindow");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+168)/* var←c64136 */ , 1593349, (word) "ReparentWindow");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+176)/* var←c64168 */ , 1069316, (word) "CirculateWindow");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+184)/* var←c64200 */ , 67654146, (word) "QueryTree");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+192)/* var←c64232 */ , 470307586, (word) "GetGeometry");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+688)/* var←c66216 */ , 1007178754, (word) "GetWindowAttributes")
   ;
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+224)/* var←c64360 */ , 269768452, (word) "TranslateCoordinates")
   ;
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+464)/* var←c65320 */ , 69228551, (word) "CreateCursor");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+456)/* var←c65288 */ , 69228808, (word) "CreateGlyphCursor");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+448)/* var←c65256 */ , 1333765, (word) "ReColorCursor");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+440)/* var←c65224 */ , 809731, (word) "FreeCursor");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+624)/* var←c65960 */ , 68705285, (word) "CreatePixmap");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+616)/* var←c65928 */ , 810243, (word) "FreePixmap");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+408)/* var←c65096 */ , 69495049, (word) "GrabPointer");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+392)/* var←c65032 */ , 813571, (word) "UngrabPointer");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+384)/* var←c65000 */ , 1338117, (word) "ChangeActivePointerGrab")
   ;
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+376)/* var←c64968 */ , 2911243, (word) "GrabButton");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+368)/* var←c64936 */ , 1338629, (word) "UngrabButton");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+256)/* var←c64488 */ , 537423362, (word) "QueryPointer");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+248)/* var←c64456 */ , 2649863, (word) "WarpPointer");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+240)/* var←c64424 */ , 68186116, (word) "GetMotionEvents");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+232)/* var←c64392 */ , 135557380, (word) "QueryBestSize");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+344)/* var←c64840 */ , 68713222, (word) "GrabKeyboard");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+336)/* var←c64808 */ , 818179, (word) "UngrabKeyboard");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+328)/* var←c64776 */ , 294145, (word) "ForcedUngrabKeyboard")
   ;
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+320)/* var←c64744 */ , 2129416, (word) "GrabKey");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+312)/* var←c64712 */ , 1343237, (word) "UngrabKey");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+280)/* var←c64584 */ , 2138630, (word) "ClearArea");
   (void) XR←ExportVar(var←c71528, 178, (word) (( (bPt) gf←c0768)+16)/* white←v3420 */ );
   (void) XR←ExportVar(var←c71528, 179, (word) (( (bPt) gf←c0768)+20)/* black←v3448 */ );
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+608)/* var←c65896 */ , 68465669, (word) "CreateColorMap");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+600)/* var←c65864 */ , 832771, (word) "FreeColorMap");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+592)/* var←c65832 */ , 67941891, (word) "CopyColorMapAndFree")
   ;
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+584)/* var←c65800 */ , 833283, (word) "InstallColorMap");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+576)/* var←c65768 */ , 833539, (word) "UnInstallColorMap");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+568)/* var←c65736 */ , 67680514, (word) "ListInstalledColorMaps")
   ;
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+560)/* var←c65704 */ , 269793795, (word) "AllocColor");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+552)/* var←c65672 */ , 470596355, (word) "AllocNamedColor");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+544)/* var←c65640 */ , 135576581, (word) "AllocColorCells");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+536)/* var←c65608 */ , 270318855, (word) "AllocColorPlanes");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+528)/* var←c65576 */ , 1359365, (word) "FreeColors");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+520)/* var←c65544 */ , 1097476, (word) "StoreColors");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+512)/* var←c65512 */ , 2146312, (word) "StoreNamedColor");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+504)/* var←c65480 */ , 67944707, (word) "QueryColors");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+496)/* var←c65448 */ , 403489283, (word) "LookupColor");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+152)/* var←c64072 */ , 6344710, (word) "SendEvent");
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+160)/* var←c64104 */ , 3199240, (word) "SendClientMessage32")
   ;
   (void) XR←ExportType((word) "ConnectionPrivate", (word) XR←GetTypeIndexS((word) (&string42)), (word) XR←GetTypeIndex((word) &string43, 0, (word) &string44)
      );
   var←c71528 = (word) XR←ExportInterface((word) &string37, (word) XR←GetTypeIndexS((word) (&string38)), 77);
   (* (( (ptr) gf←c0768)+185)/* var←c71560 */  ) = var←c71528;
   (void) XR←ExportProcS(var←c71528, (word) (( (bPt) gf←c0768)+648)/* var←c66056 */ , 532482, (word) "BPutSetOfEvent");
   var←c71528 = (word) XR←ExportInterface((word) "XlPrivateTypes", (word) XR←GetTypeIndexS((word) (&string45)), 7);
   (* (( (ptr) gf←c0768)+186)/* var←c71592 */  ) = var←c71528;
   (void) XR←ExportType((word) "GrabberRec", (word) XR←GetTypeIndexS((word) (&string46)), (word) XR←GetTypeIndex((word) &string2, 0, (word) &string3)
      );
   }

static void XlImplRequests←P0(formal←c093, formal←c090)
   word formal←c093;
   word formal←c090;
   {
   register ptr gf←c71624 =  (ptr) &globalframe;
   /* XlImplRequests: */ 
SOURCE(162, 43362)
SOURCE(8681, 71)
   {
      word var←c66280;
      var←c66280 = XR←NewObject(12, (* (( (ptr) gf←c71624)+10) ));
      (*  (ptr) var←c66280 ) = 65535;
      (* (( (ptr) var←c66280)+1) ) = 65535;
      (* (( (ptr) var←c66280)+2) ) = 65535;
      (* (( (ptr) gf←c71624)+4)/* white←v3420 */  ) = var←c66280;
      };
SOURCE(8754, 59)
   (* (( (ptr) gf←c71624)+5)/* black←v3448 */  ) = XR←NewObject(12, (* (( (ptr) gf←c71624)+10) ));
SOURCE(20488, 57)
   {
      word var←c66344;
      var←c66344 = XR←NewObject(36, (* (( (ptr) gf←c71624)+12) ));
      (* (( (ptr) var←c66344)+5) ) = 3;
      (* (( (ptr) gf←c71624)+6)/* flushNowDetails←v4176 */  ) = var←c66344;
      };
SOURCE(24771, 28)
   (* (( (ptr) gf←c71624)+7)/* keyboardGrab←v4484 */  ) = XR←NewObject(4, (* (( (ptr) gf←c71624)+19) ));
SOURCE(24801, 63)
   {
      word pd47;
      pd47 = (* (( (ptr) (* (( (ptr) gf←c71624)+176)/* var←c66376 */  ))+201) );
      (* (( (ptr) gf←c71624)+8)/* propertyEvents←v4512 */  ) = (word) ( *( (fPt) ((*  (ptr) pd47 ))))(28, 35, 35, 35, pd47);
      };
   }

static void GetWindowAttributes←P60(formal←c099, c←v5348, formal←c01030)
   word formal←c099;
   word c←v5348;
   word formal←c01030;
   {
   W8 var←c71656;
   /* declaration of window←v5376 skipped */ 
   register ptr gf←c71688 =  (ptr) &globalframe;
   W15 at←v5420;
   /* declaration of var←c66408 skipped */ 
   /* declaration of reply←v17304 skipped */ 
   var←c71656.f4/* window←v5376 */  = formal←c01030;
   /* GetWindowAttributes: */ 
SOURCE(659, 876)
   {
      word tmpAddr48;
      tmpAddr48 = (word) (( (ptr) &var←c71656)+5)/* var←c66408 */ ;
      (*  (ptr) tmpAddr48 ) = ( ((word)  (fPt) action←P4140) );
      (* (( (ptr) tmpAddr48) + 1) ) = 1;
      };
SOURCE(659, 876)
   XR←FillWords(&at←v5420, 15, 0);
SOURCE(760, 12)
   var←c71656.f7/* reply←v17304 */  = 0;
SOURCE(882, 27)
   {
      word pd49;
      pd49 = (* (( (ptr) (* (( (ptr) gf←c71688)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd49 ))))(c←v5348, (word) (( (bPt) &var←c71656)+20)/* var←c66408 */ , 0, pd49);
      };
SOURCE(911, 17)
   {
      word pd50;
      pd50 = (* (( (ptr) (* (( (ptr) gf←c71688)+177)/* var←c66440 */  ))+68) );
      (void) ( *( (fPt) ((*  (ptr) pd50 ))))(var←c71656.f7/* reply←v17304 */ , pd50);
      };
SOURCE(930, 36)
   {
      word pd51;
      word idx52;
      pd51 = (* (( (ptr) (* (( (ptr) gf←c71688)+177)/* var←c66440 */  ))+77) );
      (*  (ptr) &at←v5420 ) = (
         idx52 = (word) ( *( (fPt) ((*  (ptr) pd51 ))))(var←c71656.f7/* reply←v17304 */ , pd51),
         BCK(idx52, 4)
         );
      };
SOURCE(968, 14)
   (* (( (ptr) var←c71656.f7/* reply←v17304 */ )+10) ) = ((* (( (ptr) var←c71656.f7/* reply←v17304 */ )+10) ) + 6);
SOURCE(984, 35)
   {
      word pd53;
      pd53 = (* (( (ptr) (* (( (ptr) gf←c71688)+177)/* var←c66440 */  ))+79) );
      (* (( (ptr) &at←v5420)+1) ) = (word) ( *( (fPt) ((*  (ptr) pd53 ))))(var←c71656.f7/* reply←v17304 */ , pd53);
      };
SOURCE(1021, 30)
   {
      word pd54;
      word idx55;
      pd54 = (* (( (ptr) (* (( (ptr) gf←c71688)+177)/* var←c66440 */  ))+78) );
      (* (( (ptr) &at←v5420)+2) ) = (
         idx55 = (word) ((word) ( *( (fPt) ((*  (ptr) pd54 ))))(var←c71656.f7/* reply←v17304 */ , pd54) - 1),
         BCK(idx55, 2)
         );
      };
SOURCE(1053, 34)
   {
      word pd56;
      word idx57;
      pd56 = (* (( (ptr) (* (( (ptr) gf←c71688)+177)/* var←c66440 */  ))+77) );
      (* (( (ptr) &at←v5420)+3) ) = (
         idx57 = (word) ( *( (fPt) ((*  (ptr) pd56 ))))(var←c71656.f7/* reply←v17304 */ , pd56),
         BCK(idx57, 12)
         );
      };
SOURCE(1089, 34)
   {
      word pd58;
      word idx59;
      pd58 = (* (( (ptr) (* (( (ptr) gf←c71688)+177)/* var←c66440 */  ))+77) );
      (* (( (ptr) &at←v5420)+4) ) = (
         idx59 = (word) ( *( (fPt) ((*  (ptr) pd58 ))))(var←c71656.f7/* reply←v17304 */ , pd58),
         BCK(idx59, 12)
         );
      };
SOURCE(1125, 33)
   {
      word pd60;
      pd60 = (* (( (ptr) (* (( (ptr) gf←c71688)+177)/* var←c66440 */  ))+79) );
      (* (( (ptr) &at←v5420)+5) ) = (word) ( *( (fPt) ((*  (ptr) pd60 ))))(var←c71656.f7/* reply←v17304 */ , pd60);
      };
SOURCE(1160, 32)
   {
      word pd61;
      pd61 = (* (( (ptr) (* (( (ptr) gf←c71688)+177)/* var←c66440 */  ))+79) );
      (* (( (ptr) &at←v5420)+6) ) = (word) ( *( (fPt) ((*  (ptr) pd61 ))))(var←c71656.f7/* reply←v17304 */ , pd61);
      };
SOURCE(1194, 30)
   {
      word pd62;
      pd62 = (* (( (ptr) (* (( (ptr) gf←c71688)+177)/* var←c66440 */  ))+77) );
      (* (( (ptr) &at←v5420)+7) ) =  (unsigned) ((word) ( *( (fPt) ((*  (ptr) pd62 ))))(var←c71656.f7/* reply←v17304 */ , pd62)
       != 0);
      };
SOURCE(1226, 32)
   {
      word pd63;
      pd63 = (* (( (ptr) (* (( (ptr) gf←c71688)+177)/* var←c66440 */  ))+77) );
      (* (( (ptr) &at←v5420)+8) ) =  (unsigned) ((word) ( *( (fPt) ((*  (ptr) pd63 ))))(var←c71656.f7/* reply←v17304 */ , pd63)
       != 0);
      };
SOURCE(1260, 32)
   {
      word pd64;
      word idx65;
      pd64 = (* (( (ptr) (* (( (ptr) gf←c71688)+177)/* var←c66440 */  ))+77) );
      (* (( (ptr) &at←v5420)+9) ) = (
         idx65 = (word) ( *( (fPt) ((*  (ptr) pd64 ))))(var←c71656.f7/* reply←v17304 */ , pd64),
         BCK(idx65, 3)
         );
      };
SOURCE(1294, 37)
   {
      word pd66;
      pd66 = (* (( (ptr) (* (( (ptr) gf←c71688)+177)/* var←c66440 */  ))+77) );
      (* (( (ptr) &at←v5420)+10) ) =  (unsigned) ((word) ( *( (fPt) ((*  (ptr) pd66 ))))(var←c71656.f7/* reply←v17304 */ , pd66)
       != 0);
      };
SOURCE(1333, 39)
   {
      word pd67;
      pd67 = (* (( (ptr) (* (( (ptr) gf←c71688)+177)/* var←c66440 */  ))+79) );
      (* (( (ptr) &at←v5420)+11) ) = (word) ( *( (fPt) ((*  (ptr) pd67 ))))(var←c71656.f7/* reply←v17304 */ , pd67);
      };
SOURCE(1374, 42)
   {
      word pd68;
      pd68 = (* (( (ptr) (* (( (ptr) gf←c71688)+177)/* var←c66440 */  ))+79) );
      (* (( (ptr) &at←v5420)+12) ) = (word) ( *( (fPt) ((*  (ptr) pd68 ))))(var←c71656.f7/* reply←v17304 */ , pd68);
      };
SOURCE(1418, 43)
   {
      word pd69;
      pd69 = (* (( (ptr) (* (( (ptr) gf←c71688)+177)/* var←c66440 */  ))+79) );
      (* (( (ptr) &at←v5420)+13) ) = (word) ( *( (fPt) ((*  (ptr) pd69 ))))(var←c71656.f7/* reply←v17304 */ , pd69);
      };
SOURCE(1463, 48)
   {
      word pd70;
      pd70 = (* (( (ptr) (* (( (ptr) gf←c71688)+177)/* var←c66440 */  ))+79) );
      (* (( (ptr) &at←v5420)+14) ) = (word) ( *( (fPt) ((*  (ptr) pd70 ))))(var←c71656.f7/* reply←v17304 */ , pd70);
      };
SOURCE(1513, 22)
   {
      word pd71;
      pd71 = (* (( (ptr) (* (( (ptr) gf←c71688)+177)/* var←c66440 */  ))+67) );
      (void) ( *( (fPt) ((*  (ptr) pd71 ))))(c←v5348, var←c71656.f7/* reply←v17304 */ , pd71);
      };
   /* removed tail goto */ 
   (*  (W15Pt) formal←c099 ) = at←v5420;
   return;
   }

static void action←P4140(c←v17408, formal←c71752)
   word c←v17408;
   word formal←c71752;
   {
   register ptr gf←c71720 =  (ptr) &globalframe;
   formal←c71752 = (formal←c71752 - 20);
   /* action: */ 
SOURCE(774, 103)
SOURCE(807, 17)
   {
      word pd72;
      pd72 = (* (( (ptr) (* (( (ptr) gf←c71720)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd72 ))))(c←v17408, 3, 0, 2, pd72);
      };
SOURCE(826, 23)
   {
      word pd73;
      pd73 = (* (( (ptr) (* (( (ptr) gf←c71720)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd73 ))))(c←v17408, (* (( (ptr) formal←c71752)+4) ), pd73);
      };
SOURCE(851, 26)
   {
      word pd74;
      pd74 = (* (( (ptr) (* (( (ptr) gf←c71720)+177)/* var←c66440 */  ))+62) );
      (* (( (ptr) formal←c71752)+7) ) = (word) ( *( (fPt) ((*  (ptr) pd74 ))))(c←v17408, pd74);
      };
   }

static void ChangeWindowAttributes←P120(formal←c01031)
   word formal←c01031;
   {
   W7 var←c71784;
   /* declaration of var←c0105 skipped */ 
   register ptr gf←c71816 =  (ptr) &globalframe;
   /* declaration of var←c66472 skipped */ 
   var←c71784.f4/* var←c0105 */  = formal←c01031;
   /* ChangeWindowAttributes: */ 
SOURCE(1542, 577)
   {
      word tmpAddr75;
      tmpAddr75 = (word) (( (ptr) &var←c71784)+5)/* var←c66472 */ ;
      (*  (ptr) tmpAddr75 ) = ( ((word)  (fPt) action←P4200) );
      (* (( (ptr) tmpAddr75) + 1) ) = 1;
      };
SOURCE(2088, 31)
   {
      word pd76;
      pd76 = (* (( (ptr) (* (( (ptr) gf←c71816)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd76 ))))((*  (ptr) var←c71784.f4/* var←c0105 */ /* c←v5480 */  ), (word) (( (bPt) &var←c71784)+20)
         /* var←c66472 */ , (* (( (ptr) var←c71784.f4/* var←c0105 */ )+17)/* details←v5564 */  ), pd76);
      };
   }

static void action←P4200(c←v17512, formal←c71880)
   word c←v17512;
   word formal←c71880;
   {
   register ptr gf←c71848 =  (ptr) &globalframe;
   word mask←v17540;
   word n←v17568;
   formal←c71880 = (formal←c71880 - 20);
   /* action: */ 
SOURCE(1656, 424)
SOURCE(1706, 171)
   if (((* (( (ptr) (* (( (ptr) formal←c71880)+4) ))+13) ) != 0)) {
SOURCE(1755, 124)
      {
         word eventMask←v17612;
SOURCE(1757, 86)
         {
            word pd77;
            pd77 = (* (( (ptr) (* (( (ptr) gf←c71848)+178)/* var←c66504 */  ))+21) );
            eventMask←v17612 = (word) ( *( (fPt) ((*  (ptr) pd77 ))))(c←v17512, (* (( (ptr) (* (( (ptr) formal←c71880)+4) ))+1)/* window←v5508 */  ), (* (
                  ( (ptr) (* (( (ptr) formal←c71880)+4) ))+13) ), pd77);
            };
SOURCE(1845, 32)
         (* (( (ptr) (* (( (ptr) formal←c71880)+4) ))+13) ) = eventMask←v17612;
         };
      };
SOURCE(1890, 34)
SOURCE(1891, 33)
   {
      W2 var←c66536;
      (void) MakeMask←P480((word) &var←c66536, (word) (( (bPt) (* (( (ptr) formal←c71880)+4) ))+8)/* attributes←v5536 */ );
      n←v17568 = var←c66536.f1;
      mask←v17540 = var←c66536.f0;
      };
SOURCE(1927, 153)
   if ((n←v17568 > 0)) {
SOURCE(1941, 19)
      {
         word pd78;
         pd78 = (* (( (ptr) (* (( (ptr) gf←c71848)+177)/* var←c66440 */  ))+17) );
         (void) ( *( (fPt) ((*  (ptr) pd78 ))))(c←v17512, 2, 0, SGNCK((n←v17568 + 3)), pd78);
         };
SOURCE(1962, 23)
      {
         word pd79;
         pd79 = (* (( (ptr) (* (( (ptr) gf←c71848)+177)/* var←c66440 */  ))+27) );
         (void) ( *( (fPt) ((*  (ptr) pd79 ))))(c←v17512, (* (( (ptr) (* (( (ptr) formal←c71880)+4) ))+1)/* window←v5508 */  ), pd79)
         ;
         };
SOURCE(1988, 15)
      {
         word pd80;
         pd80 = (* (( (ptr) (* (( (ptr) gf←c71848)+177)/* var←c66440 */  ))+21) );
         (void) ( *( (fPt) ((*  (ptr) pd80 ))))(c←v17512, mask←v17540, pd80);
         };
SOURCE(2015, 31)
SOURCE(2016, 30)
      (void) BPutAttributes←P420(c←v17512, (word) (( (bPt) (* (( (ptr) formal←c71880)+4) ))+8)/* attributes←v5536 */ );
SOURCE(2051, 29)
      {
         word pd81;
         pd81 = (* (( (ptr) (* (( (ptr) gf←c71848)+177)/* var←c66440 */  ))+64) );
         (void) ( *( (fPt) ((*  (ptr) pd81 ))))(c←v17512, (* (( (ptr) (* (( (ptr) formal←c71880)+4) ))+17)/* details←v5564 */  ), pd81)
         ;
         };
      };
   }

static void ConfigureWindow←P180(c←v5624, formal←c01032, geometry←v5680, sibling←v5708, stackMode←v5736, formal←c01033)
   word c←v5624;
   word formal←c01032;
   W5 geometry←v5680;
   word sibling←v5708;
   word stackMode←v5736;
   word formal←c01033;
   {
   W18 var←c71912;
   /* declaration of window←v5652 skipped */ 
   /* declaration of details←v5764 skipped */ 
   register ptr gf←c71944 =  (ptr) &globalframe;
   /* declaration of var←c66568 skipped */ 
   /* declaration of bitmask←v17768 skipped */ 
   /* declaration of vals←v17796 skipped */ 
   /* declaration of filled←v17824 skipped */ 
   (* (( (ptr) &var←c71912)+4)/* window←v5652 */  ) = formal←c01032;
   (* (( (ptr) &var←c71912)+5)/* details←v5764 */  ) = formal←c01033;
   /* ConfigureWindow: */ 
SOURCE(2125, 1748)
   {
      word tmpAddr82;
      tmpAddr82 = (word) (( (ptr) &var←c71912)+6)/* var←c66568 */ ;
      (*  (ptr) tmpAddr82 ) = ( ((word)  (fPt) action←P4308) );
      (* (( (ptr) tmpAddr82) + 1) ) = 1;
      };
SOURCE(2774, 19)
   (* (( (ptr) &var←c71912)+8)/* bitmask←v17768 */  ) = 0;
SOURCE(2825, 15)
   (* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ) = 0;
SOURCE(2842, 26)
   if (((* (( (ptr) &var←c71912)+4)/* window←v5652 */  ) == 0)) {
SOURCE(2868, 5)
      (void) XR←RaiseUnnamedError();
      };
SOURCE(2875, 135)
   if (( (int)geometry←v5680.f0 !=  (int)2147483648)) {
SOURCE(2908, 24)
      {
         word i←v61864;
         i←v61864 = geometry←v5680.f0;
SOURCE(2638, 40)
         if (( (int)i←v61864 >  (int)32767) || ( (int)i←v61864 <  (int)4294934528)) {
SOURCE(2678, 6)
            (void) XR←RaiseUnnamedError();
            };
         };
SOURCE(2934, 34)
      {
         word c←v61768;
SOURCE(2565, 31)
         c←v61768 = ( (((unsigned)geometry←v5680.f0 << 16) >> 16) );
SOURCE(2513, 83)
         {
            word idx83;
            (* ((( (ptr) &var←c71912)+9)/* vals←v17796 */ +(
                  idx83 = (* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ),
                  BCK(idx83, 8)
                  )) ) = c←v61768;
            };
         };
SOURCE(2970, 19)
      (* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ) = ((* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ) + 1);
SOURCE(2991, 19)
      {
         word idx84;
         (* (( (ptr) &var←c71912)+8)/* bitmask←v17768 */  ) = (
            idx84 = (word) ((* (( (ptr) &var←c71912)+8)/* bitmask←v17768 */  ) + 1),
            BCK(idx84, 65536)
            );
         };
      };
SOURCE(3016, 135)
   if (( (int)geometry←v5680.f1 !=  (int)2147483648)) {
SOURCE(3049, 24)
      {
         word i←v61816;
         i←v61816 = geometry←v5680.f1;
SOURCE(2638, 40)
         if (( (int)i←v61816 >  (int)32767) || ( (int)i←v61816 <  (int)4294934528)) {
SOURCE(2678, 6)
            (void) XR←RaiseUnnamedError();
            };
         };
SOURCE(3075, 34)
      {
         word c←v61720;
SOURCE(2565, 31)
         c←v61720 = ( (((unsigned)geometry←v5680.f1 << 16) >> 16) );
SOURCE(2513, 83)
         {
            word idx85;
            (* ((( (ptr) &var←c71912)+9)/* vals←v17796 */ +(
                  idx85 = (* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ),
                  BCK(idx85, 8)
                  )) ) = c←v61720;
            };
         };
SOURCE(3111, 19)
      (* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ) = ((* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ) + 1);
SOURCE(3132, 19)
      {
         word idx86;
         (* (( (ptr) &var←c71912)+8)/* bitmask←v17768 */  ) = (
            idx86 = (word) ((* (( (ptr) &var←c71912)+8)/* bitmask←v17768 */  ) + 2),
            BCK(idx86, 65536)
            );
         };
      };
SOURCE(3157, 139)
   if (( (int)geometry←v5680.f2 >  (int)0)) {
SOURCE(3189, 29)
SOURCE(2724, 41)
      if ((geometry←v5680.f2 > 65535)) {
SOURCE(2765, 6)
         (void) XR←RaiseUnnamedError();
         };
SOURCE(3220, 34)
      {
         word idx87;
         word idx88;
         (* ((( (ptr) &var←c71912)+9)/* vals←v17796 */ +(
               idx87 = (* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ),
               BCK(idx87, 8)
               )) ) = (
            idx88 = (word) geometry←v5680.f2,
            SGNCK(idx88)
            );
         };
SOURCE(3256, 19)
      (* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ) = ((* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ) + 1);
SOURCE(3277, 19)
      {
         word idx89;
         (* (( (ptr) &var←c71912)+8)/* bitmask←v17768 */  ) = (
            idx89 = (word) ((* (( (ptr) &var←c71912)+8)/* bitmask←v17768 */  ) + 4),
            BCK(idx89, 65536)
            );
         };
      };
SOURCE(3302, 142)
   if (( (int)geometry←v5680.f3 >  (int)0)) {
SOURCE(3335, 30)
SOURCE(2724, 41)
      if ((geometry←v5680.f3 > 65535)) {
SOURCE(2765, 6)
         (void) XR←RaiseUnnamedError();
         };
SOURCE(3367, 35)
      {
         word idx90;
         word idx91;
         (* ((( (ptr) &var←c71912)+9)/* vals←v17796 */ +(
               idx90 = (* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ),
               BCK(idx90, 8)
               )) ) = (
            idx91 = (word) geometry←v5680.f3,
            SGNCK(idx91)
            );
         };
SOURCE(3404, 19)
      (* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ) = ((* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ) + 1);
SOURCE(3425, 19)
      {
         word idx92;
         (* (( (ptr) &var←c71912)+8)/* bitmask←v17768 */  ) = (
            idx92 = (word) ((* (( (ptr) &var←c71912)+8)/* bitmask←v17768 */  ) + 8),
            BCK(idx92, 65536)
            );
         };
      };
SOURCE(3450, 146)
   if (( (int)geometry←v5680.f4 >=  (int)0)) {
SOURCE(3484, 30)
SOURCE(2724, 41)
      if ((geometry←v5680.f4 > 65535)) {
SOURCE(2765, 6)
         (void) XR←RaiseUnnamedError();
         };
SOURCE(3516, 35)
      {
         word idx93;
         word idx94;
         (* ((( (ptr) &var←c71912)+9)/* vals←v17796 */ +(
               idx93 = (* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ),
               BCK(idx93, 8)
               )) ) = (
            idx94 = (word) geometry←v5680.f4,
            SGNCK(idx94)
            );
         };
SOURCE(3553, 19)
      (* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ) = ((* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ) + 1);
SOURCE(3574, 22)
      {
         word idx95;
         (* (( (ptr) &var←c71912)+8)/* bitmask←v17768 */  ) = (
            idx95 = (word) ((* (( (ptr) &var←c71912)+8)/* bitmask←v17768 */  ) + 16),
            BCK(idx95, 65536)
            );
         };
      };
SOURCE(3602, 106)
   if ((sibling←v5708 != 0)) {
SOURCE(3631, 32)
      {
         word idx96;
         (* ((( (ptr) &var←c71912)+9)/* vals←v17796 */ +(
               idx96 = (* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ),
               BCK(idx96, 8)
               )) ) = sibling←v5708;
         };
SOURCE(3665, 19)
      (* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ) = ((* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ) + 1);
SOURCE(3686, 22)
      {
         word idx97;
         (* (( (ptr) &var←c71912)+8)/* bitmask←v17768 */  ) = (
            idx97 = (word) ((* (( (ptr) &var←c71912)+8)/* bitmask←v17768 */  ) + 32),
            BCK(idx97, 65536)
            );
         };
      };
SOURCE(3714, 105)
   if ((stackMode←v5736 != 5)) {
SOURCE(3745, 29)
      {
         word idx98;
         (* ((( (ptr) &var←c71912)+9)/* vals←v17796 */ +(
               idx98 = (* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ),
               BCK(idx98, 8)
               )) ) = stackMode←v5736;
         };
SOURCE(3776, 19)
      (* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ) = ((* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ) + 1);
SOURCE(3797, 22)
      {
         word idx99;
         (* (( (ptr) &var←c71912)+8)/* bitmask←v17768 */  ) = (
            idx99 = (word) ((* (( (ptr) &var←c71912)+8)/* bitmask←v17768 */  ) + 64),
            BCK(idx99, 65536)
            );
         };
      };
SOURCE(3825, 48)
   if (( (int)(* (( (ptr) &var←c71912)+17)/* filled←v17824 */  ) !=  (int)0)) {
SOURCE(3842, 31)
      {
         word pd100;
         pd100 = (* (( (ptr) (* (( (ptr) gf←c71944)+177)/* var←c66440 */  ))+6) );
         (void) ( *( (fPt) ((*  (ptr) pd100 ))))(c←v5624, (word) (( (bPt) &var←c71912)+24)/* var←c66568 */ , (* (( (ptr) &var←c71912)+5)
            /* details←v5764 */  ), pd100);
         };
      };
   }

static void action←P4308(c←v17900, formal←c72008)
   word c←v17900;
   word formal←c72008;
   {
   register ptr gf←c71976 =  (ptr) &globalframe;
   formal←c72008 = (formal←c72008 - 24);
   /* action: */ 
SOURCE(2298, 210)
SOURCE(2331, 25)
   {
      word pd101;
      pd101 = (* (( (ptr) (* (( (ptr) gf←c71976)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd101 ))))(c←v17900, 12, 0, ((* (( (ptr) formal←c72008)+17) ) + 3), pd101);
      };
SOURCE(2358, 23)
   {
      word pd102;
      pd102 = (* (( (ptr) (* (( (ptr) gf←c71976)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd102 ))))(c←v17900, (* (( (ptr) formal←c72008)+4) ), pd102);
      };
SOURCE(2384, 18)
   {
      word pd103;
      pd103 = (* (( (ptr) (* (( (ptr) gf←c71976)+177)/* var←c66440 */  ))+20) );
      (void) ( *( (fPt) ((*  (ptr) pd103 ))))(c←v17900, (* (( (ptr) formal←c72008)+8) ), pd103);
      };
SOURCE(2405, 11)
   (* (( (ptr) c←v17900)+4) ) = ((* (( (ptr) c←v17900)+4) ) + 2);
SOURCE(2419, 48)
   {
      register word i←v18188 = 0;
      register word noName←c66664;
      noName←c66664 = (* (( (ptr) formal←c72008)+17) );
      if (( (int)i←v18188 >=  (int)noName←c66664)) {
         goto lab←L100003;
         };
      lab←L100006: ;
SOURCE(2448, 19)
      {
         word c←v63804;
         word b←v63832;
         c←v63804 = c←v17900;
         b←v63832 = (* ((( (ptr) formal←c72008)+9)+BCK(i←v18188, 8)) );
         {
            word p←v40812;
            word n←v41052;
            p←v40812 = (* (( (ptr) c←v63804)+7) );
            n←v41052 = (* (( (ptr) c←v63804)+4) );
            (* (( (ptr) p←v40812)+((word) n←v41052 >> 2)) ) = b←v63832;
            (* (( (ptr) c←v63804)+4) ) = (n←v41052 + 4);
            };
         };
      i←v18188 = (i←v18188 + 1);
      if (( (int)i←v18188 <  (int)noName←c66664)) {
         goto lab←L100006;
         };
      lab←L100003: ;
      };
SOURCE(2479, 29)
   {
      word pd104;
      pd104 = (* (( (ptr) (* (( (ptr) gf←c71976)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd104 ))))(c←v17900, (* (( (ptr) formal←c72008)+5) ), pd104);
      };
   }

static word NewWindow←P240(c←v5824)
   word c←v5824;
   {
   register ptr gf←c72040 =  (ptr) &globalframe;
   word w←v5868;
   word id←v18232;
   /* NewWindow: */ 
SOURCE(3880, 154)
SOURCE(3936, 48)
   {
      word pd105;
      pd105 = (* (( (ptr) (* (( (ptr) gf←c72040)+179)/* var←c66696 */  ))+6) );
      id←v18232 = (word) ( *( (fPt) ((*  (ptr) pd105 ))))(c←v5824, pd105);
      };
SOURCE(3986, 19)
   w←v5868 = id←v18232;
SOURCE(4007, 27)
   {
      word pd106;
      pd106 = (* (( (ptr) (* (( (ptr) gf←c72040)+178)/* var←c66504 */  ))+18) );
      (void) ( *( (fPt) ((*  (ptr) pd106 ))))(c←v5824, w←v5868, pd106);
      };
SOURCE(3880, 154)
   return(w←v5868);
   }

static word CreateWindow←P300(formal←c01034)
   word formal←c01034;
   {
   W8 var←c72072;
   /* declaration of var←c0146 skipped */ 
   register ptr gf←c72104 =  (ptr) &globalframe;
   /* declaration of w←v6196 skipped */ 
   /* declaration of var←c66728 skipped */ 
   var←c72072.f4/* var←c0146 */  = formal←c01034;
   /* CreateWindow: */ 
SOURCE(4041, 1290)
   {
      word tmpAddr107;
      tmpAddr107 = (word) (( (ptr) &var←c72072)+6)/* var←c66728 */ ;
      (*  (ptr) tmpAddr107 ) = ( ((word)  (fPt) action←P4596) );
      (* (( (ptr) tmpAddr107) + 1) ) = 1;
      };
SOURCE(4041, 1290)
   var←c72072.f5/* w←v6196 */  = 0;
SOURCE(5031, 84)
   if (( (int)(* (( (ptr) var←c72072.f4/* var←c0146 */ )+7) ) <  (int)0) || ( (int)(* (( (ptr) var←c72072.f4/* var←c0146 */ )+7)
    ) >  (int)1000)) {
SOURCE(5091, 24)
      (* (( (ptr) var←c72072.f4/* var←c0146 */ )+7) ) = 0;
      };
SOURCE(5117, 49)
   if (((* (( (ptr) var←c72072.f4/* var←c0146 */ )+2)/* parent←v5984 */  ) == 0)) {
SOURCE(5143, 23)
      {
         word pd108;
         pd108 = (* (( (ptr) (* (( (ptr) gf←c72104)+176)/* var←c66376 */  ))+21) );
         (* (( (ptr) var←c72072.f4/* var←c0146 */ )+2)/* parent←v5984 */  ) = (word) ( *( (fPt) ((*  (ptr) pd108 ))))((*  (ptr) (var←c72072.f4/* var←c0146 */ /* c←v5928 */ ) ), pd108)
         ;
         };
      };
SOURCE(5183, 56)
   if (( (int)(* (( (ptr) var←c72072.f4/* var←c0146 */ )+5) ) <=  (int)0)) {
SOURCE(5214, 25)
      (* (( (ptr) var←c72072.f4/* var←c0146 */ )+5) ) = 200;
      };
SOURCE(5241, 57)
   if (( (int)(* (( (ptr) var←c72072.f4/* var←c0146 */ )+6) ) <=  (int)0)) {
SOURCE(5273, 25)
      (* (( (ptr) var←c72072.f4/* var←c0146 */ )+6) ) = 50;
      };
SOURCE(5300, 31)
   {
      word pd109;
      pd109 = (* (( (ptr) (* (( (ptr) gf←c72104)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd109 ))))((*  (ptr) var←c72072.f4/* var←c0146 */ /* c←v5928 */  ), (word) (( (bPt) &var←c72072)+24)
         /* var←c66728 */ , (* (( (ptr) var←c72072.f4/* var←c0146 */ )+26)/* details←v6152 */  ), pd109);
      };
SOURCE(4041, 1290)
   return(var←c72072.f5/* w←v6196 */ );
   }

static void action←P4596(c←v18352, formal←c72168)
   word c←v18352;
   word formal←c72168;
   {
   register ptr gf←c72136 =  (ptr) &globalframe;
   word mask←v18380;
   word cnt←v18408;
   formal←c72168 = (formal←c72168 - 24);
   /* action: */ 
SOURCE(4320, 706)
SOURCE(4372, 16)
   (* (( (ptr) formal←c72168)+5) ) = (word) NewWindow←P240(c←v18352);
SOURCE(4390, 65)
   if (((* (( (ptr) (* (( (ptr) formal←c72168)+4) ))+1)/* matchList←v5956 */  ) != 0)) {
SOURCE(4412, 43)
      (* (( (ptr) (* (( (ptr) formal←c72168)+4) )) + 22) ) |= 131072;
      };
SOURCE(4465, 38)
SOURCE(4467, 36)
   {
      W2 var←c66760;
      (void) MakeMask←P480((word) &var←c66760, (word) (( (bPt) (* (( (ptr) formal←c72168)+4) ))+44)/* attributes←v6124 */ );
      cnt←v18408 = var←c66760.f1;
      mask←v18380 = var←c66760.f0;
      };
SOURCE(4506, 116)
   {
      register word l←v18452;
      l←v18452 = (* (( (ptr) (* (( (ptr) formal←c72168)+4) ))+1)/* matchList←v5956 */  );
      lab←L100010: ;
      if ((l←v18452 != 0)) {
         }
      else {
         goto lab←L100007;
         };
SOURCE(4558, 64)
      {
         word pd110;
         pd110 = (* (( (ptr) (* (( (ptr) gf←c72136)+178)/* var←c66504 */  ))+20) );
         (void) ( *( (fPt) ((*  (ptr) pd110 ))))(c←v18352, (* (( (ptr) formal←c72168)+5) ), (*  (ptr) l←v18452 ), (* (( (ptr) (* (
                  ( (ptr) formal←c72168)+4) ))+22) ), pd110);
         };
      l←v18452 = (* (( (ptr) l←v18452)+1) );
      goto lab←L100010;
      lab←L100007: ;
      };
SOURCE(4633, 38)
   if (( (int)(* (( (ptr) (* (( (ptr) formal←c72168)+4) ))+10)/* depth←v6096 */  ) <  (int)0) || ( (int)(* (( (ptr) (* (( (ptr) formal←c72168)+4)
       ))+10)/* depth←v6096 */  ) >  (int)255)) {
SOURCE(4662, 9)
      (* (( (ptr) (* (( (ptr) formal←c72168)+4) ))+10)/* depth←v6096 */  ) = 0;
      };
SOURCE(4673, 25)
   {
      word pd111;
      word idx112;
      pd111 = (* (( (ptr) (* (( (ptr) gf←c72136)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd111 ))))(c←v18352, 1, (
            idx112 = (* (( (ptr) (* (( (ptr) formal←c72168)+4) ))+10)/* depth←v6096 */  ),
            BCK(idx112, 256)
            ), SGNCK((cnt←v18408 + 8)), pd111);
      };
SOURCE(4700, 18)
   {
      word pd113;
      pd113 = (* (( (ptr) (* (( (ptr) gf←c72136)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd113 ))))(c←v18352, (* (( (ptr) formal←c72168)+5) ), pd113);
      };
SOURCE(4745, 23)
   {
      word pd114;
      pd114 = (* (( (ptr) (* (( (ptr) gf←c72136)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd114 ))))(c←v18352, (* (( (ptr) (* (( (ptr) formal←c72168)+4) ))+2)/* parent←v5984 */  ), pd114)
      ;
      };
SOURCE(4787, 26)
   {
      word pd115;
      pd115 = (* (( (ptr) (* (( (ptr) gf←c72136)+177)/* var←c66440 */  ))+28) );
      (void) ( *( (fPt) ((*  (ptr) pd115 ))))(c←v18352, (*  (W2Pt) (( (ptr) (* (( (ptr) formal←c72168)+4) ))+3) ), pd115);
      };
SOURCE(4816, 26)
   {
      word pd116;
      pd116 = (* (( (ptr) (* (( (ptr) gf←c72136)+177)/* var←c66440 */  ))+29) );
      (void) ( *( (fPt) ((*  (ptr) pd116 ))))(c←v18352, (*  (W2Pt) (( (ptr) (* (( (ptr) formal←c72168)+4) ))+5) ), pd116);
      };
SOURCE(4845, 38)
   {
      word pd117;
      pd117 = (* (( (ptr) (* (( (ptr) gf←c72136)+177)/* var←c66440 */  ))+26) );
      (void) ( *( (fPt) ((*  (ptr) pd117 ))))(c←v18352, (* (( (ptr) (* (( (ptr) formal←c72168)+4) ))+7) ), pd117);
      };
SOURCE(4886, 21)
   {
      word pd118;
      pd118 = (* (( (ptr) (* (( (ptr) gf←c72136)+177)/* var←c66440 */  ))+20) );
      (void) ( *( (fPt) ((*  (ptr) pd118 ))))(c←v18352, (* (( (ptr) (* (( (ptr) formal←c72168)+4) ))+8)/* class←v6040 */  ), pd118)
      ;
      };
SOURCE(4910, 21)
   {
      word pd119;
      pd119 = (* (( (ptr) (* (( (ptr) gf←c72136)+177)/* var←c66440 */  ))+34) );
      (void) ( *( (fPt) ((*  (ptr) pd119 ))))(c←v18352, (* (( (ptr) (* (( (ptr) formal←c72168)+4) ))+9)/* visual←v6068 */  ), pd119)
      ;
      };
SOURCE(4934, 15)
   {
      word pd120;
      pd120 = (* (( (ptr) (* (( (ptr) gf←c72136)+177)/* var←c66440 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd120 ))))(c←v18352, mask←v18380, pd120);
      };
SOURCE(4961, 31)
SOURCE(4962, 30)
   (void) BPutAttributes←P420(c←v18352, (word) (( (bPt) (* (( (ptr) formal←c72168)+4) ))+44)/* attributes←v6124 */ );
SOURCE(4997, 29)
   {
      word pd121;
      pd121 = (* (( (ptr) (* (( (ptr) gf←c72136)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd121 ))))(c←v18352, (* (( (ptr) (* (( (ptr) formal←c72168)+4) ))+26)/* details←v6152 */  ), pd121)
      ;
      };
   }

static void BPutSetOfEvent←P360(c←v6256, s←v6284)
   word c←v6256;
   word s←v6284;
   {
   /* BPutSetOfEvent: */ 
SOURCE(5337, 146)
SOURCE(5414, 34)
   s←v6284 &= 2147483647;
SOURCE(5450, 33)
   {
      word c←v63672;
      word b←v63700;
      c←v63672 = c←v6256;
      b←v63700 = s←v6284;
      {
         word p←v63732;
         word n←v63760;
         p←v63732 = (* (( (ptr) c←v63672)+7) );
         n←v63760 = (* (( (ptr) c←v63672)+4) );
         (* (( (ptr) p←v63732)+((word) n←v63760 >> 2)) ) = b←v63700;
         (* (( (ptr) c←v63672)+4) ) = (n←v63760 + 4);
         };
      };
   }

static void BPutAttributes←P420(c←v6344, p←v6372)
   word c←v6344;
   word p←v6372;
   {
   register ptr gf←c72200 =  (ptr) &globalframe;
   word var←c66792;
   word p←v62960;
   word var←c66824;
   word p←v62912;
   word var←c66856;
   word e←v64024;
   word var←c66888;
   word e←v63976;
   word var←c66920;
   word cm←v62768;
   word var←c66952;
   word c←v62672;
   /* BPutAttributes: */ 
SOURCE(5489, 1200)
SOURCE(5569, 76)
   p←v62960 = (*  (ptr) p←v6372 );
   var←c66792 =  (unsigned) (p←v62960 ==  (word) -1);
   if ((0 == var←c66792)) {
SOURCE(5612, 33)
      {
         word pd122;
         pd122 = (* (( (ptr) (* (( (ptr) gf←c72200)+177)/* var←c66440 */  ))+31) );
         (void) ( *( (fPt) ((*  (ptr) pd122 ))))(c←v6344, (*  (ptr) p←v6372 ), pd122);
         };
      };
SOURCE(5647, 68)
   if (((* (( (ptr) p←v6372)+1) ) !=  (word) -1)) {
SOURCE(5687, 28)
      {
         word pd123;
         pd123 = (* (( (ptr) (* (( (ptr) gf←c72200)+177)/* var←c66440 */  ))+21) );
         (void) ( *( (fPt) ((*  (ptr) pd123 ))))(c←v6344, (* (( (ptr) p←v6372)+1) ), pd123);
         };
      };
SOURCE(5717, 69)
   p←v62912 = (* (( (ptr) p←v6372)+2) );
   var←c66824 =  (unsigned) (p←v62912 ==  (word) -1);
   if ((0 == var←c66824)) {
SOURCE(5757, 29)
      {
         word pd124;
         pd124 = (* (( (ptr) (* (( (ptr) gf←c72200)+177)/* var←c66440 */  ))+31) );
         (void) ( *( (fPt) ((*  (ptr) pd124 ))))(c←v6344, (* (( (ptr) p←v6372)+2) ), pd124);
         };
      };
SOURCE(5789, 66)
   if (((* (( (ptr) p←v6372)+3) ) !=  (word) -1)) {
SOURCE(5831, 24)
      {
         word pd125;
         pd125 = (* (( (ptr) (* (( (ptr) gf←c72200)+177)/* var←c66440 */  ))+21) );
         (void) ( *( (fPt) ((*  (ptr) pd125 ))))(c←v6344, (* (( (ptr) p←v6372)+3) ), pd125);
         };
      };
SOURCE(5857, 72)
   if (((* (( (ptr) p←v6372)+4) ) != 11)) {
SOURCE(5901, 28)
      {
         word pd126;
         pd126 = (* (( (ptr) (* (( (ptr) gf←c72200)+177)/* var←c66440 */  ))+21) );
         (void) ( *( (fPt) ((*  (ptr) pd126 ))))(c←v6344, (* (( (ptr) p←v6372)+4) ), pd126);
         };
      };
SOURCE(5932, 72)
   if (((* (( (ptr) p←v6372)+5) ) != 11)) {
SOURCE(5976, 28)
      {
         word pd127;
         pd127 = (* (( (ptr) (* (( (ptr) gf←c72200)+177)/* var←c66440 */  ))+21) );
         (void) ( *( (fPt) ((*  (ptr) pd127 ))))(c←v6344, (* (( (ptr) p←v6372)+5) ), pd127);
         };
      };
SOURCE(6006, 76)
   if (((* (( (ptr) p←v6372)+6) ) != 3)) {
SOURCE(6052, 30)
      {
         word pd128;
         pd128 = (* (( (ptr) (* (( (ptr) gf←c72200)+177)/* var←c66440 */  ))+21) );
         (void) ( *( (fPt) ((*  (ptr) pd128 ))))(c←v6344, (* (( (ptr) p←v6372)+6) ), pd128);
         };
      };
SOURCE(6084, 78)
   if (((* (( (ptr) p←v6372)+7) ) !=  (word) -1)) {
SOURCE(6131, 31)
      {
         word pd129;
         pd129 = (* (( (ptr) (* (( (ptr) gf←c72200)+177)/* var←c66440 */  ))+21) );
         (void) ( *( (fPt) ((*  (ptr) pd129 ))))(c←v6344, (* (( (ptr) p←v6372)+7) ), pd129);
         };
      };
SOURCE(6165, 68)
   if (((* (( (ptr) p←v6372)+8) ) !=  (word) -1)) {
SOURCE(6208, 25)
      {
         word pd130;
         pd130 = (* (( (ptr) (* (( (ptr) gf←c72200)+177)/* var←c66440 */  ))+21) );
         (void) ( *( (fPt) ((*  (ptr) pd130 ))))(c←v6344, (* (( (ptr) p←v6372)+8) ), pd130);
         };
      };
SOURCE(6235, 76)
   if (((* (( (ptr) p←v6372)+9) ) != 2)) {
SOURCE(6277, 34)
      {
         word pd131;
         pd131 = (* (( (ptr) (* (( (ptr) gf←c72200)+177)/* var←c66440 */  ))+21) );
         (void) ( *( (fPt) ((*  (ptr) pd131 ))))(c←v6344, (* (( (ptr) p←v6372)+9) ), pd131);
         };
      };
SOURCE(6313, 69)
   if (((* (( (ptr) p←v6372)+10) ) != 2)) {
SOURCE(6355, 27)
      {
         word pd132;
         pd132 = (* (( (ptr) (* (( (ptr) gf←c72200)+177)/* var←c66440 */  ))+21) );
         (void) ( *( (fPt) ((*  (ptr) pd132 ))))(c←v6344, (* (( (ptr) p←v6372)+10) ), pd132);
         };
      };
SOURCE(6384, 70)
   e←v64024 = (* (( (ptr) p←v6372)+11) );
   var←c66856 =  (unsigned) (e←v64024 == 0);
   if ((0 == var←c66856)) {
SOURCE(6424, 30)
      (void) BPutSetOfEvent←P360(c←v6344, (* (( (ptr) p←v6372)+11) ));
      };
SOURCE(6457, 88)
   e←v63976 = (* (( (ptr) p←v6372)+12) );
   var←c66888 =  (unsigned) (e←v63976 == 0);
   if ((0 == var←c66888)) {
SOURCE(6506, 39)
      (void) BPutSetOfEvent←P360(c←v6344, (* (( (ptr) p←v6372)+12) ));
      };
SOURCE(6547, 72)
   cm←v62768 = (* (( (ptr) p←v6372)+13) );
   var←c66920 =  (unsigned) (cm←v62768 ==  (word) -1);
   if ((0 == var←c66920)) {
SOURCE(6592, 27)
      {
         word pd133;
         pd133 = (* (( (ptr) (* (( (ptr) gf←c72200)+177)/* var←c66440 */  ))+32) );
         (void) ( *( (fPt) ((*  (ptr) pd133 ))))(c←v6344, (* (( (ptr) p←v6372)+13) ), pd133);
         };
      };
SOURCE(6621, 68)
   c←v62672 = (* (( (ptr) p←v6372)+14) );
   var←c66952 =  (unsigned) (c←v62672 ==  (word) -1);
   if ((0 == var←c66952)) {
SOURCE(6666, 23)
      {
         word pd134;
         pd134 = (* (( (ptr) (* (( (ptr) gf←c72200)+177)/* var←c66440 */  ))+35) );
         (void) ( *( (fPt) ((*  (ptr) pd134 ))))(c←v6344, (* (( (ptr) p←v6372)+14) ), pd134);
         };
      };
   }

static void MakeMask←P480(formal←c0190, p←v6444)
   word formal←c0190;
   word p←v6444;
   {
   word m←v6500;
   word c←v6528;
   /* MakeMask: */ 
SOURCE(6696, 1187)
SOURCE(6696, 1187)
   m←v6500 = 0;
SOURCE(6696, 1187)
   c←v6528 = 0;
   {
      word var←c66984;
      word p←v62864;
      word var←c67016;
      word p←v62816;
      word var←c67048;
      word e←v63928;
      word var←c67080;
      word e←v63880;
      word var←c67112;
      word cm←v62720;
      word var←c67144;
      word c←v62624;
SOURCE(6780, 69)
      p←v62864 = (*  (ptr) p←v6444 );
      var←c66984 =  (unsigned) (p←v62864 ==  (word) -1);
      if ((0 == var←c66984)) {
SOURCE(6824, 14)
         m←v6500 = (m←v6500 + 1);
SOURCE(6840, 9)
         c←v6528 = (c←v6528 + 1);
         };
SOURCE(6852, 66)
      if (((* (( (ptr) p←v6444)+1) ) !=  (word) -1)) {
SOURCE(6893, 14)
         m←v6500 = (m←v6500 + 2);
SOURCE(6909, 9)
         c←v6528 = (c←v6528 + 1);
         };
SOURCE(6921, 66)
      p←v62816 = (* (( (ptr) p←v6444)+2) );
      var←c67016 =  (unsigned) (p←v62816 ==  (word) -1);
      if ((0 == var←c67016)) {
SOURCE(6962, 14)
         m←v6500 = (m←v6500 + 4);
SOURCE(6978, 9)
         c←v6528 = (c←v6528 + 1);
         };
SOURCE(6991, 68)
      if (((* (( (ptr) p←v6444)+3) ) !=  (word) -1)) {
SOURCE(7034, 14)
         m←v6500 = (m←v6500 + 8);
SOURCE(7050, 9)
         c←v6528 = (c←v6528 + 1);
         };
SOURCE(7062, 70)
      if (((* (( (ptr) p←v6444)+4) ) != 11)) {
SOURCE(7107, 14)
         m←v6500 = (m←v6500 + 16);
SOURCE(7123, 9)
         c←v6528 = (c←v6528 + 1);
         };
SOURCE(7136, 70)
      if (((* (( (ptr) p←v6444)+5) ) != 11)) {
SOURCE(7181, 14)
         m←v6500 = (m←v6500 + 32);
SOURCE(7197, 9)
         c←v6528 = (c←v6528 + 1);
         };
SOURCE(7209, 72)
      if (((* (( (ptr) p←v6444)+6) ) != 3)) {
SOURCE(7256, 14)
         m←v6500 = (m←v6500 + 64);
SOURCE(7272, 9)
         c←v6528 = (c←v6528 + 1);
         };
SOURCE(7284, 73)
      if (((* (( (ptr) p←v6444)+7) ) !=  (word) -1)) {
SOURCE(7332, 14)
         m←v6500 = (m←v6500 + 128);
SOURCE(7348, 9)
         c←v6528 = (c←v6528 + 1);
         };
SOURCE(7361, 69)
      if (((* (( (ptr) p←v6444)+8) ) !=  (word) -1)) {
SOURCE(7405, 14)
         m←v6500 = (m←v6500 + 256);
SOURCE(7421, 9)
         c←v6528 = (c←v6528 + 1);
         };
SOURCE(7433, 68)
      if (((* (( (ptr) p←v6444)+9) ) != 2)) {
SOURCE(7476, 14)
         m←v6500 = (m←v6500 + 512);
SOURCE(7492, 9)
         c←v6528 = (c←v6528 + 1);
         };
SOURCE(7504, 68)
      if (((* (( (ptr) p←v6444)+10) ) != 2)) {
SOURCE(7547, 14)
         m←v6500 = (m←v6500 + 1024);
SOURCE(7563, 9)
         c←v6528 = (c←v6528 + 1);
         };
SOURCE(7575, 80)
      e←v63928 = (* (( (ptr) p←v6444)+11) );
      var←c67048 =  (unsigned) (e←v63928 == 0);
      if ((0 == var←c67048)) {
SOURCE(7630, 14)
         m←v6500 = (m←v6500 + 2048);
SOURCE(7646, 9)
         c←v6528 = (c←v6528 + 1);
         };
SOURCE(7658, 77)
      e←v63880 = (* (( (ptr) p←v6444)+12) );
      var←c67080 =  (unsigned) (e←v63880 == 0);
      if ((0 == var←c67080)) {
SOURCE(7710, 14)
         m←v6500 = (m←v6500 + 4096);
SOURCE(7726, 9)
         c←v6528 = (c←v6528 + 1);
         };
SOURCE(7738, 71)
      cm←v62720 = (* (( (ptr) p←v6444)+13) );
      var←c67112 =  (unsigned) (cm←v62720 ==  (word) -1);
      if ((0 == var←c67112)) {
SOURCE(7784, 14)
         m←v6500 = (m←v6500 + 8192);
SOURCE(7800, 9)
         c←v6528 = (c←v6528 + 1);
         };
SOURCE(7812, 71)
      c←v62624 = (* (( (ptr) p←v6444)+14) );
      var←c67144 =  (unsigned) (c←v62624 ==  (word) -1);
      if ((0 == var←c67144)) {
SOURCE(7858, 14)
         m←v6500 = (m←v6500 + 16384);
SOURCE(7874, 9)
         c←v6528 = (c←v6528 + 1);
         };
      };
   /* removed tail goto */ 
   (*  (ptr) formal←c0190 ) = m←v6500;
   (* (( (ptr) formal←c0190)+1) ) = c←v6528;
   return;
   }

static word CreatePixmap←P540(c←v6588, formal←c01035, formal←c01036, formal←c01037, formal←c01038)
   word c←v6588;
   word formal←c01035;
   W2 formal←c01036;
   word formal←c01037;
   word formal←c01038;
   {
   W14 var←c72232;
   /* declaration of drawable←v6616 skipped */ 
   /* declaration of size←v6644 skipped */ 
   /* declaration of depth←v6672 skipped */ 
   /* declaration of details←v6700 skipped */ 
   register ptr gf←c72264 =  (ptr) &globalframe;
   /* declaration of p←v6744 skipped */ 
   /* declaration of var←c67176 skipped */ 
   /* declaration of var←c67208 skipped */ 
   (* (( (ptr) &var←c72232)+4)/* drawable←v6616 */  ) = formal←c01035;
   (*  (W2Pt) (( (ptr) &var←c72232)+5)/* size←v6644 */  ) = formal←c01036;
   (* (( (ptr) &var←c72232)+7)/* depth←v6672 */  ) = formal←c01037;
   (* (( (ptr) &var←c72232)+8)/* details←v6700 */  ) = formal←c01038;
   /* CreatePixmap: */ 
SOURCE(7891, 528)
   {
      word tmpAddr135;
      tmpAddr135 = (word) (( (ptr) &var←c72232)+10)/* var←c67176 */ ;
      (*  (ptr) tmpAddr135 ) = ( ((word)  (fPt) action←P4764) );
      (* (( (ptr) tmpAddr135) + 1) ) = 1;
      };
   {
      word tmpAddr136;
      tmpAddr136 = (word) (( (ptr) &var←c72232)+12)/* var←c67208 */ ;
      (*  (ptr) tmpAddr136 ) = ( ((word)  (fPt) NewPixmap←P4704) );
      (* (( (ptr) tmpAddr136) + 1) ) = 1;
      };
SOURCE(7891, 528)
   (* (( (ptr) &var←c72232)+9)/* p←v6744 */  ) = 0;
SOURCE(8388, 31)
   {
      word pd137;
      pd137 = (* (( (ptr) (* (( (ptr) gf←c72264)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd137 ))))(c←v6588, (word) (( (bPt) &var←c72232)+40)/* var←c67176 */ , (* (( (ptr) &var←c72232)+8)
         /* details←v6700 */  ), pd137);
      };
SOURCE(7891, 528)
   return((* (( (ptr) &var←c72232)+9)/* p←v6744 */  ));
   }

static word NewPixmap←P4704(c←v18600, id←v18628, formal←c72296)
   word c←v18600;
   word id←v18628;
   word formal←c72296;
   {
   word p←v18672;
   formal←c72296 = (formal←c72296 - 48);
   /* NewPixmap: */ 
SOURCE(8048, 88)
SOURCE(8116, 20)
   p←v18672 = id←v18628;
SOURCE(8048, 88)
   return(p←v18672);
   }

static void action←P4764(c←v18732, formal←c72360)
   word c←v18732;
   word formal←c72360;
   {
   register ptr gf←c72328 =  (ptr) &globalframe;
   word id←v18760;
   formal←c72360 = (formal←c72360 - 40);
   /* action: */ 
SOURCE(8139, 246)
SOURCE(8172, 44)
   {
      word pd138;
      pd138 = (* (( (ptr) (* (( (ptr) gf←c72328)+179)/* var←c66696 */  ))+6) );
      id←v18760 = (word) ( *( (fPt) ((*  (ptr) pd138 ))))(c←v18732, pd138);
      };
SOURCE(8218, 20)
   (* (( (ptr) formal←c72360)+9) ) = (word) NewPixmap←P4704(c←v18732, id←v18760, (word) (( (bPt) formal←c72360)+48));
SOURCE(8240, 22)
   {
      word pd139;
      pd139 = (* (( (ptr) (* (( (ptr) gf←c72328)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd139 ))))(c←v18732, 53, (* (( (ptr) formal←c72360)+7) ), 4, pd139);
      };
SOURCE(8264, 16)
   {
      word pd140;
      pd140 = (* (( (ptr) (* (( (ptr) gf←c72328)+177)/* var←c66440 */  ))+31) );
      (void) ( *( (fPt) ((*  (ptr) pd140 ))))(c←v18732, (* (( (ptr) formal←c72360)+9) ), pd140);
      };
SOURCE(8307, 25)
   {
      word pd141;
      pd141 = (* (( (ptr) (* (( (ptr) gf←c72328)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd141 ))))(c←v18732, (* (( (ptr) formal←c72360)+4) ), pd141);
      };
SOURCE(8335, 17)
   {
      word pd142;
      pd142 = (* (( (ptr) (* (( (ptr) gf←c72328)+177)/* var←c66440 */  ))+29) );
      (void) ( *( (fPt) ((*  (ptr) pd142 ))))(c←v18732, (*  (W2Pt) (( (ptr) formal←c72360)+5) ), pd142);
      };
SOURCE(8355, 30)
   {
      word pd143;
      pd143 = (* (( (ptr) (* (( (ptr) gf←c72328)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd143 ))))(c←v18732, (* (( (ptr) formal←c72360)+8) ), pd143);
      };
   }

static void FreePixmap←P600(c←v6804, pixmap←v6832, details←v6860)
   word c←v6804;
   word pixmap←v6832;
   word details←v6860;
   {
   register ptr gf←c72392 =  (ptr) &globalframe;
   word var←c67240;
   word var←c67272;
   word err←v18804 = 0;
   /* FreePixmap: */ 
SOURCE(8425, 250)
   (void) (XR←MonitorEntry(c←v6804));
SOURCE(8532, 18)
   {
      word pd144;
      pd144 = (* (( (ptr) (* (( (ptr) gf←c72392)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd144 ))))(c←v6804, 54, 0, 2, pd144);
      };
SOURCE(8552, 21)
   {
      word pd145;
      pd145 = (* (( (ptr) (* (( (ptr) gf←c72392)+177)/* var←c66440 */  ))+31) );
      (void) ( *( (fPt) ((*  (ptr) pd145 ))))(c←v6804, pixmap←v6832, pd145);
      };
SOURCE(8575, 53)
   {
      word pd146;
      pd146 = (* (( (ptr) (* (( (ptr) gf←c72392)+177)/* var←c66440 */  ))+65) );
      err←v18804 = (word) ( *( (fPt) ((*  (ptr) pd146 ))))(c←v6804, details←v6860, pd146);
      };
SOURCE(8630, 45)
   if ((err←v18804 != 0)) {
SOURCE(8646, 29)
      var←c67240 = (* (( (ptr) (* (( (ptr) gf←c72392)+176)/* var←c66376 */  ))+4) );
      var←c67272 = (word) err←v18804;
      (void) (XR←MonitorExit(c←v6804));
      goto lab←L100024;
      };
SOURCE(8425, 250)
   (void) (XR←MonitorExit(c←v6804));
   return;
   /* c2c skipped dead code */ 
   lab←L100024: ;
SOURCE(8646, 29)
   {
      word var←c0210;
      var←c0210 = var←c67272;
      (void) XR←RaiseError(var←c67240, (word) &var←c0210);
      };
   }

static word CreateColorMap←P660(c←v6944, formal←c01039, formal←c01040, formal←c01041, formal←c01042)
   word c←v6944;
   word formal←c01039;
   word formal←c01040;
   word formal←c01041;
   word formal←c01042;
   {
   W11 var←c72424;
   /* declaration of visual←v6972 skipped */ 
   /* declaration of window←v7000 skipped */ 
   /* declaration of allocAll←v7028 skipped */ 
   /* declaration of details←v7056 skipped */ 
   register ptr gf←c72456 =  (ptr) &globalframe;
   /* declaration of colorMap←v7100 skipped */ 
   /* declaration of var←c67304 skipped */ 
   (* (( (ptr) &var←c72424)+4)/* visual←v6972 */  ) = formal←c01039;
   (* (( (ptr) &var←c72424)+5)/* window←v7000 */  ) = formal←c01040;
   (* (( (ptr) &var←c72424)+6)/* allocAll←v7028 */  ) = formal←c01041;
   (* (( (ptr) &var←c72424)+7)/* details←v7056 */  ) = formal←c01042;
   /* CreateColorMap: */ 
SOURCE(8816, 433)
   {
      word tmpAddr147;
      tmpAddr147 = (word) (( (ptr) &var←c72424)+9)/* var←c67304 */ ;
      (*  (ptr) tmpAddr147 ) = ( ((word)  (fPt) action←P4824) );
      (* (( (ptr) tmpAddr147) + 1) ) = 1;
      };
SOURCE(8816, 433)
   (* (( (ptr) &var←c72424)+8)/* colorMap←v7100 */  ) = 0;
SOURCE(9218, 31)
   {
      word pd148;
      pd148 = (* (( (ptr) (* (( (ptr) gf←c72456)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd148 ))))(c←v6944, (word) (( (bPt) &var←c72424)+36)/* var←c67304 */ , (* (( (ptr) &var←c72424)+7)
         /* details←v7056 */  ), pd148);
      };
SOURCE(8816, 433)
   return((* (( (ptr) &var←c72424)+8)/* colorMap←v7100 */  ));
   }

static void action←P4824(c←v18924, formal←c72520)
   word c←v18924;
   word formal←c72520;
   {
   register ptr gf←c72488 =  (ptr) &globalframe;
   formal←c72520 = (formal←c72520 - 36);
   /* action: */ 
SOURCE(8982, 231)
SOURCE(9015, 48)
   {
      word pd149;
      pd149 = (* (( (ptr) (* (( (ptr) gf←c72488)+179)/* var←c66696 */  ))+6) );
      (* (( (ptr) formal←c72520)+8) ) = (word) ( *( (fPt) ((*  (ptr) pd149 ))))(c←v18924, pd149);
      };
SOURCE(9065, 42)
   {
      word pd150;
      word idx151;
      pd150 = (* (( (ptr) (* (( (ptr) gf←c72488)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd150 ))))(c←v18924, 78, (
            idx151 = (word)  ( (0 != (* (( (ptr) formal←c72520)+6) )) ? 1 : 0 ) ,
            BCK(idx151, 256)
            ), 4, pd150);
      };
SOURCE(9109, 25)
   {
      word pd152;
      pd152 = (* (( (ptr) (* (( (ptr) gf←c72488)+177)/* var←c66440 */  ))+32) );
      (void) ( *( (fPt) ((*  (ptr) pd152 ))))(c←v18924, (* (( (ptr) formal←c72520)+8) ), pd152);
      };
SOURCE(9136, 23)
   {
      word pd153;
      pd153 = (* (( (ptr) (* (( (ptr) gf←c72488)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd153 ))))(c←v18924, (* (( (ptr) formal←c72520)+5) ), pd153);
      };
SOURCE(9161, 21)
   {
      word pd154;
      pd154 = (* (( (ptr) (* (( (ptr) gf←c72488)+177)/* var←c66440 */  ))+34) );
      (void) ( *( (fPt) ((*  (ptr) pd154 ))))(c←v18924, (* (( (ptr) formal←c72520)+4) ), pd154);
      };
SOURCE(9184, 29)
   {
      word pd155;
      pd155 = (* (( (ptr) (* (( (ptr) gf←c72488)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd155 ))))(c←v18924, (* (( (ptr) formal←c72520)+7) ), pd155);
      };
   }

static void FreeColorMap←P720(c←v7160, formal←c01043, formal←c01044)
   word c←v7160;
   word formal←c01043;
   word formal←c01044;
   {
   W8 var←c72552;
   /* declaration of colorMap←v7188 skipped */ 
   /* declaration of details←v7216 skipped */ 
   register ptr gf←c72584 =  (ptr) &globalframe;
   /* declaration of var←c67336 skipped */ 
   var←c72552.f4/* colorMap←v7188 */  = formal←c01043;
   var←c72552.f5/* details←v7216 */  = formal←c01044;
   /* FreeColorMap: */ 
SOURCE(9255, 229)
   {
      word tmpAddr156;
      tmpAddr156 = (word) (( (ptr) &var←c72552)+6)/* var←c67336 */ ;
      (*  (ptr) tmpAddr156 ) = ( ((word)  (fPt) action←P4884) );
      (* (( (ptr) tmpAddr156) + 1) ) = 1;
      };
SOURCE(9453, 31)
   {
      word pd157;
      pd157 = (* (( (ptr) (* (( (ptr) gf←c72584)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd157 ))))(c←v7160, (word) (( (bPt) &var←c72552)+24)/* var←c67336 */ , var←c72552.f5/* details←v7216 */ , pd157)
      ;
      };
   }

static void action←P4884(c←v19028, formal←c72648)
   word c←v19028;
   word formal←c72648;
   {
   register ptr gf←c72616 =  (ptr) &globalframe;
   formal←c72648 = (formal←c72648 - 24);
   /* action: */ 
SOURCE(9339, 109)
SOURCE(9372, 18)
   {
      word pd158;
      pd158 = (* (( (ptr) (* (( (ptr) gf←c72616)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd158 ))))(c←v19028, 79, 0, 2, pd158);
      };
SOURCE(9392, 25)
   {
      word pd159;
      pd159 = (* (( (ptr) (* (( (ptr) gf←c72616)+177)/* var←c66440 */  ))+32) );
      (void) ( *( (fPt) ((*  (ptr) pd159 ))))(c←v19028, (* (( (ptr) formal←c72648)+4) ), pd159);
      };
SOURCE(9419, 29)
   {
      word pd160;
      pd160 = (* (( (ptr) (* (( (ptr) gf←c72616)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd160 ))))(c←v19028, (* (( (ptr) formal←c72648)+5) ), pd160);
      };
   }

static word CopyColorMapAndFree←P780(c←v7276, formal←c01045, formal←c01046)
   word c←v7276;
   word formal←c01045;
   word formal←c01046;
   {
   W9 var←c72680;
   /* declaration of free←v7304 skipped */ 
   /* declaration of details←v7332 skipped */ 
   register ptr gf←c72712 =  (ptr) &globalframe;
   /* declaration of colorMap←v7376 skipped */ 
   /* declaration of var←c67368 skipped */ 
   (* (( (ptr) &var←c72680)+4)/* free←v7304 */  ) = formal←c01045;
   (* (( (ptr) &var←c72680)+5)/* details←v7332 */  ) = formal←c01046;
   /* CopyColorMapAndFree: */ 
SOURCE(9490, 349)
   {
      word tmpAddr161;
      tmpAddr161 = (word) (( (ptr) &var←c72680)+7)/* var←c67368 */ ;
      (*  (ptr) tmpAddr161 ) = ( ((word)  (fPt) action←P4944) );
      (* (( (ptr) tmpAddr161) + 1) ) = 1;
      };
SOURCE(9490, 349)
   (* (( (ptr) &var←c72680)+6)/* colorMap←v7376 */  ) = 0;
SOURCE(9808, 31)
   {
      word pd162;
      pd162 = (* (( (ptr) (* (( (ptr) gf←c72712)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd162 ))))(c←v7276, (word) (( (bPt) &var←c72680)+28)/* var←c67368 */ , (* (( (ptr) &var←c72680)+5)
         /* details←v7332 */  ), pd162);
      };
SOURCE(9490, 349)
   return((* (( (ptr) &var←c72680)+6)/* colorMap←v7376 */  ));
   }

static void action←P4944(c←v19132, formal←c72776)
   word c←v19132;
   word formal←c72776;
   {
   register ptr gf←c72744 =  (ptr) &globalframe;
   formal←c72776 = (formal←c72776 - 28);
   /* action: */ 
SOURCE(9621, 182)
SOURCE(9654, 48)
   {
      word pd163;
      pd163 = (* (( (ptr) (* (( (ptr) gf←c72744)+179)/* var←c66696 */  ))+6) );
      (* (( (ptr) formal←c72776)+6) ) = (word) ( *( (fPt) ((*  (ptr) pd163 ))))(c←v19132, pd163);
      };
SOURCE(9704, 18)
   {
      word pd164;
      pd164 = (* (( (ptr) (* (( (ptr) gf←c72744)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd164 ))))(c←v19132, 80, 0, 3, pd164);
      };
SOURCE(9724, 25)
   {
      word pd165;
      pd165 = (* (( (ptr) (* (( (ptr) gf←c72744)+177)/* var←c66440 */  ))+32) );
      (void) ( *( (fPt) ((*  (ptr) pd165 ))))(c←v19132, (* (( (ptr) formal←c72776)+6) ), pd165);
      };
SOURCE(9751, 21)
   {
      word pd166;
      pd166 = (* (( (ptr) (* (( (ptr) gf←c72744)+177)/* var←c66440 */  ))+32) );
      (void) ( *( (fPt) ((*  (ptr) pd166 ))))(c←v19132, (* (( (ptr) formal←c72776)+4) ), pd166);
      };
SOURCE(9774, 29)
   {
      word pd167;
      pd167 = (* (( (ptr) (* (( (ptr) gf←c72744)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd167 ))))(c←v19132, (* (( (ptr) formal←c72776)+5) ), pd167);
      };
   }

static void InstallColorMap←P840(c←v7436, formal←c01047, formal←c01048)
   word c←v7436;
   word formal←c01047;
   word formal←c01048;
   {
   W8 var←c72808;
   /* declaration of colorMap←v7464 skipped */ 
   /* declaration of details←v7492 skipped */ 
   register ptr gf←c72840 =  (ptr) &globalframe;
   /* declaration of var←c67400 skipped */ 
   var←c72808.f4/* colorMap←v7464 */  = formal←c01047;
   var←c72808.f5/* details←v7492 */  = formal←c01048;
   /* InstallColorMap: */ 
SOURCE(9845, 232)
   {
      word tmpAddr168;
      tmpAddr168 = (word) (( (ptr) &var←c72808)+6)/* var←c67400 */ ;
      (*  (ptr) tmpAddr168 ) = ( ((word)  (fPt) action←P5004) );
      (* (( (ptr) tmpAddr168) + 1) ) = 1;
      };
SOURCE(10046, 31)
   {
      word pd169;
      pd169 = (* (( (ptr) (* (( (ptr) gf←c72840)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd169 ))))(c←v7436, (word) (( (bPt) &var←c72808)+24)/* var←c67400 */ , var←c72808.f5/* details←v7492 */ , pd169)
      ;
      };
   }

static void action←P5004(c←v19236, formal←c72904)
   word c←v19236;
   word formal←c72904;
   {
   register ptr gf←c72872 =  (ptr) &globalframe;
   formal←c72904 = (formal←c72904 - 24);
   /* action: */ 
SOURCE(9932, 109)
SOURCE(9965, 18)
   {
      word pd170;
      pd170 = (* (( (ptr) (* (( (ptr) gf←c72872)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd170 ))))(c←v19236, 81, 0, 2, pd170);
      };
SOURCE(9985, 25)
   {
      word pd171;
      pd171 = (* (( (ptr) (* (( (ptr) gf←c72872)+177)/* var←c66440 */  ))+32) );
      (void) ( *( (fPt) ((*  (ptr) pd171 ))))(c←v19236, (* (( (ptr) formal←c72904)+4) ), pd171);
      };
SOURCE(10012, 29)
   {
      word pd172;
      pd172 = (* (( (ptr) (* (( (ptr) gf←c72872)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd172 ))))(c←v19236, (* (( (ptr) formal←c72904)+5) ), pd172);
      };
   }

static void UnInstallColorMap←P900(c←v7552, formal←c01049, formal←c01050)
   word c←v7552;
   word formal←c01049;
   word formal←c01050;
   {
   W8 var←c72936;
   /* declaration of colorMap←v7580 skipped */ 
   /* declaration of details←v7608 skipped */ 
   register ptr gf←c72968 =  (ptr) &globalframe;
   /* declaration of var←c67432 skipped */ 
   var←c72936.f4/* colorMap←v7580 */  = formal←c01049;
   var←c72936.f5/* details←v7608 */  = formal←c01050;
   /* UnInstallColorMap: */ 
SOURCE(10083, 234)
   {
      word tmpAddr173;
      tmpAddr173 = (word) (( (ptr) &var←c72936)+6)/* var←c67432 */ ;
      (*  (ptr) tmpAddr173 ) = ( ((word)  (fPt) action←P5064) );
      (* (( (ptr) tmpAddr173) + 1) ) = 1;
      };
SOURCE(10286, 31)
   {
      word pd174;
      pd174 = (* (( (ptr) (* (( (ptr) gf←c72968)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd174 ))))(c←v7552, (word) (( (bPt) &var←c72936)+24)/* var←c67432 */ , var←c72936.f5/* details←v7608 */ , pd174)
      ;
      };
   }

static void action←P5064(c←v19340, formal←c73032)
   word c←v19340;
   word formal←c73032;
   {
   register ptr gf←c73000 =  (ptr) &globalframe;
   formal←c73032 = (formal←c73032 - 24);
   /* action: */ 
SOURCE(10172, 109)
SOURCE(10205, 18)
   {
      word pd175;
      pd175 = (* (( (ptr) (* (( (ptr) gf←c73000)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd175 ))))(c←v19340, 82, 0, 2, pd175);
      };
SOURCE(10225, 25)
   {
      word pd176;
      pd176 = (* (( (ptr) (* (( (ptr) gf←c73000)+177)/* var←c66440 */  ))+32) );
      (void) ( *( (fPt) ((*  (ptr) pd176 ))))(c←v19340, (* (( (ptr) formal←c73032)+4) ), pd176);
      };
SOURCE(10252, 29)
   {
      word pd177;
      pd177 = (* (( (ptr) (* (( (ptr) gf←c73000)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd177 ))))(c←v19340, (* (( (ptr) formal←c73032)+5) ), pd177);
      };
   }

static word ListInstalledColorMaps←P960(c←v7668, formal←c01051)
   word c←v7668;
   word formal←c01051;
   {
   W8 var←c73064;
   /* declaration of window←v7696 skipped */ 
   register ptr gf←c73096 =  (ptr) &globalframe;
   word var←c7740;
   /* declaration of var←c67464 skipped */ 
   /* declaration of reply←v19368 skipped */ 
   word leng←v19396;
   word maps←v19424 = 0;
   var←c73064.f4/* window←v7696 */  = formal←c01051;
   /* ListInstalledColorMaps: */ 
SOURCE(10323, 496)
   {
      word tmpAddr178;
      tmpAddr178 = (word) (( (ptr) &var←c73064)+5)/* var←c67464 */ ;
      (*  (ptr) tmpAddr178 ) = ( ((word)  (fPt) action←P5124) );
      (* (( (ptr) tmpAddr178) + 1) ) = 1;
      };
SOURCE(10428, 12)
   var←c73064.f7/* reply←v19368 */  = 0;
SOURCE(10584, 27)
   {
      word pd179;
      pd179 = (* (( (ptr) (* (( (ptr) gf←c73096)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd179 ))))(c←v7668, (word) (( (bPt) &var←c73064)+20)/* var←c67464 */ , 0, pd179);
      };
SOURCE(10613, 17)
   {
      word pd180;
      pd180 = (* (( (ptr) (* (( (ptr) gf←c73096)+177)/* var←c66440 */  ))+68) );
      (void) ( *( (fPt) ((*  (ptr) pd180 ))))(var←c73064.f7/* reply←v19368 */ , pd180);
      };
SOURCE(10632, 14)
   (* (( (ptr) var←c73064.f7/* reply←v19368 */ )+10) ) = ((* (( (ptr) var←c73064.f7/* reply←v19368 */ )+10) ) + 7);
SOURCE(10648, 21)
   {
      word pd181;
      pd181 = (* (( (ptr) (* (( (ptr) gf←c73096)+177)/* var←c66440 */  ))+78) );
      leng←v19396 = (word) ( *( (fPt) ((*  (ptr) pd181 ))))(var←c73064.f7/* reply←v19368 */ , pd181);
      };
SOURCE(10671, 27)
   {
      word var←c67496;
      word var←c67528;
      word var←c67560;
      var←c67496 = BCK(leng←v19396, 67108863);
      var←c67528 = ((word) var←c67496 << 2);
      var←c67560 = XR←NewObject((4 + var←c67528), (* (( (ptr) gf←c73096)+21) ));
      (*  (ptr) var←c67560 ) = var←c67496;
      maps←v19424 = var←c67560;
      };
SOURCE(10700, 15)
   (* (( (ptr) var←c73064.f7/* reply←v19368 */ )+10) ) = ((* (( (ptr) var←c73064.f7/* reply←v19368 */ )+10) ) + 22);
SOURCE(10717, 54)
   {
      register word i←v19568 = 0;
      register word noName←c67592;
      noName←c67592 = leng←v19396;
      if ((i←v19568 >= noName←c67592)) {
         goto lab←L100026;
         };
      lab←L100029: ;
SOURCE(10745, 26)
      {
         word var←c67624;
         {
            word pd182;
            pd182 = (* (( (ptr) (* (( (ptr) gf←c73096)+177)/* var←c66440 */  ))+79) );
            var←c67624 = (word) ( *( (fPt) ((*  (ptr) pd182 ))))(var←c73064.f7/* reply←v19368 */ , pd182);
            };
         {
            word limit183;
            (* ((( (ptr) maps←v19424)+1)+(
                  limit183 = (*  (ptr) maps←v19424 ),
                  BCK(i←v19568, limit183)
                  )) ) = var←c67624;
            };
         };
      i←v19568 = (i←v19568 + 1);
      if ((i←v19568 < noName←c67592)) {
         goto lab←L100029;
         };
      lab←L100026: ;
      };
SOURCE(10782, 22)
   {
      word pd184;
      pd184 = (* (( (ptr) (* (( (ptr) gf←c73096)+177)/* var←c66440 */  ))+67) );
      (void) ( *( (fPt) ((*  (ptr) pd184 ))))(c←v7668, var←c73064.f7/* reply←v19368 */ , pd184);
      };
SOURCE(10806, 13)
   return(maps←v19424);
   }

static void action←P5124(c←v19540, formal←c73160)
   word c←v19540;
   word formal←c73160;
   {
   register ptr gf←c73128 =  (ptr) &globalframe;
   formal←c73160 = (formal←c73160 - 20);
   /* action: */ 
SOURCE(10475, 104)
SOURCE(10508, 18)
   {
      word pd185;
      pd185 = (* (( (ptr) (* (( (ptr) gf←c73128)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd185 ))))(c←v19540, 83, 0, 2, pd185);
      };
SOURCE(10528, 23)
   {
      word pd186;
      pd186 = (* (( (ptr) (* (( (ptr) gf←c73128)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd186 ))))(c←v19540, (* (( (ptr) formal←c73160)+4) ), pd186);
      };
SOURCE(10553, 26)
   {
      word pd187;
      pd187 = (* (( (ptr) (* (( (ptr) gf←c73128)+177)/* var←c66440 */  ))+62) );
      (* (( (ptr) formal←c73160)+7) ) = (word) ( *( (fPt) ((*  (ptr) pd187 ))))(c←v19540, pd187);
      };
   }

static void AllocColor←P1020(formal←c0261, c←v7812, formal←c01052, formal←c01053)
   word formal←c0261;
   word c←v7812;
   word formal←c01052;
   W3 formal←c01053;
   {
   W11 var←c73192;
   /* declaration of colorMap←v7840 skipped */ 
   /* declaration of color←v7868 skipped */ 
   register ptr gf←c73224 =  (ptr) &globalframe;
   word pixel←v7912;
   W3 usedColor←v7940;
   /* declaration of var←c67656 skipped */ 
   /* declaration of reply←v19640 skipped */ 
   (* (( (ptr) &var←c73192)+4)/* colorMap←v7840 */  ) = formal←c01052;
   (*  (W3Pt) (( (ptr) &var←c73192)+5)/* color←v7868 */  ) = formal←c01053;
   /* AllocColor: */ 
SOURCE(10825, 507)
   {
      word tmpAddr188;
      tmpAddr188 = (word) (( (ptr) &var←c73192)+8)/* var←c67656 */ ;
      (*  (ptr) tmpAddr188 ) = ( ((word)  (fPt) action←P5232) );
      (* (( (ptr) tmpAddr188) + 1) ) = 1;
      };
SOURCE(11093, 12)
   (* (( (ptr) &var←c73192)+10)/* reply←v19640 */  ) = 0;
SOURCE(11107, 27)
   {
      word pd189;
      pd189 = (* (( (ptr) (* (( (ptr) gf←c73224)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd189 ))))(c←v7812, (word) (( (bPt) &var←c73192)+32)/* var←c67656 */ , 0, pd189);
      };
SOURCE(11136, 17)
   {
      word pd190;
      pd190 = (* (( (ptr) (* (( (ptr) gf←c73224)+177)/* var←c66440 */  ))+68) );
      (void) ( *( (fPt) ((*  (ptr) pd190 ))))((* ((( (ptr) &var←c73192)+10)/* reply←v19640 */ ) ), pd190);
      };
SOURCE(11155, 14)
   (* (( (ptr) (* (( (ptr) &var←c73192)+10)/* reply←v19640 */  ))+10) ) = ((* (( (ptr) (* (( (ptr) &var←c73192)+10)/* reply←v19640 */  ))+10)
    ) + 7);
SOURCE(11171, 30)
   {
      word pd191;
      pd191 = (* (( (ptr) (* (( (ptr) gf←c73224)+177)/* var←c66440 */  ))+78) );
      usedColor←v7940.f0 = (word) ( *( (fPt) ((*  (ptr) pd191 ))))((* ((( (ptr) &var←c73192)+10)/* reply←v19640 */ ) ), pd191);
      };
SOURCE(11203, 32)
   {
      word pd192;
      pd192 = (* (( (ptr) (* (( (ptr) gf←c73224)+177)/* var←c66440 */  ))+78) );
      usedColor←v7940.f1 = (word) ( *( (fPt) ((*  (ptr) pd192 ))))((* ((( (ptr) &var←c73192)+10)/* reply←v19640 */ ) ), pd192);
      };
SOURCE(11237, 31)
   {
      word pd193;
      pd193 = (* (( (ptr) (* (( (ptr) gf←c73224)+177)/* var←c66440 */  ))+78) );
      usedColor←v7940.f2 = (word) ( *( (fPt) ((*  (ptr) pd193 ))))((* ((( (ptr) &var←c73192)+10)/* reply←v19640 */ ) ), pd193);
      };
SOURCE(11270, 14)
   (* (( (ptr) (* (( (ptr) &var←c73192)+10)/* reply←v19640 */  ))+10) ) = ((* (( (ptr) (* (( (ptr) &var←c73192)+10)/* reply←v19640 */  ))+10)
    ) + 2);
SOURCE(11286, 22)
   {
      word pd194;
      pd194 = (* (( (ptr) (* (( (ptr) gf←c73224)+177)/* var←c66440 */  ))+79) );
      pixel←v7912 = (word) ( *( (fPt) ((*  (ptr) pd194 ))))((* ((( (ptr) &var←c73192)+10)/* reply←v19640 */ ) ), pd194);
      };
SOURCE(11310, 22)
   {
      word pd195;
      pd195 = (* (( (ptr) (* (( (ptr) gf←c73224)+177)/* var←c66440 */  ))+67) );
      (void) ( *( (fPt) ((*  (ptr) pd195 ))))(c←v7812, (* (( (ptr) &var←c73192)+10)/* reply←v19640 */  ), pd195);
      };
   /* removed tail goto */ 
   (*  (ptr) formal←c0261 ) = pixel←v7912;
   (*  (W3Pt) (( (ptr) formal←c0261)+1) ) = usedColor←v7940;
   return;
   }

static void action←P5232(c←v19716, formal←c73288)
   word c←v19716;
   word formal←c73288;
   {
   register ptr gf←c73256 =  (ptr) &globalframe;
   formal←c73288 = (formal←c73288 - 32);
   /* action: */ 
SOURCE(10946, 142)
SOURCE(10979, 18)
   {
      word pd196;
      pd196 = (* (( (ptr) (* (( (ptr) gf←c73256)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd196 ))))(c←v19716, 84, 0, 4, pd196);
      };
SOURCE(10999, 25)
   {
      word pd197;
      pd197 = (* (( (ptr) (* (( (ptr) gf←c73256)+177)/* var←c66440 */  ))+32) );
      (void) ( *( (fPt) ((*  (ptr) pd197 ))))(c←v19716, (* (( (ptr) formal←c73288)+4) ), pd197);
      };
SOURCE(11026, 20)
   (void) BPutRGBRec←P1620(c←v19716, (*  (W3Pt) (( (ptr) formal←c73288)+5) ));
SOURCE(11048, 12)
   {
      word pd198;
      pd198 = (* (( (ptr) (* (( (ptr) gf←c73256)+177)/* var←c66440 */  ))+20) );
      (void) ( *( (fPt) ((*  (ptr) pd198 ))))(c←v19716, 0, pd198);
      };
SOURCE(11062, 26)
   {
      word pd199;
      pd199 = (* (( (ptr) (* (( (ptr) gf←c73256)+177)/* var←c66440 */  ))+62) );
      (* (( (ptr) formal←c73288)+10) ) = (word) ( *( (fPt) ((*  (ptr) pd199 ))))(c←v19716, pd199);
      };
   }

static void AllocNamedColor←P1080(formal←c0272, c←v8000, formal←c01054, formal←c01055)
   word formal←c0272;
   word c←v8000;
   word formal←c01054;
   word formal←c01055;
   {
   W10 var←c73320;
   /* declaration of colorMap←v8028 skipped */ 
   /* declaration of name←v8056 skipped */ 
   register ptr gf←c73352 =  (ptr) &globalframe;
   word pixel←v8100;
   W3 exactColor←v8128;
   W3 usedColor←v8156;
   /* declaration of var←c67688 skipped */ 
   /* declaration of reply←v19772 skipped */ 
   /* declaration of leng←v19800 skipped */ 
   (* (( (ptr) &var←c73320)+4)/* colorMap←v8028 */  ) = formal←c01054;
   (* (( (ptr) &var←c73320)+5)/* name←v8056 */  ) = formal←c01055;
   /* AllocNamedColor: */ 
SOURCE(11338, 719)
   {
      word tmpAddr200;
      tmpAddr200 = (word) (( (ptr) &var←c73320)+6)/* var←c67688 */ ;
      (*  (ptr) tmpAddr200 ) = ( ((word)  (fPt) action←P5292) );
      (* (( (ptr) tmpAddr200) + 1) ) = 1;
      };
SOURCE(11651, 12)
   (* (( (ptr) &var←c73320)+8)/* reply←v19772 */  ) = 0;
SOURCE(11665, 29)
   {
      word pd201;
      pd201 = (* (( (ptr) (* (( (ptr) gf←c73352)+180)/* var←c67720 */  ))+14) );
      (* (( (ptr) &var←c73320)+9)/* leng←v19800 */  ) = (word) ( *( (fPt) ((*  (ptr) pd201 ))))((* ((( (ptr) &var←c73320)+5)/* name←v8056 */ ) ), pd201)
      ;
      };
SOURCE(11697, 42)
   if (( (int)(* (( (ptr) &var←c73320)+9)/* leng←v19800 */  ) >  (int)(* (( (ptr) (* (( (ptr) c←v8000)+16) ))+7) ))) {
SOURCE(11739, 5)
      (void) XR←RaiseUnnamedError();
      };
SOURCE(11746, 27)
   {
      word pd202;
      pd202 = (* (( (ptr) (* (( (ptr) gf←c73352)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd202 ))))(c←v8000, (word) (( (bPt) &var←c73320)+24)/* var←c67688 */ , 0, pd202);
      };
SOURCE(11775, 17)
   {
      word pd203;
      pd203 = (* (( (ptr) (* (( (ptr) gf←c73352)+177)/* var←c66440 */  ))+68) );
      (void) ( *( (fPt) ((*  (ptr) pd203 ))))((* ((( (ptr) &var←c73320)+8)/* reply←v19772 */ ) ), pd203);
      };
SOURCE(11794, 14)
   (* (( (ptr) (* (( (ptr) &var←c73320)+8)/* reply←v19772 */  ))+10) ) = ((* (( (ptr) (* (( (ptr) &var←c73320)+8)/* reply←v19772 */  ))+10)
    ) + 7);
SOURCE(11810, 22)
   {
      word pd204;
      pd204 = (* (( (ptr) (* (( (ptr) gf←c73352)+177)/* var←c66440 */  ))+79) );
      pixel←v8100 = (word) ( *( (fPt) ((*  (ptr) pd204 ))))((* ((( (ptr) &var←c73320)+8)/* reply←v19772 */ ) ), pd204);
      };
SOURCE(11834, 31)
   {
      word pd205;
      pd205 = (* (( (ptr) (* (( (ptr) gf←c73352)+177)/* var←c66440 */  ))+78) );
      exactColor←v8128.f0 = (word) ( *( (fPt) ((*  (ptr) pd205 ))))((* ((( (ptr) &var←c73320)+8)/* reply←v19772 */ ) ), pd205);
      };
SOURCE(11867, 33)
   {
      word pd206;
      pd206 = (* (( (ptr) (* (( (ptr) gf←c73352)+177)/* var←c66440 */  ))+78) );
      exactColor←v8128.f1 = (word) ( *( (fPt) ((*  (ptr) pd206 ))))((* ((( (ptr) &var←c73320)+8)/* reply←v19772 */ ) ), pd206);
      };
SOURCE(11902, 32)
   {
      word pd207;
      pd207 = (* (( (ptr) (* (( (ptr) gf←c73352)+177)/* var←c66440 */  ))+78) );
      exactColor←v8128.f2 = (word) ( *( (fPt) ((*  (ptr) pd207 ))))((* ((( (ptr) &var←c73320)+8)/* reply←v19772 */ ) ), pd207);
      };
SOURCE(11936, 30)
   {
      word pd208;
      pd208 = (* (( (ptr) (* (( (ptr) gf←c73352)+177)/* var←c66440 */  ))+78) );
      usedColor←v8156.f0 = (word) ( *( (fPt) ((*  (ptr) pd208 ))))((* ((( (ptr) &var←c73320)+8)/* reply←v19772 */ ) ), pd208);
      };
SOURCE(11968, 32)
   {
      word pd209;
      pd209 = (* (( (ptr) (* (( (ptr) gf←c73352)+177)/* var←c66440 */  ))+78) );
      usedColor←v8156.f1 = (word) ( *( (fPt) ((*  (ptr) pd209 ))))((* ((( (ptr) &var←c73320)+8)/* reply←v19772 */ ) ), pd209);
      };
SOURCE(12002, 31)
   {
      word pd210;
      pd210 = (* (( (ptr) (* (( (ptr) gf←c73352)+177)/* var←c66440 */  ))+78) );
      usedColor←v8156.f2 = (word) ( *( (fPt) ((*  (ptr) pd210 ))))((* ((( (ptr) &var←c73320)+8)/* reply←v19772 */ ) ), pd210);
      };
SOURCE(12035, 22)
   {
      word pd211;
      pd211 = (* (( (ptr) (* (( (ptr) gf←c73352)+177)/* var←c66440 */  ))+67) );
      (void) ( *( (fPt) ((*  (ptr) pd211 ))))(c←v8000, (* (( (ptr) &var←c73320)+8)/* reply←v19772 */  ), pd211);
      };
   /* removed tail goto */ 
   (*  (ptr) formal←c0272 ) = pixel←v8100;
   (*  (W3Pt) (( (ptr) formal←c0272)+1) ) = exactColor←v8128;
   (*  (W3Pt) (( (ptr) formal←c0272)+4) ) = usedColor←v8156;
   return;
   }

static void action←P5292(c←v19876, formal←c73416)
   word c←v19876;
   word formal←c73416;
   {
   register ptr gf←c73384 =  (ptr) &globalframe;
   formal←c73416 = (formal←c73416 - 24);
   /* action: */ 
SOURCE(11473, 173)
SOURCE(11506, 29)
   {
      word pd212;
      pd212 = (* (( (ptr) (* (( (ptr) gf←c73384)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd212 ))))(c←v19876, 85, 0, (IOP2( / ,  (int)((* (( (ptr) formal←c73416)+9) ) + 3),  (int)4)
          + 3), pd212);
      };
SOURCE(11537, 25)
   {
      word pd213;
      pd213 = (* (( (ptr) (* (( (ptr) gf←c73384)+177)/* var←c66440 */  ))+32) );
      (void) ( *( (fPt) ((*  (ptr) pd213 ))))(c←v19876, (* (( (ptr) formal←c73416)+4) ), pd213);
      };
SOURCE(11564, 15)
   {
      word pd214;
      word idx215;
      pd214 = (* (( (ptr) (* (( (ptr) gf←c73384)+177)/* var←c66440 */  ))+20) );
      (void) ( *( (fPt) ((*  (ptr) pd214 ))))(c←v19876, (
            idx215 = (* (( (ptr) formal←c73416)+9) ),
            BCK(idx215, 65536)
            ), pd214);
      };
SOURCE(11581, 12)
   {
      word pd216;
      pd216 = (* (( (ptr) (* (( (ptr) gf←c73384)+177)/* var←c66440 */  ))+20) );
      (void) ( *( (fPt) ((*  (ptr) pd216 ))))(c←v19876, 0, pd216);
      };
SOURCE(11595, 23)
   {
      word pd217;
      pd217 = (* (( (ptr) (* (( (ptr) gf←c73384)+177)/* var←c66440 */  ))+37) );
      (void) ( *( (fPt) ((*  (ptr) pd217 ))))(c←v19876, (* (( (ptr) formal←c73416)+5) ), 0, 2147483647, pd217);
      };
SOURCE(11620, 26)
   {
      word pd218;
      pd218 = (* (( (ptr) (* (( (ptr) gf←c73384)+177)/* var←c66440 */  ))+62) );
      (* (( (ptr) formal←c73416)+8) ) = (word) ( *( (fPt) ((*  (ptr) pd218 ))))(c←v19876, pd218);
      };
   }

static void AllocColorCells←P1140(formal←c0295, c←v8216, formal←c01056, formal←c01057, formal←c01058, formal←c01059)
   word formal←c0295;
   word c←v8216;
   word formal←c01056;
   word formal←c01057;
   word formal←c01058;
   word formal←c01059;
   {
   W11 var←c73448;
   /* declaration of colorMap←v8244 skipped */ 
   /* declaration of colors←v8272 skipped */ 
   /* declaration of planes←v8300 skipped */ 
   /* declaration of contiguos←v8328 skipped */ 
   register ptr gf←c73480 =  (ptr) &globalframe;
   word pixels←v8372;
   word masks←v8400;
   /* declaration of var←c67752 skipped */ 
   /* declaration of reply←v19932 skipped */ 
   word n←v19960;
   word m←v19988;
   (* (( (ptr) &var←c73448)+4)/* colorMap←v8244 */  ) = formal←c01056;
   (* (( (ptr) &var←c73448)+5)/* colors←v8272 */  ) = formal←c01057;
   (* (( (ptr) &var←c73448)+6)/* planes←v8300 */  ) = formal←c01058;
   (* (( (ptr) &var←c73448)+7)/* contiguos←v8328 */  ) = formal←c01059;
   /* AllocColorCells: */ 
SOURCE(12063, 703)
   {
      word tmpAddr219;
      tmpAddr219 = (word) (( (ptr) &var←c73448)+8)/* var←c67752 */ ;
      (*  (ptr) tmpAddr219 ) = ( ((word)  (fPt) action←P5352) );
      (* (( (ptr) tmpAddr219) + 1) ) = 1;
      };
SOURCE(12063, 703)
   pixels←v8372 = 0;
SOURCE(12063, 703)
   masks←v8400 = 0;
SOURCE(12409, 12)
   (* (( (ptr) &var←c73448)+10)/* reply←v19932 */  ) = 0;
SOURCE(12437, 27)
   {
      word pd220;
      pd220 = (* (( (ptr) (* (( (ptr) gf←c73480)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd220 ))))(c←v8216, (word) (( (bPt) &var←c73448)+32)/* var←c67752 */ , 0, pd220);
      };
SOURCE(12466, 17)
   {
      word pd221;
      pd221 = (* (( (ptr) (* (( (ptr) gf←c73480)+177)/* var←c66440 */  ))+68) );
      (void) ( *( (fPt) ((*  (ptr) pd221 ))))((* ((( (ptr) &var←c73448)+10)/* reply←v19932 */ ) ), pd221);
      };
SOURCE(12485, 14)
   (* (( (ptr) (* (( (ptr) &var←c73448)+10)/* reply←v19932 */  ))+10) ) = ((* (( (ptr) (* (( (ptr) &var←c73448)+10)/* reply←v19932 */  ))+10)
    ) + 7);
SOURCE(12501, 18)
   {
      word pd222;
      pd222 = (* (( (ptr) (* (( (ptr) gf←c73480)+177)/* var←c66440 */  ))+78) );
      n←v19960 = (word) ( *( (fPt) ((*  (ptr) pd222 ))))((* ((( (ptr) &var←c73448)+10)/* reply←v19932 */ ) ), pd222);
      };
SOURCE(12521, 18)
   {
      word pd223;
      pd223 = (* (( (ptr) (* (( (ptr) gf←c73480)+177)/* var←c66440 */  ))+78) );
      m←v19988 = (word) ( *( (fPt) ((*  (ptr) pd223 ))))((* ((( (ptr) &var←c73448)+10)/* reply←v19932 */ ) ), pd223);
      };
SOURCE(12541, 15)
   (* (( (ptr) (* (( (ptr) &var←c73448)+10)/* reply←v19932 */  ))+10) ) = ((* (( (ptr) (* (( (ptr) &var←c73448)+10)/* reply←v19932 */  ))+10)
    ) + 20);
SOURCE(12558, 31)
   {
      word var←c67784;
      word var←c67816;
      var←c67784 = ((word) n←v19960 << 2);
      var←c67816 = XR←NewObject((4 + var←c67784), (* (( (ptr) gf←c73480)+22) ));
      (*  (ptr) var←c67816 ) = n←v19960;
      pixels←v8372 = var←c67816;
      };
SOURCE(12591, 50)
   {
      register word i←v20092 = 0;
      register word noName←c67848;
      noName←c67848 = n←v19960;
      if (( (int)i←v20092 >=  (int)noName←c67848)) {
         goto lab←L100033;
         };
      lab←L100036: ;
SOURCE(12615, 26)
      {
         word var←c67880;
         {
            word pd224;
            pd224 = (* (( (ptr) (* (( (ptr) gf←c73480)+177)/* var←c66440 */  ))+79) );
            var←c67880 = (word) ( *( (fPt) ((*  (ptr) pd224 ))))((* ((( (ptr) &var←c73448)+10)/* reply←v19932 */ ) ), pd224);
            };
         {
            word limit225;
            (* ((( (ptr) pixels←v8372)+1)+(
                  limit225 = (*  (ptr) pixels←v8372 ),
                  BCK(i←v20092, limit225)
                  )) ) = var←c67880;
            };
         };
      i←v20092 = (i←v20092 + 1);
      if (( (int)i←v20092 <  (int)noName←c67848)) {
         goto lab←L100036;
         };
      lab←L100033: ;
      };
SOURCE(12652, 30)
   {
      word var←c67912;
      word var←c67944;
      var←c67912 = ((word) m←v19988 << 2);
      var←c67944 = XR←NewObject((4 + var←c67912), (* (( (ptr) gf←c73480)+22) ));
      (*  (ptr) var←c67944 ) = m←v19988;
      masks←v8400 = var←c67944;
      };
SOURCE(12684, 49)
   {
      register word i←v20136 = 0;
      register word noName←c67976;
      noName←c67976 = m←v19988;
      if (( (int)i←v20136 >=  (int)noName←c67976)) {
         goto lab←L100037;
         };
      lab←L100040: ;
SOURCE(12708, 25)
      {
         word var←c68008;
         {
            word pd226;
            pd226 = (* (( (ptr) (* (( (ptr) gf←c73480)+177)/* var←c66440 */  ))+79) );
            var←c68008 = (word) ( *( (fPt) ((*  (ptr) pd226 ))))((* ((( (ptr) &var←c73448)+10)/* reply←v19932 */ ) ), pd226);
            };
         {
            word limit227;
            (* ((( (ptr) masks←v8400)+1)+(
                  limit227 = (*  (ptr) masks←v8400 ),
                  BCK(i←v20136, limit227)
                  )) ) = var←c68008;
            };
         };
      i←v20136 = (i←v20136 + 1);
      if (( (int)i←v20136 <  (int)noName←c67976)) {
         goto lab←L100040;
         };
      lab←L100037: ;
      };
SOURCE(12744, 22)
   {
      word pd228;
      pd228 = (* (( (ptr) (* (( (ptr) gf←c73480)+177)/* var←c66440 */  ))+67) );
      (void) ( *( (fPt) ((*  (ptr) pd228 ))))(c←v8216, (* (( (ptr) &var←c73448)+10)/* reply←v19932 */  ), pd228);
      };
   /* removed tail goto */ 
   (*  (ptr) formal←c0295 ) = pixels←v8372;
   (* (( (ptr) formal←c0295)+1) ) = masks←v8400;
   return;
   }

static void action←P5352(c←v20064, formal←c73544)
   word c←v20064;
   word formal←c73544;
   {
   register ptr gf←c73512 =  (ptr) &globalframe;
   formal←c73544 = (formal←c73544 - 32);
   /* action: */ 
SOURCE(12243, 161)
SOURCE(12276, 35)
   {
      word pd229;
      pd229 = (* (( (ptr) (* (( (ptr) gf←c73512)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd229 ))))(c←v20064, 86, (* (( (ptr) formal←c73544)+7) ), 3, pd229);
      };
SOURCE(12313, 25)
   {
      word pd230;
      pd230 = (* (( (ptr) (* (( (ptr) gf←c73512)+177)/* var←c66440 */  ))+32) );
      (void) ( *( (fPt) ((*  (ptr) pd230 ))))(c←v20064, (* (( (ptr) formal←c73544)+4) ), pd230);
      };
SOURCE(12340, 17)
   {
      word pd231;
      pd231 = (* (( (ptr) (* (( (ptr) gf←c73512)+177)/* var←c66440 */  ))+20) );
      (void) ( *( (fPt) ((*  (ptr) pd231 ))))(c←v20064, (* (( (ptr) formal←c73544)+5) ), pd231);
      };
SOURCE(12359, 17)
   {
      word pd232;
      pd232 = (* (( (ptr) (* (( (ptr) gf←c73512)+177)/* var←c66440 */  ))+20) );
      (void) ( *( (fPt) ((*  (ptr) pd232 ))))(c←v20064, (* (( (ptr) formal←c73544)+6) ), pd232);
      };
SOURCE(12378, 26)
   {
      word pd233;
      pd233 = (* (( (ptr) (* (( (ptr) gf←c73512)+177)/* var←c66440 */  ))+62) );
      (* (( (ptr) formal←c73544)+10) ) = (word) ( *( (fPt) ((*  (ptr) pd233 ))))(c←v20064, pd233);
      };
   }

static void AllocColorPlanes←P1200(formal←c0316, c←v8484, formal←c01060, formal←c01061, formal←c01062, formal←c01063, formal←c01064, formal←c01065)
   word formal←c0316;
   word c←v8484;
   word formal←c01060;
   word formal←c01061;
   word formal←c01062;
   word formal←c01063;
   word formal←c01064;
   word formal←c01065;
   {
   W13 var←c73576;
   /* declaration of colorMap←v8512 skipped */ 
   /* declaration of colors←v8540 skipped */ 
   /* declaration of reds←v8568 skipped */ 
   /* declaration of greens←v8596 skipped */ 
   /* declaration of blues←v8624 skipped */ 
   /* declaration of contiguos←v8652 skipped */ 
   register ptr gf←c73608 =  (ptr) &globalframe;
   word pixels←v8696;
   word redMask←v8724;
   word greenMask←v8752;
   word blueMask←v8780;
   /* declaration of var←c68040 skipped */ 
   /* declaration of reply←v20208 skipped */ 
   word n←v20236;
   (* (( (ptr) &var←c73576)+4)/* colorMap←v8512 */  ) = formal←c01060;
   (* (( (ptr) &var←c73576)+5)/* colors←v8540 */  ) = formal←c01061;
   (* (( (ptr) &var←c73576)+6)/* reds←v8568 */  ) = formal←c01062;
   (* (( (ptr) &var←c73576)+7)/* greens←v8596 */  ) = formal←c01063;
   (* (( (ptr) &var←c73576)+8)/* blues←v8624 */  ) = formal←c01064;
   (* (( (ptr) &var←c73576)+9)/* contiguos←v8652 */  ) = formal←c01065;
   /* AllocColorPlanes: */ 
SOURCE(12772, 744)
   {
      word tmpAddr234;
      tmpAddr234 = (word) (( (ptr) &var←c73576)+10)/* var←c68040 */ ;
      (*  (ptr) tmpAddr234 ) = ( ((word)  (fPt) action←P5508) );
      (* (( (ptr) tmpAddr234) + 1) ) = 1;
      };
SOURCE(12772, 744)
   pixels←v8696 = 0;
SOURCE(13178, 12)
   (* (( (ptr) &var←c73576)+12)/* reply←v20208 */  ) = 0;
SOURCE(13203, 27)
   {
      word pd235;
      pd235 = (* (( (ptr) (* (( (ptr) gf←c73608)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd235 ))))(c←v8484, (word) (( (bPt) &var←c73576)+40)/* var←c68040 */ , 0, pd235);
      };
SOURCE(13232, 17)
   {
      word pd236;
      pd236 = (* (( (ptr) (* (( (ptr) gf←c73608)+177)/* var←c66440 */  ))+68) );
      (void) ( *( (fPt) ((*  (ptr) pd236 ))))((* ((( (ptr) &var←c73576)+12)/* reply←v20208 */ ) ), pd236);
      };
SOURCE(13251, 14)
   (* (( (ptr) (* (( (ptr) &var←c73576)+12)/* reply←v20208 */  ))+10) ) = ((* (( (ptr) (* (( (ptr) &var←c73576)+12)/* reply←v20208 */  ))+10)
    ) + 7);
SOURCE(13267, 18)
   {
      word pd237;
      pd237 = (* (( (ptr) (* (( (ptr) gf←c73608)+177)/* var←c66440 */  ))+78) );
      n←v20236 = (word) ( *( (fPt) ((*  (ptr) pd237 ))))((* ((( (ptr) &var←c73576)+12)/* reply←v20208 */ ) ), pd237);
      };
SOURCE(13287, 14)
   (* (( (ptr) (* (( (ptr) &var←c73576)+12)/* reply←v20208 */  ))+10) ) = ((* (( (ptr) (* (( (ptr) &var←c73576)+12)/* reply←v20208 */  ))+10)
    ) + 2);
SOURCE(13303, 24)
   {
      word pd238;
      pd238 = (* (( (ptr) (* (( (ptr) gf←c73608)+177)/* var←c66440 */  ))+79) );
      redMask←v8724 = (word) ( *( (fPt) ((*  (ptr) pd238 ))))((* ((( (ptr) &var←c73576)+12)/* reply←v20208 */ ) ), pd238);
      };
SOURCE(13329, 26)
   {
      word pd239;
      pd239 = (* (( (ptr) (* (( (ptr) gf←c73608)+177)/* var←c66440 */  ))+79) );
      greenMask←v8752 = (word) ( *( (fPt) ((*  (ptr) pd239 ))))((* ((( (ptr) &var←c73576)+12)/* reply←v20208 */ ) ), pd239);
      };
SOURCE(13357, 25)
   {
      word pd240;
      pd240 = (* (( (ptr) (* (( (ptr) gf←c73608)+177)/* var←c66440 */  ))+79) );
      blueMask←v8780 = (word) ( *( (fPt) ((*  (ptr) pd240 ))))((* ((( (ptr) &var←c73576)+12)/* reply←v20208 */ ) ), pd240);
      };
SOURCE(13384, 14)
   (* (( (ptr) (* (( (ptr) &var←c73576)+12)/* reply←v20208 */  ))+10) ) = ((* (( (ptr) (* (( (ptr) &var←c73576)+12)/* reply←v20208 */  ))+10)
    ) + 8);
SOURCE(13400, 31)
   {
      word var←c68072;
      word var←c68104;
      var←c68072 = ((word) n←v20236 << 2);
      var←c68104 = XR←NewObject((4 + var←c68072), (* (( (ptr) gf←c73608)+22) ));
      (*  (ptr) var←c68104 ) = n←v20236;
      pixels←v8696 = var←c68104;
      };
SOURCE(13433, 50)
   {
      register word i←v20340 = 0;
      register word noName←c68136;
      noName←c68136 = n←v20236;
      if (( (int)i←v20340 >=  (int)noName←c68136)) {
         goto lab←L100042;
         };
      lab←L100045: ;
SOURCE(13457, 26)
      {
         word var←c68168;
         {
            word pd241;
            pd241 = (* (( (ptr) (* (( (ptr) gf←c73608)+177)/* var←c66440 */  ))+79) );
            var←c68168 = (word) ( *( (fPt) ((*  (ptr) pd241 ))))((* ((( (ptr) &var←c73576)+12)/* reply←v20208 */ ) ), pd241);
            };
         {
            word limit242;
            (* ((( (ptr) pixels←v8696)+1)+(
                  limit242 = (*  (ptr) pixels←v8696 ),
                  BCK(i←v20340, limit242)
                  )) ) = var←c68168;
            };
         };
      i←v20340 = (i←v20340 + 1);
      if (( (int)i←v20340 <  (int)noName←c68136)) {
         goto lab←L100045;
         };
      lab←L100042: ;
      };
SOURCE(13494, 22)
   {
      word pd243;
      pd243 = (* (( (ptr) (* (( (ptr) gf←c73608)+177)/* var←c66440 */  ))+67) );
      (void) ( *( (fPt) ((*  (ptr) pd243 ))))(c←v8484, (* (( (ptr) &var←c73576)+12)/* reply←v20208 */  ), pd243);
      };
   /* removed tail goto */ 
   (*  (ptr) formal←c0316 ) = pixels←v8696;
   (* (( (ptr) formal←c0316)+1) ) = redMask←v8724;
   (* (( (ptr) formal←c0316)+2) ) = greenMask←v8752;
   (* (( (ptr) formal←c0316)+3) ) = blueMask←v8780;
   return;
   }

static void action←P5508(c←v20312, formal←c73672)
   word c←v20312;
   word formal←c73672;
   {
   register ptr gf←c73640 =  (ptr) &globalframe;
   formal←c73672 = (formal←c73672 - 40);
   /* action: */ 
SOURCE(12977, 196)
SOURCE(13010, 35)
   {
      word pd244;
      pd244 = (* (( (ptr) (* (( (ptr) gf←c73640)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd244 ))))(c←v20312, 87, (* (( (ptr) formal←c73672)+9) ), 4, pd244);
      };
SOURCE(13047, 25)
   {
      word pd245;
      pd245 = (* (( (ptr) (* (( (ptr) gf←c73640)+177)/* var←c66440 */  ))+32) );
      (void) ( *( (fPt) ((*  (ptr) pd245 ))))(c←v20312, (* (( (ptr) formal←c73672)+4) ), pd245);
      };
SOURCE(13074, 17)
   {
      word pd246;
      pd246 = (* (( (ptr) (* (( (ptr) gf←c73640)+177)/* var←c66440 */  ))+20) );
      (void) ( *( (fPt) ((*  (ptr) pd246 ))))(c←v20312, (* (( (ptr) formal←c73672)+5) ), pd246);
      };
SOURCE(13093, 15)
   {
      word pd247;
      pd247 = (* (( (ptr) (* (( (ptr) gf←c73640)+177)/* var←c66440 */  ))+20) );
      (void) ( *( (fPt) ((*  (ptr) pd247 ))))(c←v20312, (* (( (ptr) formal←c73672)+6) ), pd247);
      };
SOURCE(13110, 17)
   {
      word pd248;
      pd248 = (* (( (ptr) (* (( (ptr) gf←c73640)+177)/* var←c66440 */  ))+20) );
      (void) ( *( (fPt) ((*  (ptr) pd248 ))))(c←v20312, (* (( (ptr) formal←c73672)+7) ), pd248);
      };
SOURCE(13129, 16)
   {
      word pd249;
      pd249 = (* (( (ptr) (* (( (ptr) gf←c73640)+177)/* var←c66440 */  ))+20) );
      (void) ( *( (fPt) ((*  (ptr) pd249 ))))(c←v20312, (* (( (ptr) formal←c73672)+8) ), pd249);
      };
SOURCE(13147, 26)
   {
      word pd250;
      pd250 = (* (( (ptr) (* (( (ptr) gf←c73640)+177)/* var←c66440 */  ))+62) );
      (* (( (ptr) formal←c73672)+12) ) = (word) ( *( (fPt) ((*  (ptr) pd250 ))))(c←v20312, pd250);
      };
   }

static void FreeColors←P1260(c←v8852, formal←c01066, pixels←v8908, formal←c01067, formal←c01068)
   word c←v8852;
   word formal←c01066;
   word pixels←v8908;
   word formal←c01067;
   word formal←c01068;
   {
   W11 var←c73704;
   /* declaration of colorMap←v8880 skipped */ 
   /* declaration of planeMask←v8936 skipped */ 
   /* declaration of details←v8964 skipped */ 
   register ptr gf←c73736 =  (ptr) &globalframe;
   /* declaration of var←c68200 skipped */ 
   /* declaration of cnt←v20412 skipped */ 
   /* declaration of pl←v20440 skipped */ 
   (* (( (ptr) &var←c73704)+4)/* colorMap←v8880 */  ) = formal←c01066;
   (* (( (ptr) &var←c73704)+5)/* planeMask←v8936 */  ) = formal←c01067;
   (* (( (ptr) &var←c73704)+6)/* details←v8964 */  ) = formal←c01068;
   /* FreeColors: */ 
SOURCE(13522, 589)
   {
      word tmpAddr251;
      tmpAddr251 = (word) (( (ptr) &var←c73704)+7)/* var←c68200 */ ;
      (*  (ptr) tmpAddr251 ) = ( ((word)  (fPt) action←P5616) );
      (* (( (ptr) tmpAddr251) + 1) ) = 1;
      };
SOURCE(13874, 12)
   (* (( (ptr) &var←c73704)+9)/* cnt←v20412 */  ) = 0;
SOURCE(13888, 4)
   (* (( (ptr) &var←c73704)+10)/* pl←v20440 */  ) = 0;
SOURCE(13937, 127)
   {
      register word l←v20628;
      l←v20628 = pixels←v8908;
      lab←L100049: ;
      if ((l←v20628 != 0)) {
         }
      else {
         goto lab←L100046;
         };
SOURCE(13991, 22)
      {
         word var←c68232;
         var←c68232 = XR←NewObject(8, (* (( (ptr) gf←c73736)+23) ));
         (*  (ptr) var←c68232 ) = (*  (ptr) l←v20628 );
         (* (( (ptr) var←c68232)+1) ) = (* (( (ptr) &var←c73704)+10)/* pl←v20440 */  );
         (* (( (ptr) &var←c73704)+10)/* pl←v20440 */  ) = var←c68232;
         };
SOURCE(14015, 11)
      (* (( (ptr) &var←c73704)+9)/* cnt←v20412 */  ) = ((* (( (ptr) &var←c73704)+9)/* cnt←v20412 */  ) + 1);
SOURCE(14028, 36)
      if (( (int)(* (( (ptr) &var←c73704)+9)/* cnt←v20412 */  ) >  (int)(* (( (ptr) (* (( (ptr) c←v8852)+16) ))+6) ))) {
SOURCE(14064, 5)
         (void) XR←RaiseUnnamedError();
         };
      l←v20628 = (* (( (ptr) l←v20628)+1) );
      goto lab←L100049;
      lab←L100046: ;
      };
SOURCE(14080, 31)
   {
      word pd252;
      pd252 = (* (( (ptr) (* (( (ptr) gf←c73736)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd252 ))))(c←v8852, (word) (( (bPt) &var←c73704)+28)/* var←c68200 */ , (* (( (ptr) &var←c73704)+6)
         /* details←v8964 */  ), pd252);
      };
   }

static void action←P5616(c←v20516, formal←c73800)
   word c←v20516;
   word formal←c73800;
   {
   register ptr gf←c73768 =  (ptr) &globalframe;
   formal←c73800 = (formal←c73800 - 28);
   /* action: */ 
SOURCE(13647, 222)
SOURCE(13680, 22)
   {
      word pd253;
      pd253 = (* (( (ptr) (* (( (ptr) gf←c73768)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd253 ))))(c←v20516, 88, 0, ((* (( (ptr) formal←c73800)+9) ) + 3), pd253);
      };
SOURCE(13704, 25)
   {
      word pd254;
      pd254 = (* (( (ptr) (* (( (ptr) gf←c73768)+177)/* var←c66440 */  ))+32) );
      (void) ( *( (fPt) ((*  (ptr) pd254 ))))(c←v20516, (* (( (ptr) formal←c73800)+4) ), pd254);
      };
SOURCE(13731, 20)
   {
      word pd255;
      pd255 = (* (( (ptr) (* (( (ptr) gf←c73768)+177)/* var←c66440 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd255 ))))(c←v20516, (* (( (ptr) formal←c73800)+5) ), pd255);
      };
SOURCE(13753, 85)
   {
      register word i←v20756 = 0;
      register word noName←c68264;
      noName←c68264 = (* (( (ptr) formal←c73800)+9) );
      if (( (int)i←v20756 >=  (int)noName←c68264)) {
         goto lab←L100050;
         };
      lab←L100053: ;
SOURCE(13780, 19)
      {
         word pd256;
         pd256 = (* (( (ptr) (* (( (ptr) gf←c73768)+177)/* var←c66440 */  ))+21) );
         (void) ( *( (fPt) ((*  (ptr) pd256 ))))(c←v20516, (*  (ptr) (* (( (ptr) formal←c73800)+10) ) ), pd256);
         };
SOURCE(13802, 36)
      if (((* (( (ptr) formal←c73800)+10) ) != 0)) {
SOURCE(13817, 21)
         (* (( (ptr) formal←c73800)+10) ) = (* (( (ptr) (* (( (ptr) formal←c73800)+10) ))+1) );
         };
      i←v20756 = (i←v20756 + 1);
      if (( (int)i←v20756 <  (int)noName←c68264)) {
         goto lab←L100053;
         };
      lab←L100050: ;
      };
SOURCE(13840, 29)
   {
      word pd257;
      pd257 = (* (( (ptr) (* (( (ptr) gf←c73768)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd257 ))))(c←v20516, (* (( (ptr) formal←c73800)+6) ), pd257);
      };
   }

static void StoreColors←P1320(c←v9108, formal←c01069, items←v9164, formal←c01070)
   word c←v9108;
   word formal←c01069;
   word items←v9164;
   word formal←c01070;
   {
   W10 var←c73832;
   /* declaration of colorMap←v9136 skipped */ 
   /* declaration of details←v9192 skipped */ 
   register ptr gf←c73864 =  (ptr) &globalframe;
   /* declaration of var←c68296 skipped */ 
   /* declaration of cnt←v20828 skipped */ 
   /* declaration of pl←v20856 skipped */ 
   (* (( (ptr) &var←c73832)+4)/* colorMap←v9136 */  ) = formal←c01069;
   (* (( (ptr) &var←c73832)+5)/* details←v9192 */  ) = formal←c01070;
   /* StoreColors: */ 
SOURCE(14117, 741)
   {
      word tmpAddr258;
      tmpAddr258 = (word) (( (ptr) &var←c73832)+6)/* var←c68296 */ ;
      (*  (ptr) tmpAddr258 ) = ( ((word)  (fPt) action←P5772) );
      (* (( (ptr) tmpAddr258) + 1) ) = 1;
      };
SOURCE(14616, 12)
   (* (( (ptr) &var←c73832)+8)/* cnt←v20828 */  ) = 0;
SOURCE(14630, 4)
   (* (( (ptr) &var←c73832)+9)/* pl←v20856 */  ) = 0;
SOURCE(14682, 129)
   {
      register word l←v21044;
      l←v21044 = items←v9164;
      lab←L100057: ;
      if ((l←v21044 != 0)) {
         }
      else {
         goto lab←L100054;
         };
SOURCE(14738, 22)
      {
         word var←c68328;
         var←c68328 = XR←NewObject(32, (* (( (ptr) gf←c73864)+24) ));
         (*  (W7Pt) var←c68328 ) = (*  (W7Pt) l←v21044 );
         (* (( (ptr) var←c68328)+7) ) = (* (( (ptr) &var←c73832)+9)/* pl←v20856 */  );
         (* (( (ptr) &var←c73832)+9)/* pl←v20856 */  ) = var←c68328;
         };
SOURCE(14762, 11)
      (* (( (ptr) &var←c73832)+8)/* cnt←v20828 */  ) = ((* (( (ptr) &var←c73832)+8)/* cnt←v20828 */  ) + 1);
SOURCE(14775, 36)
      if (( (int)(* (( (ptr) &var←c73832)+8)/* cnt←v20828 */  ) >  (int)(* (( (ptr) (* (( (ptr) c←v9108)+16) ))+6) ))) {
SOURCE(14811, 5)
         (void) XR←RaiseUnnamedError();
         };
      l←v21044 = (* (( (ptr) l←v21044)+7) );
      goto lab←L100057;
      lab←L100054: ;
      };
SOURCE(14827, 31)
   {
      word pd259;
      pd259 = (* (( (ptr) (* (( (ptr) gf←c73864)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd259 ))))(c←v9108, (word) (( (bPt) &var←c73832)+24)/* var←c68296 */ , (* (( (ptr) &var←c73832)+5)
         /* details←v9192 */  ), pd259);
      };
   }

static void action←P5772(c←v20932, formal←c73928)
   word c←v20932;
   word formal←c73928;
   {
   register ptr gf←c73896 =  (ptr) &globalframe;
   formal←c73928 = (formal←c73928 - 24);
   /* action: */ 
SOURCE(14226, 385)
SOURCE(14259, 24)
   {
      word pd260;
      pd260 = (* (( (ptr) (* (( (ptr) gf←c73896)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd260 ))))(c←v20932, 89, 0, (IOP2( * ,  (int)3,  (int)(* (( (ptr) formal←c73928)+8) )) + 2), pd260)
      ;
      };
SOURCE(14285, 25)
   {
      word pd261;
      pd261 = (* (( (ptr) (* (( (ptr) gf←c73896)+177)/* var←c66440 */  ))+32) );
      (void) ( *( (fPt) ((*  (ptr) pd261 ))))(c←v20932, (* (( (ptr) formal←c73928)+4) ), pd261);
      };
SOURCE(14312, 268)
   {
      register word i←v21172 = 0;
      register word noName←c68360;
      noName←c68360 = (* (( (ptr) formal←c73928)+8) );
      if (( (int)i←v21172 >=  (int)noName←c68360)) {
         goto lab←L100058;
         };
      lab←L100061: ;
      {
         word used←v21216 = 0;
SOURCE(14355, 36)
         if ((0 != (* (( (ptr) (* (( (ptr) formal←c73928)+9) ))+1) ))) {
SOURCE(14378, 13)
            used←v21216 = BCK((used←v21216 + 1), 256);
            };
SOURCE(14393, 38)
         if ((0 != (* (( (ptr) (* (( (ptr) formal←c73928)+9) ))+2) ))) {
SOURCE(14418, 13)
            used←v21216 = BCK((used←v21216 + 2), 256);
            };
SOURCE(14433, 37)
         if ((0 != (* (( (ptr) (* (( (ptr) formal←c73928)+9) ))+3) ))) {
SOURCE(14457, 13)
            used←v21216 = BCK((used←v21216 + 4), 256);
            };
SOURCE(14472, 25)
         {
            word pd262;
            pd262 = (* (( (ptr) (* (( (ptr) gf←c73896)+177)/* var←c66440 */  ))+21) );
            (void) ( *( (fPt) ((*  (ptr) pd262 ))))(c←v20932, (*  (ptr) (* (( (ptr) formal←c73928)+9) ) ), pd262);
            };
SOURCE(14500, 27)
         (void) BPutRGBRec←P1620(c←v20932, (*  (W3Pt) (( (ptr) (* (( (ptr) formal←c73928)+9) ))+4) ));
SOURCE(14530, 14)
         {
            word pd263;
            pd263 = (* (( (ptr) (* (( (ptr) gf←c73896)+177)/* var←c66440 */  ))+19) );
            (void) ( *( (fPt) ((*  (ptr) pd263 ))))(c←v20932, used←v21216, pd263);
            };
SOURCE(14546, 11)
         {
            word pd264;
            pd264 = (* (( (ptr) (* (( (ptr) gf←c73896)+177)/* var←c66440 */  ))+19) );
            (void) ( *( (fPt) ((*  (ptr) pd264 ))))(c←v20932, 0, pd264);
            };
SOURCE(14559, 21)
         (* (( (ptr) formal←c73928)+9) ) = (* (( (ptr) (* (( (ptr) formal←c73928)+9) ))+7) );
         };
      i←v21172 = (i←v21172 + 1);
      if (( (int)i←v21172 <  (int)noName←c68360)) {
         goto lab←L100061;
         };
      lab←L100058: ;
      };
SOURCE(14582, 29)
   {
      word pd265;
      pd265 = (* (( (ptr) (* (( (ptr) gf←c73896)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd265 ))))(c←v20932, (* (( (ptr) formal←c73928)+5) ), pd265);
      };
   }

static void StoreNamedColor←P1380(c←v9336, formal←c01071, formal←c01072, formal←c01073, doRed←v9448, doGreen←v9476, doBlue←v9504, formal←c01074)
   word c←v9336;
   word formal←c01071;
   word formal←c01072;
   word formal←c01073;
   word doRed←v9448;
   word doGreen←v9476;
   word doBlue←v9504;
   word formal←c01074;
   {
   W12 var←c73960;
   /* declaration of colorMap←v9364 skipped */ 
   /* declaration of pixel←v9392 skipped */ 
   /* declaration of name←v9420 skipped */ 
   /* declaration of details←v9532 skipped */ 
   register ptr gf←c73992 =  (ptr) &globalframe;
   /* declaration of var←c68392 skipped */ 
   /* declaration of len←v21260 skipped */ 
   /* declaration of used←v21288 skipped */ 
   (* (( (ptr) &var←c73960)+4)/* colorMap←v9364 */  ) = formal←c01071;
   (* (( (ptr) &var←c73960)+5)/* pixel←v9392 */  ) = formal←c01072;
   (* (( (ptr) &var←c73960)+6)/* name←v9420 */  ) = formal←c01073;
   (* (( (ptr) &var←c73960)+7)/* details←v9532 */  ) = formal←c01074;
   /* StoreNamedColor: */ 
SOURCE(14864, 607)
   {
      word tmpAddr266;
      tmpAddr266 = (word) (( (ptr) &var←c73960)+8)/* var←c68392 */ ;
      (*  (ptr) tmpAddr266 ) = ( ((word)  (fPt) action←P5976) );
      (* (( (ptr) tmpAddr266) + 1) ) = 1;
      };
SOURCE(15007, 28)
   {
      word pd267;
      pd267 = (* (( (ptr) (* (( (ptr) gf←c73992)+180)/* var←c67720 */  ))+14) );
      (* (( (ptr) &var←c73960)+10)/* len←v21260 */  ) = (word) ( *( (fPt) ((*  (ptr) pd267 ))))((* ((( (ptr) &var←c73960)+6)/* name←v9420 */ ) ), pd267)
      ;
      };
SOURCE(15037, 14)
   (* (( (ptr) &var←c73960)+11)/* used←v21288 */  ) = 0;
SOURCE(15253, 95)
   if (( (int)(* (( (ptr) &var←c73960)+10)/* len←v21260 */  ) >=  (int)(* (( (ptr) (* (( (ptr) c←v9336)+16) ))+7) ))) {
SOURCE(15296, 52)
      {
         word pd268;
         pd268 = (* (( (ptr) (* (( (ptr) gf←c73992)+181)/* var←c68424 */  ))+11) );
         (void) ( *( (fPt) ((*  (ptr) pd268 ))))(c←v9336, (* (( (ptr) gf←c73992)+35) ), pd268);
         };
      };
SOURCE(15350, 27)
   if ((0 != doRed←v9448)) {
SOURCE(15364, 13)
      {
         word idx269;
         (* (( (ptr) &var←c73960)+11)/* used←v21288 */  ) = (
            idx269 = (word) ((* (( (ptr) &var←c73960)+11)/* used←v21288 */  ) + 1),
            BCK(idx269, 256)
            );
         };
      };
SOURCE(15379, 29)
   if ((0 != doGreen←v9476)) {
SOURCE(15395, 13)
      {
         word idx270;
         (* (( (ptr) &var←c73960)+11)/* used←v21288 */  ) = (
            idx270 = (word) ((* (( (ptr) &var←c73960)+11)/* used←v21288 */  ) + 2),
            BCK(idx270, 256)
            );
         };
      };
SOURCE(15410, 28)
   if ((0 != doBlue←v9504)) {
SOURCE(15425, 13)
      {
         word idx271;
         (* (( (ptr) &var←c73960)+11)/* used←v21288 */  ) = (
            idx271 = (word) ((* (( (ptr) &var←c73960)+11)/* used←v21288 */  ) + 4),
            BCK(idx271, 256)
            );
         };
      };
SOURCE(15440, 31)
   {
      word pd272;
      pd272 = (* (( (ptr) (* (( (ptr) gf←c73992)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd272 ))))(c←v9336, (word) (( (bPt) &var←c73960)+32)/* var←c68392 */ , (* (( (ptr) &var←c73960)+7)
         /* details←v9532 */  ), pd272);
      };
   }

static void action←P5976(c←v21392, formal←c74056)
   word c←v21392;
   word formal←c74056;
   {
   register ptr gf←c74024 =  (ptr) &globalframe;
   formal←c74056 = (formal←c74056 - 32);
   /* action: */ 
SOURCE(15053, 195)
SOURCE(15086, 31)
   {
      word pd273;
      pd273 = (* (( (ptr) (* (( (ptr) gf←c74024)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd273 ))))(c←v21392, 90, (* (( (ptr) formal←c74056)+11) ), (IOP2( / ,  (int)((* (( (ptr) formal←c74056)+10)
             ) + 3),  (int)4) + 4), pd273);
      };
SOURCE(15119, 25)
   {
      word pd274;
      pd274 = (* (( (ptr) (* (( (ptr) gf←c74024)+177)/* var←c66440 */  ))+32) );
      (void) ( *( (fPt) ((*  (ptr) pd274 ))))(c←v21392, (* (( (ptr) formal←c74056)+4) ), pd274);
      };
SOURCE(15146, 16)
   {
      word pd275;
      pd275 = (* (( (ptr) (* (( (ptr) gf←c74024)+177)/* var←c66440 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd275 ))))(c←v21392, (* (( (ptr) formal←c74056)+5) ), pd275);
      };
SOURCE(15164, 14)
   {
      word pd276;
      word idx277;
      pd276 = (* (( (ptr) (* (( (ptr) gf←c74024)+177)/* var←c66440 */  ))+20) );
      (void) ( *( (fPt) ((*  (ptr) pd276 ))))(c←v21392, (
            idx277 = (* (( (ptr) formal←c74056)+10) ),
            BCK(idx277, 65536)
            ), pd276);
      };
SOURCE(15180, 12)
   {
      word pd278;
      pd278 = (* (( (ptr) (* (( (ptr) gf←c74024)+177)/* var←c66440 */  ))+20) );
      (void) ( *( (fPt) ((*  (ptr) pd278 ))))(c←v21392, 0, pd278);
      };
SOURCE(15194, 23)
   {
      word pd279;
      pd279 = (* (( (ptr) (* (( (ptr) gf←c74024)+177)/* var←c66440 */  ))+37) );
      (void) ( *( (fPt) ((*  (ptr) pd279 ))))(c←v21392, (* (( (ptr) formal←c74056)+6) ), 0, 2147483647, pd279);
      };
SOURCE(15219, 29)
   {
      word pd280;
      pd280 = (* (( (ptr) (* (( (ptr) gf←c74024)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd280 ))))(c←v21392, (* (( (ptr) formal←c74056)+7) ), pd280);
      };
   }

static word QueryColors←P1440(c←v9592, formal←c01075, pixels←v9648)
   word c←v9592;
   word formal←c01075;
   word pixels←v9648;
   {
   W10 var←c74088;
   /* declaration of colorMap←v9620 skipped */ 
   register ptr gf←c74120 =  (ptr) &globalframe;
   word rgbl←v9776;
   /* declaration of var←c68456 skipped */ 
   word n←v21448;
   /* declaration of reply←v21476 skipped */ 
   /* declaration of cnt←v21504 skipped */ 
   /* declaration of pl←v21532 skipped */ 
   (* (( (ptr) &var←c74088)+4)/* colorMap←v9620 */  ) = formal←c01075;
   /* QueryColors: */ 
SOURCE(15477, 829)
   {
      word tmpAddr281;
      tmpAddr281 = (word) (( (ptr) &var←c74088)+5)/* var←c68456 */ ;
      (*  (ptr) tmpAddr281 ) = ( ((word)  (fPt) action←P6036) );
      (* (( (ptr) tmpAddr281) + 1) ) = 1;
      };
SOURCE(15477, 829)
   rgbl←v9776 = 0;
SOURCE(15816, 12)
   (* (( (ptr) &var←c74088)+7)/* reply←v21476 */  ) = 0;
SOURCE(15830, 12)
   (* (( (ptr) &var←c74088)+8)/* cnt←v21504 */  ) = 0;
SOURCE(15844, 4)
   (* (( (ptr) &var←c74088)+9)/* pl←v21532 */  ) = 0;
SOURCE(15869, 126)
   {
      register word l←v21720;
      l←v21720 = pixels←v9648;
      lab←L100065: ;
      if ((l←v21720 != 0)) {
         }
      else {
         goto lab←L100062;
         };
SOURCE(15922, 22)
      {
         word var←c68488;
         var←c68488 = XR←NewObject(8, (* (( (ptr) gf←c74120)+23) ));
         (*  (ptr) var←c68488 ) = (*  (ptr) l←v21720 );
         (* (( (ptr) var←c68488)+1) ) = (* (( (ptr) &var←c74088)+9)/* pl←v21532 */  );
         (* (( (ptr) &var←c74088)+9)/* pl←v21532 */  ) = var←c68488;
         };
SOURCE(15946, 11)
      (* (( (ptr) &var←c74088)+8)/* cnt←v21504 */  ) = ((* (( (ptr) &var←c74088)+8)/* cnt←v21504 */  ) + 1);
SOURCE(15959, 36)
      if (( (int)(* (( (ptr) &var←c74088)+8)/* cnt←v21504 */  ) >  (int)(* (( (ptr) (* (( (ptr) c←v9592)+16) ))+6) ))) {
SOURCE(15995, 5)
         (void) XR←RaiseUnnamedError();
         };
      l←v21720 = (* (( (ptr) l←v21720)+1) );
      goto lab←L100065;
      lab←L100062: ;
      };
SOURCE(16011, 27)
   {
      word pd282;
      pd282 = (* (( (ptr) (* (( (ptr) gf←c74120)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd282 ))))(c←v9592, (word) (( (bPt) &var←c74088)+20)/* var←c68456 */ , 0, pd282);
      };
SOURCE(16040, 17)
   {
      word pd283;
      pd283 = (* (( (ptr) (* (( (ptr) gf←c74120)+177)/* var←c66440 */  ))+68) );
      (void) ( *( (fPt) ((*  (ptr) pd283 ))))((* ((( (ptr) &var←c74088)+7)/* reply←v21476 */ ) ), pd283);
      };
SOURCE(16059, 14)
   (* (( (ptr) (* (( (ptr) &var←c74088)+7)/* reply←v21476 */  ))+10) ) = ((* (( (ptr) (* (( (ptr) &var←c74088)+7)/* reply←v21476 */  ))+10)
    ) + 7);
SOURCE(16075, 18)
   {
      word pd284;
      pd284 = (* (( (ptr) (* (( (ptr) gf←c74120)+177)/* var←c66440 */  ))+78) );
      n←v21448 = (word) ( *( (fPt) ((*  (ptr) pd284 ))))((* ((( (ptr) &var←c74088)+7)/* reply←v21476 */ ) ), pd284);
      };
SOURCE(16095, 15)
   (* (( (ptr) (* (( (ptr) &var←c74088)+7)/* reply←v21476 */  ))+10) ) = ((* (( (ptr) (* (( (ptr) &var←c74088)+7)/* reply←v21476 */  ))+10)
    ) + 22);
SOURCE(16112, 161)
   {
      register word i←v21848 = 0;
      register word noName←c68520;
      noName←c68520 = n←v21448;
      if (( (int)i←v21848 >=  (int)noName←c68520)) {
         goto lab←L100066;
         };
      lab←L100069: ;
      {
         W3 rgb←v21892;
SOURCE(16149, 24)
         {
            word pd285;
            pd285 = (* (( (ptr) (* (( (ptr) gf←c74120)+177)/* var←c66440 */  ))+78) );
            rgb←v21892.f0 = (word) ( *( (fPt) ((*  (ptr) pd285 ))))((* ((( (ptr) &var←c74088)+7)/* reply←v21476 */ ) ), pd285);
            };
SOURCE(16175, 26)
         {
            word pd286;
            pd286 = (* (( (ptr) (* (( (ptr) gf←c74120)+177)/* var←c66440 */  ))+78) );
            rgb←v21892.f1 = (word) ( *( (fPt) ((*  (ptr) pd286 ))))((* ((( (ptr) &var←c74088)+7)/* reply←v21476 */ ) ), pd286);
            };
SOURCE(16203, 25)
         {
            word pd287;
            pd287 = (* (( (ptr) (* (( (ptr) gf←c74120)+177)/* var←c66440 */  ))+78) );
            rgb←v21892.f2 = (word) ( *( (fPt) ((*  (ptr) pd287 ))))((* ((( (ptr) &var←c74088)+7)/* reply←v21476 */ ) ), pd287);
            };
SOURCE(16230, 19)
         {
            word var←c68552;
            word pd288;
            pd288 = (* (( (ptr) (* (( (ptr) gf←c74120)+177)/* var←c66440 */  ))+78) );
            var←c68552 = (word) ( *( (fPt) ((*  (ptr) pd288 ))))((* ((( (ptr) &var←c74088)+7)/* reply←v21476 */ ) ), pd288);
            };
SOURCE(16251, 22)
         {
            word var←c68584;
            var←c68584 = XR←NewObject(16, (* (( (ptr) gf←c74120)+28) ));
            (*  (W3Pt) var←c68584 ) = rgb←v21892;
            (* (( (ptr) var←c68584)+3) ) = rgbl←v9776;
            rgbl←v9776 = var←c68584;
            };
         };
      i←v21848 = (i←v21848 + 1);
      if (( (int)i←v21848 <  (int)noName←c68520)) {
         goto lab←L100069;
         };
      lab←L100066: ;
      };
SOURCE(16284, 22)
   {
      word pd289;
      pd289 = (* (( (ptr) (* (( (ptr) gf←c74120)+177)/* var←c66440 */  ))+67) );
      (void) ( *( (fPt) ((*  (ptr) pd289 ))))(c←v9592, (* (( (ptr) &var←c74088)+7)/* reply←v21476 */  ), pd289);
      };
SOURCE(15477, 829)
   return(rgbl←v9776);
   }

static void action←P6036(c←v21608, formal←c74184)
   word c←v21608;
   word formal←c74184;
   {
   register ptr gf←c74152 =  (ptr) &globalframe;
   formal←c74184 = (formal←c74184 - 20);
   /* action: */ 
SOURCE(15603, 197)
SOURCE(15636, 22)
   {
      word pd290;
      pd290 = (* (( (ptr) (* (( (ptr) gf←c74152)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd290 ))))(c←v21608, 91, 0, ((* (( (ptr) formal←c74184)+8) ) + 2), pd290);
      };
SOURCE(15660, 25)
   {
      word pd291;
      pd291 = (* (( (ptr) (* (( (ptr) gf←c74152)+177)/* var←c66440 */  ))+32) );
      (void) ( *( (fPt) ((*  (ptr) pd291 ))))(c←v21608, (* (( (ptr) formal←c74184)+4) ), pd291);
      };
SOURCE(15687, 76)
   {
      register word i←v21936 = 0;
      register word noName←c68616;
      noName←c68616 = (* (( (ptr) formal←c74184)+8) );
      if (( (int)i←v21936 >=  (int)noName←c68616)) {
         goto lab←L100070;
         };
      lab←L100073: ;
SOURCE(15713, 20)
      {
         word c←v63540;
         word b←v63568;
         c←v63540 = c←v21608;
         b←v63568 = (*  (ptr) (* (( (ptr) formal←c74184)+9) ) );
         {
            word p←v63600;
            word n←v63628;
            p←v63600 = (* (( (ptr) c←v63540)+7) );
            n←v63628 = (* (( (ptr) c←v63540)+4) );
            (* (( (ptr) p←v63600)+((word) n←v63628 >> 2)) ) = b←v63568;
            (* (( (ptr) c←v63540)+4) ) = (n←v63628 + 4);
            };
         };
SOURCE(15736, 27)
      if (((* (( (ptr) formal←c74184)+9) ) != 0)) {
SOURCE(15751, 12)
         (* (( (ptr) formal←c74184)+9) ) = (* (( (ptr) (* (( (ptr) formal←c74184)+9) ))+1) );
         };
      i←v21936 = (i←v21936 + 1);
      if (( (int)i←v21936 <  (int)noName←c68616)) {
         goto lab←L100073;
         };
      lab←L100070: ;
      };
SOURCE(15774, 26)
   {
      word pd292;
      pd292 = (* (( (ptr) (* (( (ptr) gf←c74152)+177)/* var←c66440 */  ))+62) );
      (* (( (ptr) formal←c74184)+7) ) = (word) ( *( (fPt) ((*  (ptr) pd292 ))))(c←v21608, pd292);
      };
   }

static void LookupColor←P1500(formal←c0387, c←v9920, formal←c01076, formal←c01077)
   word formal←c0387;
   word c←v9920;
   word formal←c01076;
   word formal←c01077;
   {
   W10 var←c74216;
   /* declaration of colorMap←v9948 skipped */ 
   /* declaration of name←v9976 skipped */ 
   register ptr gf←c74248 =  (ptr) &globalframe;
   W3 exact←v10020;
   W3 used←v10048;
   /* declaration of var←c68648 skipped */ 
   /* declaration of reply←v21980 skipped */ 
   /* declaration of leng←v22036 skipped */ 
   (* (( (ptr) &var←c74216)+4)/* colorMap←v9948 */  ) = formal←c01076;
   (* (( (ptr) &var←c74216)+5)/* name←v9976 */  ) = formal←c01077;
   /* LookupColor: */ 
SOURCE(16312, 639)
   {
      word tmpAddr293;
      tmpAddr293 = (word) (( (ptr) &var←c74216)+6)/* var←c68648 */ ;
      (*  (ptr) tmpAddr293 ) = ( ((word)  (fPt) action←P6288) );
      (* (( (ptr) tmpAddr293) + 1) ) = 1;
      };
SOURCE(16419, 12)
   (* (( (ptr) &var←c74216)+8)/* reply←v21980 */  ) = 0;
SOURCE(16611, 29)
   {
      word pd294;
      pd294 = (* (( (ptr) (* (( (ptr) gf←c74248)+180)/* var←c67720 */  ))+14) );
      (* (( (ptr) &var←c74216)+9)/* leng←v22036 */  ) = (word) ( *( (fPt) ((*  (ptr) pd294 ))))((* ((( (ptr) &var←c74216)+5)/* name←v9976 */ ) ), pd294)
      ;
      };
SOURCE(16642, 45)
   if (( (int)(* (( (ptr) &var←c74216)+9)/* leng←v22036 */  ) >=  (int)(* (( (ptr) (* (( (ptr) c←v9920)+16) ))+7) ))) {
SOURCE(16687, 5)
      (void) XR←RaiseUnnamedError();
      };
SOURCE(16694, 27)
   {
      word pd295;
      pd295 = (* (( (ptr) (* (( (ptr) gf←c74248)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd295 ))))(c←v9920, (word) (( (bPt) &var←c74216)+24)/* var←c68648 */ , 0, pd295);
      };
SOURCE(16723, 17)
   {
      word pd296;
      pd296 = (* (( (ptr) (* (( (ptr) gf←c74248)+177)/* var←c66440 */  ))+68) );
      (void) ( *( (fPt) ((*  (ptr) pd296 ))))((* ((( (ptr) &var←c74216)+8)/* reply←v21980 */ ) ), pd296);
      };
SOURCE(16742, 14)
   (* (( (ptr) (* (( (ptr) &var←c74216)+8)/* reply←v21980 */  ))+10) ) = ((* (( (ptr) (* (( (ptr) &var←c74216)+8)/* reply←v21980 */  ))+10)
    ) + 7);
SOURCE(16758, 26)
   {
      word pd297;
      pd297 = (* (( (ptr) (* (( (ptr) gf←c74248)+177)/* var←c66440 */  ))+78) );
      exact←v10020.f0 = (word) ( *( (fPt) ((*  (ptr) pd297 ))))((* ((( (ptr) &var←c74216)+8)/* reply←v21980 */ ) ), pd297);
      };
SOURCE(16786, 28)
   {
      word pd298;
      pd298 = (* (( (ptr) (* (( (ptr) gf←c74248)+177)/* var←c66440 */  ))+78) );
      exact←v10020.f1 = (word) ( *( (fPt) ((*  (ptr) pd298 ))))((* ((( (ptr) &var←c74216)+8)/* reply←v21980 */ ) ), pd298);
      };
SOURCE(16816, 27)
   {
      word pd299;
      pd299 = (* (( (ptr) (* (( (ptr) gf←c74248)+177)/* var←c66440 */  ))+78) );
      exact←v10020.f2 = (word) ( *( (fPt) ((*  (ptr) pd299 ))))((* ((( (ptr) &var←c74216)+8)/* reply←v21980 */ ) ), pd299);
      };
SOURCE(16845, 25)
   {
      word pd300;
      pd300 = (* (( (ptr) (* (( (ptr) gf←c74248)+177)/* var←c66440 */  ))+78) );
      used←v10048.f0 = (word) ( *( (fPt) ((*  (ptr) pd300 ))))((* ((( (ptr) &var←c74216)+8)/* reply←v21980 */ ) ), pd300);
      };
SOURCE(16872, 27)
   {
      word pd301;
      pd301 = (* (( (ptr) (* (( (ptr) gf←c74248)+177)/* var←c66440 */  ))+78) );
      used←v10048.f1 = (word) ( *( (fPt) ((*  (ptr) pd301 ))))((* ((( (ptr) &var←c74216)+8)/* reply←v21980 */ ) ), pd301);
      };
SOURCE(16901, 26)
   {
      word pd302;
      pd302 = (* (( (ptr) (* (( (ptr) gf←c74248)+177)/* var←c66440 */  ))+78) );
      used←v10048.f2 = (word) ( *( (fPt) ((*  (ptr) pd302 ))))((* ((( (ptr) &var←c74216)+8)/* reply←v21980 */ ) ), pd302);
      };
SOURCE(16929, 22)
   {
      word pd303;
      pd303 = (* (( (ptr) (* (( (ptr) gf←c74248)+177)/* var←c66440 */  ))+67) );
      (void) ( *( (fPt) ((*  (ptr) pd303 ))))(c←v9920, (* (( (ptr) &var←c74216)+8)/* reply←v21980 */  ), pd303);
      };
   /* removed tail goto */ 
   (*  (W3Pt) formal←c0387 ) = exact←v10020;
   (*  (W3Pt) (( (ptr) formal←c0387)+3) ) = used←v10048;
   return;
   }

static void action←P6288(c←v22112, formal←c74312)
   word c←v22112;
   word formal←c74312;
   {
   register ptr gf←c74280 =  (ptr) &globalframe;
   formal←c74312 = (formal←c74312 - 24);
   /* action: */ 
SOURCE(16433, 173)
SOURCE(16466, 29)
   {
      word pd304;
      pd304 = (* (( (ptr) (* (( (ptr) gf←c74280)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd304 ))))(c←v22112, 92, 0, (IOP2( / ,  (int)((* (( (ptr) formal←c74312)+9) ) + 3),  (int)4)
          + 3), pd304);
      };
SOURCE(16497, 25)
   {
      word pd305;
      pd305 = (* (( (ptr) (* (( (ptr) gf←c74280)+177)/* var←c66440 */  ))+32) );
      (void) ( *( (fPt) ((*  (ptr) pd305 ))))(c←v22112, (* (( (ptr) formal←c74312)+4) ), pd305);
      };
SOURCE(16524, 15)
   {
      word pd306;
      word idx307;
      pd306 = (* (( (ptr) (* (( (ptr) gf←c74280)+177)/* var←c66440 */  ))+20) );
      (void) ( *( (fPt) ((*  (ptr) pd306 ))))(c←v22112, (
            idx307 = (* (( (ptr) formal←c74312)+9) ),
            BCK(idx307, 65536)
            ), pd306);
      };
SOURCE(16541, 12)
   {
      word pd308;
      pd308 = (* (( (ptr) (* (( (ptr) gf←c74280)+177)/* var←c66440 */  ))+20) );
      (void) ( *( (fPt) ((*  (ptr) pd308 ))))(c←v22112, 0, pd308);
      };
SOURCE(16555, 23)
   {
      word pd309;
      pd309 = (* (( (ptr) (* (( (ptr) gf←c74280)+177)/* var←c66440 */  ))+37) );
      (void) ( *( (fPt) ((*  (ptr) pd309 ))))(c←v22112, (* (( (ptr) formal←c74312)+5) ), 0, 2147483647, pd309);
      };
SOURCE(16580, 26)
   {
      word pd310;
      pd310 = (* (( (ptr) (* (( (ptr) gf←c74280)+177)/* var←c66440 */  ))+62) );
      (* (( (ptr) formal←c74312)+8) ) = (word) ( *( (fPt) ((*  (ptr) pd310 ))))(c←v22112, pd310);
      };
   }

static void BPutRGB←P1560(c←v10108, rgb←v10136)
   word c←v10108;
   word rgb←v10136;
   {
   register ptr gf←c74344 =  (ptr) &globalframe;
   /* BPutRGB: */ 
SOURCE(16957, 121)
SOURCE(17030, 27)
   if ((rgb←v10136 == 0)) {
SOURCE(17046, 11)
      rgb←v10136 = (* (( (ptr) gf←c74344)+5)/* black←v3448 */  );
      };
SOURCE(17059, 19)
   (void) BPutRGBRec←P1620(c←v10108, (*  (W3Pt) rgb←v10136 ));
   }

static void BPutRGBRec←P1620(c←v10208, rgb←v10236)
   word c←v10208;
   W3 rgb←v10236;
   {
   /* BPutRGBRec: */ 
SOURCE(17084, 127)
SOURCE(17147, 19)
   {
      word c←v62548;
      word b←v62576;
      c←v62548 = c←v10208;
      b←v62576 = rgb←v10236.f0;
      {
         word n←v46880;
         word p←v46912;
         n←v46880 = (* (( (ptr) c←v62548)+4) );
         p←v46912 = (* (( (ptr) c←v62548)+7) );
         (* (( (hPt) p←v46912)+((word) n←v46880 >> 1)) ) = b←v62576;
         (* (( (ptr) c←v62548)+4) ) = (n←v46880 + 2);
         };
      };
SOURCE(17168, 21)
   {
      word c←v62416;
      word b←v62444;
      c←v62416 = c←v10208;
      b←v62444 = rgb←v10236.f1;
      {
         word n←v62476;
         word p←v62504;
         n←v62476 = (* (( (ptr) c←v62416)+4) );
         p←v62504 = (* (( (ptr) c←v62416)+7) );
         (* (( (hPt) p←v62504)+((word) n←v62476 >> 1)) ) = b←v62444;
         (* (( (ptr) c←v62416)+4) ) = (n←v62476 + 2);
         };
      };
SOURCE(17191, 20)
   {
      word c←v62284;
      word b←v62312;
      c←v62284 = c←v10208;
      b←v62312 = rgb←v10236.f2;
      {
         word n←v62344;
         word p←v62372;
         n←v62344 = (* (( (ptr) c←v62284)+4) );
         p←v62372 = (* (( (ptr) c←v62284)+7) );
         (* (( (hPt) p←v62372)+((word) n←v62344 >> 1)) ) = b←v62312;
         (* (( (ptr) c←v62284)+4) ) = (n←v62344 + 2);
         };
      };
   }

static word NewCursor←P1680(c←v10296, id←v10324)
   word c←v10296;
   word id←v10324;
   {
   register ptr gf←c74376 =  (ptr) &globalframe;
   word var←c10368;
   /* NewCursor: */ 
SOURCE(17217, 130)
SOURCE(17282, 48)
   {
      word pd311;
      pd311 = (* (( (ptr) (* (( (ptr) gf←c74376)+179)/* var←c66696 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd311 ))))(c←v10296, id←v10324, (* (( (ptr) gf←c74376)+32) ), pd311);
      };
SOURCE(17332, 15)
   return(id←v10324);
   }

static word CreateCursor←P1740(c←v10428, formal←c01078, formal←c01079, formal←c01080, formal←c01081, formal←c01082, formal←c01083)
   word c←v10428;
   word formal←c01078;
   word formal←c01079;
   W2 formal←c01080;
   word formal←c01081;
   word formal←c01082;
   word formal←c01083;
   {
   W14 var←c74408;
   /* declaration of source←v10456 skipped */ 
   /* declaration of mask←v10484 skipped */ 
   /* declaration of hotP←v10512 skipped */ 
   /* declaration of foreground←v10540 skipped */ 
   /* declaration of background←v10568 skipped */ 
   /* declaration of details←v10596 skipped */ 
   register ptr gf←c74440 =  (ptr) &globalframe;
   /* declaration of cursor←v10664 skipped */ 
   /* declaration of var←c68680 skipped */ 
   (* (( (ptr) &var←c74408)+4)/* source←v10456 */  ) = formal←c01078;
   (* (( (ptr) &var←c74408)+5)/* mask←v10484 */  ) = formal←c01079;
   (*  (W2Pt) (( (ptr) &var←c74408)+6)/* hotP←v10512 */  ) = formal←c01080;
   (* (( (ptr) &var←c74408)+8)/* foreground←v10540 */  ) = formal←c01081;
   (* (( (ptr) &var←c74408)+9)/* background←v10568 */  ) = formal←c01082;
   (* (( (ptr) &var←c74408)+10)/* details←v10596 */  ) = formal←c01083;
   /* CreateCursor: */ 
SOURCE(17353, 621)
   {
      word tmpAddr312;
      tmpAddr312 = (word) (( (ptr) &var←c74408)+12)/* var←c68680 */ ;
      (*  (ptr) tmpAddr312 ) = ( ((word)  (fPt) action←P6348) );
      (* (( (ptr) tmpAddr312) + 1) ) = 1;
      };
SOURCE(17353, 621)
   (* (( (ptr) &var←c74408)+11)/* cursor←v10664 */  ) = 0;
SOURCE(17943, 31)
   {
      word pd313;
      pd313 = (* (( (ptr) (* (( (ptr) gf←c74440)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd313 ))))(c←v10428, (word) (( (bPt) &var←c74408)+48)/* var←c68680 */ , (* (( (ptr) &var←c74408)+10)
         /* details←v10596 */  ), pd313);
      };
SOURCE(17353, 621)
   return((* (( (ptr) &var←c74408)+11)/* cursor←v10664 */  ));
   }

static void action←P6348(c←v22216, formal←c74504)
   word c←v22216;
   word formal←c74504;
   {
   register ptr gf←c74472 =  (ptr) &globalframe;
   formal←c74504 = (formal←c74504 - 48);
   /* action: */ 
SOURCE(17593, 345)
SOURCE(17626, 58)
   {
      word var←c68712;
      {
         word pd314;
         pd314 = (* (( (ptr) (* (( (ptr) gf←c74472)+179)/* var←c66696 */  ))+6) );
         var←c68712 = (word) ( *( (fPt) ((*  (ptr) pd314 ))))(c←v22216, pd314);
         };
      (* (( (ptr) formal←c74504)+11) ) = (word) NewCursor←P1680(c←v22216, var←c68712);
      };
SOURCE(17686, 18)
   {
      word pd315;
      pd315 = (* (( (ptr) (* (( (ptr) gf←c74472)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd315 ))))(c←v22216, 93, 0, 8, pd315);
      };
SOURCE(17706, 21)
   {
      word pd316;
      pd316 = (* (( (ptr) (* (( (ptr) gf←c74472)+177)/* var←c66440 */  ))+35) );
      (void) ( *( (fPt) ((*  (ptr) pd316 ))))(c←v22216, (* (( (ptr) formal←c74504)+11) ), pd316);
      };
SOURCE(17729, 21)
   {
      word pd317;
      pd317 = (* (( (ptr) (* (( (ptr) gf←c74472)+177)/* var←c66440 */  ))+31) );
      (void) ( *( (fPt) ((*  (ptr) pd317 ))))(c←v22216, (* (( (ptr) formal←c74504)+4) ), pd317);
      };
SOURCE(17752, 19)
   {
      word pd318;
      pd318 = (* (( (ptr) (* (( (ptr) gf←c74472)+177)/* var←c66440 */  ))+31) );
      (void) ( *( (fPt) ((*  (ptr) pd318 ))))(c←v22216, (* (( (ptr) formal←c74504)+5) ), pd318);
      };
SOURCE(17773, 56)
   (void) BPutRGB←P1560(c←v22216,  ( ((* (( (ptr) formal←c74504)+8) ) == 0) ? (* (( (ptr) gf←c74472)+5)/* black←v3448 */  ) : (* (
         ( (ptr) formal←c74504)+8) ) ) );
SOURCE(17831, 56)
   (void) BPutRGB←P1560(c←v22216,  ( ((* (( (ptr) formal←c74504)+9) ) == 0) ? (* (( (ptr) gf←c74472)+4)/* white←v3420 */  ) : (* (
         ( (ptr) formal←c74504)+9) ) ) );
SOURCE(17889, 18)
   {
      word pd319;
      pd319 = (* (( (ptr) (* (( (ptr) gf←c74472)+177)/* var←c66440 */  ))+28) );
      (void) ( *( (fPt) ((*  (ptr) pd319 ))))(c←v22216, (*  (W2Pt) (( (ptr) formal←c74504)+6) ), pd319);
      };
SOURCE(17909, 29)
   {
      word pd320;
      pd320 = (* (( (ptr) (* (( (ptr) gf←c74472)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd320 ))))(c←v22216, (* (( (ptr) formal←c74504)+10) ), pd320);
      };
   }

static word CreateGlyphCursor←P1800(c←v10724, sourceFont←v10752, maskFont←v10780, formal←c01084, formal←c01085, formal←c01086, formal←c01087, formal←c01088)
   word c←v10724;
   word sourceFont←v10752;
   word maskFont←v10780;
   word formal←c01084;
   word formal←c01085;
   word formal←c01086;
   word formal←c01087;
   word formal←c01088;
   {
   W14 var←c74536;
   /* declaration of sourceChar←v10808 skipped */ 
   /* declaration of maskChar←v10836 skipped */ 
   /* declaration of foreground←v10864 skipped */ 
   /* declaration of background←v10892 skipped */ 
   /* declaration of details←v10920 skipped */ 
   register ptr gf←c74568 =  (ptr) &globalframe;
   /* declaration of cursor←v10988 skipped */ 
   /* declaration of var←c68744 skipped */ 
   /* declaration of sourceFontId←v22244 skipped */ 
   /* declaration of maskFontId←v22272 skipped */ 
   (* (( (ptr) &var←c74536)+4)/* sourceChar←v10808 */  ) = formal←c01084;
   (* (( (ptr) &var←c74536)+5)/* maskChar←v10836 */  ) = formal←c01085;
   (* (( (ptr) &var←c74536)+6)/* foreground←v10864 */  ) = formal←c01086;
   (* (( (ptr) &var←c74536)+7)/* background←v10892 */  ) = formal←c01087;
   (* (( (ptr) &var←c74536)+8)/* details←v10920 */  ) = formal←c01088;
   /* CreateGlyphCursor: */ 
SOURCE(17980, 890)
   {
      word tmpAddr321;
      tmpAddr321 = (word) (( (ptr) &var←c74536)+10)/* var←c68744 */ ;
      (*  (ptr) tmpAddr321 ) = ( ((word)  (fPt) action←P6408) );
      (* (( (ptr) tmpAddr321) + 1) ) = 1;
      };
SOURCE(17980, 890)
   (* (( (ptr) &var←c74536)+9)/* cursor←v10988 */  ) = 0;
SOURCE(18660, 72)
   if ((sourceFont←v10752 == 0)) {
SOURCE(18683, 49)
      {
         word pd322;
         pd322 = (* (( (ptr) (* (( (ptr) gf←c74568)+181)/* var←c68424 */  ))+11) );
         (void) ( *( (fPt) ((*  (ptr) pd322 ))))(c←v10724, (* (( (ptr) gf←c74568)+31) ), pd322);
         };
      };
SOURCE(18734, 36)
   {
      word pd323;
      pd323 = (* (( (ptr) (* (( (ptr) gf←c74568)+176)/* var←c66376 */  ))+7) );
      (* (( (ptr) &var←c74536)+12)/* sourceFontId←v22244 */  ) = (word) ( *( (fPt) ((*  (ptr) pd323 ))))(sourceFont←v10752, pd323)
      ;
      };
SOURCE(18772, 65)
   {
      word pd324;
      if ((maskFont←v10780 == 0)) {
         (* (( (ptr) &var←c74536)+13)/* maskFontId←v22272 */  ) = 0;
         }
      else {
         pd324 = (* (( (ptr) (* (( (ptr) gf←c74568)+176)/* var←c66376 */  ))+7) );
         (* (( (ptr) &var←c74536)+13)/* maskFontId←v22272 */  ) = (word) ( *( (fPt) ((*  (ptr) pd324 ))))(maskFont←v10780, pd324);
         };
      };
SOURCE(18839, 31)
   {
      word pd325;
      pd325 = (* (( (ptr) (* (( (ptr) gf←c74568)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd325 ))))(c←v10724, (word) (( (bPt) &var←c74536)+40)/* var←c68744 */ , (* (( (ptr) &var←c74536)+8)
         /* details←v10920 */  ), pd325);
      };
SOURCE(17980, 890)
   return((* (( (ptr) &var←c74536)+9)/* cursor←v10988 */  ));
   }

static void action←P6408(c←v22376, formal←c74632)
   word c←v22376;
   word formal←c74632;
   {
   register ptr gf←c74600 =  (ptr) &globalframe;
   formal←c74632 = (formal←c74632 - 40);
   /* action: */ 
SOURCE(18282, 373)
SOURCE(18315, 58)
   {
      word var←c68776;
      {
         word pd326;
         pd326 = (* (( (ptr) (* (( (ptr) gf←c74600)+179)/* var←c66696 */  ))+6) );
         var←c68776 = (word) ( *( (fPt) ((*  (ptr) pd326 ))))(c←v22376, pd326);
         };
      (* (( (ptr) formal←c74632)+9) ) = (word) NewCursor←P1680(c←v22376, var←c68776);
      };
SOURCE(18375, 18)
   {
      word pd327;
      pd327 = (* (( (ptr) (* (( (ptr) gf←c74600)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd327 ))))(c←v22376, 94, 0, 8, pd327);
      };
SOURCE(18395, 21)
   {
      word pd328;
      pd328 = (* (( (ptr) (* (( (ptr) gf←c74600)+177)/* var←c66440 */  ))+35) );
      (void) ( *( (fPt) ((*  (ptr) pd328 ))))(c←v22376, (* (( (ptr) formal←c74632)+9) ), pd328);
      };
SOURCE(18418, 23)
   {
      word pd329;
      pd329 = (* (( (ptr) (* (( (ptr) gf←c74600)+177)/* var←c66440 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd329 ))))(c←v22376, (* (( (ptr) formal←c74632)+12) ), pd329);
      };
SOURCE(18443, 21)
   {
      word pd330;
      pd330 = (* (( (ptr) (* (( (ptr) gf←c74600)+177)/* var←c66440 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd330 ))))(c←v22376, (* (( (ptr) formal←c74632)+13) ), pd330);
      };
SOURCE(18466, 21)
   {
      word pd331;
      pd331 = (* (( (ptr) (* (( (ptr) gf←c74600)+177)/* var←c66440 */  ))+20) );
      (void) ( *( (fPt) ((*  (ptr) pd331 ))))(c←v22376, (* (( (ptr) formal←c74632)+4) ), pd331);
      };
SOURCE(18489, 19)
   {
      word pd332;
      pd332 = (* (( (ptr) (* (( (ptr) gf←c74600)+177)/* var←c66440 */  ))+20) );
      (void) ( *( (fPt) ((*  (ptr) pd332 ))))(c←v22376, (* (( (ptr) formal←c74632)+5) ), pd332);
      };
SOURCE(18510, 56)
   (void) BPutRGB←P1560(c←v22376,  ( ((* (( (ptr) formal←c74632)+6) ) == 0) ? (* (( (ptr) gf←c74600)+5)/* black←v3448 */  ) : (* (
         ( (ptr) formal←c74632)+6) ) ) );
SOURCE(18568, 56)
   (void) BPutRGB←P1560(c←v22376,  ( ((* (( (ptr) formal←c74632)+7) ) == 0) ? (* (( (ptr) gf←c74600)+4)/* white←v3420 */  ) : (* (
         ( (ptr) formal←c74632)+7) ) ) );
SOURCE(18626, 29)
   {
      word pd333;
      pd333 = (* (( (ptr) (* (( (ptr) gf←c74600)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd333 ))))(c←v22376, (* (( (ptr) formal←c74632)+8) ), pd333);
      };
   }

static void ReColorCursor←P1860(c←v11048, formal←c01089, formal←c01090, formal←c01091, formal←c01092)
   word c←v11048;
   word formal←c01089;
   word formal←c01090;
   word formal←c01091;
   word formal←c01092;
   {
   W10 var←c74664;
   /* declaration of cursor←v11076 skipped */ 
   /* declaration of foreground←v11104 skipped */ 
   /* declaration of background←v11132 skipped */ 
   /* declaration of details←v11160 skipped */ 
   register ptr gf←c74696 =  (ptr) &globalframe;
   /* declaration of var←c68808 skipped */ 
   (* (( (ptr) &var←c74664)+4)/* cursor←v11076 */  ) = formal←c01089;
   (* (( (ptr) &var←c74664)+5)/* foreground←v11104 */  ) = formal←c01090;
   (* (( (ptr) &var←c74664)+6)/* background←v11132 */  ) = formal←c01091;
   (* (( (ptr) &var←c74664)+7)/* details←v11160 */  ) = formal←c01092;
   /* ReColorCursor: */ 
SOURCE(18876, 694)
   {
      word tmpAddr334;
      tmpAddr334 = (word) (( (ptr) &var←c74664)+8)/* var←c68808 */ ;
      (*  (ptr) tmpAddr334 ) = ( ((word)  (fPt) action←P6468) );
      (* (( (ptr) tmpAddr334) + 1) ) = 1;
      };
SOURCE(19265, 59)
   {
      word pd335;
      pd335 = (* (( (ptr) (* (( (ptr) gf←c74696)+179)/* var←c66696 */  ))+12) );
      if (((word) ( *( (fPt) ((*  (ptr) pd335 ))))(c←v11048, (* (( (ptr) &var←c74664)+4)/* cursor←v11076 */  ), pd335) != (* (( (ptr) gf←c74696)+32)
       ))) {
SOURCE(19324, 5)
         (void) XR←RaiseUnnamedError();
         };
      };
SOURCE(19539, 31)
   {
      word pd336;
      pd336 = (* (( (ptr) (* (( (ptr) gf←c74696)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd336 ))))(c←v11048, (word) (( (bPt) &var←c74664)+32)/* var←c68808 */ , (* (( (ptr) &var←c74664)+7)
         /* details←v11160 */  ), pd336);
      };
   }

static void action←P6468(c←v22480, formal←c74760)
   word c←v22480;
   word formal←c74760;
   {
   register ptr gf←c74728 =  (ptr) &globalframe;
   formal←c74760 = (formal←c74760 - 32);
   /* action: */ 
SOURCE(19039, 221)
SOURCE(19072, 18)
   {
      word pd337;
      pd337 = (* (( (ptr) (* (( (ptr) gf←c74728)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd337 ))))(c←v22480, 96, 0, 5, pd337);
      };
SOURCE(19092, 21)
   {
      word pd338;
      pd338 = (* (( (ptr) (* (( (ptr) gf←c74728)+177)/* var←c66440 */  ))+35) );
      (void) ( *( (fPt) ((*  (ptr) pd338 ))))(c←v22480, (* (( (ptr) formal←c74760)+4) ), pd338);
      };
SOURCE(19115, 56)
   (void) BPutRGB←P1560(c←v22480,  ( ((* (( (ptr) formal←c74760)+5) ) == 0) ? (* (( (ptr) gf←c74728)+5)/* black←v3448 */  ) : (* (
         ( (ptr) formal←c74760)+5) ) ) );
SOURCE(19173, 56)
   (void) BPutRGB←P1560(c←v22480,  ( ((* (( (ptr) formal←c74760)+6) ) == 0) ? (* (( (ptr) gf←c74728)+4)/* white←v3420 */  ) : (* (
         ( (ptr) formal←c74760)+6) ) ) );
SOURCE(19231, 29)
   {
      word pd339;
      pd339 = (* (( (ptr) (* (( (ptr) gf←c74728)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd339 ))))(c←v22480, (* (( (ptr) formal←c74760)+7) ), pd339);
      };
   }

static void FreeCursor←P1920(c←v11244, formal←c01093, formal←c01094)
   word c←v11244;
   word formal←c01093;
   word formal←c01094;
   {
   W8 var←c74792;
   /* declaration of cursor←v11272 skipped */ 
   /* declaration of details←v11300 skipped */ 
   register ptr gf←c74824 =  (ptr) &globalframe;
   /* declaration of var←c68840 skipped */ 
   var←c74792.f4/* cursor←v11272 */  = formal←c01093;
   var←c74792.f5/* details←v11300 */  = formal←c01094;
   /* FreeCursor: */ 
SOURCE(19576, 470)
   {
      word tmpAddr340;
      tmpAddr340 = (word) (( (ptr) &var←c74792)+6)/* var←c68840 */ ;
      (*  (ptr) tmpAddr340 ) = ( ((word)  (fPt) action←P6528) );
      (* (( (ptr) tmpAddr340) + 1) ) = 1;
      };
SOURCE(19818, 59)
   {
      word pd341;
      pd341 = (* (( (ptr) (* (( (ptr) gf←c74824)+179)/* var←c66696 */  ))+12) );
      if (((word) ( *( (fPt) ((*  (ptr) pd341 ))))(c←v11244, var←c74792.f4/* cursor←v11272 */ , pd341) != (* (( (ptr) gf←c74824)+32)
       ))) {
SOURCE(19877, 5)
         (void) XR←RaiseUnnamedError();
         };
      };
SOURCE(19977, 36)
   {
      word pd342;
      pd342 = (* (( (ptr) (* (( (ptr) gf←c74824)+179)/* var←c66696 */  ))+11) );
      (void) ( *( (fPt) ((*  (ptr) pd342 ))))(c←v11244, var←c74792.f4/* cursor←v11272 */ , pd342);
      };
SOURCE(20015, 31)
   {
      word pd343;
      pd343 = (* (( (ptr) (* (( (ptr) gf←c74824)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd343 ))))(c←v11244, (word) (( (bPt) &var←c74792)+24)/* var←c68840 */ , var←c74792.f5/* details←v11300 */ , pd343)
      ;
      };
   }

static void action←P6528(c←v22584, formal←c74888)
   word c←v22584;
   word formal←c74888;
   {
   register ptr gf←c74856 =  (ptr) &globalframe;
   formal←c74888 = (formal←c74888 - 24);
   /* action: */ 
SOURCE(19654, 159)
SOURCE(19687, 18)
   {
      word pd344;
      pd344 = (* (( (ptr) (* (( (ptr) gf←c74856)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd344 ))))(c←v22584, 95, 0, 2, pd344);
      };
SOURCE(19707, 21)
   {
      word pd345;
      pd345 = (* (( (ptr) (* (( (ptr) gf←c74856)+177)/* var←c66440 */  ))+35) );
      (void) ( *( (fPt) ((*  (ptr) pd345 ))))(c←v22584, (* (( (ptr) formal←c74888)+4) ), pd345);
      };
SOURCE(19730, 29)
   {
      word pd346;
      pd346 = (* (( (ptr) (* (( (ptr) gf←c74856)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd346 ))))(c←v22584, (* (( (ptr) formal←c74888)+5) ), pd346);
      };
SOURCE(19761, 52)
   {
      word pd347;
      pd347 = (* (( (ptr) (* (( (ptr) gf←c74856)+179)/* var←c66696 */  ))+7) );
      (void) ( *( (fPt) ((*  (ptr) pd347 ))))(c←v22584, (* (( (ptr) formal←c74888)+4) ), pd347);
      };
   }

static void BPutPointerEvents←P1980(c←v11360, ev←v11388)
   word c←v11360;
   word ev←v11388;
   {
   register ptr gf←c74920 =  (ptr) &globalframe;
   word events←v22612;
   /* BPutPointerEvents: */ 
SOURCE(20052, 147)
SOURCE(20119, 44)
   {
      word pd348;
      pd348 = (* (( (ptr) (* (( (ptr) gf←c74920)+176)/* var←c66376 */  ))+206) );
      events←v22612 = (word) ( *( (fPt) ((*  (ptr) pd348 ))))(ev←v11388, pd348);
      };
SOURCE(20165, 34)
   {
      word pd349;
      pd349 = (* (( (ptr) (* (( (ptr) gf←c74920)+177)/* var←c66440 */  ))+26) );
      (void) ( *( (fPt) ((*  (ptr) pd349 ))))(c←v11360, events←v22612, pd349);
      };
   }

static void StartTimer←P2040(c←v11800, grabber←v11828)
   word c←v11800;
   word grabber←v11828;
   {
   register ptr gf←c74952 =  (ptr) &globalframe;
   /* StartTimer: */ 
SOURCE(20683, 339)
SOURCE(20747, 275)
   if ((grabber←v11828 != 0)) {
SOURCE(20769, 55)
      {
         word var←c68872;
         {
            word var←c68904;
            word var←c68968;
            {
               word pd350;
               pd350 = (* (( (ptr) (* (( (ptr) gf←c74952)+182)/* var←c68936 */  ))+14) );
               var←c68904 = (word) ( *( (fPt) ((*  (ptr) pd350 ))))(pd350);
               };
            var←c68968 = XR←NewObject(4, (* (( (ptr) gf←c74952)+30) ));
            (*  (ptr) var←c68968 ) = var←c68904;
            var←c68872 = var←c68968;
            };
         (*  (ptr) grabber←v11828 ) = var←c68872;
         };
SOURCE(20826, 24)
      (* (( (ptr) grabber←v11828)+7) ) = 1;
SOURCE(20852, 26)
      (* (( (ptr) grabber←v11828)+8) ) = 0;
SOURCE(20880, 22)
      (void) (XR←Notify((word) (( (bPt) grabber←v11828)+4)));
SOURCE(20958, 64)
SOURCE(20959, 63)
      {
         W2 var←c69000;
         {
            W2 var←c0455;
            word var←c0454;
            var←c0454 = XR←ExtensionAlloc(7);
            {
               word tmpAddr351;
               tmpAddr351 = (word) var←c0454;
               (*  (ptr) tmpAddr351 ) = ( ((word)  (fPt) NoName←Q11640) );
               (* (( (ptr) tmpAddr351) + 1) ) = 0;
               (* (( (ptr) tmpAddr351) + 2) ) = (word) (( (bPt) gf←c74952)+416)/* var←c65128 */ ;
               (* (( (ptr) tmpAddr351) + 3) ) = 0;
               (* (( (ptr) tmpAddr351) + 4) ) = c←v11800;
               (* (( (ptr) tmpAddr351) + 5) ) = grabber←v11828;
               (* (( (ptr) tmpAddr351) + 6) ) = (*  (ptr) grabber←v11828 );
               };
            (void) XR←Fork((word) &var←c0455, var←c0454);
            var←c69000 = var←c0455;
            };
         {
            word pd352;
            pd352 = (* (( (ptr) (* (( (ptr) gf←c74952)+183)/* var←c69032 */  ))+11) );
            (void) ( *( (fPt) ((*  (ptr) pd352 ))))(var←c69000, pd352);
            };
         };
      };
   }

static void TimerProcess←P2100(formal←c01095, formal←c01096, formal←c01097)
   word formal←c01095;
   word formal←c01096;
   word formal←c01097;
   {
   W7 var←c74984;
   /* declaration of c←v11888 skipped */ 
   /* declaration of grabber←v11916 skipped */ 
   /* declaration of grabIdentity←v11944 skipped */ 
   var←c74984.f4/* c←v11888 */  = formal←c01095;
   var←c74984.f5/* grabber←v11916 */  = formal←c01096;
   var←c74984.f6/* grabIdentity←v11944 */  = formal←c01097;
   /* TimerProcess: */ 
SOURCE(21032, 725)
   (void) (XR←MonitorEntry(var←c74984.f4/* c←v11888 */ ));
SOURCE(21128, 629)
   {
      word var←c01;
      {
         word var←c0930;
         var←c0930 = (word) &var←c74984;
         var←c01 = (word) XR←Enable(( ((word)  (fPt) NoName←Q11520) ), ( ((word)  (fPt) NoName←Q11580) ), var←c0930);
         };
      /* removed trivial cond node */ 
      };
   return;
   }

static word NoName←Q11520(formal←c0851)
   word formal←c0851;
   {
   register ptr gf←c0850 =  (ptr) &globalframe;
SOURCE(21151, 606)
   lab←L100079: ;
   {
      word var←c69064;
      word var←c69096;
      word var←c0931;
SOURCE(21154, 20)
      (void) (XR←Wait((* (( (ptr) formal←c0851)+4) ), (word) (( (bPt) (* (( (ptr) formal←c0851)+5) ))+4)));
SOURCE(21176, 23)
      if ((0 == (* (( (ptr) (* (( (ptr) formal←c0851)+4) ))+15) ))) {
SOURCE(21193, 6)
         (void) (XR←MonitorExit(* (( (ptr) formal←c0851)+4) ));
         return(1);
         };
SOURCE(21231, 33)
      if ((0 == (* (( (ptr) (* (( (ptr) formal←c0851)+5) ))+7) ))) {
SOURCE(21258, 6)
         (void) (XR←MonitorExit(* (( (ptr) formal←c0851)+4) ));
         return(1);
         };
SOURCE(21294, 44)
      if (((*  (ptr) (* (( (ptr) formal←c0851)+5) ) ) != (* (( (ptr) formal←c0851)+6) ))) {
SOURCE(21332, 6)
         (void) (XR←MonitorExit(* (( (ptr) formal←c0851)+4) ));
         return(1);
         };
SOURCE(21380, 377)
      {
         word pd354;
         {
            word pd353;
            pd353 = (* (( (ptr) (* (( (ptr) gf←c0850)+182)/* var←c68936 */  ))+14) );
            var←c69064 = (word) ( *( (fPt) ((*  (ptr) pd353 ))))(pd353);
            };
         pd354 = (* (( (ptr) (* (( (ptr) gf←c0850)+182)/* var←c68936 */  ))+16) );
         if (( (int)(word) ( *( (fPt) ((*  (ptr) pd354 ))))((*  (ptr) (* (( (ptr) formal←c0851)+6) ) ), var←c69064, pd354) >  (int)1)) {
SOURCE(21451, 306)
            if ((0 != (word) InternalSomeImportantDown←P3180((* ((( (ptr) formal←c0851)+4)) )))) {
SOURCE(21489, 63)
               {
                  word pd355;
                  pd355 = (* (( (ptr) (* (( (ptr) gf←c0850)+182)/* var←c68936 */  ))+14) );
                  (*  (ptr) (* (( (ptr) formal←c0851)+6) ) ) = (word) ( *( (fPt) ((*  (ptr) pd355 ))))(pd355);
                  };
               }
            else {
SOURCE(21554, 203)
               {
                  word pd356;
                  pd356 = (* (( (ptr) (* (( (ptr) gf←c0850)+182)/* var←c68936 */  ))+14) );
                  var←c69096 = (word) ( *( (fPt) ((*  (ptr) pd356 ))))(pd356);
                  };
               {
                  word pd357;
                  pd357 = (* (( (ptr) (* (( (ptr) gf←c0850)+182)/* var←c68936 */  ))+16) );
                  var←c0931 = (word) ( *( (fPt) ((*  (ptr) pd357 ))))((*  (ptr) (* (( (ptr) formal←c0851)+6) ) ), var←c69096, pd357);
                  };
               if (( (int)var←c0931 >  (int)(* (( (ptr) (* (( (ptr) formal←c0851)+5) ))+9) ))) {
SOURCE(21639, 56)
                  {
                     word pd358;
                     pd358 = (* (( (ptr) (* (( (ptr) formal←c0851)+5) ))+11) );
                     (void) ( *( (fPt) ((*  (ptr) pd358 ))))((* (( (ptr) formal←c0851)+4) ), (* (( (ptr) (* (( (ptr) formal←c0851)+5) ))+10) ), (* (
                           ( (ptr) gf←c0850)+6)/* flushNowDetails←v4176 */  ), pd358);
                     };
SOURCE(21697, 25)
                  (* (( (ptr) (* (( (ptr) formal←c0851)+5) ))+8) ) = 1;
SOURCE(21724, 25)
                  (void) (XR←Broadcast((word) (( (bPt) (* (( (ptr) formal←c0851)+5) ))+4)));
SOURCE(21751, 6)
                  (void) (XR←MonitorExit(* (( (ptr) formal←c0851)+4) ));
                  return(1);
                  };
               };
            };
         };
      };
   goto lab←L100079;
   /* c2c skipped dead code */ 
   }

static word GrabPointer←P2160(c←v12016, formal←c01098, formal←c01099, formal←c01100, formal←c01101, formal←c01102, formal←c01103, formal←c01104, formal←c01105)
   word c←v12016;
   word formal←c01098;
   word formal←c01099;
   word formal←c01100;
   word formal←c01101;
   word formal←c01102;
   word formal←c01103;
   word formal←c01104;
   word formal←c01105;
   {
   W15 var←c75016;
   /* declaration of window←v12044 skipped */ 
   /* declaration of ownerEvents←v12072 skipped */ 
   /* declaration of eventMask←v12100 skipped */ 
   /* declaration of pointerMode←v12128 skipped */ 
   /* declaration of keyboardMode←v12156 skipped */ 
   /* declaration of confine←v12184 skipped */ 
   /* declaration of cursor←v12212 skipped */ 
   /* declaration of timeStamp←v12240 skipped */ 
   register ptr gf←c75048 =  (ptr) &globalframe;
   /* declaration of status←v12284 skipped */ 
   /* declaration of var←c69128 skipped */ 
   (* (( (ptr) &var←c75016)+4)/* window←v12044 */  ) = formal←c01098;
   (* (( (ptr) &var←c75016)+5)/* ownerEvents←v12072 */  ) = formal←c01099;
   (* (( (ptr) &var←c75016)+6)/* eventMask←v12100 */  ) = formal←c01100;
   (* (( (ptr) &var←c75016)+7)/* pointerMode←v12128 */  ) = formal←c01101;
   (* (( (ptr) &var←c75016)+8)/* keyboardMode←v12156 */  ) = formal←c01102;
   (* (( (ptr) &var←c75016)+9)/* confine←v12184 */  ) = formal←c01103;
   (* (( (ptr) &var←c75016)+10)/* cursor←v12212 */  ) = formal←c01104;
   (* (( (ptr) &var←c75016)+11)/* timeStamp←v12240 */  ) = formal←c01105;
   /* GrabPointer: */ 
SOURCE(21779, 965)
   {
      word tmpAddr359;
      tmpAddr359 = (word) (( (ptr) &var←c75016)+13)/* var←c69128 */ ;
      (*  (ptr) tmpAddr359 ) = ( ((word)  (fPt) action←P6588) );
      (* (( (ptr) tmpAddr359) + 1) ) = 1;
      };
SOURCE(21779, 965)
   (* (( (ptr) &var←c75016)+12)/* status←v12284 */  ) = 0;
SOURCE(22717, 27)
   {
      word pd360;
      pd360 = (* (( (ptr) (* (( (ptr) gf←c75048)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd360 ))))(c←v12016, (word) (( (bPt) &var←c75016)+52)/* var←c69128 */ , 0, pd360);
      };
SOURCE(21779, 965)
   return((* (( (ptr) &var←c75016)+12)/* status←v12284 */  ));
   }

static void action←P6588(c←v22732, formal←c75112)
   word c←v22732;
   word formal←c75112;
   {
   register ptr gf←c75080 =  (ptr) &globalframe;
   word reply←v22760 = 0;
   formal←c75112 = (formal←c75112 - 52);
   /* action: */ 
SOURCE(22054, 655)
SOURCE(22110, 37)
   {
      word pd361;
      pd361 = (* (( (ptr) (* (( (ptr) gf←c75080)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd361 ))))(c←v22732, 26, (* (( (ptr) formal←c75112)+5) ), 6, pd361);
      };
SOURCE(22149, 23)
   {
      word pd362;
      pd362 = (* (( (ptr) (* (( (ptr) gf←c75080)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd362 ))))(c←v22732, (* (( (ptr) formal←c75112)+4) ), pd362);
      };
SOURCE(22174, 31)
   (void) BPutPointerEvents←P1980(c←v22732, (* (( (ptr) formal←c75112)+6) ));
SOURCE(22207, 26)
   {
      word pd363;
      pd363 = (* (( (ptr) (* (( (ptr) gf←c75080)+177)/* var←c66440 */  ))+19) );
      (void) ( *( (fPt) ((*  (ptr) pd363 ))))(c←v22732, (* (( (ptr) formal←c75112)+7) ), pd363);
      };
SOURCE(22235, 27)
   {
      word pd364;
      pd364 = (* (( (ptr) (* (( (ptr) gf←c75080)+177)/* var←c66440 */  ))+19) );
      (void) ( *( (fPt) ((*  (ptr) pd364 ))))(c←v22732, (* (( (ptr) formal←c75112)+8) ), pd364);
      };
SOURCE(22264, 24)
   {
      word pd365;
      pd365 = (* (( (ptr) (* (( (ptr) gf←c75080)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd365 ))))(c←v22732, (* (( (ptr) formal←c75112)+9) ), pd365);
      };
SOURCE(22290, 21)
   {
      word pd366;
      pd366 = (* (( (ptr) (* (( (ptr) gf←c75080)+177)/* var←c66440 */  ))+35) );
      (void) ( *( (fPt) ((*  (ptr) pd366 ))))(c←v22732, (* (( (ptr) formal←c75112)+10) ), pd366);
      };
SOURCE(22313, 22)
   {
      word pd367;
      pd367 = (* (( (ptr) (* (( (ptr) gf←c75080)+177)/* var←c66440 */  ))+33) );
      (void) ( *( (fPt) ((*  (ptr) pd367 ))))(c←v22732, (* (( (ptr) formal←c75112)+11) ), pd367);
      };
SOURCE(22337, 26)
   {
      word pd368;
      pd368 = (* (( (ptr) (* (( (ptr) gf←c75080)+177)/* var←c66440 */  ))+62) );
      reply←v22760 = (word) ( *( (fPt) ((*  (ptr) pd368 ))))(c←v22732, pd368);
      };
SOURCE(22365, 28)
   {
      word idx369;
      (* (( (ptr) formal←c75112)+12) ) =  (unsigned) (
         idx369 = (word)  (unsigned) (* (( (bPt) reply←v22760)+1) ),
         BCK(idx369, 5)
         );
      };
SOURCE(22395, 314)
   if (((* (( (ptr) formal←c75112)+12) ) == 0)) {
SOURCE(22418, 293)
      {
         word cPriv←v22804;
SOURCE(22420, 45)
         cPriv←v22804 = (* (( (ptr) c←v22732)+24) );
SOURCE(22467, 201)
         if (((* (( (ptr) cPriv←v22804)+8) ) == 0)) {
SOURCE(22502, 38)
            {
               word var←c69160;
               var←c69160 = XR←NewObject(48, (* (( (ptr) gf←c75080)+11) ));
               (* (( (ptr) var←c69160)+9) ) = 6;
               (* (( (ptr) cPriv←v22804)+8) ) = var←c69160;
               };
SOURCE(22542, 54)
            (* (( (ptr) (* (( (ptr) cPriv←v22804)+8) ))+11) ) = (word) (( (bPt) gf←c75080)+400)/* var←c65064 */ ;
SOURCE(22606, 62)
SOURCE(22607, 61)
            {
               word pd370;
               pd370 = (* (( (ptr) (* (( (ptr) gf←c75080)+183)/* var←c69032 */  ))+5) );
               (void) ( *( (fPt) ((*  (ptr) pd370 ))))((word) (( (bPt) (* (( (ptr) cPriv←v22804)+8) ))+4), 1, pd370);
               };
            };
SOURCE(22674, 35)
         (void) StartTimer←P2040(c←v22732, (* (( (ptr) cPriv←v22804)+8) ));
         };
      };
   }

static void InternalUngrabPointer←P2220(c←v12344, timeStamp←v12372, details←v12400)
   word c←v12344;
   word timeStamp←v12372;
   word details←v12400;
   {
   register ptr gf←c75144 =  (ptr) &globalframe;
   /* InternalUngrabPointer: */ 
SOURCE(22752, 229)
SOURCE(22853, 18)
   {
      word pd371;
      pd371 = (* (( (ptr) (* (( (ptr) gf←c75144)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd371 ))))(c←v12344, 27, 0, 2, pd371);
      };
SOURCE(22873, 22)
   {
      word pd372;
      pd372 = (* (( (ptr) (* (( (ptr) gf←c75144)+177)/* var←c66440 */  ))+33) );
      (void) ( *( (fPt) ((*  (ptr) pd372 ))))(c←v12344, timeStamp←v12372, pd372);
      };
SOURCE(22897, 29)
   {
      word pd373;
      pd373 = (* (( (ptr) (* (( (ptr) gf←c75144)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd373 ))))(c←v12344, details←v12400, pd373);
      };
SOURCE(22928, 53)
   if ((details←v12400 == 0)) {
SOURCE(22948, 33)
      {
         word pd374;
         if (((* (( (ptr) c←v12344)+5) ) != 0) || (0 != (* (( (ptr) c←v12344)+35) ))) {
            pd374 = (* (( (ptr) (* (( (ptr) gf←c75144)+177)/* var←c66440 */  ))+13) );
            (void) ( *( (fPt) ((*  (ptr) pd374 ))))(c←v12344, 0, pd374);
            };
         };
      };
   }

static void UngrabPointer←P2280(c←v12460, formal←c01106, formal←c01107)
   word c←v12460;
   word formal←c01106;
   word formal←c01107;
   {
   W8 var←c75176;
   /* declaration of timeStamp←v12488 skipped */ 
   /* declaration of details←v12516 skipped */ 
   register ptr gf←c75208 =  (ptr) &globalframe;
   /* declaration of var←c69192 skipped */ 
   var←c75176.f4/* timeStamp←v12488 */  = formal←c01106;
   var←c75176.f5/* details←v12516 */  = formal←c01107;
   /* UngrabPointer: */ 
SOURCE(22987, 197)
   {
      word tmpAddr375;
      tmpAddr375 = (word) (( (ptr) &var←c75176)+6)/* var←c69192 */ ;
      (*  (ptr) tmpAddr375 ) = ( ((word)  (fPt) action←P6696) );
      (* (( (ptr) tmpAddr375) + 1) ) = 1;
      };
SOURCE(23153, 31)
   {
      word pd376;
      pd376 = (* (( (ptr) (* (( (ptr) gf←c75208)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd376 ))))(c←v12460, (word) (( (bPt) &var←c75176)+24)/* var←c69192 */ , var←c75176.f5/* details←v12516 */ , pd376)
      ;
      };
   }

static void action←P6696(c←v22936, formal←c75240)
   word c←v22936;
   word formal←c75240;
   {
   formal←c75240 = (formal←c75240 - 24);
   /* action: */ 
SOURCE(23074, 76)
SOURCE(23106, 44)
   (void) InternalUngrabPointer←P2220(c←v22936, (* (( (ptr) formal←c75240)+4) ), (* (( (ptr) formal←c75240)+5) ));
   }

static void ChangeActivePointerGrab←P2340(c←v12576, formal←c01108, formal←c01109, formal←c01110, formal←c01111)
   word c←v12576;
   word formal←c01108;
   word formal←c01109;
   word formal←c01110;
   word formal←c01111;
   {
   W10 var←c75272;
   /* declaration of eventMask←v12604 skipped */ 
   /* declaration of cursor←v12632 skipped */ 
   /* declaration of timeStamp←v12660 skipped */ 
   /* declaration of details←v12688 skipped */ 
   register ptr gf←c75304 =  (ptr) &globalframe;
   /* declaration of var←c69224 skipped */ 
   (* (( (ptr) &var←c75272)+4)/* eventMask←v12604 */  ) = formal←c01108;
   (* (( (ptr) &var←c75272)+5)/* cursor←v12632 */  ) = formal←c01109;
   (* (( (ptr) &var←c75272)+6)/* timeStamp←v12660 */  ) = formal←c01110;
   (* (( (ptr) &var←c75272)+7)/* details←v12688 */  ) = formal←c01111;
   /* ChangeActivePointerGrab: */ 
SOURCE(23192, 431)
   {
      word tmpAddr377;
      tmpAddr377 = (word) (( (ptr) &var←c75272)+8)/* var←c69224 */ ;
      (*  (ptr) tmpAddr377 ) = ( ((word)  (fPt) action←P6756) );
      (* (( (ptr) tmpAddr377) + 1) ) = 1;
      };
SOURCE(23592, 31)
   {
      word pd378;
      pd378 = (* (( (ptr) (* (( (ptr) gf←c75304)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd378 ))))(c←v12576, (word) (( (bPt) &var←c75272)+32)/* var←c69224 */ , (* (( (ptr) &var←c75272)+7)
         /* details←v12688 */  ), pd378);
      };
   }

static void action←P6756(c←v23040, formal←c75368)
   word c←v23040;
   word formal←c75368;
   {
   register ptr gf←c75336 =  (ptr) &globalframe;
   formal←c75368 = (formal←c75368 - 32);
   /* action: */ 
SOURCE(23361, 226)
SOURCE(23394, 18)
   {
      word pd379;
      pd379 = (* (( (ptr) (* (( (ptr) gf←c75336)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd379 ))))(c←v23040, 30, 0, 4, pd379);
      };
SOURCE(23414, 21)
   {
      word pd380;
      pd380 = (* (( (ptr) (* (( (ptr) gf←c75336)+177)/* var←c66440 */  ))+35) );
      (void) ( *( (fPt) ((*  (ptr) pd380 ))))(c←v23040, (* (( (ptr) formal←c75368)+5) ), pd380);
      };
SOURCE(23437, 22)
   {
      word pd381;
      pd381 = (* (( (ptr) (* (( (ptr) gf←c75336)+177)/* var←c66440 */  ))+33) );
      (void) ( *( (fPt) ((*  (ptr) pd381 ))))(c←v23040, (* (( (ptr) formal←c75368)+6) ), pd381);
      };
SOURCE(23461, 31)
   (void) BPutPointerEvents←P1980(c←v23040, (* (( (ptr) formal←c75368)+4) ));
SOURCE(23494, 11)
   (* (( (ptr) c←v23040)+4) ) = ((* (( (ptr) c←v23040)+4) ) + 2);
SOURCE(23508, 29)
   {
      word pd382;
      pd382 = (* (( (ptr) (* (( (ptr) gf←c75336)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd382 ))))(c←v23040, (* (( (ptr) formal←c75368)+7) ), pd382);
      };
SOURCE(23539, 48)
   if (((* (( (ptr) formal←c75368)+7) ) == 0)) {
SOURCE(23559, 28)
      {
         word pd383;
         if (((* (( (ptr) c←v23040)+5) ) != 0) || (0 != (* (( (ptr) c←v23040)+35) ))) {
            pd383 = (* (( (ptr) (* (( (ptr) gf←c75336)+177)/* var←c66440 */  ))+13) );
            (void) ( *( (fPt) ((*  (ptr) pd383 ))))(c←v23040, 0, pd383);
            };
         };
      };
   }

static void GrabButton←P2400(c←v12748, formal←c01112, formal←c01113, formal←c01114, formal←c01115, formal←c01116, formal←c01117, formal←c01118, formal←c01119, formal←c01120, formal←c01121)
   word c←v12748;
   word formal←c01112;
   word formal←c01113;
   word formal←c01114;
   word formal←c01115;
   word formal←c01116;
   word formal←c01117;
   word formal←c01118;
   word formal←c01119;
   word formal←c01120;
   word formal←c01121;
   {
   W16 var←c75400;
   /* declaration of grabWindow←v12776 skipped */ 
   /* declaration of confineWindow←v12804 skipped */ 
   /* declaration of modifiers←v12832 skipped */ 
   /* declaration of button←v12860 skipped */ 
   /* declaration of ownerEvents←v12888 skipped */ 
   /* declaration of eventMask←v12916 skipped */ 
   /* declaration of pointerMode←v12944 skipped */ 
   /* declaration of keyboardMode←v12972 skipped */ 
   /* declaration of cursor←v13000 skipped */ 
   /* declaration of details←v13028 skipped */ 
   register ptr gf←c75432 =  (ptr) &globalframe;
   /* declaration of var←c69256 skipped */ 
   (* (( (ptr) &var←c75400)+4)/* grabWindow←v12776 */  ) = formal←c01112;
   (* (( (ptr) &var←c75400)+5)/* confineWindow←v12804 */  ) = formal←c01113;
   (* (( (ptr) &var←c75400)+6)/* modifiers←v12832 */  ) = formal←c01114;
   (* (( (ptr) &var←c75400)+7)/* button←v12860 */  ) = formal←c01115;
   (* (( (ptr) &var←c75400)+8)/* ownerEvents←v12888 */  ) = formal←c01116;
   (* (( (ptr) &var←c75400)+9)/* eventMask←v12916 */  ) = formal←c01117;
   (* (( (ptr) &var←c75400)+10)/* pointerMode←v12944 */  ) = formal←c01118;
   (* (( (ptr) &var←c75400)+11)/* keyboardMode←v12972 */  ) = formal←c01119;
   (* (( (ptr) &var←c75400)+12)/* cursor←v13000 */  ) = formal←c01120;
   (* (( (ptr) &var←c75400)+13)/* details←v13028 */  ) = formal←c01121;
   /* GrabButton: */ 
SOURCE(23630, 683)
   {
      word tmpAddr384;
      tmpAddr384 = (word) (( (ptr) &var←c75400)+14)/* var←c69256 */ ;
      (*  (ptr) tmpAddr384 ) = ( ((word)  (fPt) action←P6816) );
      (* (( (ptr) tmpAddr384) + 1) ) = 1;
      };
SOURCE(24282, 31)
   {
      word pd385;
      pd385 = (* (( (ptr) (* (( (ptr) gf←c75432)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd385 ))))(c←v12748, (word) (( (bPt) &var←c75400)+56)/* var←c69256 */ , (* (( (ptr) &var←c75400)+13)
         /* details←v13028 */  ), pd385);
      };
   }

static void action←P6816(c←v23144, formal←c75496)
   word c←v23144;
   word formal←c75496;
   {
   register ptr gf←c75464 =  (ptr) &globalframe;
   formal←c75496 = (formal←c75496 - 56);
   /* action: */ 
SOURCE(23922, 355)
SOURCE(23955, 37)
   {
      word pd386;
      pd386 = (* (( (ptr) (* (( (ptr) gf←c75464)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd386 ))))(c←v23144, 28, (* (( (ptr) formal←c75496)+8) ), 6, pd386);
      };
SOURCE(23994, 27)
   {
      word pd387;
      pd387 = (* (( (ptr) (* (( (ptr) gf←c75464)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd387 ))))(c←v23144, (* (( (ptr) formal←c75496)+4) ), pd387);
      };
SOURCE(24023, 31)
   (void) BPutPointerEvents←P1980(c←v23144, (* (( (ptr) formal←c75496)+9) ));
SOURCE(24056, 26)
   {
      word pd388;
      pd388 = (* (( (ptr) (* (( (ptr) gf←c75464)+177)/* var←c66440 */  ))+19) );
      (void) ( *( (fPt) ((*  (ptr) pd388 ))))(c←v23144, (* (( (ptr) formal←c75496)+10) ), pd388);
      };
SOURCE(24084, 27)
   {
      word pd389;
      pd389 = (* (( (ptr) (* (( (ptr) gf←c75464)+177)/* var←c66440 */  ))+19) );
      (void) ( *( (fPt) ((*  (ptr) pd389 ))))(c←v23144, (* (( (ptr) formal←c75496)+11) ), pd389);
      };
SOURCE(24113, 30)
   {
      word pd390;
      pd390 = (* (( (ptr) (* (( (ptr) gf←c75464)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd390 ))))(c←v23144, (* (( (ptr) formal←c75496)+5) ), pd390);
      };
SOURCE(24145, 21)
   {
      word pd391;
      pd391 = (* (( (ptr) (* (( (ptr) gf←c75464)+177)/* var←c66440 */  ))+35) );
      (void) ( *( (fPt) ((*  (ptr) pd391 ))))(c←v23144, (* (( (ptr) formal←c75496)+12) ), pd391);
      };
SOURCE(24168, 16)
   {
      word pd392;
      pd392 = (* (( (ptr) (* (( (ptr) gf←c75464)+177)/* var←c66440 */  ))+19) );
      (void) ( *( (fPt) ((*  (ptr) pd392 ))))(c←v23144, (* (( (ptr) formal←c75496)+7) ), pd392);
      };
SOURCE(24186, 11)
   {
      word pd393;
      pd393 = (* (( (ptr) (* (( (ptr) gf←c75464)+177)/* var←c66440 */  ))+19) );
      (void) ( *( (fPt) ((*  (ptr) pd393 ))))(c←v23144, 0, pd393);
      };
SOURCE(24199, 47)
   {
      word var←c69288;
      {
         word x←v49784;
         x←v49784 = (* (( (ptr) formal←c75496)+6) );
         var←c69288 =  (unsigned) ( (((unsigned)x←v49784 << 16) >> 16) );
         };
      {
         word pd394;
         pd394 = (* (( (ptr) (* (( (ptr) gf←c75464)+177)/* var←c66440 */  ))+20) );
         (void) ( *( (fPt) ((*  (ptr) pd394 ))))(c←v23144, var←c69288, pd394);
         };
      };
SOURCE(24248, 29)
   {
      word pd395;
      pd395 = (* (( (ptr) (* (( (ptr) gf←c75464)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd395 ))))(c←v23144, (* (( (ptr) formal←c75496)+13) ), pd395);
      };
   }

static void UngrabButton←P2460(c←v13088, formal←c01122, formal←c01123, formal←c01124, formal←c01125)
   word c←v13088;
   word formal←c01122;
   word formal←c01123;
   word formal←c01124;
   word formal←c01125;
   {
   W10 var←c75528;
   /* declaration of window←v13116 skipped */ 
   /* declaration of modifiers←v13144 skipped */ 
   /* declaration of button←v13172 skipped */ 
   /* declaration of details←v13200 skipped */ 
   register ptr gf←c75560 =  (ptr) &globalframe;
   /* declaration of var←c69352 skipped */ 
   (* (( (ptr) &var←c75528)+4)/* window←v13116 */  ) = formal←c01122;
   (* (( (ptr) &var←c75528)+5)/* modifiers←v13144 */  ) = formal←c01123;
   (* (( (ptr) &var←c75528)+6)/* button←v13172 */  ) = formal←c01124;
   (* (( (ptr) &var←c75528)+7)/* details←v13200 */  ) = formal←c01125;
   /* UngrabButton: */ 
SOURCE(24319, 392)
   {
      word tmpAddr396;
      tmpAddr396 = (word) (( (ptr) &var←c75528)+8)/* var←c69352 */ ;
      (*  (ptr) tmpAddr396 ) = ( ((word)  (fPt) action←P6876) );
      (* (( (ptr) tmpAddr396) + 1) ) = 1;
      };
SOURCE(24680, 31)
   {
      word pd397;
      pd397 = (* (( (ptr) (* (( (ptr) gf←c75560)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd397 ))))(c←v13088, (word) (( (bPt) &var←c75528)+32)/* var←c69352 */ , (* (( (ptr) &var←c75528)+7)
         /* details←v13200 */  ), pd397);
      };
   }

static void action←P6876(c←v23248, formal←c75624)
   word c←v23248;
   word formal←c75624;
   {
   register ptr gf←c75592 =  (ptr) &globalframe;
   formal←c75624 = (formal←c75624 - 32);
   /* action: */ 
SOURCE(24445, 230)
SOURCE(24478, 23)
   {
      word pd398;
      pd398 = (* (( (ptr) (* (( (ptr) gf←c75592)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd398 ))))(c←v23248, 29, (* (( (ptr) formal←c75624)+6) ), 3, pd398);
      };
SOURCE(24503, 23)
   {
      word pd399;
      pd399 = (* (( (ptr) (* (( (ptr) gf←c75592)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd399 ))))(c←v23248, (* (( (ptr) formal←c75624)+4) ), pd399);
      };
SOURCE(24528, 47)
   {
      word var←c69384;
      {
         word x←v62224;
         x←v62224 = (* (( (ptr) formal←c75624)+5) );
         var←c69384 =  (unsigned) ( (((unsigned)x←v62224 << 16) >> 16) );
         };
      {
         word pd400;
         pd400 = (* (( (ptr) (* (( (ptr) gf←c75592)+177)/* var←c66440 */  ))+20) );
         (void) ( *( (fPt) ((*  (ptr) pd400 ))))(c←v23248, var←c69384, pd400);
         };
      };
SOURCE(24577, 11)
   (* (( (ptr) c←v23248)+4) ) = (* (( (ptr) c←v23248)+4) );
SOURCE(24590, 29)
   {
      word pd401;
      pd401 = (* (( (ptr) (* (( (ptr) gf←c75592)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd401 ))))(c←v23248, (* (( (ptr) formal←c75624)+7) ), pd401);
      };
SOURCE(24621, 54)
   if (((* (( (ptr) formal←c75624)+7) ) == 0)) {
SOURCE(24641, 34)
      {
         word pd402;
         if (((* (( (ptr) c←v23248)+5) ) != 0) || (0 != (* (( (ptr) c←v23248)+35) ))) {
            pd402 = (* (( (ptr) (* (( (ptr) gf←c75592)+177)/* var←c66440 */  ))+13) );
            (void) ( *( (fPt) ((*  (ptr) pd402 ))))(c←v23248, 1, pd402);
            };
         };
      };
   }

static void KeyboardUnWedgeProc←P2520(event←v35440, clientData←v35468, tq←v35496)
   word event←v35440;
   word clientData←v35468;
   word tq←v35496;
   {
   register ptr gf←c75656 =  (ptr) &globalframe;
   /* KeyboardUnWedgeProc: */ 
SOURCE(24867, 632)
SOURCE(24906, 593)
   {
      word var←c69448;
      var←c69448 = event←v35440;
      if ((var←c69448 == 0)) {
         goto lab←L100082;
         };
      if (((* (( (ptr) var←c69448)+4) ) == 28)) {
         {
            word pne←v23276;
            pne←v23276 = var←c69448;
SOURCE(24957, 547)
            {
               word cPriv←v23320;
SOURCE(24959, 60)
               cPriv←v23320 = (* (( (ptr) (* (( (ptr) event←v35440)+2) ))+24) );
SOURCE(25021, 46)
               if (((* (( (ptr) pne←v23276)+7) ) != (* (( (ptr) cPriv←v23320)+11) ))) {
SOURCE(25061, 6)
                  return;
                  };
SOURCE(25078, 27)
               if (((* (( (ptr) pne←v23276)+7) ) == 0)) {
SOURCE(25099, 6)
                  return;
                  };
SOURCE(25116, 53)
               {
                  word pd403;
                  pd403 = (* (( (ptr) (* (( (ptr) gf←c75656)+176)/* var←c66376 */  ))+20) );
                  if (((word) ( *( (fPt) ((*  (ptr) pd403 ))))((* ((( (ptr) event←v35440)+2)) ), pd403) != (* (( (ptr) pne←v23276)+6) ))) {
SOURCE(25163, 6)
                     return;
                     };
                  };
SOURCE(25180, 122)
               if (((* (( (ptr) pne←v23276)+9) ) == 1)) {
SOURCE(25208, 54)
                  {
                     word pd404;
                     pd404 = (* (( (ptr) (* (( (ptr) gf←c75656)+176)/* var←c66376 */  ))+27) );
                     (void) ( *( (fPt) ((*  (ptr) pd404 ))))((* (( (ptr) event←v35440)+2) ), (* (( (ptr) gf←c75656)+7)/* keyboardGrab←v4484 */  ), 0, pd404)
                     ;
                     };
SOURCE(25296, 6)
                  return;
                  };
SOURCE(25319, 180)
               if ((0 != (* (( (ptr) cPriv←v23320)+10) ))) {
SOURCE(25352, 45)
                  (void) UngrabKeyboard←P2700((* (( (ptr) event←v35440)+2) ), 0, 0);
SOURCE(25399, 54)
                  {
                     word pd405;
                     pd405 = (* (( (ptr) (* (( (ptr) gf←c75656)+176)/* var←c66376 */  ))+56) );
                     (void) ( *( (fPt) ((*  (ptr) pd405 ))))((* (( (ptr) event←v35440)+2) ), (* (( (ptr) pne←v23276)+6) ), (* (( (ptr) pne←v23276)+7)
                         ), 0, pd405);
                     };
SOURCE(25476, 23)
                  {
                     word pd406;
                     pd406 = (* (( (ptr) (* (( (ptr) gf←c75656)+176)/* var←c66376 */  ))+43) );
                     (void) ( *( (fPt) ((*  (ptr) pd406 ))))((* (( (ptr) event←v35440)+2) ), 0, pd406);
                     };
                  };
               };
            };
         }
      else {
         lab←L100082: ;
         };
      };
   }

static void InstallKeyboardUnWedger←P2580(c←v13276)
   word c←v13276;
   {
   register ptr gf←c75688 =  (ptr) &globalframe;
   word cPriv←v23376;
   /* InstallKeyboardUnWedger: */ 
SOURCE(25526, 336)
SOURCE(25576, 45)
   cPriv←v23376 = (* (( (ptr) c←v13276)+24) );
SOURCE(25623, 239)
   if (((* (( (ptr) cPriv←v23376)+11) ) == 0)) {
SOURCE(25658, 206)
      {
         word a←v23432;
SOURCE(25660, 41)
         {
            word pd407;
            pd407 = (* (( (ptr) (* (( (ptr) gf←c75688)+176)/* var←c66376 */  ))+50) );
            a←v23432 = (word) ( *( (fPt) ((*  (ptr) pd407 ))))(c←v13276, (* (( (ptr) gf←c75688)+37) ), pd407);
            };
SOURCE(25703, 26)
         (* (( (ptr) cPriv←v23376)+11) ) = a←v23432;
SOURCE(25731, 131)
         {
            word var←c69480;
            word var←c69512;
            {
               word pd408;
               pd408 = (* (( (ptr) (* (( (ptr) gf←c75688)+176)/* var←c66376 */  ))+20) );
               var←c69480 = (word) ( *( (fPt) ((*  (ptr) pd408 ))))(c←v13276, pd408);
               };
            {
               word var←c69544;
               word var←c69576;
               {
                  word pd409;
                  pd409 = (* (( (ptr) (* (( (ptr) gf←c75688)+176)/* var←c66376 */  ))+63) );
                  var←c69544 = (word) ( *( (fPt) ((*  (ptr) pd409 ))))((* (( (ptr) gf←c75688)+33) ), 0, 0, pd409);
                  };
               var←c69576 = XR←NewObject(16, (* (( (ptr) gf←c75688)+29) ));
               (*  (ptr) var←c69576 ) = (word) (( (bPt) gf←c75688)+360)/* var←c64904 */ ;
               (* (( (ptr) var←c69576)+1) ) = (* (( (ptr) gf←c75688)+8)/* propertyEvents←v4512 */  );
               (* (( (ptr) var←c69576)+2) ) = var←c69544;
               var←c69512 = var←c69576;
               };
            (void) AddDispatch←P3000(c←v13276, var←c69480, var←c69512, 0, 0);
            };
         };
      };
   }

static word GrabKeyboard←P2640(c←v13336, formal←c01126, formal←c01127, formal←c01128, formal←c01129, formal←c01130)
   word c←v13336;
   word formal←c01126;
   word formal←c01127;
   word formal←c01128;
   word formal←c01129;
   word formal←c01130;
   {
   W12 var←c75720;
   /* declaration of grabWindow←v13364 skipped */ 
   /* declaration of ownerEvents←v13392 skipped */ 
   /* declaration of pointerMode←v13420 skipped */ 
   /* declaration of keyboardMode←v13448 skipped */ 
   /* declaration of time←v13476 skipped */ 
   register ptr gf←c75752 =  (ptr) &globalframe;
   /* declaration of status←v13520 skipped */ 
   /* declaration of var←c69608 skipped */ 
   (* (( (ptr) &var←c75720)+4)/* grabWindow←v13364 */  ) = formal←c01126;
   (* (( (ptr) &var←c75720)+5)/* ownerEvents←v13392 */  ) = formal←c01127;
   (* (( (ptr) &var←c75720)+6)/* pointerMode←v13420 */  ) = formal←c01128;
   (* (( (ptr) &var←c75720)+7)/* keyboardMode←v13448 */  ) = formal←c01129;
   (* (( (ptr) &var←c75720)+8)/* time←v13476 */  ) = formal←c01130;
   /* GrabKeyboard: */ 
SOURCE(25871, 669)
   {
      word tmpAddr410;
      tmpAddr410 = (word) (( (ptr) &var←c75720)+10)/* var←c69608 */ ;
      (*  (ptr) tmpAddr410 ) = ( ((word)  (fPt) action←P7080) );
      (* (( (ptr) tmpAddr410) + 1) ) = 1;
      };
SOURCE(25871, 669)
   (* (( (ptr) &var←c75720)+9)/* status←v13520 */  ) = 0;
SOURCE(26485, 26)
   (void) InstallKeyboardUnWedger←P2580(c←v13336);
SOURCE(26513, 27)
   {
      word pd411;
      pd411 = (* (( (ptr) (* (( (ptr) gf←c75752)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd411 ))))(c←v13336, (word) (( (bPt) &var←c75720)+40)/* var←c69608 */ , 0, pd411);
      };
SOURCE(25871, 669)
   return((* (( (ptr) &var←c75720)+9)/* status←v13520 */  ));
   }

static void action←P7080(c←v23552, formal←c75816)
   word c←v23552;
   word formal←c75816;
   {
   register ptr gf←c75784 =  (ptr) &globalframe;
   word cPriv←v23580;
   word reply←v23608 = 0;
   formal←c75816 = (formal←c75816 - 40);
   /* action: */ 
SOURCE(26069, 410)
SOURCE(26102, 45)
   cPriv←v23580 = (* (( (ptr) c←v23552)+24) );
SOURCE(26163, 37)
   {
      word pd412;
      pd412 = (* (( (ptr) (* (( (ptr) gf←c75784)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd412 ))))(c←v23552, 31, (* (( (ptr) formal←c75816)+5) ), 4, pd412);
      };
SOURCE(26202, 27)
   {
      word pd413;
      pd413 = (* (( (ptr) (* (( (ptr) gf←c75784)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd413 ))))(c←v23552, (* (( (ptr) formal←c75816)+4) ), pd413);
      };
SOURCE(26231, 17)
   {
      word pd414;
      pd414 = (* (( (ptr) (* (( (ptr) gf←c75784)+177)/* var←c66440 */  ))+33) );
      (void) ( *( (fPt) ((*  (ptr) pd414 ))))(c←v23552, (* (( (ptr) formal←c75816)+8) ), pd414);
      };
SOURCE(26250, 26)
   {
      word pd415;
      pd415 = (* (( (ptr) (* (( (ptr) gf←c75784)+177)/* var←c66440 */  ))+19) );
      (void) ( *( (fPt) ((*  (ptr) pd415 ))))(c←v23552, (* (( (ptr) formal←c75816)+6) ), pd415);
      };
SOURCE(26278, 27)
   {
      word pd416;
      pd416 = (* (( (ptr) (* (( (ptr) gf←c75784)+177)/* var←c66440 */  ))+19) );
      (void) ( *( (fPt) ((*  (ptr) pd416 ))))(c←v23552, (* (( (ptr) formal←c75816)+7) ), pd416);
      };
SOURCE(26307, 12)
   {
      word pd417;
      pd417 = (* (( (ptr) (* (( (ptr) gf←c75784)+177)/* var←c66440 */  ))+20) );
      (void) ( *( (fPt) ((*  (ptr) pd417 ))))(c←v23552, 0, pd417);
      };
SOURCE(26321, 26)
   {
      word pd418;
      pd418 = (* (( (ptr) (* (( (ptr) gf←c75784)+177)/* var←c66440 */  ))+62) );
      reply←v23608 = (word) ( *( (fPt) ((*  (ptr) pd418 ))))(c←v23552, pd418);
      };
SOURCE(26349, 28)
   {
      word idx419;
      (* (( (ptr) formal←c75816)+9) ) =  (unsigned) (
         idx419 = (word)  (unsigned) (* (( (bPt) reply←v23608)+1) ),
         BCK(idx419, 5)
         );
      };
SOURCE(26379, 100)
   if (((* (( (ptr) formal←c75816)+9) ) == 0)) {
SOURCE(26404, 28)
      (* (( (ptr) cPriv←v23580)+10) ) = 1;
SOURCE(26434, 45)
      {
         word pd420;
         pd420 = (* (( (ptr) (* (( (ptr) gf←c75784)+184)/* var←c69640 */  ))+7) );
         (void) ( *( (fPt) ((*  (ptr) pd420 ))))(c←v23552, (* (( (ptr) gf←c75784)+7)/* keyboardGrab←v4484 */  ), c←v23552, pd420);
         };
      };
   }

static void UngrabKeyboard←P2700(c←v13580, formal←c01131, formal←c01132)
   word c←v13580;
   word formal←c01131;
   word formal←c01132;
   {
   W8 var←c75848;
   /* declaration of time←v13608 skipped */ 
   /* declaration of details←v13636 skipped */ 
   register ptr gf←c75880 =  (ptr) &globalframe;
   /* declaration of var←c69672 skipped */ 
   var←c75848.f4/* time←v13608 */  = formal←c01131;
   var←c75848.f5/* details←v13636 */  = formal←c01132;
   /* UngrabKeyboard: */ 
SOURCE(26546, 383)
   {
      word tmpAddr421;
      tmpAddr421 = (word) (( (ptr) &var←c75848)+6)/* var←c69672 */ ;
      (*  (ptr) tmpAddr421 ) = ( ((word)  (fPt) action←P7140) );
      (* (( (ptr) tmpAddr421) + 1) ) = 1;
      };
SOURCE(26898, 31)
   {
      word pd422;
      pd422 = (* (( (ptr) (* (( (ptr) gf←c75880)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd422 ))))(c←v13580, (word) (( (bPt) &var←c75848)+24)/* var←c69672 */ , var←c75848.f5/* details←v13636 */ , pd422)
      ;
      };
   }

static void action←P7140(c←v23740, formal←c75944)
   word c←v23740;
   word formal←c75944;
   {
   register ptr gf←c75912 =  (ptr) &globalframe;
   word cPriv←v23768;
   formal←c75944 = (formal←c75944 - 24);
   /* action: */ 
SOURCE(26635, 254)
SOURCE(26668, 45)
   cPriv←v23768 = (* (( (ptr) c←v23740)+24) );
SOURCE(26715, 18)
   {
      word pd423;
      pd423 = (* (( (ptr) (* (( (ptr) gf←c75912)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd423 ))))(c←v23740, 32, 0, 2, pd423);
      };
SOURCE(26735, 17)
   {
      word pd424;
      pd424 = (* (( (ptr) (* (( (ptr) gf←c75912)+177)/* var←c66440 */  ))+33) );
      (void) ( *( (fPt) ((*  (ptr) pd424 ))))(c←v23740, (* (( (ptr) formal←c75944)+4) ), pd424);
      };
SOURCE(26754, 29)
   {
      word pd425;
      pd425 = (* (( (ptr) (* (( (ptr) gf←c75912)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd425 ))))(c←v23740, (* (( (ptr) formal←c75944)+5) ), pd425);
      };
SOURCE(26785, 104)
   if (((* (( (ptr) formal←c75944)+4) ) == 0)) {
SOURCE(26812, 29)
      (* (( (ptr) cPriv←v23768)+10) ) = 0;
SOURCE(26843, 46)
      {
         word pd426;
         pd426 = (* (( (ptr) (* (( (ptr) gf←c75912)+184)/* var←c69640 */  ))+7) );
         (void) ( *( (fPt) ((*  (ptr) pd426 ))))(c←v23740, (* (( (ptr) gf←c75912)+7)/* keyboardGrab←v4484 */  ), 0, pd426);
         };
      };
   }

static void ForcedUngrabKeyboard←P2760(c←v13696)
   word c←v13696;
   {
   register ptr gf←c75976 =  (ptr) &globalframe;
   word time←v23824;
   word cPriv←v23852;
   /* ForcedUngrabKeyboard: */ 
SOURCE(26935, 459)
SOURCE(26989, 37)
   {
      word pd427;
      pd427 = (* (( (ptr) (* (( (ptr) gf←c75976)+182)/* var←c68936 */  ))+14) );
      time←v23824 = (word) ( *( (fPt) ((*  (ptr) pd427 ))))(pd427);
      };
SOURCE(27028, 45)
   cPriv←v23852 = (* (( (ptr) c←v13696)+24) );
SOURCE(27075, 26)
   (void) InstallKeyboardUnWedger←P2580(c←v13696);
SOURCE(27103, 141)
   {
      word var←c69704;
      {
         word pd428;
         pd428 = (* (( (ptr) (* (( (ptr) gf←c75976)+176)/* var←c66376 */  ))+20) );
         var←c69704 = (word) ( *( (fPt) ((*  (ptr) pd428 ))))(c←v13696, pd428);
         };
      {
         word pd429;
         pd429 = (* (( (ptr) (* (( (ptr) gf←c75976)+176)/* var←c66376 */  ))+53) );
         (void) ( *( (fPt) ((*  (ptr) pd429 ))))(c←v13696, var←c69704, (* (( (ptr) cPriv←v23852)+11) ), (* (( (ptr) cPriv←v23852)+11)
             ), 0, (* (( (ptr) gf←c75976)+37) )
            , 0, 2147483647, 0, pd429);
         };
      };
SOURCE(27246, 8)
   {
      word pd430;
      pd430 = (* (( (ptr) (* (( (ptr) gf←c75976)+176)/* var←c66376 */  ))+43) );
      (void) ( *( (fPt) ((*  (ptr) pd430 ))))(c←v13696, 0, pd430);
      };
SOURCE(27256, 138)
   lab←L100085: ;
   {
      word pd431;
      pd431 = (* (( (ptr) (* (( (ptr) gf←c75976)+176)/* var←c66376 */  ))+28) );
      if (((word) ( *( (fPt) ((*  (ptr) pd431 ))))(c←v13696, (* (( (ptr) gf←c75976)+7)/* keyboardGrab←v4484 */  ), pd431) != 0)) {
         }
      else {
         goto lab←L100083;
         };
      };
   {
      word var←c69736;
SOURCE(27304, 66)
      {
         word pd433;
         {
            word pd432;
            pd432 = (* (( (ptr) (* (( (ptr) gf←c75976)+182)/* var←c68936 */  ))+14) );
            var←c69736 = (word) ( *( (fPt) ((*  (ptr) pd432 ))))(pd432);
            };
         pd433 = (* (( (ptr) (* (( (ptr) gf←c75976)+182)/* var←c68936 */  ))+16) );
         if (( (int)(word) ( *( (fPt) ((*  (ptr) pd433 ))))(time←v23824, var←c69736, pd433) >  (int)5)) {
SOURCE(27364, 6)
            return;
            };
         };
SOURCE(27372, 22)
      {
         word pd434;
         pd434 = (* (( (ptr) (* (( (ptr) gf←c75976)+183)/* var←c69032 */  ))+22) );
         (void) ( *( (fPt) ((*  (ptr) pd434 ))))(100, pd434);
         };
      };
   goto lab←L100085;
   lab←L100083: ;
   }

static void GrabKey←P2820(c←v13756, formal←c01133, formal←c01134, formal←c01135, formal←c01136, formal←c01137, formal←c01138, formal←c01139)
   word c←v13756;
   word formal←c01133;
   word formal←c01134;
   word formal←c01135;
   word formal←c01136;
   word formal←c01137;
   word formal←c01138;
   word formal←c01139;
   {
   W13 var←c76008;
   /* declaration of grabWindow←v13784 skipped */ 
   /* declaration of modifiers←v13812 skipped */ 
   /* declaration of key←v13840 skipped */ 
   /* declaration of ownerEvents←v13868 skipped */ 
   /* declaration of pointerMode←v13896 skipped */ 
   /* declaration of keyboardMode←v13924 skipped */ 
   /* declaration of details←v13952 skipped */ 
   register ptr gf←c76040 =  (ptr) &globalframe;
   /* declaration of var←c69768 skipped */ 
   (* (( (ptr) &var←c76008)+4)/* grabWindow←v13784 */  ) = formal←c01133;
   (* (( (ptr) &var←c76008)+5)/* modifiers←v13812 */  ) = formal←c01134;
   (* (( (ptr) &var←c76008)+6)/* key←v13840 */  ) = formal←c01135;
   (* (( (ptr) &var←c76008)+7)/* ownerEvents←v13868 */  ) = formal←c01136;
   (* (( (ptr) &var←c76008)+8)/* pointerMode←v13896 */  ) = formal←c01137;
   (* (( (ptr) &var←c76008)+9)/* keyboardMode←v13924 */  ) = formal←c01138;
   (* (( (ptr) &var←c76008)+10)/* details←v13952 */  ) = formal←c01139;
   /* GrabKey: */ 
SOURCE(27409, 503)
   {
      word tmpAddr435;
      tmpAddr435 = (word) (( (ptr) &var←c76008)+11)/* var←c69768 */ ;
      (*  (ptr) tmpAddr435 ) = ( ((word)  (fPt) action←P7200) );
      (* (( (ptr) tmpAddr435) + 1) ) = 1;
      };
SOURCE(27881, 31)
   {
      word pd436;
      pd436 = (* (( (ptr) (* (( (ptr) gf←c76040)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd436 ))))(c←v13756, (word) (( (bPt) &var←c76008)+44)/* var←c69768 */ , (* (( (ptr) &var←c76008)+10)
         /* details←v13952 */  ), pd436);
      };
   }

static void action←P7200(c←v23984, formal←c76104)
   word c←v23984;
   word formal←c76104;
   {
   register ptr gf←c76072 =  (ptr) &globalframe;
   formal←c76104 = (formal←c76104 - 44);
   /* action: */ 
SOURCE(27606, 269)
SOURCE(27639, 37)
   {
      word pd437;
      pd437 = (* (( (ptr) (* (( (ptr) gf←c76072)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd437 ))))(c←v23984, 33, (* (( (ptr) formal←c76104)+7) ), 4, pd437);
      };
SOURCE(27678, 27)
   {
      word pd438;
      pd438 = (* (( (ptr) (* (( (ptr) gf←c76072)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd438 ))))(c←v23984, (* (( (ptr) formal←c76104)+4) ), pd438);
      };
SOURCE(27707, 47)
   {
      word var←c69800;
      {
         word x←v62180;
         x←v62180 = (* (( (ptr) formal←c76104)+5) );
         var←c69800 =  (unsigned) ( (((unsigned)x←v62180 << 16) >> 16) );
         };
      {
         word pd439;
         pd439 = (* (( (ptr) (* (( (ptr) gf←c76072)+177)/* var←c66440 */  ))+20) );
         (void) ( *( (fPt) ((*  (ptr) pd439 ))))(c←v23984, var←c69800, pd439);
         };
      };
SOURCE(27756, 18)
   {
      word pd440;
      pd440 = (* (( (ptr) (* (( (ptr) gf←c76072)+177)/* var←c66440 */  ))+19) );
      (void) ( *( (fPt) ((*  (ptr) pd440 ))))(c←v23984, (* (( (ptr) formal←c76104)+6) ), pd440);
      };
SOURCE(27776, 26)
   {
      word pd441;
      pd441 = (* (( (ptr) (* (( (ptr) gf←c76072)+177)/* var←c66440 */  ))+19) );
      (void) ( *( (fPt) ((*  (ptr) pd441 ))))(c←v23984, (* (( (ptr) formal←c76104)+8) ), pd441);
      };
SOURCE(27804, 27)
   {
      word pd442;
      pd442 = (* (( (ptr) (* (( (ptr) gf←c76072)+177)/* var←c66440 */  ))+19) );
      (void) ( *( (fPt) ((*  (ptr) pd442 ))))(c←v23984, (* (( (ptr) formal←c76104)+9) ), pd442);
      };
SOURCE(27833, 11)
   (* (( (ptr) c←v23984)+4) ) = ((* (( (ptr) c←v23984)+4) ) + 3);
SOURCE(27846, 29)
   {
      word pd443;
      pd443 = (* (( (ptr) (* (( (ptr) gf←c76072)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd443 ))))(c←v23984, (* (( (ptr) formal←c76104)+10) ), pd443);
      };
   }

static void UngrabKey←P2880(c←v14012, formal←c01140, formal←c01141, formal←c01142, formal←c01143)
   word c←v14012;
   word formal←c01140;
   word formal←c01141;
   word formal←c01142;
   word formal←c01143;
   {
   W10 var←c76136;
   /* declaration of window←v14040 skipped */ 
   /* declaration of modifiers←v14068 skipped */ 
   /* declaration of key←v14096 skipped */ 
   /* declaration of details←v14124 skipped */ 
   register ptr gf←c76168 =  (ptr) &globalframe;
   /* declaration of var←c69864 skipped */ 
   (* (( (ptr) &var←c76136)+4)/* window←v14040 */  ) = formal←c01140;
   (* (( (ptr) &var←c76136)+5)/* modifiers←v14068 */  ) = formal←c01141;
   (* (( (ptr) &var←c76136)+6)/* key←v14096 */  ) = formal←c01142;
   (* (( (ptr) &var←c76136)+7)/* details←v14124 */  ) = formal←c01143;
   /* UngrabKey: */ 
SOURCE(27918, 332)
   {
      word tmpAddr444;
      tmpAddr444 = (word) (( (ptr) &var←c76136)+8)/* var←c69864 */ ;
      (*  (ptr) tmpAddr444 ) = ( ((word)  (fPt) action←P7260) );
      (* (( (ptr) tmpAddr444) + 1) ) = 1;
      };
SOURCE(28219, 31)
   {
      word pd445;
      pd445 = (* (( (ptr) (* (( (ptr) gf←c76168)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd445 ))))(c←v14012, (word) (( (bPt) &var←c76136)+32)/* var←c69864 */ , (* (( (ptr) &var←c76136)+7)
         /* details←v14124 */  ), pd445);
      };
   }

static void action←P7260(c←v24088, formal←c76232)
   word c←v24088;
   word formal←c76232;
   {
   register ptr gf←c76200 =  (ptr) &globalframe;
   formal←c76232 = (formal←c76232 - 32);
   /* action: */ 
SOURCE(28037, 176)
SOURCE(28070, 25)
   {
      word pd446;
      pd446 = (* (( (ptr) (* (( (ptr) gf←c76200)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd446 ))))(c←v24088, 34, (* (( (ptr) formal←c76232)+6) ), 3, pd446);
      };
SOURCE(28097, 23)
   {
      word pd447;
      pd447 = (* (( (ptr) (* (( (ptr) gf←c76200)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd447 ))))(c←v24088, (* (( (ptr) formal←c76232)+4) ), pd447);
      };
SOURCE(28122, 47)
   {
      word var←c69896;
      {
         word x←v62136;
         x←v62136 = (* (( (ptr) formal←c76232)+5) );
         var←c69896 =  (unsigned) ( (((unsigned)x←v62136 << 16) >> 16) );
         };
      {
         word pd448;
         pd448 = (* (( (ptr) (* (( (ptr) gf←c76200)+177)/* var←c66440 */  ))+20) );
         (void) ( *( (fPt) ((*  (ptr) pd448 ))))(c←v24088, var←c69896, pd448);
         };
      };
SOURCE(28171, 11)
   (* (( (ptr) c←v24088)+4) ) = ((* (( (ptr) c←v24088)+4) ) + 2);
SOURCE(28184, 29)
   {
      word pd449;
      pd449 = (* (( (ptr) (* (( (ptr) gf←c76200)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd449 ))))(c←v24088, (* (( (ptr) formal←c76232)+7) ), pd449);
      };
   }

static void AllowEvents←P2940(c←v14184, formal←c01144, formal←c01145, formal←c01146)
   word c←v14184;
   word formal←c01144;
   word formal←c01145;
   word formal←c01146;
   {
   W9 var←c76264;
   /* declaration of mode←v14212 skipped */ 
   /* declaration of time←v14240 skipped */ 
   /* declaration of details←v14268 skipped */ 
   register ptr gf←c76296 =  (ptr) &globalframe;
   /* declaration of var←c69960 skipped */ 
   (* (( (ptr) &var←c76264)+4)/* mode←v14212 */  ) = formal←c01144;
   (* (( (ptr) &var←c76264)+5)/* time←v14240 */  ) = formal←c01145;
   (* (( (ptr) &var←c76264)+6)/* details←v14268 */  ) = formal←c01146;
   /* AllowEvents: */ 
SOURCE(28256, 304)
   {
      word tmpAddr450;
      tmpAddr450 = (word) (( (ptr) &var←c76264)+7)/* var←c69960 */ ;
      (*  (ptr) tmpAddr450 ) = ( ((word)  (fPt) action←P7320) );
      (* (( (ptr) tmpAddr450) + 1) ) = 1;
      };
SOURCE(28529, 31)
   {
      word pd451;
      pd451 = (* (( (ptr) (* (( (ptr) gf←c76296)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd451 ))))(c←v14184, (word) (( (bPt) &var←c76264)+28)/* var←c69960 */ , (* (( (ptr) &var←c76264)+6)
         /* details←v14268 */  ), pd451);
      };
   }

static void action←P7320(c←v24192, formal←c76360)
   word c←v24192;
   word formal←c76360;
   {
   register ptr gf←c76328 =  (ptr) &globalframe;
   formal←c76360 = (formal←c76360 - 28);
   /* action: */ 
SOURCE(28359, 165)
SOURCE(28392, 26)
   {
      word pd452;
      pd452 = (* (( (ptr) (* (( (ptr) gf←c76328)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd452 ))))(c←v24192, 35, (* (( (ptr) formal←c76360)+4) ), 2, pd452);
      };
SOURCE(28420, 17)
   {
      word pd453;
      pd453 = (* (( (ptr) (* (( (ptr) gf←c76328)+177)/* var←c66440 */  ))+33) );
      (void) ( *( (fPt) ((*  (ptr) pd453 ))))(c←v24192, (* (( (ptr) formal←c76360)+5) ), pd453);
      };
SOURCE(28439, 29)
   {
      word pd454;
      pd454 = (* (( (ptr) (* (( (ptr) gf←c76328)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd454 ))))(c←v24192, (* (( (ptr) formal←c76360)+6) ), pd454);
      };
SOURCE(28471, 53)
   if (((* (( (ptr) formal←c76360)+6) ) == 0)) {
SOURCE(28491, 33)
      {
         word pd455;
         if (((* (( (ptr) c←v24192)+5) ) != 0) || (0 != (* (( (ptr) c←v24192)+35) ))) {
            pd455 = (* (( (ptr) (* (( (ptr) gf←c76328)+177)/* var←c66440 */  ))+13) );
            (void) ( *( (fPt) ((*  (ptr) pd455 ))))(c←v24192, 0, pd455);
            };
         };
      };
   }

static void AddDispatch←P3000(c←v14328, window←v14356, match←v14384, generate←v14412, details←v14440)
   word c←v14328;
   word window←v14356;
   word match←v14384;
   word generate←v14412;
   word details←v14440;
   {
   register ptr gf←c76392 =  (ptr) &globalframe;
   /* AddDispatch: */ 
SOURCE(28566, 197)
SOURCE(28707, 56)
   {
      word pd456;
      pd456 = (* (( (ptr) (* (( (ptr) gf←c76392)+178)/* var←c66504 */  ))+11) );
      (void) ( *( (fPt) ((*  (ptr) pd456 ))))(c←v14328, window←v14356, match←v14384, generate←v14412, details←v14440, pd456);
      };
   }

static void AddDispatchJunk←P3060(c←v14500, match←v14528)
   word c←v14500;
   word match←v14528;
   {
   register ptr gf←c76424 =  (ptr) &globalframe;
   /* AddDispatchJunk: */ 
SOURCE(28768, 108)
SOURCE(28831, 45)
   {
      word pd457;
      pd457 = (* (( (ptr) (* (( (ptr) gf←c76424)+178)/* var←c66504 */  ))+14) );
      (void) ( *( (fPt) ((*  (ptr) pd457 ))))(c←v14500, match←v14528, pd457);
      };
   }

static void ClearArea←P3120(c←v14588, formal←c01147, formal←c01148, formal←c01149, formal←c01150, formal←c01151)
   word c←v14588;
   word formal←c01147;
   W2 formal←c01148;
   W2 formal←c01149;
   word formal←c01150;
   word formal←c01151;
   {
   W13 var←c76456;
   /* declaration of window←v14616 skipped */ 
   /* declaration of pos←v14644 skipped */ 
   /* declaration of size←v14672 skipped */ 
   /* declaration of exposures←v14700 skipped */ 
   /* declaration of details←v14728 skipped */ 
   register ptr gf←c76488 =  (ptr) &globalframe;
   /* declaration of var←c69992 skipped */ 
   (* (( (ptr) &var←c76456)+4)/* window←v14616 */  ) = formal←c01147;
   (*  (W2Pt) (( (ptr) &var←c76456)+5)/* pos←v14644 */  ) = formal←c01148;
   (*  (W2Pt) (( (ptr) &var←c76456)+7)/* size←v14672 */  ) = formal←c01149;
   (* (( (ptr) &var←c76456)+9)/* exposures←v14700 */  ) = formal←c01150;
   (* (( (ptr) &var←c76456)+10)/* details←v14728 */  ) = formal←c01151;
   /* ClearArea: */ 
SOURCE(28879, 302)
   {
      word tmpAddr458;
      tmpAddr458 = (word) (( (ptr) &var←c76456)+11)/* var←c69992 */ ;
      (*  (ptr) tmpAddr458 ) = ( ((word)  (fPt) action←P7380) );
      (* (( (ptr) tmpAddr458) + 1) ) = 1;
      };
SOURCE(29150, 31)
   {
      word pd459;
      pd459 = (* (( (ptr) (* (( (ptr) gf←c76488)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd459 ))))(c←v14588, (word) (( (bPt) &var←c76456)+44)/* var←c69992 */ , (* (( (ptr) &var←c76456)+10)
         /* details←v14728 */  ), pd459);
      };
   }

static void action←P7380(c←v24296, formal←c76552)
   word c←v24296;
   word formal←c76552;
   {
   register ptr gf←c76520 =  (ptr) &globalframe;
   formal←c76552 = (formal←c76552 - 44);
   /* action: */ 
SOURCE(28997, 148)
SOURCE(29030, 35)
   {
      word pd460;
      pd460 = (* (( (ptr) (* (( (ptr) gf←c76520)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd460 ))))(c←v24296, 61, (* (( (ptr) formal←c76552)+9) ), 4, pd460);
      };
SOURCE(29067, 23)
   {
      word pd461;
      pd461 = (* (( (ptr) (* (( (ptr) gf←c76520)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd461 ))))(c←v24296, (* (( (ptr) formal←c76552)+4) ), pd461);
      };
SOURCE(29092, 22)
   {
      word pd462;
      pd462 = (* (( (ptr) (* (( (ptr) gf←c76520)+177)/* var←c66440 */  ))+30) );
      (void) ( *( (fPt) ((*  (ptr) pd462 ))))(c←v24296, (*  (W2Pt) (( (ptr) formal←c76552)+5) ), (*  (W2Pt) (( (ptr) formal←c76552)+7)
          ), pd462);
      };
SOURCE(29116, 29)
   {
      word pd463;
      pd463 = (* (( (ptr) (* (( (ptr) gf←c76520)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd463 ))))(c←v24296, (* (( (ptr) formal←c76552)+10) ), pd463);
      };
   }

static word InternalSomeImportantDown←P3180(c←v14788)
   word c←v14788;
   {
   register ptr gf←c76584 =  (ptr) &globalframe;
   word down←v14832;
   word reply←v24324;
   /* InternalSomeImportantDown: */ 
SOURCE(29187, 204)
SOURCE(29270, 50)
   reply←v24324 = (word) InternalQueryPointer←P3240(c←v14788, 0);
SOURCE(29322, 45)
   if (( (unsigned) (* (( (bPt) reply←v24324)+24) ) != 0)) {
      down←v14832 =  (unsigned) 1;
      }
   else {
      down←v14832 =  (unsigned) ( (unsigned) (* (( (bPt) reply←v24324)+25) ) != 0);
      };
SOURCE(29369, 22)
   {
      word pd464;
      pd464 = (* (( (ptr) (* (( (ptr) gf←c76584)+177)/* var←c66440 */  ))+67) );
      (void) ( *( (fPt) ((*  (ptr) pd464 ))))(c←v14788, reply←v24324, pd464);
      };
SOURCE(29187, 204)
   return(down←v14832);
   }

static word InternalQueryPointer←P3240(c←v14892, window←v14920)
   word c←v14892;
   word window←v14920;
   {
   register ptr gf←c76616 =  (ptr) &globalframe;
   word reply←v14964;
   /* InternalQueryPointer: */ 
SOURCE(29397, 222)
SOURCE(29397, 222)
   reply←v14964 = 0;
SOURCE(29497, 18)
   {
      word pd465;
      pd465 = (* (( (ptr) (* (( (ptr) gf←c76616)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd465 ))))(c←v14892, 38, 0, 2, pd465);
      };
SOURCE(29517, 49)
   if ((window←v14920 == 0)) {
SOURCE(29543, 23)
      {
         word pd466;
         pd466 = (* (( (ptr) (* (( (ptr) gf←c76616)+176)/* var←c66376 */  ))+21) );
         window←v14920 = (word) ( *( (fPt) ((*  (ptr) pd466 ))))(c←v14892, pd466);
         };
      };
SOURCE(29568, 23)
   {
      word pd467;
      pd467 = (* (( (ptr) (* (( (ptr) gf←c76616)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd467 ))))(c←v14892, window←v14920, pd467);
      };
SOURCE(29593, 26)
   {
      word pd468;
      pd468 = (* (( (ptr) (* (( (ptr) gf←c76616)+177)/* var←c66440 */  ))+62) );
      reply←v14964 = (word) ( *( (fPt) ((*  (ptr) pd468 ))))(c←v14892, pd468);
      };
SOURCE(29397, 222)
   return(reply←v14964);
   }

static void QueryPointer←P3300(formal←c0612, c←v15024, formal←c01152)
   word formal←c0612;
   word c←v15024;
   word formal←c01152;
   {
   W8 var←c76648;
   /* declaration of window←v15052 skipped */ 
   register ptr gf←c76680 =  (ptr) &globalframe;
   W8 qr←v15096;
   /* declaration of var←c70024 skipped */ 
   /* declaration of reply←v24368 skipped */ 
   var←c76648.f4/* window←v15052 */  = formal←c01152;
   /* QueryPointer: */ 
SOURCE(29625, 529)
   {
      word tmpAddr469;
      tmpAddr469 = (word) (( (ptr) &var←c76648)+5)/* var←c70024 */ ;
      (*  (ptr) tmpAddr469 ) = ( ((word)  (fPt) action←P7440) );
      (* (( (ptr) tmpAddr469) + 1) ) = 1;
      };
SOURCE(29625, 529)
   XR←FillWords(&qr←v15096, 8, 0);
SOURCE(29727, 12)
   var←c76648.f7/* reply←v24368 */  = 0;
SOURCE(29815, 27)
   {
      word pd470;
      pd470 = (* (( (ptr) (* (( (ptr) gf←c76680)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd470 ))))(c←v15024, (word) (( (bPt) &var←c76648)+20)/* var←c70024 */ , 0, pd470);
      };
SOURCE(29844, 17)
   {
      word pd471;
      pd471 = (* (( (ptr) (* (( (ptr) gf←c76680)+177)/* var←c66440 */  ))+68) );
      (void) ( *( (fPt) ((*  (ptr) pd471 ))))(var←c76648.f7/* reply←v24368 */ , pd471);
      };
SOURCE(29863, 31)
   {
      word pd472;
      pd472 = (* (( (ptr) (* (( (ptr) gf←c76680)+177)/* var←c66440 */  ))+77) );
      qr←v15096.f7 =  (unsigned) ((word) ( *( (fPt) ((*  (ptr) pd472 ))))(var←c76648.f7/* reply←v24368 */ , pd472) != 0);
      };
SOURCE(29896, 14)
   (* (( (ptr) var←c76648.f7/* reply←v24368 */ )+10) ) = ((* (( (ptr) var←c76648.f7/* reply←v24368 */ )+10) ) + 6);
SOURCE(29913, 37)
   {
      word var←c70056;
      word c←v63464;
      word id←v63492;
      c←v63464 = c←v15024;
      {
         word pd473;
         pd473 = (* (( (ptr) (* (( (ptr) gf←c76680)+177)/* var←c66440 */  ))+79) );
         id←v63492 = (word) ( *( (fPt) ((*  (ptr) pd473 ))))(var←c76648.f7/* reply←v24368 */ , pd473);
         };
      var←c70056 = id←v63492;
      qr←v15096.f0 = var←c70056;
      };
SOURCE(29952, 38)
   {
      word var←c70088;
      word c←v63388;
      word id←v63416;
      c←v63388 = c←v15024;
      {
         word pd474;
         pd474 = (* (( (ptr) (* (( (ptr) gf←c76680)+177)/* var←c66440 */  ))+79) );
         id←v63416 = (word) ( *( (fPt) ((*  (ptr) pd474 ))))(var←c76648.f7/* reply←v24368 */ , pd474);
         };
      var←c70088 = id←v63416;
      qr←v15096.f1 = var←c70088;
      };
SOURCE(29992, 27)
   {
      word pd475;
      pd475 = (* (( (ptr) (* (( (ptr) gf←c76680)+177)/* var←c66440 */  ))+78) );
      qr←v15096.f2 = (word) ( *( (fPt) ((*  (ptr) pd475 ))))(var←c76648.f7/* reply←v24368 */ , pd475);
      };
SOURCE(30021, 27)
   {
      word pd476;
      pd476 = (* (( (ptr) (* (( (ptr) gf←c76680)+177)/* var←c66440 */  ))+78) );
      qr←v15096.f3 = (word) ( *( (fPt) ((*  (ptr) pd476 ))))(var←c76648.f7/* reply←v24368 */ , pd476);
      };
SOURCE(30050, 25)
   {
      word pd477;
      pd477 = (* (( (ptr) (* (( (ptr) gf←c76680)+177)/* var←c66440 */  ))+78) );
      qr←v15096.f4 = (word) ( *( (fPt) ((*  (ptr) pd477 ))))(var←c76648.f7/* reply←v24368 */ , pd477);
      };
SOURCE(30077, 25)
   {
      word pd478;
      pd478 = (* (( (ptr) (* (( (ptr) gf←c76680)+177)/* var←c66440 */  ))+78) );
      qr←v15096.f5 = (word) ( *( (fPt) ((*  (ptr) pd478 ))))(var←c76648.f7/* reply←v24368 */ , pd478);
      };
SOURCE(30104, 26)
   {
      word pd479;
      pd479 = (* (( (ptr) (* (( (ptr) gf←c76680)+177)/* var←c66440 */  ))+78) );
      qr←v15096.f6 = ((word) ( *( (fPt) ((*  (ptr) pd479 ))))(var←c76648.f7/* reply←v24368 */ , pd479) << 16);
      };
SOURCE(30132, 22)
   {
      word pd480;
      pd480 = (* (( (ptr) (* (( (ptr) gf←c76680)+177)/* var←c66440 */  ))+67) );
      (void) ( *( (fPt) ((*  (ptr) pd480 ))))(c←v15024, var←c76648.f7/* reply←v24368 */ , pd480);
      };
   /* removed tail goto */ 
   (*  (W8Pt) formal←c0612 ) = qr←v15096;
   return;
   }

static void action←P7440(c←v24472, formal←c76712)
   word c←v24472;
   word formal←c76712;
   {
   formal←c76712 = (formal←c76712 - 20);
   /* action: */ 
SOURCE(29741, 71)
SOURCE(29773, 39)
   (* (( (ptr) formal←c76712)+7) ) = (word) InternalQueryPointer←P3240(c←v24472, (* (( (ptr) formal←c76712)+4) ));
   }

static void WarpPointer←P3360(c←v15156, formal←c01153, formal←c01154, formal←c01155, formal←c01156, formal←c01157, formal←c01158)
   word c←v15156;
   word formal←c01153;
   W2 formal←c01154;
   word formal←c01155;
   W2 formal←c01156;
   W2 formal←c01157;
   word formal←c01158;
   {
   W15 var←c76744;
   /* declaration of dstWindow←v15184 skipped */ 
   /* declaration of dstPos←v15212 skipped */ 
   /* declaration of srcWindow←v15240 skipped */ 
   /* declaration of srcPos←v15268 skipped */ 
   /* declaration of srcSize←v15296 skipped */ 
   /* declaration of details←v15324 skipped */ 
   register ptr gf←c76776 =  (ptr) &globalframe;
   /* declaration of var←c70152 skipped */ 
   (* (( (ptr) &var←c76744)+4)/* dstWindow←v15184 */  ) = formal←c01153;
   (*  (W2Pt) (( (ptr) &var←c76744)+5)/* dstPos←v15212 */  ) = formal←c01154;
   (* (( (ptr) &var←c76744)+7)/* srcWindow←v15240 */  ) = formal←c01155;
   (*  (W2Pt) (( (ptr) &var←c76744)+8)/* srcPos←v15268 */  ) = formal←c01156;
   (*  (W2Pt) (( (ptr) &var←c76744)+10)/* srcSize←v15296 */  ) = formal←c01157;
   (* (( (ptr) &var←c76744)+12)/* details←v15324 */  ) = formal←c01158;
   /* WarpPointer: */ 
SOURCE(30160, 386)
   {
      word tmpAddr481;
      tmpAddr481 = (word) (( (ptr) &var←c76744)+13)/* var←c70152 */ ;
      (*  (ptr) tmpAddr481 ) = ( ((word)  (fPt) action←P7500) );
      (* (( (ptr) tmpAddr481) + 1) ) = 1;
      };
SOURCE(30515, 31)
   {
      word pd482;
      pd482 = (* (( (ptr) (* (( (ptr) gf←c76776)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd482 ))))(c←v15156, (word) (( (bPt) &var←c76744)+52)/* var←c70152 */ , (* (( (ptr) &var←c76744)+12)
         /* details←v15324 */  ), pd482);
      };
   }

static void action←P7500(c←v24576, formal←c76840)
   word c←v24576;
   word formal←c76840;
   {
   register ptr gf←c76808 =  (ptr) &globalframe;
   formal←c76840 = (formal←c76840 - 52);
   /* action: */ 
SOURCE(30306, 204)
SOURCE(30339, 18)
   {
      word pd483;
      pd483 = (* (( (ptr) (* (( (ptr) gf←c76808)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd483 ))))(c←v24576, 41, 0, 6, pd483);
      };
SOURCE(30359, 26)
   {
      word pd484;
      pd484 = (* (( (ptr) (* (( (ptr) gf←c76808)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd484 ))))(c←v24576, (* (( (ptr) formal←c76840)+7) ), pd484);
      };
SOURCE(30387, 26)
   {
      word pd485;
      pd485 = (* (( (ptr) (* (( (ptr) gf←c76808)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd485 ))))(c←v24576, (* (( (ptr) formal←c76840)+4) ), pd485);
      };
SOURCE(30415, 20)
   {
      word pd486;
      pd486 = (* (( (ptr) (* (( (ptr) gf←c76808)+177)/* var←c66440 */  ))+28) );
      (void) ( *( (fPt) ((*  (ptr) pd486 ))))(c←v24576, (*  (W2Pt) (( (ptr) formal←c76840)+8) ), pd486);
      };
SOURCE(30437, 20)
   {
      word pd487;
      pd487 = (* (( (ptr) (* (( (ptr) gf←c76808)+177)/* var←c66440 */  ))+29) );
      (void) ( *( (fPt) ((*  (ptr) pd487 ))))(c←v24576, (*  (W2Pt) (( (ptr) formal←c76840)+10) ), pd487);
      };
SOURCE(30459, 20)
   {
      word pd488;
      pd488 = (* (( (ptr) (* (( (ptr) gf←c76808)+177)/* var←c66440 */  ))+28) );
      (void) ( *( (fPt) ((*  (ptr) pd488 ))))(c←v24576, (*  (W2Pt) (( (ptr) formal←c76840)+5) ), pd488);
      };
SOURCE(30481, 29)
   {
      word pd489;
      pd489 = (* (( (ptr) (* (( (ptr) gf←c76808)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd489 ))))(c←v24576, (* (( (ptr) formal←c76840)+12) ), pd489);
      };
   }

static word GetMotionEvents←P3420(c←v15384, formal←c01159, formal←c01160, formal←c01161)
   word c←v15384;
   word formal←c01159;
   word formal←c01160;
   word formal←c01161;
   {
   W10 var←c76872;
   /* declaration of window←v15412 skipped */ 
   /* declaration of start←v15440 skipped */ 
   /* declaration of stop←v15468 skipped */ 
   register ptr gf←c76904 =  (ptr) &globalframe;
   word tc←v15512;
   /* declaration of var←c70184 skipped */ 
   /* declaration of reply←v24632 skipped */ 
   word tcLeng←v24660;
   word replyExtLeng←v24688;
   (* (( (ptr) &var←c76872)+4)/* window←v15412 */  ) = formal←c01159;
   (* (( (ptr) &var←c76872)+5)/* start←v15440 */  ) = formal←c01160;
   (* (( (ptr) &var←c76872)+6)/* stop←v15468 */  ) = formal←c01161;
   /* GetMotionEvents: */ 
SOURCE(30552, 842)
   {
      word tmpAddr490;
      tmpAddr490 = (word) (( (ptr) &var←c76872)+7)/* var←c70184 */ ;
      (*  (ptr) tmpAddr490 ) = ( ((word)  (fPt) action←P7560) );
      (* (( (ptr) tmpAddr490) + 1) ) = 1;
      };
SOURCE(30552, 842)
   tc←v15512 = 0;
SOURCE(30825, 12)
   (* (( (ptr) &var←c76872)+9)/* reply←v24632 */  ) = 0;
SOURCE(30873, 27)
   {
      word pd491;
      pd491 = (* (( (ptr) (* (( (ptr) gf←c76904)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd491 ))))(c←v15384, (word) (( (bPt) &var←c76872)+28)/* var←c70184 */ , 0, pd491);
      };
SOURCE(30902, 17)
   {
      word pd492;
      pd492 = (* (( (ptr) (* (( (ptr) gf←c76904)+177)/* var←c66440 */  ))+68) );
      (void) ( *( (fPt) ((*  (ptr) pd492 ))))((* ((( (ptr) &var←c76872)+9)/* reply←v24632 */ ) ), pd492);
      };
SOURCE(30921, 14)
   (* (( (ptr) (* (( (ptr) &var←c76872)+9)/* reply←v24632 */  ))+10) ) = ((* (( (ptr) (* (( (ptr) &var←c76872)+9)/* reply←v24632 */  ))+10)
    ) + 3);
SOURCE(30937, 29)
   {
      word pd493;
      pd493 = (* (( (ptr) (* (( (ptr) gf←c76904)+177)/* var←c66440 */  ))+79) );
      replyExtLeng←v24688 = (word) ( *( (fPt) ((*  (ptr) pd493 ))))((* ((( (ptr) &var←c76872)+9)/* reply←v24632 */ ) ), pd493);
      };
SOURCE(30968, 23)
   {
      word pd494;
      pd494 = (* (( (ptr) (* (( (ptr) gf←c76904)+177)/* var←c66440 */  ))+79) );
      tcLeng←v24660 = (word) ( *( (fPt) ((*  (ptr) pd494 ))))((* ((( (ptr) &var←c76872)+9)/* reply←v24632 */ ) ), pd494);
      };
SOURCE(30993, 15)
   (* (( (ptr) (* (( (ptr) &var←c76872)+9)/* reply←v24632 */  ))+10) ) = ((* (( (ptr) (* (( (ptr) &var←c76872)+9)/* reply←v24632 */  ))+10)
    ) + 20);
SOURCE(31010, 153)
   if ((tcLeng←v24660 > (* (( (ptr) (* (( (ptr) c←v15384)+16) ))+5) )) || (((word) tcLeng←v24660 << 1) > replyExtLeng←v24688)) {
SOURCE(31084, 67)
      {
         word pd495;
         pd495 = (* (( (ptr) (* (( (ptr) gf←c76904)+181)/* var←c68424 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd495 ))))(c←v15384, (* (( (ptr) gf←c76904)+34) ), (* (( (ptr) &var←c76872)+9)/* reply←v24632 */  ), pd495)
         ;
         };
SOURCE(31153, 10)
      tcLeng←v24660 = 0;
      };
SOURCE(31168, 28)
   {
      word var←c70216;
      word var←c70248;
      word var←c70280;
      var←c70216 = BCK(tcLeng←v24660, 22369621);
      var←c70248 = ((word) var←c70216 * 12);
      var←c70280 = XR←NewObject((4 + var←c70248), (* (( (ptr) gf←c76904)+26) ));
      (*  (ptr) var←c70280 ) = var←c70216;
      tc←v15512 = var←c70280;
      };
SOURCE(31198, 163)
   {
      register word i←v24792 = 0;
      register word noName←c70312;
      noName←c70312 = tcLeng←v24660;
      if ((i←v24792 >= noName←c70312)) {
         goto lab←L100091;
         };
      lab←L100094: ;
SOURCE(31228, 29)
      {
         word var←c70344;
         {
            word pd496;
            pd496 = (* (( (ptr) (* (( (ptr) gf←c76904)+177)/* var←c66440 */  ))+79) );
            var←c70344 = (word) ( *( (fPt) ((*  (ptr) pd496 ))))((* ((( (ptr) &var←c76872)+9)/* reply←v24632 */ ) ), pd496);
            };
         {
            word limit497;
            (* (( (W3Pt) (( (ptr) tc←v15512)+1))+(
                  limit497 = (*  (ptr) tc←v15512 ),
                  BCK(i←v24792, limit497)
                  )) ).f0 = var←c70344;
            };
         };
SOURCE(31259, 50)
      {
         word var←c70376;
         {
            word pd498;
            pd498 = (* (( (ptr) (* (( (ptr) gf←c76904)+177)/* var←c66440 */  ))+78) );
            var←c70376 =  (int) ( short )( (((unsigned)(word) ( *( (fPt) ((*  (ptr) pd498 ))))((* ((( (ptr) &var←c76872)+9)/* reply←v24632 */ ) ), pd498)
             << 16) >> 16) );
            };
         {
            word limit499;
            (* (( (W3Pt) (( (ptr) tc←v15512)+1))+(
                  limit499 = (*  (ptr) tc←v15512 ),
                  BCK(i←v24792, limit499)
                  )) ).f1 = var←c70376;
            };
         };
SOURCE(31311, 50)
      {
         word var←c70408;
         {
            word pd500;
            pd500 = (* (( (ptr) (* (( (ptr) gf←c76904)+177)/* var←c66440 */  ))+78) );
            var←c70408 =  (int) ( short )( (((unsigned)(word) ( *( (fPt) ((*  (ptr) pd500 ))))((* ((( (ptr) &var←c76872)+9)/* reply←v24632 */ ) ), pd500)
             << 16) >> 16) );
            };
         {
            word limit501;
            (* (( (W3Pt) (( (ptr) tc←v15512)+1))+(
                  limit501 = (*  (ptr) tc←v15512 ),
                  BCK(i←v24792, limit501)
                  )) ).f2 = var←c70408;
            };
         };
      i←v24792 = (i←v24792 + 1);
      if ((i←v24792 < noName←c70312)) {
         goto lab←L100094;
         };
      lab←L100091: ;
      };
SOURCE(31372, 22)
   {
      word pd502;
      pd502 = (* (( (ptr) (* (( (ptr) gf←c76904)+177)/* var←c66440 */  ))+67) );
      (void) ( *( (fPt) ((*  (ptr) pd502 ))))(c←v15384, (* (( (ptr) &var←c76872)+9)/* reply←v24632 */  ), pd502);
      };
SOURCE(30552, 842)
   return(tc←v15512);
   }

static void action←P7560(c←v24764, formal←c76968)
   word c←v24764;
   word formal←c76968;
   {
   register ptr gf←c76936 =  (ptr) &globalframe;
   formal←c76968 = (formal←c76968 - 28);
   /* action: */ 
SOURCE(30676, 143)
SOURCE(30709, 18)
   {
      word pd503;
      pd503 = (* (( (ptr) (* (( (ptr) gf←c76936)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd503 ))))(c←v24764, 39, 0, 4, pd503);
      };
SOURCE(30729, 23)
   {
      word pd504;
      pd504 = (* (( (ptr) (* (( (ptr) gf←c76936)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd504 ))))(c←v24764, (* (( (ptr) formal←c76968)+4) ), pd504);
      };
SOURCE(30754, 18)
   {
      word pd505;
      pd505 = (* (( (ptr) (* (( (ptr) gf←c76936)+177)/* var←c66440 */  ))+33) );
      (void) ( *( (fPt) ((*  (ptr) pd505 ))))(c←v24764, (* (( (ptr) formal←c76968)+5) ), pd505);
      };
SOURCE(30774, 17)
   {
      word pd506;
      pd506 = (* (( (ptr) (* (( (ptr) gf←c76936)+177)/* var←c66440 */  ))+33) );
      (void) ( *( (fPt) ((*  (ptr) pd506 ))))(c←v24764, (* (( (ptr) formal←c76968)+6) ), pd506);
      };
SOURCE(30793, 26)
   {
      word pd507;
      pd507 = (* (( (ptr) (* (( (ptr) gf←c76936)+177)/* var←c66440 */  ))+62) );
      (* (( (ptr) formal←c76968)+9) ) = (word) ( *( (fPt) ((*  (ptr) pd507 ))))(c←v24764, pd507);
      };
   }

static void QueryBestSize←P3480(formal←c0648, c←v15584, formal←c01162, formal←c01163, formal←c01164)
   word formal←c0648;
   word c←v15584;
   word formal←c01162;
   word formal←c01163;
   W2 formal←c01164;
   {
   W11 var←c77000;
   /* declaration of class←v15612 skipped */ 
   /* declaration of drawable←v15640 skipped */ 
   /* declaration of size←v15668 skipped */ 
   register ptr gf←c77032 =  (ptr) &globalframe;
   W2 best←v15712;
   /* declaration of var←c70440 skipped */ 
   /* declaration of reply←v24836 skipped */ 
   (* (( (ptr) &var←c77000)+4)/* class←v15612 */  ) = formal←c01162;
   (* (( (ptr) &var←c77000)+5)/* drawable←v15640 */  ) = formal←c01163;
   (*  (W2Pt) (( (ptr) &var←c77000)+6)/* size←v15668 */  ) = formal←c01164;
   /* QueryBestSize: */ 
SOURCE(31400, 420)
   {
      word tmpAddr508;
      tmpAddr508 = (word) (( (ptr) &var←c77000)+8)/* var←c70440 */ ;
      (*  (ptr) tmpAddr508 ) = ( ((word)  (fPt) action←P7668) );
      (* (( (ptr) tmpAddr508) + 1) ) = 1;
      };
SOURCE(31522, 12)
   (* (( (ptr) &var←c77000)+10)/* reply←v24836 */  ) = 0;
SOURCE(31675, 27)
   {
      word pd509;
      pd509 = (* (( (ptr) (* (( (ptr) gf←c77032)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd509 ))))(c←v15584, (word) (( (bPt) &var←c77000)+32)/* var←c70440 */ , 0, pd509);
      };
SOURCE(31704, 17)
   {
      word pd510;
      pd510 = (* (( (ptr) (* (( (ptr) gf←c77032)+177)/* var←c66440 */  ))+68) );
      (void) ( *( (fPt) ((*  (ptr) pd510 ))))((* ((( (ptr) &var←c77000)+10)/* reply←v24836 */ ) ), pd510);
      };
SOURCE(31723, 14)
   (* (( (ptr) (* (( (ptr) &var←c77000)+10)/* reply←v24836 */  ))+10) ) = ((* (( (ptr) (* (( (ptr) &var←c77000)+10)/* reply←v24836 */  ))+10)
    ) + 7);
SOURCE(31739, 27)
   {
      word pd511;
      pd511 = (* (( (ptr) (* (( (ptr) gf←c77032)+177)/* var←c66440 */  ))+78) );
      best←v15712.f0 = (word) ( *( (fPt) ((*  (ptr) pd511 ))))((* ((( (ptr) &var←c77000)+10)/* reply←v24836 */ ) ), pd511);
      };
SOURCE(31768, 28)
   {
      word pd512;
      pd512 = (* (( (ptr) (* (( (ptr) gf←c77032)+177)/* var←c66440 */  ))+78) );
      best←v15712.f1 = (word) ( *( (fPt) ((*  (ptr) pd512 ))))((* ((( (ptr) &var←c77000)+10)/* reply←v24836 */ ) ), pd512);
      };
SOURCE(31798, 22)
   {
      word pd513;
      pd513 = (* (( (ptr) (* (( (ptr) gf←c77032)+177)/* var←c66440 */  ))+67) );
      (void) ( *( (fPt) ((*  (ptr) pd513 ))))(c←v15584, (* (( (ptr) &var←c77000)+10)/* reply←v24836 */  ), pd513);
      };
   /* removed tail goto */ 
   (*  (W2Pt) formal←c0648 ) = best←v15712;
   return;
   }

static void action←P7668(c←v24940, formal←c77096)
   word c←v24940;
   word formal←c77096;
   {
   register ptr gf←c77064 =  (ptr) &globalframe;
   formal←c77096 = (formal←c77096 - 32);
   /* action: */ 
SOURCE(31536, 134)
SOURCE(31569, 27)
   {
      word pd514;
      pd514 = (* (( (ptr) (* (( (ptr) gf←c77064)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd514 ))))(c←v24940, 97, (* (( (ptr) formal←c77096)+4) ), 3, pd514);
      };
SOURCE(31598, 25)
   {
      word pd515;
      pd515 = (* (( (ptr) (* (( (ptr) gf←c77064)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd515 ))))(c←v24940, (* (( (ptr) formal←c77096)+5) ), pd515);
      };
SOURCE(31625, 17)
   {
      word pd516;
      pd516 = (* (( (ptr) (* (( (ptr) gf←c77064)+177)/* var←c66440 */  ))+29) );
      (void) ( *( (fPt) ((*  (ptr) pd516 ))))(c←v24940, (*  (W2Pt) (( (ptr) formal←c77096)+6) ), pd516);
      };
SOURCE(31644, 26)
   {
      word pd517;
      pd517 = (* (( (ptr) (* (( (ptr) gf←c77064)+177)/* var←c66440 */  ))+62) );
      (* (( (ptr) formal←c77096)+10) ) = (word) ( *( (fPt) ((*  (ptr) pd517 ))))(c←v24940, pd517);
      };
   }

static void TranslateCoordinates←P3540(formal←c0660, c←v15772, formal←c01165, formal←c01166, formal←c01167)
   word formal←c0660;
   word c←v15772;
   word formal←c01165;
   word formal←c01166;
   W2 formal←c01167;
   {
   W11 var←c77128;
   /* declaration of srcWindow←v15800 skipped */ 
   /* declaration of dstWindow←v15828 skipped */ 
   /* declaration of srcPos←v15856 skipped */ 
   register ptr gf←c77160 =  (ptr) &globalframe;
   W4 trans←v15900;
   /* declaration of var←c70472 skipped */ 
   /* declaration of reply←v24968 skipped */ 
   (* (( (ptr) &var←c77128)+4)/* srcWindow←v15800 */  ) = formal←c01165;
   (* (( (ptr) &var←c77128)+5)/* dstWindow←v15828 */  ) = formal←c01166;
   (*  (W2Pt) (( (ptr) &var←c77128)+6)/* srcPos←v15856 */  ) = formal←c01167;
   /* TranslateCoordinates: */ 
SOURCE(31826, 576)
   {
      word tmpAddr518;
      tmpAddr518 = (word) (( (ptr) &var←c77128)+8)/* var←c70472 */ ;
      (*  (ptr) tmpAddr518 ) = ( ((word)  (fPt) action←P7728) );
      (* (( (ptr) tmpAddr518) + 1) ) = 1;
      };
SOURCE(31955, 12)
   (* (( (ptr) &var←c77128)+10)/* reply←v24968 */  ) = 0;
SOURCE(32131, 27)
   {
      word pd519;
      pd519 = (* (( (ptr) (* (( (ptr) gf←c77160)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd519 ))))(c←v15772, (word) (( (bPt) &var←c77128)+32)/* var←c70472 */ , 0, pd519);
      };
SOURCE(32160, 17)
   {
      word pd520;
      pd520 = (* (( (ptr) (* (( (ptr) gf←c77160)+177)/* var←c66440 */  ))+68) );
      (void) ( *( (fPt) ((*  (ptr) pd520 ))))((* ((( (ptr) &var←c77128)+10)/* reply←v24968 */ ) ), pd520);
      };
SOURCE(32179, 34)
   {
      word pd521;
      pd521 = (* (( (ptr) (* (( (ptr) gf←c77160)+177)/* var←c66440 */  ))+77) );
      trans←v15900.f0 =  (unsigned) ((word) ( *( (fPt) ((*  (ptr) pd521 ))))((* ((( (ptr) &var←c77128)+10)/* reply←v24968 */ ) ), pd521)
       != 0);
      };
SOURCE(32215, 14)
   (* (( (ptr) (* (( (ptr) &var←c77128)+10)/* reply←v24968 */  ))+10) ) = ((* (( (ptr) (* (( (ptr) &var←c77128)+10)/* reply←v24968 */  ))+10)
    ) + 6);
SOURCE(32231, 41)
   {
      word var←c70504;
      word c←v63312;
      word id←v63340;
      c←v63312 = c←v15772;
      {
         word pd522;
         pd522 = (* (( (ptr) (* (( (ptr) gf←c77160)+177)/* var←c66440 */  ))+79) );
         id←v63340 = (word) ( *( (fPt) ((*  (ptr) pd522 ))))((* ((( (ptr) &var←c77128)+10)/* reply←v24968 */ ) ), pd522);
         };
      var←c70504 = id←v63340;
      trans←v15900.f1 = var←c70504;
      };
SOURCE(32274, 51)
   {
      word pd523;
      pd523 = (* (( (ptr) (* (( (ptr) gf←c77160)+177)/* var←c66440 */  ))+78) );
      trans←v15900.f2 =  (int) ( short )( (((unsigned)(word) ( *( (fPt) ((*  (ptr) pd523 ))))((* ((( (ptr) &var←c77128)+10)/* reply←v24968 */ ) ), pd523)
       << 16) >> 16) );
      };
SOURCE(32327, 51)
   {
      word pd524;
      pd524 = (* (( (ptr) (* (( (ptr) gf←c77160)+177)/* var←c66440 */  ))+78) );
      trans←v15900.f3 =  (int) ( short )( (((unsigned)(word) ( *( (fPt) ((*  (ptr) pd524 ))))((* ((( (ptr) &var←c77128)+10)/* reply←v24968 */ ) ), pd524)
       << 16) >> 16) );
      };
SOURCE(32380, 22)
   {
      word pd525;
      pd525 = (* (( (ptr) (* (( (ptr) gf←c77160)+177)/* var←c66440 */  ))+67) );
      (void) ( *( (fPt) ((*  (ptr) pd525 ))))(c←v15772, (* (( (ptr) &var←c77128)+10)/* reply←v24968 */  ), pd525);
      };
   /* removed tail goto */ 
   (*  (W4Pt) formal←c0660 ) = trans←v15900;
   return;
   }

static void action←P7728(c←v25072, formal←c77224)
   word c←v25072;
   word formal←c77224;
   {
   register ptr gf←c77192 =  (ptr) &globalframe;
   formal←c77224 = (formal←c77224 - 32);
   /* action: */ 
SOURCE(31969, 157)
SOURCE(32002, 18)
   {
      word pd526;
      pd526 = (* (( (ptr) (* (( (ptr) gf←c77192)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd526 ))))(c←v25072, 40, 0, 4, pd526);
      };
SOURCE(32022, 26)
   {
      word pd527;
      pd527 = (* (( (ptr) (* (( (ptr) gf←c77192)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd527 ))))(c←v25072, (* (( (ptr) formal←c77224)+4) ), pd527);
      };
SOURCE(32050, 26)
   {
      word pd528;
      pd528 = (* (( (ptr) (* (( (ptr) gf←c77192)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd528 ))))(c←v25072, (* (( (ptr) formal←c77224)+5) ), pd528);
      };
SOURCE(32078, 20)
   {
      word pd529;
      pd529 = (* (( (ptr) (* (( (ptr) gf←c77192)+177)/* var←c66440 */  ))+28) );
      (void) ( *( (fPt) ((*  (ptr) pd529 ))))(c←v25072, (*  (W2Pt) (( (ptr) formal←c77224)+6) ), pd529);
      };
SOURCE(32100, 26)
   {
      word pd530;
      pd530 = (* (( (ptr) (* (( (ptr) gf←c77192)+177)/* var←c66440 */  ))+62) );
      (* (( (ptr) formal←c77224)+10) ) = (word) ( *( (fPt) ((*  (ptr) pd530 ))))(c←v25072, pd530);
      };
   }

static void InternalUngrabServer←P3600(c←v15960, timeStamp←v15988, details←v16016)
   word c←v15960;
   word timeStamp←v15988;
   word details←v16016;
   {
   register ptr gf←c77256 =  (ptr) &globalframe;
   /* InternalUngrabServer: */ 
SOURCE(32408, 204)
SOURCE(32508, 18)
   {
      word pd531;
      pd531 = (* (( (ptr) (* (( (ptr) gf←c77256)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd531 ))))(c←v15960, 37, 0, 1, pd531);
      };
SOURCE(32528, 29)
   {
      word pd532;
      pd532 = (* (( (ptr) (* (( (ptr) gf←c77256)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd532 ))))(c←v15960, details←v16016, pd532);
      };
SOURCE(32559, 53)
   if ((details←v16016 == 0)) {
SOURCE(32579, 33)
      {
         word pd533;
         if (((* (( (ptr) c←v15960)+5) ) != 0) || (0 != (* (( (ptr) c←v15960)+35) ))) {
            pd533 = (* (( (ptr) (* (( (ptr) gf←c77256)+177)/* var←c66440 */  ))+13) );
            (void) ( *( (fPt) ((*  (ptr) pd533 ))))(c←v15960, 0, pd533);
            };
         };
      };
   }

static void UngrabServer←P3660(c←v16076, formal←c01168)
   word c←v16076;
   word formal←c01168;
   {
   W7 var←c77288;
   /* declaration of details←v16104 skipped */ 
   register ptr gf←c77320 =  (ptr) &globalframe;
   /* declaration of var←c70536 skipped */ 
   var←c77288.f4/* details←v16104 */  = formal←c01168;
   /* UngrabServer: */ 
SOURCE(32618, 264)
   {
      word tmpAddr534;
      tmpAddr534 = (word) (( (ptr) &var←c77288)+5)/* var←c70536 */ ;
      (*  (ptr) tmpAddr534 ) = ( ((word)  (fPt) action←P7788) );
      (* (( (ptr) tmpAddr534) + 1) ) = 1;
      };
SOURCE(32851, 31)
   {
      word pd535;
      pd535 = (* (( (ptr) (* (( (ptr) gf←c77320)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd535 ))))(c←v16076, (word) (( (bPt) &var←c77288)+20)/* var←c70536 */ , var←c77288.f4/* details←v16104 */ , pd535)
      ;
      };
   }

static void action←P7788(c←v25176, formal←c77352)
   word c←v25176;
   word formal←c77352;
   {
   word cPriv←v25204;
   formal←c77352 = (formal←c77352 - 20);
   /* action: */ 
SOURCE(32682, 164)
SOURCE(32715, 45)
   cPriv←v25204 = (* (( (ptr) c←v25176)+24) );
SOURCE(32762, 45)
   (void) InternalUngrabServer←P3600(c←v25176, 0, (* (( (ptr) formal←c77352)+4) ));
SOURCE(32809, 37)
   (* (( (ptr) (* (( (ptr) cPriv←v25204)+9) ))+7) ) = 0;
   }

static void GrabServer←P3720(c←v16164, formal←c01169)
   word c←v16164;
   word formal←c01169;
   {
   W7 var←c77384;
   /* declaration of details←v16192 skipped */ 
   register ptr gf←c77416 =  (ptr) &globalframe;
   /* declaration of var←c70568 skipped */ 
   word cPriv←v25260;
   word gr←v25288;
   var←c77384.f4/* details←v16192 */  = formal←c01169;
   /* GrabServer: */ 
SOURCE(32888, 666)
   {
      word tmpAddr536;
      tmpAddr536 = (word) (( (ptr) &var←c77384)+5)/* var←c70568 */ ;
      (*  (ptr) tmpAddr536 ) = ( ((word)  (fPt) action←P7848) );
      (* (( (ptr) tmpAddr536) + 1) ) = 1;
      };
SOURCE(32950, 45)
   cPriv←v25260 = (* (( (ptr) c←v16164)+24) );
SOURCE(32997, 40)
   gr←v25288 = (* (( (ptr) cPriv←v25260)+9) );
SOURCE(33428, 93)
   if ( ( (gr←v25288 != 0) ? (0 != (* (( (ptr) gr←v25288)+7) )) : 0 ) ) {
SOURCE(33460, 61)
      {
         word pd537;
         pd537 = (* (( (ptr) (* (( (ptr) gf←c77416)+181)/* var←c68424 */  ))+11) );
         (void) ( *( (fPt) ((*  (ptr) pd537 ))))(c←v16164, (* (( (ptr) gf←c77416)+36) ), pd537);
         };
      };
SOURCE(33523, 31)
   {
      word pd538;
      pd538 = (* (( (ptr) (* (( (ptr) gf←c77416)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd538 ))))(c←v16164, (word) (( (bPt) &var←c77384)+20)/* var←c70568 */ , var←c77384.f4/* details←v16192 */ , pd538)
      ;
      };
   }

static void action←P7848(c←v25416, formal←c77480)
   word c←v25416;
   word formal←c77480;
   {
   register ptr gf←c77448 =  (ptr) &globalframe;
   word cPriv←v25444;
   formal←c77480 = (formal←c77480 - 20);
   /* action: */ 
SOURCE(33039, 384)
SOURCE(33081, 45)
   cPriv←v25444 = (* (( (ptr) c←v25416)+24) );
SOURCE(33128, 207)
   if (((* (( (ptr) cPriv←v25444)+9) ) == 0)) {
SOURCE(33168, 167)
SOURCE(33170, 37)
      {
         word var←c70600;
         var←c70600 = XR←NewObject(48, (* (( (ptr) gf←c77448)+11) ));
         (* (( (ptr) var←c70600)+9) ) = 6;
         (* (( (ptr) cPriv←v25444)+9) ) = var←c70600;
         };
SOURCE(33209, 52)
      (* (( (ptr) (* (( (ptr) cPriv←v25444)+9) ))+11) ) = (word) (( (bPt) gf←c77448)+216)/* var←c64328 */ ;
SOURCE(33271, 61)
SOURCE(33272, 60)
      {
         word pd539;
         pd539 = (* (( (ptr) (* (( (ptr) gf←c77448)+183)/* var←c69032 */  ))+5) );
         (void) ( *( (fPt) ((*  (ptr) pd539 ))))((word) (( (bPt) (* (( (ptr) cPriv←v25444)+9) ))+4), 2, pd539);
         };
      };
SOURCE(33338, 18)
   {
      word pd540;
      pd540 = (* (( (ptr) (* (( (ptr) gf←c77448)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd540 ))))(c←v25416, 36, 0, 1, pd540);
      };
SOURCE(33358, 29)
   {
      word pd541;
      pd541 = (* (( (ptr) (* (( (ptr) gf←c77448)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd541 ))))(c←v25416, (* (( (ptr) formal←c77480)+4) ), pd541);
      };
SOURCE(33389, 34)
   (void) StartTimer←P2040(c←v25416, (* (( (ptr) cPriv←v25444)+9) ));
   }

static void GetGeometry←P3780(formal←c0688, c←v16252, formal←c01170)
   word formal←c0688;
   word c←v16252;
   word formal←c01170;
   {
   W8 var←c77512;
   /* declaration of drawable←v16280 skipped */ 
   register ptr gf←c77544 =  (ptr) &globalframe;
   W7 g←v16324;
   /* declaration of var←c70632 skipped */ 
   /* declaration of reply←v25528 skipped */ 
   var←c77512.f4/* drawable←v16280 */  = formal←c01170;
   /* GetGeometry: */ 
SOURCE(33560, 556)
   {
      word tmpAddr542;
      tmpAddr542 = (word) (( (ptr) &var←c77512)+5)/* var←c70632 */ ;
      (*  (ptr) tmpAddr542 ) = ( ((word)  (fPt) action←P7908) );
      (* (( (ptr) tmpAddr542) + 1) ) = 1;
      };
SOURCE(33560, 556)
   XR←FillWords(&g←v16324, 7, 0);
SOURCE(33761, 12)
   var←c77512.f7/* reply←v25528 */  = 0;
SOURCE(33775, 27)
   {
      word pd543;
      pd543 = (* (( (ptr) (* (( (ptr) gf←c77544)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd543 ))))(c←v16252, (word) (( (bPt) &var←c77512)+20)/* var←c70632 */ , 0, pd543);
      };
SOURCE(33804, 17)
   {
      word pd544;
      pd544 = (* (( (ptr) (* (( (ptr) gf←c77544)+177)/* var←c66440 */  ))+68) );
      (void) ( *( (fPt) ((*  (ptr) pd544 ))))(var←c77512.f7/* reply←v25528 */ , pd544);
      };
SOURCE(33823, 22)
   {
      word var←c70664;
      word b←v61912;
      b←v61912 =  (unsigned) (word) (* (( (bPt) var←c77512.f7/* reply←v25528 */ )+(* (( (ptr) var←c77512.f7/* reply←v25528 */ )+10)
          )) );
      (* (( (ptr) var←c77512.f7/* reply←v25528 */ )+10) ) = ((* (( (ptr) var←c77512.f7/* reply←v25528 */ )+10) ) + 1);
      var←c70664 = b←v61912;
      g←v16324.f1 = var←c70664;
      };
SOURCE(33848, 14)
   (* (( (ptr) var←c77512.f7/* reply←v25528 */ )+10) ) = ((* (( (ptr) var←c77512.f7/* reply←v25528 */ )+10) ) + 6);
SOURCE(33864, 36)
   {
      word var←c70696;
      word c←v63236;
      word id←v63264;
      c←v63236 = c←v16252;
      {
         word pd545;
         pd545 = (* (( (ptr) (* (( (ptr) gf←c77544)+177)/* var←c66440 */  ))+79) );
         id←v63264 = (word) ( *( (fPt) ((*  (ptr) pd545 ))))(var←c77512.f7/* reply←v25528 */ , pd545);
         };
      var←c70696 = id←v63264;
      g←v16324.f0 = var←c70696;
      };
SOURCE(33902, 33)
   {
      word pd546;
      pd546 = (* (( (ptr) (* (( (ptr) gf←c77544)+177)/* var←c66440 */  ))+78) );
      g←v16324.f2 = (word) ( *( (fPt) ((*  (ptr) pd546 ))))(var←c77512.f7/* reply←v25528 */ , pd546);
      };
SOURCE(33937, 33)
   {
      word pd547;
      pd547 = (* (( (ptr) (* (( (ptr) gf←c77544)+177)/* var←c66440 */  ))+78) );
      g←v16324.f3 = (word) ( *( (fPt) ((*  (ptr) pd547 ))))(var←c77512.f7/* reply←v25528 */ , pd547);
      };
SOURCE(33972, 38)
   {
      word pd548;
      pd548 = (* (( (ptr) (* (( (ptr) gf←c77544)+177)/* var←c66440 */  ))+78) );
      g←v16324.f4 = (word) ( *( (fPt) ((*  (ptr) pd548 ))))(var←c77512.f7/* reply←v25528 */ , pd548);
      };
SOURCE(34012, 39)
   {
      word pd549;
      pd549 = (* (( (ptr) (* (( (ptr) gf←c77544)+177)/* var←c66440 */  ))+78) );
      g←v16324.f5 = (word) ( *( (fPt) ((*  (ptr) pd549 ))))(var←c77512.f7/* reply←v25528 */ , pd549);
      };
SOURCE(34053, 39)
   {
      word pd550;
      pd550 = (* (( (ptr) (* (( (ptr) gf←c77544)+177)/* var←c66440 */  ))+78) );
      g←v16324.f6 = (word) ( *( (fPt) ((*  (ptr) pd550 ))))(var←c77512.f7/* reply←v25528 */ , pd550);
      };
SOURCE(34094, 22)
   {
      word pd551;
      pd551 = (* (( (ptr) (* (( (ptr) gf←c77544)+177)/* var←c66440 */  ))+67) );
      (void) ( *( (fPt) ((*  (ptr) pd551 ))))(c←v16252, var←c77512.f7/* reply←v25528 */ , pd551);
      };
   /* removed tail goto */ 
   (*  (W7Pt) formal←c0688 ) = g←v16324;
   return;
   }

static void action←P7908(c←v25604, formal←c77608)
   word c←v25604;
   word formal←c77608;
   {
   register ptr gf←c77576 =  (ptr) &globalframe;
   formal←c77608 = (formal←c77608 - 20);
   /* action: */ 
SOURCE(33650, 106)
SOURCE(33683, 18)
   {
      word pd552;
      pd552 = (* (( (ptr) (* (( (ptr) gf←c77576)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd552 ))))(c←v25604, 14, 0, 2, pd552);
      };
SOURCE(33703, 25)
   {
      word pd553;
      pd553 = (* (( (ptr) (* (( (ptr) gf←c77576)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd553 ))))(c←v25604, (* (( (ptr) formal←c77608)+4) ), pd553);
      };
SOURCE(33730, 26)
   {
      word pd554;
      pd554 = (* (( (ptr) (* (( (ptr) gf←c77576)+177)/* var←c66440 */  ))+62) );
      (* (( (ptr) formal←c77608)+7) ) = (word) ( *( (fPt) ((*  (ptr) pd554 ))))(c←v25604, pd554);
      };
   }

static word QueryTree←P3840(c←v16384, formal←c01171)
   word c←v16384;
   word formal←c01171;
   {
   W8 var←c77640;
   /* declaration of window←v16412 skipped */ 
   register ptr gf←c77672 =  (ptr) &globalframe;
   word treeInfo←v16456;
   /* declaration of var←c70728 skipped */ 
   /* declaration of reply←v25660 skipped */ 
   word n←v25688;
   word root←v25716;
   word parent←v25744;
   var←c77640.f4/* window←v16412 */  = formal←c01171;
   /* QueryTree: */ 
SOURCE(34122, 614)
   {
      word tmpAddr555;
      tmpAddr555 = (word) (( (ptr) &var←c77640)+5)/* var←c70728 */ ;
      (*  (ptr) tmpAddr555 ) = ( ((word)  (fPt) action←P7968) );
      (* (( (ptr) tmpAddr555) + 1) ) = 1;
      };
SOURCE(34122, 614)
   treeInfo←v16456 = 0;
SOURCE(34326, 12)
   var←c77640.f7/* reply←v25660 */  = 0;
SOURCE(34373, 27)
   {
      word pd556;
      pd556 = (* (( (ptr) (* (( (ptr) gf←c77672)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd556 ))))(c←v16384, (word) (( (bPt) &var←c77640)+20)/* var←c70728 */ , 0, pd556);
      };
SOURCE(34402, 17)
   {
      word pd557;
      pd557 = (* (( (ptr) (* (( (ptr) gf←c77672)+177)/* var←c66440 */  ))+68) );
      (void) ( *( (fPt) ((*  (ptr) pd557 ))))(var←c77640.f7/* reply←v25660 */ , pd557);
      };
SOURCE(34422, 14)
   (* (( (ptr) var←c77640.f7/* reply←v25660 */ )+10) ) = ((* (( (ptr) var←c77640.f7/* reply←v25660 */ )+10) ) + 7);
SOURCE(34438, 34)
   {
      word var←c70760;
      word c←v63160;
      word id←v63188;
      c←v63160 = c←v16384;
      {
         word pd558;
         pd558 = (* (( (ptr) (* (( (ptr) gf←c77672)+177)/* var←c66440 */  ))+79) );
         id←v63188 = (word) ( *( (fPt) ((*  (ptr) pd558 ))))(var←c77640.f7/* reply←v25660 */ , pd558);
         };
      var←c70760 = id←v63188;
      root←v25716 = var←c70760;
      };
SOURCE(34474, 36)
   {
      word var←c70792;
      word c←v63084;
      word id←v63112;
      c←v63084 = c←v16384;
      {
         word pd559;
         pd559 = (* (( (ptr) (* (( (ptr) gf←c77672)+177)/* var←c66440 */  ))+79) );
         id←v63112 = (word) ( *( (fPt) ((*  (ptr) pd559 ))))(var←c77640.f7/* reply←v25660 */ , pd559);
         };
      var←c70792 = id←v63112;
      parent←v25744 = var←c70792;
      };
SOURCE(34512, 18)
   {
      word pd560;
      pd560 = (* (( (ptr) (* (( (ptr) gf←c77672)+177)/* var←c66440 */  ))+78) );
      n←v25688 = (word) ( *( (fPt) ((*  (ptr) pd560 ))))(var←c77640.f7/* reply←v25660 */ , pd560);
      };
SOURCE(34532, 15)
   (* (( (ptr) var←c77640.f7/* reply←v25660 */ )+10) ) = ((* (( (ptr) var←c77640.f7/* reply←v25660 */ )+10) ) + 14);
SOURCE(34549, 30)
   {
      word var←c70824;
      word var←c70856;
      var←c70824 = ((word) n←v25688 << 2);
      var←c70856 = XR←NewObject((12 + var←c70824), (* (( (ptr) gf←c77672)+18) ));
      (* (( (ptr) var←c70856)+2) ) = n←v25688;
      treeInfo←v16456 = var←c70856;
      };
SOURCE(34581, 20)
   (*  (ptr) treeInfo←v16456 ) = root←v25716;
SOURCE(34603, 24)
   (* (( (ptr) treeInfo←v16456)+1) ) = parent←v25744;
SOURCE(34629, 74)
   {
      register word i←v25848 = 0;
      register word noName←c70888;
      noName←c70888 = n←v25688;
      if ((i←v25848 >= noName←c70888)) {
         goto lab←L100103;
         };
      lab←L100106: ;
SOURCE(34653, 50)
      {
         word var←c70920;
         {
            word var←c70952;
            word c←v63008;
            word id←v63036;
            c←v63008 = c←v16384;
            {
               word pd561;
               pd561 = (* (( (ptr) (* (( (ptr) gf←c77672)+177)/* var←c66440 */  ))+79) );
               id←v63036 = (word) ( *( (fPt) ((*  (ptr) pd561 ))))(var←c77640.f7/* reply←v25660 */ , pd561);
               };
            var←c70952 = id←v63036;
            var←c70920 = var←c70952;
            };
         {
            word limit562;
            (* ((( (ptr) treeInfo←v16456)+3)+(
                  limit562 = (* (( (ptr) treeInfo←v16456)+2) ),
                  BCK(i←v25848, limit562)
                  )) ) = var←c70920;
            };
         };
      i←v25848 = (i←v25848 + 1);
      if ((i←v25848 < noName←c70888)) {
         goto lab←L100106;
         };
      lab←L100103: ;
      };
SOURCE(34714, 22)
   {
      word pd563;
      pd563 = (* (( (ptr) (* (( (ptr) gf←c77672)+177)/* var←c66440 */  ))+67) );
      (void) ( *( (fPt) ((*  (ptr) pd563 ))))(c←v16384, var←c77640.f7/* reply←v25660 */ , pd563);
      };
SOURCE(34122, 614)
   return(treeInfo←v16456);
   }

static void action←P7968(c←v25820, formal←c77736)
   word c←v25820;
   word formal←c77736;
   {
   register ptr gf←c77704 =  (ptr) &globalframe;
   formal←c77736 = (formal←c77736 - 20);
   /* action: */ 
SOURCE(34217, 104)
SOURCE(34250, 18)
   {
      word pd564;
      pd564 = (* (( (ptr) (* (( (ptr) gf←c77704)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd564 ))))(c←v25820, 15, 0, 2, pd564);
      };
SOURCE(34270, 23)
   {
      word pd565;
      pd565 = (* (( (ptr) (* (( (ptr) gf←c77704)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd565 ))))(c←v25820, (* (( (ptr) formal←c77736)+4) ), pd565);
      };
SOURCE(34295, 26)
   {
      word pd566;
      pd566 = (* (( (ptr) (* (( (ptr) gf←c77704)+177)/* var←c66440 */  ))+62) );
      (* (( (ptr) formal←c77736)+7) ) = (word) ( *( (fPt) ((*  (ptr) pd566 ))))(c←v25820, pd566);
      };
   }

static void CirculateWindow←P3900(c←v16528, formal←c01172, formal←c01173, formal←c01174)
   word c←v16528;
   word formal←c01172;
   word formal←c01173;
   word formal←c01174;
   {
   W9 var←c77768;
   /* declaration of window←v16556 skipped */ 
   /* declaration of direction←v16584 skipped */ 
   /* declaration of details←v16612 skipped */ 
   register ptr gf←c77800 =  (ptr) &globalframe;
   /* declaration of var←c70984 skipped */ 
   (* (( (ptr) &var←c77768)+4)/* window←v16556 */  ) = formal←c01172;
   (* (( (ptr) &var←c77768)+5)/* direction←v16584 */  ) = formal←c01173;
   (* (( (ptr) &var←c77768)+6)/* details←v16612 */  ) = formal←c01174;
   /* CirculateWindow: */ 
SOURCE(34742, 270)
   {
      word tmpAddr567;
      tmpAddr567 = (word) (( (ptr) &var←c77768)+7)/* var←c70984 */ ;
      (*  (ptr) tmpAddr567 ) = ( ((word)  (fPt) action←P8076) );
      (* (( (ptr) tmpAddr567) + 1) ) = 1;
      };
SOURCE(34981, 31)
   {
      word pd568;
      pd568 = (* (( (ptr) (* (( (ptr) gf←c77800)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd568 ))))(c←v16528, (word) (( (bPt) &var←c77768)+28)/* var←c70984 */ , (* (( (ptr) &var←c77768)+6)
         /* details←v16612 */  ), pd568);
      };
   }

static void action←P8076(c←v25968, formal←c77864)
   word c←v25968;
   word formal←c77864;
   {
   register ptr gf←c77832 =  (ptr) &globalframe;
   formal←c77864 = (formal←c77864 - 28);
   /* action: */ 
SOURCE(34856, 120)
SOURCE(34889, 31)
   {
      word pd569;
      pd569 = (* (( (ptr) (* (( (ptr) gf←c77832)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd569 ))))(c←v25968, 13, (* (( (ptr) formal←c77864)+5) ), 2, pd569);
      };
SOURCE(34922, 23)
   {
      word pd570;
      pd570 = (* (( (ptr) (* (( (ptr) gf←c77832)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd570 ))))(c←v25968, (* (( (ptr) formal←c77864)+4) ), pd570);
      };
SOURCE(34947, 29)
   {
      word pd571;
      pd571 = (* (( (ptr) (* (( (ptr) gf←c77832)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd571 ))))(c←v25968, (* (( (ptr) formal←c77864)+6) ), pd571);
      };
   }

static void ReparentWindow←P3960(c←v16672, formal←c01175, formal←c01176, formal←c01177, formal←c01178)
   word c←v16672;
   word formal←c01175;
   word formal←c01176;
   W2 formal←c01177;
   word formal←c01178;
   {
   W11 var←c77896;
   /* declaration of window←v16700 skipped */ 
   /* declaration of newParent←v16728 skipped */ 
   /* declaration of pos←v16756 skipped */ 
   /* declaration of details←v16784 skipped */ 
   register ptr gf←c77928 =  (ptr) &globalframe;
   /* declaration of var←c71016 skipped */ 
   (* (( (ptr) &var←c77896)+4)/* window←v16700 */  ) = formal←c01175;
   (* (( (ptr) &var←c77896)+5)/* newParent←v16728 */  ) = formal←c01176;
   (*  (W2Pt) (( (ptr) &var←c77896)+6)/* pos←v16756 */  ) = formal←c01177;
   (* (( (ptr) &var←c77896)+8)/* details←v16784 */  ) = formal←c01178;
   /* ReparentWindow: */ 
SOURCE(35018, 302)
   {
      word tmpAddr572;
      tmpAddr572 = (word) (( (ptr) &var←c77896)+9)/* var←c71016 */ ;
      (*  (ptr) tmpAddr572 ) = ( ((word)  (fPt) action←P8136) );
      (* (( (ptr) tmpAddr572) + 1) ) = 1;
      };
SOURCE(35289, 31)
   {
      word pd573;
      pd573 = (* (( (ptr) (* (( (ptr) gf←c77928)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd573 ))))(c←v16672, (word) (( (bPt) &var←c77896)+36)/* var←c71016 */ , (* (( (ptr) &var←c77896)+8)
         /* details←v16784 */  ), pd573);
      };
   }

static void action←P8136(c←v26072, formal←c77992)
   word c←v26072;
   word formal←c77992;
   {
   register ptr gf←c77960 =  (ptr) &globalframe;
   formal←c77992 = (formal←c77992 - 36);
   /* action: */ 
SOURCE(35131, 153)
SOURCE(35164, 17)
   {
      word pd574;
      pd574 = (* (( (ptr) (* (( (ptr) gf←c77960)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd574 ))))(c←v26072, 7, 0, 4, pd574);
      };
SOURCE(35183, 23)
   {
      word pd575;
      pd575 = (* (( (ptr) (* (( (ptr) gf←c77960)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd575 ))))(c←v26072, (* (( (ptr) formal←c77992)+4) ), pd575);
      };
SOURCE(35208, 26)
   {
      word pd576;
      pd576 = (* (( (ptr) (* (( (ptr) gf←c77960)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd576 ))))(c←v26072, (* (( (ptr) formal←c77992)+5) ), pd576);
      };
SOURCE(35236, 17)
   {
      word pd577;
      pd577 = (* (( (ptr) (* (( (ptr) gf←c77960)+177)/* var←c66440 */  ))+28) );
      (void) ( *( (fPt) ((*  (ptr) pd577 ))))(c←v26072, (*  (W2Pt) (( (ptr) formal←c77992)+6) ), pd577);
      };
SOURCE(35255, 29)
   {
      word pd578;
      pd578 = (* (( (ptr) (* (( (ptr) gf←c77960)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd578 ))))(c←v26072, (* (( (ptr) formal←c77992)+8) ), pd578);
      };
   }

static void SendClientMessage32←P4020(c←v16844, formal←c01179, formal←c01180, formal←c01181, formal←c01182, formal←c01183, formal←c01184, formal←c01185)
   word c←v16844;
   word formal←c01179;
   word formal←c01180;
   word formal←c01181;
   word formal←c01182;
   word formal←c01183;
   W5 formal←c01184;
   word formal←c01185;
   {
   W17 var←c78024;
   /* declaration of destination←v16872 skipped */ 
   /* declaration of propagate←v16900 skipped */ 
   /* declaration of eventMask←v16928 skipped */ 
   /* declaration of window←v16956 skipped */ 
   /* declaration of type←v16984 skipped */ 
   /* declaration of data←v17012 skipped */ 
   /* declaration of details←v17040 skipped */ 
   register ptr gf←c78056 =  (ptr) &globalframe;
   /* declaration of var←c71048 skipped */ 
   (* (( (ptr) &var←c78024)+4)/* destination←v16872 */  ) = formal←c01179;
   (* (( (ptr) &var←c78024)+5)/* propagate←v16900 */  ) = formal←c01180;
   (* (( (ptr) &var←c78024)+6)/* eventMask←v16928 */  ) = formal←c01181;
   (* (( (ptr) &var←c78024)+7)/* window←v16956 */  ) = formal←c01182;
   (* (( (ptr) &var←c78024)+8)/* type←v16984 */  ) = formal←c01183;
   (*  (W5Pt) (( (ptr) &var←c78024)+9)/* data←v17012 */  ) = formal←c01184;
   (* (( (ptr) &var←c78024)+14)/* details←v17040 */  ) = formal←c01185;
   /* SendClientMessage32: */ 
SOURCE(35326, 579)
   {
      word tmpAddr579;
      tmpAddr579 = (word) (( (ptr) &var←c78024)+15)/* var←c71048 */ ;
      (*  (ptr) tmpAddr579 ) = ( ((word)  (fPt) action←P8196) );
      (* (( (ptr) tmpAddr579) + 1) ) = 1;
      };
SOURCE(35874, 31)
   {
      word pd580;
      pd580 = (* (( (ptr) (* (( (ptr) gf←c78056)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd580 ))))(c←v16844, (word) (( (bPt) &var←c78024)+60)/* var←c71048 */ , (* (( (ptr) &var←c78024)+14)
         /* details←v17040 */  ), pd580);
      };
   }

static void action←P8196(c←v26176, formal←c78120)
   word c←v26176;
   word formal←c78120;
   {
   register ptr gf←c78088 =  (ptr) &globalframe;
   formal←c78120 = (formal←c78120 - 60);
   /* action: */ 
SOURCE(35517, 352)
SOURCE(35550, 36)
   {
      word pd581;
      pd581 = (* (( (ptr) (* (( (ptr) gf←c78088)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd581 ))))(c←v26176, 25, (* (( (ptr) formal←c78120)+5) ), 11, pd581);
      };
SOURCE(35588, 28)
   {
      word pd582;
      pd582 = (* (( (ptr) (* (( (ptr) gf←c78088)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd582 ))))(c←v26176, (* (( (ptr) formal←c78120)+4) ), pd582);
      };
SOURCE(35618, 30)
   {
      word pd583;
      pd583 = (* (( (ptr) (* (( (ptr) gf←c78088)+177)/* var←c66440 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd583 ))))(c←v26176, (* (( (ptr) formal←c78120)+6) ), pd583);
      };
SOURCE(35650, 39)
   {
      word pd584;
      pd584 = (* (( (ptr) (* (( (ptr) gf←c78088)+177)/* var←c66440 */  ))+19) );
      (void) ( *( (fPt) ((*  (ptr) pd584 ))))(c←v26176, 33, pd584);
      };
SOURCE(35691, 12)
   {
      word pd585;
      pd585 = (* (( (ptr) (* (( (ptr) gf←c78088)+177)/* var←c66440 */  ))+19) );
      (void) ( *( (fPt) ((*  (ptr) pd585 ))))(c←v26176, 32, pd585);
      };
SOURCE(35705, 12)
   {
      word pd586;
      pd586 = (* (( (ptr) (* (( (ptr) gf←c78088)+177)/* var←c66440 */  ))+20) );
      (void) ( *( (fPt) ((*  (ptr) pd586 ))))(c←v26176, 0, pd586);
      };
SOURCE(35739, 23)
   {
      word pd587;
      pd587 = (* (( (ptr) (* (( (ptr) gf←c78088)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd587 ))))(c←v26176, (* (( (ptr) formal←c78120)+7) ), pd587);
      };
SOURCE(35766, 17)
   {
      word pd588;
      pd588 = (* (( (ptr) (* (( (ptr) gf←c78088)+177)/* var←c66440 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd588 ))))(c←v26176, (* (( (ptr) formal←c78120)+8) ), pd588);
      };
SOURCE(35785, 53)
   {
      register word i←v26204 = 0;
      lab←L100111: ;
SOURCE(35812, 26)
      {
         word pd589;
         pd589 = (* (( (ptr) (* (( (ptr) gf←c78088)+177)/* var←c66440 */  ))+21) );
         (void) ( *( (fPt) ((*  (ptr) pd589 ))))(c←v26176, (* ((( (ptr) formal←c78120)+9)+i←v26204) ), pd589);
         };
      if ((i←v26204 >= 4)) {
         goto lab←L100108;
         };
      i←v26204 = (i←v26204 + 1);
      goto lab←L100111;
      lab←L100108: ;
      };
SOURCE(35840, 29)
   {
      word pd590;
      pd590 = (* (( (ptr) (* (( (ptr) gf←c78088)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd590 ))))(c←v26176, (* (( (ptr) formal←c78120)+14) ), pd590);
      };
   }

static void SendEvent←P4080(formal←c01186)
   word formal←c01186;
   {
   W7 var←c78152;
   /* declaration of var←c0743 skipped */ 
   register ptr gf←c78184 =  (ptr) &globalframe;
   /* declaration of var←c71080 skipped */ 
   var←c78152.f4/* var←c0743 */  = formal←c01186;
   /* SendEvent: */ 
SOURCE(35911, 7613)
   {
      word tmpAddr591;
      tmpAddr591 = (word) (( (ptr) &var←c78152)+5)/* var←c71080 */ ;
      (*  (ptr) tmpAddr591 ) = ( ((word)  (fPt) action←P8304) );
      (* (( (ptr) tmpAddr591) + 1) ) = 1;
      };
SOURCE(42835, 655)
SOURCE(42837, 115)
   {
      word var←c71112;
      var←c71112 = (* (( (ptr) var←c78152.f4/* var←c0743 */ )+8) );
      switch (var←c71112) {
         case 0: case 1: 
SOURCE(42890, 5)
            (void) XR←RaiseUnnamedError();
            break;
         case 33: 
SOURCE(42916, 36)
            {
               word var←c71144;
               var←c71144 = (* (( (ptr) var←c78152.f4/* var←c0743 */ )+9) );
               switch (var←c71144) {
                  case 8: case 16: case 32: 
                     break;
                  default: 
SOURCE(42968, 6)
                     (void) XR←RaiseUnnamedError();
                     break;
                  };
               };
            break;
         case 35: case 37: 
SOURCE(43000, 5)
            (void) XR←RaiseUnnamedError();
            break;
         case 2: case 3: case 4: case 5: case 6: case 7: case 8: case 9: case 10: case 11: case 12: case 13: case 14: case 15: case 16: case 17: case 18: case 19: case 20: case 21: case 22: case 23: case 24: case 25: case 26: case 27: case 28: case 29: case 30: case 31: case 32: case 34: 
            break;
         default: 
SOURCE(43483, 5)
            (void) XR←RaiseUnnamedError();
            break;
         };
      };
SOURCE(43493, 31)
   {
      word pd592;
      pd592 = (* (( (ptr) (* (( (ptr) gf←c78184)+177)/* var←c66440 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd592 ))))((*  (ptr) var←c78152.f4/* var←c0743 */ /* c←v17136 */  ), (word) (( (bPt) &var←c78152)+20)
         /* var←c71080 */ , (* (( (ptr) var←c78152.f4/* var←c0743 */ )+23)/* details←v17276 */  ), pd592);
      };
   }

static void action←P8304(c←v26344, formal←c78248)
   word c←v26344;
   word formal←c78248;
   {
   register ptr gf←c78216 =  (ptr) &globalframe;
   formal←c78248 = (formal←c78248 - 20);
   /* action: */ 
SOURCE(36054, 6768)
SOURCE(36087, 36)
   {
      word pd593;
      pd593 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd593 ))))(c←v26344, 25, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+2)/* propagate←v17192 */  ), 11, pd593)
      ;
      };
SOURCE(36125, 28)
   {
      word pd594;
      pd594 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
      (void) ( *( (fPt) ((*  (ptr) pd594 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+1)/* destination←v17164 */  ), pd594)
      ;
      };
SOURCE(36155, 28)
   (void) BPutSetOfEvent←P360(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+3)/* eventMask←v17220 */  ));
SOURCE(36185, 40)
   {
      word pd595;
      pd595 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
      (void) ( *( (fPt) ((*  (ptr) pd595 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+8) ), pd595);
      };
SOURCE(36235, 6555)
SOURCE(36237, 6529)
   {
      word var←c71176;
      var←c71176 = (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+8) );
      switch (var←c71176) {
         case 2: case 3: 
SOURCE(36294, 25)
            {
               word pd596;
               pd596 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
               (void) ( *( (fPt) ((*  (ptr) pd596 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+9) ), pd596);
               };
SOURCE(36321, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 2);
SOURCE(36352, 25)
            {
               word pd597;
               pd597 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+33) );
               (void) ( *( (fPt) ((*  (ptr) pd597 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd597);
               };
SOURCE(36380, 24)
            {
               word pd598;
               pd598 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd598 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+12) ), pd598);
               };
SOURCE(36407, 31)
            {
               word pd599;
               pd599 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd599 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+13) ), pd599);
               };
SOURCE(36441, 25)
            {
               word pd600;
               pd600 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd600 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+14) ), pd600);
               };
SOURCE(36469, 22)
            {
               word pd601;
               pd601 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+28) );
               (void) ( *( (fPt) ((*  (ptr) pd601 ))))(c←v26344, (*  (W2Pt) (( (ptr) (* (( (ptr) formal←c78248)+4) ))+15) ), pd601);
               };
SOURCE(36494, 20)
            {
               word pd602;
               pd602 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+28) );
               (void) ( *( (fPt) ((*  (ptr) pd602 ))))(c←v26344, (*  (W2Pt) (( (ptr) (* (( (ptr) formal←c78248)+4) ))+17) ), pd602);
               };
SOURCE(36517, 46)
            {
               word var←c71208;
               {
                  word x←v62092;
                  x←v62092 = (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+19) );
                  var←c71208 =  (unsigned) ( (((unsigned)x←v62092 << 16) >> 16) );
                  };
               {
                  word pd603;
                  pd603 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+20) );
                  (void) ( *( (fPt) ((*  (ptr) pd603 ))))(c←v26344, var←c71208, pd603);
                  };
               };
SOURCE(36566, 26)
            {
               word pd604;
               pd604 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+24) );
               (void) ( *( (fPt) ((*  (ptr) pd604 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+20) ), pd604);
               };
SOURCE(36595, 11)
            {
               word pd605;
               pd605 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
               (void) ( *( (fPt) ((*  (ptr) pd605 ))))(c←v26344, 0, pd605);
               };
            break;
         case 4: case 5: 
SOURCE(36652, 24)
            {
               word pd606;
               pd606 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
               (void) ( *( (fPt) ((*  (ptr) pd606 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+9) ), pd606);
               };
SOURCE(36678, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 2);
SOURCE(36709, 25)
            {
               word pd607;
               pd607 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+33) );
               (void) ( *( (fPt) ((*  (ptr) pd607 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd607);
               };
SOURCE(36737, 24)
            {
               word pd608;
               pd608 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd608 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+12) ), pd608);
               };
SOURCE(36764, 31)
            {
               word pd609;
               pd609 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd609 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+13) ), pd609);
               };
SOURCE(36798, 25)
            {
               word pd610;
               pd610 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd610 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+14) ), pd610);
               };
SOURCE(36826, 22)
            {
               word pd611;
               pd611 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+28) );
               (void) ( *( (fPt) ((*  (ptr) pd611 ))))(c←v26344, (*  (W2Pt) (( (ptr) (* (( (ptr) formal←c78248)+4) ))+15) ), pd611);
               };
SOURCE(36851, 20)
            {
               word pd612;
               pd612 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+28) );
               (void) ( *( (fPt) ((*  (ptr) pd612 ))))(c←v26344, (*  (W2Pt) (( (ptr) (* (( (ptr) formal←c78248)+4) ))+17) ), pd612);
               };
SOURCE(36874, 46)
            {
               word var←c71272;
               {
                  word x←v62048;
                  x←v62048 = (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+19) );
                  var←c71272 =  (unsigned) ( (((unsigned)x←v62048 << 16) >> 16) );
                  };
               {
                  word pd613;
                  pd613 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+20) );
                  (void) ( *( (fPt) ((*  (ptr) pd613 ))))(c←v26344, var←c71272, pd613);
                  };
               };
SOURCE(36923, 26)
            {
               word pd614;
               pd614 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+24) );
               (void) ( *( (fPt) ((*  (ptr) pd614 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+20) ), pd614);
               };
SOURCE(36952, 11)
            {
               word pd615;
               pd615 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
               (void) ( *( (fPt) ((*  (ptr) pd615 ))))(c←v26344, 0, pd615);
               };
            break;
         case 18: 
SOURCE(36994, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 3);
SOURCE(37036, 31)
            {
               word pd616;
               pd616 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd616 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+10) ), pd616);
               };
SOURCE(37071, 26)
            {
               word pd617;
               pd617 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd617 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd617);
               };
SOURCE(37101, 29)
            {
               word pd618;
               pd618 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+24) );
               (void) ( *( (fPt) ((*  (ptr) pd618 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+12) ), pd618);
               };
SOURCE(37133, 12)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 19);
            break;
         case 6: 
SOURCE(37168, 24)
            {
               word pd619;
               pd619 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
               (void) ( *( (fPt) ((*  (ptr) pd619 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+9) ), pd619);
               };
SOURCE(37195, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 2);
SOURCE(37226, 25)
            {
               word pd620;
               pd620 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+33) );
               (void) ( *( (fPt) ((*  (ptr) pd620 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd620);
               };
SOURCE(37255, 24)
            {
               word pd621;
               pd621 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd621 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+12) ), pd621);
               };
SOURCE(37283, 31)
            {
               word pd622;
               pd622 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd622 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+13) ), pd622);
               };
SOURCE(37318, 25)
            {
               word pd623;
               pd623 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd623 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+14) ), pd623);
               };
SOURCE(37347, 22)
            {
               word pd624;
               pd624 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+28) );
               (void) ( *( (fPt) ((*  (ptr) pd624 ))))(c←v26344, (*  (W2Pt) (( (ptr) (* (( (ptr) formal←c78248)+4) ))+15) ), pd624);
               };
SOURCE(37373, 20)
            {
               word pd625;
               pd625 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+28) );
               (void) ( *( (fPt) ((*  (ptr) pd625 ))))(c←v26344, (*  (W2Pt) (( (ptr) (* (( (ptr) formal←c78248)+4) ))+17) ), pd625);
               };
SOURCE(37397, 46)
            {
               word var←c71336;
               {
                  word x←v62004;
                  x←v62004 = (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+19) );
                  var←c71336 =  (unsigned) ( (((unsigned)x←v62004 << 16) >> 16) );
                  };
               {
                  word pd626;
                  pd626 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+20) );
                  (void) ( *( (fPt) ((*  (ptr) pd626 ))))(c←v26344, var←c71336, pd626);
                  };
               };
SOURCE(37446, 26)
            {
               word pd627;
               pd627 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+24) );
               (void) ( *( (fPt) ((*  (ptr) pd627 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+20) ), pd627);
               };
SOURCE(37475, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 1);
            break;
         case 7: case 8: 
SOURCE(37521, 24)
            {
               word pd628;
               pd628 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
               (void) ( *( (fPt) ((*  (ptr) pd628 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+9) ), pd628);
               };
SOURCE(37548, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 2);
SOURCE(37579, 25)
            {
               word pd629;
               pd629 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+33) );
               (void) ( *( (fPt) ((*  (ptr) pd629 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd629);
               };
SOURCE(37608, 24)
            {
               word pd630;
               pd630 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd630 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+12) ), pd630);
               };
SOURCE(37636, 31)
            {
               word pd631;
               pd631 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd631 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+13) ), pd631);
               };
SOURCE(37671, 25)
            {
               word pd632;
               pd632 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd632 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+14) ), pd632);
               };
SOURCE(37700, 22)
            {
               word pd633;
               pd633 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+28) );
               (void) ( *( (fPt) ((*  (ptr) pd633 ))))(c←v26344, (*  (W2Pt) (( (ptr) (* (( (ptr) formal←c78248)+4) ))+15) ), pd633);
               };
SOURCE(37726, 23)
            {
               word pd634;
               pd634 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+28) );
               (void) ( *( (fPt) ((*  (ptr) pd634 ))))(c←v26344, (*  (W2Pt) (( (ptr) (* (( (ptr) formal←c78248)+4) ))+17) ), pd634);
               };
SOURCE(37753, 46)
            {
               word var←c71400;
               {
                  word x←v61960;
                  x←v61960 = (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+19) );
                  var←c71400 =  (unsigned) ( (((unsigned)x←v61960 << 16) >> 16) );
                  };
               {
                  word pd635;
                  pd635 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+20) );
                  (void) ( *( (fPt) ((*  (ptr) pd635 ))))(c←v26344, var←c71400, pd635);
                  };
               };
SOURCE(37802, 22)
            {
               word pd636;
               pd636 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
               (void) ( *( (fPt) ((*  (ptr) pd636 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+20) ), pd636);
               };
SOURCE(37827, 44)
            {
               word pd637;
               pd637 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
               (void) ( *( (fPt) ((*  (ptr) pd637 ))))(c←v26344, (((* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+21) ) << 1) + (* (( (ptr) (* (
                        ( (ptr) formal←c78248)+4) ))+22) )), pd637);
               };
            break;
         case 9: case 10: 
SOURCE(37900, 24)
            {
               word pd638;
               pd638 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
               (void) ( *( (fPt) ((*  (ptr) pd638 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+9) ), pd638);
               };
SOURCE(37927, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 2);
SOURCE(37958, 31)
            {
               word pd639;
               pd639 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd639 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd639);
               };
SOURCE(37993, 22)
            {
               word pd640;
               pd640 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
               (void) ( *( (fPt) ((*  (ptr) pd640 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+12) ), pd640);
               };
SOURCE(38018, 12)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 23);
            break;
         case 11: 
SOURCE(38054, 57)
            {
               register word noName←c71464 = 1;
               register word i←v26372;
               lab←L100119: ;
               i←v26372 = (noName←c71464 - 1);
SOURCE(38083, 28)
               {
                  word pd641;
                  pd641 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
                  (void) ( *( (fPt) ((*  (ptr) pd641 ))))(c←v26344,  (unsigned) (word) (* ((( (bPt) (* (( (ptr) formal←c78248)+4) ))+36)+i←v26372)
                      ), pd641);
                  };
               if ((noName←c71464 >= 31)) {
                  goto lab←L100116;
                  };
               noName←c71464 = (noName←c71464 + 1);
               goto lab←L100119;
               lab←L100116: ;
               };
            break;
         case 12: 
SOURCE(38129, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 3);
SOURCE(38171, 26)
            {
               word pd642;
               pd642 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd642 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+10) ), pd642);
               };
SOURCE(38201, 28)
            {
               word pd643;
               pd643 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+30) );
               (void) ( *( (fPt) ((*  (ptr) pd643 ))))(c←v26344, (*  (W2Pt) (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), (*  (W2Pt) (
                     ( (ptr) (* (( (ptr) formal←c78248)+4) ))+13) ), pd643);
               };
SOURCE(38286, 19)
            {
               word pd644;
               pd644 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+20) );
               (void) ( *( (fPt) ((*  (ptr) pd644 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+15) ), pd644);
               };
SOURCE(38309, 12)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 14);
            break;
         case 13: 
SOURCE(38349, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 3);
SOURCE(38391, 28)
            {
               word pd645;
               pd645 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd645 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+10) ), pd645);
               };
SOURCE(38423, 28)
            {
               word pd646;
               pd646 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+30) );
               (void) ( *( (fPt) ((*  (ptr) pd646 ))))(c←v26344, (*  (W2Pt) (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), (*  (W2Pt) (
                     ( (ptr) (* (( (ptr) formal←c78248)+4) ))+13) ), pd646);
               };
SOURCE(38508, 25)
            {
               word pd647;
               pd647 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+20) );
               (void) ( *( (fPt) ((*  (ptr) pd647 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+15) ), pd647);
               };
SOURCE(38537, 19)
            {
               word pd648;
               pd648 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+20) );
               (void) ( *( (fPt) ((*  (ptr) pd648 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+16) ), pd648);
               };
SOURCE(38560, 24)
            {
               word pd649;
               pd649 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
               (void) ( *( (fPt) ((*  (ptr) pd649 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+17) ), pd649);
               };
SOURCE(38588, 12)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 11);
            break;
         case 14: 
SOURCE(38622, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 3);
SOURCE(38664, 28)
            {
               word pd650;
               pd650 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd650 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+10) ), pd650);
               };
SOURCE(38696, 25)
            {
               word pd651;
               pd651 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+20) );
               (void) ( *( (fPt) ((*  (ptr) pd651 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd651);
               };
SOURCE(38725, 24)
            {
               word pd652;
               pd652 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
               (void) ( *( (fPt) ((*  (ptr) pd652 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+12) ), pd652);
               };
SOURCE(38753, 12)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 21);
            break;
         case 15: 
SOURCE(38793, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 3);
SOURCE(38835, 26)
            {
               word pd653;
               pd653 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd653 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+10) ), pd653);
               };
SOURCE(38865, 23)
            {
               word pd654;
               pd654 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
               (void) ( *( (fPt) ((*  (ptr) pd654 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd654);
               };
SOURCE(38892, 12)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 23);
            break;
         case 16: 
SOURCE(38928, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 3);
SOURCE(38970, 26)
            {
               word pd655;
               pd655 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd655 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+10) ), pd655);
               };
SOURCE(39000, 26)
            {
               word pd656;
               pd656 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd656 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd656);
               };
SOURCE(39030, 46)
            {
               word pd657;
               pd657 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+30) );
               (void) ( *( (fPt) ((*  (ptr) pd657 ))))(c←v26344, (*  (W2Pt) (( (ptr) (* (( (ptr) formal←c78248)+4) ))+12) ), (*  (W2Pt) (
                     ( (ptr) (* (( (ptr) formal←c78248)+4) ))+14) ), pd657);
               };
SOURCE(39080, 41)
            {
               word pd658;
               pd658 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+26) );
               (void) ( *( (fPt) ((*  (ptr) pd658 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+16) ), pd658);
               };
SOURCE(39125, 32)
            {
               word pd659;
               pd659 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+24) );
               (void) ( *( (fPt) ((*  (ptr) pd659 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+17) ), pd659);
               };
SOURCE(39161, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 9);
            break;
         case 17: 
SOURCE(39197, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 3);
SOURCE(39239, 31)
            {
               word pd660;
               pd660 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd660 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+10) ), pd660);
               };
SOURCE(39274, 26)
            {
               word pd661;
               pd661 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd661 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd661);
               };
SOURCE(39304, 12)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 20);
            break;
         case 19: 
SOURCE(39336, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 3);
SOURCE(39378, 31)
            {
               word pd662;
               pd662 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd662 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+10) ), pd662);
               };
SOURCE(39413, 26)
            {
               word pd663;
               pd663 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd663 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd663);
               };
SOURCE(39443, 32)
            {
               word pd664;
               pd664 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+24) );
               (void) ( *( (fPt) ((*  (ptr) pd664 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+12) ), pd664);
               };
SOURCE(39478, 12)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 19);
            break;
         case 20: 
SOURCE(39511, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 3);
SOURCE(39553, 26)
            {
               word pd665;
               pd665 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd665 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+10) ), pd665);
               };
SOURCE(39583, 26)
            {
               word pd666;
               pd666 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd666 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd666);
               };
SOURCE(39613, 12)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 20);
            break;
         case 21: 
SOURCE(39650, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 3);
SOURCE(39692, 31)
            {
               word pd667;
               pd667 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd667 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+10) ), pd667);
               };
SOURCE(39727, 26)
            {
               word pd668;
               pd668 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd668 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd668);
               };
SOURCE(39757, 26)
            {
               word pd669;
               pd669 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd669 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+12) ), pd669);
               };
SOURCE(39787, 20)
            {
               word pd670;
               pd670 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+28) );
               (void) ( *( (fPt) ((*  (ptr) pd670 ))))(c←v26344, (*  (W2Pt) (( (ptr) (* (( (ptr) formal←c78248)+4) ))+13) ), pd670);
               };
SOURCE(39811, 32)
            {
               word pd671;
               pd671 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+24) );
               (void) ( *( (fPt) ((*  (ptr) pd671 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+15) ), pd671);
               };
SOURCE(39847, 12)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 11);
            break;
         case 22: 
SOURCE(39886, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 3);
SOURCE(39928, 31)
            {
               word pd672;
               pd672 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd672 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+10) ), pd672);
               };
SOURCE(39963, 26)
            {
               word pd673;
               pd673 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd673 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd673);
               };
SOURCE(39993, 32)
            {
               word pd674;
               pd674 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd674 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+12) ), pd674);
               };
SOURCE(40029, 46)
            {
               word pd675;
               pd675 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+30) );
               (void) ( *( (fPt) ((*  (ptr) pd675 ))))(c←v26344, (*  (W2Pt) (( (ptr) (* (( (ptr) formal←c78248)+4) ))+13) ), (*  (W2Pt) (
                     ( (ptr) (* (( (ptr) formal←c78248)+4) ))+15) ), pd675);
               };
SOURCE(40077, 41)
            {
               word pd676;
               pd676 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+26) );
               (void) ( *( (fPt) ((*  (ptr) pd676 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+17) ), pd676);
               };
SOURCE(40120, 29)
            {
               word pd677;
               pd677 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
               (void) ( *( (fPt) ((*  (ptr) pd677 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+18) ), pd677);
               };
SOURCE(40152, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 5);
            break;
         case 23: 
SOURCE(40191, 27)
            {
               word pd678;
               pd678 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
               (void) ( *( (fPt) ((*  (ptr) pd678 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+9) ), pd678);
               };
SOURCE(40221, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 2);
SOURCE(40252, 26)
            {
               word pd679;
               pd679 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd679 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd679);
               };
SOURCE(40282, 26)
            {
               word pd680;
               pd680 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd680 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+12) ), pd680);
               };
SOURCE(40312, 27)
            {
               word pd681;
               pd681 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd681 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+13) ), pd681);
               };
SOURCE(40343, 46)
            {
               word pd682;
               pd682 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+30) );
               (void) ( *( (fPt) ((*  (ptr) pd682 ))))(c←v26344, (*  (W2Pt) (( (ptr) (* (( (ptr) formal←c78248)+4) ))+14) ), (*  (W2Pt) (
                     ( (ptr) (* (( (ptr) formal←c78248)+4) ))+16) ), pd682);
               };
SOURCE(40391, 41)
            {
               word pd683;
               pd683 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+26) );
               (void) ( *( (fPt) ((*  (ptr) pd683 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+18) ), pd683);
               };
SOURCE(40434, 23)
            {
               word pd684;
               pd684 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+20) );
               (void) ( *( (fPt) ((*  (ptr) pd684 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+19) ), pd684);
               };
SOURCE(40459, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 4);
            break;
         case 24: 
SOURCE(40495, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 3);
SOURCE(40537, 31)
            {
               word pd685;
               pd685 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd685 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+10) ), pd685);
               };
SOURCE(40572, 26)
            {
               word pd686;
               pd686 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd686 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd686);
               };
SOURCE(40602, 20)
            {
               word pd687;
               pd687 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+28) );
               (void) ( *( (fPt) ((*  (ptr) pd687 ))))(c←v26344, (*  (W2Pt) (( (ptr) (* (( (ptr) formal←c78248)+4) ))+12) ), pd687);
               };
SOURCE(40624, 12)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 16);
            break;
         case 25: 
SOURCE(40661, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 3);
SOURCE(40703, 26)
            {
               word pd688;
               pd688 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd688 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+10) ), pd688);
               };
SOURCE(40733, 20)
            {
               word pd689;
               pd689 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+29) );
               (void) ( *( (fPt) ((*  (ptr) pd689 ))))(c←v26344, (*  (W2Pt) (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd689);
               };
SOURCE(40755, 12)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 20);
            break;
         case 26: 
SOURCE(40794, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 3);
SOURCE(40836, 31)
            {
               word pd690;
               pd690 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd690 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+10) ), pd690);
               };
SOURCE(40871, 26)
            {
               word pd691;
               pd691 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd691 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd691);
               };
SOURCE(40901, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 4);
SOURCE(40930, 23)
            {
               word pd692;
               pd692 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
               (void) ( *( (fPt) ((*  (ptr) pd692 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+12) ), pd692);
               };
SOURCE(40955, 12)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 15);
            break;
         case 27: 
SOURCE(40995, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 3);
SOURCE(41037, 26)
            {
               word pd693;
               pd693 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd693 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+10) ), pd693);
               };
SOURCE(41067, 26)
            {
               word pd694;
               pd694 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd694 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd694);
               };
SOURCE(41097, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 4);
SOURCE(41119, 23)
            {
               word pd695;
               pd695 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
               (void) ( *( (fPt) ((*  (ptr) pd695 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+12) ), pd695);
               };
SOURCE(41144, 12)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 15);
            break;
         case 28: 
SOURCE(41182, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 3);
SOURCE(41224, 26)
            {
               word pd696;
               pd696 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd696 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+10) ), pd696);
               };
SOURCE(41254, 29)
            {
               word pd697;
               pd697 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+21) );
               (void) ( *( (fPt) ((*  (ptr) pd697 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd697);
               };
SOURCE(41287, 25)
            {
               word pd698;
               pd698 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+33) );
               (void) ( *( (fPt) ((*  (ptr) pd698 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+12) ), pd698);
               };
SOURCE(41315, 23)
            {
               word pd699;
               pd699 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
               (void) ( *( (fPt) ((*  (ptr) pd699 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+13) ), pd699);
               };
SOURCE(41340, 12)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 15);
            break;
         case 29: 
SOURCE(41378, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 3);
SOURCE(41420, 25)
            {
               word pd700;
               pd700 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+33) );
               (void) ( *( (fPt) ((*  (ptr) pd700 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+10) ), pd700);
               };
SOURCE(41448, 25)
            {
               word pd701;
               pd701 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd701 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd701);
               };
SOURCE(41477, 34)
            {
               word pd702;
               pd702 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+21) );
               (void) ( *( (fPt) ((*  (ptr) pd702 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+12) ), pd702);
               };
SOURCE(41515, 12)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 16);
            break;
         case 30: 
SOURCE(41555, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 3);
SOURCE(41597, 25)
            {
               word pd703;
               pd703 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+33) );
               (void) ( *( (fPt) ((*  (ptr) pd703 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+10) ), pd703);
               };
SOURCE(41625, 25)
            {
               word pd704;
               pd704 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd704 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd704);
               };
SOURCE(41654, 29)
            {
               word pd705;
               pd705 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd705 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+12) ), pd705);
               };
SOURCE(41687, 34)
            {
               word pd706;
               pd706 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+21) );
               (void) ( *( (fPt) ((*  (ptr) pd706 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+13) ), pd706);
               };
SOURCE(41725, 31)
            {
               word pd707;
               pd707 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+21) );
               (void) ( *( (fPt) ((*  (ptr) pd707 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+14) ), pd707);
               };
SOURCE(41760, 33)
            {
               word pd708;
               pd708 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+21) );
               (void) ( *( (fPt) ((*  (ptr) pd708 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+15) ), pd708);
               };
SOURCE(41797, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 4);
            break;
         case 31: 
SOURCE(41835, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 3);
SOURCE(41877, 25)
            {
               word pd709;
               pd709 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+33) );
               (void) ( *( (fPt) ((*  (ptr) pd709 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+10) ), pd709);
               };
SOURCE(41905, 29)
            {
               word pd710;
               pd710 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd710 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd710);
               };
SOURCE(41938, 34)
            {
               word pd711;
               pd711 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+21) );
               (void) ( *( (fPt) ((*  (ptr) pd711 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+12) ), pd711);
               };
SOURCE(41976, 31)
            {
               word pd712;
               pd712 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+21) );
               (void) ( *( (fPt) ((*  (ptr) pd712 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+13) ), pd712);
               };
SOURCE(42011, 33)
            {
               word pd713;
               pd713 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+21) );
               (void) ( *( (fPt) ((*  (ptr) pd713 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+14) ), pd713);
               };
SOURCE(42048, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 8);
            break;
         case 32: 
SOURCE(42085, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 3);
SOURCE(42127, 26)
            {
               word pd714;
               pd714 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd714 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+10) ), pd714);
               };
SOURCE(42157, 28)
            {
               word pd715;
               pd715 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+32) );
               (void) ( *( (fPt) ((*  (ptr) pd715 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd715);
               };
SOURCE(42189, 19)
            {
               word pd716;
               pd716 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+24) );
               (void) ( *( (fPt) ((*  (ptr) pd716 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+12) ), pd716);
               };
SOURCE(42210, 25)
            {
               word pd717;
               pd717 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+24) );
               (void) ( *( (fPt) ((*  (ptr) pd717 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+13) ), pd717);
               };
SOURCE(42237, 12)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 18);
            break;
         case 33: 
SOURCE(42274, 19)
            {
               word pd718;
               pd718 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
               (void) ( *( (fPt) ((*  (ptr) pd718 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+9) ), pd718);
               };
SOURCE(42295, 12)
            {
               word pd719;
               pd719 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+20) );
               (void) ( *( (fPt) ((*  (ptr) pd719 ))))(c←v26344, 0, pd719);
               };
SOURCE(42329, 26)
            {
               word pd720;
               pd720 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+27) );
               (void) ( *( (fPt) ((*  (ptr) pd720 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd720);
               };
SOURCE(42359, 24)
            {
               word pd721;
               pd721 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+21) );
               (void) ( *( (fPt) ((*  (ptr) pd721 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+12) ), pd721);
               };
SOURCE(42385, 205)
            {
               word var←c71496;
               var←c71496 = (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+9) );
               switch (var←c71496) {
                  case 32: 
SOURCE(42413, 53)
                     {
                        register word i←v26436 = 0;
                        lab←L100123: ;
SOURCE(42440, 26)
                        {
                           word pd722;
                           pd722 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+21) );
                           (void) ( *( (fPt) ((*  (ptr) pd722 ))))(c←v26344, (* ((( (ptr) (* (( (ptr) formal←c78248)+4) ))+13)+i←v26436) ), pd722);
                           };
                        if ((i←v26436 >= 4)) {
                           goto lab←L100120;
                           };
                        i←v26436 = (i←v26436 + 1);
                        goto lab←L100123;
                        lab←L100120: ;
                        };
                     break;
                  case 8: 
SOURCE(42473, 54)
                     {
                        register word i←v26500 = 0;
                        lab←L100127: ;
SOURCE(42502, 25)
                        {
                           word pd723;
                           pd723 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
                           (void) ( *( (fPt) ((*  (ptr) pd723 ))))(c←v26344,  (unsigned) (word) (* ((( (bPt) (* (( (ptr) formal←c78248)+4) ))+52)+i←v26500)
/*1*/    ), pd723);
                           };
                        if ((i←v26500 >= 19)) {
                           goto lab←L100124;
                           };
                        i←v26500 = (i←v26500 + 1);
                        goto lab←L100127;
                        lab←L100124: ;
                        };
                     break;
                  case 16: 
SOURCE(42535, 55)
                     {
                        register word i←v26564 = 0;
                        lab←L100131: ;
SOURCE(42564, 26)
                        {
                           word pd724;
                           pd724 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+20) );
                           (void) ( *( (fPt) ((*  (ptr) pd724 ))))(c←v26344,  (unsigned) (word) (* ((( (hPt) (* (( (ptr) formal←c78248)+4) ))+26)+i←v26564)
/*1*/    ), pd724);
                           };
                        if ((i←v26564 >= 9)) {
                           goto lab←L100128;
                           };
                        i←v26564 = (i←v26564 + 1);
                        goto lab←L100131;
                        lab←L100128: ;
                        };
                     break;
                  default: 
SOURCE(42603, 5)
                     (void) XR←RaiseUnnamedError();
                     break;
                  };
               };
            break;
         case 34: 
SOURCE(42632, 11)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 3);
SOURCE(42674, 25)
            {
               word pd725;
               pd725 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
               (void) ( *( (fPt) ((*  (ptr) pd725 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+10) ), pd725);
               };
SOURCE(42703, 25)
            {
               word pd726;
               pd726 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
               (void) ( *( (fPt) ((*  (ptr) pd726 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+11) ), pd726);
               };
SOURCE(42732, 18)
            {
               word pd727;
               pd727 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+19) );
               (void) ( *( (fPt) ((*  (ptr) pd727 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+12) ), pd727);
               };
SOURCE(42754, 12)
            (* (( (ptr) c←v26344)+4) ) = ((* (( (ptr) c←v26344)+4) ) + 25);
            break;
         default: 
SOURCE(42783, 5)
            (void) XR←RaiseUnnamedError();
            break;
         };
      };
SOURCE(42793, 29)
   {
      word pd728;
      pd728 = (* (( (ptr) (* (( (ptr) gf←c78216)+177)/* var←c66440 */  ))+64) );
      (void) ( *( (fPt) ((*  (ptr) pd728 ))))(c←v26344, (* (( (ptr) (* (( (ptr) formal←c78248)+4) ))+23)/* details←v17276 */  ), pd728)
      ;
      };
   }

static void NoName←Q11580(formal←c0767, formal←c200000, formal←c200001, formal←c200002, formal←c200003)
   word formal←c0767;
   word formal←c200000;
   word formal←c200001;
   word formal←c200002;
   word formal←c200003;
   {
   if ((formal←c200001 == XR←Unwind)) {
      (void) (XR←MonitorExit(* (( (ptr) formal←c200000)+4) ));
      };
   (*  (ptr) formal←c0767 ) = 0;
   (* (( (ptr) formal←c0767)+1) ) = 0;
   return;
   }

static word NoName←Q11640(formal←c0456)
   word formal←c0456;
   {
   W3 var←c0458;
   word var←c0457;
   /* intermediary proc for a FORK, nArgs: 3, nRets: 0 */ 
   var←c0458 = (*  (W3Pt) (( (ptr) formal←c0456)+4) );
   var←c0457 = (* (( (ptr) formal←c0456)+2) );
   formal←c0456 = XR←ExtensionFree(formal←c0456);
   (void) ( *( (fPt) ((*  (ptr) var←c0457 ))))(var←c0458.f0, var←c0458.f1, var←c0458.f2, var←c0457);
   return(0);
   }

/* file: XlImplRequests, module: XlImplRequests, compiled at: September 14, 1993 4:28:27 pm PDT */ 
extern void XR←install←XlImplRequests() {
   NoName←Q11460();
   }
extern void XR←run←XlImplRequests() { XR←Start(&globalframe); }