/* Generated with C2C (Cedar To C)*/ /* Copyright (C) 1993 by Xerox Corporation. All rights reserved. */ /* time: September 14, 1993 4:27:34 pm PDT */ /* C2C version: April 20, 1993 (sun4) */ /* ref-counting: off */ /* file: XlImplGC, module: XlImplGC */ /* switches: bcfhklnouw */ #include #include static char versionStamp[] = "@(#)mob_version [2392183648,2216845871] XlImplGC"; typedef unsigned word, *ptr; typedef unsigned char byte, *bPt; typedef unsigned short half, *hPt; typedef word (*fPt)(); typedef struct {word f0, f1;} W2; typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8; typedef struct {W8 f; W8 r;} W16; typedef struct {W16 f; W16 r;} W32; typedef W32 *W32Pt; typedef struct {W8 f; word r;} W9; typedef struct {word f0, f1, f2, f3, f4, f5;} W6; typedef struct {W8 f; W2 r;} W10; typedef struct {W16 f; W10 r;} W26; typedef W2 *W2Pt; typedef struct {word f0, f1, f2, f3, f4;} W5; typedef struct {W8 f; W5 r;} W13; typedef struct {word f0, f1, f2;} W3; typedef struct {W8 f; W6 r;} W14; typedef W6 *W6Pt; #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)) ) #define MIN(cast, x, y) ( ( cast x) < ( cast y) ? (x) : (y) ) #define MAX(cast, x, y) ( ( cast x) > ( cast y) ? (x) : (y) ) static void NoName_Q11760(); static void XlImplGC_P0(); static void RaiseClientError_P60(); static void BPut8_P120(); static void BPut16_P180(); static void BPut32_P240(); static void BPutDrawable_P300(); static void BPutPoint_P480(); static void BPutSize_P540(); static void BPutRect_P600(); static void DPutBYTE_P660(); static word IsGContext_P720(); static word NarrowGContext_P780(); static word NewGContext_P840(); static word MakeGContext_P900(); static void FlushGContext_P960(); static void action_P4620(); static word GCID_P1020(); static void ValidateGC_P1080(); static void EntryValidateGC_P4728(); static void InvalidateGC_P1140(); static void EntryInvalidateGC_P4788(); static void SetMaskBits_P1200(); static void ValidateGCMask_P1260(); static void Entry_P4896(); static void InvalidateGCMask_P1320(); static void Entry_P4956(); static word NestedEntryUseGContext_P1380(); static void action_P5016(); static void FinalizeGC_P1500(); static word NoName_Q11820(); static void FreeGC_P5076(); static word NoName_Q11880(); static word UseGContext_P1560(); static word NoName_Q11940(); static word NoName_Q12000(); static void SetGContext_P1680(); static void SetGCFont_P1800(); static void SetGCFunction_P1860(); static void SetGCFillStyle_P1920(); static void SetGCTile_P1980(); static void SetGCStipple_P2040(); static void SetGCClipMask_P2100(); static void SetGCStippleOrigin_P2160(); static void SetGCClipMaskOrigin_P2220(); static void SetGCBackground_P2280(); static void SetGCGrounds_P2340(); static void SetGCForeground_P2400(); static void SetGCPlaneMask_P2460(); static void SetGCLineWidth_P2520(); static void SetGCLineStyle_P2580(); static void SetGCCapStyle_P2640(); static void SetGCFillRule_P2700(); static void SetGCJoinStyle_P2760(); static void SetGCArcMode_P2820(); static void SetGCSubWindowMode_P2880(); static void SetGCGraphicsExposures_P3000(); static void CopyArea_P3060(); static void CopyPlane_P3120(); static void FillRectangle_P3180(); static void DrawLine_P3240(); static void SetupGraphics_P3300(); static word KeepTheOptimizerHonest_P3420(); static void InitBSwap_P3480(); static void PutImage_P3540(); static void Protected_P5424(); static word NoName_Q12060(); static void BitsInByteSwapped_P5688(); static void BytesSwapped_P5748(); static void BothSwapped_P5808(); static void GetImage_P3600(); static void action_P6492(); static void PutRectanglesDirect_P3660(); static void BPutRectangles_P3720(); static void PolyFillRectangle_P3780(); static void CountAndSetMaskBits_P3840(); static void CopyGC_P3900(); static void SetDashes_P3960(); static word CountBytes_P6744(); static void action_P6804(); static word SetClipRectangles_P4020(); static void ImageChar_P4080(); static void ImageRope_P4140(); static word ToInt8Rep_P4200(); static void DrawChar_P4260(); static void EntryDoit_P7056(); static void DrawRope_P4320(); static void EnryDrawRope_P7116(); static void MyDeliver_P7224(); static word AppendBigEndianCARD32_P4380(); static void PolyText8_P4440(); static void EntryDoit_P7332(); static void DrawString16_P4500(); static void EntryDoIt_P7488(); static void ImageString16_P4560(); static void NoName_Q12120(); static void NoName_Q12180(); static void NoName_Q12240(); static void NoName_Q12300(); static void NoName_Q12360(); static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\105\174\212\132\300\104\340\255\314\100\164\000\000"}; static struct {unsigned f; char r[12];} string2 = {720907, "\006\003A\014\001A\024\001A\030\001"}; static struct {unsigned f; char r[16];} string3 = {851984, "\257\300\216\225\323\140\300\204\042\142\057\103\260\000\000"}; static struct {unsigned f; char r[4];} string4 = {131074, "\004\014\000"}; static struct {unsigned f; char r[4];} string5 = {131076, "\216\251\000"}; static struct {unsigned f; char r[4];} string6 = {65537, "\001\000\000"}; static struct {unsigned f; char r[60];} string7 = {3801148, "\260\006\005\146\151\162\163\164\216\211\010\007\106\157\156\164\122\145\160\300\351\276\264\273\300\115\104\320\264\005\004\162\145\163\164\214\216\211\010\007\106\157\156\164\122\145\160\300\351\276\264\273\300\115\104\320\264\261\000"}; static struct {unsigned f; char r[4];} string8 = {131074, "\004\003\000"}; static struct {unsigned f; char r[44];} string9 = {2752556, "\260\007\006\154\145\156\147\164\150\210\241\000\200\177\377\005\004\164\145\170\164\254\206\012\011\155\141\170\114\145\156\147\164\150\210\241\000\200\177\377\243\261\000"}; static struct {unsigned f; char r[16];} string10 = {786448, "\254\205\210\241\000\100\377\210\241\000\100\377\000\000\000"}; static struct {unsigned f; char r[8];} string11 = {458760, "ZPixmap"}; static struct {unsigned f; char r[8];} string12 = {458760, "ToSmall"}; static struct {unsigned f; char r[12];} string13 = {524300, "XlImplGC\000\000\000"}; static struct {unsigned f; char r[16];} string14 = {851984, "\257\300\216\225\323\140\300\204\042\142\057\100\200\000\000"}; static struct {unsigned f; char r[12];} string15 = {524296, "\006\002\030\001\100\120\004\007\000\000\000"}; static struct {unsigned f; char r[16];} string16 = {851984, "\257\300\157\176\027\244\300\037\074\133\137\100\150\000\000"}; static struct {unsigned f; char r[16];} string17 = {851984, "\257\300\015\277\004\146\300\034\367\146\045\100\164\000\000"}; static struct {unsigned f; char r[16];} string18 = {851984, "\257\300\332\223\177\020\300\304\076\102\260\100\164\000\000"}; static struct {unsigned f; char r[16];} string19 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\100\150\000\000"}; static unsigned string20 = 1483472896; static struct {unsigned f; char r[16];} string21 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\100\164\000\000"}; static struct {unsigned f; char r[16];} string22 = {851984, "\257\300\337\070\153\303\300\227\216\321\214\100\150\000\000"}; static struct {unsigned f; char r[8];} string23 = {1483493490, "ivate"}; static struct {unsigned f; char r[16];} string24 = {851984, "\257\300\304\042\023\266\300\315\144\243\337\100\150\000\000"}; static struct {unsigned f; char r[16];} string25 = {851984, "\257\300\212\247\207\172\300\123\222\237\073\100\150\000\000"}; static struct {unsigned f; char r[16];} string26 = {851984, "\257\300\044\126\136\322\300\125\273\233\107\100\150\000\000"}; static struct {unsigned f; char r[32];} string27 = {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];} string28 = {851984, "\257\300\012\063\155\016\300\130\140\234\375\100\164\000\000"}; static struct {unsigned f; char r[40];} string29 = {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[28];} string30 = {1572892, "\211\014\013\107\103\157\156\164\145\170\164\122\145\160\300\351\276\264\273\300\115\104\320\264\000\000\000"}; static struct {unsigned f; char r[16];} string31 = {851984, "\257\300\234\252\236\205\300\126\010\241\274\100\150\000\000"}; static struct {unsigned f; char r[16];} string32 = {851984, "\257\300\012\063\155\016\300\130\140\234\375\100\150\000\000"}; static struct {unsigned f; char r[28];} string33 = {1572892, "\211\014\013\107\162\141\160\150\151\143\163\122\145\160\300\012\063\155\016\300\130\140\234\375\000\000\000"}; static struct {unsigned f; char r[16];} string34 = {851984, "\257\300\216\377\237\261\300\201\335\023\142\100\150\000\000"}; static struct { word f0[24]; word f24; word f25; word f26; word f27; word f28; word f29; word f30; word f31; word f32; word f33; word f34; word f35; word f36; word f37; 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[12]; } globalframe = { {0}, (word) ImageString16_P4560, 0, (word) DrawString16_P4500, 0, (word) PolyText8_P4440, 0, (word) AppendBigEndianCARD32_P4380, 0, (word) DrawRope_P4320, 0, (word) DrawChar_P4260, 0, (word) ToInt8Rep_P4200, 0, (word) ImageRope_P4140, 0, (word) ImageChar_P4080, 0, (word) SetClipRectangles_P4020, 0, (word) SetDashes_P3960, 0, (word) CopyGC_P3900, 0, (word) CountAndSetMaskBits_P3840, 0, (word) PolyFillRectangle_P3780, 0, (word) BPutRectangles_P3720, 0, (word) PutRectanglesDirect_P3660, 0, (word) GetImage_P3600, 0, (word) PutImage_P3540, 0, (word) InitBSwap_P3480, 0, (word) KeepTheOptimizerHonest_P3420, 0, (word) SetupGraphics_P3300, 0, (word) DrawLine_P3240, 0, (word) FillRectangle_P3180, 0, (word) CopyPlane_P3120, 0, (word) CopyArea_P3060, 0, (word) SetGCGraphicsExposures_P3000, 0, (word) SetGCSubWindowMode_P2880, 0, (word) SetGCArcMode_P2820, 0, (word) SetGCJoinStyle_P2760, 0, (word) SetGCFillRule_P2700, 0, (word) SetGCCapStyle_P2640, 0, (word) SetGCLineStyle_P2580, 0, (word) SetGCLineWidth_P2520, 0, (word) SetGCPlaneMask_P2460, 0, (word) SetGCForeground_P2400, 0, (word) SetGCGrounds_P2340, 0, (word) SetGCBackground_P2280, 0, (word) SetGCClipMaskOrigin_P2220, 0, (word) SetGCStippleOrigin_P2160, 0, (word) SetGCClipMask_P2100, 0, (word) SetGCStipple_P2040, 0, (word) SetGCTile_P1980, 0, (word) SetGCFillStyle_P1920, 0, (word) SetGCFunction_P1860, 0, (word) SetGCFont_P1800, 0, (word) SetGContext_P1680, 0, (word) UseGContext_P1560, 0, (word) FinalizeGC_P1500, 0, (word) NestedEntryUseGContext_P1380, 0, (word) InvalidateGCMask_P1320, 0, (word) ValidateGCMask_P1260, 0, (word) SetMaskBits_P1200, 0, (word) InvalidateGC_P1140, 0, (word) ValidateGC_P1080, 0, (word) GCID_P1020, 0, (word) FlushGContext_P960, 0, (word) MakeGContext_P900, 0, (word) NewGContext_P840, 0, (word) NarrowGContext_P780, 0, (word) IsGContext_P720, 0, (word) DPutBYTE_P660, 0, (word) BPutRect_P600, 0, (word) BPutSize_P540, 0, (word) BPutPoint_P480, 0, (word) BPutDrawable_P300, 0, (word) BPut32_P240, 0, (word) BPut16_P180, 0, (word) BPut8_P120, 0, (word) RaiseClientError_P60, 0, (word) XlImplGC_P0, {0} }; static void NoName_Q11760() { register ptr gf_c0840 = (ptr) &globalframe; word var_c58404; (* (( (ptr) gf_c0840)+8) ) = (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2); (* (( (ptr) gf_c0840)+9) ) = (word) XR_GetTypeIndex((word) &string3, 0, (word) &string4); (* (( (ptr) gf_c0840)+11) ) = (word) XR_GetTypeIndex((word) &string5, 0, (word) &string6); (* (( (ptr) gf_c0840)+12) ) = (word) XR_GetTypeIndex((word) &string7, 0, (word) &string8); (* (( (ptr) gf_c0840)+18) ) = (word) XR_GetTypeIndexS((word) (&string9)); (* (( (ptr) gf_c0840)+19) ) = (word) XR_GetTypeIndexS((word) (&string10)); (* (ptr) (( (bPt) gf_c0840)+80) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0840)+11) ), (word) &string11); (* (ptr) (( (bPt) gf_c0840)+84) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0840)+11) ), (word) &string12); (* (ptr) (( (bPt) gf_c0840)+88) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0840)+11) ), (word) &string13); (void) XR_DeclareGlobalFrame((word) "XlImplGC", &globalframe, (word) XR_GetTypeIndex((word) &string14, 0, (word) &string15) , (word) (( (bPt) gf_c0840)+648)/* var_c54308 */ ); var_c58404 = (word) XR_ImportInterface((word) "FinalizeOps", (word) XR_GetTypeIndexS((word) (&string16)), 7); (* (( (ptr) gf_c0840)+165)/* var_c54500 */ ) = var_c58404; (void) XR_ImportProcS(var_c58404, 67634690); (void) XR_ImportProcS(var_c58404, 67634178); var_c58404 = (word) XR_ImportInterface((word) "IO", (word) XR_GetTypeIndexS((word) (&string17)), 103); (* (( (ptr) gf_c0840)+170)/* var_c55812 */ ) = var_c58404; (void) XR_ImportProcS(var_c58404, 1053698); var_c58404 = (word) XR_ImportInterface((word) "RefText", (word) XR_GetTypeIndexS((word) (&string18)), 26); (* (( (ptr) gf_c0840)+171)/* var_c56324 */ ) = var_c58404; (void) XR_ImportProcS(var_c58404, 262913); (void) XR_ImportProcS(var_c58404, 68158980); (void) XR_ImportProcS(var_c58404, 67371521); (void) XR_ImportProcS(var_c58404, 67634946); (void) XR_ImportProcS(var_c58404, 67371009); var_c58404 = (word) XR_ImportInterface((word) "Rope", (word) XR_GetTypeIndexS((word) (&string19)), 43); (* (( (ptr) gf_c0840)+172)/* var_c57188 */ ) = var_c58404; (void) XR_ImportProcS(var_c58404, 67379457); (void) XR_ImportProcS(var_c58404, 67373569); var_c58404 = (word) XR_ImportInterface((word) &string20, (word) XR_GetTypeIndexS((word) (&string21)), 218); (* (( (ptr) gf_c0840)+169)/* var_c54980 */ ) = var_c58404; (void) XR_ImportProcS(var_c58404, 67371777); (void) XR_ImportProcS(var_c58404, 67375361); var_c58404 = (word) XR_ImportInterface((word) "XlDetails", (word) XR_GetTypeIndexS((word) (&string22)), 4); (* (( (ptr) gf_c0840)+168)/* var_c54884 */ ) = var_c58404; var_c58404 = (word) XR_ImportInterface((word) &string23, (word) XR_GetTypeIndexS((word) (&string24)), 77); (* (( (ptr) gf_c0840)+166)/* var_c54596 */ ) = var_c58404; (void) XR_ImportProcS(var_c58404, 536578); (void) XR_ImportProcS(var_c58404, 529154); (void) XR_ImportProcS(var_c58404, 1057284); (void) XR_ImportProcS(var_c58404, 1057028); (void) XR_ImportProcS(var_c58404, 539650); (void) XR_ImportProcS(var_c58404, 67385857); (void) XR_ImportProcS(var_c58404, 540418); (void) XR_ImportProcS(var_c58404, 67389953); (void) XR_ImportProcS(var_c58404, 67390209); (void) XR_ImportProcS(var_c58404, 278529); (void) XR_ImportProcS(var_c58404, 67642114); (void) XR_ImportProcS(var_c58404, 525826); (void) XR_ImportProcS(var_c58404, 67371265); (void) XR_ImportProcS(var_c58404, 272129); (void) XR_ImportProcS(var_c58404, 68166660); (void) XR_ImportProcS(var_c58404, 67649026); (void) XR_ImportProcS(var_c58404, 67648770); (void) XR_ImportProcS(var_c58404, 1051908); (void) XR_ImportProcS(var_c58404, 276481); (void) XR_ImportProcS(var_c58404, 786947); var_c58404 = (word) XR_ImportInterface((word) "XlPrivateErrorHandling", (word) XR_GetTypeIndexS((word) (&string25)), 10); (* (( (ptr) gf_c0840)+164)/* var_c54372 */ ) = var_c58404; (void) XR_ImportProcS(var_c58404, 67896579); (void) XR_ImportProcS(var_c58404, 526082); var_c58404 = (word) XR_ImportInterface((word) "XlPrivateResources", (word) XR_GetTypeIndexS((word) (&string26)), 9); (* (( (ptr) gf_c0840)+167)/* var_c54852 */ ) = var_c58404; (void) XR_ImportProcS(var_c58404, 67371521); (void) XR_ImportProcS(var_c58404, 525058); (void) XR_ImportProcS(var_c58404, 67634434); var_c58404 = (word) XR_ExportInterface((word) &string20, (word) XR_GetTypeIndexS((word) (&string21)), 218); (* (( (ptr) gf_c0840)+173)/* var_c58436 */ ) = var_c58404; (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+568)/* var_c53988 */ , 67405569, (word) "IsGContext"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+560)/* var_c53956 */ , 67405825, (word) "NarrowGContext"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+544)/* var_c53892 */ , 67668226, (word) "MakeGContext"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+440)/* var_c53476 */ , 559618, (word) "SetGCFunction"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+360)/* var_c53156 */ , 559874, (word) "SetGCPlaneMask"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+368)/* var_c53188 */ , 560130, (word) "SetGCForeground"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+384)/* var_c53252 */ , 560386, (word) "SetGCBackground"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+376)/* var_c53220 */ , 822787, (word) "SetGCGrounds"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+352)/* var_c53124 */ , 560898, (word) "SetGCLineWidth"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+344)/* var_c53092 */ , 561154, (word) "SetGCLineStyle"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+336)/* var_c53060 */ , 561410, (word) "SetGCCapStyle"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+320)/* var_c52996 */ , 561666, (word) "SetGCJoinStyle"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+432)/* var_c53444 */ , 561922, (word) "SetGCFillStyle"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+328)/* var_c53028 */ , 562178, (word) "SetGCFillRule"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+312)/* var_c52964 */ , 562434, (word) "SetGCArcMode"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+424)/* var_c53412 */ , 562690, (word) "SetGCTile"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+416)/* var_c53380 */ , 562946, (word) "SetGCStipple"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+400)/* var_c53316 */ , 825346, (word) "SetGCStippleOrigin"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+448)/* var_c53508 */ , 563458, (word) "SetGCFont"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+304)/* var_c52932 */ , 563714, (word) "SetGCSubWindowMode"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+296)/* var_c52900 */ , 563970, (word) "SetGCGraphicsExposures") ; (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+392)/* var_c53284 */ , 826370, (word) "SetGCClipMaskOrigin"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+408)/* var_c53348 */ , 564482, (word) "SetGCClipMask"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+176)/* var_c52420 */ , 1351685, (word) "SetDashes"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+168)/* var_c52388 */ , 69509384, (word) "SetClipRectangles"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+288)/* var_c52868 */ , 2925320, (word) "CopyArea"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+280)/* var_c52836 */ , 3187721, (word) "CopyPlane"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+272)/* var_c52804 */ , 2139398, (word) "FillRectangle"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+200)/* var_c52516 */ , 1877511, (word) "PolyFillRectangle"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+264)/* var_c52772 */ , 2139910, (word) "DrawLine"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+232)/* var_c52644 */ , 3450891, (word) "PutImage"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+224)/* var_c52612 */ , 404793606, (word) "GetImage"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+160)/* var_c52356 */ , 1878790, (word) "ImageChar"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+152)/* var_c52324 */ , 1879046, (word) "ImageRope"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+96)/* var_c52100 */ , 1879302, (word) "ImageString16"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+112)/* var_c52164 */ , 2141703, (word) "PolyText8"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+136)/* var_c52260 */ , 2141959, (word) "DrawChar"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+128)/* var_c52228 */ , 2142215, (word) "DrawRope"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+104)/* var_c52132 */ , 2142471, (word) "DrawString16"); (void) XR_ExportType((word) "ConnectionPrivate", (word) XR_GetTypeIndexS((word) (&string27)), (word) XR_GetTypeIndex((word) &string28, 0, (word) &string29) ); (void) XR_ExportType((word) "GContextRep", (word) XR_GetTypeIndexS((word) (&string30)), (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2) ); var_c58404 = (word) XR_ExportInterface((word) &string23, (word) XR_GetTypeIndexS((word) (&string24)), 77); (* (( (ptr) gf_c0840)+173)/* var_c58436 */ ) = var_c58404; (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+632)/* var_c54244 */ , 528130, (word) "BPut8"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+624)/* var_c54212 */ , 528386, (word) "BPut16"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+616)/* var_c54180 */ , 528642, (word) "BPut32"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+608)/* var_c54148 */ , 530178, (word) "BPutDrawable"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+600)/* var_c54116 */ , 792578, (word) "BPutPoint"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+592)/* var_c54084 */ , 792834, (word) "BPutSize"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+584)/* var_c54052 */ , 1317379, (word) "BPutRect"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+208)/* var_c52548 */ , 1058308, (word) "BPutRectangles"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+576)/* var_c54020 */ , 534786, (word) "DPutBYTE"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+464)/* var_c53572 */ , 68171524, (word) "UseGContext"); var_c58404 = (word) XR_ExportInterface((word) "XlPrivateSplit", (word) XR_GetTypeIndexS((word) (&string31)), 7); (* (( (ptr) gf_c0840)+173)/* var_c58436 */ ) = var_c58404; (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+256)/* var_c52740 */ , 262657, (word) "SetupGraphics"); var_c58404 = (word) XR_ExportInterface((word) "XlPrivateTypes", (word) XR_GetTypeIndexS((word) (&string32)), 7); (* (( (ptr) gf_c0840)+174)/* var_c58468 */ ) = var_c58404; (void) XR_ExportType((word) "GraphicsRep", (word) XR_GetTypeIndexS((word) (&string33)), (word) XR_GetTypeIndex((word) &string3, 0, (word) &string4) ); var_c58404 = (word) XR_ExportInterface((word) "XlGContextOps", (word) XR_GetTypeIndexS((word) (&string34)), 8); (* (( (ptr) gf_c0840)+173)/* var_c58436 */ ) = var_c58404; (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+528)/* var_c53828 */ , 67633154, (word) "GCID"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+456)/* var_c53540 */ , 786691, (word) "SetGContext"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+536)/* var_c53860 */ , 786947, (word) "FlushGContext"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+512)/* var_c53764 */ , 525058, (word) "InvalidateGC"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+488)/* var_c53668 */ , 525314, (word) "InvalidateGCMask"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+520)/* var_c53796 */ , 525570, (word) "ValidateGC"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+496)/* var_c53700 */ , 525826, (word) "ValidateGCMask"); (void) XR_ExportProcS(var_c58404, (word) (( (bPt) gf_c0840)+184)/* var_c52452 */ , 1312517, (word) "CopyGC"); } static void XlImplGC_P0(formal_c099, formal_c097) word formal_c099; word formal_c097; { /* XlImplGC: */ SOURCE(206, 37491) SOURCE(37668, 29) { word var_c54340; var_c54340 = (word) KeepTheOptimizerHonest_P3420(); }; } static void RaiseClientError_P60(c_v5844, what_v5872) word c_v5844; word what_v5872; { register ptr gf_c58500 = (ptr) &globalframe; /* RaiseClientError: */ SOURCE(851, 146) SOURCE(914, 33) if ((what_v5872 == 0)) { SOURCE(931, 16) what_v5872 = (* (( (ptr) gf_c58500)+22) ); }; SOURCE(949, 48) { word pd35; pd35 = (* (( (ptr) (* (( (ptr) gf_c58500)+164)/* var_c54372 */ ))+11) ); (void) ( *( (fPt) ((* (ptr) pd35 ))))(c_v5844, what_v5872, pd35); }; } static void BPut8_P120(c_v5948, b_v5976) word c_v5948; word b_v5976; { /* BPut8: */ SOURCE(1003, 59) SOURCE(1050, 12) { word c_v51992; word b_v52020; c_v51992 = c_v5948; b_v52020 = b_v5976; { word n_v30820; n_v30820 = (* (( (ptr) c_v51992)+4) ); (* (( (bPt) (* (( (ptr) c_v51992)+7) ))+n_v30820) ) = b_v52020; (* (( (ptr) c_v51992)+4) ) = (n_v30820 + 1); }; }; } static void BPut16_P180(c_v6036, b_v6064) word c_v6036; word b_v6064; { /* BPut16: */ SOURCE(1065, 63) SOURCE(1115, 13) { word c_v51120; word b_v51148; c_v51120 = c_v6036; b_v51148 = b_v6064; { word n_v31228; word p_v31260; n_v31228 = (* (( (ptr) c_v51120)+4) ); p_v31260 = (* (( (ptr) c_v51120)+7) ); (* (( (hPt) p_v31260)+((word) n_v31228 >> 1)) ) = b_v51148; (* (( (ptr) c_v51120)+4) ) = (n_v31228 + 2); }; }; } static void BPut32_P240(c_v6124, b_v6152) word c_v6124; word b_v6152; { /* BPut32: */ SOURCE(1131, 63) SOURCE(1181, 13) { word c_v49988; word b_v50016; c_v49988 = c_v6124; b_v50016 = b_v6152; { word p_v31580; word n_v31692; p_v31580 = (* (( (ptr) c_v49988)+7) ); n_v31692 = (* (( (ptr) c_v49988)+4) ); (* (( (ptr) p_v31580)+((word) n_v31692 >> 2)) ) = b_v50016; (* (( (ptr) c_v49988)+4) ) = (n_v31692 + 4); }; }; } static void BPutDrawable_P300(c_v6212, d_v6240) word c_v6212; word d_v6240; { /* BPutDrawable: */ SOURCE(1197, 74) SOURCE(1255, 16) { word c_v49856; word b_v49884; c_v49856 = c_v6212; b_v49884 = d_v6240; { word p_v49916; word n_v49944; p_v49916 = (* (( (ptr) c_v49856)+7) ); n_v49944 = (* (( (ptr) c_v49856)+4) ); (* (( (ptr) p_v49916)+((word) n_v49944 >> 2)) ) = b_v49884; (* (( (ptr) c_v49856)+4) ) = (n_v49944 + 4); }; }; } static void BPutPoint_P480(c_v6508, p_v6536) word c_v6508; W2 p_v6536; { /* BPutPoint: */ SOURCE(1482, 101) SOURCE(1535, 23) { word c_v50988; word b_v51016; c_v50988 = c_v6508; b_v51016 = ( (((unsigned)p_v6536.f0 << 16) >> 16) ); { word n_v51048; word p_v51076; n_v51048 = (* (( (ptr) c_v50988)+4) ); p_v51076 = (* (( (ptr) c_v50988)+7) ); (* (( (hPt) p_v51076)+((word) n_v51048 >> 1)) ) = b_v51016; (* (( (ptr) c_v50988)+4) ) = (n_v51048 + 2); }; }; SOURCE(1560, 23) { word c_v50856; word b_v50884; c_v50856 = c_v6508; b_v50884 = ( (((unsigned)p_v6536.f1 << 16) >> 16) ); { word n_v50916; word p_v50944; n_v50916 = (* (( (ptr) c_v50856)+4) ); p_v50944 = (* (( (ptr) c_v50856)+7) ); (* (( (hPt) p_v50944)+((word) n_v50916 >> 1)) ) = b_v50884; (* (( (ptr) c_v50856)+4) ) = (n_v50916 + 2); }; }; } static void BPutSize_P540(c_v6596, s_v6624) word c_v6596; W2 s_v6624; { /* BPutSize: */ SOURCE(1588, 108) SOURCE(1639, 27) { word c_v50724; word b_v50752; c_v50724 = c_v6596; b_v50752 = ( (((unsigned)s_v6624.f0 << 16) >> 16) ); { word n_v50784; word p_v50812; n_v50784 = (* (( (ptr) c_v50724)+4) ); p_v50812 = (* (( (ptr) c_v50724)+7) ); (* (( (hPt) p_v50812)+((word) n_v50784 >> 1)) ) = b_v50752; (* (( (ptr) c_v50724)+4) ) = (n_v50784 + 2); }; }; SOURCE(1668, 28) { word c_v50592; word b_v50620; c_v50592 = c_v6596; b_v50620 = ( (((unsigned)s_v6624.f1 << 16) >> 16) ); { word n_v50652; word p_v50680; n_v50652 = (* (( (ptr) c_v50592)+4) ); p_v50680 = (* (( (ptr) c_v50592)+7) ); (* (( (hPt) p_v50680)+((word) n_v50652 >> 1)) ) = b_v50620; (* (( (ptr) c_v50592)+4) ) = (n_v50652 + 2); }; }; } static void BPutRect_P600(c_v6684, p_v6712, s_v6740) word c_v6684; W2 p_v6712; W2 s_v6740; { /* BPutRect: */ SOURCE(1701, 168) SOURCE(1762, 23) { word c_v50460; word b_v50488; c_v50460 = c_v6684; b_v50488 = ( (((unsigned)p_v6712.f0 << 16) >> 16) ); { word n_v50520; word p_v50548; n_v50520 = (* (( (ptr) c_v50460)+4) ); p_v50548 = (* (( (ptr) c_v50460)+7) ); (* (( (hPt) p_v50548)+((word) n_v50520 >> 1)) ) = b_v50488; (* (( (ptr) c_v50460)+4) ) = (n_v50520 + 2); }; }; SOURCE(1787, 23) { word c_v50328; word b_v50356; c_v50328 = c_v6684; b_v50356 = ( (((unsigned)p_v6712.f1 << 16) >> 16) ); { word n_v50388; word p_v50416; n_v50388 = (* (( (ptr) c_v50328)+4) ); p_v50416 = (* (( (ptr) c_v50328)+7) ); (* (( (hPt) p_v50416)+((word) n_v50388 >> 1)) ) = b_v50356; (* (( (ptr) c_v50328)+4) ) = (n_v50388 + 2); }; }; SOURCE(1812, 27) { word c_v50196; word b_v50224; c_v50196 = c_v6684; b_v50224 = ( (((unsigned)s_v6740.f0 << 16) >> 16) ); { word n_v50256; word p_v50284; n_v50256 = (* (( (ptr) c_v50196)+4) ); p_v50284 = (* (( (ptr) c_v50196)+7) ); (* (( (hPt) p_v50284)+((word) n_v50256 >> 1)) ) = b_v50224; (* (( (ptr) c_v50196)+4) ) = (n_v50256 + 2); }; }; SOURCE(1841, 28) { word c_v50064; word b_v50092; c_v50064 = c_v6684; b_v50092 = ( (((unsigned)s_v6740.f1 << 16) >> 16) ); { word n_v50124; word p_v50152; n_v50124 = (* (( (ptr) c_v50064)+4) ); p_v50152 = (* (( (ptr) c_v50064)+7) ); (* (( (hPt) p_v50152)+((word) n_v50124 >> 1)) ) = b_v50092; (* (( (ptr) c_v50064)+4) ) = (n_v50124 + 2); }; }; } static void DPutBYTE_P660(c_v6800, byte_v6828) word c_v6800; word byte_v6828; { /* DPutBYTE: */ SOURCE(1874, 90) SOURCE(1929, 35) { word c_v49368; word val_v49396; c_v49368 = c_v6800; val_v49396 = byte_v6828; { word self_v33012; word char_v33076; self_v33012 = (* (( (ptr) c_v49368)+31) ); char_v33076 = val_v49396; { word i_v33124; i_v33124 = (* (( (ptr) self_v33012)+7) ); { word pd37; if ((i_v33124 < (* (( (ptr) self_v33012)+6) ))) { (* (( (ptr) self_v33012)+7) ) = (i_v33124 + 1); { word var_c54404; var_c54404 = (* (( (ptr) self_v33012)+4) ); { word limit36; (* ((( (bPt) var_c54404)+4)+( /*1*/ limit36 = (word) (unsigned) (* (( (hPt) var_c54404)+1) ), /*1*/ BCK(i_v33124, limit36) /*1*/ )) ) = char_v33076; }; }; } else { pd37 = (* (( (ptr) (* (ptr) self_v33012 ))+6) ); (void) ( *( (fPt) ((* (ptr) pd37 ))))(self_v33012, char_v33076, pd37); }; }; }; }; (* (( (ptr) c_v49368)+10) ) = ((* (( (ptr) c_v49368)+10) ) + 1); }; } static word IsGContext_P720(x_v6888) word x_v6888; { register ptr gf_c58532 = (ptr) &globalframe; word var_c6944; /* IsGContext: */ SOURCE(1970, 92) SOURCE(2026, 36) { word tc38; if ((x_v6888 == 0)) { tc38 = (word) (unsigned) 1; } else { tc38 = (word) (unsigned) ((* (( (ptr) gf_c58532)+8) ) == XR_GetReferentType(x_v6888)); }; return(tc38); }; } static word NarrowGContext_P780(x_v7004) word x_v7004; { register ptr gf_c58564 = (ptr) &globalframe; word var_c7060; /* NarrowGContext: */ SOURCE(2066, 100) SOURCE(2130, 36) return(XR_Narrow(x_v7004, (* (( (ptr) gf_c58564)+8) ))); } static word NewGContext_P840(c_v7136, drawable_v7164) word c_v7136; word drawable_v7164; { register ptr gf_c58596 = (ptr) &globalframe; word gc_v7208; word cPriv_v17284; /* NewGContext: */ SOURCE(2195, 543) SOURCE(2195, 543) gc_v7208 = 0; SOURCE(2283, 45) cPriv_v17284 = (* (( (ptr) c_v7136)+24) ); SOURCE(2330, 21) gc_v7208 = XR_NewObject(284, (* (( (ptr) gf_c58596)+8) )); SOURCE(2353, 27) (* (( (ptr) gc_v7208)+67) ) = (* (ptr) cPriv_v17284 ); SOURCE(2382, 22) (* (( (ptr) gc_v7208)+68) ) = drawable_v7164; SOURCE(2406, 23) (* (( (ptr) gc_v7208)+1) ) = 0; SOURCE(2431, 22) (* (( (ptr) gc_v7208)+2) ) = 3; SOURCE(2455, 34) (* (( (ptr) gc_v7208)+3) ) = (word) -1; SOURCE(2491, 24) (* (( (ptr) gc_v7208)+5) ) = 1; SOURCE(2517, 22) (* (( (ptr) gc_v7208)+8) ) = 1; SOURCE(2541, 21) (* (( (ptr) gc_v7208)+24) ) = 1; SOURCE(2564, 31) (* (( (ptr) gc_v7208)+18) ) = 1; SOURCE(2597, 20) (* (( (ptr) gc_v7208)+23) ) = 4; SOURCE(2619, 20) (* (W32Pt) (( (ptr) gc_v7208)+35) ) = (* (W32Pt) (( (ptr) gc_v7208)+2) ); SOURCE(2641, 26) (* (( (ptr) gc_v7208)+34) ) = (word) -1; SOURCE(2669, 31) (* (( (ptr) gc_v7208)+18) ) = 0; SOURCE(2702, 36) (* (( (ptr) gc_v7208) + 1) ) |= 32768; SOURCE(2195, 543) return(gc_v7208); } static word MakeGContext_P900(c_v7280, drawable_v7308) word c_v7280; word drawable_v7308; { register ptr gf_c58628 = (ptr) &globalframe; word gc_v7352; word cPriv_v17340; word gRef_v17368; /* MakeGContext: */ SOURCE(2744, 286) SOURCE(2744, 286) gc_v7352 = 0; SOURCE(2840, 46) cPriv_v17340 = (* (( (ptr) c_v7280)+24) ); SOURCE(2888, 45) gRef_v17368 = (* (( (ptr) cPriv_v17340)+6) ); SOURCE(2935, 29) gc_v7352 = (word) NewGContext_P840(c_v7280, drawable_v7308); SOURCE(2966, 64) { word var_c54532; word pd39; pd39 = (* (( (ptr) (* (( (ptr) gf_c58628)+165)/* var_c54500 */ ))+8) ); var_c54532 = (word) ( *( (fPt) ((* (ptr) pd39 ))))(gc_v7352, (* (( (ptr) gRef_v17368)+3) ), pd39); }; SOURCE(2744, 286) return(gc_v7352); } static void FlushGContext_P960(formal_c0951, formal_c0952, formal_c0953) word formal_c0951; word formal_c0952; word formal_c0953; { W9 var_c58660; /* declaration of gc_v7424 skipped */ /* declaration of drawable_v7452 skipped */ /* declaration of details_v7480 skipped */ register ptr gf_c58692 = (ptr) &globalframe; /* declaration of var_c54564 skipped */ (* (( (ptr) &var_c58660)+4)/* gc_v7424 */ ) = formal_c0951; (* (( (ptr) &var_c58660)+5)/* drawable_v7452 */ ) = formal_c0952; (* (( (ptr) &var_c58660)+6)/* details_v7480 */ ) = formal_c0953; /* FlushGContext: */ SOURCE(3036, 303) { word tmpAddr40; tmpAddr40 = (word) (( (ptr) &var_c58660)+7)/* var_c54564 */ ; (* (ptr) tmpAddr40 ) = ( ((word) (fPt) action_P4620) ); (* (( (ptr) tmpAddr40) + 1) ) = 1; }; SOURCE(3204, 135) if (((* (ptr) (* (( (ptr) &var_c58660)+4)/* gc_v7424 */ ) ) == 0) || ((* (( (ptr) (* (( (ptr) &var_c58660)+4)/* gc_v7424 */ ))+1) ) != 0)) { SOURCE(3253, 88) { word owner_v17540; SOURCE(3255, 29) owner_v17540 = (* (ptr) (* (( (ptr) (* (( (ptr) &var_c58660)+4)/* gc_v7424 */ ))+67) ) ); SOURCE(3286, 53) if ((owner_v17540 != 0)) { SOURCE(3304, 35) { word pd41; pd41 = (* (( (ptr) (* (( (ptr) gf_c58692)+166)/* var_c54596 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd41 ))))(owner_v17540, (word) (( (bPt) &var_c58660)+28)/* var_c54564 */ , (* (( (ptr) &var_c58660)+6) /* details_v7480 */ ), pd41); }; }; }; }; } static void action_P4620(c_v17512, formal_c58724) word c_v17512; word formal_c58724; { formal_c58724 = (formal_c58724 - 28); /* action: */ SOURCE(3127, 74) SOURCE(3159, 42) { word var_c54628; var_c54628 = (word) UseGContext_P1560(c_v17512, (* (( (ptr) formal_c58724)+5) ), (* (( (ptr) formal_c58724)+4) ), (* (( (ptr) formal_c58724)+6) )); }; } static word GCID_P1020(gc_v7552, flush_v7580) word gc_v7552; word flush_v7580; { word id_v7624; /* GCID: */ SOURCE(3348, 234) SOURCE(3415, 146) if ( ( ((* (ptr) gc_v7552 ) == 0) ? ((* (( (ptr) gc_v7552)+68) ) != 0) : 0 ) ) { SOURCE(3469, 42) (void) FlushGContext_P960(gc_v7552, 0, 0); } else { SOURCE(3511, 50) if ((0 != flush_v7580)) { SOURCE(3525, 36) (void) FlushGContext_P960(gc_v7552, 0, 0); }; }; SOURCE(3563, 19) id_v7624 = (* (ptr) gc_v7552 ); SOURCE(3348, 234) return(id_v7624); } static void ValidateGC_P1080(gc_v7684, value_v7712) word gc_v7684; word value_v7712; { W6 var_c58756; /* declaration of var_c54660 skipped */ word owner_v17612; /* ValidateGC: */ SOURCE(3586, 298) { word tmpAddr42; tmpAddr42 = (word) (( (ptr) &var_c58756)+4)/* var_c54660 */ ; (* (ptr) tmpAddr42 ) = ( ((word) (fPt) EntryValidateGC_P4728) ); (* (( (ptr) tmpAddr42) + 1) ) = 1; }; SOURCE(3770, 29) owner_v17612 = (* (ptr) (* (( (ptr) gc_v7684)+67) ) ); SOURCE(3801, 83) if ((owner_v17612 != 0)) { SOURCE(3820, 39) (void) EntryValidateGC_P4728(owner_v17612, gc_v7684, value_v7712, (word) (( (bPt) &var_c58756)+16)/* var_c54660 */ ); } else { SOURCE(3859, 25) (* (ptr) (( (ptr) (( (bPt) gc_v7684)+4)) + ((word) value_v7712 >> 5)) ) &= ~((unsigned) 1 << 32 - ((word) (value_v7712 & 037)+1) ); }; } static void EntryValidateGC_P4728(c_v17688, gc_v17716, value_v17744, formal_c58788) word c_v17688; word gc_v17716; word value_v17744; word formal_c58788; { formal_c58788 = (formal_c58788 - 16); /* EntryValidateGC: */ SOURCE(3653, 111) (void) (XR_MonitorEntry(c_v17688)); SOURCE(3739, 25) (* (ptr) (( (ptr) (( (bPt) gc_v17716)+4)) + ((word) value_v17744 >> 5)) ) &= ~((unsigned) 1 << 32 - ((word) (value_v17744 & 037)+1) ); SOURCE(3653, 111) (void) (XR_MonitorExit(c_v17688)); return; } static void InvalidateGC_P1140(gc_v7772, value_v7800) word gc_v7772; word value_v7800; { W6 var_c58820; /* declaration of var_c54692 skipped */ word owner_v17800; /* InvalidateGC: */ SOURCE(3893, 304) { word tmpAddr43; tmpAddr43 = (word) (( (ptr) &var_c58820)+4)/* var_c54692 */ ; (* (ptr) tmpAddr43 ) = ( ((word) (fPt) EntryInvalidateGC_P4788) ); (* (( (ptr) tmpAddr43) + 1) ) = 1; }; SOURCE(4080, 29) owner_v17800 = (* (ptr) (* (( (ptr) gc_v7772)+67) ) ); SOURCE(4111, 86) if ((owner_v17800 != 0)) { SOURCE(4130, 42) (void) EntryInvalidateGC_P4788(owner_v17800, gc_v7772, value_v7800, (word) (( (bPt) &var_c58820)+16)/* var_c54692 */ ); } else { SOURCE(4172, 25) (* (ptr) (( (ptr) (( (bPt) gc_v7772)+4)) + ((word) value_v7800 >> 5)) ) |= ((unsigned) 1 << 32 - ((word) (value_v7800 & 037)+1) ); }; } static void EntryInvalidateGC_P4788(c_v17876, gc_v17904, value_v17932, formal_c58852) word c_v17876; word gc_v17904; word value_v17932; word formal_c58852; { formal_c58852 = (formal_c58852 - 16); /* EntryInvalidateGC: */ SOURCE(3962, 112) (void) (XR_MonitorEntry(c_v17876)); SOURCE(4050, 24) (* (ptr) (( (ptr) (( (bPt) gc_v17904)+4)) + ((word) value_v17932 >> 5)) ) |= ((unsigned) 1 << 32 - ((word) (value_v17932 & 037)+1) ); SOURCE(3962, 112) (void) (XR_MonitorExit(c_v17876)); return; } static void SetMaskBits_P1200(gc_v7860, mask_v7888, val_v7916) word gc_v7860; word mask_v7888; word val_v7916; { /* SetMaskBits: */ SOURCE(4202, 148) SOURCE(4269, 81) { register word i_v17960 = 0; lab_L100003: ; SOURCE(4315, 35) if (((word) mask_v7888 >> (31 - (word) i_v17960)) & 1) { SOURCE(4331, 19) { word x44; word sh45; x44 = (word) (( (ptr) (( (bPt) gc_v7860)+4)) + ((word) i_v17960 >> 5)); sh45 = 32 - ((word) (i_v17960 & 037)+1); (* (ptr) x44 ) = ((* (ptr) x44 ) & ( ~ ((unsigned) 1 << sh45))) | (((val_v7916 & 1)) << sh45); }; }; if ((i_v17960 >= 22)) { goto lab_L100000; }; i_v17960 = (i_v17960 + 1); goto lab_L100003; lab_L100000: ; }; } static void ValidateGCMask_P1260(gc_v7976, mask_v8004) word gc_v7976; word mask_v8004; { W6 var_c58884; /* declaration of var_c54724 skipped */ word owner_v18032; /* ValidateGCMask: */ SOURCE(4365, 277) { word tmpAddr46; tmpAddr46 = (word) (( (ptr) &var_c58884)+4)/* var_c54724 */ ; (* (ptr) tmpAddr46 ) = ( ((word) (fPt) Entry_P4896) ); (* (( (ptr) tmpAddr46) + 1) ) = 1; }; SOURCE(4536, 29) owner_v18032 = (* (ptr) (* (( (ptr) gc_v7976)+67) ) ); SOURCE(4567, 75) if ((owner_v18032 != 0)) { SOURCE(4586, 28) (void) Entry_P4896(owner_v18032, gc_v7976, mask_v8004, (word) (( (bPt) &var_c58884)+16)/* var_c54724 */ ); } else { SOURCE(4614, 28) (void) SetMaskBits_P1200(gc_v7976, mask_v8004, 0); }; } static void Entry_P4896(c_v18108, gc_v18136, mask_v18164, formal_c58916) word c_v18108; word gc_v18136; word mask_v18164; word formal_c58916; { formal_c58916 = (formal_c58916 - 16); /* Entry: */ SOURCE(4431, 99) (void) (XR_MonitorEntry(c_v18108)); SOURCE(4502, 28) (void) SetMaskBits_P1200(gc_v18136, mask_v18164, 0); SOURCE(4431, 99) (void) (XR_MonitorExit(c_v18108)); return; } static void InvalidateGCMask_P1320(gc_v8064, mask_v8092) word gc_v8064; word mask_v8092; { W6 var_c58948; /* declaration of var_c54756 skipped */ word owner_v18220; /* InvalidateGCMask: */ SOURCE(4649, 289) { word tmpAddr47; tmpAddr47 = (word) (( (ptr) &var_c58948)+4)/* var_c54756 */ ; (* (ptr) tmpAddr47 ) = ( ((word) (fPt) Entry_P4956) ); (* (( (ptr) tmpAddr47) + 1) ) = 1; }; SOURCE(4833, 29) owner_v18220 = (* (ptr) (* (( (ptr) gc_v8064)+67) ) ); SOURCE(4864, 74) if ((owner_v18220 != 0)) { SOURCE(4883, 28) (void) Entry_P4956(owner_v18220, gc_v8064, mask_v8092, (word) (( (bPt) &var_c58948)+16)/* var_c54756 */ ); } else { SOURCE(4911, 27) (void) SetMaskBits_P1200(gc_v8064, mask_v8092, 1); }; } static void Entry_P4956(c_v18296, gc_v18324, mask_v18352, formal_c58980) word c_v18296; word gc_v18324; word mask_v18352; word formal_c58980; { formal_c58980 = (formal_c58980 - 16); /* Entry: */ SOURCE(4729, 98) (void) (XR_MonitorEntry(c_v18296)); SOURCE(4800, 27) (void) SetMaskBits_P1200(gc_v18324, mask_v18352, 1); SOURCE(4729, 98) (void) (XR_MonitorExit(c_v18296)); return; } static word NestedEntryUseGContext_P1380(c_v8152, formal_c0954, formal_c0955, formal_c0956) word c_v8152; word formal_c0954; word formal_c0955; word formal_c0956; { W10 var_c59012; /* declaration of drawable_v8180 skipped */ /* declaration of gc_v8208 skipped */ /* declaration of partialDetails_v8236 skipped */ register ptr gf_c59044 = (ptr) &globalframe; /* declaration of id_v8280 skipped */ /* declaration of var_c54788 skipped */ (* (( (ptr) &var_c59012)+4)/* drawable_v8180 */ ) = formal_c0954; (* (( (ptr) &var_c59012)+5)/* gc_v8208 */ ) = formal_c0955; (* (( (ptr) &var_c59012)+6)/* partialDetails_v8236 */ ) = formal_c0956; /* NestedEntryUseGContext: */ SOURCE(4944, 340) { word tmpAddr48; tmpAddr48 = (word) (( (ptr) &var_c59012)+8)/* var_c54788 */ ; (* (ptr) tmpAddr48 ) = ( ((word) (fPt) action_P5016) ); (* (( (ptr) tmpAddr48) + 1) ) = 1; }; SOURCE(4944, 340) (* (( (ptr) &var_c59012)+7)/* id_v8280 */ ) = 0; SOURCE(5246, 38) { word pd49; pd49 = (* (( (ptr) (* (( (ptr) gf_c59044)+166)/* var_c54596 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd49 ))))(c_v8152, (word) (( (bPt) &var_c59012)+32)/* var_c54788 */ , (* (( (ptr) &var_c59012)+6) /* partialDetails_v8236 */ ), pd49); }; SOURCE(4944, 340) return((* (( (ptr) &var_c59012)+7)/* id_v8280 */ )); } static void action_P5016(c_v18456, formal_c59108) word c_v18456; word formal_c59108; { register ptr gf_c59076 = (ptr) &globalframe; formal_c59108 = (formal_c59108 - 32); /* action: */ SOURCE(5085, 104) SOURCE(5118, 49) (* (( (ptr) formal_c59108)+7) ) = (word) UseGContext_P1560(c_v18456, (* (( (ptr) formal_c59108)+4) ), (* (( (ptr) formal_c59108)+5) ), (* (( (ptr) formal_c59108)+6) )); SOURCE(5169, 20) { word pd50; pd50 = (* (( (ptr) (* (( (ptr) gf_c59076)+166)/* var_c54596 */ ))+60) ); (void) ( *( (fPt) ((* (ptr) pd50 ))))(c_v18456, pd50); }; } static void FinalizeGC_P1500(handle_v30212, object_v30240) word handle_v30212; word object_v30240; { W8 var_c59140; register ptr gf_c59172 = (ptr) &globalframe; /* declaration of var_c54820 skipped */ word gc_v18512; /* declaration of c_v18540 skipped */ /* FinalizeGC: */ SOURCE(5445, 483) { word tmpAddr51; tmpAddr51 = (word) (( (ptr) &var_c59140)+4)/* var_c54820 */ ; (* (ptr) tmpAddr51 ) = ( ((word) (fPt) FreeGC_P5076) ); (* (( (ptr) tmpAddr51) + 1) ) = 1; }; SOURCE(5810, 36) gc_v18512 = XR_Narrow(object_v30240, (* (( (ptr) gf_c59172)+8) )); SOURCE(5848, 25) var_c59140.f6/* c_v18540 */ = (* (ptr) (* (( (ptr) gc_v18512)+67) ) ); SOURCE(5875, 53) if ( ( (var_c59140.f6/* c_v18540 */ != 0) ? (0 != (* (( (ptr) var_c59140.f6/* c_v18540 */ )+15) )) : 0 ) ) { SOURCE(5895, 33) SOURCE(5895, 33) { /* declaration of var_c01 skipped */ var_c59140.f7/* var_c01 */ = (* (ptr) gc_v18512 ); { word var_c02; { word var_c0912; var_c0912 = (word) &var_c59140; var_c02 = (word) XR_Enable(( ((word) (fPt) NoName_Q11820) ), ( ((word) (fPt) NoName_Q12360) ), var_c0912); }; /* removed trivial cond node */ }; }; }; } static word NoName_Q11820(formal_c0856) word formal_c0856; { SOURCE(5895, 33) (void) FreeGC_P5076((* (( (ptr) formal_c0856)+6) ), (* (( (ptr) formal_c0856)+7) ), (word) (( (bPt) formal_c0856)+16)); return(0); } static void FreeGC_P5076(formal_c0957, formal_c0958, formal_c59236) word formal_c0957; word formal_c0958; word formal_c59236; { W6 var_c59204; /* declaration of c_v18616 skipped */ /* declaration of gcid_v18644 skipped */ formal_c59236 = (formal_c59236 - 16); var_c59204.f4/* c_v18616 */ = formal_c0957; var_c59204.f5/* gcid_v18644 */ = formal_c0958; var_c59204.f0 = formal_c59236; /* FreeGC: */ SOURCE(5486, 315) (void) (XR_MonitorEntry(var_c59204.f4/* c_v18616 */ )); SOURCE(5535, 266) { word var_c0913; var_c0913 = (word) &var_c59204; (void) (word) XR_Enable(( ((word) (fPt) NoName_Q11880) ), ( ((word) (fPt) NoName_Q12300) ), var_c0913); }; SOURCE(5486, 315) (void) (XR_MonitorExit(var_c59204.f4/* c_v18616 */ )); return; } static word NoName_Q11880(formal_c0859) word formal_c0859; { register ptr gf_c0858 = (ptr) &globalframe; SOURCE(5572, 229) { word tc52; word pd53; if ( ( ((* (( (ptr) formal_c0859)+5) ) != 0) ? ( ((* (( (ptr) formal_c0859)+4) ) != 0) ? (0 != (* (( (ptr) (* (( (ptr) formal_c0859)+4) ))+15) )) : 0 ) : 0 ) ) { pd53 = (* (( (ptr) (* (( (ptr) gf_c0858)+167)/* var_c54852 */ ))+9) ); tc52 = (word) (0 != (word) ( *( (fPt) ((* (ptr) pd53 ))))((* (( (ptr) formal_c0859)+4) ), (* (( (ptr) formal_c0859)+5) ), pd53) ); } else { tc52 = (word) 0; }; if (tc52) { SOURCE(5645, 18) { word pd54; pd54 = (* (( (ptr) (* (( (ptr) gf_c0858)+166)/* var_c54596 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd54 ))))((* (( (ptr) formal_c0859)+4) ), 60, 0, 2, pd54); }; SOURCE(5665, 15) (void) BPut32_P240((* (( (ptr) formal_c0859)+4) ), (* (( (ptr) formal_c0859)+5) )); SOURCE(5682, 67) { word var_c54916; word pd55; pd55 = (* (( (ptr) (* (( (ptr) gf_c0858)+166)/* var_c54596 */ ))+65) ); var_c54916 = (word) ( *( (fPt) ((* (ptr) pd55 ))))((* (( (ptr) formal_c0859)+4) ), (* (ptr) (* (( (ptr) (* (( (ptr) gf_c0858)+168) /* var_c54884 */ ))+5) ) ), pd55); }; SOURCE(5751, 50) { word pd56; pd56 = (* (( (ptr) (* (( (ptr) gf_c0858)+167)/* var_c54852 */ ))+7) ); (void) ( *( (fPt) ((* (ptr) pd56 ))))((* (( (ptr) formal_c0859)+4) ), (* (( (ptr) formal_c0859)+5) ), pd56); }; }; }; return(0); } static word UseGContext_P1560(c_v8456, formal_c0959, formal_c0960, formal_c0961) word c_v8456; word formal_c0959; word formal_c0960; word formal_c0961; { W10 var_c59268; /* declaration of drawable_v8484 skipped */ /* declaration of gc_v8512 skipped */ /* declaration of partialDetails_v8540 skipped */ register ptr gf_c59300 = (ptr) &globalframe; word id_v8596; (* (( (ptr) &var_c59268)+4)/* drawable_v8484 */ ) = formal_c0959; (* (( (ptr) &var_c59268)+5)/* gc_v8512 */ ) = formal_c0960; (* (( (ptr) &var_c59268)+6)/* partialDetails_v8540 */ ) = formal_c0961; /* UseGContext: */ SOURCE(5943, 1483) SOURCE(5943, 1483) id_v8596 = 0; SOURCE(6090, 1336) SOURCE(6092, 46) if (((* (( (ptr) &var_c59268)+5)/* gc_v8512 */ ) == 0)) { SOURCE(6109, 29) (* (( (ptr) &var_c59268)+5)/* gc_v8512 */ ) = (word) NewGContext_P840(c_v8456, (* (( (ptr) &var_c59268)+4)/* drawable_v8484 */ )) ; }; SOURCE(6143, 18) id_v8596 = (* (ptr) (* (( (ptr) &var_c59268)+5)/* gc_v8512 */ ) ); SOURCE(6163, 1233) if ((id_v8596 == 0) || ((* (( (ptr) (* (( (ptr) &var_c59268)+5)/* gc_v8512 */ ))+1) ) != 0)) { SOURCE(6201, 1197) { /* declaration of owner_v18684 skipped */ word safeChanged_v18712; word safeChanged2_v18740; word n_v18768 = 0; word bitmask_v18796 = 0; word create_v18824; SOURCE(6203, 29) (* (( (ptr) &var_c59268)+7)/* owner_v18684 */ ) = (* (ptr) (* (( (ptr) (* (( (ptr) &var_c59268)+5)/* gc_v8512 */ ))+67) ) ); SOURCE(6235, 37) safeChanged_v18712 = (* (( (ptr) (* (( (ptr) &var_c59268)+5)/* gc_v8512 */ ))+1) ); SOURCE(6274, 39) safeChanged2_v18740 = safeChanged_v18712; SOURCE(6348, 19) create_v18824 = (unsigned) (id_v8596 == 0); SOURCE(6369, 24) if (((* (( (ptr) &var_c59268)+7)/* owner_v18684 */ ) == 0)) { SOURCE(6387, 6) return(id_v8596); }; SOURCE(6395, 47) { W2 var_c54948; (void) CountAndSetMaskBits_P3840((word) &var_c54948, safeChanged_v18712); { word idx57; n_v18768 = ( idx57 = (word) var_c54948.f1, SGNCK(idx57) ); }; bitmask_v18796 = var_c54948.f0; }; SOURCE(6444, 535) if ((0 != create_v18824)) { SOURCE(6462, 124) if (((* (( (ptr) &var_c59268)+4)/* drawable_v8484 */ ) == 0)) { SOURCE(6494, 22) (* (( (ptr) &var_c59268)+4)/* drawable_v8484 */ ) = (* (( (ptr) (* (( (ptr) &var_c59268)+5)/* gc_v8512 */ ))+68) ); SOURCE(6518, 68) if (((* (( (ptr) &var_c59268)+4)/* drawable_v8484 */ ) == 0)) { SOURCE(6548, 38) { word pd58; pd58 = (* (( (ptr) (* (( (ptr) gf_c59300)+169)/* var_c54980 */ ))+21) ); (* (( (ptr) &var_c59268)+4)/* drawable_v8484 */ ) = (word) ( *( (fPt) ((* (ptr) pd58 ))))((* ((( (ptr) &var_c59268)+7)/* owner_v18684 */ ) ), pd58) ; }; }; }; SOURCE(6591, 134) if ((c_v8456 != (* (( (ptr) &var_c59268)+7)/* owner_v18684 */ ))) { SOURCE(6626, 74) { /* declaration of var_c03 skipped */ { word var_c04; { word var_c0914; var_c0914 = (word) &var_c59268; var_c04 = (word) XR_Enable(( ((word) (fPt) NoName_Q12000) ), ( ((word) (fPt) NoName_Q12240) ), var_c0914); }; if ((var_c04 == 3)) { goto lab_L100010; }; }; id_v8596 = (* (( (ptr) &var_c59268)+8)/* var_c03 */ ); }; SOURCE(6714, 11) return(id_v8596); }; SOURCE(6730, 71) { word var_c55012; { /* declaration of var_c05 skipped */ (* (( (ptr) &var_c59268)+8)/* var_c05 */ ) = (* (( (ptr) (* (( (ptr) gf_c59300)+167)/* var_c54852 */ ))+6) ); { /* declaration of var_c06 skipped */ { word var_c07; { word var_c0915; var_c0915 = (word) &var_c59268; var_c07 = (word) XR_Enable(( ((word) (fPt) NoName_Q11940) ), ( ((word) (fPt) NoName_Q12180) ), var_c0915); }; if ((var_c07 == 3)) { goto lab_L100010; }; }; var_c55012 = (* (( (ptr) &var_c59268)+9)/* var_c06 */ ); }; }; (* (ptr) (* (( (ptr) &var_c59268)+5)/* gc_v8512 */ ) ) = var_c55012; id_v8596 = var_c55012; }; SOURCE(6846, 32) { word pd59; pd59 = (* (( (ptr) (* (( (ptr) gf_c59300)+166)/* var_c54596 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd59 ))))(c_v8456, 55, 0, SGNCK((n_v18768 + 4)), pd59); }; SOURCE(6880, 13) (void) BPut32_P240(c_v8456, id_v8596); SOURCE(6895, 25) (void) BPutDrawable_P300(c_v8456, (* (( (ptr) &var_c59268)+4)/* drawable_v8484 */ )); } else { SOURCE(6931, 32) { word pd60; pd60 = (* (( (ptr) (* (( (ptr) gf_c59300)+166)/* var_c54596 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd60 ))))(c_v8456, 56, 0, SGNCK((n_v18768 + 3)), pd60); }; SOURCE(6965, 14) { word c_v49724; word b_v49752; c_v49724 = c_v8456; b_v49752 = id_v8596; { word p_v49784; word n_v49812; p_v49784 = (* (( (ptr) c_v49724)+7) ); n_v49812 = (* (( (ptr) c_v49724)+4) ); (* (( (ptr) p_v49784)+((word) n_v49812 >> 2)) ) = b_v49752; (* (( (ptr) c_v49724)+4) ) = (n_v49812 + 4); }; }; }; SOURCE(6984, 19) { word c_v49592; word b_v49620; c_v49592 = c_v8456; b_v49620 = bitmask_v18796; { word p_v49652; word n_v49680; p_v49652 = (* (( (ptr) c_v49592)+7) ); n_v49680 = (* (( (ptr) c_v49592)+4) ); (* (( (ptr) p_v49652)+((word) n_v49680 >> 2)) ) = b_v49620; (* (( (ptr) c_v49592)+4) ) = (n_v49680 + 4); }; }; SOURCE(7005, 202) { register word key_v18868 = 0; lab_L100018: ; if ((safeChanged_v18712 != 0)) { } else { goto lab_L100015; }; SOURCE(7082, 125) if (((word) safeChanged_v18712 >> (31 - (word) key_v18868)) & 1) { SOURCE(7110, 42) { word c_v49460; word b_v49488; c_v49460 = c_v8456; b_v49488 = (* ((( (ptr) (* (( (ptr) &var_c59268)+5)/* gc_v8512 */ ))+2)+key_v18868) ); (* ((( (ptr) (* (( (ptr) &var_c59268)+5)/* gc_v8512 */ ))+35)+key_v18868) ) = b_v49488; { word p_v49520; word n_v49548; p_v49520 = (* (( (ptr) c_v49460)+7) ); n_v49548 = (* (( (ptr) c_v49460)+4) ); (* (( (ptr) p_v49520)+((word) n_v49548 >> 2)) ) = b_v49488; (* (( (ptr) c_v49460)+4) ) = (n_v49548 + 4); }; }; SOURCE(7155, 24) (* (ptr) &safeChanged_v18712 ) &= ~((unsigned) 1 << 32 - ((word) key_v18868+1)); SOURCE(7181, 26) (* (ptr) (( (ptr) (( (bPt) (* (( (ptr) &var_c59268)+5)/* gc_v8512 */ ))+136)) + ((word) key_v18868 >> 5)) ) |= ((unsigned) 1 << 32 - ( (word) (key_v18868 & 037)+1)); }; if ((key_v18868 >= 22)) { goto lab_L100015; }; key_v18868 = (key_v18868 + 1); goto lab_L100018; lab_L100015: ; }; SOURCE(7221, 92) if ((((unsigned)safeChanged2_v18740 << 14) >> 31)) { SOURCE(7249, 64) (* (( (ptr) (* (( (ptr) &var_c59268)+5)/* gc_v8512 */ ))+70) ) = (* (( (ptr) (* (( (ptr) &var_c59268)+5)/* gc_v8512 */ ))+69) ); }; SOURCE(7315, 23) (* (( (ptr) (* (( (ptr) &var_c59268)+5)/* gc_v8512 */ ))+1) ) = 0; SOURCE(7340, 56) { word var_c55076; word pd61; pd61 = (* (( (ptr) (* (( (ptr) gf_c59300)+166)/* var_c54596 */ ))+66) ); var_c55076 = (word) ( *( (fPt) ((* (ptr) pd61 ))))(c_v8456, (* (( (ptr) &var_c59268)+6)/* partialDetails_v8540 */ ), pd61) ; }; }; }; goto lab_L100019; lab_L100010: ; SOURCE(7415, 11) return(0); lab_L100019: ; SOURCE(5943, 1483) return(id_v8596); } static word NoName_Q11940(formal_c0861) word formal_c0861; { SOURCE(6730, 71) { word pd62; pd62 = (* (( (ptr) formal_c0861)+8) ); (* (( (ptr) formal_c0861)+9) ) = (word) ( *( (fPt) ((* (ptr) pd62 ))))((* ((( (ptr) formal_c0861)+7)) ), pd62); }; return(0); } static word NoName_Q12000(formal_c0862) word formal_c0862; { SOURCE(6626, 74) (* (( (ptr) formal_c0862)+8) ) = (word) NestedEntryUseGContext_P1380((* (( (ptr) formal_c0862)+7) ), (* (( (ptr) formal_c0862)+4) ), (* (( (ptr) formal_c0862)+5) ), (* (( (ptr) formal_c0862)+6) )); return(0); } static void SetGContext_P1680(gc_v8772, key_v8800, value_v8828) word gc_v8772; word key_v8800; word value_v8828; { /* SetGContext: */ SOURCE(7674, 110) SOURCE(7755, 29) { word gc_v48280; word key_v48308; word value_v48336; gc_v48280 = gc_v8772; key_v48308 = key_v8800; value_v48336 = value_v8828; SOURCE(7512, 21) (* ((( (ptr) gc_v48280)+2)+key_v48308) ) = value_v48336; SOURCE(7536, 132) if (((* ((( (ptr) gc_v48280)+35)+key_v48308) ) != value_v48336)) { goto then063;}; if ((( ! (((* (ptr) (( (ptr) (( (bPt) gc_v48280)+136)) + ((word) key_v48308 >> 5)) ) >> (31 - ((word) (key_v48308 & 037)))) & 1) || (key_v48308 == 11)) || (key_v48308 == 10)) || ( (key_v48308 == 19) ? (value_v48336 != 0) : 0 ) ) { then063: ; SOURCE(7646, 22) (* (ptr) (( (ptr) (( (bPt) gc_v48280)+4)) + ((word) key_v48308 >> 5)) ) |= ((unsigned) 1 << 32 - ((word) (key_v48308 & 037)+1) ); }; }; } static void SetGCFont_P1800(gc_v9004, font_v9032) word gc_v9004; word font_v9032; { register ptr gf_c59332 = (ptr) &globalframe; /* SetGCFont: */ SOURCE(8125, 84) SOURCE(8179, 30) { word gc_v48560; word font_v48588; gc_v48560 = gc_v9004; font_v48588 = font_v9032; { word id_v18912; { word pd64; pd64 = (* (( (ptr) (* (( (ptr) gf_c59332)+169)/* var_c54980 */ ))+7) ); id_v18912 = (word) ( *( (fPt) ((* (ptr) pd64 ))))(font_v48588, pd64); }; SOURCE(7891, 13) if ((id_v18912 == 0)) { SOURCE(7904, 5) (void) XR_RaiseUnnamedError(); }; SOURCE(7911, 26) { word gc_v48204; word value_v48232; gc_v48204 = gc_v48560; value_v48232 = id_v18912; SOURCE(7512, 21) (* (( (ptr) gc_v48204)+16) ) = value_v48232; SOURCE(7536, 132) if (((* (( (ptr) gc_v48204)+49) ) != value_v48232) || ! ((* (( (bPt) gc_v48204)+137) ) & 02)) { SOURCE(7646, 22) (* (( (ptr) gc_v48204) + 1) ) |= 131072; }; }; SOURCE(7939, 37) (* (( (ptr) gc_v48560)+69) ) = font_v48588; }; }; } static void SetGCFunction_P1860(gc_v9092, function_v9120) word gc_v9092; word function_v9120; { /* SetGCFunction: */ SOURCE(8216, 125) SOURCE(8284, 57) { word gc_v48128; word value_v48156; gc_v48128 = gc_v9092; value_v48156 = function_v9120; SOURCE(7512, 21) (* (( (ptr) gc_v48128)+2) ) = value_v48156; SOURCE(7536, 132) if (((* (( (ptr) gc_v48128)+35) ) != value_v48156) || ! (*((int*)gc_v48128 + 34)<0)) { SOURCE(7646, 22) (* (( (ptr) gc_v48128) + 1) ) |= 2147483648; }; }; } static void SetGCFillStyle_P1920(gc_v9180, fillStyle_v9208) word gc_v9180; word fillStyle_v9208; { /* SetGCFillStyle: */ SOURCE(8347, 130) SOURCE(8418, 59) { word gc_v48052; word value_v48080; gc_v48052 = gc_v9180; value_v48080 = fillStyle_v9208; SOURCE(7512, 21) (* (( (ptr) gc_v48052)+10) ) = value_v48080; SOURCE(7536, 132) if (((* (( (ptr) gc_v48052)+43) ) != value_v48080) || ! ((* (( (bPt) gc_v48052)+137) ) & 0200)) { SOURCE(7646, 22) (* (( (ptr) gc_v48052) + 1) ) |= 8388608; }; }; } static void SetGCTile_P1980(gc_v9268, tile_v9296) word gc_v9268; word tile_v9296; { /* SetGCTile: */ SOURCE(8483, 110) SOURCE(8539, 54) { word gc_v47976; word value_v48004; gc_v47976 = gc_v9268; value_v48004 = tile_v9296; SOURCE(7512, 21) (* (( (ptr) gc_v47976)+12) ) = value_v48004; SOURCE(7536, 132) if ((((* (( (ptr) gc_v47976)+45) ) != value_v48004) || ! ((* (( (bPt) gc_v47976)+137) ) & 040)) || 1) { SOURCE(7646, 22) (* (( (ptr) gc_v47976) + 1) ) |= 2097152; }; }; } static void SetGCStipple_P2040(gc_v9356, stipple_v9384) word gc_v9356; word stipple_v9384; { /* SetGCStipple: */ SOURCE(8599, 122) SOURCE(8661, 60) { word gc_v47900; word value_v47928; gc_v47900 = gc_v9356; value_v47928 = stipple_v9384; SOURCE(7512, 21) (* (( (ptr) gc_v47900)+13) ) = value_v47928; SOURCE(7536, 132) if ((((* (( (ptr) gc_v47900)+46) ) != value_v47928) || ! ((* (( (bPt) gc_v47900)+137) ) & 020)) || 1) { SOURCE(7646, 22) (* (( (ptr) gc_v47900) + 1) ) |= 1048576; }; }; } static void SetGCClipMask_P2100(gc_v9444, clipMask_v9472) word gc_v9444; word clipMask_v9472; { /* SetGCClipMask: */ SOURCE(8727, 139) SOURCE(8804, 62) { word gc_v47824; word value_v47852; gc_v47824 = gc_v9444; value_v47852 = clipMask_v9472; SOURCE(7512, 21) (* (( (ptr) gc_v47824)+21) ) = value_v47852; SOURCE(7536, 132) if ((((* (( (ptr) gc_v47824)+54) ) != value_v47852) || ! ((* (( (bPt) gc_v47824)+138) ) & 020)) || (value_v47852 != 0)) { SOURCE(7646, 22) (* (( (ptr) gc_v47824) + 1) ) |= 4096; }; }; } static void SetGCStippleOrigin_P2160(gc_v9532, origin_v9560) word gc_v9532; W2 origin_v9560; { word cardX_v18940; word cardY_v18968; /* SetGCStippleOrigin: */ SOURCE(8872, 258) SOURCE(8938, 34) cardX_v18940 = origin_v9560.f0; SOURCE(8974, 34) cardY_v18968 = origin_v9560.f1; SOURCE(9010, 59) { word gc_v47748; word value_v47776; gc_v47748 = gc_v9532; value_v47776 = cardX_v18940; SOURCE(7512, 21) (* (( (ptr) gc_v47748)+14) ) = value_v47776; SOURCE(7536, 132) if (((* (( (ptr) gc_v47748)+47) ) != value_v47776) || ! ((* (( (bPt) gc_v47748)+137) ) & 010)) { SOURCE(7646, 22) (* (( (ptr) gc_v47748) + 1) ) |= 524288; }; }; SOURCE(9071, 59) { word gc_v47672; word value_v47700; gc_v47672 = gc_v9532; value_v47700 = cardY_v18968; SOURCE(7512, 21) (* (( (ptr) gc_v47672)+15) ) = value_v47700; SOURCE(7536, 132) if (((* (( (ptr) gc_v47672)+48) ) != value_v47700) || ! ((* (( (bPt) gc_v47672)+137) ) & 04)) { SOURCE(7646, 22) (* (( (ptr) gc_v47672) + 1) ) |= 262144; }; }; } static void SetGCClipMaskOrigin_P2220(gc_v9620, origin_v9648) word gc_v9620; W2 origin_v9648; { word cardX_v19012; word cardY_v19040; /* SetGCClipMaskOrigin: */ SOURCE(9136, 245) SOURCE(9203, 34) cardX_v19012 = origin_v9648.f0; SOURCE(9239, 34) cardY_v19040 = origin_v9648.f1; SOURCE(9275, 52) { word gc_v47596; word value_v47624; gc_v47596 = gc_v9620; value_v47624 = cardX_v19012; SOURCE(7512, 21) (* (( (ptr) gc_v47596)+19) ) = value_v47624; SOURCE(7536, 132) if (((* (( (ptr) gc_v47596)+52) ) != value_v47624) || ! ((* (( (bPt) gc_v47596)+138) ) & 0100)) { SOURCE(7646, 22) (* (( (ptr) gc_v47596) + 1) ) |= 16384; }; }; SOURCE(9329, 52) { word gc_v47520; word value_v47548; gc_v47520 = gc_v9620; value_v47548 = cardY_v19040; SOURCE(7512, 21) (* (( (ptr) gc_v47520)+20) ) = value_v47548; SOURCE(7536, 132) if (((* (( (ptr) gc_v47520)+53) ) != value_v47548) || ! ((* (( (bPt) gc_v47520)+138) ) & 040)) { SOURCE(7646, 22) (* (( (ptr) gc_v47520) + 1) ) |= 8192; }; }; } static void SetGCBackground_P2280(gc_v9708, background_v9736) word gc_v9708; word background_v9736; { /* SetGCBackground: */ SOURCE(9387, 124) SOURCE(9455, 56) { word gc_v47444; word value_v47472; gc_v47444 = gc_v9708; value_v47472 = background_v9736; SOURCE(7512, 21) (* (( (ptr) gc_v47444)+5) ) = value_v47472; SOURCE(7536, 132) if (((* (( (ptr) gc_v47444)+38) ) != value_v47472) || ! ((* (( (bPt) gc_v47444)+136) ) & 020)) { SOURCE(7646, 22) (* (( (ptr) gc_v47444) + 1) ) |= 268435456; }; }; } static void SetGCGrounds_P2340(gc_v9796, foreground_v9824, background_v9852) word gc_v9796; word foreground_v9824; word background_v9852; { /* SetGCGrounds: */ SOURCE(9517, 191) SOURCE(9594, 56) { word gc_v47368; word value_v47396; gc_v47368 = gc_v9796; value_v47396 = background_v9852; SOURCE(7512, 21) (* (( (ptr) gc_v47368)+5) ) = value_v47396; SOURCE(7536, 132) if (((* (( (ptr) gc_v47368)+38) ) != value_v47396) || ! ((* (( (bPt) gc_v47368)+136) ) & 020)) { SOURCE(7646, 22) (* (( (ptr) gc_v47368) + 1) ) |= 268435456; }; }; SOURCE(9652, 56) { word gc_v47292; word value_v47320; gc_v47292 = gc_v9796; value_v47320 = foreground_v9824; SOURCE(7512, 21) (* (( (ptr) gc_v47292)+4) ) = value_v47320; SOURCE(7536, 132) if (((* (( (ptr) gc_v47292)+37) ) != value_v47320) || ! ((* (( (bPt) gc_v47292)+136) ) & 040)) { SOURCE(7646, 22) (* (( (ptr) gc_v47292) + 1) ) |= 536870912; }; }; } static void SetGCForeground_P2400(gc_v9912, foreground_v9940) word gc_v9912; word foreground_v9940; { /* SetGCForeground: */ SOURCE(9714, 124) SOURCE(9782, 56) { word gc_v47216; word value_v47244; gc_v47216 = gc_v9912; value_v47244 = foreground_v9940; SOURCE(7512, 21) (* (( (ptr) gc_v47216)+4) ) = value_v47244; SOURCE(7536, 132) if (((* (( (ptr) gc_v47216)+37) ) != value_v47244) || ! ((* (( (bPt) gc_v47216)+136) ) & 040)) { SOURCE(7646, 22) (* (( (ptr) gc_v47216) + 1) ) |= 536870912; }; }; } static void SetGCPlaneMask_P2460(gc_v10000, planeMask_v10028) word gc_v10000; word planeMask_v10028; { /* SetGCPlaneMask: */ SOURCE(9844, 120) SOURCE(9910, 54) { word gc_v47140; word value_v47168; gc_v47140 = gc_v10000; value_v47168 = planeMask_v10028; SOURCE(7512, 21) (* (( (ptr) gc_v47140)+3) ) = value_v47168; SOURCE(7536, 132) if (((* (( (ptr) gc_v47140)+36) ) != value_v47168) || ! ((* (( (bPt) gc_v47140)+136) ) & 0100)) { SOURCE(7646, 22) (* (( (ptr) gc_v47140) + 1) ) |= 1073741824; }; }; } static void SetGCLineWidth_P2520(gc_v10088, width_v10116) word gc_v10088; word width_v10116; { word card_v19084; /* SetGCLineWidth: */ SOURCE(9970, 166) SOURCE(10029, 30) card_v19084 = width_v10116; SOURCE(10061, 75) if ((card_v19084 < 65535)) { SOURCE(10087, 49) { word gc_v47092; gc_v47092 = gc_v10088; SOURCE(7512, 21) (* (( (ptr) gc_v47092)+6) ) = card_v19084; SOURCE(7536, 132) if (((* (( (ptr) gc_v47092)+39) ) != card_v19084) || ! ((* (( (bPt) gc_v47092)+136) ) & 010)) { SOURCE(7646, 22) (* (( (ptr) gc_v47092) + 1) ) |= 134217728; }; }; }; } static void SetGCLineStyle_P2580(gc_v10176, lineStyle_v10204) word gc_v10176; word lineStyle_v10204; { /* SetGCLineStyle: */ SOURCE(10142, 130) SOURCE(10213, 59) { word gc_v47016; word value_v47044; gc_v47016 = gc_v10176; value_v47044 = lineStyle_v10204; SOURCE(7512, 21) (* (( (ptr) gc_v47016)+7) ) = value_v47044; SOURCE(7536, 132) if (((* (( (ptr) gc_v47016)+40) ) != value_v47044) || ! ((* (( (bPt) gc_v47016)+136) ) & 04)) { SOURCE(7646, 22) (* (( (ptr) gc_v47016) + 1) ) |= 67108864; }; }; } static void SetGCCapStyle_P2640(gc_v10264, capStyle_v10292) word gc_v10264; word capStyle_v10292; { /* SetGCCapStyle: */ SOURCE(10278, 125) SOURCE(10346, 57) { word gc_v46940; word value_v46968; gc_v46940 = gc_v10264; value_v46968 = capStyle_v10292; SOURCE(7512, 21) (* (( (ptr) gc_v46940)+8) ) = value_v46968; SOURCE(7536, 132) if (((* (( (ptr) gc_v46940)+41) ) != value_v46968) || ! ((* (( (bPt) gc_v46940)+136) ) & 02)) { SOURCE(7646, 22) (* (( (ptr) gc_v46940) + 1) ) |= 33554432; }; }; } static void SetGCFillRule_P2700(gc_v10352, fillRule_v10380) word gc_v10352; word fillRule_v10380; { /* SetGCFillRule: */ SOURCE(10409, 125) SOURCE(10477, 57) { word gc_v46864; word value_v46892; gc_v46864 = gc_v10352; value_v46892 = fillRule_v10380; SOURCE(7512, 21) (* (( (ptr) gc_v46864)+11) ) = value_v46892; SOURCE(7536, 132) if (((* (( (ptr) gc_v46864)+44) ) != value_v46892) || ! ((* (( (bPt) gc_v46864)+137) ) & 0100)) { SOURCE(7646, 22) (* (( (ptr) gc_v46864) + 1) ) |= 4194304; }; }; } static void SetGCJoinStyle_P2760(gc_v10440, joinStyle_v10468) word gc_v10440; word joinStyle_v10468; { /* SetGCJoinStyle: */ SOURCE(10540, 130) SOURCE(10611, 59) { word gc_v46788; word value_v46816; gc_v46788 = gc_v10440; value_v46816 = joinStyle_v10468; SOURCE(7512, 21) (* (( (ptr) gc_v46788)+9) ) = value_v46816; SOURCE(7536, 132) if (((* (( (ptr) gc_v46788)+42) ) != value_v46816) || ! ((* (( (bPt) gc_v46788)+136) ) & 1)) { SOURCE(7646, 22) (* (( (ptr) gc_v46788) + 1) ) |= 16777216; }; }; } static void SetGCArcMode_P2820(gc_v10528, arcMode_v10556) word gc_v10528; word arcMode_v10556; { /* SetGCArcMode: */ SOURCE(10676, 120) SOURCE(10741, 55) { word gc_v46712; word value_v46740; gc_v46712 = gc_v10528; value_v46740 = arcMode_v10556; SOURCE(7512, 21) (* (( (ptr) gc_v46712)+24) ) = value_v46740; SOURCE(7536, 132) if (((* (( (ptr) gc_v46712)+57) ) != value_v46740) || ! ((* (( (bPt) gc_v46712)+138) ) & 02)) { SOURCE(7646, 22) (* (( (ptr) gc_v46712) + 1) ) |= 512; }; }; } static void SetGCSubWindowMode_P2880(gc_v10616, subwindowMode_v10644) word gc_v10616; word subwindowMode_v10644; { /* SetGCSubWindowMode: */ SOURCE(10802, 150) SOURCE(10885, 67) { word gc_v46636; word value_v46664; gc_v46636 = gc_v10616; value_v46664 = subwindowMode_v10644; SOURCE(7512, 21) (* (( (ptr) gc_v46636)+17) ) = value_v46664; SOURCE(7536, 132) if (((* (( (ptr) gc_v46636)+50) ) != value_v46664) || ! ((* (( (bPt) gc_v46636)+137) ) & 1)) { SOURCE(7646, 22) (* (( (ptr) gc_v46636) + 1) ) |= 65536; }; }; } static void SetGCGraphicsExposures_P3000(gc_v10808, graphicsExposures_v10836) word gc_v10808; word graphicsExposures_v10836; { /* SetGCGraphicsExposures: */ SOURCE(11044, 159) SOURCE(11124, 79) { word gc_v46560; word value_v46588; gc_v46560 = gc_v10808; value_v46588 = ( (0 != graphicsExposures_v10836) ? 1 : 0 ) ; SOURCE(7512, 21) (* (( (ptr) gc_v46560)+18) ) = value_v46588; SOURCE(7536, 132) if (((* (( (ptr) gc_v46560)+51) ) != value_v46588) || ! (*(( short *)gc_v46560 + 69)<0)) { SOURCE(7646, 22) (* (( (ptr) gc_v46560) + 1) ) |= 32768; }; }; } static void CopyArea_P3060(c_v10896, src_v10924, dst_v10952, srcP_v10980, dstP_v11008, size_v11036, gc_v11064, details_v11092) word c_v10896; word src_v10924; word dst_v10952; W2 srcP_v10980; W2 dstP_v11008; W2 size_v11036; word gc_v11064; word details_v11092; { register ptr gf_c59364 = (ptr) &globalframe; word var_c55108; word var_c55140; word err_v19128 = 0; word gcid_v19156; /* CopyArea: */ SOURCE(11209, 667) (void) (XR_MonitorEntry(c_v10896)); SOURCE(11363, 47) gcid_v19156 = (word) UseGContext_P1560(c_v10896, dst_v10952, gc_v11064, details_v11092); SOURCE(11420, 353) { word ptr_v19200; SOURCE(11422, 85) { word pd65; pd65 = (* (( (ptr) (* (( (ptr) gf_c59364)+166)/* var_c54596 */ ))+40) ); ptr_v19200 = (word) ( *( (fPt) ((* (ptr) pd65 ))))(c_v10896, 62, 28, 0, pd65); }; SOURCE(11509, 262) (* (ptr) ptr_v19200 ) = 1040187399; (* (( (ptr) ptr_v19200)+1) ) = src_v10924; (* (( (ptr) ptr_v19200)+2) ) = dst_v10952; (* (( (ptr) ptr_v19200)+3) ) = gcid_v19156; (* (( (ptr) ptr_v19200)+4) ) = (((word) ( (((unsigned)srcP_v10980.f0 << 16) >> 16) ) << 16) + (unsigned) ( (((unsigned)( (((unsigned)srcP_v10980.f1 << 16) >> 16) ) << 16) >> 16) )); (* (( (ptr) ptr_v19200)+5) ) = (((word) ( (((unsigned)dstP_v11008.f0 << 16) >> 16) ) << 16) + (unsigned) ( (((unsigned)( (((unsigned)dstP_v11008.f1 << 16) >> 16) ) << 16) >> 16) )); (* (( (ptr) ptr_v19200)+6) ) = (((word) ( (((unsigned)size_v11036.f0 << 16) >> 16) ) << 16) + (unsigned) ( (((unsigned)( (((unsigned)size_v11036.f1 << 16) >> 16) ) << 16) >> 16) )); }; SOURCE(11776, 53) { word pd66; pd66 = (* (( (ptr) (* (( (ptr) gf_c59364)+166)/* var_c54596 */ ))+65) ); err_v19128 = (word) ( *( (fPt) ((* (ptr) pd66 ))))(c_v10896, details_v11092, pd66); }; SOURCE(11831, 45) if ((err_v19128 != 0)) { SOURCE(11847, 29) var_c55108 = (* (( (ptr) (* (( (ptr) gf_c59364)+169)/* var_c54980 */ ))+4) ); var_c55140 = (word) err_v19128; (void) (XR_MonitorExit(c_v10896)); goto lab_L100020; }; SOURCE(11209, 667) (void) (XR_MonitorExit(c_v10896)); return; /* c2c skipped dead code */ lab_L100020: ; SOURCE(11847, 29) { word var_c0384; var_c0384 = var_c55140; (void) XR_RaiseError(var_c55108, (word) &var_c0384); }; } static void CopyPlane_P3120(c_v11884, src_v11912, dst_v11940, srcP_v11968, dstP_v11996, size_v12024, gc_v12052, bitPlane_v12080, details_v12108) word c_v11884; word src_v11912; word dst_v11940; W2 srcP_v11968; W2 dstP_v11996; W2 size_v12024; word gc_v12052; word bitPlane_v12080; word details_v12108; { register ptr gf_c59396 = (ptr) &globalframe; word var_c55172; word var_c55204; word err_v19256 = 0; word gcid_v19284; word ptr_v19312; /* CopyPlane: */ SOURCE(12385, 657) (void) (XR_MonitorEntry(c_v11884)); SOURCE(12564, 47) gcid_v19284 = (word) UseGContext_P1560(c_v11884, dst_v11940, gc_v12052, details_v12108); SOURCE(12613, 86) { word pd67; pd67 = (* (( (ptr) (* (( (ptr) gf_c59396)+166)/* var_c54596 */ ))+40) ); ptr_v19312 = (word) ( *( (fPt) ((* (ptr) pd67 ))))(c_v11884, 63, 32, 0, pd67); }; SOURCE(12701, 239) (* (ptr) ptr_v19312 ) = 1056964616; (* (( (ptr) ptr_v19312)+1) ) = src_v11912; (* (( (ptr) ptr_v19312)+2) ) = dst_v11940; (* (( (ptr) ptr_v19312)+3) ) = gcid_v19284; (* (( (ptr) ptr_v19312)+4) ) = (((word) ( (((unsigned)srcP_v11968.f0 << 16) >> 16) ) << 16) + (unsigned) ( (((unsigned)( (((unsigned)srcP_v11968.f1 << 16) >> 16) ) << 16) >> 16) )); (* (( (ptr) ptr_v19312)+5) ) = (((word) ( (((unsigned)dstP_v11996.f0 << 16) >> 16) ) << 16) + (unsigned) ( (((unsigned)( (((unsigned)dstP_v11996.f1 << 16) >> 16) ) << 16) >> 16) )); (* (( (ptr) ptr_v19312)+6) ) = (((word) ( (((unsigned)size_v12024.f0 << 16) >> 16) ) << 16) + (unsigned) ( (((unsigned)( (((unsigned)size_v12024.f1 << 16) >> 16) ) << 16) >> 16) )); (* (( (ptr) ptr_v19312)+7) ) = bitPlane_v12080; SOURCE(12942, 53) { word pd68; pd68 = (* (( (ptr) (* (( (ptr) gf_c59396)+166)/* var_c54596 */ ))+65) ); err_v19256 = (word) ( *( (fPt) ((* (ptr) pd68 ))))(c_v11884, details_v12108, pd68); }; SOURCE(12997, 45) if ((err_v19256 != 0)) { SOURCE(13013, 29) var_c55172 = (* (( (ptr) (* (( (ptr) gf_c59396)+169)/* var_c54980 */ ))+4) ); var_c55204 = (word) err_v19256; (void) (XR_MonitorExit(c_v11884)); goto lab_L100022; }; SOURCE(12385, 657) (void) (XR_MonitorExit(c_v11884)); return; /* c2c skipped dead code */ lab_L100022: ; SOURCE(13013, 29) { word var_c0399; var_c0399 = var_c55204; (void) XR_RaiseError(var_c55172, (word) &var_c0399); }; } static void FillRectangle_P3180(c_v12168, drawable_v12196, gc_v12224, pos_v12252, size_v12280, details_v12308) word c_v12168; word drawable_v12196; word gc_v12224; W2 pos_v12252; W2 size_v12280; word details_v12308; { register ptr gf_c59428 = (ptr) &globalframe; word var_c55236; word var_c55268; word err_v19368 = 0; word gcid_v19396; /* FillRectangle: */ SOURCE(13048, 397) (void) (XR_MonitorEntry(c_v12168)); SOURCE(13201, 52) gcid_v19396 = (word) UseGContext_P1560(c_v12168, drawable_v12196, gc_v12224, details_v12308); SOURCE(13255, 18) { word pd69; pd69 = (* (( (ptr) (* (( (ptr) gf_c59428)+166)/* var_c54596 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd69 ))))(c_v12168, 70, 0, 5, pd69); }; SOURCE(13275, 25) (void) BPutDrawable_P300(c_v12168, drawable_v12196); SOURCE(13303, 15) (void) BPut32_P240(c_v12168, gcid_v19396); SOURCE(13321, 22) (void) BPutRect_P600(c_v12168, pos_v12252, size_v12280); SOURCE(13345, 53) { word pd70; pd70 = (* (( (ptr) (* (( (ptr) gf_c59428)+166)/* var_c54596 */ ))+65) ); err_v19368 = (word) ( *( (fPt) ((* (ptr) pd70 ))))(c_v12168, details_v12308, pd70); }; SOURCE(13400, 45) if ((err_v19368 != 0)) { SOURCE(13416, 29) var_c55236 = (* (( (ptr) (* (( (ptr) gf_c59428)+169)/* var_c54980 */ ))+4) ); var_c55268 = (word) err_v19368; (void) (XR_MonitorExit(c_v12168)); goto lab_L100024; }; SOURCE(13048, 397) (void) (XR_MonitorExit(c_v12168)); return; /* c2c skipped dead code */ lab_L100024: ; SOURCE(13416, 29) { word var_c0410; var_c0410 = var_c55268; (void) XR_RaiseError(var_c55236, (word) &var_c0410); }; } static void DrawLine_P3240(c_v12368, drawable_v12396, p1_v12424, p2_v12452, gc_v12480, details_v12508) word c_v12368; word drawable_v12396; W2 p1_v12424; W2 p2_v12452; word gc_v12480; word details_v12508; { register ptr gf_c59460 = (ptr) &globalframe; word var_c55300; word var_c55332; word err_v19440 = 0; word gcid_v19468; /* DrawLine: */ SOURCE(13451, 394) (void) (XR_MonitorEntry(c_v12368)); SOURCE(13589, 52) gcid_v19468 = (word) UseGContext_P1560(c_v12368, drawable_v12396, gc_v12480, details_v12508); SOURCE(13643, 18) { word pd71; pd71 = (* (( (ptr) (* (( (ptr) gf_c59460)+166)/* var_c54596 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd71 ))))(c_v12368, 65, 0, 5, pd71); }; SOURCE(13663, 25) (void) BPutDrawable_P300(c_v12368, drawable_v12396); SOURCE(13691, 15) (void) BPut32_P240(c_v12368, gcid_v19468); SOURCE(13709, 16) (void) BPutPoint_P480(c_v12368, p1_v12424); SOURCE(13727, 16) (void) BPutPoint_P480(c_v12368, p2_v12452); SOURCE(13745, 53) { word pd72; pd72 = (* (( (ptr) (* (( (ptr) gf_c59460)+166)/* var_c54596 */ ))+65) ); err_v19440 = (word) ( *( (fPt) ((* (ptr) pd72 ))))(c_v12368, details_v12508, pd72); }; SOURCE(13800, 45) if ((err_v19440 != 0)) { SOURCE(13816, 29) var_c55300 = (* (( (ptr) (* (( (ptr) gf_c59460)+169)/* var_c54980 */ ))+4) ); var_c55332 = (word) err_v19440; (void) (XR_MonitorExit(c_v12368)); goto lab_L100026; }; SOURCE(13451, 394) (void) (XR_MonitorExit(c_v12368)); return; /* c2c skipped dead code */ lab_L100026: ; SOURCE(13816, 29) { word var_c0421; var_c0421 = var_c55332; (void) XR_RaiseError(var_c55300, (word) &var_c0421); }; } static void SetupGraphics_P3300(c_v12864) word c_v12864; { register ptr gf_c59492 = (ptr) &globalframe; word cPriv_v19512; word gRef_v19540; word serverBitOrder_v19568; word serverImageByteOrder_v19596; word serverScanlineUnit_v19624; /* SetupGraphics: */ SOURCE(14313, 2771) SOURCE(14360, 45) cPriv_v19512 = (* (( (ptr) c_v12864)+24) ); SOURCE(14407, 48) gRef_v19540 = XR_NewObject(16, (* (( (ptr) gf_c59492)+9) )); SOURCE(14457, 159) { word var_c55396; var_c55396 = (* (( (ptr) (* (( (ptr) c_v12864)+16) ))+10) ); if ((var_c55396 == 1)) { serverBitOrder_v19568 = 1; } else { if ((var_c55396 == 0)) { serverBitOrder_v19568 = 0; } else { serverBitOrder_v19568 = (unsigned) ( XR_RaiseUnnamedError(), 0 ); }; }; }; SOURCE(14632, 144) { word var_c55428; var_c55428 = (* (( (ptr) (* (( (ptr) c_v12864)+16) ))+9) ); if ((var_c55428 == 1)) { serverImageByteOrder_v19596 = 1; } else { if ((var_c55428 == 0)) { serverImageByteOrder_v19596 = 0; } else { serverImageByteOrder_v19596 = (unsigned) ( XR_RaiseUnnamedError(), 0 ); }; }; }; SOURCE(14791, 58) serverScanlineUnit_v19624 = (* (( (ptr) (* (( (ptr) c_v12864)+16) ))+11) ); SOURCE(14851, 43) (* (ptr) gRef_v19540 ) = 4; SOURCE(14896, 37) if (( (int)IOP2( % , (int)serverScanlineUnit_v19624, (int)8) != (int)0)) { SOURCE(14933, 5) (void) XR_RaiseUnnamedError(); }; SOURCE(14953, 1682) SOURCE(14998, 716) SOURCE(15037, 677) { word var_c55460; var_c55460 = serverImageByteOrder_v19596; if ((var_c55460 == 1)) { SOURCE(15084, 255) { word var_c55492; var_c55492 = serverBitOrder_v19568; if ((var_c55492 == 1)) { SOURCE(15125, 31) (* (ptr) gRef_v19540 ) = 0; } else { if ((var_c55492 == 0)) { SOURCE(15173, 166) { word var_c55524; var_c55524 = serverScanlineUnit_v19624; switch (var_c55524) { case 8: SOURCE(15209, 42) (* (ptr) gRef_v19540 ) = 1; break; case 16: SOURCE(15259, 36) (* (ptr) gRef_v19540 ) = 3; break; case 32: SOURCE(15303, 36) (* (ptr) gRef_v19540 ) = 3; break; default: SOURCE(15352, 5) (void) XR_RaiseUnnamedError(); break; }; }; } else { SOURCE(15386, 5) (void) XR_RaiseUnnamedError(); }; }; }; } else { if ((var_c55460 == 0)) { SOURCE(15425, 289) { word var_c55556; var_c55556 = serverBitOrder_v19568; if ((var_c55556 == 1)) { SOURCE(15466, 156) { word var_c55588; var_c55588 = serverScanlineUnit_v19624; switch (var_c55588) { case 8: SOURCE(15502, 30) (* (ptr) gRef_v19540 ) = 0; break; case 16: SOURCE(15540, 37) (* (ptr) gRef_v19540 ) = 2; break; case 32: SOURCE(15585, 37) (* (ptr) gRef_v19540 ) = 2; break; default: SOURCE(15635, 5) (void) XR_RaiseUnnamedError(); break; }; }; } else { if ((var_c55556 == 0)) { SOURCE(15672, 42) (* (ptr) gRef_v19540 ) = 1; } else { SOURCE(15730, 5) (void) XR_RaiseUnnamedError(); }; }; }; } else { SOURCE(15766, 5) (void) XR_RaiseUnnamedError(); }; }; }; SOURCE(16781, 114) if ( ( (((* (ptr) gRef_v19540 ) == 1) || ((* (ptr) gRef_v19540 ) == 3)) ? ((* (( (ptr) gf_c59492)+6)/* bSwap_v5156 */ ) == 0) : 0 ) ) { SOURCE(16884, 11) (void) InitBSwap_P3480(); }; SOURCE(16897, 65) { word x73; (* (( (ptr) gRef_v19540)+1) ) = (x73 = (* (( (ptr) (* (( (ptr) c_v12864)+16) ))+7) ), MIN((int)(word), x73, 12000)); }; SOURCE(16965, 26) { word var_c55620; { word var_c55652; var_c55652 = XR_NewObject(12, (* (( (ptr) gf_c59492)+18) )); (* (( (hPt) var_c55652)+1) ) = 8; var_c55620 = var_c55652; }; (* (( (ptr) gRef_v19540)+2) ) = var_c55620; }; SOURCE(16993, 65) { word pd74; pd74 = (* (( (ptr) (* (( (ptr) gf_c59492)+165)/* var_c54500 */ ))+10) ); (* (( (ptr) gRef_v19540)+3) ) = (word) ( *( (fPt) ((* (ptr) pd74 ))))((word) (( (bPt) gf_c59492)+472)/* var_c53604 */ , 3, pd74) ; }; SOURCE(17060, 24) (* (( (ptr) cPriv_v19512)+6) ) = gRef_v19540; } static word KeepTheOptimizerHonest_P3420() { register ptr gf_c59524 = (ptr) &globalframe; word var_c13080; /* KeepTheOptimizerHonest: */ SOURCE(17454, 92) SOURCE(17504, 42) return(((* (( (ptr) gf_c59524)+4)/* globalCheckByte1_v5072 */ ) + (* (( (ptr) gf_c59524)+5)/* globalCheckByte2_v5100 */ ))); } static void InitBSwap_P3480() { register ptr gf_c59556 = (ptr) &globalframe; /* InitBSwap: */ SOURCE(17598, 253) SOURCE(17618, 38) (* (( (ptr) gf_c59556)+6)/* bSwap_v5156 */ ) = XR_NewObject(256, (* (( (ptr) gf_c59556)+19) )); SOURCE(17658, 193) { register word byte_v19708 = 0; lab_L100031: ; { word swapped_v19752 = 0; word i_v19780; word x_v19808 = 128; SOURCE(17703, 14) i_v19780 = byte_v19708; SOURCE(17734, 85) { register word bit_v19852 = 0; lab_L100035: ; SOURCE(17761, 39) if (((i_v19780 & 1) != 0)) { SOURCE(17781, 19) swapped_v19752 = BCK((swapped_v19752 + x_v19808), 256); }; SOURCE(17802, 7) x_v19808 = ((word) x_v19808 >> 1); SOURCE(17812, 7) i_v19780 = ((word) i_v19780 >> 1); if ((bit_v19852 >= 7)) { goto lab_L100032; }; bit_v19852 = (bit_v19852 + 1); goto lab_L100035; lab_L100032: ; }; SOURCE(17830, 21) (* (( (bPt) (* (( (ptr) gf_c59556)+6)/* bSwap_v5156 */ ))+byte_v19708) ) = swapped_v19752; }; if ((byte_v19708 >= 255)) { goto lab_L100028; }; byte_v19708 = (byte_v19708 + 1); goto lab_L100031; lab_L100028: ; }; } static void PutImage_P3540(c_v13536, formal_c0962, formal_c0963, formal_c0964, formal_c0965, formal_c0966, offx_v13704, offy_v13732, formal_c0967, formal_c0968, formal_c0969) word c_v13536; word formal_c0962; word formal_c0963; W2 formal_c0964; W2 formal_c0965; word formal_c0966; word offx_v13704; word offy_v13732; word formal_c0967; word formal_c0968; word formal_c0969; { W26 var_c59588; /* declaration of drawable_v13564 skipped */ /* declaration of gc_v13592 skipped */ /* declaration of size_v13620 skipped */ /* declaration of dest_v13648 skipped */ /* declaration of base_v13676 skipped */ /* declaration of scanLineBytes_v13760 skipped */ /* declaration of bitsPerPixel_v13788 skipped */ /* declaration of details_v13816 skipped */ register ptr gf_c59620 = (ptr) &globalframe; /* declaration of var_c55684 skipped */ /* declaration of n_v19924 skipped */ word cPriv_v19952; /* declaration of gRef_v19980 skipped */ /* declaration of bitmapFormat_v20008 skipped */ /* declaration of serverBitsPerUnit_v20036 skipped */ word serverScanlinePad_v20064; /* declaration of leftPadBits_v20092 skipped */ /* declaration of skipBytesPSL_v20120 skipped */ /* declaration of transmitBytesPSL_v20148 skipped */ /* declaration of hostUnitsPerScanLine_v20176 skipped */ /* declaration of usefulBytes_v20204 skipped */ /* declaration of fillerBytes_v20232 skipped */ (* (( (ptr) &var_c59588)+4)/* drawable_v13564 */ ) = formal_c0962; (* (( (ptr) &var_c59588)+5)/* gc_v13592 */ ) = formal_c0963; (* (W2Pt) (( (ptr) &var_c59588)+6)/* size_v13620 */ ) = formal_c0964; (* (W2Pt) (( (ptr) &var_c59588)+8)/* dest_v13648 */ ) = formal_c0965; (* (( (ptr) &var_c59588)+10)/* base_v13676 */ ) = formal_c0966; (* (( (ptr) &var_c59588)+11)/* scanLineBytes_v13760 */ ) = formal_c0967; (* (( (ptr) &var_c59588)+12)/* bitsPerPixel_v13788 */ ) = formal_c0968; (* (( (ptr) &var_c59588)+13)/* details_v13816 */ ) = formal_c0969; /* PutImage: */ SOURCE(18120, 7516) { word tmpAddr75; tmpAddr75 = (word) (( (ptr) &var_c59588)+14)/* var_c55684 */ ; (* (ptr) tmpAddr75 ) = ( ((word) (fPt) Protected_P5424) ); (* (( (ptr) tmpAddr75) + 1) ) = 1; }; SOURCE(23192, 45) cPriv_v19952 = (* (( (ptr) c_v13536)+24) ); SOURCE(23239, 45) (* (( (ptr) &var_c59588)+17)/* gRef_v19980 */ ) = (* (( (ptr) cPriv_v19952)+6) ); SOURCE(23286, 225) (* (( (ptr) &var_c59588)+18)/* bitmapFormat_v20008 */ ) = ( ((* (( (ptr) &var_c59588)+12)/* bitsPerPixel_v13788 */ ) == 1) ? ( ( ((* ( ( (ptr) &var_c59588)+13)/* details_v13816 */ ) != 0) ? ((* (( (ptr) (* (( (ptr) &var_c59588)+13)/* details_v13816 */ ))+6) ) == (* (( (ptr) gf_c59620)+20) )) : 0 ) ? 2 : 0 ) : 2 ) ; SOURCE(23513, 56) (* (( (ptr) &var_c59588)+19)/* serverBitsPerUnit_v20036 */ ) = (* (( (ptr) (* (( (ptr) c_v13536)+16) ))+11) ); SOURCE(23572, 55) serverScanlinePad_v20064 = (* (( (ptr) (* (( (ptr) c_v13536)+16) ))+12) ); SOURCE(23630, 60) (* (( (ptr) &var_c59588)+20)/* leftPadBits_v20092 */ ) = IOP2( % , (int)IOP2( * , (int)offx_v13704, (int)(* (( (ptr) &var_c59588)+12) /* bitsPerPixel_v13788 */ )), (int)(* (( (ptr) &var_c59588)+19)/* serverBitsPerUnit_v20036 */ )); SOURCE(23692, 55) (* (( (ptr) &var_c59588)+21)/* skipBytesPSL_v20120 */ ) = IOP2( / , (int)(IOP2( * , (int)offx_v13704, (int)(* (( (ptr) &var_c59588)+12) /* bitsPerPixel_v13788 */ )) - (* (( (ptr) &var_c59588)+20)/* leftPadBits_v20092 */ )), (int)8); SOURCE(23765, 125) (* (( (ptr) &var_c59588)+22)/* transmitBytesPSL_v20148 */ ) = IOP2( / , (int)IOP2( * , (int)IOP2( / , (int)((((* (( (ptr) &var_c59588)+20) /* leftPadBits_v20092 */ ) + IOP2( * , (int)(* (( (ptr) &var_c59588)+6) ), (int)(* (( (ptr) &var_c59588)+12)/* bitsPerPixel_v13788 */ )) ) + serverScanlinePad_v20064) - 1), (int)serverScanlinePad_v20064), (int)serverScanlinePad_v20064), (int)8); SOURCE(23892, 55) (* (( (ptr) &var_c59588)+23)/* hostUnitsPerScanLine_v20176 */ ) = (* (( (ptr) &var_c59588)+11)/* scanLineBytes_v13760 */ ); SOURCE(23949, 35) (* (( (ptr) &var_c59588)+24)/* usefulBytes_v20204 */ ) = (* (( (ptr) &var_c59588)+22)/* transmitBytesPSL_v20148 */ ); SOURCE(23986, 20) (* (( (ptr) &var_c59588)+25)/* fillerBytes_v20232 */ ) = 0; SOURCE(24070, 159) if (( (int)((* (( (ptr) &var_c59588)+21)/* skipBytesPSL_v20120 */ ) + (* (( (ptr) &var_c59588)+22)/* transmitBytesPSL_v20148 */ )) > (int)(* ( ( (ptr) &var_c59588)+11)/* scanLineBytes_v13760 */ ))) { SOURCE(24126, 57) (* (( (ptr) &var_c59588)+25)/* fillerBytes_v20232 */ ) = (((* (( (ptr) &var_c59588)+21)/* skipBytesPSL_v20120 */ ) + (* ( ( (ptr) &var_c59588)+22)/* transmitBytesPSL_v20148 */ )) - (* (( (ptr) &var_c59588)+11)/* scanLineBytes_v13760 */ )); SOURCE(24185, 44) (* (( (ptr) &var_c59588)+24)/* usefulBytes_v20204 */ ) = ((* (( (ptr) &var_c59588)+22)/* transmitBytesPSL_v20148 */ ) - (* ( ( (ptr) &var_c59588)+25)/* fillerBytes_v20232 */ )); }; SOURCE(24234, 69) if (( (int)(* (( (ptr) &var_c59588)+11)/* scanLineBytes_v13760 */ ) <= (int)0) || ((* (( (ptr) &var_c59588)+4)/* drawable_v13564 */ ) == 0)) { SOURCE(24284, 19) (void) RaiseClientError_P60(c_v13536, 0); }; SOURCE(24321, 68) if ((( (int)(* (( (ptr) &var_c59588)+6) ) <= (int)0) || ( (int)(* (( (ptr) &var_c59588)+7) ) <= (int)0)) || ( (int)(* ( ( (ptr) &var_c59588)+8) ) > (int)32767)) { SOURCE(24383, 6) return; }; SOURCE(24392, 123) if (((((( (int)(* (( (ptr) &var_c59588)+6) ) > (int)65535) || ( (int)(* (( (ptr) &var_c59588)+7) ) > (int)65535)) || ( (int)(* ( ( (ptr) &var_c59588)+8) ) < (int)0)) || ( (int)(* (( (ptr) &var_c59588)+9) ) < (int)0)) || ( (int)offx_v13704 < (int)0)) || ( (int)offy_v13732 < (int)0)) { SOURCE(24496, 19) (void) RaiseClientError_P60(c_v13536, 0); }; SOURCE(24533, 61) if (( (int)0 != (int)0)) { SOURCE(24575, 19) (void) RaiseClientError_P60(c_v13536, 0); }; SOURCE(24648, 66) if (( (int)(* (( (ptr) &var_c59588)+22)/* transmitBytesPSL_v20148 */ ) > (int)(* (( (ptr) (* (( (ptr) &var_c59588)+17)/* gRef_v19980 */ ))+1) ))) { SOURCE(24695, 19) (void) RaiseClientError_P60(c_v13536, 0); }; SOURCE(24726, 39) (* (( (ptr) &var_c59588)+10)/* base_v13676 */ ) = ((* (( (ptr) &var_c59588)+10)/* base_v13676 */ ) + IOP2( * , (int)offy_v13732, (int)(* ( ( (ptr) &var_c59588)+23)/* hostUnitsPerScanLine_v20176 */ ))); SOURCE(24776, 403) { word off_v20360; word b2_v20388; SOURCE(24835, 62) { word idx76; word idx77; off_v20360 = (( idx76 = (* (( (ptr) &var_c59588)+7) ), SGNCK(idx76) ) * ( idx77 = (* (( (ptr) &var_c59588)+23)/* hostUnitsPerScanLine_v20176 */ ), SGNCK(idx77) )); }; SOURCE(24899, 61) b2_v20388 = (((* (( (ptr) &var_c59588)+10)/* base_v13676 */ ) + off_v20360) - 1); SOURCE(24962, 53) if ((( (word) -1 - (* (( (ptr) &var_c59588)+10)/* base_v13676 */ )) <= off_v20360)) { SOURCE(25015, 5) (void) XR_RaiseUnnamedError(); }; SOURCE(25038, 69) (* (( (ptr) gf_c59620)+4)/* globalCheckByte1_v5072 */ ) = (unsigned) (* (bPt) (* (( (ptr) &var_c59588)+10)/* base_v13676 */ ) ); SOURCE(25110, 67) (* (( (ptr) gf_c59620)+5)/* globalCheckByte2_v5100 */ ) = (unsigned) (* (bPt) b2_v20388 ); }; SOURCE(25182, 32) (* (( (ptr) &var_c59588)+16)/* n_v19924 */ ) = IOP2( * , (int)(* (( (ptr) &var_c59588)+22)/* transmitBytesPSL_v20148 */ ), (int)(* ( ( (ptr) &var_c59588)+7) )); SOURCE(25217, 419) if (( (int)(* (( (ptr) &var_c59588)+16)/* n_v19924 */ ) < (int)(* (( (ptr) (* (( (ptr) &var_c59588)+17)/* gRef_v19980 */ ))+1) ))) { SOURCE(25250, 19) (void) Protected_P5424(c_v13536, (word) (( (bPt) &var_c59588)+56)/* var_c55684 */ ); } else { SOURCE(25269, 378) { word maxHeight_v20468; word restHeight_v20496; SOURCE(25271, 55) maxHeight_v20468 = IOP2( / , (int)(* (( (ptr) (* (( (ptr) &var_c59588)+17)/* gRef_v19980 */ ))+1) ), (int)(* (( (ptr) &var_c59588)+22) /* transmitBytesPSL_v20148 */ )); SOURCE(25328, 29) restHeight_v20496 = (* (( (ptr) &var_c59588)+7) ); SOURCE(25359, 40) (* (( (ptr) &var_c59588)+7) ) = (MIN((int)(word), maxHeight_v20468, restHeight_v20496)); SOURCE(25401, 235) lab_L100038: ; if (( (int)(* (( (ptr) &var_c59588)+7) ) > (int)0)) { } else { goto lab_L100036; }; SOURCE(25424, 32) (* (( (ptr) &var_c59588)+16)/* n_v19924 */ ) = IOP2( * , (int)(* (( (ptr) &var_c59588)+22)/* transmitBytesPSL_v20148 */ ), (int)(* ( ( (ptr) &var_c59588)+7) )); SOURCE(25458, 46) if (( (int)(* (( (ptr) &var_c59588)+9) ) > (int)32767)) { SOURCE(25485, 19) (void) RaiseClientError_P60(c_v13536, 0); }; SOURCE(25516, 12) (void) Protected_P5424(c_v13536, (word) (( (bPt) &var_c59588)+56)/* var_c55684 */ ); SOURCE(25530, 27) (* (( (ptr) &var_c59588)+9) ) = ((* (( (ptr) &var_c59588)+9) ) + (* (( (ptr) &var_c59588)+7) )); SOURCE(25559, 35) restHeight_v20496 = (restHeight_v20496 - (* (( (ptr) &var_c59588)+7) )); SOURCE(25596, 40) (* (( (ptr) &var_c59588)+7) ) = (MIN((int)(word), maxHeight_v20468, restHeight_v20496)); goto lab_L100038; lab_L100036: ; }; }; } static void Protected_P5424(formal_c0970, formal_c59716) word formal_c0970; word formal_c59716; { W13 var_c59652; /* declaration of c_v20308 skipped */ register ptr gf_c59684 = (ptr) &globalframe; /* declaration of var_c56164 skipped */ /* declaration of var_c56196 skipped */ word var_c56228; word var_c56260; /* declaration of var_c55716 skipped */ /* declaration of var_c55748 skipped */ /* declaration of var_c55780 skipped */ formal_c59716 = (formal_c59716 - 56); (* (( (ptr) &var_c59652)+4)/* c_v20308 */ ) = formal_c0970; (* (ptr) &var_c59652 ) = formal_c59716; /* Protected: */ SOURCE(18319, 4860) { word tmpAddr78; tmpAddr78 = (word) (( (ptr) &var_c59652)+7)/* var_c55716 */ ; (* (ptr) tmpAddr78 ) = ( ((word) (fPt) BothSwapped_P5808) ); (* (( (ptr) tmpAddr78) + 1) ) = 1; }; { word tmpAddr79; tmpAddr79 = (word) (( (ptr) &var_c59652)+9)/* var_c55748 */ ; (* (ptr) tmpAddr79 ) = ( ((word) (fPt) BytesSwapped_P5748) ); (* (( (ptr) tmpAddr79) + 1) ) = 1; }; { word tmpAddr80; tmpAddr80 = (word) (( (ptr) &var_c59652)+11)/* var_c55780 */ ; (* (ptr) tmpAddr80 ) = ( ((word) (fPt) BitsInByteSwapped_P5688) ); (* (( (ptr) tmpAddr80) + 1) ) = 1; }; (void) (XR_MonitorEntry(* (( (ptr) &var_c59652)+4)/* c_v20308 */ )); SOURCE(18367, 4812) SOURCE(18369, 4615) { word var_c08; { word var_c0916; var_c0916 = (word) &var_c59652; var_c08 = (word) XR_Enable(( ((word) (fPt) NoName_Q12060) ), ( ((word) (fPt) NoName_Q12120) ), var_c0916); }; if ((var_c08 == 5)) { goto lab_L100039; } else { if ((var_c08 == 4)) { goto lab_L100054; }; }; }; goto lab_L100055; lab_L100039: ; SOURCE(23000, 176) { word err_v21816; SOURCE(23002, 98) { word pd81; pd81 = (* (( (ptr) (* (( (ptr) gf_c59684)+164)/* var_c54372 */ ))+9) ); err_v21816 = (word) ( *( (fPt) ((* (ptr) pd81 ))))(0, (* (( (ptr) &var_c59652)+4)/* c_v20308 */ ), 0, pd81); }; SOURCE(23102, 41) (* (( (ptr) err_v21816)+6) ) = 255; SOURCE(23145, 29) var_c56228 = (* (( (ptr) (* (( (ptr) gf_c59684)+169)/* var_c54980 */ ))+4) ); var_c56260 = (word) err_v21816; (void) (XR_MonitorExit(* (( (ptr) &var_c59652)+4)/* c_v20308 */ )); goto lab_L100056; }; lab_L100055: ; SOURCE(18319, 4860) (void) (XR_MonitorExit(* (( (ptr) &var_c59652)+4)/* c_v20308 */ )); return; /* c2c skipped dead code */ lab_L100054: ; SOURCE(22955, 29) { word var_c0480; var_c0480 = (* (( (ptr) &var_c59652)+6)/* var_c56196 */ ); (void) XR_RaiseError((* (( (ptr) &var_c59652)+5)/* var_c56164 */ ), (word) &var_c0480); }; lab_L100056: ; SOURCE(23145, 29) { word var_c0481; var_c0481 = var_c56260; (void) XR_RaiseError(var_c56228, (word) &var_c0481); }; } static word NoName_Q12060(formal_c0875) word formal_c0875; { register ptr gf_c0874 = (ptr) &globalframe; SOURCE(18446, 41) { word gcid_v20652; word reqLength_v20680; word err_v20708 = 0; SOURCE(22136, 26) reqLength_v20680 = (IOP2( / , (int)((* (( (ptr) (* (ptr) formal_c0875 ))+16) ) + 3), (int)4) + 6); SOURCE(22187, 76) { word var_c55844; word gc_v46512; gc_v46512 = (* (( (ptr) (* (ptr) formal_c0875 ))+5) ); SOURCE(5361, 80) if ( ( (gc_v46512 != 0) ? ((* (( (ptr) gc_v46512)+1) ) == 0) : 0 ) ) { SOURCE(5402, 28) var_c55844 = (* (ptr) gc_v46512 ); } else { SOURCE(5430, 11) var_c55844 = 0; }; gcid_v20652 = var_c55844; }; if ((gcid_v20652 == 0)) { SOURCE(22219, 44) gcid_v20652 = (word) UseGContext_P1560((* (( (ptr) formal_c0875)+4) ), (* (( (ptr) (* (ptr) formal_c0875 ))+4) ), (* (( (ptr) (* (ptr) formal_c0875 ))+5) ), (* (( (ptr) (* (ptr) formal_c0875 ))+13) )); }; SOURCE(22265, 439) { word ptr_v20816; SOURCE(22271, 104) { word pd82; pd82 = (* (( (ptr) (* (( (ptr) gf_c0874)+166)/* var_c54596 */ ))+40) ); ptr_v20816 = (word) ( *( (fPt) ((* (ptr) pd82 ))))((* (( (ptr) formal_c0875)+4) ), 72, 24, ((word) (reqLength_v20680 - 6) << 2), pd82) ; }; SOURCE(22377, 325) (* (ptr) ptr_v20816 ) = ((((word) (unsigned) (* (( (bPt) (* (ptr) formal_c0875 ))+75) ) << 16) + (unsigned) ( (((unsigned)( (((unsigned)reqLength_v20680 << 16) >> 16) ) << 16) >> 16) )) + 1207959552); (* (( (ptr) ptr_v20816)+1) ) = (* (( (ptr) (* (ptr) formal_c0875 ))+4) ); (* (( (ptr) ptr_v20816)+2) ) = gcid_v20652; (* (( (ptr) ptr_v20816)+3) ) = (((word) ( (((unsigned)(* (( (ptr) (* (ptr) formal_c0875 ))+6) ) << 16) >> 16) ) << 16) + (unsigned) ( (((unsigned)( (((unsigned)(* (( (ptr) (* (ptr) formal_c0875 ))+7) ) << 16) >> 16) ) << 16) >> 16) )); (* (( (ptr) ptr_v20816)+4) ) = (((word) ( (((unsigned)(* (( (ptr) (* (ptr) formal_c0875 ))+8) ) << 16) >> 16) ) << 16) + (unsigned) ( (((unsigned)( (((unsigned)(* (( (ptr) (* (ptr) formal_c0875 ))+9) ) << 16) >> 16) ) << 16) >> 16) )); (* (( (ptr) ptr_v20816)+5) ) = ((word) (((word) (unsigned) (* (( (bPt) (* (ptr) formal_c0875 ))+83) ) << 8) + (unsigned) (* ( ( (bPt) (* (ptr) formal_c0875 ))+51) )) << 16); }; SOURCE(22709, 155) { word var_c55876; var_c55876 = (* (ptr) (* (( (ptr) (* (ptr) formal_c0875 ))+17) ) ); switch (var_c55876) { case 0: SOURCE(22753, 7) SOURCE(18489, 1257) if (( (int)(* (( (ptr) (* (ptr) formal_c0875 ))+22) ) > (int)400)) { SOURCE(18521, 34) { word pd83; pd83 = (* (( (ptr) (* (( (ptr) gf_c0874)+166)/* var_c54596 */ ))+43) ); (void) ( *( (fPt) ((* (ptr) pd83 ))))((* ((( (ptr) formal_c0875)+4)) ), pd83); }; SOURCE(18557, 616) if ( ( ( ( (int)(* (( (ptr) (* (ptr) formal_c0875 ))+11) ) == (int)(* (( (ptr) (* (ptr) formal_c0875 ))+22) )) ? ( (int)(* ( ( (ptr) (* (ptr) formal_c0875 ))+25) ) == (int)0) : 0 ) ? ( (int)(* (( (ptr) (* (ptr) formal_c0875 ))+21) ) == (int)0) : 0 ) ) { { word count_v20872; count_v20872 = IOP2( * , (int)(* (( (ptr) (* (ptr) formal_c0875 ))+22) ), (int)(* (( (ptr) (* (ptr) formal_c0875 ))+7) )); SOURCE(18678, 53) { W3 var_c55908; var_c55908.f0 = (* (( (ptr) (* (ptr) formal_c0875 ))+10) ); var_c55908.f1 = 0; var_c55908.f2 = count_v20872; { /*1*/ word pd84; /*1*/ pd84 = (* (( (ptr) (* (( (ptr) gf_c0874)+170)/* var_c55812 */ ))+24) ); /*1*/ (void) ( *( (fPt) ((* (ptr) pd84 ))))((* (( (ptr) (* (( (ptr) formal_c0875)+4) ))+31) ), var_c55908, pd84); /*1*/ }; }; SOURCE(18733, 33) (* (( (ptr) (* (( (ptr) formal_c0875)+4) ))+10) ) = ((* (( (ptr) (* (( (ptr) formal_c0875)+4) ))+10) ) + count_v20872); SOURCE(18768, 46) (* (( (ptr) (* (ptr) formal_c0875 ))+10) ) = ((* (( (ptr) (* (ptr) formal_c0875 ))+10) ) + IOP2( * , (int)(* (( (ptr) (* (ptr) formal_c0875 ))+23) ), (int)(* (( (ptr) (* (ptr) formal_c0875 ))+7) ))); }; } else { SOURCE(18825, 348) { register word height_v20900 = 0; register word noName_c55940; noName_c55940 = (* (( (ptr) (* (ptr) formal_c0875 ))+7) ); if (( (int)height_v20900 >= (int)noName_c55940)) { goto lab_L100043; }; lab_L100046: ; SOURCE(18864, 85) { W3 var_c55972; var_c55972.f0 = (* (( (ptr) (* (ptr) formal_c0875 ))+10) ); var_c55972.f1 = (* (( (ptr) (* (ptr) formal_c0875 ))+21) ); var_c55972.f2 = (* (( (ptr) (* (ptr) formal_c0875 ))+24) ); { /*1*/ word pd85; /*1*/ pd85 = (* (( (ptr) (* (( (ptr) gf_c0874)+170)/* var_c55812 */ ))+24) ); /*1*/ (void) ( *( (fPt) ((* (ptr) pd85 ))))((* (( (ptr) (* (( (ptr) formal_c0875)+4) ))+31) ), var_c55972, pd85); /*1*/ }; }; SOURCE(18951, 39) (* (( (ptr) (* (( (ptr) formal_c0875)+4) ))+10) ) = ((* (( (ptr) (* (( (ptr) formal_c0875)+4) ))+10) ) + (* (( (ptr) (* (ptr) formal_c0875 ))+24) )); SOURCE(18992, 142) if (( (int)(* (( (ptr) (* (ptr) formal_c0875 ))+25) ) > (int)0)) { SOURCE(19017, 76) { /*1*/ W3 var_c56004; /*1*/ var_c56004.f0 = (* (( (ptr) (* (( (ptr) (* (ptr) formal_c0875 ))+17) ))+2) ); /*1*/ var_c56004.f1 = 0; /*1*/ var_c56004.f2 = (* (( (ptr) (* (ptr) formal_c0875 ))+25) ); /*1*/ { /*1*/ word pd86; /*1*/ pd86 = (* (( (ptr) (* (( (ptr) gf_c0874)+170)/* var_c55812 */ ))+24) ); /*1*/ (void) ( *( (fPt) ((* (ptr) pd86 ))))((* (( (ptr) (* (( (ptr) formal_c0875)+4) ))+31) ), var_c56004, pd86); /*1*/ }; /*1*/ }; SOURCE(19095, 39) (* (( (ptr) (* (( (ptr) formal_c0875)+4) ))+10) ) = ((* (( (ptr) (* (( (ptr) formal_c0875)+4) ))+10) ) + (* (( (ptr) (* (ptr) formal_c0875 ))+25) )); }; SOURCE(19139, 34) (* (( (ptr) (* (ptr) formal_c0875 ))+10) ) = ((* (( (ptr) (* (ptr) formal_c0875 ))+10) ) + (* (( (ptr) (* (ptr) formal_c0875 ))+23) )); height_v20900 = (height_v20900 + 1); if (( (int)height_v20900 < (int)noName_c55940)) { goto lab_L100046; }; lab_L100043: ; }; }; SOURCE(19187, 59) lab_L100049: ; if (( (int)IOP2( % , (int)(* (( (ptr) (* (ptr) formal_c0875 ))+16) ), (int)4) != (int)0)) { } else { goto lab_L100047; }; SOURCE(19210, 7) (* (( (ptr) (* (ptr) formal_c0875 ))+16) ) = ((* (( (ptr) (* (ptr) formal_c0875 ))+16) ) + 1); SOURCE(19219, 27) (void) DPutBYTE_P660((* (( (ptr) formal_c0875)+4) ), 0); goto lab_L100049; lab_L100047: ; } else { { word toP_v20928; word bytes_v20956; word toIdx_v20984 = 0; { word pd87; pd87 = (* (( (ptr) (* (( (ptr) gf_c0874)+166)/* var_c54596 */ ))+5) ); bytes_v20956 = (IOP2( * , (int)(* (( (ptr) (* (ptr) formal_c0875 ))+7) ), (int)(* (( (ptr) (* (ptr) formal_c0875 ))+22) )) + (word) ( *( (fPt) ((* (ptr) pd87 ))))((* ((( (ptr) (* (ptr) formal_c0875 ))+16)) ), pd87)); }; SOURCE(19352, 36) { word bytes_v49320; bytes_v49320 = SGNCK(bytes_v20956); { word pd88; if ((((* (( (ptr) (* (( (ptr) formal_c0875)+4) ))+6) ) - (* (( (ptr) (* (( (ptr) formal_c0875)+4) ))+4) )) < bytes_v49320)) { /*1*/ pd88 = (* (( (ptr) (* (( (ptr) gf_c0874)+166)/* var_c54596 */ ))+10) ); /*1*/ (void) ( *( (fPt) ((* (ptr) pd88 ))))((* (( (ptr) formal_c0875)+4) ), bytes_v49320, pd88); /*1*/ }; }; }; SOURCE(19390, 44) { word pd89; pd89 = (* (( (ptr) (* (( (ptr) gf_c0874)+166)/* var_c54596 */ ))+39) ); toP_v20928 = (word) ( *( (fPt) ((* (ptr) pd89 ))))((* (( (ptr) formal_c0875)+4) ), SGNCK(bytes_v20956), pd89); }; SOURCE(19436, 310) { register word height_v21024 = 0; register word noName_c56036; noName_c56036 = (* (( (ptr) (* (ptr) formal_c0875 ))+7) ); if (( (int)height_v21024 >= (int)noName_c56036)) { goto lab_L100050; }; lab_L100053: ; SOURCE(19475, 201) { word var_c56132; { /*1*/ W3 var_c56068; /*1*/ W3 var_c56100; /*1*/ var_c56068.f0 = toP_v20928; /*1*/ var_c56068.f1 = toIdx_v20984; /*1*/ var_c56068.f2 = (toIdx_v20984 + (* (( (ptr) (* (ptr) formal_c0875 ))+24) )); /*1*/ var_c56100.f0 = (* (( (ptr) (* (ptr) formal_c0875 ))+10) ); /*1*/ { /*1*/ word idx90; /*1*/ var_c56100.f1 = ( /*1*/ idx90 = (* (( (ptr) (* (ptr) formal_c0875 ))+21) ), /*1*/ SGNCK(idx90) /*1*/ ); /*1*/ }; /*1*/ var_c56100.f2 = ((* (( (ptr) (* (ptr) formal_c0875 ))+21) ) + (* (( (ptr) (* (ptr) formal_c0875 ))+24) )); /*1*/ var_c56132 = (word) Basics_ByteBlt(var_c56068, var_c56100); /*1*/ }; }; SOURCE(19678, 32) toIdx_v20984 = (toIdx_v20984 + (* (( (ptr) (* (ptr) formal_c0875 ))+22) )); SOURCE(19712, 34) (* (( (ptr) (* (ptr) formal_c0875 ))+10) ) = ((* (( (ptr) (* (ptr) formal_c0875 ))+10) ) + (* (( (ptr) (* (ptr) formal_c0875 ))+23) )); height_v21024 = (height_v21024 + 1); if (( (int)height_v21024 < (int)noName_c56036)) { goto lab_L100053; }; lab_L100050: ; }; }; }; break; case 1: SOURCE(22783, 19) (void) BitsInByteSwapped_P5688((word) ((( (bPt) formal_c0875)+44))); break; case 2: SOURCE(22820, 14) (void) BytesSwapped_P5748((word) ((( (bPt) formal_c0875)+36))); break; case 3: SOURCE(22851, 13) (void) BothSwapped_P5808((word) ((( (bPt) formal_c0875)+28))); break; default: SOURCE(22877, 5) (void) XR_RaiseUnnamedError(); break; }; }; SOURCE(22884, 53) { word pd91; pd91 = (* (( (ptr) (* (( (ptr) gf_c0874)+166)/* var_c54596 */ ))+65) ); err_v20708 = (word) ( *( (fPt) ((* (ptr) pd91 ))))((* (( (ptr) formal_c0875)+4) ), (* (( (ptr) (* (ptr) formal_c0875 ))+13) ), pd91); }; SOURCE(22939, 45) if ((err_v20708 != 0)) { SOURCE(22955, 29) (* (( (ptr) formal_c0875)+5) ) = (* (( (ptr) (* (( (ptr) gf_c0874)+169)/* var_c54980 */ ))+4) ); (* (( (ptr) formal_c0875)+6) ) = (word) err_v20708; (void) (XR_MonitorExit(* (( (ptr) formal_c0875)+4) )); return(4); }; }; return(0); } static void BitsInByteSwapped_P5688(formal_c59780) word formal_c59780; { register ptr gf_c59748 = (ptr) &globalframe; word buff_v21052; formal_c59780 = (formal_c59780 - 44); /* BitsInByteSwapped: */ SOURCE(19763, 46) SOURCE(19811, 71) { word gRef_v48748; gRef_v48748 = (* (( (ptr) (* (ptr) formal_c59780 ))+17) ); SOURCE(17196, 66) if (( (int) (unsigned) (* (( (hPt) (* (( (ptr) gRef_v48748)+2) ))+1) ) < (int)(* (( (ptr) (* (ptr) formal_c59780 ))+22) ))) { SOURCE(17231, 31) { word pd92; word idx93; pd92 = (* (( (ptr) (* (( (ptr) gf_c59748)+171)/* var_c56324 */ ))+4) ); (* (( (ptr) gRef_v48748)+2) ) = (word) ( *( (fPt) ((* (ptr) pd92 ))))(( idx93 = (* (( (ptr) (* (ptr) formal_c59780 ))+22) ), BCK(idx93, 32768) ), pd92); }; }; SOURCE(17264, 63) buff_v21052 = ((* (( (ptr) gRef_v48748)+2) ) + 4); }; SOURCE(19884, 34) { word pd94; pd94 = (* (( (ptr) (* (( (ptr) gf_c59748)+166)/* var_c54596 */ ))+43) ); (void) ( *( (fPt) ((* (ptr) pd94 ))))((* ((( (ptr) formal_c59780)+4)) ), pd94); }; SOURCE(19920, 369) { register word height_v21108 = 0; register word noName_c56356; noName_c56356 = (* (( (ptr) (* (ptr) formal_c59780 ))+7) ); if (( (int)height_v21108 >= (int)noName_c56356)) { goto lab_L100059; }; lab_L100062: ; { word idx_v21152 = 0; word p_v21180; SOURCE(19973, 51) p_v21180 = (* (( (ptr) (* (ptr) formal_c59780 ))+10) ); SOURCE(20026, 96) { register word i_v21236; register word noName_c56388; i_v21236 = (* (( (ptr) (* (ptr) formal_c59780 ))+21) ); noName_c56388 = ((* (( (ptr) (* (ptr) formal_c59780 ))+21) ) + (* (( (ptr) (* (ptr) formal_c59780 ))+24) )); if (( (int)i_v21236 >= (int)noName_c56388)) { goto lab_L100063; }; lab_L100066: ; SOURCE(20086, 23) (* (( (bPt) buff_v21052)+idx_v21152) ) = (word) (* (( (bPt) (* (( (ptr) gf_c59748)+6)/* bSwap_v5156 */ ))+(word) (* (( (bPt) p_v21180)+i_v21236) )) ); SOURCE(20111, 11) idx_v21152 = (idx_v21152 + 1); i_v21236 = (i_v21236 + 1); if (( (int)i_v21236 < (int)noName_c56388)) { goto lab_L100066; }; lab_L100063: ; }; SOURCE(20133, 74) { W3 var_c56420; var_c56420.f0 = buff_v21052; var_c56420.f1 = 0; var_c56420.f2 = (* (( (ptr) (* (ptr) formal_c59780 ))+22) ); { word pd95; pd95 = (* (( (ptr) (* (( (ptr) gf_c59748)+170)/* var_c55812 */ ))+24) ); (void) ( *( (fPt) ((* (ptr) pd95 ))))((* (( (ptr) (* (( (ptr) formal_c59780)+4) ))+31) ), var_c56420, pd95); }; }; SOURCE(20209, 44) (* (( (ptr) (* (( (ptr) formal_c59780)+4) ))+10) ) = ((* (( (ptr) (* (( (ptr) formal_c59780)+4) ))+10) ) + (* (( (ptr) (* (ptr) formal_c59780 ))+22) )); SOURCE(20255, 34) (* (( (ptr) (* (ptr) formal_c59780 ))+10) ) = ((* (( (ptr) (* (ptr) formal_c59780 ))+10) ) + (* (( (ptr) (* (ptr) formal_c59780 ))+23) )); }; height_v21108 = (height_v21108 + 1); if (( (int)height_v21108 < (int)noName_c56356)) { goto lab_L100062; }; lab_L100059: ; }; SOURCE(20300, 59) lab_L100069: ; if (( (int)IOP2( % , (int)(* (( (ptr) (* (ptr) formal_c59780 ))+16) ), (int)4) != (int)0)) { } else { goto lab_L100067; }; SOURCE(20323, 7) (* (( (ptr) (* (ptr) formal_c59780 ))+16) ) = ((* (( (ptr) (* (ptr) formal_c59780 ))+16) ) + 1); SOURCE(20332, 27) (void) DPutBYTE_P660((* (( (ptr) formal_c59780)+4) ), 0); goto lab_L100069; lab_L100067: ; } static void BytesSwapped_P5748(formal_c59844) word formal_c59844; { register ptr gf_c59812 = (ptr) &globalframe; word buff_v21280; word bytesPerServerUnit_v21308; formal_c59844 = (formal_c59844 - 36); /* BytesSwapped: */ SOURCE(20364, 41) SOURCE(20407, 71) { word gRef_v48700; gRef_v48700 = (* (( (ptr) (* (ptr) formal_c59844 ))+17) ); SOURCE(17196, 66) if (( (int) (unsigned) (* (( (hPt) (* (( (ptr) gRef_v48700)+2) ))+1) ) < (int)(* (( (ptr) (* (ptr) formal_c59844 ))+22) ))) { SOURCE(17231, 31) { word pd96; word idx97; pd96 = (* (( (ptr) (* (( (ptr) gf_c59812)+171)/* var_c56324 */ ))+4) ); (* (( (ptr) gRef_v48700)+2) ) = (word) ( *( (fPt) ((* (ptr) pd96 ))))(( idx97 = (* (( (ptr) (* (ptr) formal_c59844 ))+22) ), BCK(idx97, 32768) ), pd96); }; }; SOURCE(17264, 63) buff_v21280 = ((* (( (ptr) gRef_v48700)+2) ) + 4); }; SOURCE(20480, 45) { word idx98; bytesPerServerUnit_v21308 = ( idx98 = (word) IOP2( / , (int)(* (( (ptr) (* (ptr) formal_c59844 ))+19) ), (int)8), SGNCK(idx98) ); }; SOURCE(20527, 34) { word pd99; pd99 = (* (( (ptr) (* (( (ptr) gf_c59812)+166)/* var_c54596 */ ))+43) ); (void) ( *( (fPt) ((* (ptr) pd99 ))))((* ((( (ptr) formal_c59844)+4)) ), pd99); }; SOURCE(20563, 602) { register word height_v21364 = 0; register word noName_c56484; noName_c56484 = (* (( (ptr) (* (ptr) formal_c59844 ))+7) ); if (( (int)height_v21364 >= (int)noName_c56484)) { goto lab_L100071; }; lab_L100074: ; { word idx_v21408 = 0; word p_v21436; word b_v21464; word startIndex_v21492; SOURCE(20616, 51) p_v21436 = (* (( (ptr) (* (ptr) formal_c59844 ))+10) ); SOURCE(20669, 25) b_v21464 = (* (( (ptr) (* (ptr) formal_c59844 ))+22) ); SOURCE(20696, 30) startIndex_v21492 = (* (( (ptr) (* (ptr) formal_c59844 ))+21) ); SOURCE(20745, 234) lab_L100077: ; if (( (int)b_v21464 > (int)0)) { } else { goto lab_L100075; }; SOURCE(20760, 44) startIndex_v21492 = (startIndex_v21492 + bytesPerServerUnit_v21308); SOURCE(20806, 90) { register word noName_c56516 = 0; if ((noName_c56516 >= bytesPerServerUnit_v21308)) { goto lab_L100078; }; lab_L100081: ; SOURCE(20843, 40) startIndex_v21492 = (startIndex_v21492 - 1); (* (( (bPt) buff_v21280)+idx_v21408) ) = (word) (* (( (bPt) p_v21436)+startIndex_v21492) ); SOURCE(20885, 11) idx_v21408 = (idx_v21408 + 1); noName_c56516 = (noName_c56516 + 1); if ((noName_c56516 < bytesPerServerUnit_v21308)) { goto lab_L100081; }; lab_L100078: ; }; SOURCE(20907, 44) startIndex_v21492 = (startIndex_v21492 + bytesPerServerUnit_v21308); SOURCE(20953, 26) b_v21464 = (b_v21464 - bytesPerServerUnit_v21308); goto lab_L100077; lab_L100075: ; SOURCE(20990, 12) if (( (int)b_v21464 != (int)0)) { SOURCE(21002, 5) (void) XR_RaiseUnnamedError(); }; SOURCE(21009, 74) { W3 var_c56548; var_c56548.f0 = buff_v21280; var_c56548.f1 = 0; var_c56548.f2 = (* (( (ptr) (* (ptr) formal_c59844 ))+22) ); { word pd100; pd100 = (* (( (ptr) (* (( (ptr) gf_c59812)+170)/* var_c55812 */ ))+24) ); (void) ( *( (fPt) ((* (ptr) pd100 ))))((* (( (ptr) (* (( (ptr) formal_c59844)+4) ))+31) ), var_c56548, pd100); }; }; SOURCE(21085, 44) (* (( (ptr) (* (( (ptr) formal_c59844)+4) ))+10) ) = ((* (( (ptr) (* (( (ptr) formal_c59844)+4) ))+10) ) + (* (( (ptr) (* (ptr) formal_c59844 ))+22) )); SOURCE(21131, 34) (* (( (ptr) (* (ptr) formal_c59844 ))+10) ) = ((* (( (ptr) (* (ptr) formal_c59844 ))+10) ) + (* (( (ptr) (* (ptr) formal_c59844 ))+23) )); }; height_v21364 = (height_v21364 + 1); if (( (int)height_v21364 < (int)noName_c56484)) { goto lab_L100074; }; lab_L100071: ; }; SOURCE(21176, 59) lab_L100084: ; if (( (int)IOP2( % , (int)(* (( (ptr) (* (ptr) formal_c59844 ))+16) ), (int)4) != (int)0)) { } else { goto lab_L100082; }; SOURCE(21199, 7) (* (( (ptr) (* (ptr) formal_c59844 ))+16) ) = ((* (( (ptr) (* (ptr) formal_c59844 ))+16) ) + 1); SOURCE(21208, 27) (void) DPutBYTE_P660((* (( (ptr) formal_c59844)+4) ), 0); goto lab_L100084; lab_L100082: ; } static void BothSwapped_P5808(formal_c59908) word formal_c59908; { register ptr gf_c59876 = (ptr) &globalframe; word buff_v21548; word bytesPerServerUnit_v21576; formal_c59908 = (formal_c59908 - 28); /* BothSwapped: */ SOURCE(21240, 40) SOURCE(21282, 71) { word gRef_v48652; gRef_v48652 = (* (( (ptr) (* (ptr) formal_c59908 ))+17) ); SOURCE(17196, 66) if (( (int) (unsigned) (* (( (hPt) (* (( (ptr) gRef_v48652)+2) ))+1) ) < (int)(* (( (ptr) (* (ptr) formal_c59908 ))+22) ))) { SOURCE(17231, 31) { word pd101; word idx102; pd101 = (* (( (ptr) (* (( (ptr) gf_c59876)+171)/* var_c56324 */ ))+4) ); (* (( (ptr) gRef_v48652)+2) ) = (word) ( *( (fPt) ((* (ptr) pd101 ))))(( idx102 = (* (( (ptr) (* (ptr) formal_c59908 ))+22) ), BCK(idx102, 32768) ), pd101); }; }; SOURCE(17264, 63) buff_v21548 = ((* (( (ptr) gRef_v48652)+2) ) + 4); }; SOURCE(21355, 45) { word idx103; bytesPerServerUnit_v21576 = ( idx103 = (word) IOP2( / , (int)(* (( (ptr) (* (ptr) formal_c59908 ))+19) ), (int)8), SGNCK(idx103) ); }; SOURCE(21402, 34) { word pd104; pd104 = (* (( (ptr) (* (( (ptr) gf_c59876)+166)/* var_c54596 */ ))+43) ); (void) ( *( (fPt) ((* (ptr) pd104 ))))((* ((( (ptr) formal_c59908)+4)) ), pd104); }; SOURCE(21438, 609) { register word height_v21632 = 0; register word noName_c56612; noName_c56612 = (* (( (ptr) (* (ptr) formal_c59908 ))+7) ); if (( (int)height_v21632 >= (int)noName_c56612)) { goto lab_L100086; }; lab_L100089: ; { word idx_v21676 = 0; word p_v21704; word b_v21732; word startIndex_v21760; SOURCE(21491, 51) p_v21704 = (* (( (ptr) (* (ptr) formal_c59908 ))+10) ); SOURCE(21544, 25) b_v21732 = (* (( (ptr) (* (ptr) formal_c59908 ))+22) ); SOURCE(21571, 30) startIndex_v21760 = (* (( (ptr) (* (ptr) formal_c59908 ))+21) ); SOURCE(21620, 241) lab_L100092: ; if (( (int)b_v21732 > (int)0)) { } else { goto lab_L100090; }; SOURCE(21635, 44) startIndex_v21760 = (startIndex_v21760 + bytesPerServerUnit_v21576); SOURCE(21681, 97) { register word noName_c56644 = 0; if ((noName_c56644 >= bytesPerServerUnit_v21576)) { goto lab_L100093; }; lab_L100096: ; SOURCE(21718, 47) startIndex_v21760 = (startIndex_v21760 - 1); (* (( (bPt) buff_v21548)+idx_v21676) ) = (word) (* (( (bPt) (* (( (ptr) gf_c59876)+6)/* bSwap_v5156 */ ))+(word) (* (( (bPt) p_v21704)+startIndex_v21760) )) ); SOURCE(21767, 11) idx_v21676 = (idx_v21676 + 1); noName_c56644 = (noName_c56644 + 1); if ((noName_c56644 < bytesPerServerUnit_v21576)) { goto lab_L100096; }; lab_L100093: ; }; SOURCE(21789, 44) startIndex_v21760 = (startIndex_v21760 + bytesPerServerUnit_v21576); SOURCE(21835, 26) b_v21732 = (b_v21732 - bytesPerServerUnit_v21576); goto lab_L100092; lab_L100090: ; SOURCE(21872, 12) if (( (int)b_v21732 != (int)0)) { SOURCE(21884, 5) (void) XR_RaiseUnnamedError(); }; SOURCE(21891, 74) { W3 var_c56676; var_c56676.f0 = buff_v21548; var_c56676.f1 = 0; var_c56676.f2 = (* (( (ptr) (* (ptr) formal_c59908 ))+22) ); { word pd105; pd105 = (* (( (ptr) (* (( (ptr) gf_c59876)+170)/* var_c55812 */ ))+24) ); (void) ( *( (fPt) ((* (ptr) pd105 ))))((* (( (ptr) (* (( (ptr) formal_c59908)+4) ))+31) ), var_c56676, pd105); }; }; SOURCE(21967, 44) (* (( (ptr) (* (( (ptr) formal_c59908)+4) ))+10) ) = ((* (( (ptr) (* (( (ptr) formal_c59908)+4) ))+10) ) + (* (( (ptr) (* (ptr) formal_c59908 ))+22) )); SOURCE(22013, 34) (* (( (ptr) (* (ptr) formal_c59908 ))+10) ) = ((* (( (ptr) (* (ptr) formal_c59908 ))+10) ) + (* (( (ptr) (* (ptr) formal_c59908 ))+23) )); }; height_v21632 = (height_v21632 + 1); if (( (int)height_v21632 < (int)noName_c56612)) { goto lab_L100089; }; lab_L100086: ; }; SOURCE(22058, 59) lab_L100099: ; if (( (int)IOP2( % , (int)(* (( (ptr) (* (ptr) formal_c59908 ))+16) ), (int)4) != (int)0)) { } else { goto lab_L100097; }; SOURCE(22081, 7) (* (( (ptr) (* (ptr) formal_c59908 ))+16) ) = ((* (( (ptr) (* (ptr) formal_c59908 ))+16) ) + 1); SOURCE(22090, 27) (void) DPutBYTE_P660((* (( (ptr) formal_c59908)+4) ), 0); goto lab_L100099; lab_L100097: ; } static void GetImage_P3600(formal_c0547, c_v13888, formal_c0971, formal_c0972, formal_c0973, formal_c0974, formal_c0975) word formal_c0547; word c_v13888; word formal_c0971; W2 formal_c0972; W2 formal_c0973; word formal_c0974; word formal_c0975; { W14 var_c59940; /* declaration of drawable_v13916 skipped */ /* declaration of pos_v13944 skipped */ /* declaration of size_v13972 skipped */ /* declaration of format_v14000 skipped */ /* declaration of planeMask_v14028 skipped */ register ptr gf_c59972 = (ptr) &globalframe; W6 r_v14072; /* declaration of var_c56708 skipped */ /* declaration of reply_v21872 skipped */ word leng_v21928; (* (( (ptr) &var_c59940)+4)/* drawable_v13916 */ ) = formal_c0971; (* (W2Pt) (( (ptr) &var_c59940)+5)/* pos_v13944 */ ) = formal_c0972; (* (W2Pt) (( (ptr) &var_c59940)+7)/* size_v13972 */ ) = formal_c0973; (* (( (ptr) &var_c59940)+9)/* format_v14000 */ ) = formal_c0974; (* (( (ptr) &var_c59940)+10)/* planeMask_v14028 */ ) = formal_c0975; /* GetImage: */ SOURCE(25699, 732) { word tmpAddr106; tmpAddr106 = (word) (( (ptr) &var_c59940)+11)/* var_c56708 */ ; (* (ptr) tmpAddr106 ) = ( ((word) (fPt) action_P6492) ); (* (( (ptr) tmpAddr106) + 1) ) = 1; }; SOURCE(25699, 732) XR_FillWords(&r_v14072, 6, 0); SOURCE(25871, 12) (* (( (ptr) &var_c59940)+13)/* reply_v21872 */ ) = 0; SOURCE(26068, 69) if (( (int)(* (( (ptr) &var_c59940)+7) ) <= (int)0) || ( (int)(* (( (ptr) &var_c59940)+8) ) <= (int)0)) { SOURCE(26108, 29) (void) RaiseClientError_P60(c_v13888, (* (( (ptr) gf_c59972)+21) )); }; SOURCE(26139, 27) { word pd107; pd107 = (* (( (ptr) (* (( (ptr) gf_c59972)+166)/* var_c54596 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd107 ))))(c_v13888, (word) (( (bPt) &var_c59940)+44)/* var_c56708 */ , 0, pd107); }; SOURCE(26168, 17) { word pd108; pd108 = (* (( (ptr) (* (( (ptr) gf_c59972)+166)/* var_c54596 */ ))+68) ); (void) ( *( (fPt) ((* (ptr) pd108 ))))((* ((( (ptr) &var_c59940)+13)/* reply_v21872 */ ) ), pd108); }; SOURCE(26187, 24) r_v14072.f4 = (* (( (ptr) (* (( (ptr) &var_c59940)+13)/* reply_v21872 */ ))+8) ); SOURCE(26213, 32) r_v14072.f2 = (* (( (ptr) (* (( (ptr) &var_c59940)+13)/* reply_v21872 */ ))+8) ); SOURCE(26247, 22) { word var_c56740; word b_v49272; b_v49272 = (unsigned) (word) (* (( (bPt) (* (( (ptr) &var_c59940)+13)/* reply_v21872 */ ))+(* (( (ptr) (* (( (ptr) &var_c59940)+13) /* reply_v21872 */ ))+10) )) ); (* (( (ptr) (* (( (ptr) &var_c59940)+13)/* reply_v21872 */ ))+10) ) = ((* (( (ptr) (* (( (ptr) &var_c59940)+13)/* reply_v21872 */ ))+10) ) + 1); var_c56740 = b_v49272; r_v14072.f0 = var_c56740; }; SOURCE(26271, 14) (* (( (ptr) (* (( (ptr) &var_c59940)+13)/* reply_v21872 */ ))+10) ) = ((* (( (ptr) (* (( (ptr) &var_c59940)+13)/* reply_v21872 */ ))+10) ) + 2); SOURCE(26287, 21) { word pd109; pd109 = (* (( (ptr) (* (( (ptr) gf_c59972)+166)/* var_c54596 */ ))+79) ); leng_v21928 = (word) ( *( (fPt) ((* (ptr) pd109 ))))((* ((( (ptr) &var_c59940)+13)/* reply_v21872 */ ) ), pd109); }; SOURCE(26310, 20) { word idx110; r_v14072.f3 = ( idx110 = (word) ((word) leng_v21928 << 2), SGNCK(idx110) ); }; SOURCE(26332, 27) { word pd111; pd111 = (* (( (ptr) (* (( (ptr) gf_c59972)+166)/* var_c54596 */ ))+78) ); r_v14072.f1 = (word) ( *( (fPt) ((* (ptr) pd111 ))))((* ((( (ptr) &var_c59940)+13)/* reply_v21872 */ ) ), pd111); }; SOURCE(26361, 19) (* (( (ptr) (* (( (ptr) &var_c59940)+13)/* reply_v21872 */ ))+8) ) = 0; SOURCE(26409, 22) { word pd112; pd112 = (* (( (ptr) (* (( (ptr) gf_c59972)+166)/* var_c54596 */ ))+67) ); (void) ( *( (fPt) ((* (ptr) pd112 ))))(c_v13888, (* (( (ptr) &var_c59940)+13)/* reply_v21872 */ ), pd112); }; /* removed tail goto */ (* (W6Pt) formal_c0547 ) = r_v14072; return; } static void action_P6492(c_v22004, formal_c60036) word c_v22004; word formal_c60036; { register ptr gf_c60004 = (ptr) &globalframe; formal_c60036 = (formal_c60036 - 44); /* action: */ SOURCE(25885, 163) SOURCE(25918, 28) { word pd113; pd113 = (* (( (ptr) (* (( (ptr) gf_c60004)+166)/* var_c54596 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd113 ))))(c_v22004, 73, ((* (( (ptr) formal_c60036)+9) ) + 1), 5, pd113); }; SOURCE(25948, 25) (void) BPutDrawable_P300(c_v22004, (* (( (ptr) formal_c60036)+4) )); SOURCE(25976, 22) (void) BPutRect_P600(c_v22004, (* (W2Pt) (( (ptr) formal_c60036)+5) ), (* (W2Pt) (( (ptr) formal_c60036)+7) )); SOURCE(26000, 20) (void) BPut32_P240(c_v22004, (* (( (ptr) formal_c60036)+10) )); SOURCE(26022, 26) { word pd114; pd114 = (* (( (ptr) (* (( (ptr) gf_c60004)+166)/* var_c54596 */ ))+62) ); (* (( (ptr) formal_c60036)+13) ) = (word) ( *( (fPt) ((* (ptr) pd114 ))))(c_v22004, pd114); }; } static void PutRectanglesDirect_P3660(c_v14132, rects_v14160, start_v14188, num_v14216) word c_v14132; word rects_v14160; word start_v14188; word num_v14216; { register ptr gf_c60068 = (ptr) &globalframe; word cnt_v22032; /* PutRectanglesDirect: */ SOURCE(26436, 259) SOURCE(26527, 37) cnt_v22032 = IOP2( * , (int)num_v14216, (int)8); SOURCE(26566, 24) { word pd115; pd115 = (* (( (ptr) (* (( (ptr) gf_c60068)+166)/* var_c54596 */ ))+43) ); (void) ( *( (fPt) ((* (ptr) pd115 ))))(c_v14132, pd115); }; SOURCE(26592, 70) { W3 var_c56772; { word limit116; var_c56772.f0 = (word) (( (W2Pt) (( (bPt) rects_v14160)+4))+( limit116 = (* (ptr) rects_v14160 ), BCK(start_v14188, limit116) )); }; var_c56772.f1 = 0; var_c56772.f2 = cnt_v22032; { word pd117; pd117 = (* (( (ptr) (* (( (ptr) gf_c60068)+170)/* var_c55812 */ ))+24) ); (void) ( *( (fPt) ((* (ptr) pd117 ))))((* (( (ptr) c_v14132)+31) ), var_c56772, pd117); }; }; SOURCE(26664, 31) (* (( (ptr) c_v14132)+10) ) = ((* (( (ptr) c_v14132)+10) ) + cnt_v22032); } static void BPutRectangles_P3720(c_v14276, rects_v14304, start_v14332, num_v14360) word c_v14276; word rects_v14304; word start_v14332; word num_v14360; { register ptr gf_c60100 = (ptr) &globalframe; word byteCnt_v22076; word p_v22104; /* BPutRectangles: */ SOURCE(26701, 281) SOURCE(26794, 44) { word idx118; byteCnt_v22076 = ( idx118 = (word) IOP2( * , (int)num_v14360, (int)8), SGNCK(idx118) ); }; SOURCE(26840, 58) { word pd119; pd119 = (* (( (ptr) (* (( (ptr) gf_c60100)+166)/* var_c54596 */ ))+39) ); p_v22104 = (word) ( *( (fPt) ((* (ptr) pd119 ))))(c_v14276, byteCnt_v22076, pd119); }; SOURCE(26900, 82) { word limit120; (void) Basics_MoveWords(p_v22104, (word) (( (W2Pt) (( (bPt) rects_v14304)+4))+( limit120 = (* (ptr) rects_v14304 ), BCK(start_v14332, limit120) )), ((word) byteCnt_v22076 >> 2)); }; } static void PolyFillRectangle_P3780(c_v14420, drawable_v14448, gc_v14476, rects_v14504, start_v14532, number_v14560, details_v14588) word c_v14420; word drawable_v14448; word gc_v14476; word rects_v14504; word start_v14532; word number_v14560; word details_v14588; { register ptr gf_c60132 = (ptr) &globalframe; word var_c56804; word var_c56836; word err_v22160 = 0; word total_v22188; word max_v22216; /* PolyFillRectangle: */ SOURCE(26988, 825) (void) (XR_MonitorEntry(c_v14420)); SOURCE(27182, 78) { word tc121; word x122; if ((rects_v14504 != 0)) { tc121 = (word) (x122 = ((* (ptr) rects_v14504 ) - start_v14532), MIN((int)(word), number_v14560, x122)); } else { tc121 = (word) 0; }; total_v22188 = tc121; }; SOURCE(27262, 47) { word x123; max_v22216 = (x123 = IOP2( / , (int)(* (( (ptr) (* (( (ptr) c_v14420)+16) ))+6) ), (int)2), MIN((int)(word), x123, 200)); }; SOURCE(27311, 502) if ( ( (rects_v14504 != 0) ? ((* (ptr) rects_v14504 ) > 0) : 0 ) ) { SOURCE(27355, 469) { word gcid_v22260; word done_v22288 = 0; SOURCE(27357, 52) gcid_v22260 = (word) UseGContext_P1560(c_v14420, drawable_v14448, gc_v14476, details_v14588); SOURCE(27426, 387) lab_L100104: ; if (( (int)done_v22288 < (int)total_v22188)) { } else { goto lab_L100102; }; { word thisTime_v22332; SOURCE(27446, 38) thisTime_v22332 = (MIN((int)(word), (total_v22188 - done_v22288), max_v22216)); SOURCE(27486, 29) { word pd124; pd124 = (* (( (ptr) (* (( (ptr) gf_c60132)+166)/* var_c54596 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd124 ))))(c_v14420, 70, 0, (IOP2( * , (int)2, (int)thisTime_v22332) + 3), pd124); }; SOURCE(27517, 25) (void) BPutDrawable_P300(c_v14420, drawable_v14448); SOURCE(27545, 15) (void) BPut32_P240(c_v14420, gcid_v22260); SOURCE(27563, 124) if (( (int)thisTime_v22332 > (int)100)) { SOURCE(27584, 57) (void) PutRectanglesDirect_P3660(c_v14420, rects_v14504, (start_v14532 + done_v22288), thisTime_v22332); } else { SOURCE(27641, 46) (void) BPutRectangles_P3720(c_v14420, rects_v14504, (start_v14532 + done_v22288), thisTime_v22332); }; SOURCE(27689, 53) { word pd125; pd125 = (* (( (ptr) (* (( (ptr) gf_c60132)+166)/* var_c54596 */ ))+65) ); err_v22160 = (word) ( *( (fPt) ((* (ptr) pd125 ))))(c_v14420, details_v14588, pd125); }; SOURCE(27744, 45) if ((err_v22160 != 0)) { SOURCE(27760, 29) var_c56804 = (* (( (ptr) (* (( (ptr) gf_c60132)+169)/* var_c54980 */ ))+4) ); var_c56836 = (word) err_v22160; (void) (XR_MonitorExit(c_v14420)); goto lab_L100105; }; SOURCE(27791, 22) done_v22288 = (done_v22288 + thisTime_v22332); }; goto lab_L100104; lab_L100102: ; }; }; SOURCE(26988, 825) (void) (XR_MonitorExit(c_v14420)); return; /* c2c skipped dead code */ lab_L100105: ; SOURCE(27760, 29) { word var_c0576; var_c0576 = var_c56836; (void) XR_RaiseError(var_c56804, (word) &var_c0576); }; } static void CountAndSetMaskBits_P3840(formal_c0582, mask_v14648) word formal_c0582; word mask_v14648; { word bitmask_v14692; word n_v14720; /* CountAndSetMaskBits: */ SOURCE(27831, 250) SOURCE(27831, 250) bitmask_v14692 = 0; SOURCE(27831, 250) n_v14720 = 0; SOURCE(27919, 162) if ((mask_v14648 != 0)) { SOURCE(27943, 148) { word bit_v22376 = 1; SOURCE(27962, 119) { register word key_v22420 = 0; lab_L100111: ; SOURCE(28010, 53) if (((word) mask_v14648 >> (31 - (word) key_v22420)) & 1) { SOURCE(28029, 9) n_v14720 = (n_v14720 + 1); SOURCE(28040, 23) bitmask_v14692 = (bitmask_v14692 + bit_v22376); }; SOURCE(28066, 15) bit_v22376 = (bit_v22376 + bit_v22376); if ((key_v22420 >= 22)) { goto lab_L100108; }; key_v22420 = (key_v22420 + 1); goto lab_L100111; lab_L100108: ; }; }; }; /* removed tail goto */ (* (ptr) formal_c0582 ) = bitmask_v14692; (* (( (ptr) formal_c0582)+1) ) = n_v14720; return; } static void CopyGC_P3900(c_v14780, srcGCID_v14808, destGCID_v14836, mask_v14864, details_v14892) word c_v14780; word srcGCID_v14808; word destGCID_v14836; word mask_v14864; word details_v14892; { register ptr gf_c60164 = (ptr) &globalframe; word var_c56900; word var_c56932; word err_v22464 = 0; /* CopyGC: */ SOURCE(28098, 343) (void) (XR_MonitorEntry(c_v14780)); SOURCE(28233, 18) { word pd126; pd126 = (* (( (ptr) (* (( (ptr) gf_c60164)+166)/* var_c54596 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd126 ))))(c_v14780, 57, 0, 4, pd126); }; SOURCE(28253, 18) (void) BPut32_P240(c_v14780, srcGCID_v14808); SOURCE(28274, 19) (void) BPut32_P240(c_v14780, destGCID_v14836); SOURCE(28295, 44) { word var_c56868; W2 var_c0592; (void) CountAndSetMaskBits_P3840((word) &var_c0592, mask_v14864); var_c56868 = var_c0592.f0; (void) BPut32_P240(c_v14780, var_c56868); }; SOURCE(28341, 53) { word pd127; pd127 = (* (( (ptr) (* (( (ptr) gf_c60164)+166)/* var_c54596 */ ))+65) ); err_v22464 = (word) ( *( (fPt) ((* (ptr) pd127 ))))(c_v14780, details_v14892, pd127); }; SOURCE(28396, 45) if ((err_v22464 != 0)) { SOURCE(28412, 29) var_c56900 = (* (( (ptr) (* (( (ptr) gf_c60164)+169)/* var_c54980 */ ))+4) ); var_c56932 = (word) err_v22464; (void) (XR_MonitorExit(c_v14780)); goto lab_L100112; }; SOURCE(28098, 343) (void) (XR_MonitorExit(c_v14780)); return; /* c2c skipped dead code */ lab_L100112: ; SOURCE(28412, 29) { word var_c0593; var_c0593 = var_c56932; (void) XR_RaiseError(var_c56900, (word) &var_c0593); }; } static void SetDashes_P3960(c_v14952, formal_c0976, formal_c0977, formal_c0978, formal_c0979) word c_v14952; word formal_c0976; word formal_c0977; word formal_c0978; word formal_c0979; { W13 var_c60196; /* declaration of gc_v14980 skipped */ /* declaration of dashOffset_v15008 skipped */ /* declaration of dashes_v15036 skipped */ /* declaration of details_v15064 skipped */ register ptr gf_c60228 = (ptr) &globalframe; /* declaration of var_c56964 skipped */ /* declaration of var_c56996 skipped */ /* declaration of count_v22536 skipped */ (* (( (ptr) &var_c60196)+4)/* gc_v14980 */ ) = formal_c0976; (* (( (ptr) &var_c60196)+5)/* dashOffset_v15008 */ ) = formal_c0977; (* (( (ptr) &var_c60196)+6)/* dashes_v15036 */ ) = formal_c0978; (* (( (ptr) &var_c60196)+7)/* details_v15064 */ ) = formal_c0979; /* SetDashes: */ SOURCE(28447, 800) { word tmpAddr128; tmpAddr128 = (word) (( (ptr) &var_c60196)+8)/* var_c56964 */ ; (* (ptr) tmpAddr128 ) = ( ((word) (fPt) action_P6804) ); (* (( (ptr) tmpAddr128) + 1) ) = 1; }; { word tmpAddr129; tmpAddr129 = (word) (( (ptr) &var_c60196)+10)/* var_c56996 */ ; (* (ptr) tmpAddr129 ) = ( ((word) (fPt) CountBytes_P6744) ); (* (( (ptr) tmpAddr129) + 1) ) = 1; }; SOURCE(28745, 31) (* (( (ptr) &var_c60196)+12)/* count_v22536 */ ) = (word) CountBytes_P6744((* (( (ptr) &var_c60196)+6)/* dashes_v15036 */ ), (word) ( ( (bPt) &var_c60196)+40)/* var_c56996 */ ); SOURCE(29153, 94) if (((* (( (ptr) &var_c60196)+12)/* count_v22536 */ ) != 0)) { SOURCE(29171, 43) { word x130; word x131; (* (( (ptr) &var_c60196)+12)/* count_v22536 */ ) = (x130 = (* (( (ptr) &var_c60196)+12)/* count_v22536 */ ), x131 = (* (( (ptr) (* (( (ptr) c_v14952)+16) ))+6) ), MIN((int)(word), x130, x131)); }; SOURCE(29216, 31) { word pd132; pd132 = (* (( (ptr) (* (( (ptr) gf_c60228)+166)/* var_c54596 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd132 ))))(c_v14952, (word) (( (bPt) &var_c60196)+32)/* var_c56964 */ , (* (( (ptr) &var_c60196)+7) /* details_v15064 */ ), pd132); }; }; } static word CountBytes_P6744(list_v22640, formal_c60260) word list_v22640; word formal_c60260; { word cnt_v22768; formal_c60260 = (formal_c60260 - 40); /* CountBytes: */ SOURCE(28564, 176) SOURCE(28564, 176) cnt_v22768 = 0; SOURCE(28649, 91) { register word l_v22900; l_v22900 = list_v22640; lab_L100117: ; if ( ( (l_v22900 != 0) ? (cnt_v22768 < 100) : 0 ) ) { } else { goto lab_L100114; }; SOURCE(28715, 25) (* (( (ptr) formal_c60260)+12) ) = ((* (( (ptr) formal_c60260)+12) ) + 1); l_v22900 = (* (( (ptr) l_v22900)+1) ); goto lab_L100117; lab_L100114: ; }; SOURCE(28564, 176) return(cnt_v22768); } static void action_P6804(c_v22828, formal_c60324) word c_v22828; word formal_c60324; { register ptr gf_c60292 = (ptr) &globalframe; word gcid_v23028; formal_c60324 = (formal_c60324 - 32); /* action: */ SOURCE(28778, 370) SOURCE(28811, 56) gcid_v23028 = (word) UseGContext_P1560(c_v22828, 0, (* (( (ptr) formal_c60324)+4) ), (* (( (ptr) formal_c60324)+7) )); SOURCE(28869, 30) { word pd133; pd133 = (* (( (ptr) (* (( (ptr) gf_c60292)+166)/* var_c54596 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd133 ))))(c_v22828, 58, 0, (((word) ((* (( (ptr) formal_c60324)+12) ) + 3) >> 2) + 3), pd133) ; }; SOURCE(28901, 15) (void) BPut32_P240(c_v22828, gcid_v23028); SOURCE(28919, 21) (void) BPut16_P180(c_v22828, (* (( (ptr) formal_c60324)+5) )); SOURCE(28942, 16) { word idx134; (void) BPut16_P180(c_v22828, ( idx134 = (* (( (ptr) formal_c60324)+12) ), BCK(idx134, 65536) )); }; SOURCE(28960, 117) { register word i_v23072 = 0; register word noName_c57028; noName_c57028 = (* (( (ptr) formal_c60324)+12) ); if (( (int)i_v23072 >= (int)noName_c57028)) { goto lab_L100118; }; lab_L100121: ; { word next_v23116; SOURCE(28988, 6) next_v23116 = (* (( (ptr) (* (( (ptr) formal_c60324)+6) ))+1) ); SOURCE(29022, 23) { word c_v51888; word b_v51916; c_v51888 = c_v22828; b_v51916 = (* (ptr) (* (( (ptr) formal_c60324)+6) ) ); { word n_v51948; n_v51948 = (* (( (ptr) c_v51888)+4) ); (* (( (bPt) (* (( (ptr) c_v51888)+7) ))+n_v51948) ) = b_v51916; (* (( (ptr) c_v51888)+4) ) = (n_v51948 + 1); }; }; SOURCE(29047, 30) if ((next_v23116 != 0)) { SOURCE(29064, 13) (* (( (ptr) formal_c60324)+6) ) = next_v23116; }; }; i_v23072 = (i_v23072 + 1); if (( (int)i_v23072 < (int)noName_c57028)) { goto lab_L100121; }; lab_L100118: ; }; SOURCE(29088, 29) { word c_v49196; word cnt_v49224; c_v49196 = c_v22828; { word pd135; pd135 = (* (( (ptr) (* (( (ptr) gf_c60292)+166)/* var_c54596 */ ))+5) ); cnt_v49224 = (word) ( *( (fPt) ((* (ptr) pd135 ))))((* ((( (ptr) formal_c60324)+12)) ), pd135); }; (* (( (ptr) c_v49196)+4) ) = ((* (( (ptr) c_v49196)+4) ) + cnt_v49224); }; SOURCE(29119, 29) { word pd136; pd136 = (* (( (ptr) (* (( (ptr) gf_c60292)+166)/* var_c54596 */ ))+64) ); (void) ( *( (fPt) ((* (ptr) pd136 ))))(c_v22828, (* (( (ptr) formal_c60324)+7) ), pd136); }; } static word SetClipRectangles_P4020(c_v15208, gc_v15236, clipOrigin_v15264, rects_v15292, ordering_v15320, start_v15348, number_v15376, details_v15404) word c_v15208; word gc_v15236; W2 clipOrigin_v15264; word rects_v15292; word ordering_v15320; word start_v15348; word number_v15376; word details_v15404; { register ptr gf_c60356 = (ptr) &globalframe; word var_c57060; word var_c57092; word ok_v15448; word total_v23244; word max_v23272; /* SetClipRectangles: */ SOURCE(29256, 825) (void) (XR_MonitorEntry(c_v15208)); SOURCE(29256, 825) ok_v15448 = 1; SOURCE(29491, 78) { word tc137; word x138; if ((rects_v15292 != 0)) { tc137 = (word) (x138 = ((* (ptr) rects_v15292 ) - start_v15348), MIN((int)(word), number_v15376, x138)); } else { tc137 = (word) 0; }; total_v23244 = tc137; }; SOURCE(29571, 37) max_v23272 = IOP2( / , (int)(* (( (ptr) (* (( (ptr) c_v15208)+16) ))+6) ), (int)2); SOURCE(29610, 42) if (( (int)total_v23244 > (int)max_v23272)) { SOURCE(29629, 10) ok_v15448 = 0; SOURCE(29641, 11) total_v23244 = max_v23272; }; SOURCE(29691, 390) if (( (int)total_v23244 > (int)0)) { SOURCE(29707, 376) { word err_v23316 = 0; word gcid_v23344; SOURCE(29732, 56) gcid_v23344 = (word) UseGContext_P1560(c_v15208, 0, gc_v15236, details_v15404); SOURCE(29790, 38) { word pd139; pd139 = (* (( (ptr) (* (( (ptr) gf_c60356)+166)/* var_c54596 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd139 ))))(c_v15208, 59, ordering_v15320, (IOP2( * , (int)2, (int)total_v23244) + 3), pd139) ; }; SOURCE(29830, 15) (void) BPut32_P240(c_v15208, gcid_v23344); SOURCE(29848, 24) (void) BPutPoint_P480(c_v15208, clipOrigin_v15264); SOURCE(29874, 105) if (( (int)total_v23244 > (int)100)) { SOURCE(29892, 49) (void) PutRectanglesDirect_P3660(c_v15208, rects_v15292, start_v15348, total_v23244); } else { SOURCE(29941, 38) (void) BPutRectangles_P3720(c_v15208, rects_v15292, start_v15348, total_v23244); }; SOURCE(29981, 53) { word pd140; pd140 = (* (( (ptr) (* (( (ptr) gf_c60356)+166)/* var_c54596 */ ))+65) ); err_v23316 = (word) ( *( (fPt) ((* (ptr) pd140 ))))(c_v15208, details_v15404, pd140); }; SOURCE(30036, 45) if ((err_v23316 != 0)) { SOURCE(30052, 29) var_c57060 = (* (( (ptr) (* (( (ptr) gf_c60356)+169)/* var_c54980 */ ))+4) ); var_c57092 = (word) err_v23316; (void) (XR_MonitorExit(c_v15208)); goto lab_L100122; }; }; }; SOURCE(29256, 825) (void) (XR_MonitorExit(c_v15208)); return(ok_v15448); /* c2c skipped dead code */ lab_L100122: ; SOURCE(30052, 29) { word var_c0630; var_c0630 = var_c57092; (void) XR_RaiseError(var_c57060, (word) &var_c0630); }; } static void ImageChar_P4080(c_v15508, drawable_v15536, pos_v15564, gc_v15592, ch_v15620, details_v15648) word c_v15508; word drawable_v15536; W2 pos_v15564; word gc_v15592; word ch_v15620; word details_v15648; { register ptr gf_c60388 = (ptr) &globalframe; word var_c57124; word var_c57156; word err_v23388 = 0; word gcid_v23416; /* ImageChar: */ SOURCE(30090, 453) (void) (XR_MonitorEntry(c_v15508)); SOURCE(30242, 52) gcid_v23416 = (word) UseGContext_P1560(c_v15508, drawable_v15536, gc_v15592, details_v15648); SOURCE(30296, 18) { word pd141; pd141 = (* (( (ptr) (* (( (ptr) gf_c60388)+166)/* var_c54596 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd141 ))))(c_v15508, 76, 1, 5, pd141); }; SOURCE(30316, 25) (void) BPutDrawable_P300(c_v15508, drawable_v15536); SOURCE(30344, 15) (void) BPut32_P240(c_v15508, gcid_v23416); SOURCE(30362, 17) (void) BPutPoint_P480(c_v15508, pos_v15564); SOURCE(30381, 18) { word c_v51784; word b_v51812; c_v51784 = c_v15508; b_v51812 = ch_v15620; { word n_v51844; n_v51844 = (* (( (ptr) c_v51784)+4) ); (* (( (bPt) (* (( (ptr) c_v51784)+7) ))+n_v51844) ) = b_v51812; (* (( (ptr) c_v51784)+4) ) = (n_v51844 + 1); }; }; SOURCE(30401, 12) { word c_v51708; c_v51708 = c_v15508; { word n_v51740; n_v51740 = (* (( (ptr) c_v51708)+4) ); (* (( (bPt) (* (( (ptr) c_v51708)+7) ))+n_v51740) ) = 0; (* (( (ptr) c_v51708)+4) ) = (n_v51740 + 1); }; }; SOURCE(30415, 12) { word c_v51632; c_v51632 = c_v15508; { word n_v51664; n_v51664 = (* (( (ptr) c_v51632)+4) ); (* (( (bPt) (* (( (ptr) c_v51632)+7) ))+n_v51664) ) = 0; (* (( (ptr) c_v51632)+4) ) = (n_v51664 + 1); }; }; SOURCE(30429, 12) { word c_v51556; c_v51556 = c_v15508; { word n_v51588; n_v51588 = (* (( (ptr) c_v51556)+4) ); (* (( (bPt) (* (( (ptr) c_v51556)+7) ))+n_v51588) ) = 0; (* (( (ptr) c_v51556)+4) ) = (n_v51588 + 1); }; }; SOURCE(30443, 53) { word pd142; pd142 = (* (( (ptr) (* (( (ptr) gf_c60388)+166)/* var_c54596 */ ))+65) ); err_v23388 = (word) ( *( (fPt) ((* (ptr) pd142 ))))(c_v15508, details_v15648, pd142); }; SOURCE(30498, 45) if ((err_v23388 != 0)) { SOURCE(30514, 29) var_c57124 = (* (( (ptr) (* (( (ptr) gf_c60388)+169)/* var_c54980 */ ))+4) ); var_c57156 = (word) err_v23388; (void) (XR_MonitorExit(c_v15508)); goto lab_L100124; }; SOURCE(30090, 453) (void) (XR_MonitorExit(c_v15508)); return; /* c2c skipped dead code */ lab_L100124: ; SOURCE(30514, 29) { word var_c0650; var_c0650 = var_c57156; (void) XR_RaiseError(var_c57124, (word) &var_c0650); }; } static void ImageRope_P4140(c_v15708, drawable_v15736, pos_v15764, gc_v15792, r_v15820, details_v15848) word c_v15708; word drawable_v15736; W2 pos_v15764; word gc_v15792; word r_v15820; word details_v15848; { register ptr gf_c60420 = (ptr) &globalframe; word var_c57220; word var_c57252; word var_c57284; word err_v23460 = 0; word n_v23488; word gcid_v23516; /* ImageRope: */ SOURCE(30549, 499) (void) (XR_MonitorEntry(c_v15708)); SOURCE(30699, 23) { word pd143; pd143 = (* (( (ptr) (* (( (ptr) gf_c60420)+172)/* var_c57188 */ ))+14) ); n_v23488 = (word) ( *( (fPt) ((* (ptr) pd143 ))))(r_v15820, pd143); }; SOURCE(30738, 47) if (( (int)n_v23488 >= (int)255)) { SOURCE(30760, 25) var_c57220 = (word) (( (bPt) gf_c60420)+92)/* var_c52068 */ ; (void) (XR_MonitorExit(c_v15708)); goto lab_L100126; }; SOURCE(30787, 44) gcid_v23516 = (word) UseGContext_P1560(c_v15708, drawable_v15736, gc_v15792, details_v15848); SOURCE(30833, 26) { word pd144; pd144 = (* (( (ptr) (* (( (ptr) gf_c60420)+166)/* var_c54596 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd144 ))))(c_v15708, 76, BCK(n_v23488, 256), (IOP2( / , (int)(n_v23488 + 3), (int)4) + 4), pd144) ; }; SOURCE(30861, 25) (void) BPutDrawable_P300(c_v15708, drawable_v15736); SOURCE(30889, 15) (void) BPut32_P240(c_v15708, gcid_v23516); SOURCE(30907, 17) (void) BPutPoint_P480(c_v15708, pos_v15764); SOURCE(30926, 20) { word pd145; pd145 = (* (( (ptr) (* (( (ptr) gf_c60420)+166)/* var_c54596 */ ))+37) ); (void) ( *( (fPt) ((* (ptr) pd145 ))))(c_v15708, r_v15820, 0, 2147483647, pd145); }; SOURCE(30948, 53) { word pd146; pd146 = (* (( (ptr) (* (( (ptr) gf_c60420)+166)/* var_c54596 */ ))+65) ); err_v23460 = (word) ( *( (fPt) ((* (ptr) pd146 ))))(c_v15708, details_v15848, pd146); }; SOURCE(31003, 45) if ((err_v23460 != 0)) { SOURCE(31019, 29) var_c57252 = (* (( (ptr) (* (( (ptr) gf_c60420)+169)/* var_c54980 */ ))+4) ); var_c57284 = (word) err_v23460; (void) (XR_MonitorExit(c_v15708)); goto lab_L100127; }; SOURCE(30549, 499) (void) (XR_MonitorExit(c_v15708)); return; /* c2c skipped dead code */ lab_L100126: ; SOURCE(30760, 25) (void) XR_RaiseError(var_c57220, 0); lab_L100127: ; SOURCE(31019, 29) { word var_c0663; var_c0663 = var_c57284; (void) XR_RaiseError(var_c57252, (word) &var_c0663); }; } static word ToInt8Rep_P4200(i_v15908) word i_v15908; { word var_c15952; /* ToInt8Rep: */ SOURCE(31054, 124) if ( ( ( (int)i_v15908 >= (int)0) ? ( (int)i_v15908 < (int)128) : 0 ) ) { SOURCE(31133, 10) return(BCK(i_v15908, 256)); } else { if ( ( ( (int)i_v15908 < (int)0) ? ( (int)i_v15908 >= (int) (word) -128) : 0 ) ) { SOURCE(31164, 14) return(BCK((i_v15908 + 256), 256)); } else { SOURCE(31191, 5) (void) XR_RaiseUnnamedError(); }; }; } static void DrawChar_P4260(c_v16012, formal_c0980, formal_c0981, formal_c0982, formal_c0983, formal_c0984, formal_c0985) word c_v16012; word formal_c0980; W2 formal_c0981; word formal_c0982; word formal_c0983; word formal_c0984; word formal_c0985; { W13 var_c60452; /* declaration of drawable_v16040 skipped */ /* declaration of pos_v16068 skipped */ /* declaration of gc_v16096 skipped */ /* declaration of ch_v16124 skipped */ /* declaration of delta_v16152 skipped */ /* declaration of details_v16180 skipped */ register ptr gf_c60484 = (ptr) &globalframe; /* declaration of var_c57316 skipped */ (* (( (ptr) &var_c60452)+4)/* drawable_v16040 */ ) = formal_c0980; (* (W2Pt) (( (ptr) &var_c60452)+5)/* pos_v16068 */ ) = formal_c0981; (* (( (ptr) &var_c60452)+7)/* gc_v16096 */ ) = formal_c0982; (* (( (ptr) &var_c60452)+8)/* ch_v16124 */ ) = formal_c0983; (* (( (ptr) &var_c60452)+9)/* delta_v16152 */ ) = formal_c0984; (* (( (ptr) &var_c60452)+10)/* details_v16180 */ ) = formal_c0985; /* DrawChar: */ SOURCE(31202, 657) { word tmpAddr147; tmpAddr147 = (word) (( (ptr) &var_c60452)+11)/* var_c57316 */ ; (* (ptr) tmpAddr147 ) = ( ((word) (fPt) EntryDoit_P7056) ); (* (( (ptr) tmpAddr147) + 1) ) = 1; }; SOURCE(31746, 113) if ( ( ( (int)(* (( (ptr) &var_c60452)+9)/* delta_v16152 */ ) >= (int) (word) -128) ? ( (int)(* (( (ptr) &var_c60452)+9) /* delta_v16152 */ ) <= (int)127) : 0 ) ) { SOURCE(31776, 18) (void) EntryDoit_P7056(c_v16012, (word) (( (bPt) &var_c60452)+44)/* var_c57316 */ ); } else { SOURCE(31794, 65) { word var_c57348; { word pd148; pd148 = (* (( (ptr) (* (( (ptr) gf_c60484)+172)/* var_c57188 */ ))+37) ); var_c57348 = (word) ( *( (fPt) ((* (ptr) pd148 ))))((* ((( (ptr) &var_c60452)+8)/* ch_v16124 */ ) ), pd148); }; (void) DrawRope_P4320(c_v16012, (* (( (ptr) &var_c60452)+4)/* drawable_v16040 */ ), (* (W2Pt) (( (ptr) &var_c60452)+5)/* pos_v16068 */ ), (* ( ( (ptr) &var_c60452)+7)/* gc_v16096 */ ), var_c57348, (* (( (ptr) &var_c60452)+9)/* delta_v16152 */ ) , (* (( (ptr) &var_c60452)+10)/* details_v16180 */ )); }; }; } static void EntryDoit_P7056(c_v23636, formal_c60548) word c_v23636; word formal_c60548; { register ptr gf_c60516 = (ptr) &globalframe; word var_c57380; word var_c57412; word err_v23664 = 0; word gcid_v23692; formal_c60548 = (formal_c60548 - 44); /* EntryDoit: */ SOURCE(31334, 407) (void) (XR_MonitorEntry(c_v23636)); SOURCE(31399, 52) gcid_v23692 = (word) UseGContext_P1560(c_v23636, (* (( (ptr) formal_c60548)+4) ), (* (( (ptr) formal_c60548)+7) ), (* (( (ptr) formal_c60548)+10) )); SOURCE(31453, 18) { word pd149; pd149 = (* (( (ptr) (* (( (ptr) gf_c60516)+166)/* var_c54596 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd149 ))))(c_v23636, 74, 0, 5, pd149); }; SOURCE(31473, 25) (void) BPutDrawable_P300(c_v23636, (* (( (ptr) formal_c60548)+4) )); SOURCE(31501, 15) (void) BPut32_P240(c_v23636, gcid_v23692); SOURCE(31519, 17) (void) BPutPoint_P480(c_v23636, (* (W2Pt) (( (ptr) formal_c60548)+5) )); SOURCE(31538, 12) { word c_v51480; c_v51480 = c_v23636; { word n_v51512; n_v51512 = (* (( (ptr) c_v51480)+4) ); (* (( (bPt) (* (( (ptr) c_v51480)+7) ))+n_v51512) ) = 1; (* (( (ptr) c_v51480)+4) ) = (n_v51512 + 1); }; }; SOURCE(31566, 27) { word c_v51376; word b_v51404; c_v51376 = c_v23636; b_v51404 = (word) ToInt8Rep_P4200((* ((( (ptr) formal_c60548)+9)) )); { word n_v51436; n_v51436 = (* (( (ptr) c_v51376)+4) ); (* (( (bPt) (* (( (ptr) c_v51376)+7) ))+n_v51436) ) = b_v51404; (* (( (ptr) c_v51376)+4) ) = (n_v51436 + 1); }; }; SOURCE(31596, 18) { word c_v51272; word b_v51300; c_v51272 = c_v23636; b_v51300 = (* (( (ptr) formal_c60548)+8) ); { word n_v51332; n_v51332 = (* (( (ptr) c_v51272)+4) ); (* (( (bPt) (* (( (ptr) c_v51272)+7) ))+n_v51332) ) = b_v51300; (* (( (ptr) c_v51272)+4) ) = (n_v51332 + 1); }; }; SOURCE(31617, 12) { word c_v51196; c_v51196 = c_v23636; { word n_v51228; n_v51228 = (* (( (ptr) c_v51196)+4) ); (* (( (bPt) (* (( (ptr) c_v51196)+7) ))+n_v51228) ) = 0; (* (( (ptr) c_v51196)+4) ) = (n_v51228 + 1); }; }; SOURCE(31641, 53) { word pd150; pd150 = (* (( (ptr) (* (( (ptr) gf_c60516)+166)/* var_c54596 */ ))+65) ); err_v23664 = (word) ( *( (fPt) ((* (ptr) pd150 ))))(c_v23636, (* (( (ptr) formal_c60548)+10) ), pd150); }; SOURCE(31696, 45) if ((err_v23664 != 0)) { SOURCE(31712, 29) var_c57380 = (* (( (ptr) (* (( (ptr) gf_c60516)+169)/* var_c54980 */ ))+4) ); var_c57412 = (word) err_v23664; (void) (XR_MonitorExit(c_v23636)); goto lab_L100129; }; SOURCE(31334, 407) (void) (XR_MonitorExit(c_v23636)); return; /* c2c skipped dead code */ lab_L100129: ; SOURCE(31712, 29) { word var_c0690; var_c0690 = var_c57412; (void) XR_RaiseError(var_c57380, (word) &var_c0690); }; } static void DrawRope_P4320(c_v16240, formal_c0986, formal_c0987, formal_c0988, formal_c0989, formal_c0990, formal_c0991) word c_v16240; word formal_c0986; W2 formal_c0987; word formal_c0988; word formal_c0989; word formal_c0990; word formal_c0991; { W16 var_c60580; /* declaration of drawable_v16268 skipped */ /* declaration of pos_v16296 skipped */ /* declaration of gc_v16324 skipped */ /* declaration of r_v16352 skipped */ /* declaration of delta_v16380 skipped */ /* declaration of details_v16408 skipped */ register ptr gf_c60612 = (ptr) &globalframe; /* declaration of var_c57444 skipped */ /* declaration of var_c57476 skipped */ /* declaration of leng_v23736 skipped */ (* (( (ptr) &var_c60580)+4)/* drawable_v16268 */ ) = formal_c0986; (* (W2Pt) (( (ptr) &var_c60580)+5)/* pos_v16296 */ ) = formal_c0987; (* (( (ptr) &var_c60580)+7)/* gc_v16324 */ ) = formal_c0988; (* (( (ptr) &var_c60580)+8)/* r_v16352 */ ) = formal_c0989; (* (( (ptr) &var_c60580)+9)/* delta_v16380 */ ) = formal_c0990; (* (( (ptr) &var_c60580)+10)/* details_v16408 */ ) = formal_c0991; /* DrawRope: */ SOURCE(31865, 1102) { word tmpAddr151; tmpAddr151 = (word) (( (ptr) &var_c60580)+11)/* var_c57444 */ ; (* (ptr) tmpAddr151 ) = ( ((word) (fPt) MyDeliver_P7224) ); (* (( (ptr) tmpAddr151) + 1) ) = 1; }; { word tmpAddr152; tmpAddr152 = (word) (( (ptr) &var_c60580)+13)/* var_c57476 */ ; (* (ptr) tmpAddr152 ) = ( ((word) (fPt) EnryDrawRope_P7116) ); (* (( (ptr) tmpAddr152) + 1) ) = 1; }; SOURCE(32001, 26) { word pd153; pd153 = (* (( (ptr) (* (( (ptr) gf_c60612)+172)/* var_c57188 */ ))+14) ); (* (( (ptr) &var_c60580)+15)/* leng_v23736 */ ) = (word) ( *( (fPt) ((* (ptr) pd153 ))))((* ((( (ptr) &var_c60580)+8)/* r_v16352 */ ) ), pd153) ; }; SOURCE(32782, 185) if (( (int)(* (( (ptr) &var_c60580)+15)/* leng_v23736 */ ) > (int)0)) { SOURCE(32799, 168) if ( ( ( (int)(* (( (ptr) &var_c60580)+9)/* delta_v16380 */ ) >= (int) (word) -128) ? ( (int)(* (( (ptr) &var_c60580)+9) /* delta_v16380 */ ) <= (int)127) : 0 ) ) { SOURCE(32829, 21) (void) EnryDrawRope_P7116(c_v16240, (word) (( (bPt) &var_c60580)+52)/* var_c57476 */ ); } else { SOURCE(32850, 119) SOURCE(32911, 56) (void) PolyText8_P4440(c_v16240, (* (( (ptr) &var_c60580)+4)/* drawable_v16268 */ ), (* (W2Pt) (( (ptr) &var_c60580)+5) /* pos_v16296 */ ), (* (( (ptr) &var_c60580)+7)/* gc_v16324 */ ), (word) (( (bPt) &var_c60580)+44)/* var_c57444 */ , 0 , (* (( (ptr) &var_c60580)+10)/* details_v16408 */ )); }; }; } static void EnryDrawRope_P7116(c_v23840, formal_c60676) word c_v23840; word formal_c60676; { register ptr gf_c60644 = (ptr) &globalframe; word var_c57572; word var_c57604; word err_v23912 = 0; word gcid_v23940; word pieceStart_v23968 = 0; word n_v23996; formal_c60676 = (formal_c60676 - 52); /* EnryDrawRope: */ SOURCE(32029, 748) (void) (XR_MonitorEntry(c_v23840)); SOURCE(32097, 52) gcid_v23940 = (word) UseGContext_P1560(c_v23840, (* (( (ptr) formal_c60676)+4) ), (* (( (ptr) formal_c60676)+7) ), (* (( (ptr) formal_c60676)+10) )); SOURCE(32180, 49) { word x154; word x155; (* (( (ptr) formal_c60676)+15) ) = (x154 = (* (( (ptr) formal_c60676)+15) ), x155 = IOP2( / , (int)(* (( (ptr) (* (( (ptr) c_v23840)+16) ))+7) ), (int)2), MIN((int)(word), x154, x155)); }; SOURCE(32249, 31) n_v23996 = (IOP2( * , (int)IOP2( / , (int)((* (( (ptr) formal_c60676)+15) ) + 253), (int)254), (int)2) + (* (( (ptr) formal_c60676)+15) )); SOURCE(32282, 26) { word pd156; pd156 = (* (( (ptr) (* (( (ptr) gf_c60644)+166)/* var_c54596 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd156 ))))(c_v23840, 74, 0, (IOP2( / , (int)(n_v23996 + 3), (int)4) + 4), pd156); }; SOURCE(32310, 25) (void) BPutDrawable_P300(c_v23840, (* (( (ptr) formal_c60676)+4) )); SOURCE(32338, 15) (void) BPut32_P240(c_v23840, gcid_v23940); SOURCE(32356, 17) (void) BPutPoint_P480(c_v23840, (* (W2Pt) (( (ptr) formal_c60676)+5) )); SOURCE(32375, 212) lab_L100133: ; if (( (int)(* (( (ptr) formal_c60676)+15) ) > (int)0)) { } else { goto lab_L100131; }; { word pieceLeng_v24040; SOURCE(32391, 31) { word x157; pieceLeng_v24040 = (x157 = (* (( (ptr) formal_c60676)+15) ), MIN((int)(word), x157, 254)); }; SOURCE(32424, 19) (void) BPut8_P120(c_v23840, BCK(pieceLeng_v24040, 256)); SOURCE(32445, 26) { word var_c57508; var_c57508 = (word) ToInt8Rep_P4200((* ((( (ptr) formal_c60676)+9)) )); (void) BPut8_P120(c_v23840, var_c57508); }; SOURCE(32474, 37) { word pd158; pd158 = (* (( (ptr) (* (( (ptr) gf_c60644)+166)/* var_c54596 */ ))+38) ); (void) ( *( (fPt) ((* (ptr) pd158 ))))(c_v23840, (* (( (ptr) formal_c60676)+8) ), pieceStart_v23968, pieceLeng_v24040, pd158) ; }; SOURCE(32514, 23) (* (( (ptr) formal_c60676)+15) ) = ((* (( (ptr) formal_c60676)+15) ) - pieceLeng_v24040); SOURCE(32541, 35) pieceStart_v23968 = (pieceStart_v23968 + pieceLeng_v24040); SOURCE(32578, 9) (* (( (ptr) formal_c60676)+9) ) = 0; }; goto lab_L100133; lab_L100131: ; SOURCE(32598, 26) { word var_c57540; { word pd159; pd159 = (* (( (ptr) (* (( (ptr) gf_c60644)+166)/* var_c54596 */ ))+5) ); var_c57540 = (word) ( *( (fPt) ((* (ptr) pd159 ))))(n_v23996, pd159); }; { word pd160; pd160 = (* (( (ptr) (* (( (ptr) gf_c60644)+166)/* var_c54596 */ ))+23) ); (void) ( *( (fPt) ((* (ptr) pd160 ))))(c_v23840, var_c57540, pd160); }; }; SOURCE(32677, 53) { word pd161; pd161 = (* (( (ptr) (* (( (ptr) gf_c60644)+166)/* var_c54596 */ ))+65) ); err_v23912 = (word) ( *( (fPt) ((* (ptr) pd161 ))))(c_v23840, (* (( (ptr) formal_c60676)+10) ), pd161); }; SOURCE(32732, 45) if ((err_v23912 != 0)) { SOURCE(32748, 29) var_c57572 = (* (( (ptr) (* (( (ptr) gf_c60644)+169)/* var_c54980 */ ))+4) ); var_c57604 = (word) err_v23912; (void) (XR_MonitorExit(c_v23840)); goto lab_L100134; }; SOURCE(32029, 748) (void) (XR_MonitorExit(c_v23840)); return; /* c2c skipped dead code */ lab_L100134: ; SOURCE(32748, 29) { word var_c0711; var_c0711 = var_c57604; (void) XR_RaiseError(var_c57572, (word) &var_c0711); }; } static void MyDeliver_P7224(formal_c0719, data_v44396, formal_c60708) word formal_c0719; word data_v44396; word formal_c60708; { word newFont_v44440; word delta_v44468; word text_v44496; word startPos_v44524; word length_v44552; word more_v44580; formal_c60708 = (formal_c60708 - 44); /* MyDeliver: */ SOURCE(32852, 30) SOURCE(32852, 30) newFont_v44440 = 0; SOURCE(32852, 30) delta_v44468 = 0; SOURCE(32852, 30) text_v44496 = 0; SOURCE(32852, 30) startPos_v44524 = 0; SOURCE(32852, 30) length_v44552 = 2147483647; SOURCE(32852, 30) more_v44580 = 0; SOURCE(32884, 8) text_v44496 = (* (( (ptr) formal_c60708)+8) ); /* removed bogus assignment */ /* removed tail goto */ (* (ptr) formal_c0719 ) = newFont_v44440; (* (( (ptr) formal_c0719)+1) ) = delta_v44468; (* (( (ptr) formal_c0719)+2) ) = text_v44496; (* (( (ptr) formal_c0719)+3) ) = startPos_v44524; (* (( (ptr) formal_c0719)+4) ) = length_v44552; (* (( (ptr) formal_c0719)+5) ) = more_v44580; return; } static word AppendBigEndianCARD32_P4380(t_v16468, c_v16496) word t_v16468; word c_v16496; { register ptr gf_c60740 = (ptr) &globalframe; word var_c16552; word f0_v24084; word f1_v24112; word f2_v24140; word f3_v24168; /* AppendBigEndianCARD32: */ SOURCE(32978, 352) SOURCE(33076, 14) f3_v24168 = (c_v16496 & 0377); SOURCE(33092, 10) c_v16496 = ((word) c_v16496 >> 8); SOURCE(33104, 14) f2_v24140 = (c_v16496 & 0377); SOURCE(33120, 10) c_v16496 = ((word) c_v16496 >> 8); SOURCE(33132, 14) f1_v24112 = (c_v16496 & 0377); SOURCE(33148, 10) c_v16496 = ((word) c_v16496 >> 8); SOURCE(33160, 14) f0_v24084 = (c_v16496 & 0377); SOURCE(33176, 34) { word pd162; pd162 = (* (( (ptr) (* (( (ptr) gf_c60740)+171)/* var_c56324 */ ))+11) ); t_v16468 = (word) ( *( (fPt) ((* (ptr) pd162 ))))(t_v16468, f0_v24084, pd162); }; SOURCE(33212, 34) { word pd163; pd163 = (* (( (ptr) (* (( (ptr) gf_c60740)+171)/* var_c56324 */ ))+11) ); t_v16468 = (word) ( *( (fPt) ((* (ptr) pd163 ))))(t_v16468, f1_v24112, pd163); }; SOURCE(33248, 34) { word pd164; pd164 = (* (( (ptr) (* (( (ptr) gf_c60740)+171)/* var_c56324 */ ))+11) ); t_v16468 = (word) ( *( (fPt) ((* (ptr) pd164 ))))(t_v16468, f2_v24140, pd164); }; SOURCE(33284, 34) { word pd165; pd165 = (* (( (ptr) (* (( (ptr) gf_c60740)+171)/* var_c56324 */ ))+11) ); t_v16468 = (word) ( *( (fPt) ((* (ptr) pd165 ))))(t_v16468, f3_v24168, pd165); }; SOURCE(33320, 10) return(t_v16468); } static void PolyText8_P4440(c_v16624, formal_c0992, formal_c0993, formal_c0994, deliver_v16736, data_v16764, formal_c0995) word c_v16624; word formal_c0992; W2 formal_c0993; word formal_c0994; word deliver_v16736; word data_v16764; word formal_c0995; { W14 var_c60772; /* declaration of drawable_v16652 skipped */ /* declaration of pos_v16680 skipped */ /* declaration of gc_v16708 skipped */ /* declaration of details_v16792 skipped */ register ptr gf_c60804 = (ptr) &globalframe; /* declaration of var_c57636 skipped */ word maxLeng_v24240; /* declaration of buffer_v24268 skipped */ word newFont_v24296 = 0; word firstOtherFont_v24324 = 0; /* declaration of lastOtherFont_v24352 skipped */ word newFonts_v24380 = 0; word delta_v24408 = 0; word text_v24436 = 0; word startPos_v24464 = 0; word length_v24492 = 0; /* declaration of n_v24520 skipped */ word more_v24548; (* (( (ptr) &var_c60772)+4)/* drawable_v16652 */ ) = formal_c0992; (* (W2Pt) (( (ptr) &var_c60772)+5)/* pos_v16680 */ ) = formal_c0993; (* (( (ptr) &var_c60772)+7)/* gc_v16708 */ ) = formal_c0994; (* (( (ptr) &var_c60772)+8)/* details_v16792 */ ) = formal_c0995; /* PolyText8: */ SOURCE(33336, 2623) { word tmpAddr166; tmpAddr166 = (word) (( (ptr) &var_c60772)+9)/* var_c57636 */ ; (* (ptr) tmpAddr166 ) = ( ((word) (fPt) EntryDoit_P7332) ); (* (( (ptr) tmpAddr166) + 1) ) = 1; }; SOURCE(34027, 76) { word x167; maxLeng_v24240 = (x167 = ((* (( (ptr) (* (( (ptr) c_v16624)+16) ))+7) ) - 100), MIN((int)(word), x167, 32767)); }; SOURCE(34105, 54) { word pd168; pd168 = (* (( (ptr) (* (( (ptr) gf_c60804)+171)/* var_c56324 */ ))+6) ); (* (( (ptr) &var_c60772)+11)/* buffer_v24268 */ ) = (word) ( *( (fPt) ((* (ptr) pd168 ))))(512, pd168); }; SOURCE(34186, 44) (* (( (ptr) &var_c60772)+12)/* lastOtherFont_v24352 */ ) = 0; SOURCE(34459, 28) (* (( (ptr) &var_c60772)+13)/* n_v24520 */ ) = 0; SOURCE(34501, 1359) lab_L100139: ; SOURCE(34504, 108) { W6 var_c57668; (void) ( *( (fPt) ((* (ptr) deliver_v16736 ))))((word) &var_c57668, data_v16764, deliver_v16736); more_v24548 = var_c57668.f5; length_v24492 = var_c57668.f4; startPos_v24464 = var_c57668.f3; text_v24436 = var_c57668.f2; delta_v24408 = var_c57668.f1; newFont_v24296 = var_c57668.f0; }; SOURCE(34614, 360) if ( ( (newFont_v24296 != 0) ? (newFont_v24296 != (* (( (ptr) &var_c60772)+12)/* lastOtherFont_v24352 */ )) : 0 ) ) { SOURCE(34660, 316) { word id_v24748; word var_c57700; word base_v49148; SOURCE(34662, 30) { word pd169; pd169 = (* (( (ptr) (* (( (ptr) gf_c60804)+169)/* var_c54980 */ ))+7) ); id_v24748 = (word) ( *( (fPt) ((* (ptr) pd169 ))))(newFont_v24296, pd169); }; SOURCE(34694, 44) base_v49148 = (* (( (ptr) &var_c60772)+11)/* buffer_v24268 */ ); { word tc170; word idx171; if ((base_v49148 == 0)) { tc170 = (word) 0; } else { tc170 = (word) (unsigned) (* (hPt) base_v49148 ); }; var_c57700 = ( idx171 = (word) tc170, BCK(idx171, 32768) ); }; if (( (int)var_c57700 >= (int)(maxLeng_v24240 - 5))) { SOURCE(34738, 4) goto lab_L100138; }; SOURCE(34744, 13) if ((id_v24748 == 0)) { SOURCE(34757, 5) (void) XR_RaiseUnnamedError(); }; SOURCE(34764, 45) { word pd172; pd172 = (* (( (ptr) (* (( (ptr) gf_c60804)+171)/* var_c56324 */ ))+11) ); (* (( (ptr) &var_c60772)+11)/* buffer_v24268 */ ) = (word) ( *( (fPt) ((* (ptr) pd172 ))))((* (( (ptr) &var_c60772)+11) /* buffer_v24268 */ ), 255, pd172); }; SOURCE(34811, 42) (* (( (ptr) &var_c60772)+11)/* buffer_v24268 */ ) = (word) AppendBigEndianCARD32_P4380((* (( (ptr) &var_c60772)+11)/* buffer_v24268 */ ), id_v24748) ; SOURCE(34855, 23) (* (( (ptr) &var_c60772)+12)/* lastOtherFont_v24352 */ ) = newFont_v24296; SOURCE(34881, 93) if ((firstOtherFont_v24324 == 0)) { SOURCE(34909, 31) firstOtherFont_v24324 = newFont_v24296; } else { SOURCE(34940, 34) { word var_c57732; var_c57732 = XR_NewObject(8, (* (( (ptr) gf_c60804)+12) )); (* (ptr) var_c57732 ) = newFont_v24296; (* (( (ptr) var_c57732)+1) ) = newFonts_v24380; newFonts_v24380 = var_c57732; }; }; }; }; SOURCE(34979, 56) { word pd173; word x174; word x175; pd173 = (* (( (ptr) (* (( (ptr) gf_c60804)+172)/* var_c57188 */ ))+14) ); length_v24492 = (x175 = (x174 = ((word) ( *( (fPt) ((* (ptr) pd173 ))))(text_v24436, pd173) - startPos_v24464), MAX((int)(word), x174, 0)), MIN((int)(word), length_v24492, x175)); }; SOURCE(35038, 180) lab_L100143: ; if (( (int)delta_v24408 > (int)127)) { } else { goto lab_L100141; }; { word var_c57764; word base_v49100; SOURCE(35059, 44) base_v49100 = (* (( (ptr) &var_c60772)+11)/* buffer_v24268 */ ); { word tc176; word idx177; if ((base_v49100 == 0)) { tc176 = (word) 0; } else { tc176 = (word) (unsigned) (* (hPt) base_v49100 ); }; var_c57764 = ( idx177 = (word) tc176, BCK(idx177, 32768) ); }; if (( (int)var_c57764 >= (int)(maxLeng_v24240 - 2))) { SOURCE(35103, 4) goto lab_L100142; }; SOURCE(35109, 43) { word pd178; pd178 = (* (( (ptr) (* (( (ptr) gf_c60804)+171)/* var_c56324 */ ))+11) ); (* (( (ptr) &var_c60772)+11)/* buffer_v24268 */ ) = (word) ( *( (fPt) ((* (ptr) pd178 ))))((* (( (ptr) &var_c60772)+11) /* buffer_v24268 */ ), 0, pd178); }; SOURCE(35154, 45) { word pd179; pd179 = (* (( (ptr) (* (( (ptr) gf_c60804)+171)/* var_c56324 */ ))+11) ); (* (( (ptr) &var_c60772)+11)/* buffer_v24268 */ ) = (word) ( *( (fPt) ((* (ptr) pd179 ))))((* (( (ptr) &var_c60772)+11) /* buffer_v24268 */ ), 127, pd179); }; SOURCE(35201, 17) delta_v24408 = (delta_v24408 - 127); }; goto lab_L100143; lab_L100141: ; lab_L100142: ; SOURCE(35229, 181) lab_L100147: ; if (( (int)delta_v24408 < (int) (word) -128)) { } else { goto lab_L100145; }; { word var_c57796; word base_v49052; SOURCE(35251, 44) base_v49052 = (* (( (ptr) &var_c60772)+11)/* buffer_v24268 */ ); { word tc180; word idx181; if ((base_v49052 == 0)) { tc180 = (word) 0; } else { tc180 = (word) (unsigned) (* (hPt) base_v49052 ); }; var_c57796 = ( idx181 = (word) tc180, BCK(idx181, 32768) ); }; if (( (int)var_c57796 >= (int)(maxLeng_v24240 - 2))) { SOURCE(35295, 4) goto lab_L100146; }; SOURCE(35301, 43) { word pd182; pd182 = (* (( (ptr) (* (( (ptr) gf_c60804)+171)/* var_c56324 */ ))+11) ); (* (( (ptr) &var_c60772)+11)/* buffer_v24268 */ ) = (word) ( *( (fPt) ((* (ptr) pd182 ))))((* (( (ptr) &var_c60772)+11) /* buffer_v24268 */ ), 0, pd182); }; SOURCE(35346, 45) { word pd183; pd183 = (* (( (ptr) (* (( (ptr) gf_c60804)+171)/* var_c56324 */ ))+11) ); (* (( (ptr) &var_c60772)+11)/* buffer_v24268 */ ) = (word) ( *( (fPt) ((* (ptr) pd183 ))))((* (( (ptr) &var_c60772)+11) /* buffer_v24268 */ ), 128, pd183); }; SOURCE(35393, 17) delta_v24408 = (delta_v24408 + 128); }; goto lab_L100147; lab_L100145: ; lab_L100146: ; SOURCE(35421, 412) if (( (int)length_v24492 > (int)0) || ( (int)delta_v24408 != (int)0)) { SOURCE(35451, 382) lab_L100151: ; SOURCE(35451, 382) { word pieceLength_v24792; word var_c57828; word base_v49004; SOURCE(35454, 35) pieceLength_v24792 = (MIN((int)(word), 254, length_v24492)); SOURCE(35491, 56) base_v49004 = (* (( (ptr) &var_c60772)+11)/* buffer_v24268 */ ); { word tc184; word idx185; if ((base_v49004 == 0)) { tc184 = (word) 0; } else { tc184 = (word) (unsigned) (* (hPt) base_v49004 ); }; var_c57828 = ( idx185 = (word) tc184, BCK(idx185, 32768) ); }; if (( (int)var_c57828 >= (int)((maxLeng_v24240 - pieceLength_v24792) - 2))) { SOURCE(35547, 4) goto lab_L100150; }; SOURCE(35553, 53) { word pd186; pd186 = (* (( (ptr) (* (( (ptr) gf_c60804)+171)/* var_c56324 */ ))+11) ); (* (( (ptr) &var_c60772)+11)/* buffer_v24268 */ ) = (word) ( *( (fPt) ((* (ptr) pd186 ))))((* (( (ptr) &var_c60772)+11) /* buffer_v24268 */ ), BCK(pieceLength_v24792, 256), pd186); }; SOURCE(35608, 58) { word var_c57860; var_c57860 = (word) ToInt8Rep_P4200(delta_v24408); { word pd187; pd187 = (* (( (ptr) (* (( (ptr) gf_c60804)+171)/* var_c56324 */ ))+11) ); (* (( (ptr) &var_c60772)+11)/* buffer_v24268 */ ) = (word) ( *( (fPt) ((* (ptr) pd187 ))))((* (( (ptr) &var_c60772)+11) /* buffer_v24268 */ ), var_c57860, pd187); }; }; SOURCE(35668, 64) { word pd188; pd188 = (* (( (ptr) (* (( (ptr) gf_c60804)+171)/* var_c56324 */ ))+10) ); (* (( (ptr) &var_c60772)+11)/* buffer_v24268 */ ) = (word) ( *( (fPt) ((* (ptr) pd188 ))))((* (( (ptr) &var_c60772)+11) /* buffer_v24268 */ ), text_v24436, startPos_v24464, BCK(pieceLength_v24792, 32768), pd188); }; SOURCE(35734, 33) startPos_v24464 = (startPos_v24464 + pieceLength_v24792); SOURCE(35769, 29) length_v24492 = (length_v24492 - pieceLength_v24792); SOURCE(35800, 18) if (( (int)length_v24492 <= (int)0)) { SOURCE(35818, 4) goto lab_L100150; }; SOURCE(35824, 9) delta_v24408 = 0; }; goto lab_L100151; lab_L100150: ; }; SOURCE(35846, 14) if ((0 == more_v24548)) { SOURCE(35860, 4) goto lab_L100138; }; goto lab_L100139; lab_L100138: ; SOURCE(35875, 26) { word var_c57892; word base_v48956; base_v48956 = (* (( (ptr) &var_c60772)+11)/* buffer_v24268 */ ); { word tc189; word idx190; if ((base_v48956 == 0)) { tc189 = (word) 0; } else { tc189 = (word) (unsigned) (* (hPt) base_v48956 ); }; var_c57892 = ( idx190 = (word) tc189, BCK(idx190, 32768) ); }; (* (( (ptr) &var_c60772)+13)/* n_v24520 */ ) = var_c57892; }; SOURCE(35903, 24) if (( (int)(* (( (ptr) &var_c60772)+13)/* n_v24520 */ ) > (int)0)) { SOURCE(35915, 12) (void) EntryDoit_P7332(c_v16624, (word) (( (bPt) &var_c60772)+36)/* var_c57636 */ ); }; SOURCE(35929, 30) { word pd191; pd191 = (* (( (ptr) (* (( (ptr) gf_c60804)+171)/* var_c56324 */ ))+7) ); (void) ( *( (fPt) ((* (ptr) pd191 ))))((* ((( (ptr) &var_c60772)+11)/* buffer_v24268 */ ) ), pd191); }; } static void EntryDoit_P7332(c_v24624, formal_c60868) word c_v24624; word formal_c60868; { register ptr gf_c60836 = (ptr) &globalframe; word var_c58084; word var_c58116; word err_v24836 = 0; word gcid_v24864; formal_c60868 = (formal_c60868 - 36); /* EntryDoit: */ SOURCE(33487, 535) (void) (XR_MonitorEntry(c_v24624)); SOURCE(33552, 52) gcid_v24864 = (word) UseGContext_P1560(c_v24624, (* (( (ptr) formal_c60868)+4) ), (* (( (ptr) formal_c60868)+7) ), (* (( (ptr) formal_c60868)+8) )); SOURCE(33606, 26) { word pd192; pd192 = (* (( (ptr) (* (( (ptr) gf_c60836)+166)/* var_c54596 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd192 ))))(c_v24624, 74, 0, (IOP2( / , (int)((* (( (ptr) formal_c60868)+13) ) + 3), (int)4) + 4), pd192); }; SOURCE(33634, 25) (void) BPutDrawable_P300(c_v24624, (* (( (ptr) formal_c60868)+4) )); SOURCE(33662, 15) (void) BPut32_P240(c_v24624, gcid_v24864); SOURCE(33680, 17) (void) BPutPoint_P480(c_v24624, (* (W2Pt) (( (ptr) formal_c60868)+5) )); SOURCE(33699, 71) { word var_c57924; word var_c57988; { word text_v48860; text_v48860 = (* (( (ptr) formal_c60868)+11) ); var_c57924 = text_v48860; }; { word var_c58020; word base_v48908; base_v48908 = (* (( (ptr) formal_c60868)+11) ); { word tc193; word idx194; if ((base_v48908 == 0)) { tc193 = (word) 0; } else { tc193 = (word) (unsigned) (* (hPt) base_v48908 ); }; var_c58020 = ( idx194 = (word) tc193, BCK(idx194, 32768) ); }; var_c57988 = var_c58020; }; { word pd195; pd195 = (* (( (ptr) (* (( (ptr) gf_c60836)+166)/* var_c54596 */ ))+38) ); (void) ( *( (fPt) ((* (ptr) pd195 ))))(c_v24624, var_c57924, 0, var_c57988, pd195); }; }; SOURCE(33772, 26) { word var_c58052; { word pd196; pd196 = (* (( (ptr) (* (( (ptr) gf_c60836)+166)/* var_c54596 */ ))+5) ); var_c58052 = (word) ( *( (fPt) ((* (ptr) pd196 ))))((* ((( (ptr) formal_c60868)+13)) ), pd196); }; { word pd197; pd197 = (* (( (ptr) (* (( (ptr) gf_c60836)+166)/* var_c54596 */ ))+23) ); (void) ( *( (fPt) ((* (ptr) pd197 ))))(c_v24624, var_c58052, pd197); }; }; SOURCE(33851, 53) { word pd198; pd198 = (* (( (ptr) (* (( (ptr) gf_c60836)+166)/* var_c54596 */ ))+65) ); err_v24836 = (word) ( *( (fPt) ((* (ptr) pd198 ))))(c_v24624, (* (( (ptr) formal_c60868)+8) ), pd198); }; SOURCE(33906, 66) if (((* (( (ptr) formal_c60868)+12) ) != 0)) { SOURCE(33934, 38) { word gc_v48384; word font_v48412; gc_v48384 = (* (( (ptr) formal_c60868)+7) ); font_v48412 = (* (( (ptr) formal_c60868)+12) ); { word id_v48444; { word pd199; pd199 = (* (( (ptr) (* (( (ptr) gf_c60836)+169)/* var_c54980 */ ))+7) ); id_v48444 = (word) ( *( (fPt) ((* (ptr) pd199 ))))(font_v48412, pd199); }; SOURCE(7891, 13) if ((id_v48444 == 0)) { SOURCE(7904, 5) (void) XR_RaiseUnnamedError(); }; SOURCE(7911, 26) { word gc_v48488; word value_v48516; gc_v48488 = gc_v48384; value_v48516 = id_v48444; SOURCE(7512, 21) (* (( (ptr) gc_v48488)+16) ) = value_v48516; SOURCE(7536, 132) if (((* (( (ptr) gc_v48488)+49) ) != value_v48516) || ! ((* (( (bPt) gc_v48488)+137) ) & 02)) { SOURCE(7646, 22) (* (( (ptr) gc_v48488) + 1) ) |= 131072; }; }; SOURCE(7939, 37) (* (( (ptr) gc_v48384)+69) ) = font_v48412; SOURCE(8000, 38) (* (( (ptr) gc_v48384)+70) ) = font_v48412; SOURCE(8040, 24) (* (( (ptr) gc_v48384) + 1) ) &= 4294836223; SOURCE(8067, 20) (* (( (ptr) gc_v48384)+49) ) = id_v48444; SOURCE(8090, 27) (* (( (ptr) gc_v48384) + 34) ) |= 131072; }; }; }; SOURCE(33977, 45) if ((err_v24836 != 0)) { SOURCE(33993, 29) var_c58084 = (* (( (ptr) (* (( (ptr) gf_c60836)+169)/* var_c54980 */ ))+4) ); var_c58116 = (word) err_v24836; (void) (XR_MonitorExit(c_v24624)); goto lab_L100156; }; SOURCE(33487, 535) (void) (XR_MonitorExit(c_v24624)); return; /* c2c skipped dead code */ lab_L100156: ; SOURCE(33993, 29) { word var_c0779; var_c0779 = var_c58116; (void) XR_RaiseError(var_c58084, (word) &var_c0779); }; } static void DrawString16_P4500(c_v16864, formal_c0996, formal_c0997, formal_c0998, formal_c0999, formal_c01000, formal_c01001) word c_v16864; word formal_c0996; W2 formal_c0997; word formal_c0998; word formal_c0999; word formal_c01000; word formal_c01001; { W14 var_c60900; /* declaration of drawable_v16892 skipped */ /* declaration of pos_v16920 skipped */ /* declaration of gc_v16948 skipped */ /* declaration of s_v16976 skipped */ /* declaration of delta_v17004 skipped */ /* declaration of details_v17032 skipped */ register ptr gf_c60932 = (ptr) &globalframe; /* declaration of var_c58148 skipped */ /* declaration of leng_v24908 skipped */ (* (( (ptr) &var_c60900)+4)/* drawable_v16892 */ ) = formal_c0996; (* (W2Pt) (( (ptr) &var_c60900)+5)/* pos_v16920 */ ) = formal_c0997; (* (( (ptr) &var_c60900)+7)/* gc_v16948 */ ) = formal_c0998; (* (( (ptr) &var_c60900)+8)/* s_v16976 */ ) = formal_c0999; (* (( (ptr) &var_c60900)+9)/* delta_v17004 */ ) = formal_c01000; (* (( (ptr) &var_c60900)+10)/* details_v17032 */ ) = formal_c01001; /* DrawString16: */ SOURCE(35965, 1125) { word tmpAddr200; tmpAddr200 = (word) (( (ptr) &var_c60900)+11)/* var_c58148 */ ; (* (ptr) tmpAddr200 ) = ( ((word) (fPt) EntryDoIt_P7488) ); (* (( (ptr) tmpAddr200) + 1) ) = 1; }; SOURCE(36104, 26) { word pd201; pd201 = (* (( (ptr) (* (( (ptr) gf_c60932)+172)/* var_c57188 */ ))+14) ); (* (( (ptr) &var_c60900)+13)/* leng_v24908 */ ) = (word) ( *( (fPt) ((* (ptr) pd201 ))))((* ((( (ptr) &var_c60900)+8)/* s_v16976 */ ) ), pd201) ; }; SOURCE(36983, 32) if (( (int)(* (( (ptr) &var_c60900)+9)/* delta_v17004 */ ) > (int)127) || ( (int)(* (( (ptr) &var_c60900)+9)/* delta_v17004 */ ) < (int) (word) -128)) { SOURCE(37015, 5) (void) XR_RaiseUnnamedError(); }; SOURCE(37063, 27) if (( (int)(* (( (ptr) &var_c60900)+13)/* leng_v24908 */ ) > (int)0)) { SOURCE(37078, 12) (void) EntryDoIt_P7488(c_v16864, (word) (( (bPt) &var_c60900)+44)/* var_c58148 */ ); }; } static void EntryDoIt_P7488(c_v25012, formal_c60996) word c_v25012; word formal_c60996; { register ptr gf_c60964 = (ptr) &globalframe; word var_c58212; word var_c58244; word err_v25040 = 0; word gcid_v25068; word pieceStart_v25096 = 0; word n_v25124; word len_v25152; formal_c60996 = (formal_c60996 - 44); /* EntryDoIt: */ SOURCE(36132, 846) (void) (XR_MonitorEntry(c_v25012)); SOURCE(36197, 52) gcid_v25068 = (word) UseGContext_P1560(c_v25012, (* (( (ptr) formal_c60996)+4) ), (* (( (ptr) formal_c60996)+7) ), (* (( (ptr) formal_c60996)+10) )); SOURCE(36285, 48) { word x202; word x203; len_v25152 = (x202 = (* (( (ptr) formal_c60996)+13) ), x203 = IOP2( / , (int)(* (( (ptr) (* (( (ptr) c_v25012)+16) ))+7) ), (int)3), MIN((int)(word), x202, x203)); }; SOURCE(36353, 31) if (( (int)IOP2( % , (int)len_v25152, (int)2) != (int)0)) { SOURCE(36373, 11) len_v25152 = (len_v25152 - 1); }; SOURCE(36401, 29) n_v25124 = (IOP2( * , (int)IOP2( / , (int)(len_v25152 + 507), (int)508), (int)2) + len_v25152); SOURCE(36432, 26) { word pd204; pd204 = (* (( (ptr) (* (( (ptr) gf_c60964)+166)/* var_c54596 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd204 ))))(c_v25012, 75, 0, (IOP2( / , (int)(n_v25124 + 3), (int)4) + 4), pd204); }; SOURCE(36460, 25) (void) BPutDrawable_P300(c_v25012, (* (( (ptr) formal_c60996)+4) )); SOURCE(36488, 15) (void) BPut32_P240(c_v25012, gcid_v25068); SOURCE(36506, 17) (void) BPutPoint_P480(c_v25012, (* (W2Pt) (( (ptr) formal_c60996)+5) )); SOURCE(36525, 286) lab_L100160: ; if (( (int)len_v25152 > (int)1)) { } else { goto lab_L100158; }; { word pieceLeng_v25196; word pieceLengBytes_v25224; SOURCE(36566, 32) pieceLeng_v25196 = IOP2( / , (int)(MIN((int)(word), len_v25152, 508)), (int)2); SOURCE(36600, 33) pieceLengBytes_v25224 = IOP2( * , (int)pieceLeng_v25196, (int)2); SOURCE(36635, 19) (void) BPut8_P120(c_v25012, BCK(pieceLeng_v25196, 256)); SOURCE(36656, 26) { word var_c58180; var_c58180 = (word) ToInt8Rep_P4200((* ((( (ptr) formal_c60996)+9)) )); (void) BPut8_P120(c_v25012, var_c58180); }; SOURCE(36685, 42) { word pd205; pd205 = (* (( (ptr) (* (( (ptr) gf_c60964)+166)/* var_c54596 */ ))+38) ); (void) ( *( (fPt) ((* (ptr) pd205 ))))(c_v25012, (* (( (ptr) formal_c60996)+8) ), pieceStart_v25096, pieceLengBytes_v25224, pd205) ; }; SOURCE(36730, 26) len_v25152 = (len_v25152 - pieceLengBytes_v25224); SOURCE(36760, 40) pieceStart_v25096 = (pieceStart_v25096 + pieceLengBytes_v25224); SOURCE(36802, 9) (* (( (ptr) formal_c60996)+9) ) = 0; }; goto lab_L100160; lab_L100158: ; SOURCE(36822, 13) { word pd206; pd206 = (* (( (ptr) (* (( (ptr) gf_c60964)+166)/* var_c54596 */ ))+52) ); (void) ( *( (fPt) ((* (ptr) pd206 ))))(c_v25012, n_v25124, pd206); }; SOURCE(36878, 53) { word pd207; pd207 = (* (( (ptr) (* (( (ptr) gf_c60964)+166)/* var_c54596 */ ))+65) ); err_v25040 = (word) ( *( (fPt) ((* (ptr) pd207 ))))(c_v25012, (* (( (ptr) formal_c60996)+10) ), pd207); }; SOURCE(36933, 45) if ((err_v25040 != 0)) { SOURCE(36949, 29) var_c58212 = (* (( (ptr) (* (( (ptr) gf_c60964)+169)/* var_c54980 */ ))+4) ); var_c58244 = (word) err_v25040; (void) (XR_MonitorExit(c_v25012)); goto lab_L100161; }; SOURCE(36132, 846) (void) (XR_MonitorExit(c_v25012)); return; /* c2c skipped dead code */ lab_L100161: ; SOURCE(36949, 29) { word var_c0800; var_c0800 = var_c58244; (void) XR_RaiseError(var_c58212, (word) &var_c0800); }; } static void ImageString16_P4560(c_v17092, drawable_v17120, pos_v17148, gc_v17176, s_v17204, details_v17232) word c_v17092; word drawable_v17120; W2 pos_v17148; word gc_v17176; word s_v17204; word details_v17232; { register ptr gf_c61028 = (ptr) &globalframe; word var_c58276; word var_c58308; word var_c58340; word var_c58372; word n_v25268; /* ImageString16: */ SOURCE(37096, 563) (void) (XR_MonitorEntry(c_v17092)); SOURCE(37226, 25) { word pd208; pd208 = (* (( (ptr) (* (( (ptr) gf_c61028)+172)/* var_c57188 */ ))+14) ); n_v25268 = (word) ( *( (fPt) ((* (ptr) pd208 ))))(s_v17204, pd208); }; SOURCE(37253, 47) if (( (int)n_v25268 >= (int)255)) { SOURCE(37275, 25) var_c58276 = (word) (( (bPt) gf_c61028)+92)/* var_c52068 */ ; (void) (XR_MonitorExit(c_v17092)); goto lab_L100163; }; SOURCE(37302, 45) if (( (int)IOP2( % , (int)n_v25268, (int)2) != (int)0)) { SOURCE(37322, 25) var_c58308 = (word) (( (bPt) gf_c61028)+92)/* var_c52068 */ ; (void) (XR_MonitorExit(c_v17092)); goto lab_L100164; }; SOURCE(37349, 310) if (( (int)n_v25268 > (int)0)) { SOURCE(37361, 300) { word err_v25312 = 0; word gcid_v25340; SOURCE(37386, 52) gcid_v25340 = (word) UseGContext_P1560(c_v17092, drawable_v17120, gc_v17176, details_v17232); SOURCE(37440, 28) { word pd209; word idx210; pd209 = (* (( (ptr) (* (( (ptr) gf_c61028)+166)/* var_c54596 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd209 ))))(c_v17092, 77, ( idx210 = (word) IOP2( / , (int)n_v25268, (int)2), BCK(idx210, 256) ), (IOP2( / , (int)(n_v25268 + 3), (int)4) + 4), pd209); }; SOURCE(37470, 25) (void) BPutDrawable_P300(c_v17092, drawable_v17120); SOURCE(37498, 15) (void) BPut32_P240(c_v17092, gcid_v25340); SOURCE(37516, 17) (void) BPutPoint_P480(c_v17092, pos_v17148); SOURCE(37535, 22) { word pd211; pd211 = (* (( (ptr) (* (( (ptr) gf_c61028)+166)/* var_c54596 */ ))+37) ); (void) ( *( (fPt) ((* (ptr) pd211 ))))(c_v17092, s_v17204, 0, 2147483647, pd211); }; SOURCE(37559, 53) { word pd212; pd212 = (* (( (ptr) (* (( (ptr) gf_c61028)+166)/* var_c54596 */ ))+65) ); err_v25312 = (word) ( *( (fPt) ((* (ptr) pd212 ))))(c_v17092, details_v17232, pd212); }; SOURCE(37614, 45) if ((err_v25312 != 0)) { SOURCE(37630, 29) var_c58340 = (* (( (ptr) (* (( (ptr) gf_c61028)+169)/* var_c54980 */ ))+4) ); var_c58372 = (word) err_v25312; (void) (XR_MonitorExit(c_v17092)); goto lab_L100165; }; }; }; SOURCE(37096, 563) (void) (XR_MonitorExit(c_v17092)); return; /* c2c skipped dead code */ lab_L100163: ; SOURCE(37275, 25) (void) XR_RaiseError(var_c58276, 0); lab_L100164: ; SOURCE(37322, 25) (void) XR_RaiseError(var_c58308, 0); lab_L100165: ; SOURCE(37630, 29) { word var_c0814; var_c0814 = var_c58372; (void) XR_RaiseError(var_c58340, (word) &var_c0814); }; } static void NoName_Q12120(formal_c0819, formal_c200016, formal_c200017, formal_c200018, formal_c200019) word formal_c0819; word formal_c200016; word formal_c200017; word formal_c200018; word formal_c200019; { register ptr gf_c0911 = (ptr) &globalframe; if ((formal_c200017 == XR_Unwind)) { (void) (XR_MonitorExit(* (( (ptr) formal_c200016)+4) )); } else { if (((formal_c200017 == (* (( (ptr) (* (( (ptr) gf_c0911)+170)/* var_c55812 */ ))+5) )) || (formal_c200017 == (* (( (ptr) (* ( ( (ptr) gf_c0911)+170)/* var_c55812 */ ))+4) ))) || (formal_c200017 == XR_Uncaught)) { SOURCE(18432, 9) (* (ptr) formal_c0819 ) = 2; (* (( (ptr) formal_c0819)+1) ) = 5; return; }; }; (* (ptr) formal_c0819 ) = 0; (* (( (ptr) formal_c0819)+1) ) = 0; return; } static void NoName_Q12180(formal_c0824, formal_c200012, formal_c200013, formal_c200014, formal_c200015) word formal_c0824; word formal_c200012; word formal_c200013; word formal_c200014; word formal_c200015; { SOURCE(6801, 9) (* (ptr) formal_c0824 ) = 2; (* (( (ptr) formal_c0824)+1) ) = 3; return; /* c2c skipped dead code */ } static void NoName_Q12240(formal_c0829, formal_c200008, formal_c200009, formal_c200010, formal_c200011) word formal_c0829; word formal_c200008; word formal_c200009; word formal_c200010; word formal_c200011; { SOURCE(6700, 9) (* (ptr) formal_c0829 ) = 2; (* (( (ptr) formal_c0829)+1) ) = 3; return; /* c2c skipped dead code */ } static void NoName_Q12300(formal_c0834, formal_c200004, formal_c200005, formal_c200006, formal_c200007) word formal_c0834; word formal_c200004; word formal_c200005; word formal_c200006; word formal_c200007; { if ((formal_c200005 == XR_Unwind)) { (void) (XR_MonitorExit(* (( (ptr) formal_c200004)+4) )); }; (* (ptr) formal_c0834 ) = 0; (* (( (ptr) formal_c0834)+1) ) = 0; return; } static void NoName_Q12360(formal_c0839, formal_c200000, formal_c200001, formal_c200002, formal_c200003) word formal_c0839; word formal_c200000; word formal_c200001; word formal_c200002; word formal_c200003; { SOURCE(5928, 10) (* (ptr) formal_c0839 ) = 2; (* (( (ptr) formal_c0839)+1) ) = 2; return; /* c2c skipped dead code */ } /* file: XlImplGC, module: XlImplGC, compiled at: September 14, 1993 4:27:28 pm PDT */ extern void XR_install_XlImplGC() { NoName_Q11760(); } extern void XR_run_XlImplGC() { XR_Start(&globalframe); }