/* Generated with C2C (Cedar To C)*/ /* Copyright (C) 1993 by Xerox Corporation. All rights reserved. */ /* time: September 14, 1993 4:26:10 pm PDT */ /* C2C version: April 20, 1993 (sun4) */ /* ref-counting: off */ /* file: XlImplAtPropSel, module: XlImplAtPropSel */ /* switches: bcfhklnouw */ #include #include static char versionStamp[] = "@(#)mob_version [3992918354,2784549964] XlImplAtPropSel"; 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; W2 r;} W10; typedef struct {W8 f; W8 r;} W16; typedef struct {W8 f; word r;} W9; typedef struct {word f0, f1, f2, f3, f4;} W5; typedef struct {W8 f; W5 r;} W13; typedef struct {word f0, f1, f2, f3;} W4; typedef W4 *W4Pt; typedef struct {word f0, f1, f2;} W3; typedef struct {W8 f; W3 r;} W11; typedef struct {word f0, f1, f2, f3, f4, f5;} W6; typedef struct {W8 f; W4 r;} W12; typedef struct {word f0, f1, f2, f3, f4, f5, f6;} W7; #define SOURCE(p, l) /* source p, l */ #define BCK(idx, lim) ( ((unsigned) idx) >= ((unsigned) lim) ? (XR_RaiseBoundsFault()) : (idx) ) #define IOP2(op, x, y) ( (word) ((x) op (y)) ) #define MAX(cast, x, y) ( ( cast x) > ( cast y) ? (x) : (y) ) #define MIN(cast, x, y) ( ( cast x) < ( cast y) ? (x) : (y) ) #define SGNCK(i) ((int) (word) (i) < 0 ? XR_RaiseArithmeticFault(): i ) static void NoName_Q6372(); static void XlImplAtPropSel_P0(); static void RaiseClientError_P60(); static word StandardAtom_P120(); static word InitializeNameToAtom_P180(); static word InitializeAtomToName_P240(); static void InitAtomStuff_P300(); static word MakeAtom_P360(); static void InternAtom_P420(); static void action_P2028(); static void BPutProp_P480(); static word GetAtomName_P540(); static void action_P2184(); static void ChangeProperty_P600(); static void action_P2292(); static void BPutPaddedText_P660(); static void XPropInfo_P720(); static void DeleteProperty_P780(); static void action_P3216(); static void GetProperty_P840(); static void action_P3276(); static void ListProperties_P900(); static void action_P3528(); static void RotateProperties_P960(); static void action_P3684(); static void PredefineAtoms_P1020(); static void Def_P3792(); static void SetSelectionOwner_P1080(); static void action_P3852(); static word GetSelectionOwner_P1140(); static void action_P3912(); static void ConvertSelection_P1200(); static void action_P3972(); static void SendSelectionNotifyEvent_P1260(); static void action_P4032(); static void SetInputFocus_P1320(); static void action_P4092(); static void GetInputFocus_P1380(); static void action_P4152(); static word ListExtensions_P1440(); static void action_P4212(); static void QueryExtension_P1500(); static void action_P4368(); static void MapWindow_P1560(); static void action_P4428(); static void MapSubWindows_P1620(); static void action_P4488(); static void UnmapWindow_P1680(); static void action_P4548(); static void UnmapSubWindows_P1740(); static void action_P4608(); static void DestroyWindow_P1800(); static void action_P4668(); static void DestroySubWindows_P1860(); static void action_P4728(); static void Bell_P1920(); static void action_P4788(); static struct {unsigned f; char r[4];} string1 = {65540, "\251\000\000"}; static struct {unsigned f; char r[4];} string2 = {131076, "\216\251\000"}; static struct {unsigned f; char r[4];} string3 = {65537, "\001\000\000"}; static struct {unsigned f; char r[48];} string4 = {2883632, "\260\006\005\146\151\162\163\164\216\257\300\363\223\326\161\300\017\164\046\072\104\350\005\004\162\145\163\164\214\216\257\300\363\223\326\161\300\017\164\046\072\104\350\261\000\000\000"}; static struct {unsigned f; char r[4];} string5 = {131074, "\004\003\000"}; static struct {unsigned f; char r[24];} string6 = {1310744, "\205\210\242\000\100\104\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000\000\000"}; static struct {unsigned f; char r[8];} string7 = {393222, "\010\000\004@E\001\000"}; static struct {unsigned f; char r[16];} string8 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\101\100\000\000"}; static struct {unsigned f; char r[16];} string9 = {851984, "\257\300\223\215\300\016\300\070\141\304\023\100\164\000\000"}; static struct {unsigned f; char r[4];} string10 = {131074, "\003\004\000"}; static struct {unsigned f; char r[16];} string11 = {851984, "\257\300\072\337\114\355\300\232\070\352\142\100\164\000\000"}; static struct {unsigned f; char r[16];} string12 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"}; static struct {unsigned f; char r[44];} string13 = {2752556, "\260\006\005\146\151\162\163\164\257\300\351\276\264\273\300\115\104\320\264\101\100\005\004\162\145\163\164\214\257\300\351\276\264\273\300\115\104\320\264\101\100\261\000"}; static struct {unsigned f; char r[4];} string14 = {131074, "\003\001\000"}; static struct {unsigned f; char r[16];} string15 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\104\304\000\000"}; static struct {unsigned f; char r[24];} string16 = {1376277, "\007\000\001\002\007\020\001\002\000\007\036\002\004\003\002\004\014\016\015\003\001\000\000"}; static struct {unsigned f; char r[44];} string17 = {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[4];} string18 = {65540, "\242\000\000"}; static struct {unsigned f; char r[4];} string19 = {65540, "\241\000\000"}; static struct {unsigned f; char r[16];} string20 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\106\070\000\000"}; static struct {unsigned f; char r[16];} string21 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\106\104\000\000"}; static struct {unsigned f; char r[8];} string22 = {393224, "ToLong\000"}; static struct {unsigned f; char r[12];} string23 = {589836, "badWindow\000\000"}; static struct {unsigned f; char r[12];} string24 = {720908, "badProperty"}; static struct {unsigned f; char r[8];} string25 = {458760, "badData"}; static struct {unsigned f; char r[12];} string26 = {720908, "AtomTooLong"}; static struct {unsigned f; char r[8];} string27 = {458760, "NILAtom"}; static struct {unsigned f; char r[8];} string28 = {458760, "PRIMARY"}; static struct {unsigned f; char r[12];} string29 = {589836, "SECONDARY\000\000"}; static struct {unsigned f; char r[4];} string30 = {196612, "ARC"}; static struct {unsigned f; char r[8];} string31 = {262152, "ATOM\000\000\000"}; static struct {unsigned f; char r[8];} string32 = {393224, "BITMAP\000"}; static struct {unsigned f; char r[12];} string33 = {524300, "CARDINAL\000\000\000"}; static struct {unsigned f; char r[12];} string34 = {524300, "COLORMAP\000\000\000"}; static struct {unsigned f; char r[8];} string35 = {393224, "CURSOR\000"}; static struct {unsigned f; char r[12];} string36 = {720908, "CUT_BUFFER0"}; static struct {unsigned f; char r[12];} string37 = {720908, "CUT_BUFFER1"}; static struct {unsigned f; char r[12];} string38 = {720908, "CUT_BUFFER2"}; static struct {unsigned f; char r[12];} string39 = {720908, "CUT_BUFFER3"}; static struct {unsigned f; char r[12];} string40 = {720908, "CUT_BUFFER4"}; static struct {unsigned f; char r[12];} string41 = {720908, "CUT_BUFFER5"}; static struct {unsigned f; char r[12];} string42 = {720908, "CUT_BUFFER6"}; static struct {unsigned f; char r[12];} string43 = {720908, "CUT_BUFFER7"}; static struct {unsigned f; char r[12];} string44 = {524300, "DRAWABLE\000\000\000"}; static struct {unsigned f; char r[8];} string45 = {262152, "FONT\000\000\000"}; static struct {unsigned f; char r[8];} string46 = {458760, "INTEGER"}; static struct {unsigned f; char r[8];} string47 = {393224, "PIXMAP\000"}; static struct {unsigned f; char r[8];} string48 = {327688, "POINT\000\000"}; static struct {unsigned f; char r[12];} string49 = {589836, "RECTANGLE\000\000"}; static struct {unsigned f; char r[20];} string50 = {1048596, "RESOURCE_MANAGER\000\000\000"}; static struct {unsigned f; char r[16];} string51 = {851984, "RGB_COLOR_MAP\000\000"}; static struct {unsigned f; char r[16];} string52 = {786448, "RGB_BEST_MAP\000\000\000"}; static struct {unsigned f; char r[16];} string53 = {786448, "RGB_BLUE_MAP\000\000\000"}; static struct {unsigned f; char r[16];} string54 = {983056, "RGB_DEFAULT_MAP"}; static struct {unsigned f; char r[16];} string55 = {786448, "RGB_GRAY_MAP\000\000\000"}; static struct {unsigned f; char r[16];} string56 = {851984, "RGB_GREEN_MAP\000\000"}; static struct {unsigned f; char r[12];} string57 = {720908, "RGB_RED_MAP"}; static struct {unsigned f; char r[8];} string58 = {393224, "STRING\000"}; static struct {unsigned f; char r[12];} string59 = {524300, "VISUALID\000\000\000"}; static struct {unsigned f; char r[8];} string60 = {393224, "WINDOW\000"}; static struct {unsigned f; char r[12];} string61 = {655372, "WM_COMMAND\000"}; static struct {unsigned f; char r[12];} string62 = {524300, "WM_HINTS\000\000\000"}; static struct {unsigned f; char r[20];} string63 = {1114132, "WM_CLIENT_MACHINE\000\000"}; static struct {unsigned f; char r[16];} string64 = {786448, "WM_ICON_NAME\000\000\000"}; static struct {unsigned f; char r[16];} string65 = {786448, "WM_ICON_SIZE\000\000\000"}; static struct {unsigned f; char r[8];} string66 = {458760, "WM_NAME"}; static struct {unsigned f; char r[16];} string67 = {983056, "WM_NORMAL_HINTS"}; static struct {unsigned f; char r[16];} string68 = {851984, "WM_SIZE_HINTS\000\000"}; static struct {unsigned f; char r[16];} string69 = {851984, "WM_ZOOM_HINTS\000\000"}; static struct {unsigned f; char r[12];} string70 = {589836, "MIN_SPACE\000\000"}; static struct {unsigned f; char r[12];} string71 = {655372, "NORM_SPACE\000"}; static struct {unsigned f; char r[12];} string72 = {589836, "MAX_SPACE\000\000"}; static struct {unsigned f; char r[12];} string73 = {589836, "END_SPACE\000\000"}; static struct {unsigned f; char r[16];} string74 = {851984, "SUPERSCRIPT_X\000\000"}; static struct {unsigned f; char r[16];} string75 = {851984, "SUPERSCRIPT_Y\000\000"}; static struct {unsigned f; char r[12];} string76 = {720908, "SUBSCRIPT_X"}; static struct {unsigned f; char r[12];} string77 = {720908, "SUBSCRIPT_Y"}; static struct {unsigned f; char r[20];} string78 = {1179668, "UNDERLINE_POSITION\000"}; static struct {unsigned f; char r[20];} string79 = {1245204, "UNDERLINE_THICKNESS"}; static struct {unsigned f; char r[20];} string80 = {1048596, "STRIKEOUT_ASCENT\000\000\000"}; static struct {unsigned f; char r[20];} string81 = {1114132, "STRIKEOUT_DESCENT\000\000"}; static struct {unsigned f; char r[16];} string82 = {786448, "ITALIC_ANGLE\000\000\000"}; static struct {unsigned f; char r[12];} string83 = {524300, "X_HEIGHT\000\000\000"}; static struct {unsigned f; char r[12];} string84 = {655372, "QUAD_WIDTH\000"}; static struct {unsigned f; char r[8];} string85 = {393224, "WEIGHT\000"}; static struct {unsigned f; char r[12];} string86 = {655372, "POINT_SIZE\000"}; static struct {unsigned f; char r[12];} string87 = {655372, "RESOLUTION\000"}; static struct {unsigned f; char r[12];} string88 = {589836, "COPYRIGHT\000\000"}; static struct {unsigned f; char r[8];} string89 = {393224, "NOTICE\000"}; static struct {unsigned f; char r[12];} string90 = {589836, "FONT_NAME\000\000"}; static struct {unsigned f; char r[12];} string91 = {720908, "FAMILY_NAME"}; static struct {unsigned f; char r[12];} string92 = {589836, "FULL_NAME\000\000"}; static struct {unsigned f; char r[12];} string93 = {655372, "CAP_HEIGHT\000"}; static struct {unsigned f; char r[12];} string94 = {524300, "WM_CLASS\000\000\000"}; static struct {unsigned f; char r[20];} string95 = {1048596, "WM_TRANSIENT_FOR\000\000\000"}; static struct {unsigned f; char r[4];} string96 = {65540, "x\000\000"}; static struct {unsigned f; char r[16];} string97 = {851984, "\257\300\355\377\031\122\300\245\370\334\114\100\200\000\000"}; static struct {unsigned f; char r[16];} string98 = {917518, "\006\003\020\001\024\001\100\134\010\000\004\100\113\001\000"}; static struct {unsigned f; char r[16];} string99 = {851984, "\257\300\223\215\300\016\300\070\141\304\023\100\150\000\000"}; static struct {unsigned f; char r[16];} string100 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\100\150\000\000"}; static struct {unsigned f; char r[16];} string101 = {851984, "\257\300\072\337\114\355\300\232\070\352\142\100\150\000\000"}; static struct {unsigned f; char r[16];} string102 = {851984, "\257\300\304\042\023\266\300\315\144\243\337\100\150\000\000"}; static struct {unsigned f; char r[16];} string103 = {851984, "\257\300\212\247\207\172\300\123\222\237\073\100\150\000\000"}; static struct {unsigned f; char r[16];} string104 = {851984, "\257\300\126\372\175\303\300\214\014\321\126\100\150\000\000"}; static struct {unsigned f; char r[16];} string105 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\100\164\000\000"}; static struct {unsigned f; char r[32];} string106 = {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];} string107 = {851984, "\257\300\012\063\155\016\300\130\140\234\375\100\164\000\000"}; static struct {unsigned f; char r[40];} string108 = {2424869, "\006\016\000\001\004\001\010\001\014\001\020\001\024\001\030\001\034\001\040\001\044\001\060\001\070\010\000\004\100\100\001\101\070\001\101\074\001\000\000"}; static struct {unsigned f; char r[16];} string109 = {851984, "\257\300\234\252\236\205\300\126\010\241\274\100\150\000\000"}; static struct { word f0[98]; 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[8]; } globalframe = { {0}, (word) Bell_P1920, 0, (word) DestroySubWindows_P1860, 0, (word) DestroyWindow_P1800, 0, (word) UnmapSubWindows_P1740, 0, (word) UnmapWindow_P1680, 0, (word) MapSubWindows_P1620, 0, (word) MapWindow_P1560, 0, (word) QueryExtension_P1500, 0, (word) ListExtensions_P1440, 0, (word) GetInputFocus_P1380, 0, (word) SetInputFocus_P1320, 0, (word) SendSelectionNotifyEvent_P1260, 0, (word) ConvertSelection_P1200, 0, (word) GetSelectionOwner_P1140, 0, (word) SetSelectionOwner_P1080, 0, (word) PredefineAtoms_P1020, 0, (word) RotateProperties_P960, 0, (word) ListProperties_P900, 0, (word) GetProperty_P840, 0, (word) DeleteProperty_P780, 0, (word) XPropInfo_P720, 0, (word) BPutPaddedText_P660, 0, (word) ChangeProperty_P600, 0, (word) GetAtomName_P540, 0, (word) BPutProp_P480, 0, (word) InternAtom_P420, 0, (word) MakeAtom_P360, 0, (word) InitAtomStuff_P300, 0, (word) InitializeAtomToName_P240, 0, (word) InitializeNameToAtom_P180, 0, (word) StandardAtom_P120, 0, (word) RaiseClientError_P60, 0, (word) XlImplAtPropSel_P0, {0} }; static void NoName_Q6372() { register ptr gf_c0368 = (ptr) &globalframe; word var_c37900; (* (( (ptr) gf_c0368)+6) ) = (word) XR_GetTypeIndexS((word) (&string1)); (* (( (ptr) gf_c0368)+7) ) = (word) XR_GetTypeIndex((word) &string2, 0, (word) &string3); (* (( (ptr) gf_c0368)+8) ) = (word) XR_GetTypeIndex((word) &string4, 0, (word) &string5); (* (( (ptr) gf_c0368)+10) ) = (word) XR_GetTypeIndex((word) &string6, 0, (word) &string7); (* (( (ptr) gf_c0368)+12) ) = (word) XR_GetTypeIndexS((word) (&string8)); (* (( (ptr) gf_c0368)+13) ) = (word) XR_GetTypeIndex((word) &string9, 0, (word) &string10); (* (( (ptr) gf_c0368)+14) ) = (word) XR_GetTypeIndex((word) &string11, 0, (word) &string10); (* (( (ptr) gf_c0368)+15) ) = (word) XR_GetTypeIndex((word) &string12, 0, (word) &string3); (* (( (ptr) gf_c0368)+16) ) = (word) XR_GetTypeIndex((word) &string13, 0, (word) &string14); (* (( (ptr) gf_c0368)+17) ) = (word) XR_GetTypeIndex((word) &string15, 0, (word) &string16); (* (( (ptr) gf_c0368)+18) ) = (word) XR_GetTypeIndexS((word) (&string17)); (* (( (ptr) gf_c0368)+19) ) = (word) XR_GetTypeIndexS((word) (&string18)); (* (( (ptr) gf_c0368)+20) ) = (word) XR_GetTypeIndexS((word) (&string19)); (* (( (ptr) gf_c0368)+21) ) = (word) XR_GetTypeIndexS((word) (&string20)); (* (( (ptr) gf_c0368)+22) ) = (word) XR_GetTypeIndexS((word) (&string21)); (* (ptr) (( (bPt) gf_c0368)+92) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+7) ), (word) &string22); (* (ptr) (( (bPt) gf_c0368)+96) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+7) ), (word) &string23); (* (ptr) (( (bPt) gf_c0368)+100) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+7) ), (word) &string24); (* (ptr) (( (bPt) gf_c0368)+104) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+7) ), (word) &string25); (* (ptr) (( (bPt) gf_c0368)+108) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+7) ), (word) &string26); (* (ptr) (( (bPt) gf_c0368)+112) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+7) ), (word) &string27); (* (ptr) (( (bPt) gf_c0368)+116) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string28); (* (ptr) (( (bPt) gf_c0368)+120) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string29); (* (ptr) (( (bPt) gf_c0368)+124) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string30); (* (ptr) (( (bPt) gf_c0368)+128) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string31); (* (ptr) (( (bPt) gf_c0368)+132) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string32); (* (ptr) (( (bPt) gf_c0368)+136) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string33); (* (ptr) (( (bPt) gf_c0368)+140) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string34); (* (ptr) (( (bPt) gf_c0368)+144) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string35); (* (ptr) (( (bPt) gf_c0368)+148) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string36); (* (ptr) (( (bPt) gf_c0368)+152) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string37); (* (ptr) (( (bPt) gf_c0368)+156) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string38); (* (ptr) (( (bPt) gf_c0368)+160) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string39); (* (ptr) (( (bPt) gf_c0368)+164) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string40); (* (ptr) (( (bPt) gf_c0368)+168) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string41); (* (ptr) (( (bPt) gf_c0368)+172) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string42); (* (ptr) (( (bPt) gf_c0368)+176) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string43); (* (ptr) (( (bPt) gf_c0368)+180) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string44); (* (ptr) (( (bPt) gf_c0368)+184) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string45); (* (ptr) (( (bPt) gf_c0368)+188) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string46); (* (ptr) (( (bPt) gf_c0368)+192) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string47); (* (ptr) (( (bPt) gf_c0368)+196) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string48); (* (ptr) (( (bPt) gf_c0368)+200) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string49); (* (ptr) (( (bPt) gf_c0368)+204) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string50); (* (ptr) (( (bPt) gf_c0368)+208) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string51); (* (ptr) (( (bPt) gf_c0368)+212) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string52); (* (ptr) (( (bPt) gf_c0368)+216) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string53); (* (ptr) (( (bPt) gf_c0368)+220) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string54); (* (ptr) (( (bPt) gf_c0368)+224) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string55); (* (ptr) (( (bPt) gf_c0368)+228) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string56); (* (ptr) (( (bPt) gf_c0368)+232) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string57); (* (ptr) (( (bPt) gf_c0368)+236) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string58); (* (ptr) (( (bPt) gf_c0368)+240) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string59); (* (ptr) (( (bPt) gf_c0368)+244) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string60); (* (ptr) (( (bPt) gf_c0368)+248) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string61); (* (ptr) (( (bPt) gf_c0368)+252) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string62); (* (ptr) (( (bPt) gf_c0368)+256) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string63); (* (ptr) (( (bPt) gf_c0368)+260) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string64); (* (ptr) (( (bPt) gf_c0368)+264) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string65); (* (ptr) (( (bPt) gf_c0368)+268) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string66); (* (ptr) (( (bPt) gf_c0368)+272) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string67); (* (ptr) (( (bPt) gf_c0368)+276) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string68); (* (ptr) (( (bPt) gf_c0368)+280) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string69); (* (ptr) (( (bPt) gf_c0368)+284) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string70); (* (ptr) (( (bPt) gf_c0368)+288) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string71); (* (ptr) (( (bPt) gf_c0368)+292) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string72); (* (ptr) (( (bPt) gf_c0368)+296) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string73); (* (ptr) (( (bPt) gf_c0368)+300) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string74); (* (ptr) (( (bPt) gf_c0368)+304) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string75); (* (ptr) (( (bPt) gf_c0368)+308) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string76); (* (ptr) (( (bPt) gf_c0368)+312) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string77); (* (ptr) (( (bPt) gf_c0368)+316) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string78); (* (ptr) (( (bPt) gf_c0368)+320) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string79); (* (ptr) (( (bPt) gf_c0368)+324) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string80); (* (ptr) (( (bPt) gf_c0368)+328) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string81); (* (ptr) (( (bPt) gf_c0368)+332) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string82); (* (ptr) (( (bPt) gf_c0368)+336) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string83); (* (ptr) (( (bPt) gf_c0368)+340) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string84); (* (ptr) (( (bPt) gf_c0368)+344) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string85); (* (ptr) (( (bPt) gf_c0368)+348) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string86); (* (ptr) (( (bPt) gf_c0368)+352) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string87); (* (ptr) (( (bPt) gf_c0368)+356) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string88); (* (ptr) (( (bPt) gf_c0368)+360) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string89); (* (ptr) (( (bPt) gf_c0368)+364) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string90); (* (ptr) (( (bPt) gf_c0368)+368) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string91); (* (ptr) (( (bPt) gf_c0368)+372) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string92); (* (ptr) (( (bPt) gf_c0368)+376) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string93); (* (ptr) (( (bPt) gf_c0368)+380) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string94); (* (ptr) (( (bPt) gf_c0368)+384) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+15) ), (word) &string95); (* (ptr) (( (bPt) gf_c0368)+388) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0368)+7) ), (word) &string96); (void) XR_DeclareGlobalFrame((word) "XlImplAtPropSel", &globalframe, (word) XR_GetTypeIndex((word) &string97, 0, (word) &string98) , (word) (( (bPt) gf_c0368)+648)/* var_c34988 */ ); var_c37900 = (word) XR_ImportInterface((word) "CardTab", (word) XR_GetTypeIndexS((word) (&string99)), 12); (* (( (ptr) gf_c0368)+166)/* var_c35212 */ ) = var_c37900; (void) XR_ImportProcS(var_c37900, 134742786); (void) XR_ImportProcS(var_c37900, 67896835); (void) XR_ImportProcS(var_c37900, 67371265); var_c37900 = (word) XR_ImportInterface((word) "Rope", (word) XR_GetTypeIndexS((word) (&string100)), 43); (* (( (ptr) gf_c0368)+168)/* var_c35372 */ ) = var_c37900; (void) XR_ImportProcS(var_c37900, 67373569); (void) XR_ImportProcS(var_c37900, 67373313); var_c37900 = (word) XR_ImportInterface((word) "SymTab", (word) XR_GetTypeIndexS((word) (&string101)), 13); (* (( (ptr) gf_c0368)+164)/* var_c35052 */ ) = var_c37900; (void) XR_ImportProcS(var_c37900, 67897091); (void) XR_ImportProcS(var_c37900, 134742786); (void) XR_ImportProcS(var_c37900, 67633410); var_c37900 = (word) XR_ImportInterface((word) "XlPrivate", (word) XR_GetTypeIndexS((word) (&string102)), 77); (* (( (ptr) gf_c0368)+169)/* var_c35532 */ ) = var_c37900; (void) XR_ImportProcS(var_c37900, 67390465); (void) XR_ImportProcS(var_c37900, 526594); (void) XR_ImportProcS(var_c37900, 531714); (void) XR_ImportProcS(var_c37900, 529922); (void) XR_ImportProcS(var_c37900, 67389697); (void) XR_ImportProcS(var_c37900, 67371265); (void) XR_ImportProcS(var_c37900, 529154); (void) XR_ImportProcS(var_c37900, 539650); (void) XR_ImportProcS(var_c37900, 528642); (void) XR_ImportProcS(var_c37900, 528130); (void) XR_ImportProcS(var_c37900, 530178); (void) XR_ImportProcS(var_c37900, 67909891); (void) XR_ImportProcS(var_c37900, 67389953); (void) XR_ImportProcS(var_c37900, 67385857); (void) XR_ImportProcS(var_c37900, 1057028); (void) XR_ImportProcS(var_c37900, 528386); (void) XR_ImportProcS(var_c37900, 1051908); (void) XR_ImportProcS(var_c37900, 540418); (void) XR_ImportProcS(var_c37900, 67390209); (void) XR_ImportProcS(var_c37900, 278529); (void) XR_ImportProcS(var_c37900, 786947); var_c37900 = (word) XR_ImportInterface((word) "XlPrivateErrorHandling", (word) XR_GetTypeIndexS((word) (&string103)), 10) ; (* (( (ptr) gf_c0368)+165)/* var_c35084 */ ) = var_c37900; (void) XR_ImportProcS(var_c37900, 526082); var_c37900 = (word) XR_ImportInterface((word) "XlService", (word) XR_GetTypeIndexS((word) (&string104)), 6); (* (( (ptr) gf_c0368)+167)/* var_c35276 */ ) = var_c37900; (void) XR_ImportProcS(var_c37900, 67896579); var_c37900 = (word) XR_ExportInterface((word) "Xl", (word) XR_GetTypeIndexS((word) (&string105)), 218); (* (( (ptr) gf_c0368)+170)/* var_c37932 */ ) = var_c37900; (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+448)/* var_c34188 */ , 268967938, (word) "QueryExtension"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+456)/* var_c34220 */ , 67379457, (word) "ListExtensions"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+632)/* var_c34924 */ , 67382529, (word) "StandardAtom"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+600)/* var_c34796 */ , 67644930, (word) "MakeAtom"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+592)/* var_c34764 */ , 135016195, (word) "InternAtom"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+576)/* var_c34700 */ , 67645442, (word) "GetAtomName"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+568)/* var_c34668 */ , 2371849, (word) "ChangeProperty"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+552)/* var_c34604 */ , 134492673, (word) "XPropInfo"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+536)/* var_c34540 */ , 270545672, (word) "GetProperty"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+544)/* var_c34572 */ , 1061892, (word) "DeleteProperty"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+528)/* var_c34508 */ , 134755586, (word) "ListProperties"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+520)/* var_c34476 */ , 1324549, (word) "RotateProperties"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+408)/* var_c34028 */ , 805123, (word) "DestroyWindow"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+400)/* var_c33996 */ , 805379, (word) "DestroySubWindows"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+440)/* var_c34156 */ , 805635, (word) "MapWindow"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+432)/* var_c34124 */ , 805891, (word) "MapSubWindows"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+424)/* var_c34092 */ , 806147, (word) "UnmapWindow"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+416)/* var_c34060 */ , 806403, (word) "UnmapSubWindows"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+392)/* var_c33964 */ , 819203, (word) "Bell"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+504)/* var_c34412 */ , 1343749, (word) "SetSelectionOwner"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+496)/* var_c34380 */ , 67666434, (word) "GetSelectionOwner"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+488)/* var_c34348 */ , 1868551, (word) "ConvertSelection"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+480)/* var_c34316 */ , 1868807, (word) "SendSelectionNotifyEvent") ; (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+472)/* var_c34284 */ , 1344773, (word) "SetInputFocus"); (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+464)/* var_c34252 */ , 134514177, (word) "GetInputFocus"); (void) XR_ExportType((word) "ConnectionPrivate", (word) XR_GetTypeIndexS((word) (&string106)), (word) XR_GetTypeIndex((word) &string107, 0, (word) &string108) ); var_c37900 = (word) XR_ExportInterface((word) "XlPrivateSplit", (word) XR_GetTypeIndexS((word) (&string109)), 7); (* (( (ptr) gf_c0368)+170)/* var_c37932 */ ) = var_c37900; (void) XR_ExportProcS(var_c37900, (word) (( (bPt) gf_c0368)+608)/* var_c34828 */ , 262401, (word) "InitAtomStuff"); } static void XlImplAtPropSel_P0(formal_c047, formal_c046) word formal_c047; word formal_c046; { register ptr gf_c37964 = (ptr) &globalframe; /* XlImplAtPropSel: */ SOURCE(176, 16481) SOURCE(739, 98) (* (( (ptr) gf_c37964)+4)/* atomToName_v3224 */ ) = XR_NewObject(276, (* (( (ptr) gf_c37964)+10) )); SOURCE(839, 57) { word pd110; pd110 = (* (( (ptr) (* (( (ptr) gf_c37964)+164)/* var_c35052 */ ))+5) ); (* (( (ptr) gf_c37964)+5)/* nameToAtom_v3252 */ ) = (word) ( *( (fPt) ((* (ptr) pd110 ))))(68, 1, pd110); }; SOURCE(16641, 16) (void) PredefineAtoms_P1020(); } static void RaiseClientError_P60(c_v4200, what_v4228) word c_v4200; word what_v4228; { register ptr gf_c37996 = (ptr) &globalframe; /* RaiseClientError: */ SOURCE(592, 111) SOURCE(655, 48) { word pd111; pd111 = (* (( (ptr) (* (( (ptr) gf_c37996)+165)/* var_c35084 */ ))+11) ); (void) ( *( (fPt) ((* (ptr) pd111 ))))(c_v4200, what_v4228, pd111); }; } static word StandardAtom_P120(name_v4388) word name_v4388; { register ptr gf_c38028 = (ptr) &globalframe; word atom_v4432; /* StandardAtom: */ SOURCE(899, 146) SOURCE(964, 81) { word var_c35116; W2 var_c053; { word pd112; pd112 = (* (( (ptr) (* (( (ptr) gf_c38028)+164)/* var_c35052 */ ))+7) ); (void) ( *( (fPt) ((* (ptr) pd112 ))))((word) &var_c053, (* (( (ptr) gf_c38028)+5)/* nameToAtom_v3252 */ ), name_v4388, pd112) ; }; var_c35116 = var_c053.f1; if ((var_c35116 == 0)) { goto lab_L100000; }; if (((* (( (ptr) gf_c38028)+12) ) == XR_GetReferentType(var_c35116))) { { word ra_v8784; ra_v8784 = var_c35116; SOURCE(1033, 12) return((* (ptr) ra_v8784 )); }; } else { lab_L100000: ; SOURCE(1058, 5) (void) XR_RaiseUnnamedError(); }; }; } static word InitializeNameToAtom_P180(c_v16836, key_v16864) word c_v16836; word key_v16864; { register ptr gf_c38060 = (ptr) &globalframe; word val_v16908; /* InitializeNameToAtom: */ SOURCE(1096, 70) SOURCE(1096, 70) val_v16908 = (* (( (ptr) gf_c38060)+97) ); SOURCE(1141, 25) { word pd113; pd113 = (* (( (ptr) (* (( (ptr) gf_c38060)+164)/* var_c35052 */ ))+5) ); return((word) ( *( (fPt) ((* (ptr) pd113 ))))(7, 1, pd113)); }; } static word InitializeAtomToName_P240(c_v16968, key_v16996) word c_v16968; word key_v16996; { register ptr gf_c38092 = (ptr) &globalframe; word val_v17040; /* InitializeAtomToName: */ SOURCE(1172, 71) SOURCE(1172, 71) val_v17040 = (* (( (ptr) gf_c38092)+97) ); SOURCE(1217, 26) { word pd114; pd114 = (* (( (ptr) (* (( (ptr) gf_c38092)+166)/* var_c35212 */ ))+5) ); return((word) ( *( (fPt) ((* (ptr) pd114 ))))(7, pd114)); }; } static void InitAtomStuff_P300(c_v4492) word c_v4492; { register ptr gf_c38124 = (ptr) &globalframe; word cp_v8840; /* InitAtomStuff: */ SOURCE(1249, 277) SOURCE(1296, 42) cp_v8840 = (* (( (ptr) c_v4492)+24) ); SOURCE(1340, 92) { word var_c35244; { word pd115; pd115 = (* (( (ptr) (* (( (ptr) gf_c38124)+167)/* var_c35276 */ ))+9) ); var_c35244 = XR_Narrow((word) ( *( (fPt) ((* (ptr) pd115 ))))(c_v4492, (* (( (ptr) gf_c38124)+4)/* atomToName_v3224 */ ), (word) ( ( (bPt) gf_c38124)+616)/* var_c34860 */ , pd115), (* (( (ptr) gf_c38124)+13) )); }; (* (( (ptr) cp_v8840)+2) ) = var_c35244; }; SOURCE(1434, 92) { word var_c35308; { word pd116; pd116 = (* (( (ptr) (* (( (ptr) gf_c38124)+167)/* var_c35276 */ ))+9) ); var_c35308 = XR_Narrow((word) ( *( (fPt) ((* (ptr) pd116 ))))(c_v4492, (* (( (ptr) gf_c38124)+5)/* nameToAtom_v3252 */ ), (word) ( ( (bPt) gf_c38124)+624)/* var_c34892 */ , pd116), (* (( (ptr) gf_c38124)+14) )); }; (* (( (ptr) cp_v8840)+1) ) = var_c35308; }; } static word MakeAtom_P360(c_v4552, name_v4580) word c_v4552; word name_v4580; { word atom_v4624; W2 var_c068; /* MakeAtom: */ SOURCE(1532, 114) SOURCE(1608, 38) (void) InternAtom_P420((word) &var_c068, c_v4552, name_v4580, 1); atom_v4624 = var_c068.f0; SOURCE(1532, 114) return(atom_v4624); } static void InternAtom_P420(formal_c090, c_v4684, formal_c0492, formal_c0493) word formal_c090; word c_v4684; word formal_c0492; word formal_c0493; { W10 var_c38156; /* declaration of name_v4712 skipped */ /* declaration of create_v4740 skipped */ register ptr gf_c38188 = (ptr) &globalframe; word atom_v4784; word exist_v4812; /* declaration of var_c35340 skipped */ /* declaration of reply_v8896 skipped */ /* declaration of n_v8924 skipped */ word cp_v8980; (* (( (ptr) &var_c38156)+4)/* name_v4712 */ ) = formal_c0492; (* (( (ptr) &var_c38156)+5)/* create_v4740 */ ) = formal_c0493; /* InternAtom: */ SOURCE(1650, 1067) { word tmpAddr117; tmpAddr117 = (word) (( (ptr) &var_c38156)+6)/* var_c35340 */ ; (* (ptr) tmpAddr117 ) = ( ((word) (fPt) action_P2028) ); (* (( (ptr) tmpAddr117) + 1) ) = 1; }; SOURCE(1763, 12) (* (( (ptr) &var_c38156)+8)/* reply_v8896 */ ) = 0; SOURCE(1961, 42) cp_v8980 = (* (( (ptr) c_v4684)+24) ); SOURCE(2005, 46) { word pd118; pd118 = (* (( (ptr) (* (( (ptr) gf_c38188)+168)/* var_c35372 */ ))+13) ); if ((0 != (word) ( *( (fPt) ((* (ptr) pd118 ))))((* ((( (ptr) &var_c38156)+4)/* name_v4712 */ ) ), pd118))) { SOURCE(2032, 19) atom_v4784 = 0; exist_v4812 = 0; goto lab_L100001; }; }; SOURCE(2053, 87) { word var_c35404; W2 var_c079; { word pd119; pd119 = (* (( (ptr) (* (( (ptr) gf_c38188)+164)/* var_c35052 */ ))+7) ); (void) ( *( (fPt) ((* (ptr) pd119 ))))((word) &var_c079, (* (( (ptr) gf_c38188)+5)/* nameToAtom_v3252 */ ), (* (( (ptr) &var_c38156)+4) /* name_v4712 */ ), pd119); }; var_c35404 = var_c079.f1; if ((var_c35404 == 0)) { goto lab_L100002; }; if (((* (( (ptr) gf_c38188)+12) ) == XR_GetReferentType(var_c35404))) { { word ra_v9096; ra_v9096 = var_c35404; SOURCE(2122, 18) atom_v4784 = (* (ptr) ra_v9096 ); exist_v4812 = 1; goto lab_L100001; }; } else { lab_L100002: ; }; }; SOURCE(2157, 116) if (((* (( (ptr) cp_v8980)+1) ) != 0)) { SOURCE(2183, 90) { word var_c35468; W2 var_c083; { word pd120; pd120 = (* (( (ptr) (* (( (ptr) gf_c38188)+164)/* var_c35052 */ ))+7) ); (void) ( *( (fPt) ((* (ptr) pd120 ))))((word) &var_c083, (* (( (ptr) cp_v8980)+1) ), (* (( (ptr) &var_c38156)+4)/* name_v4712 */ ), pd120) ; }; var_c35468 = var_c083.f1; if ((var_c35468 == 0)) { goto lab_L100003; }; if (((* (( (ptr) gf_c38188)+12) ) == XR_GetReferentType(var_c35468))) { { word ra_v9152; ra_v9152 = var_c35468; SOURCE(2255, 18) atom_v4784 = (* (ptr) ra_v9152 ); exist_v4812 = 1; goto lab_L100001; }; } else { lab_L100003: ; }; }; }; SOURCE(2290, 21) { word pd121; pd121 = (* (( (ptr) (* (( (ptr) gf_c38188)+168)/* var_c35372 */ ))+14) ); (* (( (ptr) &var_c38156)+9)/* n_v8924 */ ) = (word) ( *( (fPt) ((* (ptr) pd121 ))))((* ((( (ptr) &var_c38156)+4)/* name_v4712 */ ) ), pd121) ; }; SOURCE(2313, 41) if (( (int)(* (( (ptr) &var_c38156)+9)/* n_v8924 */ ) == (int)0)) { SOURCE(2325, 29) (void) RaiseClientError_P60(c_v4684, (* (( (ptr) gf_c38188)+28) )); }; SOURCE(2356, 73) if (( (int)(* (( (ptr) (* (( (ptr) c_v4684)+16) ))+7) ) <= (int)(* (( (ptr) &var_c38156)+9)/* n_v8924 */ ))) { SOURCE(2396, 33) (void) RaiseClientError_P60(c_v4684, (* (( (ptr) gf_c38188)+27) )); }; SOURCE(2431, 27) { word pd122; pd122 = (* (( (ptr) (* (( (ptr) gf_c38188)+169)/* var_c35532 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd122 ))))(c_v4684, (word) (( (bPt) &var_c38156)+24)/* var_c35340 */ , 0, pd122); }; SOURCE(2460, 17) { word pd123; pd123 = (* (( (ptr) (* (( (ptr) gf_c38188)+169)/* var_c35532 */ ))+68) ); (void) ( *( (fPt) ((* (ptr) pd123 ))))((* ((( (ptr) &var_c38156)+8)/* reply_v8896 */ ) ), pd123); }; SOURCE(2479, 14) (* (( (ptr) (* (( (ptr) &var_c38156)+8)/* reply_v8896 */ ))+10) ) = ((* (( (ptr) (* (( (ptr) &var_c38156)+8)/* reply_v8896 */ ))+10) ) + 7); SOURCE(2495, 23) { word pd124; pd124 = (* (( (ptr) (* (( (ptr) gf_c38188)+169)/* var_c35532 */ ))+79) ); atom_v4784 = (word) ( *( (fPt) ((* (ptr) pd124 ))))((* ((( (ptr) &var_c38156)+8)/* reply_v8896 */ ) ), pd124); }; SOURCE(2520, 22) { word pd125; pd125 = (* (( (ptr) (* (( (ptr) gf_c38188)+169)/* var_c35532 */ ))+67) ); (void) ( *( (fPt) ((* (ptr) pd125 ))))(c_v4684, (* (( (ptr) &var_c38156)+8)/* reply_v8896 */ ), pd125); }; SOURCE(2544, 16) exist_v4812 = (unsigned) (atom_v4784 != 0); SOURCE(2562, 155) if ( ( ((0 != exist_v4812) && (0 != (* (( (ptr) &var_c38156)+5)/* create_v4740 */ ))) ? ((* (( (ptr) cp_v8980)+1) ) != 0) : 0 ) ) { SOURCE(2611, 56) { word var_c35628; { word var_c35564; { word var_c35596; var_c35596 = XR_NewObject(4, (* (( (ptr) gf_c38188)+12) )); (* (ptr) var_c35596 ) = atom_v4784; var_c35564 = var_c35596; }; { word pd126; pd126 = (* (( (ptr) (* (( (ptr) gf_c38188)+164)/* var_c35052 */ ))+11) ); var_c35628 = (word) ( *( (fPt) ((* (ptr) pd126 ))))((* (( (ptr) cp_v8980)+1) ), (* (( (ptr) &var_c38156)+4)/* name_v4712 */ ), var_c35564, pd126) ; }; }; }; SOURCE(2669, 48) { word var_c35660; word pd127; pd127 = (* (( (ptr) (* (( (ptr) gf_c38188)+166)/* var_c35212 */ ))+10) ); var_c35660 = (word) ( *( (fPt) ((* (ptr) pd127 ))))((* (( (ptr) cp_v8980)+2) ), atom_v4784, (* (( (ptr) &var_c38156)+4)/* name_v4712 */ ), pd127) ; }; }; /* removed tail goto */ lab_L100001: ; (* (ptr) formal_c090 ) = atom_v4784; (* (( (ptr) formal_c090)+1) ) = exist_v4812; return; } static void action_P2028(c_v9056, formal_c38252) word c_v9056; word formal_c38252; { register ptr gf_c38220 = (ptr) &globalframe; formal_c38252 = (formal_c38252 - 24); /* action: */ SOURCE(1785, 171) SOURCE(1818, 48) { word pd128; word idx129; pd128 = (* (( (ptr) (* (( (ptr) gf_c38220)+169)/* var_c35532 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd128 ))))(c_v9056, 16, ( idx129 = (word) ( (0 != (* (( (ptr) formal_c38252)+5) )) ? 0 : 1 ) , BCK(idx129, 256) ), (IOP2( / , (int)((* (( (ptr) formal_c38252)+9) ) + 3), (int)4) + 2), pd128); }; SOURCE(1868, 12) { word pd130; word idx131; pd130 = (* (( (ptr) (* (( (ptr) gf_c38220)+169)/* var_c35532 */ ))+20) ); (void) ( *( (fPt) ((* (ptr) pd130 ))))(c_v9056, ( idx131 = (* (( (ptr) formal_c38252)+9) ), BCK(idx131, 65536) ), pd130); }; SOURCE(1882, 12) { word pd132; pd132 = (* (( (ptr) (* (( (ptr) gf_c38220)+169)/* var_c35532 */ ))+20) ); (void) ( *( (fPt) ((* (ptr) pd132 ))))(c_v9056, 0, pd132); }; SOURCE(1905, 23) { word pd133; pd133 = (* (( (ptr) (* (( (ptr) gf_c38220)+169)/* var_c35532 */ ))+37) ); (void) ( *( (fPt) ((* (ptr) pd133 ))))(c_v9056, (* (( (ptr) formal_c38252)+4) ), 0, 2147483647, pd133); }; SOURCE(1930, 26) { word pd134; pd134 = (* (( (ptr) (* (( (ptr) gf_c38220)+169)/* var_c35532 */ ))+62) ); (* (( (ptr) formal_c38252)+8) ) = (word) ( *( (fPt) ((* (ptr) pd134 ))))(c_v9056, pd134); }; } static void BPutProp_P480(c_v4872, atom_v4900) word c_v4872; word atom_v4900; { /* BPutProp: */ SOURCE(2726, 64) SOURCE(2774, 16) { word c_v33888; word b_v33916; c_v33888 = c_v4872; b_v33916 = atom_v4900; { word p_v21040; word n_v21280; p_v21040 = (* (( (ptr) c_v33888)+7) ); n_v21280 = (* (( (ptr) c_v33888)+4) ); (* (( (ptr) p_v21040)+((word) n_v21280 >> 2)) ) = b_v33916; (* (( (ptr) c_v33888)+4) ) = (n_v21280 + 4); }; }; } static word GetAtomName_P540(c_v4960, formal_c0494) word c_v4960; word formal_c0494; { W8 var_c38284; /* declaration of atom_v4988 skipped */ register ptr gf_c38316 = (ptr) &globalframe; word name_v5032; /* declaration of var_c35692 skipped */ /* declaration of reply_v9208 skipped */ word nameLeng_v9236; word cp_v9292; var_c38284.f4/* atom_v4988 */ = formal_c0494; /* GetAtomName: */ SOURCE(2796, 783) { word tmpAddr135; tmpAddr135 = (word) (( (ptr) &var_c38284)+5)/* var_c35692 */ ; (* (ptr) tmpAddr135 ) = ( ((word) (fPt) action_P2184) ); (* (( (ptr) tmpAddr135) + 1) ) = 1; }; SOURCE(2796, 783) name_v5032 = 0; SOURCE(2875, 12) var_c38284.f7/* reply_v9208 */ = 0; SOURCE(3007, 42) cp_v9292 = (* (( (ptr) c_v4960)+24) ); SOURCE(3051, 61) if ((var_c38284.f4/* atom_v4988 */ <= 68)) { SOURCE(3085, 27) { word idx136; return((* (( (ptr) (* (( (ptr) gf_c38316)+4)/* atomToName_v3224 */ ))+( idx136 = (word) var_c38284.f4/* atom_v4988 */ , BCK(idx136, 69) )) )); }; }; SOURCE(3114, 79) { word var_c35724; W2 var_c0106; { word pd137; pd137 = (* (( (ptr) (* (( (ptr) gf_c38316)+166)/* var_c35212 */ ))+7) ); (void) ( *( (fPt) ((* (ptr) pd137 ))))((word) &var_c0106, (* (( (ptr) cp_v9292)+2) ), var_c38284.f4/* atom_v4988 */ , pd137) ; }; var_c35724 = var_c0106.f1; if ((var_c35724 == 0)) { goto lab_L100004; }; { word tc138; if (((* (( (ptr) gf_c38316)+17) ) == XR_GetReferentType(var_c35724))) { tc138 = (word) ( (unsigned) (*(int*)var_c35724<0) == 0); } else { tc138 = (word) 0; }; if (tc138) { { word r_v9408; r_v9408 = var_c35724; SOURCE(3183, 10) return(r_v9408); }; } else { lab_L100004: ; }; }; }; SOURCE(3210, 27) { word pd139; pd139 = (* (( (ptr) (* (( (ptr) gf_c38316)+169)/* var_c35532 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd139 ))))(c_v4960, (word) (( (bPt) &var_c38284)+20)/* var_c35692 */ , 0, pd139); }; SOURCE(3239, 17) { word pd140; pd140 = (* (( (ptr) (* (( (ptr) gf_c38316)+169)/* var_c35532 */ ))+68) ); (void) ( *( (fPt) ((* (ptr) pd140 ))))(var_c38284.f7/* reply_v9208 */ , pd140); }; SOURCE(3258, 14) (* (( (ptr) var_c38284.f7/* reply_v9208 */ )+10) ) = ((* (( (ptr) var_c38284.f7/* reply_v9208 */ )+10) ) + 7); SOURCE(3274, 25) { word pd141; pd141 = (* (( (ptr) (* (( (ptr) gf_c38316)+169)/* var_c35532 */ ))+78) ); nameLeng_v9236 = (word) ( *( (fPt) ((* (ptr) pd141 ))))(var_c38284.f7/* reply_v9208 */ , pd141); }; SOURCE(3309, 85) SOURCE(3311, 81) { word pd142; pd142 = (* (( (ptr) (* (( (ptr) gf_c38316)+169)/* var_c35532 */ ))+61) ); name_v5032 = (word) ( *( (fPt) ((* (ptr) pd142 ))))((* (( (ptr) var_c38284.f7/* reply_v9208 */ )+8) ), 0, nameLeng_v9236, pd142) ; }; SOURCE(3397, 22) { word pd143; pd143 = (* (( (ptr) (* (( (ptr) gf_c38316)+169)/* var_c35532 */ ))+67) ); (void) ( *( (fPt) ((* (ptr) pd143 ))))(c_v4960, var_c38284.f7/* reply_v9208 */ , pd143); }; SOURCE(3421, 158) { word tc144; word pd145; pd145 = (* (( (ptr) (* (( (ptr) gf_c38316)+168)/* var_c35372 */ ))+13) ); if ((0 == (word) ( *( (fPt) ((* (ptr) pd145 ))))(name_v5032, pd145))) { tc144 = (word) ((* (( (ptr) cp_v9292)+1) ) != 0); } else { tc144 = (word) 0; }; if (tc144) { SOURCE(3473, 56) { word var_c35820; { word var_c35756; { word var_c35788; var_c35788 = XR_NewObject(4, (* (( (ptr) gf_c38316)+12) )); (* (ptr) var_c35788 ) = var_c38284.f4/* atom_v4988 */ ; var_c35756 = var_c35788; }; { word pd146; pd146 = (* (( (ptr) (* (( (ptr) gf_c38316)+164)/* var_c35052 */ ))+11) ); var_c35820 = (word) ( *( (fPt) ((* (ptr) pd146 ))))((* (( (ptr) cp_v9292)+1) ), name_v5032, var_c35756, pd146); }; }; }; SOURCE(3531, 48) { word var_c35852; word pd147; pd147 = (* (( (ptr) (* (( (ptr) gf_c38316)+166)/* var_c35212 */ ))+10) ); var_c35852 = (word) ( *( (fPt) ((* (ptr) pd147 ))))((* (( (ptr) cp_v9292)+2) ), var_c38284.f4/* atom_v4988 */ , name_v5032, pd147) ; }; }; }; SOURCE(2796, 783) return(name_v5032); } static void action_P2184(c_v9368, formal_c38380) word c_v9368; word formal_c38380; { register ptr gf_c38348 = (ptr) &globalframe; formal_c38380 = (formal_c38380 - 20); /* action: */ SOURCE(2904, 98) SOURCE(2937, 18) { word pd148; pd148 = (* (( (ptr) (* (( (ptr) gf_c38348)+169)/* var_c35532 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd148 ))))(c_v9368, 17, 0, 2, pd148); }; SOURCE(2957, 17) (void) BPutProp_P480(c_v9368, (* (( (ptr) formal_c38380)+4) )); SOURCE(2976, 26) { word pd149; pd149 = (* (( (ptr) (* (( (ptr) gf_c38348)+169)/* var_c35532 */ ))+62) ); (* (( (ptr) formal_c38380)+7) ) = (word) ( *( (fPt) ((* (ptr) pd149 ))))(c_v9368, pd149); }; } static void ChangeProperty_P600(c_v5092, formal_c0495, formal_c0496, formal_c0497, formal_c0498, formal_c0499, formal_c0500, num_v5288, formal_c0501) word c_v5092; word formal_c0495; word formal_c0496; word formal_c0497; word formal_c0498; word formal_c0499; word formal_c0500; word num_v5288; word formal_c0501; { W16 var_c38412; /* declaration of w_v5120 skipped */ /* declaration of property_v5148 skipped */ /* declaration of type_v5176 skipped */ /* declaration of mode_v5204 skipped */ /* declaration of data_v5232 skipped */ /* declaration of start_v5260 skipped */ /* declaration of details_v5316 skipped */ register ptr gf_c38444 = (ptr) &globalframe; /* declaration of var_c35884 skipped */ /* declaration of numberOfUnits_v9452 skipped */ /* declaration of unitSize_v9480 skipped */ /* declaration of numberOfBytes_v9508 skipped */ (* (( (ptr) &var_c38412)+4)/* w_v5120 */ ) = formal_c0495; (* (( (ptr) &var_c38412)+5)/* property_v5148 */ ) = formal_c0496; (* (( (ptr) &var_c38412)+6)/* type_v5176 */ ) = formal_c0497; (* (( (ptr) &var_c38412)+7)/* mode_v5204 */ ) = formal_c0498; (* (( (ptr) &var_c38412)+8)/* data_v5232 */ ) = formal_c0499; (* (( (ptr) &var_c38412)+9)/* start_v5260 */ ) = formal_c0500; (* (( (ptr) &var_c38412)+10)/* details_v5316 */ ) = formal_c0501; /* ChangeProperty: */ SOURCE(3589, 1440) { word tmpAddr150; tmpAddr150 = (word) (( (ptr) &var_c38412)+11)/* var_c35884 */ ; (* (ptr) tmpAddr150 ) = ( ((word) (fPt) action_P2292) ); (* (( (ptr) tmpAddr150) + 1) ) = 1; }; SOURCE(4612, 54) if (( (int)(* (( (ptr) &var_c38412)+9)/* start_v5260 */ ) < (int)0) || ( (int)num_v5288 < (int)0)) { SOURCE(4637, 29) (void) RaiseClientError_P60(c_v5092, (* (( (ptr) gf_c38444)+26) )); }; SOURCE(4668, 54) if (((* (( (ptr) &var_c38412)+5)/* property_v5148 */ ) == 0)) { SOURCE(4689, 33) (void) RaiseClientError_P60(c_v5092, (* (( (ptr) gf_c38444)+25) )); }; SOURCE(4724, 46) if (((* (( (ptr) &var_c38412)+4)/* w_v5120 */ ) == 0)) { SOURCE(4739, 31) (void) RaiseClientError_P60(c_v5092, (* (( (ptr) gf_c38444)+24) )); }; SOURCE(4772, 43) { W2 var_c35916; (void) XPropInfo_P720((word) &var_c35916, (* (( (ptr) &var_c38412)+8)/* data_v5232 */ )); (* (( (ptr) &var_c38412)+14)/* unitSize_v9480 */ ) = var_c35916.f1; (* (( (ptr) &var_c38412)+13)/* numberOfUnits_v9452 */ ) = var_c35916.f0; }; SOURCE(4817, 53) { word x151; word x152; (* (( (ptr) &var_c38412)+13)/* numberOfUnits_v9452 */ ) = (x152 = (x151 = ((* (( (ptr) &var_c38412)+13)/* numberOfUnits_v9452 */ ) - (* ( ( (ptr) &var_c38412)+9)/* start_v5260 */ )), MIN((int)(word), x151, num_v5288)), MAX((int)(word), 0, x152)); }; SOURCE(4873, 40) (* (( (ptr) &var_c38412)+15)/* numberOfBytes_v9508 */ ) = IOP2( * , (int)(* (( (ptr) &var_c38412)+13)/* numberOfUnits_v9452 */ ), (int)(* ( ( (ptr) &var_c38412)+14)/* unitSize_v9480 */ )); SOURCE(4916, 79) if (( (int)(* (( (ptr) &var_c38412)+13)/* numberOfUnits_v9452 */ ) > (int)(* (( (ptr) (* (( (ptr) c_v5092)+16) ))+7) ))) { SOURCE(4967, 28) (void) RaiseClientError_P60(c_v5092, (* (( (ptr) gf_c38444)+23) )); }; SOURCE(4998, 31) { word pd153; pd153 = (* (( (ptr) (* (( (ptr) gf_c38444)+169)/* var_c35532 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd153 ))))(c_v5092, (word) (( (bPt) &var_c38412)+44)/* var_c35884 */ , (* (( (ptr) &var_c38412)+10) /* details_v5316 */ ), pd153); }; } static void action_P2292(c_v9612, formal_c38508) word c_v9612; word formal_c38508; { register ptr gf_c38476 = (ptr) &globalframe; formal_c38508 = (formal_c38508 - 44); /* action: */ SOURCE(3816, 791) SOURCE(3849, 46) { word pd154; pd154 = (* (( (ptr) (* (( (ptr) gf_c38476)+169)/* var_c35532 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd154 ))))(c_v9612, 18, (* (( (ptr) formal_c38508)+7) ), (IOP2( / , (int)((* (( (ptr) formal_c38508)+15) ) + 3), (int)4) + 6), pd154); }; SOURCE(3897, 18) { word pd155; pd155 = (* (( (ptr) (* (( (ptr) gf_c38476)+169)/* var_c35532 */ ))+27) ); (void) ( *( (fPt) ((* (ptr) pd155 ))))(c_v9612, (* (( (ptr) formal_c38508)+4) ), pd155); }; SOURCE(3917, 21) (void) BPutProp_P480(c_v9612, (* (( (ptr) formal_c38508)+5) )); SOURCE(3940, 17) (void) BPutProp_P480(c_v9612, (* (( (ptr) formal_c38508)+6) )); SOURCE(3959, 20) { word pd156; word idx157; pd156 = (* (( (ptr) (* (( (ptr) gf_c38476)+169)/* var_c35532 */ ))+19) ); (void) ( *( (fPt) ((* (ptr) pd156 ))))(c_v9612, ( idx157 = (word) IOP2( * , (int)(* (( (ptr) formal_c38508)+14) ), (int)8), BCK(idx157, 256) ), pd156); }; SOURCE(3982, 11) (* (( (ptr) c_v9612)+4) ) = ((* (( (ptr) c_v9612)+4) ) + 3); SOURCE(3996, 24) { word pd158; word idx159; pd158 = (* (( (ptr) (* (( (ptr) gf_c38476)+169)/* var_c35532 */ ))+21) ); (void) ( *( (fPt) ((* (ptr) pd158 ))))(c_v9612, ( idx159 = (* (( (ptr) formal_c38508)+13) ), SGNCK(idx159) ), pd158); }; SOURCE(4022, 539) { word var_c35948; word var_c35980; var_c35948 = (* (( (ptr) formal_c38508)+8) ); if ((var_c35948 == 0)) { goto lab_L100005; }; var_c35980 = XR_GetReferentType(var_c35948); { word var_c36076; { word tc161; if (((* (( (ptr) gf_c38476)+17) ) == var_c35980)) { tc161 = (word) ( (unsigned) (*(int*)var_c35948<0) == 0); } else { tc161 = (word) 0; }; if (tc161) { { word r_v9640; r_v9640 = var_c35948; SOURCE(4055, 42) { word pd162; pd162 = (* (( (ptr) (* (( (ptr) gf_c38476)+169)/* var_c35532 */ ))+37) ); (void) ( *( (fPt) ((* (ptr) pd162 ))))(c_v9612, r_v9640, (* (( (ptr) formal_c38508)+9) ), (* (( (ptr) formal_c38508)+13) ), pd162); }; }; goto endif0160; }; if (((* (( (ptr) gf_c38476)+22) ) == var_c35980)) { { word rc_v9684; rc_v9684 = var_c35948; SOURCE(4127, 71) { register word i_v9740; register word noName_c36012; i_v9740 = (* (( (ptr) formal_c38508)+9) ); noName_c36012 = ((* (( (ptr) formal_c38508)+9) ) + (* (( (ptr) formal_c38508)+13) )); if (( (int)i_v9740 >= (int)noName_c36012)) { goto lab_L100006; }; lab_L100009: ; SOURCE(4173, 25) { word c_v33756; word b_v33784; c_v33756 = c_v9612; { word limit163; b_v33784 = (* ((( (ptr) rc_v9684)+1)+( /*1*/ limit163 = (* (ptr) rc_v9684 ), /*1*/ BCK(i_v9740, limit163) /*1*/ )) ); }; { word p_v33816; word n_v33844; p_v33816 = (* (( (ptr) c_v33756)+7) ); n_v33844 = (* (( (ptr) c_v33756)+4) ); (* (( (ptr) p_v33816)+((word) n_v33844 >> 2)) ) = b_v33784; (* (( (ptr) c_v33756)+4) ) = (n_v33844 + 4); }; }; i_v9740 = (i_v9740 + 1); if (( (int)i_v9740 < (int)noName_c36012)) { goto lab_L100009; }; lab_L100006: ; }; }; goto endif0160; }; if (((* (( (ptr) gf_c38476)+21) ) == var_c35980)) { { word rc_v9784; rc_v9784 = var_c35948; SOURCE(4231, 71) { register word i_v9840; register word noName_c36044; i_v9840 = (* (( (ptr) formal_c38508)+9) ); noName_c36044 = ((* (( (ptr) formal_c38508)+9) ) + (* (( (ptr) formal_c38508)+13) )); if (( (int)i_v9840 >= (int)noName_c36044)) { goto lab_L100010; }; lab_L100013: ; SOURCE(4277, 25) { word c_v33680; word b_v33708; c_v33680 = c_v9612; { word limit164; b_v33708 = (* ((( (ptr) rc_v9784)+1)+( /*1*/ limit164 = (* (ptr) rc_v9784 ), /*1*/ BCK(i_v9840, limit164) /*1*/ )) ); }; { word n_v25612; word p_v25644; n_v25612 = (* (( (ptr) c_v33680)+4) ); p_v25644 = (* (( (ptr) c_v33680)+7) ); (* (( (hPt) p_v25644)+((word) n_v25612 >> 1)) ) = b_v33708; (* (( (ptr) c_v33680)+4) ) = (n_v25612 + 2); }; }; i_v9840 = (i_v9840 + 1); if (( (int)i_v9840 < (int)noName_c36044)) { goto lab_L100013; }; lab_L100010: ; }; SOURCE(4304, 44) if (( (int)IOP2( % , (int)(* (( (ptr) formal_c38508)+13) ), (int)2) != (int)0)) { SOURCE(4335, 13) { word c_v33576; c_v33576 = c_v9612; { word n_v33608; word p_v33636; n_v33608 = (* (( (ptr) c_v33576)+4) ); p_v33636 = (* (( (ptr) c_v33576)+7) ); (* (( (hPt) p_v33636)+((word) n_v33608 >> 1)) ) = 0; (* (( (ptr) c_v33576)+4) ) = (n_v33608 + 2); }; }; }; }; goto endif0160; }; if (((* (( (ptr) gf_c38476)+12) ) == var_c35980)) { { word ra_v9884; ra_v9884 = var_c35948; SOURCE(4370, 14) { word pd165; pd165 = (* (( (ptr) (* (( (ptr) gf_c38476)+169)/* var_c35532 */ ))+21) ); (void) ( *( (fPt) ((* (ptr) pd165 ))))(c_v9612, (* (ptr) ra_v9884 ), pd165); }; }; goto endif0160; }; if ((( var_c36076 = (* (( (ptr) gf_c38476)+20) ) ) == var_c35980)) { { word rc_v9940; rc_v9940 = var_c35948; SOURCE(4404, 14) { word pd166; pd166 = (* (( (ptr) (* (( (ptr) gf_c38476)+169)/* var_c35532 */ ))+21) ); (void) ( *( (fPt) ((* (ptr) pd166 ))))(c_v9612, (* (ptr) rc_v9940 ), pd166); }; }; goto endif0160; }; if (((* (( (ptr) gf_c38476)+19) ) == var_c35980)) { { word ri_v9996; ri_v9996 = var_c35948; SOURCE(4437, 24) { word pd167; pd167 = (* (( (ptr) (* (( (ptr) gf_c38476)+169)/* var_c35532 */ ))+21) ); (void) ( *( (fPt) ((* (ptr) pd167 ))))(c_v9612, (* (ptr) ri_v9996 ), pd167); }; }; goto endif0160; }; if ((var_c36076 == var_c35980)) { { word rp_v10052; rp_v10052 = var_c35948; SOURCE(4483, 24) { word pd168; pd168 = (* (( (ptr) (* (( (ptr) gf_c38476)+169)/* var_c35532 */ ))+21) ); (void) ( *( (fPt) ((* (ptr) pd168 ))))(c_v9612, (* (ptr) rp_v10052 ), pd168); }; }; goto endif0160; }; if (((* (( (ptr) gf_c38476)+18) ) == var_c35980)) { { word rt_v10108; rt_v10108 = var_c35948; SOURCE(4525, 36) (void) BPutPaddedText_P660(c_v9612, rt_v10108, (* (( (ptr) formal_c38508)+13) )); }; goto endif0160; }; lab_L100005: ; goto endif0160; endif0160: ; }; }; }; SOURCE(4578, 29) { word pd169; pd169 = (* (( (ptr) (* (( (ptr) gf_c38476)+169)/* var_c35532 */ ))+64) ); (void) ( *( (fPt) ((* (ptr) pd169 ))))(c_v9612, (* (( (ptr) formal_c38508)+10) ), pd169); }; } static void BPutPaddedText_P660(c_v5388, text_v5416, requiredLength_v5444) word c_v5388; word text_v5416; word requiredLength_v5444; { register ptr gf_c38540 = (ptr) &globalframe; word size_v10164; /* BPutPaddedText: */ SOURCE(5035, 353) SOURCE(5126, 36) { word base_v33528; base_v33528 = text_v5416; { word tc170; word idx171; if ((base_v33528 == 0)) { tc170 = (word) 0; } else { tc170 = (word) (unsigned) (* (hPt) base_v33528 ); }; size_v10164 = ( idx171 = (word) tc170, BCK(idx171, 32768) ); }; }; SOURCE(5164, 93) { register word i_v10208 = 0; register word noName_c36140; noName_c36140 = (MIN((int)(word), size_v10164, requiredLength_v5444)); if (( (int)i_v10208 >= (int)noName_c36140)) { goto lab_L100015; }; lab_L100018: ; SOURCE(5216, 41) { word c_v33404; word b_v33432; c_v33404 = c_v5388; { word limit172; b_v33432 = (unsigned) (word) (* ((( (bPt) text_v5416)+4)+( limit172 = (word) (unsigned) (* (( (hPt) text_v5416)+1) ), BCK(i_v10208, limit172) )) ); }; { word n_v26560; n_v26560 = (* (( (ptr) c_v33404)+4) ); (* (( (bPt) (* (( (ptr) c_v33404)+7) ))+n_v26560) ) = b_v33432; (* (( (ptr) c_v33404)+4) ) = (n_v26560 + 1); }; }; i_v10208 = (i_v10208 + 1); if (( (int)i_v10208 < (int)noName_c36140)) { goto lab_L100018; }; lab_L100015: ; }; SOURCE(5259, 68) if (( (int)size_v10164 < (int)requiredLength_v5444)) { SOURCE(5287, 40) { word pd173; pd173 = (* (( (ptr) (* (( (ptr) gf_c38540)+169)/* var_c35532 */ ))+23) ); (void) ( *( (fPt) ((* (ptr) pd173 ))))(c_v5388, (requiredLength_v5444 - size_v10164), pd173); }; }; SOURCE(5329, 59) { word var_c36172; { word pd174; pd174 = (* (( (ptr) (* (( (ptr) gf_c38540)+169)/* var_c35532 */ ))+5) ); var_c36172 = (word) ( *( (fPt) ((* (ptr) pd174 ))))(requiredLength_v5444, pd174); }; { word pd175; pd175 = (* (( (ptr) (* (( (ptr) gf_c38540)+169)/* var_c35532 */ ))+23) ); (void) ( *( (fPt) ((* (ptr) pd175 ))))(c_v5388, var_c36172, pd175); }; }; } static void XPropInfo_P720(formal_c0180, data_v5516) word formal_c0180; word data_v5516; { register ptr gf_c38572 = (ptr) &globalframe; word numberOfUnits_v5572; word unitSize_v5600; /* XPropInfo: */ SOURCE(5394, 593) SOURCE(5472, 515) { word var_c36204; word var_c36236; var_c36204 = data_v5516; if ((var_c36204 == 0)) { goto lab_L100020; }; var_c36236 = XR_GetReferentType(var_c36204); { word tc177; if (((* (( (ptr) gf_c38572)+17) ) == var_c36236)) { tc177 = (word) ( (unsigned) (*(int*)var_c36204<0) == 0); } else { tc177 = (word) 0; }; if (tc177) { { word r_v10252; r_v10252 = var_c36204; SOURCE(5511, 30) { word pd178; pd178 = (* (( (ptr) (* (( (ptr) gf_c38572)+168)/* var_c35372 */ ))+14) ); numberOfUnits_v5572 = (word) ( *( (fPt) ((* (ptr) pd178 ))))(r_v10252, pd178); }; SOURCE(5543, 12) unitSize_v5600 = 1; }; goto endif0176; }; if (((* (( (ptr) gf_c38572)+22) ) == var_c36236)) { { word rc_v10296; rc_v10296 = var_c36204; SOURCE(5588, 23) numberOfUnits_v5572 = (* (ptr) rc_v10296 ); SOURCE(5613, 12) unitSize_v5600 = 4; }; goto endif0176; }; if (((* (( (ptr) gf_c38572)+21) ) == var_c36236)) { { word rc_v10352; rc_v10352 = var_c36204; SOURCE(5658, 23) numberOfUnits_v5572 = (* (ptr) rc_v10352 ); SOURCE(5683, 12) unitSize_v5600 = 2; }; goto endif0176; }; if (((* (( (ptr) gf_c38572)+12) ) == var_c36236)) { { word rc_v10408; rc_v10408 = var_c36204; SOURCE(5719, 17) numberOfUnits_v5572 = 1; SOURCE(5738, 12) unitSize_v5600 = 4; }; goto endif0176; }; if (((* (( (ptr) gf_c38572)+19) ) == var_c36236)) { { word rc_v10464; rc_v10464 = var_c36204; SOURCE(5771, 17) numberOfUnits_v5572 = 1; SOURCE(5790, 12) unitSize_v5600 = 4; }; goto endif0176; }; if (((* (( (ptr) gf_c38572)+20) ) == var_c36236)) { { word rc_v10520; rc_v10520 = var_c36204; SOURCE(5824, 17) numberOfUnits_v5572 = 1; SOURCE(5843, 12) unitSize_v5600 = 4; }; goto endif0176; }; if (((* (( (ptr) gf_c38572)+18) ) == var_c36236)) { { word rt_v10576; rt_v10576 = var_c36204; SOURCE(5875, 34) { word var_c36268; word base_v33480; base_v33480 = rt_v10576; { word tc179; word idx180; if ((base_v33480 == 0)) { tc179 = (word) 0; } else { tc179 = (word) (unsigned) (* (hPt) base_v33480 ); }; var_c36268 = ( idx180 = (word) tc179, BCK(idx180, 32768) ); }; numberOfUnits_v5572 = var_c36268; }; SOURCE(5911, 12) unitSize_v5600 = 1; }; goto endif0176; }; lab_L100020: ; SOURCE(5937, 50) if ((data_v5516 == 0)) { SOURCE(5956, 17) numberOfUnits_v5572 = 0; SOURCE(5975, 12) unitSize_v5600 = 1; } else { SOURCE(6036, 5) (void) XR_RaiseUnnamedError(); }; goto endif0176; endif0176: ; }; }; /* removed tail goto */ (* (ptr) formal_c0180 ) = numberOfUnits_v5572; (* (( (ptr) formal_c0180)+1) ) = unitSize_v5600; return; } static void DeleteProperty_P780(c_v5660, formal_c0502, formal_c0503, formal_c0504) word c_v5660; word formal_c0502; word formal_c0503; word formal_c0504; { W9 var_c38604; /* declaration of w_v5688 skipped */ /* declaration of property_v5716 skipped */ /* declaration of details_v5744 skipped */ register ptr gf_c38636 = (ptr) &globalframe; /* declaration of var_c36300 skipped */ (* (( (ptr) &var_c38604)+4)/* w_v5688 */ ) = formal_c0502; (* (( (ptr) &var_c38604)+5)/* property_v5716 */ ) = formal_c0503; (* (( (ptr) &var_c38604)+6)/* details_v5744 */ ) = formal_c0504; /* DeleteProperty: */ SOURCE(6047, 283) { word tmpAddr181; tmpAddr181 = (word) (( (ptr) &var_c38604)+7)/* var_c36300 */ ; (* (ptr) tmpAddr181 ) = ( ((word) (fPt) action_P3216) ); (* (( (ptr) tmpAddr181) + 1) ) = 1; }; SOURCE(6271, 21) if (((* (( (ptr) &var_c38604)+5)/* property_v5716 */ ) == 0)) { SOURCE(6292, 5) (void) XR_RaiseUnnamedError(); }; SOURCE(6299, 31) { word pd182; pd182 = (* (( (ptr) (* (( (ptr) gf_c38636)+169)/* var_c35532 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd182 ))))(c_v5660, (word) (( (bPt) &var_c38604)+28)/* var_c36300 */ , (* (( (ptr) &var_c38604)+6) /* details_v5744 */ ), pd182); }; } static void action_P3216(c_v10708, formal_c38700) word c_v10708; word formal_c38700; { register ptr gf_c38668 = (ptr) &globalframe; formal_c38700 = (formal_c38700 - 28); /* action: */ SOURCE(6141, 125) SOURCE(6174, 18) { word pd183; pd183 = (* (( (ptr) (* (( (ptr) gf_c38668)+169)/* var_c35532 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd183 ))))(c_v10708, 19, 0, 3, pd183); }; SOURCE(6194, 18) { word pd184; pd184 = (* (( (ptr) (* (( (ptr) gf_c38668)+169)/* var_c35532 */ ))+27) ); (void) ( *( (fPt) ((* (ptr) pd184 ))))(c_v10708, (* (( (ptr) formal_c38700)+4) ), pd184); }; SOURCE(6214, 21) (void) BPutProp_P480(c_v10708, (* (( (ptr) formal_c38700)+5) )); SOURCE(6237, 29) { word pd185; pd185 = (* (( (ptr) (* (( (ptr) gf_c38668)+169)/* var_c35532 */ ))+64) ); (void) ( *( (fPt) ((* (ptr) pd185 ))))(c_v10708, (* (( (ptr) formal_c38700)+6) ), pd185); }; } static void GetProperty_P840(formal_c0223, c_v5804, formal_c0505, formal_c0506, formal_c0507, formal_c0508, longOff_v5944, longLength_v5972, supposedFormat_v6000) word formal_c0223; word c_v5804; word formal_c0505; word formal_c0506; word formal_c0507; word formal_c0508; word longOff_v5944; word longLength_v5972; word supposedFormat_v6000; { W13 var_c38732; /* declaration of w_v5832 skipped */ /* declaration of property_v5860 skipped */ /* declaration of supposedType_v5888 skipped */ /* declaration of delete_v5916 skipped */ register ptr gf_c38764 = (ptr) &globalframe; W4 ret_v6044; /* declaration of var_c36332 skipped */ /* declaration of reply_v10736 skipped */ /* declaration of offset32_v10792 skipped */ /* declaration of leng32_v10820 skipped */ word lengUnits_v10848; (* (( (ptr) &var_c38732)+4)/* w_v5832 */ ) = formal_c0505; (* (( (ptr) &var_c38732)+5)/* property_v5860 */ ) = formal_c0506; (* (( (ptr) &var_c38732)+6)/* supposedType_v5888 */ ) = formal_c0507; (* (( (ptr) &var_c38732)+7)/* delete_v5916 */ ) = formal_c0508; /* GetProperty: */ SOURCE(6336, 1340) { word tmpAddr186; tmpAddr186 = (word) (( (ptr) &var_c38732)+8)/* var_c36332 */ ; (* (ptr) tmpAddr186 ) = ( ((word) (fPt) action_P3276) ); (* (( (ptr) tmpAddr186) + 1) ) = 1; }; SOURCE(6336, 1340) ret_v6044.f0 = 0; ret_v6044.f1 = 0; ret_v6044.f2 = 0; ret_v6044.f3 = 0; SOURCE(6530, 12) (* (( (ptr) &var_c38732)+10)/* reply_v10736 */ ) = 0; SOURCE(6752, 26) (* (( (ptr) &var_c38732)+11)/* offset32_v10792 */ ) = SGNCK(longOff_v5944); SOURCE(6780, 58) { word x187; word idx188; (* (( (ptr) &var_c38732)+12)/* leng32_v10820 */ ) = ( idx188 = (word) (x187 = (* (( (ptr) (* (( (ptr) c_v5804)+16) ))+6) ), MIN((int)(word), longLength_v5972, x187)), SGNCK(idx188) ); }; SOURCE(6857, 21) if (((* (( (ptr) &var_c38732)+5)/* property_v5860 */ ) == 0)) { SOURCE(6878, 5) (void) XR_RaiseUnnamedError(); }; SOURCE(6885, 27) { word pd189; pd189 = (* (( (ptr) (* (( (ptr) gf_c38764)+169)/* var_c35532 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd189 ))))(c_v5804, (word) (( (bPt) &var_c38732)+32)/* var_c36332 */ , 0, pd189); }; SOURCE(6914, 17) { word pd190; pd190 = (* (( (ptr) (* (( (ptr) gf_c38764)+169)/* var_c35532 */ ))+68) ); (void) ( *( (fPt) ((* (ptr) pd190 ))))((* ((( (ptr) &var_c38732)+10)/* reply_v10736 */ ) ), pd190); }; SOURCE(6933, 26) { word pd191; pd191 = (* (( (ptr) (* (( (ptr) gf_c38764)+169)/* var_c35532 */ ))+77) ); ret_v6044.f1 = (word) ( *( (fPt) ((* (ptr) pd191 ))))((* ((( (ptr) &var_c38732)+10)/* reply_v10736 */ ) ), pd191); }; SOURCE(6961, 14) (* (( (ptr) (* (( (ptr) &var_c38732)+10)/* reply_v10736 */ ))+10) ) = ((* (( (ptr) (* (( (ptr) &var_c38732)+10)/* reply_v10736 */ ))+10) ) + 6); SOURCE(6977, 27) { word pd192; pd192 = (* (( (ptr) (* (( (ptr) gf_c38764)+169)/* var_c35532 */ ))+79) ); ret_v6044.f0 = (word) ( *( (fPt) ((* (ptr) pd192 ))))((* ((( (ptr) &var_c38732)+10)/* reply_v10736 */ ) ), pd192); }; SOURCE(7006, 31) { word pd193; pd193 = (* (( (ptr) (* (( (ptr) gf_c38764)+169)/* var_c35532 */ ))+79) ); ret_v6044.f3 = (word) ( *( (fPt) ((* (ptr) pd193 ))))((* ((( (ptr) &var_c38732)+10)/* reply_v10736 */ ) ), pd193); }; SOURCE(7040, 26) { word pd194; word idx195; pd194 = (* (( (ptr) (* (( (ptr) gf_c38764)+169)/* var_c35532 */ ))+79) ); lengUnits_v10848 = ( idx195 = (word) ( *( (fPt) ((* (ptr) pd194 ))))((* ((( (ptr) &var_c38732)+10)/* reply_v10736 */ ) ), pd194), SGNCK(idx195) ); }; SOURCE(7094, 557) SOURCE(7096, 535) { word var_c36364; var_c36364 = ret_v6044.f1; switch (var_c36364) { case 8: SOURCE(7127, 87) { word pd196; pd196 = (* (( (ptr) (* (( (ptr) gf_c38764)+169)/* var_c35532 */ ))+61) ); ret_v6044.f2 = (word) ( *( (fPt) ((* (ptr) pd196 ))))((* (( (ptr) (* (( (ptr) &var_c38732)+10)/* reply_v10736 */ ))+8) ), 0, lengUnits_v10848, pd196) ; }; break; case 32: SOURCE(7225, 187) { word rcs_v10952; SOURCE(7227, 56) { word var_c36396; word var_c36428; word var_c36460; var_c36396 = BCK(lengUnits_v10848, 67108863); var_c36428 = ((word) var_c36396 << 2); var_c36460 = XR_NewObject((4 + var_c36428), (* (( (ptr) gf_c38764)+22) )); (* (ptr) var_c36460 ) = var_c36396; rcs_v10952 = var_c36460; }; SOURCE(7285, 109) { register word i_v11008 = 0; register word noName_c36492; noName_c36492 = lengUnits_v10848; if (( (int)i_v11008 >= (int)noName_c36492)) { goto lab_L100023; }; lab_L100026: ; SOURCE(7317, 77) { word var_c36524; word b_v33328; word startPos_v33356; b_v33328 = (* (( (ptr) (* (( (ptr) &var_c38732)+10)/* reply_v10736 */ ))+8) ); startPos_v33356 = IOP2( * , (int)i_v11008, (int)4); { word ln_v27708; ln_v27708 = (((word) (((word) (((word) (unsigned) (word) (* (( (bPt) b_v33328)+startPos_v33356) ) << 8) + (unsigned) (word) (* ( ( (bPt) b_v33328)+(startPos_v33356 + 1)) )) << 8) + (unsigned) (word) (* (( (bPt) b_v33328)+(startPos_v33356 + 2)) )) << 8) + (unsigned) (word) (* (( (bPt) b_v33328)+(startPos_v33356 + 3)) )); var_c36524 = ln_v27708; }; { word limit197; (* ((( (ptr) rcs_v10952)+1)+( /*1*/ limit197 = (* (ptr) rcs_v10952 ), /*1*/ BCK(i_v11008, limit197) /*1*/ )) ) = var_c36524; }; }; i_v11008 = (i_v11008 + 1); if (( (int)i_v11008 < (int)noName_c36492)) { goto lab_L100026; }; lab_L100023: ; }; SOURCE(7396, 16) ret_v6044.f2 = rcs_v10952; }; break; case 16: SOURCE(7421, 187) { word rcs_v11052; SOURCE(7423, 56) { word var_c36588; word var_c36620; word var_c36652; var_c36588 = BCK(lengUnits_v10848, 67108863); var_c36620 = ((word) var_c36588 << 2); var_c36652 = XR_NewObject((4 + var_c36620), (* (( (ptr) gf_c38764)+21) )); (* (ptr) var_c36652 ) = var_c36588; rcs_v11052 = var_c36652; }; SOURCE(7481, 109) { register word i_v11108 = 0; register word noName_c36684; noName_c36684 = lengUnits_v10848; if (( (int)i_v11108 >= (int)noName_c36684)) { goto lab_L100028; }; lab_L100031: ; SOURCE(7513, 77) { word var_c36716; word b_v33252; word startPos_v33280; b_v33252 = (* (( (ptr) (* (( (ptr) &var_c38732)+10)/* reply_v10736 */ ))+8) ); startPos_v33280 = IOP2( * , (int)i_v11108, (int)2); { word byte0_v28316; word byte1_v28348; byte0_v28316 = (unsigned) (word) (* (( (bPt) b_v33252)+startPos_v33280) ); byte1_v28348 = (unsigned) (word) (* (( (bPt) b_v33252)+(startPos_v33280 + 1)) ); var_c36716 = (((word) byte0_v28316 << 8) + byte1_v28348); }; { word limit198; (* ((( (ptr) rcs_v11052)+1)+( /*1*/ limit198 = (* (ptr) rcs_v11052 ), /*1*/ BCK(i_v11108, limit198) /*1*/ )) ) = var_c36716; }; }; i_v11108 = (i_v11108 + 1); if (( (int)i_v11108 < (int)noName_c36684)) { goto lab_L100031; }; lab_L100028: ; }; SOURCE(7592, 16) ret_v6044.f2 = rcs_v11052; }; break; case 0: SOURCE(7616, 15) ret_v6044.f2 = 0; break; default: SOURCE(7644, 5) (void) XR_RaiseUnnamedError(); break; }; }; SOURCE(7654, 22) { word pd199; pd199 = (* (( (ptr) (* (( (ptr) gf_c38764)+169)/* var_c35532 */ ))+67) ); (void) ( *( (fPt) ((* (ptr) pd199 ))))(c_v5804, (* (( (ptr) &var_c38732)+10)/* reply_v10736 */ ), pd199); }; /* removed tail goto */ (* (W4Pt) formal_c0223 ) = ret_v6044; return; } static void action_P3276(c_v10924, formal_c38828) word c_v10924; word formal_c38828; { register ptr gf_c38796 = (ptr) &globalframe; formal_c38828 = (formal_c38828 - 32); /* action: */ SOURCE(6544, 203) SOURCE(6577, 32) { word pd200; pd200 = (* (( (ptr) (* (( (ptr) gf_c38796)+169)/* var_c35532 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd200 ))))(c_v10924, 20, (* (( (ptr) formal_c38828)+7) ), 6, pd200); }; SOURCE(6611, 18) { word pd201; pd201 = (* (( (ptr) (* (( (ptr) gf_c38796)+169)/* var_c35532 */ ))+27) ); (void) ( *( (fPt) ((* (ptr) pd201 ))))(c_v10924, (* (( (ptr) formal_c38828)+4) ), pd201); }; SOURCE(6631, 21) (void) BPutProp_P480(c_v10924, (* (( (ptr) formal_c38828)+5) )); SOURCE(6654, 25) (void) BPutProp_P480(c_v10924, (* (( (ptr) formal_c38828)+6) )); SOURCE(6681, 19) { word pd202; pd202 = (* (( (ptr) (* (( (ptr) gf_c38796)+169)/* var_c35532 */ ))+21) ); (void) ( *( (fPt) ((* (ptr) pd202 ))))(c_v10924, (* (( (ptr) formal_c38828)+11) ), pd202); }; SOURCE(6702, 17) { word pd203; pd203 = (* (( (ptr) (* (( (ptr) gf_c38796)+169)/* var_c35532 */ ))+21) ); (void) ( *( (fPt) ((* (ptr) pd203 ))))(c_v10924, (* (( (ptr) formal_c38828)+12) ), pd203); }; SOURCE(6721, 26) { word pd204; pd204 = (* (( (ptr) (* (( (ptr) gf_c38796)+169)/* var_c35532 */ ))+62) ); (* (( (ptr) formal_c38828)+10) ) = (word) ( *( (fPt) ((* (ptr) pd204 ))))(c_v10924, pd204); }; } static void ListProperties_P900(formal_c0235, c_v6104, formal_c0509) word formal_c0235; word c_v6104; word formal_c0509; { W8 var_c38860; /* declaration of w_v6132 skipped */ register ptr gf_c38892 = (ptr) &globalframe; word list_v6176; word num_v6204; /* declaration of var_c36748 skipped */ /* declaration of reply_v11152 skipped */ var_c38860.f4/* w_v6132 */ = formal_c0509; /* ListProperties: */ SOURCE(7682, 434) { word tmpAddr205; tmpAddr205 = (word) (( (ptr) &var_c38860)+5)/* var_c36748 */ ; (* (ptr) tmpAddr205 ) = ( ((word) (fPt) action_P3528) ); (* (( (ptr) tmpAddr205) + 1) ) = 1; }; SOURCE(7682, 434) list_v6176 = 0; SOURCE(7787, 12) var_c38860.f7/* reply_v11152 */ = 0; SOURCE(7905, 27) { word pd206; pd206 = (* (( (ptr) (* (( (ptr) gf_c38892)+169)/* var_c35532 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd206 ))))(c_v6104, (word) (( (bPt) &var_c38860)+20)/* var_c36748 */ , 0, pd206); }; SOURCE(7934, 17) { word pd207; pd207 = (* (( (ptr) (* (( (ptr) gf_c38892)+169)/* var_c35532 */ ))+68) ); (void) ( *( (fPt) ((* (ptr) pd207 ))))(var_c38860.f7/* reply_v11152 */ , pd207); }; SOURCE(7953, 14) (* (( (ptr) var_c38860.f7/* reply_v11152 */ )+10) ) = ((* (( (ptr) var_c38860.f7/* reply_v11152 */ )+10) ) + 7); SOURCE(7969, 20) { word pd208; pd208 = (* (( (ptr) (* (( (ptr) gf_c38892)+169)/* var_c35532 */ ))+78) ); num_v6204 = (word) ( *( (fPt) ((* (ptr) pd208 ))))(var_c38860.f7/* reply_v11152 */ , pd208); }; SOURCE(7991, 15) (* (( (ptr) var_c38860.f7/* reply_v11152 */ )+10) ) = ((* (( (ptr) var_c38860.f7/* reply_v11152 */ )+10) ) + 22); SOURCE(8009, 83) { register word i_v11284 = 0; register word noName_c36780; noName_c36780 = num_v6204; if (( (int)i_v11284 >= (int)noName_c36780)) { goto lab_L100034; }; lab_L100037: ; { word a_v11328; SOURCE(8035, 27) { word pd209; pd209 = (* (( (ptr) (* (( (ptr) gf_c38892)+169)/* var_c35532 */ ))+79) ); a_v11328 = (word) ( *( (fPt) ((* (ptr) pd209 ))))(var_c38860.f7/* reply_v11152 */ , pd209); }; SOURCE(8064, 28) { word var_c36844; var_c36844 = XR_NewObject(8, (* (( (ptr) gf_c38892)+16) )); (* (ptr) var_c36844 ) = a_v11328; (* (( (ptr) var_c36844)+1) ) = list_v6176; list_v6176 = var_c36844; }; }; i_v11284 = (i_v11284 + 1); if (( (int)i_v11284 < (int)noName_c36780)) { goto lab_L100037; }; lab_L100034: ; }; SOURCE(8094, 22) { word pd210; pd210 = (* (( (ptr) (* (( (ptr) gf_c38892)+169)/* var_c35532 */ ))+67) ); (void) ( *( (fPt) ((* (ptr) pd210 ))))(c_v6104, var_c38860.f7/* reply_v11152 */ , pd210); }; /* removed tail goto */ (* (ptr) formal_c0235 ) = list_v6176; (* (( (ptr) formal_c0235)+1) ) = num_v6204; return; } static void action_P3528(c_v11256, formal_c38956) word c_v11256; word formal_c38956; { register ptr gf_c38924 = (ptr) &globalframe; formal_c38956 = (formal_c38956 - 20); /* action: */ SOURCE(7801, 99) SOURCE(7834, 18) { word pd211; pd211 = (* (( (ptr) (* (( (ptr) gf_c38924)+169)/* var_c35532 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd211 ))))(c_v11256, 21, 0, 2, pd211); }; SOURCE(7854, 18) { word pd212; pd212 = (* (( (ptr) (* (( (ptr) gf_c38924)+169)/* var_c35532 */ ))+27) ); (void) ( *( (fPt) ((* (ptr) pd212 ))))(c_v11256, (* (( (ptr) formal_c38956)+4) ), pd212); }; SOURCE(7874, 26) { word pd213; pd213 = (* (( (ptr) (* (( (ptr) gf_c38924)+169)/* var_c35532 */ ))+62) ); (* (( (ptr) formal_c38956)+7) ) = (word) ( *( (fPt) ((* (ptr) pd213 ))))(c_v11256, pd213); }; } static void RotateProperties_P960(c_v6348, formal_c0510, formal_c0511, formal_c0512, formal_c0513) word c_v6348; word formal_c0510; word formal_c0511; word formal_c0512; word formal_c0513; { W11 var_c38988; /* declaration of w_v6376 skipped */ /* declaration of delta_v6404 skipped */ /* declaration of properties_v6432 skipped */ /* declaration of details_v6460 skipped */ register ptr gf_c39020 = (ptr) &globalframe; /* declaration of var_c36876 skipped */ /* declaration of cnt_v11400 skipped */ word lst_v11428; (* (( (ptr) &var_c38988)+4)/* w_v6376 */ ) = formal_c0510; (* (( (ptr) &var_c38988)+5)/* delta_v6404 */ ) = formal_c0511; (* (( (ptr) &var_c38988)+6)/* properties_v6432 */ ) = formal_c0512; (* (( (ptr) &var_c38988)+7)/* details_v6460 */ ) = formal_c0513; /* RotateProperties: */ SOURCE(8122, 762) { word tmpAddr214; tmpAddr214 = (word) (( (ptr) &var_c38988)+8)/* var_c36876 */ ; (* (ptr) tmpAddr214 ) = ( ((word) (fPt) action_P3684) ); (* (( (ptr) tmpAddr214) + 1) ) = 1; }; SOURCE(8635, 14) (* (( (ptr) &var_c38988)+10)/* cnt_v11400 */ ) = 0; SOURCE(8651, 5) lst_v11428 = (* (( (ptr) &var_c38988)+6)/* properties_v6432 */ ); SOURCE(8684, 86) lab_L100040: ; if ( ( (lst_v11428 != 0) ? ( (int)(* (( (ptr) &var_c38988)+10)/* cnt_v11400 */ ) < (int)(* (( (ptr) (* (( (ptr) c_v6348)+16) ))+6) )) : 0 ) ) { } else { goto lab_L100038; }; SOURCE(8734, 11) { word idx215; (* (( (ptr) &var_c38988)+10)/* cnt_v11400 */ ) = (( idx215 = (word) ((* (( (ptr) &var_c38988)+10)/* cnt_v11400 */ ) + 32769), BCK(idx215, 65536) ) - 32768); }; SOURCE(8747, 23) lst_v11428 = (* (( (ptr) lst_v11428)+1) ); goto lab_L100040; lab_L100038: ; SOURCE(8773, 45) if (( (int)(* (( (ptr) &var_c38988)+10)/* cnt_v11400 */ ) > (int)1000)) { SOURCE(8790, 28) (void) RaiseClientError_P60(c_v6348, (* (( (ptr) gf_c39020)+23) )); }; SOURCE(8820, 31) if (( (int)(* (( (ptr) &var_c38988)+10)/* cnt_v11400 */ ) == (int)0) || ( (int)(* (( (ptr) &var_c38988)+5)/* delta_v6404 */ ) == (int)0)) { SOURCE(8845, 6) return; }; SOURCE(8853, 31) { word pd216; pd216 = (* (( (ptr) (* (( (ptr) gf_c39020)+169)/* var_c35532 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd216 ))))(c_v6348, (word) (( (bPt) &var_c38988)+32)/* var_c36876 */ , (* (( (ptr) &var_c38988)+7) /* details_v6460 */ ), pd216); }; } static void action_P3684(c_v11504, formal_c39084) word c_v11504; word formal_c39084; { register ptr gf_c39052 = (ptr) &globalframe; formal_c39084 = (formal_c39084 - 32); /* action: */ SOURCE(8240, 390) SOURCE(8273, 23) { word pd217; pd217 = (* (( (ptr) (* (( (ptr) gf_c39052)+169)/* var_c35532 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd217 ))))(c_v11504, 114, 0, ((* (( (ptr) formal_c39084)+10) ) + 3), pd217); }; SOURCE(8298, 18) { word pd218; pd218 = (* (( (ptr) (* (( (ptr) gf_c39052)+169)/* var_c35532 */ ))+27) ); (void) ( *( (fPt) ((* (ptr) pd218 ))))(c_v11504, (* (( (ptr) formal_c39084)+4) ), pd218); }; SOURCE(8318, 21) { word pd219; pd219 = (* (( (ptr) (* (( (ptr) gf_c39052)+169)/* var_c35532 */ ))+26) ); (void) ( *( (fPt) ((* (ptr) pd219 ))))(c_v11504, (* (( (ptr) formal_c39084)+10) ), pd219); }; SOURCE(8341, 42) { word pd220; pd220 = (* (( (ptr) (* (( (ptr) gf_c39052)+169)/* var_c35532 */ ))+20) ); (void) ( *( (fPt) ((* (ptr) pd220 ))))(c_v11504, ( (((unsigned)(* (( (ptr) formal_c39084)+5) ) << 16) >> 16) ), pd220); }; SOURCE(8385, 214) { register word i_v11616 = 0; register word noName_c36908; noName_c36908 = (* (( (ptr) formal_c39084)+10) ); if (( (int)i_v11616 >= (int)noName_c36908)) { goto lab_L100041; }; lab_L100044: ; SOURCE(8411, 45) if (((* (( (ptr) formal_c39084)+6) ) == 0)) { SOURCE(8434, 22) (* (( (ptr) formal_c39084)+6) ) = XR_NewObject(8, (* (( (ptr) gf_c39052)+16) )); { word var_c36972; var_c36972 = (* (( (ptr) formal_c39084)+6) ); }; }; SOURCE(8532, 29) (void) BPutProp_P480(c_v11504, (* (ptr) (* (( (ptr) formal_c39084)+6) ) )); SOURCE(8563, 36) (* (( (ptr) formal_c39084)+6) ) = (* (( (ptr) (* (( (ptr) formal_c39084)+6) ))+1) ); i_v11616 = (i_v11616 + 1); if (( (int)i_v11616 < (int)noName_c36908)) { goto lab_L100044; }; lab_L100041: ; }; SOURCE(8601, 29) { word pd221; pd221 = (* (( (ptr) (* (( (ptr) gf_c39052)+169)/* var_c35532 */ ))+64) ); (void) ( *( (fPt) ((* (ptr) pd221 ))))(c_v11504, (* (( (ptr) formal_c39084)+7) ), pd221); }; } static void PredefineAtoms_P1020() { W6 var_c39116; register ptr gf_c39148 = (ptr) &globalframe; /* declaration of var_c37004 skipped */ /* PredefineAtoms: */ SOURCE(8890, 2373) { word tmpAddr222; tmpAddr222 = (word) (( (ptr) &var_c39116)+4)/* var_c37004 */ ; (* (ptr) tmpAddr222 ) = ( ((word) (fPt) Def_P3792) ); (* (( (ptr) tmpAddr222) + 1) ) = 1; }; SOURCE(9124, 23) (void) Def_P3792(0, 0, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9150, 23) (void) Def_P3792((* (( (ptr) gf_c39148)+29) ), 1, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9175, 27) (void) Def_P3792((* (( (ptr) gf_c39148)+30) ), 2, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9205, 15) (void) Def_P3792((* (( (ptr) gf_c39148)+31) ), 3, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9223, 17) (void) Def_P3792((* (( (ptr) gf_c39148)+32) ), 4, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9244, 21) (void) Def_P3792((* (( (ptr) gf_c39148)+33) ), 5, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9267, 25) (void) Def_P3792((* (( (ptr) gf_c39148)+34) ), 6, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9295, 25) (void) Def_P3792((* (( (ptr) gf_c39148)+35) ), 7, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9322, 21) (void) Def_P3792((* (( (ptr) gf_c39148)+36) ), 8, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9347, 30) (void) Def_P3792((* (( (ptr) gf_c39148)+37) ), 9, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9379, 30) (void) Def_P3792((* (( (ptr) gf_c39148)+38) ), 10, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9412, 30) (void) Def_P3792((* (( (ptr) gf_c39148)+39) ), 11, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9444, 30) (void) Def_P3792((* (( (ptr) gf_c39148)+40) ), 12, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9477, 30) (void) Def_P3792((* (( (ptr) gf_c39148)+41) ), 13, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9509, 30) (void) Def_P3792((* (( (ptr) gf_c39148)+42) ), 14, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9542, 30) (void) Def_P3792((* (( (ptr) gf_c39148)+43) ), 15, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9574, 30) (void) Def_P3792((* (( (ptr) gf_c39148)+44) ), 16, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9607, 25) (void) Def_P3792((* (( (ptr) gf_c39148)+45) ), 17, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9634, 17) (void) Def_P3792((* (( (ptr) gf_c39148)+46) ), 18, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9655, 21) (void) Def_P3792((* (( (ptr) gf_c39148)+47) ), 21, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9678, 21) (void) Def_P3792((* (( (ptr) gf_c39148)+48) ), 20, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9703, 19) (void) Def_P3792((* (( (ptr) gf_c39148)+49) ), 21, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9724, 27) (void) Def_P3792((* (( (ptr) gf_c39148)+50) ), 22, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9754, 40) (void) Def_P3792((* (( (ptr) gf_c39148)+51) ), 23, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9796, 33) (void) Def_P3792((* (( (ptr) gf_c39148)+52) ), 24, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9831, 31) (void) Def_P3792((* (( (ptr) gf_c39148)+53) ), 25, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9864, 31) (void) Def_P3792((* (( (ptr) gf_c39148)+54) ), 26, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9898, 37) (void) Def_P3792((* (( (ptr) gf_c39148)+55) ), 27, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9937, 31) (void) Def_P3792((* (( (ptr) gf_c39148)+56) ), 28, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(9971, 33) (void) Def_P3792((* (( (ptr) gf_c39148)+57) ), 29, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10006, 29) (void) Def_P3792((* (( (ptr) gf_c39148)+58) ), 30, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10038, 21) (void) Def_P3792((* (( (ptr) gf_c39148)+59) ), 31, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10061, 25) (void) Def_P3792((* (( (ptr) gf_c39148)+60) ), 32, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10089, 21) (void) Def_P3792((* (( (ptr) gf_c39148)+61) ), 33, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10112, 28) (void) Def_P3792((* (( (ptr) gf_c39148)+62) ), 34, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10143, 24) (void) Def_P3792((* (( (ptr) gf_c39148)+63) ), 35, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10169, 41) (void) Def_P3792((* (( (ptr) gf_c39148)+64) ), 36, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10212, 31) (void) Def_P3792((* (( (ptr) gf_c39148)+65) ), 37, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10245, 31) (void) Def_P3792((* (( (ptr) gf_c39148)+66) ), 38, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10279, 22) (void) Def_P3792((* (( (ptr) gf_c39148)+67) ), 39, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10303, 37) (void) Def_P3792((* (( (ptr) gf_c39148)+68) ), 40, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10342, 33) (void) Def_P3792((* (( (ptr) gf_c39148)+69) ), 41, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10377, 33) (void) Def_P3792((* (( (ptr) gf_c39148)+70) ), 42, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10412, 26) (void) Def_P3792((* (( (ptr) gf_c39148)+71) ), 43, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10440, 28) (void) Def_P3792((* (( (ptr) gf_c39148)+72) ), 44, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10471, 26) (void) Def_P3792((* (( (ptr) gf_c39148)+73) ), 45, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10499, 26) (void) Def_P3792((* (( (ptr) gf_c39148)+74) ), 46, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10528, 34) (void) Def_P3792((* (( (ptr) gf_c39148)+75) ), 47, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10564, 34) (void) Def_P3792((* (( (ptr) gf_c39148)+76) ), 48, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10601, 30) (void) Def_P3792((* (( (ptr) gf_c39148)+77) ), 49, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10633, 30) (void) Def_P3792((* (( (ptr) gf_c39148)+78) ), 50, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10666, 44) (void) Def_P3792((* (( (ptr) gf_c39148)+79) ), 51, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10712, 46) (void) Def_P3792((* (( (ptr) gf_c39148)+80) ), 52, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10760, 40) (void) Def_P3792((* (( (ptr) gf_c39148)+81) ), 53, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10802, 42) (void) Def_P3792((* (( (ptr) gf_c39148)+82) ), 54, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10846, 32) (void) Def_P3792((* (( (ptr) gf_c39148)+83) ), 55, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10880, 24) (void) Def_P3792((* (( (ptr) gf_c39148)+84) ), 56, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10907, 28) (void) Def_P3792((* (( (ptr) gf_c39148)+85) ), 57, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10937, 21) (void) Def_P3792((* (( (ptr) gf_c39148)+86) ), 58, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10962, 28) (void) Def_P3792((* (( (ptr) gf_c39148)+87) ), 59, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(10992, 29) (void) Def_P3792((* (( (ptr) gf_c39148)+88) ), 60, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(11024, 27) (void) Def_P3792((* (( (ptr) gf_c39148)+89) ), 61, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(11053, 21) (void) Def_P3792((* (( (ptr) gf_c39148)+90) ), 62, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(11078, 26) (void) Def_P3792((* (( (ptr) gf_c39148)+91) ), 63, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(11106, 30) (void) Def_P3792((* (( (ptr) gf_c39148)+92) ), 64, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(11139, 26) (void) Def_P3792((* (( (ptr) gf_c39148)+93) ), 65, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(11167, 28) (void) Def_P3792((* (( (ptr) gf_c39148)+94) ), 66, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(11198, 24) (void) Def_P3792((* (( (ptr) gf_c39148)+95) ), 67, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); SOURCE(11224, 39) (void) Def_P3792((* (( (ptr) gf_c39148)+96) ), 68, (word) (( (bPt) &var_c39116)+16)/* var_c37004 */ ); } static void Def_P3792(r_v11736, atom_v11764, formal_c39212) word r_v11736; word atom_v11764; word formal_c39212; { register ptr gf_c39180 = (ptr) &globalframe; word key_v11792; formal_c39212 = (formal_c39212 - 16); /* Def: */ SOURCE(8941, 178) SOURCE(8978, 29) key_v11792 = atom_v11764; SOURCE(9009, 30) if ((key_v11792 > 68)) { SOURCE(9039, 5) (void) XR_RaiseUnnamedError(); }; SOURCE(9046, 19) (* (( (ptr) (* (( (ptr) gf_c39180)+4)/* atomToName_v3224 */ ))+BCK(key_v11792, 69)) ) = r_v11736; SOURCE(9067, 52) { word var_c37100; { word var_c37036; { word var_c37068; var_c37068 = XR_NewObject(4, (* (( (ptr) gf_c39180)+12) )); (* (ptr) var_c37068 ) = atom_v11764; var_c37036 = var_c37068; }; { word pd223; pd223 = (* (( (ptr) (* (( (ptr) gf_c39180)+164)/* var_c35052 */ ))+11) ); var_c37100 = (word) ( *( (fPt) ((* (ptr) pd223 ))))((* (( (ptr) gf_c39180)+5)/* nameToAtom_v3252 */ ), r_v11736, var_c37036, pd223) ; }; }; }; } static void SetSelectionOwner_P1080(c_v6620, formal_c0514, formal_c0515, formal_c0516, formal_c0517) word c_v6620; word formal_c0514; word formal_c0515; word formal_c0516; word formal_c0517; { W10 var_c39244; /* declaration of owner_v6648 skipped */ /* declaration of selection_v6676 skipped */ /* declaration of time_v6704 skipped */ /* declaration of details_v6732 skipped */ register ptr gf_c39276 = (ptr) &globalframe; /* declaration of var_c37132 skipped */ (* (( (ptr) &var_c39244)+4)/* owner_v6648 */ ) = formal_c0514; (* (( (ptr) &var_c39244)+5)/* selection_v6676 */ ) = formal_c0515; (* (( (ptr) &var_c39244)+6)/* time_v6704 */ ) = formal_c0516; (* (( (ptr) &var_c39244)+7)/* details_v6732 */ ) = formal_c0517; /* SetSelectionOwner: */ SOURCE(11269, 386) { word tmpAddr224; tmpAddr224 = (word) (( (ptr) &var_c39244)+8)/* var_c37132 */ ; (* (ptr) tmpAddr224 ) = ( ((word) (fPt) action_P3852) ); (* (( (ptr) tmpAddr224) + 1) ) = 1; }; SOURCE(11624, 31) { word pd225; pd225 = (* (( (ptr) (* (( (ptr) gf_c39276)+169)/* var_c35532 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd225 ))))(c_v6620, (word) (( (bPt) &var_c39244)+32)/* var_c37132 */ , (* (( (ptr) &var_c39244)+7) /* details_v6732 */ ), pd225); }; } static void action_P3852(c_v11912, formal_c39340) word c_v11912; word formal_c39340; { register ptr gf_c39308 = (ptr) &globalframe; formal_c39340 = (formal_c39340 - 32); /* action: */ SOURCE(11401, 152) SOURCE(11434, 18) { word pd226; pd226 = (* (( (ptr) (* (( (ptr) gf_c39308)+169)/* var_c35532 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd226 ))))(c_v11912, 22, 0, 4, pd226); }; SOURCE(11454, 22) { word pd227; pd227 = (* (( (ptr) (* (( (ptr) gf_c39308)+169)/* var_c35532 */ ))+27) ); (void) ( *( (fPt) ((* (ptr) pd227 ))))(c_v11912, (* (( (ptr) formal_c39340)+4) ), pd227); }; SOURCE(11479, 22) (void) BPutProp_P480(c_v11912, (* (( (ptr) formal_c39340)+5) )); SOURCE(11504, 17) { word pd228; pd228 = (* (( (ptr) (* (( (ptr) gf_c39308)+169)/* var_c35532 */ ))+33) ); (void) ( *( (fPt) ((* (ptr) pd228 ))))(c_v11912, (* (( (ptr) formal_c39340)+6) ), pd228); }; SOURCE(11524, 29) { word pd229; pd229 = (* (( (ptr) (* (( (ptr) gf_c39308)+169)/* var_c35532 */ ))+64) ); (void) ( *( (fPt) ((* (ptr) pd229 ))))(c_v11912, (* (( (ptr) formal_c39340)+7) ), pd229); }; } static word GetSelectionOwner_P1140(c_v6792, formal_c0518) word c_v6792; word formal_c0518; { W8 var_c39372; /* declaration of selection_v6820 skipped */ register ptr gf_c39404 = (ptr) &globalframe; word owner_v6864; /* declaration of var_c37164 skipped */ /* declaration of reply_v11968 skipped */ var_c39372.f4/* selection_v6820 */ = formal_c0518; /* GetSelectionOwner: */ SOURCE(11661, 352) { word tmpAddr230; tmpAddr230 = (word) (( (ptr) &var_c39372)+5)/* var_c37164 */ ; (* (ptr) tmpAddr230 ) = ( ((word) (fPt) action_P3912) ); (* (( (ptr) tmpAddr230) + 1) ) = 1; }; SOURCE(11661, 352) owner_v6864 = 0; SOURCE(11876, 12) var_c39372.f7/* reply_v11968 */ = 0; SOURCE(11890, 27) { word pd231; pd231 = (* (( (ptr) (* (( (ptr) gf_c39404)+169)/* var_c35532 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd231 ))))(c_v6792, (word) (( (bPt) &var_c39372)+20)/* var_c37164 */ , 0, pd231); }; SOURCE(11919, 17) { word pd232; pd232 = (* (( (ptr) (* (( (ptr) gf_c39404)+169)/* var_c35532 */ ))+68) ); (void) ( *( (fPt) ((* (ptr) pd232 ))))(var_c39372.f7/* reply_v11968 */ , pd232); }; SOURCE(11938, 14) (* (( (ptr) var_c39372.f7/* reply_v11968 */ )+10) ) = ((* (( (ptr) var_c39372.f7/* reply_v11968 */ )+10) ) + 7); SOURCE(11954, 35) { word var_c37196; word c_v33176; word id_v33204; c_v33176 = c_v6792; { word pd233; pd233 = (* (( (ptr) (* (( (ptr) gf_c39404)+169)/* var_c35532 */ ))+79) ); id_v33204 = (word) ( *( (fPt) ((* (ptr) pd233 ))))(var_c39372.f7/* reply_v11968 */ , pd233); }; var_c37196 = id_v33204; owner_v6864 = var_c37196; }; SOURCE(11991, 22) { word pd234; pd234 = (* (( (ptr) (* (( (ptr) gf_c39404)+169)/* var_c35532 */ ))+67) ); (void) ( *( (fPt) ((* (ptr) pd234 ))))(c_v6792, var_c39372.f7/* reply_v11968 */ , pd234); }; SOURCE(11661, 352) return(owner_v6864); } static void action_P3912(c_v12044, formal_c39468) word c_v12044; word formal_c39468; { register ptr gf_c39436 = (ptr) &globalframe; formal_c39468 = (formal_c39468 - 20); /* action: */ SOURCE(11767, 104) SOURCE(11800, 18) { word pd235; pd235 = (* (( (ptr) (* (( (ptr) gf_c39436)+169)/* var_c35532 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd235 ))))(c_v12044, 23, 0, 2, pd235); }; SOURCE(11820, 22) (void) BPutProp_P480(c_v12044, (* (( (ptr) formal_c39468)+4) )); SOURCE(11845, 26) { word pd236; pd236 = (* (( (ptr) (* (( (ptr) gf_c39436)+169)/* var_c35532 */ ))+62) ); (* (( (ptr) formal_c39468)+7) ) = (word) ( *( (fPt) ((* (ptr) pd236 ))))(c_v12044, pd236); }; } static void ConvertSelection_P1200(c_v6924, formal_c0519, formal_c0520, formal_c0521, formal_c0522, formal_c0523, formal_c0524) word c_v6924; word formal_c0519; word formal_c0520; word formal_c0521; word formal_c0522; word formal_c0523; word formal_c0524; { W12 var_c39500; /* declaration of requestor_v6952 skipped */ /* declaration of selection_v6980 skipped */ /* declaration of target_v7008 skipped */ /* declaration of property_v7036 skipped */ /* declaration of time_v7064 skipped */ /* declaration of details_v7092 skipped */ register ptr gf_c39532 = (ptr) &globalframe; /* declaration of var_c37228 skipped */ (* (( (ptr) &var_c39500)+4)/* requestor_v6952 */ ) = formal_c0519; (* (( (ptr) &var_c39500)+5)/* selection_v6980 */ ) = formal_c0520; (* (( (ptr) &var_c39500)+6)/* target_v7008 */ ) = formal_c0521; (* (( (ptr) &var_c39500)+7)/* property_v7036 */ ) = formal_c0522; (* (( (ptr) &var_c39500)+8)/* time_v7064 */ ) = formal_c0523; (* (( (ptr) &var_c39500)+9)/* details_v7092 */ ) = formal_c0524; /* ConvertSelection: */ SOURCE(12019, 462) { word tmpAddr237; tmpAddr237 = (word) (( (ptr) &var_c39500)+10)/* var_c37228 */ ; (* (ptr) tmpAddr237 ) = ( ((word) (fPt) action_P3972) ); (* (( (ptr) tmpAddr237) + 1) ) = 1; }; SOURCE(12450, 31) { word pd238; pd238 = (* (( (ptr) (* (( (ptr) gf_c39532)+169)/* var_c35532 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd238 ))))(c_v6924, (word) (( (bPt) &var_c39500)+40)/* var_c37228 */ , (* (( (ptr) &var_c39500)+9) /* details_v7092 */ ), pd238); }; } static void action_P3972(c_v12148, formal_c39596) word c_v12148; word formal_c39596; { register ptr gf_c39564 = (ptr) &globalframe; formal_c39596 = (formal_c39596 - 40); /* action: */ SOURCE(12193, 252) SOURCE(12226, 18) { word pd239; pd239 = (* (( (ptr) (* (( (ptr) gf_c39564)+169)/* var_c35532 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd239 ))))(c_v12148, 24, 0, 6, pd239); }; SOURCE(12246, 26) { word pd240; pd240 = (* (( (ptr) (* (( (ptr) gf_c39564)+169)/* var_c35532 */ ))+27) ); (void) ( *( (fPt) ((* (ptr) pd240 ))))(c_v12148, (* (( (ptr) formal_c39596)+4) ), pd240); }; SOURCE(12275, 22) (void) BPutProp_P480(c_v12148, (* (( (ptr) formal_c39596)+5) )); SOURCE(12300, 19) (void) BPutProp_P480(c_v12148, (* (( (ptr) formal_c39596)+6) )); SOURCE(12322, 21) (void) BPutProp_P480(c_v12148, (* (( (ptr) formal_c39596)+7) )); SOURCE(12346, 17) { word pd241; pd241 = (* (( (ptr) (* (( (ptr) gf_c39564)+169)/* var_c35532 */ ))+33) ); (void) ( *( (fPt) ((* (ptr) pd241 ))))(c_v12148, (* (( (ptr) formal_c39596)+8) ), pd241); }; SOURCE(12366, 29) { word pd242; pd242 = (* (( (ptr) (* (( (ptr) gf_c39564)+169)/* var_c35532 */ ))+64) ); (void) ( *( (fPt) ((* (ptr) pd242 ))))(c_v12148, (* (( (ptr) formal_c39596)+9) ), pd242); }; SOURCE(12397, 48) if (((* (( (ptr) formal_c39596)+9) ) == 0)) { SOURCE(12417, 28) { word pd243; if (((* (( (ptr) c_v12148)+5) ) != 0) || (0 != (* (( (ptr) c_v12148)+35) ))) { pd243 = (* (( (ptr) (* (( (ptr) gf_c39564)+169)/* var_c35532 */ ))+13) ); (void) ( *( (fPt) ((* (ptr) pd243 ))))(c_v12148, 0, pd243); }; }; }; } static void SendSelectionNotifyEvent_P1260(c_v7152, formal_c0525, formal_c0526, formal_c0527, formal_c0528, formal_c0529, formal_c0530) word c_v7152; word formal_c0525; word formal_c0526; word formal_c0527; word formal_c0528; word formal_c0529; word formal_c0530; { W12 var_c39628; /* declaration of destination_v7180 skipped */ /* declaration of selection_v7208 skipped */ /* declaration of target_v7236 skipped */ /* declaration of property_v7264 skipped */ /* declaration of timeStamp_v7292 skipped */ /* declaration of details_v7320 skipped */ register ptr gf_c39660 = (ptr) &globalframe; /* declaration of var_c37260 skipped */ (* (( (ptr) &var_c39628)+4)/* destination_v7180 */ ) = formal_c0525; (* (( (ptr) &var_c39628)+5)/* selection_v7208 */ ) = formal_c0526; (* (( (ptr) &var_c39628)+6)/* target_v7236 */ ) = formal_c0527; (* (( (ptr) &var_c39628)+7)/* property_v7264 */ ) = formal_c0528; (* (( (ptr) &var_c39628)+8)/* timeStamp_v7292 */ ) = formal_c0529; (* (( (ptr) &var_c39628)+9)/* details_v7320 */ ) = formal_c0530; /* SendSelectionNotifyEvent: */ SOURCE(12487, 681) { word tmpAddr244; tmpAddr244 = (word) (( (ptr) &var_c39628)+10)/* var_c37260 */ ; (* (ptr) tmpAddr244 ) = ( ((word) (fPt) action_P4032) ); (* (( (ptr) tmpAddr244) + 1) ) = 1; }; SOURCE(13137, 31) { word pd245; pd245 = (* (( (ptr) (* (( (ptr) gf_c39660)+169)/* var_c35532 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd245 ))))(c_v7152, (word) (( (bPt) &var_c39628)+40)/* var_c37260 */ , (* (( (ptr) &var_c39628)+9) /* details_v7320 */ ), pd245); }; } static void action_P4032(c_v12252, formal_c39724) word c_v12252; word formal_c39724; { register ptr gf_c39692 = (ptr) &globalframe; formal_c39724 = (formal_c39724 - 40); /* action: */ SOURCE(12662, 470) SOURCE(12695, 38) { word pd246; pd246 = (* (( (ptr) (* (( (ptr) gf_c39692)+169)/* var_c35532 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd246 ))))(c_v12252, 25, 1, 11, pd246); }; SOURCE(12735, 28) { word pd247; pd247 = (* (( (ptr) (* (( (ptr) gf_c39692)+169)/* var_c35532 */ ))+27) ); (void) ( *( (fPt) ((* (ptr) pd247 ))))(c_v12252, (* (( (ptr) formal_c39724)+4) ), pd247); }; SOURCE(12765, 12) { word pd248; pd248 = (* (( (ptr) (* (( (ptr) gf_c39692)+169)/* var_c35532 */ ))+21) ); (void) ( *( (fPt) ((* (ptr) pd248 ))))(c_v12252, 0, pd248); }; SOURCE(12792, 12) { word pd249; pd249 = (* (( (ptr) (* (( (ptr) gf_c39692)+169)/* var_c35532 */ ))+19) ); (void) ( *( (fPt) ((* (ptr) pd249 ))))(c_v12252, 31, pd249); }; SOURCE(12813, 11) { word pd250; pd250 = (* (( (ptr) (* (( (ptr) gf_c39692)+169)/* var_c35532 */ ))+19) ); (void) ( *( (fPt) ((* (ptr) pd250 ))))(c_v12252, 0, pd250); }; SOURCE(12835, 12) { word pd251; pd251 = (* (( (ptr) (* (( (ptr) gf_c39692)+169)/* var_c35532 */ ))+20) ); (void) ( *( (fPt) ((* (ptr) pd251 ))))(c_v12252, 0, pd251); }; SOURCE(12897, 22) { word pd252; pd252 = (* (( (ptr) (* (( (ptr) gf_c39692)+169)/* var_c35532 */ ))+33) ); (void) ( *( (fPt) ((* (ptr) pd252 ))))(c_v12252, (* (( (ptr) formal_c39724)+8) ), pd252); }; SOURCE(12921, 28) { word pd253; pd253 = (* (( (ptr) (* (( (ptr) gf_c39692)+169)/* var_c35532 */ ))+27) ); (void) ( *( (fPt) ((* (ptr) pd253 ))))(c_v12252, (* (( (ptr) formal_c39724)+4) ), pd253); }; SOURCE(12963, 22) (void) BPutProp_P480(c_v12252, (* (( (ptr) formal_c39724)+5) )); SOURCE(12987, 19) (void) BPutProp_P480(c_v12252, (* (( (ptr) formal_c39724)+6) )); SOURCE(13008, 21) (void) BPutProp_P480(c_v12252, (* (( (ptr) formal_c39724)+7) )); SOURCE(13031, 11) (* (( (ptr) c_v12252)+4) ) = ((* (( (ptr) c_v12252)+4) ) + 8); SOURCE(13053, 29) { word pd254; pd254 = (* (( (ptr) (* (( (ptr) gf_c39692)+169)/* var_c35532 */ ))+64) ); (void) ( *( (fPt) ((* (ptr) pd254 ))))(c_v12252, (* (( (ptr) formal_c39724)+9) ), pd254); }; SOURCE(13084, 48) if (((* (( (ptr) formal_c39724)+9) ) == 0)) { SOURCE(13104, 28) { word pd255; if (((* (( (ptr) c_v12252)+5) ) != 0) || (0 != (* (( (ptr) c_v12252)+35) ))) { pd255 = (* (( (ptr) (* (( (ptr) gf_c39692)+169)/* var_c35532 */ ))+13) ); (void) ( *( (fPt) ((* (ptr) pd255 ))))(c_v12252, 0, pd255); }; }; }; } static void SetInputFocus_P1320(c_v7380, formal_c0531, formal_c0532, formal_c0533, formal_c0534) word c_v7380; word formal_c0531; word formal_c0532; word formal_c0533; word formal_c0534; { W10 var_c39756; /* declaration of window_v7408 skipped */ /* declaration of revertTo_v7436 skipped */ /* declaration of timeStamp_v7464 skipped */ /* declaration of details_v7492 skipped */ register ptr gf_c39788 = (ptr) &globalframe; /* declaration of var_c37292 skipped */ (* (( (ptr) &var_c39756)+4)/* window_v7408 */ ) = formal_c0531; (* (( (ptr) &var_c39756)+5)/* revertTo_v7436 */ ) = formal_c0532; (* (( (ptr) &var_c39756)+6)/* timeStamp_v7464 */ ) = formal_c0533; (* (( (ptr) &var_c39756)+7)/* details_v7492 */ ) = formal_c0534; /* SetInputFocus: */ SOURCE(13174, 399) { word tmpAddr256; tmpAddr256 = (word) (( (ptr) &var_c39756)+8)/* var_c37292 */ ; (* (ptr) tmpAddr256 ) = ( ((word) (fPt) action_P4092) ); (* (( (ptr) tmpAddr256) + 1) ) = 1; }; SOURCE(13542, 31) { word pd257; pd257 = (* (( (ptr) (* (( (ptr) gf_c39788)+169)/* var_c35532 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd257 ))))(c_v7380, (word) (( (bPt) &var_c39756)+32)/* var_c37292 */ , (* (( (ptr) &var_c39756)+7) /* details_v7492 */ ), pd257); }; } static void action_P4092(c_v12356, formal_c39852) word c_v12356; word formal_c39852; { register ptr gf_c39820 = (ptr) &globalframe; formal_c39852 = (formal_c39852 - 32); /* action: */ SOURCE(13325, 212) SOURCE(13358, 30) { word pd258; pd258 = (* (( (ptr) (* (( (ptr) gf_c39820)+169)/* var_c35532 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd258 ))))(c_v12356, 42, (* (( (ptr) formal_c39852)+5) ), 3, pd258); }; SOURCE(13390, 23) { word pd259; pd259 = (* (( (ptr) (* (( (ptr) gf_c39820)+169)/* var_c35532 */ ))+27) ); (void) ( *( (fPt) ((* (ptr) pd259 ))))(c_v12356, (* (( (ptr) formal_c39852)+4) ), pd259); }; SOURCE(13415, 22) { word pd260; pd260 = (* (( (ptr) (* (( (ptr) gf_c39820)+169)/* var_c35532 */ ))+33) ); (void) ( *( (fPt) ((* (ptr) pd260 ))))(c_v12356, (* (( (ptr) formal_c39852)+6) ), pd260); }; SOURCE(13439, 29) { word pd261; pd261 = (* (( (ptr) (* (( (ptr) gf_c39820)+169)/* var_c35532 */ ))+64) ); (void) ( *( (fPt) ((* (ptr) pd261 ))))(c_v12356, (* (( (ptr) formal_c39852)+7) ), pd261); }; SOURCE(13470, 67) if (((* (( (ptr) formal_c39852)+7) ) == 0)) { SOURCE(13490, 47) { word delay_v33052; delay_v33052 = (unsigned) ((* (( (ptr) formal_c39852)+4) ) != 0); { word pd262; if (((* (( (ptr) c_v12356)+5) ) != 0) || (0 != (* (( (ptr) c_v12356)+35) ))) { pd262 = (* (( (ptr) (* (( (ptr) gf_c39820)+169)/* var_c35532 */ ))+13) ); (void) ( *( (fPt) ((* (ptr) pd262 ))))(c_v12356, delay_v33052, pd262); }; }; }; }; } static void GetInputFocus_P1380(formal_c0306, c_v7552) word formal_c0306; word c_v7552; { W7 var_c39884; register ptr gf_c39916 = (ptr) &globalframe; word window_v7596; word revertTo_v7624; /* declaration of var_c37324 skipped */ /* declaration of reply_v12412 skipped */ /* GetInputFocus: */ SOURCE(13579, 364) { word tmpAddr263; tmpAddr263 = (word) (( (ptr) &var_c39884)+4)/* var_c37324 */ ; (* (ptr) tmpAddr263 ) = ( ((word) (fPt) action_P4152) ); (* (( (ptr) tmpAddr263) + 1) ) = 1; }; SOURCE(13579, 364) window_v7596 = 0; SOURCE(13774, 12) var_c39884.f6/* reply_v12412 */ = 0; SOURCE(13788, 27) { word pd264; pd264 = (* (( (ptr) (* (( (ptr) gf_c39916)+169)/* var_c35532 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd264 ))))(c_v7552, (word) (( (bPt) &var_c39884)+16)/* var_c37324 */ , 0, pd264); }; SOURCE(13817, 17) { word pd265; pd265 = (* (( (ptr) (* (( (ptr) gf_c39916)+169)/* var_c35532 */ ))+68) ); (void) ( *( (fPt) ((* (ptr) pd265 ))))(var_c39884.f6/* reply_v12412 */ , pd265); }; SOURCE(13836, 29) { word pd266; word idx267; pd266 = (* (( (ptr) (* (( (ptr) gf_c39916)+169)/* var_c35532 */ ))+77) ); revertTo_v7624 = ( idx267 = (word) ( *( (fPt) ((* (ptr) pd266 ))))(var_c39884.f6/* reply_v12412 */ , pd266), BCK(idx267, 3) ); }; SOURCE(13867, 14) (* (( (ptr) var_c39884.f6/* reply_v12412 */ )+10) ) = ((* (( (ptr) var_c39884.f6/* reply_v12412 */ )+10) ) + 6); SOURCE(13883, 36) { word var_c37356; word c_v33100; word id_v33128; c_v33100 = c_v7552; { word pd268; pd268 = (* (( (ptr) (* (( (ptr) gf_c39916)+169)/* var_c35532 */ ))+79) ); id_v33128 = (word) ( *( (fPt) ((* (ptr) pd268 ))))(var_c39884.f6/* reply_v12412 */ , pd268); }; var_c37356 = id_v33128; window_v7596 = var_c37356; }; SOURCE(13921, 22) { word pd269; pd269 = (* (( (ptr) (* (( (ptr) gf_c39916)+169)/* var_c35532 */ ))+67) ); (void) ( *( (fPt) ((* (ptr) pd269 ))))(c_v7552, var_c39884.f6/* reply_v12412 */ , pd269); }; /* removed tail goto */ (* (ptr) formal_c0306 ) = window_v7596; (* (( (ptr) formal_c0306)+1) ) = revertTo_v7624; return; } static void action_P4152(c_v12488, formal_c39980) word c_v12488; word formal_c39980; { register ptr gf_c39948 = (ptr) &globalframe; formal_c39980 = (formal_c39980 - 16); /* action: */ SOURCE(13690, 79) SOURCE(13723, 18) { word pd270; pd270 = (* (( (ptr) (* (( (ptr) gf_c39948)+169)/* var_c35532 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd270 ))))(c_v12488, 43, 0, 1, pd270); }; SOURCE(13743, 26) { word pd271; pd271 = (* (( (ptr) (* (( (ptr) gf_c39948)+169)/* var_c35532 */ ))+62) ); (* (( (ptr) formal_c39980)+6) ) = (word) ( *( (fPt) ((* (ptr) pd271 ))))(c_v12488, pd271); }; } static word ListExtensions_P1440(c_v7684) word c_v7684; { W7 var_c40012; register ptr gf_c40044 = (ptr) &globalframe; word var_c7728; /* declaration of var_c37388 skipped */ /* declaration of reply_v12544 skipped */ word head_v12572; word last_v12600; word nSTR_v12628; /* ListExtensions: */ SOURCE(13949, 469) { word tmpAddr272; tmpAddr272 = (word) (( (ptr) &var_c40012)+4)/* var_c37388 */ ; (* (ptr) tmpAddr272 ) = ( ((word) (fPt) action_P4212) ); (* (( (ptr) tmpAddr272) + 1) ) = 1; }; SOURCE(14104, 12) var_c40012.f6/* reply_v12544 */ = 0; SOURCE(14118, 6) { word var_c37452; head_v12572 = XR_NewObject(8, (* (( (ptr) gf_c40044)+8) )); var_c37452 = head_v12572; }; SOURCE(14150, 6) last_v12600 = head_v12572; SOURCE(14189, 27) { word pd273; pd273 = (* (( (ptr) (* (( (ptr) gf_c40044)+169)/* var_c35532 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd273 ))))(c_v7684, (word) (( (bPt) &var_c40012)+16)/* var_c37388 */ , 0, pd273); }; SOURCE(14218, 17) { word pd274; pd274 = (* (( (ptr) (* (( (ptr) gf_c40044)+169)/* var_c35532 */ ))+68) ); (void) ( *( (fPt) ((* (ptr) pd274 ))))(var_c40012.f6/* reply_v12544 */ , pd274); }; SOURCE(14237, 19) { word var_c37484; word b_v33004; b_v33004 = (unsigned) (word) (* (( (bPt) var_c40012.f6/* reply_v12544 */ )+(* (( (ptr) var_c40012.f6/* reply_v12544 */ )+10) )) ); (* (( (ptr) var_c40012.f6/* reply_v12544 */ )+10) ) = ((* (( (ptr) var_c40012.f6/* reply_v12544 */ )+10) ) + 1); var_c37484 = b_v33004; nSTR_v12628 = var_c37484; }; SOURCE(14258, 15) (* (( (ptr) var_c40012.f6/* reply_v12544 */ )+10) ) = ((* (( (ptr) var_c40012.f6/* reply_v12544 */ )+10) ) + 30); SOURCE(14275, 90) { register word i_v12900 = 0; register word noName_c37516; noName_c37516 = nSTR_v12628; if ((i_v12900 >= noName_c37516)) { goto lab_L100049; }; lab_L100052: ; { word name_v12944; SOURCE(14305, 29) { word pd275; pd275 = (* (( (ptr) (* (( (ptr) gf_c40044)+169)/* var_c35532 */ ))+80) ); name_v12944 = (word) ( *( (fPt) ((* (ptr) pd275 ))))(var_c40012.f6/* reply_v12544 */ , pd275); }; SOURCE(14336, 29) { word var_c37548; { word var_c37580; word var_c37612; var_c37580 = XR_NewObject(8, (* (( (ptr) gf_c40044)+8) )); var_c37612 = var_c37580; (* (ptr) var_c37612 ) = name_v12944; var_c37548 = var_c37580; }; (* (( (ptr) last_v12600)+1) ) = var_c37548; last_v12600 = var_c37548; }; }; i_v12900 = (i_v12900 + 1); if ((i_v12900 < noName_c37516)) { goto lab_L100052; }; lab_L100049: ; }; SOURCE(14376, 22) { word pd276; pd276 = (* (( (ptr) (* (( (ptr) gf_c40044)+169)/* var_c35532 */ ))+67) ); (void) ( *( (fPt) ((* (ptr) pd276 ))))(c_v7684, var_c40012.f6/* reply_v12544 */ , pd276); }; SOURCE(14400, 18) return((* (( (ptr) head_v12572)+1) )); } static void action_P4212(c_v12704, formal_c40108) word c_v12704; word formal_c40108; { register ptr gf_c40076 = (ptr) &globalframe; formal_c40108 = (formal_c40108 - 16); /* action: */ SOURCE(14020, 79) SOURCE(14053, 18) { word pd277; pd277 = (* (( (ptr) (* (( (ptr) gf_c40076)+169)/* var_c35532 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd277 ))))(c_v12704, 99, 0, 1, pd277); }; SOURCE(14073, 26) { word pd278; pd278 = (* (( (ptr) (* (( (ptr) gf_c40076)+169)/* var_c35532 */ ))+62) ); (* (( (ptr) formal_c40108)+6) ) = (word) ( *( (fPt) ((* (ptr) pd278 ))))(c_v12704, pd278); }; } static void QueryExtension_P1500(formal_c0331, c_v7872, formal_c0535) word formal_c0331; word c_v7872; word formal_c0535; { W9 var_c40140; /* declaration of name_v7900 skipped */ register ptr gf_c40172 = (ptr) &globalframe; W4 xr_v7944; /* declaration of var_c37644 skipped */ /* declaration of leng_v13016 skipped */ /* declaration of reply_v13044 skipped */ (* (( (ptr) &var_c40140)+4)/* name_v7900 */ ) = formal_c0535; /* QueryExtension: */ SOURCE(14424, 530) { word tmpAddr279; tmpAddr279 = (word) (( (ptr) &var_c40140)+5)/* var_c37644 */ ; (* (ptr) tmpAddr279 ) = ( ((word) (fPt) action_P4368) ); (* (( (ptr) tmpAddr279) + 1) ) = 1; }; SOURCE(14667, 29) { word pd280; pd280 = (* (( (ptr) (* (( (ptr) gf_c40172)+168)/* var_c35372 */ ))+14) ); (* (( (ptr) &var_c40140)+7)/* leng_v13016 */ ) = (word) ( *( (fPt) ((* (ptr) pd280 ))))((* ((( (ptr) &var_c40140)+4)/* name_v7900 */ ) ), pd280) ; }; SOURCE(14698, 12) (* (( (ptr) &var_c40140)+8)/* reply_v13044 */ ) = 0; SOURCE(14712, 17) if (( (int)(* (( (ptr) &var_c40140)+7)/* leng_v13016 */ ) > (int)100)) { SOURCE(14729, 5) (void) XR_RaiseUnnamedError(); }; SOURCE(14736, 27) { word pd281; pd281 = (* (( (ptr) (* (( (ptr) gf_c40172)+169)/* var_c35532 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd281 ))))(c_v7872, (word) (( (bPt) &var_c40140)+20)/* var_c37644 */ , 0, pd281); }; SOURCE(14765, 17) { word pd282; pd282 = (* (( (ptr) (* (( (ptr) gf_c40172)+169)/* var_c35532 */ ))+68) ); (void) ( *( (fPt) ((* (ptr) pd282 ))))((* ((( (ptr) &var_c40140)+8)/* reply_v13044 */ ) ), pd282); }; SOURCE(14784, 14) (* (( (ptr) (* (( (ptr) &var_c40140)+8)/* reply_v13044 */ ))+10) ) = ((* (( (ptr) (* (( (ptr) &var_c40140)+8)/* reply_v13044 */ ))+10) ) + 7); SOURCE(14800, 36) { word pd283; pd283 = (* (( (ptr) (* (( (ptr) gf_c40172)+169)/* var_c35532 */ ))+77) ); xr_v7944.f0 = (unsigned) ((word) ( *( (fPt) ((* (ptr) pd283 ))))((* ((( (ptr) &var_c40140)+8)/* reply_v13044 */ ) ), pd283) == 1); }; SOURCE(14838, 30) { word pd284; pd284 = (* (( (ptr) (* (( (ptr) gf_c40172)+169)/* var_c35532 */ ))+77) ); xr_v7944.f1 = (word) ( *( (fPt) ((* (ptr) pd284 ))))((* ((( (ptr) &var_c40140)+8)/* reply_v13044 */ ) ), pd284); }; SOURCE(14870, 29) { word pd285; pd285 = (* (( (ptr) (* (( (ptr) gf_c40172)+169)/* var_c35532 */ ))+77) ); xr_v7944.f2 = (word) ( *( (fPt) ((* (ptr) pd285 ))))((* ((( (ptr) &var_c40140)+8)/* reply_v13044 */ ) ), pd285); }; SOURCE(14901, 29) { word pd286; pd286 = (* (( (ptr) (* (( (ptr) gf_c40172)+169)/* var_c35532 */ ))+77) ); xr_v7944.f3 = (word) ( *( (fPt) ((* (ptr) pd286 ))))((* ((( (ptr) &var_c40140)+8)/* reply_v13044 */ ) ), pd286); }; SOURCE(14932, 22) { word pd287; pd287 = (* (( (ptr) (* (( (ptr) gf_c40172)+169)/* var_c35532 */ ))+67) ); (void) ( *( (fPt) ((* (ptr) pd287 ))))(c_v7872, (* (( (ptr) &var_c40140)+8)/* reply_v13044 */ ), pd287); }; /* removed tail goto */ (* (W4Pt) formal_c0331 ) = xr_v7944; return; } static void action_P4368(c_v13120, formal_c40236) word c_v13120; word formal_c40236; { register ptr gf_c40204 = (ptr) &globalframe; formal_c40236 = (formal_c40236 - 20); /* action: */ SOURCE(14516, 146) SOURCE(14549, 29) { word pd288; pd288 = (* (( (ptr) (* (( (ptr) gf_c40204)+169)/* var_c35532 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd288 ))))(c_v13120, 98, 0, (IOP2( / , (int)((* (( (ptr) formal_c40236)+7) ) + 3), (int)4) + 2), pd288); }; SOURCE(14580, 15) { word pd289; word idx290; pd289 = (* (( (ptr) (* (( (ptr) gf_c40204)+169)/* var_c35532 */ ))+20) ); (void) ( *( (fPt) ((* (ptr) pd289 ))))(c_v13120, ( idx290 = (* (( (ptr) formal_c40236)+7) ), BCK(idx290, 65536) ), pd289); }; SOURCE(14597, 12) { word pd291; pd291 = (* (( (ptr) (* (( (ptr) gf_c40204)+169)/* var_c35532 */ ))+20) ); (void) ( *( (fPt) ((* (ptr) pd291 ))))(c_v13120, 0, pd291); }; SOURCE(14611, 23) { word pd292; pd292 = (* (( (ptr) (* (( (ptr) gf_c40204)+169)/* var_c35532 */ ))+37) ); (void) ( *( (fPt) ((* (ptr) pd292 ))))(c_v13120, (* (( (ptr) formal_c40236)+4) ), 0, 2147483647, pd292); }; SOURCE(14636, 26) { word pd293; pd293 = (* (( (ptr) (* (( (ptr) gf_c40204)+169)/* var_c35532 */ ))+62) ); (* (( (ptr) formal_c40236)+8) ) = (word) ( *( (fPt) ((* (ptr) pd293 ))))(c_v13120, pd293); }; } static void MapWindow_P1560(c_v8004, formal_c0536, formal_c0537) word c_v8004; word formal_c0536; word formal_c0537; { W8 var_c40268; /* declaration of window_v8032 skipped */ /* declaration of details_v8060 skipped */ register ptr gf_c40300 = (ptr) &globalframe; /* declaration of var_c37676 skipped */ var_c40268.f4/* window_v8032 */ = formal_c0536; var_c40268.f5/* details_v8060 */ = formal_c0537; /* MapWindow: */ SOURCE(14960, 219) { word tmpAddr294; tmpAddr294 = (word) (( (ptr) &var_c40268)+6)/* var_c37676 */ ; (* (ptr) tmpAddr294 ) = ( ((word) (fPt) action_P4428) ); (* (( (ptr) tmpAddr294) + 1) ) = 1; }; SOURCE(15148, 31) { word pd295; pd295 = (* (( (ptr) (* (( (ptr) gf_c40300)+169)/* var_c35532 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd295 ))))(c_v8004, (word) (( (bPt) &var_c40268)+24)/* var_c37676 */ , var_c40268.f5/* details_v8060 */ , pd295) ; }; } static void action_P4428(c_v13224, formal_c40364) word c_v13224; word formal_c40364; { register ptr gf_c40332 = (ptr) &globalframe; formal_c40364 = (formal_c40364 - 24); /* action: */ SOURCE(15037, 106) SOURCE(15070, 17) { word pd296; pd296 = (* (( (ptr) (* (( (ptr) gf_c40332)+169)/* var_c35532 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd296 ))))(c_v13224, 8, 0, 2, pd296); }; SOURCE(15089, 23) { word pd297; pd297 = (* (( (ptr) (* (( (ptr) gf_c40332)+169)/* var_c35532 */ ))+27) ); (void) ( *( (fPt) ((* (ptr) pd297 ))))(c_v13224, (* (( (ptr) formal_c40364)+4) ), pd297); }; SOURCE(15114, 29) { word pd298; pd298 = (* (( (ptr) (* (( (ptr) gf_c40332)+169)/* var_c35532 */ ))+64) ); (void) ( *( (fPt) ((* (ptr) pd298 ))))(c_v13224, (* (( (ptr) formal_c40364)+5) ), pd298); }; } static void MapSubWindows_P1620(c_v8120, formal_c0538, formal_c0539) word c_v8120; word formal_c0538; word formal_c0539; { W8 var_c40396; /* declaration of window_v8148 skipped */ /* declaration of details_v8176 skipped */ register ptr gf_c40428 = (ptr) &globalframe; /* declaration of var_c37708 skipped */ var_c40396.f4/* window_v8148 */ = formal_c0538; var_c40396.f5/* details_v8176 */ = formal_c0539; /* MapSubWindows: */ SOURCE(15185, 223) { word tmpAddr299; tmpAddr299 = (word) (( (ptr) &var_c40396)+6)/* var_c37708 */ ; (* (ptr) tmpAddr299 ) = ( ((word) (fPt) action_P4488) ); (* (( (ptr) tmpAddr299) + 1) ) = 1; }; SOURCE(15377, 31) { word pd300; pd300 = (* (( (ptr) (* (( (ptr) gf_c40428)+169)/* var_c35532 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd300 ))))(c_v8120, (word) (( (bPt) &var_c40396)+24)/* var_c37708 */ , var_c40396.f5/* details_v8176 */ , pd300) ; }; } static void action_P4488(c_v13328, formal_c40492) word c_v13328; word formal_c40492; { register ptr gf_c40460 = (ptr) &globalframe; formal_c40492 = (formal_c40492 - 24); /* action: */ SOURCE(15266, 106) SOURCE(15299, 17) { word pd301; pd301 = (* (( (ptr) (* (( (ptr) gf_c40460)+169)/* var_c35532 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd301 ))))(c_v13328, 9, 0, 2, pd301); }; SOURCE(15318, 23) { word pd302; pd302 = (* (( (ptr) (* (( (ptr) gf_c40460)+169)/* var_c35532 */ ))+27) ); (void) ( *( (fPt) ((* (ptr) pd302 ))))(c_v13328, (* (( (ptr) formal_c40492)+4) ), pd302); }; SOURCE(15343, 29) { word pd303; pd303 = (* (( (ptr) (* (( (ptr) gf_c40460)+169)/* var_c35532 */ ))+64) ); (void) ( *( (fPt) ((* (ptr) pd303 ))))(c_v13328, (* (( (ptr) formal_c40492)+5) ), pd303); }; } static void UnmapWindow_P1680(c_v8236, formal_c0540, formal_c0541) word c_v8236; word formal_c0540; word formal_c0541; { W8 var_c40524; /* declaration of window_v8264 skipped */ /* declaration of details_v8292 skipped */ register ptr gf_c40556 = (ptr) &globalframe; /* declaration of var_c37740 skipped */ var_c40524.f4/* window_v8264 */ = formal_c0540; var_c40524.f5/* details_v8292 */ = formal_c0541; /* UnmapWindow: */ SOURCE(15414, 222) { word tmpAddr304; tmpAddr304 = (word) (( (ptr) &var_c40524)+6)/* var_c37740 */ ; (* (ptr) tmpAddr304 ) = ( ((word) (fPt) action_P4548) ); (* (( (ptr) tmpAddr304) + 1) ) = 1; }; SOURCE(15605, 31) { word pd305; pd305 = (* (( (ptr) (* (( (ptr) gf_c40556)+169)/* var_c35532 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd305 ))))(c_v8236, (word) (( (bPt) &var_c40524)+24)/* var_c37740 */ , var_c40524.f5/* details_v8292 */ , pd305) ; }; } static void action_P4548(c_v13432, formal_c40620) word c_v13432; word formal_c40620; { register ptr gf_c40588 = (ptr) &globalframe; formal_c40620 = (formal_c40620 - 24); /* action: */ SOURCE(15493, 107) SOURCE(15526, 18) { word pd306; pd306 = (* (( (ptr) (* (( (ptr) gf_c40588)+169)/* var_c35532 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd306 ))))(c_v13432, 10, 0, 2, pd306); }; SOURCE(15546, 23) { word pd307; pd307 = (* (( (ptr) (* (( (ptr) gf_c40588)+169)/* var_c35532 */ ))+27) ); (void) ( *( (fPt) ((* (ptr) pd307 ))))(c_v13432, (* (( (ptr) formal_c40620)+4) ), pd307); }; SOURCE(15571, 29) { word pd308; pd308 = (* (( (ptr) (* (( (ptr) gf_c40588)+169)/* var_c35532 */ ))+64) ); (void) ( *( (fPt) ((* (ptr) pd308 ))))(c_v13432, (* (( (ptr) formal_c40620)+5) ), pd308); }; } static void UnmapSubWindows_P1740(c_v8352, formal_c0542, formal_c0543) word c_v8352; word formal_c0542; word formal_c0543; { W8 var_c40652; /* declaration of window_v8380 skipped */ /* declaration of details_v8408 skipped */ register ptr gf_c40684 = (ptr) &globalframe; /* declaration of var_c37772 skipped */ var_c40652.f4/* window_v8380 */ = formal_c0542; var_c40652.f5/* details_v8408 */ = formal_c0543; /* UnmapSubWindows: */ SOURCE(15642, 226) { word tmpAddr309; tmpAddr309 = (word) (( (ptr) &var_c40652)+6)/* var_c37772 */ ; (* (ptr) tmpAddr309 ) = ( ((word) (fPt) action_P4608) ); (* (( (ptr) tmpAddr309) + 1) ) = 1; }; SOURCE(15837, 31) { word pd310; pd310 = (* (( (ptr) (* (( (ptr) gf_c40684)+169)/* var_c35532 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd310 ))))(c_v8352, (word) (( (bPt) &var_c40652)+24)/* var_c37772 */ , var_c40652.f5/* details_v8408 */ , pd310) ; }; } static void action_P4608(c_v13536, formal_c40748) word c_v13536; word formal_c40748; { register ptr gf_c40716 = (ptr) &globalframe; formal_c40748 = (formal_c40748 - 24); /* action: */ SOURCE(15725, 107) SOURCE(15758, 18) { word pd311; pd311 = (* (( (ptr) (* (( (ptr) gf_c40716)+169)/* var_c35532 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd311 ))))(c_v13536, 11, 0, 2, pd311); }; SOURCE(15778, 23) { word pd312; pd312 = (* (( (ptr) (* (( (ptr) gf_c40716)+169)/* var_c35532 */ ))+27) ); (void) ( *( (fPt) ((* (ptr) pd312 ))))(c_v13536, (* (( (ptr) formal_c40748)+4) ), pd312); }; SOURCE(15803, 29) { word pd313; pd313 = (* (( (ptr) (* (( (ptr) gf_c40716)+169)/* var_c35532 */ ))+64) ); (void) ( *( (fPt) ((* (ptr) pd313 ))))(c_v13536, (* (( (ptr) formal_c40748)+5) ), pd313); }; } static void DestroyWindow_P1800(c_v8468, formal_c0544, formal_c0545) word c_v8468; word formal_c0544; word formal_c0545; { W8 var_c40780; /* declaration of window_v8496 skipped */ /* declaration of details_v8524 skipped */ register ptr gf_c40812 = (ptr) &globalframe; /* declaration of var_c37804 skipped */ var_c40780.f4/* window_v8496 */ = formal_c0544; var_c40780.f5/* details_v8524 */ = formal_c0545; /* DestroyWindow: */ SOURCE(15874, 223) { word tmpAddr314; tmpAddr314 = (word) (( (ptr) &var_c40780)+6)/* var_c37804 */ ; (* (ptr) tmpAddr314 ) = ( ((word) (fPt) action_P4668) ); (* (( (ptr) tmpAddr314) + 1) ) = 1; }; SOURCE(16066, 31) { word pd315; pd315 = (* (( (ptr) (* (( (ptr) gf_c40812)+169)/* var_c35532 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd315 ))))(c_v8468, (word) (( (bPt) &var_c40780)+24)/* var_c37804 */ , var_c40780.f5/* details_v8524 */ , pd315) ; }; } static void action_P4668(c_v13640, formal_c40876) word c_v13640; word formal_c40876; { register ptr gf_c40844 = (ptr) &globalframe; formal_c40876 = (formal_c40876 - 24); /* action: */ SOURCE(15955, 106) SOURCE(15988, 17) { word pd316; pd316 = (* (( (ptr) (* (( (ptr) gf_c40844)+169)/* var_c35532 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd316 ))))(c_v13640, 4, 0, 2, pd316); }; SOURCE(16007, 23) { word pd317; pd317 = (* (( (ptr) (* (( (ptr) gf_c40844)+169)/* var_c35532 */ ))+27) ); (void) ( *( (fPt) ((* (ptr) pd317 ))))(c_v13640, (* (( (ptr) formal_c40876)+4) ), pd317); }; SOURCE(16032, 29) { word pd318; pd318 = (* (( (ptr) (* (( (ptr) gf_c40844)+169)/* var_c35532 */ ))+64) ); (void) ( *( (fPt) ((* (ptr) pd318 ))))(c_v13640, (* (( (ptr) formal_c40876)+5) ), pd318); }; } static void DestroySubWindows_P1860(c_v8584, formal_c0546, formal_c0547) word c_v8584; word formal_c0546; word formal_c0547; { W8 var_c40908; /* declaration of window_v8612 skipped */ /* declaration of details_v8640 skipped */ register ptr gf_c40940 = (ptr) &globalframe; /* declaration of var_c37836 skipped */ var_c40908.f4/* window_v8612 */ = formal_c0546; var_c40908.f5/* details_v8640 */ = formal_c0547; /* DestroySubWindows: */ SOURCE(16103, 227) { word tmpAddr319; tmpAddr319 = (word) (( (ptr) &var_c40908)+6)/* var_c37836 */ ; (* (ptr) tmpAddr319 ) = ( ((word) (fPt) action_P4728) ); (* (( (ptr) tmpAddr319) + 1) ) = 1; }; SOURCE(16299, 31) { word pd320; pd320 = (* (( (ptr) (* (( (ptr) gf_c40940)+169)/* var_c35532 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd320 ))))(c_v8584, (word) (( (bPt) &var_c40908)+24)/* var_c37836 */ , var_c40908.f5/* details_v8640 */ , pd320) ; }; } static void action_P4728(c_v13744, formal_c41004) word c_v13744; word formal_c41004; { register ptr gf_c40972 = (ptr) &globalframe; formal_c41004 = (formal_c41004 - 24); /* action: */ SOURCE(16188, 106) SOURCE(16221, 17) { word pd321; pd321 = (* (( (ptr) (* (( (ptr) gf_c40972)+169)/* var_c35532 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd321 ))))(c_v13744, 5, 0, 2, pd321); }; SOURCE(16240, 23) { word pd322; pd322 = (* (( (ptr) (* (( (ptr) gf_c40972)+169)/* var_c35532 */ ))+27) ); (void) ( *( (fPt) ((* (ptr) pd322 ))))(c_v13744, (* (( (ptr) formal_c41004)+4) ), pd322); }; SOURCE(16265, 29) { word pd323; pd323 = (* (( (ptr) (* (( (ptr) gf_c40972)+169)/* var_c35532 */ ))+64) ); (void) ( *( (fPt) ((* (ptr) pd323 ))))(c_v13744, (* (( (ptr) formal_c41004)+5) ), pd323); }; } static void Bell_P1920(c_v8700, formal_c0548, formal_c0549) word c_v8700; word formal_c0548; word formal_c0549; { W8 var_c41036; /* declaration of percent_v8728 skipped */ /* declaration of details_v8756 skipped */ register ptr gf_c41068 = (ptr) &globalframe; /* declaration of var_c37868 skipped */ var_c41036.f4/* percent_v8728 */ = formal_c0548; var_c41036.f5/* details_v8756 */ = formal_c0549; /* Bell: */ SOURCE(16336, 299) { word tmpAddr324; tmpAddr324 = (word) (( (ptr) &var_c41036)+6)/* var_c37868 */ ; (* (ptr) tmpAddr324 ) = ( ((word) (fPt) action_P4788) ); (* (( (ptr) tmpAddr324) + 1) ) = 1; }; SOURCE(16604, 31) { word pd325; pd325 = (* (( (ptr) (* (( (ptr) gf_c41068)+169)/* var_c35532 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd325 ))))(c_v8700, (word) (( (bPt) &var_c41036)+24)/* var_c37868 */ , var_c41036.f5/* details_v8756 */ , pd325) ; }; } static void action_P4788(c_v13848, formal_c41132) word c_v13848; word formal_c41132; { register ptr gf_c41100 = (ptr) &globalframe; formal_c41132 = (formal_c41132 - 24); /* action: */ SOURCE(16410, 189) SOURCE(16443, 97) if ( ( ( (int)(* (( (ptr) formal_c41132)+4) ) >= (int) (word) -100) ? ( (int)(* (( (ptr) formal_c41132)+4) ) <= (int)100) : 0 ) ) { SOURCE(16484, 25) { word pd326; word idx327; pd326 = (* (( (ptr) (* (( (ptr) gf_c41100)+169)/* var_c35532 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd326 ))))(c_v13848, 104, ( idx327 = (* (( (ptr) formal_c41132)+4) ), BCK(idx327, 256) ), 1, pd326); }; SOURCE(16511, 29) { word pd328; pd328 = (* (( (ptr) (* (( (ptr) gf_c41100)+169)/* var_c35532 */ ))+64) ); (void) ( *( (fPt) ((* (ptr) pd328 ))))(c_v13848, (* (( (ptr) formal_c41132)+5) ), pd328); }; }; SOURCE(16545, 54) if (((* (( (ptr) formal_c41132)+5) ) == 0)) { SOURCE(16565, 34) { word pd329; if (((* (( (ptr) c_v13848)+5) ) != 0) || (0 != (* (( (ptr) c_v13848)+35) ))) { pd329 = (* (( (ptr) (* (( (ptr) gf_c41100)+169)/* var_c35532 */ ))+13) ); (void) ( *( (fPt) ((* (ptr) pd329 ))))(c_v13848, 1, pd329); }; }; }; } /* file: XlImplAtPropSel, module: XlImplAtPropSel, compiled at: September 14, 1993 4:26:08 pm PDT */ extern void XR_install_XlImplAtPropSel() { NoName_Q6372(); } extern void XR_run_XlImplAtPropSel() { XR_Start(&globalframe); }