/* Generated with C2C (Cedar To C)*/ /* Copyright (C) 1993 by Xerox Corporation. All rights reserved. */ /* time: February 23, 1993 11:26:23 pm PST */ /* C2C version: January 29, 1993 (sun4) */ /* ref-counting: off */ /* file: XTkPopUpsImpl, module: XTkPopUpsImpl */ /* switches: bcfhklnouw */ #include #include static char versionStamp[] = "@(#)mob_version [1176937210,2698788916] XTkPopUpsImpl"; 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 W2 *W2Pt; typedef struct {W8 f; W8 r;} W16; typedef struct {word f0, f1, f2, f3;} W4; typedef struct {W16 f; W4 r;} W20; typedef struct {W8 f; word r;} W9; typedef W9 *W9Pt; typedef struct {word f0, f1, f2;} W3; typedef struct {word f0, f1, f2, f3, f4;} W5; typedef W5 *W5Pt; typedef W4 *W4Pt; typedef struct {W16 f; W3 r;} W19; typedef W3 *W3Pt; #define SOURCE(p, l) /* source p, l */ #define BCK(idx, lim) ( ((unsigned) idx) >= ((unsigned) lim) ? (XR_RaiseBoundsFault()) : (idx) ) #define MAX(cast, x, y) ( ( cast x) > ( cast y) ? (x) : (y) ) #define MIN(cast, x, y) ( ( cast x) < ( cast y) ? (x) : (y) ) #define IOP2(op, x, y) ( (word) ((x) op (y)) ) static void NoName_Q5040(); static void XTkPopUpsImpl_P0(); static word IsDynamicPopShell_P60(); static void PositionAndScreen_P120(); static void RemovePriviledgedMatch_P180(); static void RemovePops_P240(); static void TearDown_P300(); static word BuildDynamic_P360(); static void DestroyIncludingCascaded_P420(); static void InternalDestroyIncludingCascaded_P480(); static void DestroyIncludingAncestorsAndCascaded_P540(); static void ForkDestroy_P600(); static void Destroy_P660(); static void DoNotify_P720(); static void QueuedDoNotify_P780(); static void ActualPopUp_P840(); static void PopUp_P900(); static word DynamicFromShell_P960(); static void SimplePopUpWithRegularShell_P1020(); static void PopUpWithRegularShell_P1080(); static void TestUpnessNow_P1140(); static void TestUpnessVerySoon_P1200(); static void TestUpnessSoon_P1260(); static void SetStyle_P1320(); static void BaseButtonEvent_P1380(); static void PopShellEvent_P1440(); static void PriviledgedUpEvent_P1500(); static word NewPopStatic_P1560(); static word CreatePseudoBase_P1620(); static word AssertBase_P1680(); static void PostRealized_P1740(); static void MakeItBase_P1800(); static word CreateSimplePopUpButton_P1860(); static word CreatePopUpButton_P1920(); static word GetPopStatic_P1980(); static void SetMenuCreator_P2040(); static void SetHelp_P2100(); static void RegisterBaseSelection_P2160(); static word ToRope_P2220(); static word ChoiceListCreateContents_P2280(); static word WidgetCreateClosureFromChoiceList_P2340(); static void Select_P2400(); static void SelectOnly_P2460(); static void NullNotify_P2520(); static word NoName_Q5100(); static struct {unsigned f; char r[4];} string1 = {65540, "\242\000\000"}; static struct {unsigned f; char r[16];} string2 = {851984, "\257\300\106\046\242\372\300\240\334\100\064\100\324\000\000"}; static struct {unsigned f; char r[4];} string3 = {196611, "\004A\374"}; static struct {unsigned f; char r[16];} string4 = {851984, "\257\300\106\046\242\372\300\240\334\100\064\100\310\000\000"}; static struct {unsigned f; char r[4];} string5 = {196611, "\004C\375"}; static struct {unsigned f; char r[16];} string6 = {851984, "\257\300\033\115\307\000\300\214\060\055\310\100\244\000\000"}; static struct {unsigned f; char r[40];} string7 = {2555943, "\011\000\004\106\000\040\006\011\020\004\101\201\100\174\001\100\200\001\100\204\001\100\210\001\100\220\001\100\264\001\100\270\001\100\274\001\100\304\001"}; static struct {unsigned f; char r[16];} string8 = {851984, "\257\300\106\046\242\372\300\240\334\100\064\100\340\000\000"}; static struct {unsigned f; char r[4];} string9 = {131074, "\004\033\000"}; static struct {unsigned f; char r[16];} string10 = {851984, "\257\300\267\210\110\244\300\302\136\033\142\100\164\000\000"}; static struct {unsigned f; char r[4];} string11 = {131074, "\004\003\000"}; static struct {unsigned f; char r[16];} string12 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\107\320\000\000"}; static struct {unsigned f; char r[4];} string13 = {131074, "\004\016\000"}; static struct {unsigned f; char r[4];} string14 = {131076, "\216\251\000"}; static struct {unsigned f; char r[4];} string15 = {65537, "\001\000\000"}; static struct {unsigned f; char r[16];} string16 = {851984, "\257\300\106\046\242\372\300\240\334\100\064\102\170\000\000"}; static struct {unsigned f; char r[4];} string17 = {65540, "\251\000\000"}; static struct {unsigned f; char r[16];} string18 = {851984, "\257\300\306\142\131\144\300\027\030\213\334\100\214\000\000"}; static struct {unsigned f; char r[4];} string19 = {131074, "\003\001\000"}; static struct {unsigned f; char r[16];} string20 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\104\304\000\000"}; static struct {unsigned f; char r[24];} string21 = {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];} string22 = {2752556, "\260\007\006\154\145\156\147\164\150\210\241\000\200\177\377\005\004\164\145\170\164\254\206\012\011\155\141\170\114\145\156\147\164\150\210\241\000\200\177\377\243\261\000"}; static struct {unsigned f; char r[16];} string23 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"}; static struct {unsigned f; char r[44];} string24 = {2752556, "\260\006\005\146\151\162\163\164\257\300\306\142\131\144\300\027\030\213\334\100\244\005\004\162\145\163\164\214\257\300\306\142\131\144\300\027\030\213\334\100\244\261\000"}; static struct {unsigned f; char r[4];} string25 = {131074, "\004/\000"}; static struct {unsigned f; char r[8];} string26 = {458760, "more..."}; static struct {unsigned f; char r[12];} string27 = {720908, "BlackOnGray"}; static struct {unsigned f; char r[8];} string28 = {327688, "Label\000\000"}; static struct {unsigned f; char r[16];} string29 = {851984, "\257\300\106\046\242\372\300\240\334\100\064\100\164\000\000"}; static struct {unsigned f; char r[20];} string30 = {1048592, "\006\006\040\001\044\001\050\001\054\001\060\001\100\170\004\007\000\000\000"}; static struct {unsigned f; char r[16];} string31 = {851984, "\257\300\055\153\222\376\300\327\164\352\142\100\150\000\000"}; static struct {unsigned f; char r[16];} string32 = {851984, "\257\300\267\210\110\244\300\302\136\033\142\100\150\000\000"}; static struct {unsigned f; char r[16];} string33 = {851984, "\257\300\240\236\274\315\300\111\163\325\023\100\150\000\000"}; static struct {unsigned f; char r[16];} string34 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\100\150\000\000"}; static struct {unsigned f; char r[16];} string35 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\100\164\000\000"}; static struct {unsigned f; char r[16];} string36 = {851984, "\257\300\122\362\040\033\300\221\350\241\274\100\150\000\000"}; static struct {unsigned f; char r[16];} string37 = {851984, "\257\300\103\352\366\361\300\264\046\172\334\100\150\000\000"}; static struct {unsigned f; char r[16];} string38 = {851984, "\257\300\033\115\307\000\300\214\060\055\310\100\150\000\000"}; static struct {unsigned f; char r[16];} string39 = {851984, "\257\300\372\252\147\374\300\170\207\127\200\100\150\000\000"}; static struct {unsigned f; char r[16];} string40 = {851984, "\257\300\227\370\144\253\300\176\165\034\110\100\150\000\000"}; static struct {unsigned f; char r[16];} string41 = {851984, "\257\300\320\075\064\316\300\052\004\271\020\100\150\000\000"}; static struct {unsigned f; char r[16];} string42 = {851984, "\257\300\000\150\313\125\300\372\040\271\021\100\150\000\000"}; static struct {unsigned f; char r[16];} string43 = {851984, "\257\300\145\202\371\143\300\336\312\353\353\100\150\000\000"}; static struct {unsigned f; char r[16];} string44 = {851984, "\257\300\306\142\131\144\300\027\030\213\334\100\150\000\000"}; static struct { word f0[33]; word f33; word f34; word f35; word f36; word f37; word f38; word f39; word f40; word f41; word f42; word f43; word f44; word f45; word f46; word f47; word f48; word f49; word f50; word f51; word f52; word f53; word f54; word f55; word f56; word f57; word f58; word f59; word f60; word f61; word f62; word f63; word f64; word f65; word f66; word f67; word f68; word f69; word f70; word f71; word f72; word f73; word f74; word f75; word f76; word f77; word f78; word f79; word f80; word f81; word f82; word f83; word f84; word f85; word f86; word f87; word f88; word f89; word f90; word f91; word f92; word f93; word f94; word f95; word f96; word f97; word f98; word f99; word f100; word f101; word f102; word f103; word f104; word f105; word f106; word f107; word f108; word f109; word f110; word f111; word f112; word f113; word f114; word f115; word f116; word f117; word f118[2]; word f120; word f121; word f122; word f123; word f124; word f125; word f126[2]; 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[2]; word f147; word f148; word f149[3]; word f152; word f153; word f154; word f155; word f156; word f157; word f158[16]; } globalframe = { {0}, (word) NullNotify_P2520, 0, (word) SelectOnly_P2460, 0, (word) Select_P2400, 0, (word) WidgetCreateClosureFromChoiceList_P2340, 0, (word) ChoiceListCreateContents_P2280, 0, (word) ToRope_P2220, 0, (word) RegisterBaseSelection_P2160, 0, (word) SetHelp_P2100, 0, (word) SetMenuCreator_P2040, 0, (word) GetPopStatic_P1980, 0, (word) CreatePopUpButton_P1920, 0, (word) CreateSimplePopUpButton_P1860, 0, (word) MakeItBase_P1800, 0, (word) PostRealized_P1740, 0, (word) AssertBase_P1680, 0, (word) CreatePseudoBase_P1620, 0, (word) NewPopStatic_P1560, 0, (word) PriviledgedUpEvent_P1500, 0, (word) PopShellEvent_P1440, 0, (word) BaseButtonEvent_P1380, 0, (word) SetStyle_P1320, 0, (word) TestUpnessSoon_P1260, 0, (word) TestUpnessVerySoon_P1200, 0, (word) TestUpnessNow_P1140, 0, (word) PopUpWithRegularShell_P1080, 0, (word) SimplePopUpWithRegularShell_P1020, 0, (word) DynamicFromShell_P960, 0, (word) PopUp_P900, 0, (word) ActualPopUp_P840, 0, (word) QueuedDoNotify_P780, 0, (word) DoNotify_P720, 0, (word) Destroy_P660, 0, (word) ForkDestroy_P600, 0, (word) DestroyIncludingAncestorsAndCascaded_P540, 0, (word) InternalDestroyIncludingCascaded_P480, 0, (word) DestroyIncludingCascaded_P420, 0, (word) BuildDynamic_P360, 0, (word) TearDown_P300, 0, (word) RemovePops_P240, 0, (word) RemovePriviledgedMatch_P180, 0, (word) PositionAndScreen_P120, 0, (word) IsDynamicPopShell_P60, 0, (word) XTkPopUpsImpl_P0, {0}, (word) 2147483648, (word) 2147483648, (word) 2147483648, (word) 2147483648, (word) 2147483648, (word) 3, {0}, (word) 2147483648, (word) 2147483648, (word) 2147483648, (word) 2147483648, (word) 2147483648, (word) 2147483648, (word) 2147483648, (word) 2147483648, (word) 2147483648, (word) 2147483648, 0, (word) 2147483648, (word) 2147483648, (word) 2147483648, (word) 2147483648, (word) 2147483648, (word) 3, {0}, (word) 4294967295, (word) 4294967295, {0}, (word) 2147483648, (word) 2147483648, (word) 2147483648, (word) 2147483648, (word) 2147483648, (word) 3, {0} }; static void NoName_Q5040() { register ptr gf_c0351 = (ptr) &globalframe; word var_c51288; (* (( (ptr) gf_c0351)+13) ) = (word) XR_GetTypeIndexS((word) (&string1)); (* (( (ptr) gf_c0351)+15) ) = (word) XR_GetTypeIndex((word) &string2, 0, (word) &string3); (* (( (ptr) gf_c0351)+16) ) = (word) XR_GetTypeIndex((word) &string4, 0, (word) &string5); (* (( (ptr) gf_c0351)+17) ) = (word) XR_GetTypeIndex((word) &string6, 0, (word) &string7); (* (( (ptr) gf_c0351)+18) ) = (word) XR_GetTypeIndex((word) &string8, 0, (word) &string9); (* (( (ptr) gf_c0351)+19) ) = (word) XR_GetTypeIndex((word) &string10, 0, (word) &string11); (* (( (ptr) gf_c0351)+20) ) = (word) XR_GetTypeIndex((word) &string12, 0, (word) &string13); (* (( (ptr) gf_c0351)+21) ) = (word) XR_GetTypeIndex((word) &string14, 0, (word) &string15); (* (( (ptr) gf_c0351)+22) ) = (word) XR_GetTypeIndex((word) &string16, 0, (word) &string13); (* (( (ptr) gf_c0351)+23) ) = (word) XR_GetTypeIndexS((word) (&string17)); (* (( (ptr) gf_c0351)+24) ) = (word) XR_GetTypeIndex((word) &string18, 0, (word) &string19); (* (( (ptr) gf_c0351)+26) ) = (word) XR_GetTypeIndex((word) &string20, 0, (word) &string21); (* (( (ptr) gf_c0351)+27) ) = (word) XR_GetTypeIndexS((word) (&string22)); (* (( (ptr) gf_c0351)+28) ) = (word) XR_GetTypeIndex((word) &string23, 0, (word) &string15); (* (( (ptr) gf_c0351)+29) ) = (word) XR_GetTypeIndex((word) &string24, 0, (word) &string25); (* (ptr) (( (bPt) gf_c0351)+120) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0351)+28) ), (word) &string26); (* (ptr) (( (bPt) gf_c0351)+124) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0351)+21) ), (word) &string27); (* (ptr) (( (bPt) gf_c0351)+128) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0351)+21) ), (word) &string28); (void) XR_DeclareGlobalFrame((word) "XTkPopUpsImpl", &globalframe, (word) XR_GetTypeIndex((word) &string29, 0, (word) &string30) , (word) (( (bPt) gf_c0351)+468)/* var_c49048 */ ); var_c51288 = (word) XR_ImportInterface((word) "Atom", (word) XR_GetTypeIndexS((word) (&string31)), 16); (* (( (ptr) gf_c0351)+172)/* var_c51000 */ ) = var_c51288; (void) XR_ImportProcS(var_c51288, 67372289); var_c51288 = (word) XR_ImportInterface((word) "HelpStrings", (word) XR_GetTypeIndexS((word) (&string32)), 5); (* (( (ptr) gf_c0351)+168)/* var_c50104 */ ) = var_c51288; (void) XR_ImportProcS(var_c51288, 786435); (void) XR_ImportProcS(var_c51288, 786691); (void) XR_ImportProcS(var_c51288, 524802); var_c51288 = (word) XR_ImportInterface((word) "Process", (word) XR_GetTypeIndexS((word) (&string33)), 22); (* (( (ptr) gf_c0351)+164)/* var_c49816 */ ) = var_c51288; (void) XR_ImportProcS(var_c51288, 526081); var_c51288 = (word) XR_ImportInterface((word) "Rope", (word) XR_GetTypeIndexS((word) (&string34)), 43); (* (( (ptr) gf_c0351)+171)/* var_c50936 */ ) = var_c51288; (void) XR_ImportProcS(var_c51288, 67903235); var_c51288 = (word) XR_ImportInterface((word) "Xl", (word) XR_GetTypeIndexS((word) (&string35)), 218); (* (( (ptr) gf_c0351)+160)/* var_c49464 */ ) = var_c51288; (void) XR_ImportProcS(var_c51288, 67924739); (void) XR_ImportProcS(var_c51288, 1063940); (void) XR_ImportProcS(var_c51288, 67910403); (void) XR_ImportProcS(var_c51288, 67654914); (void) XR_ImportProcS(var_c51288, 537423362); (void) XR_ImportProcS(var_c51288, 68207876); var_c51288 = (word) XR_ImportInterface((word) "XlDispatch", (word) XR_GetTypeIndexS((word) (&string36)), 18); (* (( (ptr) gf_c0351)+161)/* var_c49528 */ ) = var_c51288; (void) XR_ImportProcS(var_c51288, 527106); (void) XR_ImportProcS(var_c51288, 527362); var_c51288 = (word) XR_ImportInterface((word) "XlTQOps", (word) XR_GetTypeIndexS((word) (&string37)), 2); (* (( (ptr) gf_c0351)+169)/* var_c50296 */ ) = var_c51288; (void) XR_ImportProcS(var_c51288, 1310725); var_c51288 = (word) XR_ImportInterface((word) "XTk", (word) XR_GetTypeIndexS((word) (&string38)), 50); (* (( (ptr) gf_c0351)+162)/* var_c49624 */ ) = var_c51288; (void) XR_ImportProcS(var_c51288, 67643138); (void) XR_ImportProcS(var_c51288, 1050628); (void) XR_ImportProcS(var_c51288, 1579523); (void) XR_ImportProcS(var_c51288, 786947); (void) XR_ImportProcS(var_c51288, 788227); (void) XR_ImportProcS(var_c51288, 67634690); (void) XR_ImportProcS(var_c51288, 67378433); var_c51288 = (word) XR_ImportInterface((word) "XTkOps", (word) XR_GetTypeIndexS((word) (&string39)), 5); (* (( (ptr) gf_c0351)+170)/* var_c50680 */ ) = var_c51288; (void) XR_ImportProcS(var_c51288, 786947); var_c51288 = (word) XR_ImportInterface((word) "XTkFriends", (word) XR_GetTypeIndexS((word) (&string40)), 33); (* (( (ptr) gf_c0351)+167)/* var_c50072 */ ) = var_c51288; (void) XR_ImportProcS(var_c51288, 337643012); var_c51288 = (word) XR_ImportInterface((word) "XTkHelpShells", (word) XR_GetTypeIndexS((word) (&string41)), 1); (* (( (ptr) gf_c0351)+166)/* var_c50008 */ ) = var_c51288; (void) XR_ImportProcS(var_c51288, 67371009); var_c51288 = (word) XR_ImportInterface((word) "XTkHelpStrings", (word) XR_GetTypeIndexS((word) (&string42)), 2); (* (( (ptr) gf_c0351)+165)/* var_c49912 */ ) = var_c51288; (void) XR_ImportProcS(var_c51288, 524546); (void) XR_ImportProcS(var_c51288, 67371009); var_c51288 = (word) XR_ImportInterface((word) "XTkWidgets", (word) XR_GetTypeIndexS((word) (&string43)), 52); (* (( (ptr) gf_c0351)+163)/* var_c49752 */ ) = var_c51288; (void) XR_ImportProcS(var_c51288, 793347); (void) XR_ImportProcS(var_c51288, 72097800); (void) XR_ImportProcS(var_c51288, 69998595); (void) XR_ImportProcS(var_c51288, 70786819); (void) XR_ImportProcS(var_c51288, 796163); (void) XR_ImportProcS(var_c51288, 2099460); (void) XR_ImportProcS(var_c51288, 526338); (void) XR_ImportProcS(var_c51288, 787203); (void) XR_ImportProcS(var_c51288, 67376129); (void) XR_ImportProcS(var_c51288, 72352268); (void) XR_ImportProcS(var_c51288, 264961); var_c51288 = (word) XR_ExportInterface((word) "XTkPopUps", (word) XR_GetTypeIndexS((word) (&string44)), 14); (* (( (ptr) gf_c0351)+173)/* var_c51320 */ ) = var_c51288; (void) XR_ExportProcS(var_c51288, (word) (( (bPt) gf_c0351)+220)/* var_c48056 */ , 68681734); (void) XR_ExportProcS(var_c51288, (word) (( (bPt) gf_c0351)+212)/* var_c48024 */ , 68419845); (void) XR_ExportProcS(var_c51288, (word) (( (bPt) gf_c0351)+156)/* var_c47800 */ , 67895811); (void) XR_ExportProcS(var_c51288, (word) (( (bPt) gf_c0351)+180)/* var_c47896 */ , 1311493); (void) XR_ExportProcS(var_c51288, (word) (( (bPt) gf_c0351)+332)/* var_c48504 */ , 2622473); (void) XR_ExportProcS(var_c51288, (word) (( (bPt) gf_c0351)+324)/* var_c48472 */ , 2360584); (void) XR_ExportProcS(var_c51288, (word) (( (bPt) gf_c0351)+132)/* var_c47704 */ , 1050116); (void) XR_ExportProcS(var_c51288, (word) (( (bPt) gf_c0351)+252)/* var_c48184 */ , 67372801); (void) XR_ExportProcS(var_c51288, (word) (( (bPt) gf_c0351)+228)/* var_c48088 */ , 1312773); (void) XR_ExportProcS(var_c51288, (word) (( (bPt) gf_c0351)+196)/* var_c47960 */ , 526594); (void) XR_ExportProcS(var_c51288, (word) (( (bPt) gf_c0351)+188)/* var_c47928 */ , 526850); (void) XR_ExportProcS(var_c51288, (word) (( (bPt) gf_c0351)+148)/* var_c47768 */ , 527106); (void) XR_ExportProcS(var_c51288, (word) (( (bPt) gf_c0351)+428)/* var_c48888 */ , 265217); (void) XR_ExportProcS(var_c51288, (word) (( (bPt) gf_c0351)+348)/* var_c48568 */ , 1576197); } static void XTkPopUpsImpl_P0(formal_c074, formal_c073) word formal_c074; word formal_c073; { register ptr gf_c51352 = (ptr) &globalframe; /* XTkPopUpsImpl: */ SOURCE(150, 20282) /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ SOURCE(420, 26) (* (( (ptr) gf_c51352)+8)/* myShellKey_v3196 */ ) = XR_NewObject(4, (* (( (ptr) gf_c51352)+13) )); SOURCE(501, 25) (* (( (ptr) gf_c51352)+9)/* myBaseKey_v3224 */ ) = XR_NewObject(4, (* (( (ptr) gf_c51352)+13) )); SOURCE(583, 27) (* (( (ptr) gf_c51352)+10)/* myChoiceKey_v3252 */ ) = XR_NewObject(4, (* (( (ptr) gf_c51352)+13) )); SOURCE(638, 73) { word pd45; pd45 = (* (( (ptr) (* (( (ptr) gf_c51352)+160)/* var_c49464 */ ))+201) ); (* (( (ptr) gf_c51352)+11)/* buttonReleaseFilter_v3280 */ ) = (word) ( *( (fPt) ((* (ptr) pd45 ))))(5, 35, 35, 35, pd45) ; }; SOURCE(713, 99) { word pd46; pd46 = (* (( (ptr) (* (( (ptr) gf_c51352)+160)/* var_c49464 */ ))+201) ); (* (( (ptr) gf_c51352)+12)/* filter_v3308 */ ) = (word) ( *( (fPt) ((* (ptr) pd46 ))))(4, 5, 7, 8, pd46); }; } static word IsDynamicPopShell_P60(w_v4716) word w_v4716; { word var_c4760; /* IsDynamicPopShell: */ SOURCE(815, 117) SOURCE(874, 58) { word tc47; if ((w_v4716 != 0)) { tc47 = (word) (unsigned) (((unsigned)(* (( (bPt) w_v4716)+120) ) << 27) >> 31); } else { tc47 = (word) (unsigned) 0; }; return(tc47); }; } static void PositionAndScreen_P120(formal_c083, connection_v4820) word formal_c083; word connection_v4820; { register ptr gf_c51384 = (ptr) &globalframe; W2 pos_v4864; word s_v4892; W8 pointerQuery_v9912; /* PositionAndScreen: */ SOURCE(936, 292) SOURCE(936, 292) s_v4892 = 0; SOURCE(1031, 74) { word pd48; pd48 = (* (( (ptr) (* (( (ptr) gf_c51384)+160)/* var_c49464 */ ))+114) ); (void) ( *( (fPt) ((* (ptr) pd48 ))))((word) &pointerQuery_v9912, connection_v4820, 0, pd48); }; SOURCE(1107, 22) pos_v4864 = (* (W2Pt) (( (ptr) &pointerQuery_v9912)+4) ); SOURCE(1132, 49) { word pd49; pd49 = (* (( (ptr) (* (( (ptr) gf_c51384)+160)/* var_c49464 */ ))+89) ); s_v4892 = (word) ( *( (fPt) ((* (ptr) pd49 ))))(connection_v4820, pointerQuery_v9912.f0, pd49); }; SOURCE(1183, 45) if ((s_v4892 == 0)) { SOURCE(1197, 31) { word var_c49496; var_c49496 = (* (( (ptr) (* (( (ptr) connection_v4820)+16) ))+17) ); { word limit50; s_v4892 = (* ((( (ptr) var_c49496)+1)+( limit50 = (* (ptr) var_c49496 ), BCK(0, limit50) )) ); }; }; }; /* removed tail goto */ (* (W2Pt) formal_c083 ) = pos_v4864; (* (( (ptr) formal_c083)+2) ) = s_v4892; return; } static void RemovePriviledgedMatch_P180(c_v4952, dyn_v4980) word c_v4952; word dyn_v4980; { register ptr gf_c51416 = (ptr) &globalframe; word m_v9956; /* RemovePriviledgedMatch: */ SOURCE(1232, 212) SOURCE(1305, 34) m_v9956 = (* (( (ptr) dyn_v4980)+8) ); SOURCE(1341, 103) if ((m_v9956 != 0)) { SOURCE(1357, 26) (* (( (ptr) dyn_v4980)+8) ) = 0; SOURCE(1385, 59) if ( ( (c_v4952 != 0) ? (0 != (* (( (ptr) c_v4952)+15) )) : 0 ) ) { SOURCE(1405, 39) { word pd51; pd51 = (* (( (ptr) (* (( (ptr) gf_c51416)+161)/* var_c49528 */ ))+16) ); (void) ( *( (fPt) ((* (ptr) pd51 ))))(c_v4952, m_v9956, pd51); }; }; }; } static void RemovePops_P240(widget_v17068, registerData_v17096, callData_v17124, event_v17152) word widget_v17068; word registerData_v17096; word callData_v17124; word event_v17152; { register ptr gf_c51448 = (ptr) &globalframe; word dyn_v10000; /* RemovePops: */ SOURCE(1453, 130) SOURCE(1490, 42) dyn_v10000 = XR_Narrow(registerData_v17096, (* (( (ptr) gf_c51448)+15) )); SOURCE(1534, 18) (* (( (ptr) dyn_v10000)+4) ) = 0; SOURCE(1554, 29) (void) DestroyIncludingCascaded_P420(dyn_v10000); } static void TearDown_P300(carrier_v5052) word carrier_v5052; { register ptr gf_c51480 = (ptr) &globalframe; /* TearDown: */ SOURCE(1589, 527) SOURCE(1637, 479) { word var_c49560; word var_c49592; var_c49560 = carrier_v5052; if ((var_c49560 == 0)) { goto lab_L100001; }; var_c49592 = XR_GetReferentType(var_c49560); if (((* (( (ptr) gf_c51480)+16) ) == var_c49592)) { { word static_v10056; static_v10056 = var_c49560; SOURCE(1687, 59) (void) DestroyIncludingAncestorsAndCascaded_P540((* (ptr) (static_v10056) )); }; goto endif052; }; if (((* (( (ptr) gf_c51480)+17) ) == var_c49592)) { { word w_v10112; w_v10112 = var_c49560; SOURCE(1765, 284) { word root_v10156; SOURCE(1767, 36) { word pd53; pd53 = (* (( (ptr) (* (( (ptr) gf_c51480)+162)/* var_c49624 */ ))+33) ); root_v10156 = (word) ( *( (fPt) ((* (ptr) pd53 ))))(w_v10112, pd53); }; SOURCE(1805, 133) { word var_c49656; { word pd54; pd54 = (* (( (ptr) (* (( (ptr) gf_c51480)+162)/* var_c49624 */ ))+10) ); var_c49656 = (word) ( *( (fPt) ((* (ptr) pd54 ))))(w_v10112, (* (( (ptr) gf_c51480)+9)/* myBaseKey_v3224 */ ), pd54); }; if ((var_c49656 == 0)) { goto lab_L100002; }; if (((* (( (ptr) gf_c51480)+16) ) == XR_GetReferentType(var_c49656))) { { word static_v10200; static_v10200 = var_c49656; SOURCE(1879, 59) (void) DestroyIncludingAncestorsAndCascaded_P540((* (ptr) (static_v10200) )); }; } else { lab_L100002: ; }; }; SOURCE(1955, 92) if ((0 != (word) IsDynamicPopShell_P60(root_v10156))) { SOURCE(1987, 60) { word var_c49688; var_c49688 = (word) DynamicFromShell_P960(root_v10156); (void) DestroyIncludingAncestorsAndCascaded_P540(var_c49688); }; }; }; }; goto endif052; }; if (((* (( (ptr) gf_c51480)+15) ) == var_c49592)) { { word dyn_v10256; dyn_v10256 = var_c49560; SOURCE(2075, 41) (void) DestroyIncludingAncestorsAndCascaded_P540(dyn_v10256); }; goto endif052; }; lab_L100001: ; goto endif052; endif052: ; }; } static word BuildDynamic_P360(static_v5928, parent_v5956, image_v5984) word static_v5928; word parent_v5956; word image_v5984; { register ptr gf_c51512 = (ptr) &globalframe; word dyn_v6064; /* BuildDynamic: */ SOURCE(2991, 763) (void) (XR_MonitorEntry((word) (( (bPt) gf_c51512)+16)/* LOCK_v3140 */ )); SOURCE(2991, 763) dyn_v6064 = 0; SOURCE(3116, 55) if ( ( (parent_v5956 != 0) ? (0 != (* (( (ptr) parent_v5956)+1) )) : 0 ) ) { SOURCE(3165, 6) (void) (XR_MonitorExit((word) (( (bPt) gf_c51512)+16)/* LOCK_v3140 */ )); return(dyn_v6064); }; SOURCE(3173, 581) if ((static_v5928 != 0)) { SOURCE(3192, 564) { word oldD_v10312; SOURCE(3194, 44) oldD_v10312 = (* (ptr) static_v5928 ); SOURCE(3240, 127) if ((oldD_v10312 != 0)) { SOURCE(3259, 68) if ( ( ((* (( (ptr) oldD_v10312)+2) ) == static_v5928) ? (0 == (* (( (ptr) oldD_v10312)+1) )) : 0 ) ) { SOURCE(3315, 12) (void) (XR_MonitorExit((word) (( (bPt) gf_c51512)+16)/* LOCK_v3140 */ )); return(0); }; SOURCE(3329, 38) (void) InternalDestroyIncludingCascaded_P480(oldD_v10312); }; SOURCE(3372, 21) dyn_v6064 = XR_NewObject(36, (* (( (ptr) gf_c51512)+15) )); SOURCE(3395, 19) (* (( (ptr) dyn_v6064)+2) ) = static_v5928; SOURCE(3416, 17) (* (( (ptr) dyn_v6064)+7) ) = image_v5984; SOURCE(3435, 30) (* (( (ptr) dyn_v6064)+3) ) = (* (( (ptr) static_v5928)+5) ); SOURCE(3468, 176) if ((parent_v5956 != 0)) { SOURCE(3489, 19) (* (( (ptr) dyn_v6064)+6) ) = parent_v5956; SOURCE(3511, 54) (void) InternalDestroyIncludingCascaded_P480((* ((( (ptr) parent_v5956)+5)) )); SOURCE(3567, 26) (* (( (ptr) parent_v5956)+5) ) = dyn_v6064; SOURCE(3595, 49) if (((* (( (ptr) dyn_v6064)+3) ) == 0)) { SOURCE(3618, 26) (* (( (ptr) dyn_v6064)+3) ) = (* (( (ptr) parent_v5956)+3) ); }; }; SOURCE(3649, 76) if (((* (( (ptr) dyn_v6064)+3) ) == 0)) { SOURCE(3672, 53) { word pd55; pd55 = (* (( (ptr) (* (( (ptr) gf_c51512)+160)/* var_c49464 */ ))+63) ); (* (( (ptr) dyn_v6064)+3) ) = (word) ( *( (fPt) ((* (ptr) pd55 ))))(0, 5, 0, pd55); }; }; SOURCE(3727, 27) (* (ptr) static_v5928 ) = dyn_v6064; }; }; SOURCE(2991, 763) (void) (XR_MonitorExit((word) (( (bPt) gf_c51512)+16)/* LOCK_v3140 */ )); return(dyn_v6064); } static void DestroyIncludingCascaded_P420(dyn_v6136) word dyn_v6136; { register ptr gf_c51544 = (ptr) &globalframe; /* DestroyIncludingCascaded: */ SOURCE(3763, 116) (void) (XR_MonitorEntry((word) (( (bPt) gf_c51544)+16)/* LOCK_v3140 */ )); SOURCE(3826, 53) if ((dyn_v6136 != 0)) { SOURCE(3842, 37) (void) InternalDestroyIncludingCascaded_P480(dyn_v6136); }; SOURCE(3763, 116) (void) (XR_MonitorExit((word) (( (bPt) gf_c51544)+16)/* LOCK_v3140 */ )); return; } static void InternalDestroyIncludingCascaded_P480(dyn_v6208) word dyn_v6208; { /* InternalDestroyIncludingCascaded: */ SOURCE(3885, 455) SOURCE(3959, 381) lab_L100005: ; if ((dyn_v6208 != 0)) { } else { goto lab_L100003; }; { word next_v10368; word parent_v10396; word static_v10424; SOURCE(3977, 40) next_v10368 = (* (( (ptr) dyn_v6208)+5) ); SOURCE(4019, 35) parent_v10396 = (* (( (ptr) dyn_v6208)+6) ); SOURCE(4056, 34) static_v10424 = (* (( (ptr) dyn_v6208)+2) ); SOURCE(4092, 29) (* (( (ptr) dyn_v6208)+1) ) = 1; SOURCE(4123, 23) (* (( (ptr) dyn_v6208)+5) ) = 0; SOURCE(4148, 16) (* (( (ptr) dyn_v6208)+6) ) = 0; SOURCE(4166, 76) if ( ( (parent_v10396 != 0) ? ((* (( (ptr) parent_v10396)+5) ) == dyn_v6208) : 0 ) ) { SOURCE(4216, 26) (* (( (ptr) parent_v10396)+5) ) = 0; }; SOURCE(4248, 61) if (((* (ptr) static_v10424 ) == dyn_v6208)) { SOURCE(4282, 27) (* (ptr) static_v10424 ) = 0; }; SOURCE(4312, 16) (void) ForkDestroy_P600(dyn_v6208); SOURCE(4330, 10) dyn_v6208 = next_v10368; }; goto lab_L100005; lab_L100003: ; } static void DestroyIncludingAncestorsAndCascaded_P540(dyn_v6280) word dyn_v6280; { register ptr gf_c51576 = (ptr) &globalframe; /* DestroyIncludingAncestorsAndCascaded: */ SOURCE(4355, 180) (void) (XR_MonitorEntry((word) (( (bPt) gf_c51576)+16)/* LOCK_v3140 */ )); SOURCE(4430, 105) if ((dyn_v6280 != 0)) { SOURCE(4448, 48) lab_L100008: ; if (((* (( (ptr) dyn_v6280)+6) ) != 0)) { } else { goto lab_L100006; }; SOURCE(4472, 24) dyn_v6280 = (* (( (ptr) dyn_v6280)+6) ); goto lab_L100008; lab_L100006: ; SOURCE(4498, 37) (void) InternalDestroyIncludingCascaded_P480(dyn_v6280); }; SOURCE(4355, 180) (void) (XR_MonitorExit((word) (( (bPt) gf_c51576)+16)/* LOCK_v3140 */ )); return; } static void ForkDestroy_P600(dyn_v6352) word dyn_v6352; { register ptr gf_c51608 = (ptr) &globalframe; word shell_v10504; /* ForkDestroy: */ SOURCE(4544, 203) SOURCE(4597, 32) shell_v10504 = (* (( (ptr) dyn_v6352)+4) ); SOURCE(4631, 18) (* (( (ptr) dyn_v6352)+4) ) = 0; SOURCE(4651, 96) if ((0 != (word) IsDynamicPopShell_P60(shell_v10504))) { SOURCE(4684, 63) { word pd56; pd56 = (* (( (ptr) (* (( (ptr) gf_c51608)+160)/* var_c49464 */ ))+64) ); (void) ( *( (fPt) ((* (ptr) pd56 ))))((* (( (ptr) dyn_v6352)+3) ), (word) (( (bPt) gf_c51608)+380)/* var_c48696 */ , shell_v10504, 0, pd56) ; }; }; } static void Destroy_P660(event_v17212, clientData_v17240, tq_v17268) word event_v17212; word clientData_v17240; word tq_v17268; { register ptr gf_c51640 = (ptr) &globalframe; word shell_v10548; /* Destroy: */ SOURCE(4753, 133) SOURCE(4783, 38) shell_v10548 = XR_Narrow(clientData_v17240, (* (( (ptr) gf_c51640)+17) )); SOURCE(4823, 63) if ((0 != (word) IsDynamicPopShell_P60(shell_v10548))) { SOURCE(4856, 30) { word pd57; pd57 = (* (( (ptr) (* (( (ptr) gf_c51640)+163)/* var_c49752 */ ))+15) ); (void) ( *( (fPt) ((* (ptr) pd57 ))))(shell_v10548, pd57); }; }; } static void DoNotify_P720(nc_v6424, ev_v6452) word nc_v6424; word ev_v6452; { register ptr gf_c51672 = (ptr) &globalframe; /* DoNotify: */ SOURCE(4892, 242) SOURCE(4949, 185) if (((* (( (ptr) nc_v6424)+1) ) == 0)) { SOURCE(4983, 74) SOURCE(4984, 73) { W2 var_c49784; { W2 var_c0123; word var_c0122; var_c0122 = XR_ExtensionAlloc(7); { word tmpAddr58; tmpAddr58 = (word) var_c0122; (* (ptr) tmpAddr58 ) = ( ((word) (fPt) NoName_Q5100) ); (* (( (ptr) tmpAddr58) + 1) ) = 0; (* (( (ptr) tmpAddr58) + 2) ) = (word) (( (bPt) gf_c51672)+364)/* var_c48632 */ ; (* (( (ptr) tmpAddr58) + 3) ) = 0; (* (( (ptr) tmpAddr58) + 4) ) = ev_v6452; (* (( (ptr) tmpAddr58) + 5) ) = nc_v6424; (* (( (ptr) tmpAddr58) + 6) ) = 0; }; (void) XR_Fork((word) &var_c0123, var_c0122); var_c49784 = var_c0123; }; { word pd59; pd59 = (* (( (ptr) (* (( (ptr) gf_c51672)+164)/* var_c49816 */ ))+11) ); (void) ( *( (fPt) ((* (ptr) pd59 ))))(var_c49784, pd59); }; }; } else { SOURCE(5064, 70) { word pd60; pd60 = (* (( (ptr) (* (( (ptr) gf_c51672)+160)/* var_c49464 */ ))+64) ); (void) ( *( (fPt) ((* (ptr) pd60 ))))((* (( (ptr) nc_v6424)+1) ), (word) (( (bPt) gf_c51672)+364)/* var_c48632 */ , nc_v6424, ev_v6452, pd60) ; }; }; } static void QueuedDoNotify_P780(event_v17328, clientData_v17356, tq_v17384) word event_v17328; word clientData_v17356; word tq_v17384; { register ptr gf_c51704 = (ptr) &globalframe; word nc_v10592; /* QueuedDoNotify: */ SOURCE(5140, 196) SOURCE(5201, 42) nc_v10592 = XR_Narrow(clientData_v17356, (* (( (ptr) gf_c51704)+18) )); SOURCE(5245, 91) { word pd61; pd61 = (* (( (ptr) nc_v10592)+2) ); (void) ( *( (fPt) ((* (ptr) pd61 ))))((* (ptr) nc_v10592 ), (* (( (ptr) nc_v10592)+3) ), (* (( (ptr) nc_v10592)+4) ), event_v17328, pd61) ; }; } static void ActualPopUp_P840(dyn_v6524, ev_v6552, point_v6580, screen_v6608, dynamic_v6636, helpHandle_v6664) word dyn_v6524; word ev_v6552; W2 point_v6580; word screen_v6608; word dynamic_v6636; word helpHandle_v6664; { register ptr gf_c51736 = (ptr) &globalframe; word h_v10648 = 0; word static_v10676; word base_v10704; word createClosure_v10732; word shell_v10760 = 0; word child_v10788 = 0; word szh_v10816 = 0; W2 compensate_v10844; /* ActualPopUp: */ SOURCE(5342, 3246) SOURCE(5521, 34) static_v10676 = (* (( (ptr) dyn_v6524)+2) ); SOURCE(5557, 30) base_v10704 = (* (( (ptr) static_v10676)+6) ); SOURCE(5589, 57) createClosure_v10732 = (* (( (ptr) static_v10676)+2) ); SOURCE(5713, 28) compensate_v10844.f0 = 0; compensate_v10844.f1 = 0; SOURCE(5787, 58) if ((0 != (* (( (ptr) dyn_v6524)+1) )) || (createClosure_v10732 == 0)) { SOURCE(5839, 6) return; }; SOURCE(5849, 158) { W20 var_c0145; (* (W9Pt) (word) &var_c0145 ) = (* (W9Pt) (( (ptr) gf_c51736)+119)/* var_c49112 */ ); (* (( (ptr) (word) &var_c0145) + 9) ) = 0; (* (( (ptr) (word) &var_c0145) + 10) ) = (* (( (ptr) static_v10676)+9) ); (* (( (ptr) (word) &var_c0145) + 11) ) = (* (( (ptr) static_v10676)+9) ); (* (( (ptr) (word) &var_c0145) + 12) ) = 0; (* (( (ptr) (word) &var_c0145) + 13) ) = 0; (* (( (ptr) (word) &var_c0145) + 14) ) = 0; (* (( (ptr) (word) &var_c0145) + 15) ) = (* (( (ptr) dyn_v6524)+3) ); (* (( (ptr) (word) &var_c0145) + 16) ) = 1; (* (( (ptr) (word) &var_c0145) + 17) ) = 1; (* (( (ptr) (word) &var_c0145) + 18) ) = 1; (* (( (ptr) (word) &var_c0145) + 19) ) = (unsigned) (0 == dynamic_v6636); { word pd62; pd62 = (* (( (ptr) (* (( (ptr) gf_c51736)+163)/* var_c49752 */ ))+6) ); shell_v10760 = (word) ( *( (fPt) ((* (ptr) pd62 ))))((word) (&var_c0145), pd62); }; }; SOURCE(6009, 32) { word pd63; pd63 = (* (( (ptr) (* (( (ptr) gf_c51736)+163)/* var_c49752 */ ))+24) ); szh_v10816 = (word) ( *( (fPt) ((* (ptr) pd63 ))))(shell_v10760, pd63); }; SOURCE(6043, 41) { word pd64; pd64 = (* (( (ptr) (* (( (ptr) gf_c51736)+162)/* var_c49624 */ ))+11) ); (void) ( *( (fPt) ((* (ptr) pd64 ))))(shell_v10760, (* (( (ptr) gf_c51736)+8)/* myShellKey_v3196 */ ), dyn_v6524, pd64) ; }; SOURCE(6086, 447) if ( ( (screen_v6608 == 0) ? (ev_v6552 == 0) : 0 ) ) { SOURCE(6119, 38) { word pd65; pd65 = (* (( (ptr) (* (( (ptr) gf_c51736)+163)/* var_c49752 */ ))+7) ); (void) ( *( (fPt) ((* (ptr) pd65 ))))(shell_v10760, 0, 0, pd65); }; SOURCE(6159, 33) screen_v6608 = (* (( (ptr) (* (( (ptr) shell_v10760)+36) ))+1) ); } else { SOURCE(6201, 334) { word c_v10912; SOURCE(6203, 82) if ((screen_v6608 != 0)) { c_v10912 = (* (( (ptr) screen_v6608)+16) ); c_v10912 = c_v10912; } else { c_v10912 = (* (( (ptr) ev_v6552)+2) ); c_v10912 = c_v10912; }; SOURCE(6288, 191) if (((screen_v6608 == 0) || ( (int)point_v6580.f0 < (int)0)) || ( (int)point_v6580.f1 < (int)0)) { SOURCE(6333, 148) { W2 p_v10956; SOURCE(6348, 34) { W3 var_c49880; (void) PositionAndScreen_P120((word) &var_c49880, c_v10912); screen_v6608 = var_c49880.f2; p_v10956 = (* (W2Pt) &var_c49880 ); }; SOURCE(6415, 31) if (( (int)point_v6580.f0 < (int)0)) { SOURCE(6433, 13) point_v6580.f0 = p_v10956.f0; }; SOURCE(6448, 31) if (( (int)point_v6580.f1 < (int)0)) { SOURCE(6466, 13) point_v6580.f1 = p_v10956.f1; }; }; }; SOURCE(6484, 49) { word pd66; pd66 = (* (( (ptr) (* (( (ptr) gf_c51736)+163)/* var_c49752 */ ))+7) ); (void) ( *( (fPt) ((* (ptr) pd66 ))))(shell_v10760, c_v10912, (* (ptr) screen_v6608 ), pd66); }; }; }; SOURCE(6538, 98) if ( ( ( (int)point_v6580.f0 >= (int)0) ? ( (int)point_v6580.f1 >= (int)0) : 0 ) ) { SOURCE(6574, 62) (* (( (ptr) szh_v10816)+9) ) = 1; (* (( (ptr) szh_v10816)+7) ) = 1; }; SOURCE(6641, 20) (* (( (ptr) dyn_v6524)+4) ) = shell_v10760; SOURCE(6663, 94) if ((base_v10704 != 0)) { SOURCE(6682, 34) { word pd67; pd67 = (* (( (ptr) (* (( (ptr) gf_c51736)+165)/* var_c49912 */ ))+4) ); h_v10648 = (word) ( *( (fPt) ((* (ptr) pd67 ))))(base_v10704, pd67); }; SOURCE(6718, 39) { word pd68; pd68 = (* (( (ptr) (* (( (ptr) gf_c51736)+162)/* var_c49624 */ ))+33) ); (* (( (ptr) szh_v10816)+41) ) = (word) ( *( (fPt) ((* (ptr) pd68 ))))(base_v10704, pd68); }; }; SOURCE(6762, 80) { word var_c49944; var_c49944 = helpHandle_v6664; if ((var_c49944 == 0)) { goto lab_L100009; }; if (((* (( (ptr) gf_c51736)+19) ) == XR_GetReferentType(var_c49944))) { { word handle_v11000; handle_v11000 = var_c49944; SOURCE(6820, 22) h_v10648 = handle_v11000; }; } else { lab_L100009: ; }; }; SOURCE(6846, 775) if ((0 != dynamic_v6636)) { SOURCE(6863, 726) { word parent_v11044; SOURCE(6865, 35) parent_v11044 = (* (( (ptr) dyn_v6524)+6) ); SOURCE(6902, 339) if ((parent_v11044 == 0) || (0 == (word) IsDynamicPopShell_P60((* ((( (ptr) parent_v11044)+4)) )))) { SOURCE(6961, 200) { word m_v11100; SOURCE(6963, 116) m_v11100 = XR_NewObject(16, (* (( (ptr) gf_c51736)+20) )); (* (ptr) m_v11100 ) = (word) (( (bPt) gf_c51736)+268)/* var_c48248 */ ; (* (( (ptr) m_v11100)+1) ) = (* (( (ptr) gf_c51736)+11)/* buttonReleaseFilter_v3280 */ ); (* (( (ptr) m_v11100)+2) ) = (* (( (ptr) dyn_v6524)+3) ); (* (( (ptr) m_v11100)+3) ) = dyn_v6524; SOURCE(7081, 24) (* (( (ptr) dyn_v6524)+8) ) = m_v11100; SOURCE(7107, 52) { word pd69; pd69 = (* (( (ptr) (* (( (ptr) gf_c51736)+161)/* var_c49528 */ ))+15) ); (void) ( *( (fPt) ((* (ptr) pd69 ))))((* (( (ptr) screen_v6608)+16) ), m_v11100, pd69); }; }; } else { SOURCE(7170, 71) if ((h_v10648 == 0)) { SOURCE(7184, 57) { word pd70; pd70 = (* (( (ptr) (* (( (ptr) gf_c51736)+166)/* var_c50008 */ ))+4) ); h_v10648 = (word) ( *( (fPt) ((* (ptr) pd70 ))))((* ((( (ptr) parent_v11044)+4)) ), pd70); }; }; }; SOURCE(7246, 48) { word pd71; pd71 = (* (( (ptr) (* (( (ptr) gf_c51736)+162)/* var_c49624 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd71 ))))(shell_v10760, 3, 1, pd71); }; SOURCE(7296, 179) { W4 var_c50040; var_c50040.f0 = (word) (( (bPt) gf_c51736)+276)/* var_c48280 */ ; var_c50040.f1 = (* (( (ptr) gf_c51736)+12)/* filter_v3308 */ ); var_c50040.f2 = (* (( (ptr) dyn_v6524)+3) ); var_c50040.f3 = dyn_v6524; { word pd72; pd72 = (* (( (ptr) (* (( (ptr) gf_c51736)+162)/* var_c49624 */ ))+30) ); (void) ( *( (fPt) ((* (ptr) pd72 ))))(shell_v10760, var_c50040, 60, pd72); }; }; SOURCE(7477, 40) (* (( (ptr) shell_v10760)+24) ) = 1; SOURCE(7519, 33) (* (( (ptr) shell_v10760)+25) ) = 1; SOURCE(7554, 32) (* (( (ptr) shell_v10760)+9) ) = 3; }; } else { SOURCE(7598, 23) compensate_v10844.f0 = (word) -1; compensate_v10844.f1 = (word) -10; }; SOURCE(7624, 61) if ((h_v10648 == 0)) { SOURCE(7638, 47) { word pd73; pd73 = (* (( (ptr) (* (( (ptr) gf_c51736)+166)/* var_c50008 */ ))+4) ); h_v10648 = (word) ( *( (fPt) ((* (ptr) pd73 ))))(shell_v10760, pd73); }; }; SOURCE(7688, 34) { word pd74; pd74 = (* (( (ptr) (* (( (ptr) gf_c51736)+165)/* var_c49912 */ ))+5) ); (void) ( *( (fPt) ((* (ptr) pd74 ))))(shell_v10760, h_v10648, pd74); }; SOURCE(7724, 71) { word pd75; pd75 = (* (( (ptr) (* (( (ptr) gf_c51736)+162)/* var_c49624 */ ))+12) ); (void) ( *( (fPt) ((* (ptr) pd75 ))))(shell_v10760, (* (ptr) (* (( (ptr) (* (( (ptr) gf_c51736)+162)/* var_c49624 */ ))+24) ) ), (word) (( (bPt) gf_c51736)+436)/* var_c48920 */ , dyn_v6524, pd75); }; SOURCE(7797, 148) { word pd76; pd76 = (* (ptr) createClosure_v10732 ); child_v10788 = (word) ( *( (fPt) ((* (ptr) pd76 ))))(shell_v10760, (* (( (ptr) createClosure_v10732)+1) ), (* (( (ptr) static_v10676)+3) ), (* (( (ptr) dyn_v6524)+7) ), ev_v6552, pd76); }; SOURCE(7947, 38) { word pd77; pd77 = (* (( (ptr) (* (( (ptr) gf_c51736)+163)/* var_c49752 */ ))+12) ); (void) ( *( (fPt) ((* (ptr) pd77 ))))(shell_v10760, child_v10788, pd77); }; SOURCE(7987, 492) { W5 preferred_v11144; SOURCE(7993, 58) { word pd78; pd78 = (* (( (ptr) (* (( (ptr) gf_c51736)+167)/* var_c50072 */ ))+10) ); (void) ( *( (fPt) ((* (ptr) pd78 ))))((word) &preferred_v11144, shell_v10760, 0, (* (W5Pt) (( (ptr) gf_c51736)+128)/* var_c49176 */ ), 0, pd78) ; }; SOURCE(8073, 64) (* (( (ptr) szh_v10816)+10) ) = 1; (* (( (ptr) szh_v10816)+8) ) = 1; SOURCE(8139, 99) { word x79; word x80; word x81; point_v6580.f0 = (x81 = (x79 = point_v6580.f0, x80 = (((* (( (ptr) screen_v6608)+5) ) - preferred_v11144.f2) - compensate_v10844.f0), MIN((int)(word), x79, x80)), MAX((int)(word), x81, 0)); }; SOURCE(8240, 102) { word x82; word x83; word x84; point_v6580.f1 = (x84 = (x82 = point_v6580.f1, x83 = (((* (( (ptr) screen_v6608)+6) ) - preferred_v11144.f3) - compensate_v10844.f1), MIN((int)(word), x82, x83)), MAX((int)(word), x84, 0)); }; SOURCE(8344, 28) (* (W2Pt) (( (ptr) shell_v10760)+5) ) = point_v6580; SOURCE(8375, 37) (* (W2Pt) (( (ptr) szh_v10816)+12) ) = point_v6580; SOURCE(8414, 31) (* (ptr) szh_v10816 ) = 1; SOURCE(8447, 30) (* (( (ptr) szh_v10816)+4) ) = 1; }; SOURCE(8484, 37) if ((0 != (* (( (ptr) dyn_v6524)+1) ))) { SOURCE(8515, 6) return; }; SOURCE(8523, 30) { word pd85; pd85 = (* (( (ptr) (* (( (ptr) gf_c51736)+163)/* var_c49752 */ ))+13) ); (void) ( *( (fPt) ((* (ptr) pd85 ))))(shell_v10760, (* (W5Pt) (( (ptr) gf_c51736)+133)/* var_c49240 */ ), 0, 1, pd85); }; SOURCE(8555, 33) { word pd86; pd86 = (* (( (ptr) (* (( (ptr) gf_c51736)+168)/* var_c50104 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd86 ))))(h_v10648, shell_v10760, pd86); }; } static void PopUp_P900(pseudoBase_v6748, event_v6776, parentCarrier_v6804, image_v6832, pos_v6860) word pseudoBase_v6748; word event_v6776; word parentCarrier_v6804; word image_v6832; W2 pos_v6860; { register ptr gf_c51768 = (ptr) &globalframe; word time_v11188 = 0; word rootWindow_v11216 = 0; word screen_v11244 = 0; /* PopUp: */ SOURCE(8594, 1150) SOURCE(8838, 212) { word var_c50136; var_c50136 = event_v6776; if ((var_c50136 == 0)) { goto lab_L100010; }; { word var_c50168; var_c50168 = (* (( (ptr) var_c50136)+4) ); if ((var_c50168 == 4)) { { word bp_v11288; bp_v11288 = var_c50136; SOURCE(8890, 19) time_v11188 = (* (( (ptr) bp_v11288)+7) ); SOURCE(8911, 42) if ((0 != (* (( (ptr) bp_v11288)+16) ))) { SOURCE(8933, 20) rootWindow_v11216 = (* (( (ptr) bp_v11288)+8) ); }; }; } else { if ((var_c50168 == 7)) { { word en_v11332; en_v11332 = var_c50136; SOURCE(8987, 19) time_v11188 = (* (( (ptr) en_v11332)+7) ); SOURCE(9008, 42) if ((0 != (* (( (ptr) en_v11332)+17) ))) { SOURCE(9030, 20) rootWindow_v11216 = (* (( (ptr) en_v11332)+8) ); }; }; } else { lab_L100010: ; SOURCE(9066, 5) (void) XR_RaiseUnnamedError(); }; }; }; }; SOURCE(9073, 671) { word pd87; pd87 = (* (( (ptr) (* (( (ptr) gf_c51768)+160)/* var_c49464 */ ))+119) ); if (((word) ( *( (fPt) ((* (ptr) pd87 ))))((* (( (ptr) event_v6776)+2) ), time_v11188, pseudoBase_v6748, pd87) == 3)) { SOURCE(9149, 600) { word static_v11376; word dyn_v11404 = 0; word parent_v11432 = 0; SOURCE(9151, 42) static_v11376 = XR_Narrow(pseudoBase_v6748, (* (( (ptr) gf_c51768)+16) )); SOURCE(9246, 248) { word var_c50200; word var_c50232; var_c50200 = parentCarrier_v6804; if ((var_c50200 == 0)) { goto lab_L100011; }; var_c50232 = XR_GetReferentType(var_c50200); if (((* (( (ptr) gf_c51768)+16) ) == var_c50232)) { { word static_v11512; static_v11512 = var_c50200; SOURCE(9302, 30) parent_v11432 = (* (ptr) static_v11512 ); }; goto endif088; }; if (((* (( (ptr) gf_c51768)+17) ) == var_c50232)) { { word w_v11568; w_v11568 = var_c50200; SOURCE(9351, 105) { word root_v11612; SOURCE(9353, 36) { word pd89; pd89 = (* (( (ptr) (* (( (ptr) gf_c51768)+162)/* var_c49624 */ ))+33) ); root_v11612 = (word) ( *( (fPt) ((* (ptr) pd89 ))))(w_v11568, pd89); }; SOURCE(9391, 63) if ((0 != (word) IsDynamicPopShell_P60(root_v11612))) { SOURCE(9423, 31) parent_v11432 = (word) DynamicFromShell_P960(root_v11612); }; }; }; goto endif088; }; if (((* (( (ptr) gf_c51768)+15) ) == var_c50232)) { { word dyn_v11656; dyn_v11656 = var_c50200; SOURCE(9482, 12) parent_v11432 = dyn_v11656; }; goto endif088; }; lab_L100011: ; goto endif088; endif088: ; }; SOURCE(9511, 41) dyn_v11404 = (word) BuildDynamic_P360(static_v11376, parent_v11432, image_v6832); SOURCE(9554, 190) if ((dyn_v11404 != 0)) { SOURCE(9572, 95) if ((rootWindow_v11216 != 0)) { SOURCE(9605, 62) { word pd90; pd90 = (* (( (ptr) (* (( (ptr) gf_c51768)+160)/* var_c49464 */ ))+89) ); screen_v11244 = (word) ( *( (fPt) ((* (ptr) pd90 ))))((* (( (ptr) event_v6776)+2) ), rootWindow_v11216, pd90); }; }; SOURCE(9669, 75) (void) ActualPopUp_P840(dyn_v11404, event_v6776, pos_v6860, screen_v11244, 1, 0); }; }; }; }; } static word DynamicFromShell_P960(root_v6932) word root_v6932; { register ptr gf_c51800 = (ptr) &globalframe; word var_c6976; /* DynamicFromShell: */ SOURCE(9756, 164) SOURCE(9756, 164) var_c6976 = 0; SOURCE(9833, 87) { word var_c50264; { word pd91; pd91 = (* (( (ptr) (* (( (ptr) gf_c51800)+162)/* var_c49624 */ ))+10) ); var_c50264 = (word) ( *( (fPt) ((* (ptr) pd91 ))))(root_v6932, (* (( (ptr) gf_c51800)+8)/* myShellKey_v3196 */ ), pd91) ; }; if ((var_c50264 == 0)) { goto lab_L100012; }; if (((* (( (ptr) gf_c51800)+15) ) == XR_GetReferentType(var_c50264))) { { word dyn_v11712; dyn_v11712 = var_c50264; SOURCE(9909, 11) return(dyn_v11712); }; } else { lab_L100012: ; }; }; SOURCE(9756, 164) return(var_c6976); } static void SimplePopUpWithRegularShell_P1020(list_v7048, defaultNotify_v7076, notifyTQ_v7104, screen_v7132, pos_v7160, registerData_v7188, event_v7216, header_v7244, helpHandle_v7272) word list_v7048; word defaultNotify_v7076; word notifyTQ_v7104; word screen_v7132; W2 pos_v7160; word registerData_v7188; word event_v7216; word header_v7244; word helpHandle_v7272; { word createMenu_v11768; /* SimplePopUpWithRegularShell: */ SOURCE(9941, 465) SOURCE(10213, 98) createMenu_v11768 = (word) WidgetCreateClosureFromChoiceList_P2340(list_v7048, defaultNotify_v7076, notifyTQ_v7104); SOURCE(10313, 93) (void) PopUpWithRegularShell_P1080(createMenu_v11768, screen_v7132, pos_v7160, registerData_v7188, 0, event_v7216 , header_v7244, helpHandle_v7272); } static void PopUpWithRegularShell_P1080(createMenu_v7356, screen_v7384, pos_v7412, registerData_v7440, image_v7468, event_v7496, header_v7524, helpHandle_v7552) word createMenu_v7356; word screen_v7384; W2 pos_v7412; word registerData_v7440; word image_v7468; word event_v7496; word header_v7524; word helpHandle_v7552; { word dyn_v11812 = 0; word static_v11840; /* PopUpWithRegularShell: */ SOURCE(10409, 568) SOURCE(10662, 38) static_v11840 = (word) NewPopStatic_P1560(0); SOURCE(10702, 20) (* (( (ptr) static_v11840)+4) ) = image_v7468; SOURCE(10724, 34) (* (( (ptr) static_v11840)+3) ) = registerData_v7440; SOURCE(10760, 33) (* (( (ptr) static_v11840)+2) ) = createMenu_v7356; SOURCE(10795, 22) (* (( (ptr) static_v11840)+9) ) = header_v7524; SOURCE(10819, 38) dyn_v11812 = (word) BuildDynamic_P360(static_v11840, 0, image_v7468); SOURCE(10859, 118) if ((dyn_v11812 != 0)) { SOURCE(10877, 100) (void) ActualPopUp_P840(dyn_v11812, event_v7496, pos_v7412, screen_v7384, 0, helpHandle_v7552); }; } static void TestUpnessNow_P1140(event_v17508, clientData_v17536, tq_v17564) word event_v17508; word clientData_v17536; word tq_v17564; { register ptr gf_c51832 = (ptr) &globalframe; word dyn_v11908; /* TestUpnessNow: */ SOURCE(10986, 344) (void) (XR_MonitorEntry((word) (( (bPt) gf_c51832)+16)/* LOCK_v3140 */ )); SOURCE(11028, 40) dyn_v11908 = XR_Narrow(clientData_v17536, (* (( (ptr) gf_c51832)+15) )); SOURCE(11070, 260) lab_L100015: ; if ( ( ( ( (dyn_v11908 != 0) ? (0 == (* (ptr) dyn_v11908 )) : 0 ) ? (0 == (* (( (ptr) (* (( (ptr) dyn_v11908)+2) ))+1) )) : 0 ) ? ((* (( (ptr) dyn_v11908)+5) ) == 0) : 0 ) ) { } else { goto lab_L100013; }; { word parent_v11964; SOURCE(11163, 35) parent_v11964 = (* (( (ptr) dyn_v11908)+6) ); SOURCE(11200, 25) if ((parent_v11964 == 0)) { SOURCE(11219, 6) (void) (XR_MonitorExit((word) (( (bPt) gf_c51832)+16)/* LOCK_v3140 */ )); return; }; SOURCE(11227, 50) if ((0 == (word) IsDynamicPopShell_P60((* ((( (ptr) parent_v11964)+4)) )))) { SOURCE(11271, 6) (void) (XR_MonitorExit((word) (( (bPt) gf_c51832)+16)/* LOCK_v3140 */ )); return; }; SOURCE(11279, 37) (void) InternalDestroyIncludingCascaded_P480(dyn_v11908); SOURCE(11318, 12) dyn_v11908 = parent_v11964; }; goto lab_L100015; lab_L100013: ; SOURCE(10986, 344) (void) (XR_MonitorExit((word) (( (bPt) gf_c51832)+16)/* LOCK_v3140 */ )); return; } static void TestUpnessVerySoon_P1200(event_v17624, clientData_v17652, tq_v17680) word event_v17624; word clientData_v17652; word tq_v17680; { register ptr gf_c51864 = (ptr) &globalframe; word dyn_v12020; /* TestUpnessVerySoon: */ SOURCE(11344, 299) SOURCE(11385, 40) dyn_v12020 = XR_Narrow(clientData_v17652, (* (( (ptr) gf_c51864)+15) )); SOURCE(11427, 216) if ( ( ( ( ( ( (dyn_v12020 != 0) ? (0 == (* (( (ptr) dyn_v12020)+1) )) : 0 ) ? ((* (( (ptr) dyn_v12020)+6) ) != 0) : 0 ) ? (0 == (* (ptr) dyn_v12020 )) : 0 ) ? (0 == (* ( ( (ptr) (* (( (ptr) dyn_v12020)+2) ))+1) )) : 0 ) ? ((* (( (ptr) dyn_v12020)+5) ) == 0) : 0 ) ) { SOURCE(11566, 77) { word pd92; pd92 = (* (( (ptr) (* (( (ptr) gf_c51864)+169)/* var_c50296 */ ))+4) ); (void) ( *( (fPt) ((* (ptr) pd92 ))))(150, (* (( (ptr) dyn_v12020)+3) ), (word) (( (bPt) gf_c51864)+316)/* var_c48440 */ , dyn_v12020, 0, pd92) ; }; }; } static void TestUpnessSoon_P1260(dyn_v7648) word dyn_v7648; { register ptr gf_c51896 = (ptr) &globalframe; /* TestUpnessSoon: */ SOURCE(11647, 146) SOURCE(11694, 99) if ((dyn_v7648 != 0)) { SOURCE(11711, 82) { word pd93; pd93 = (* (( (ptr) (* (( (ptr) gf_c51896)+169)/* var_c50296 */ ))+4) ); (void) ( *( (fPt) ((* (ptr) pd93 ))))(150, (* (( (ptr) dyn_v7648)+3) ), (word) (( (bPt) gf_c51896)+308)/* var_c48408 */ , dyn_v7648, 0, pd93) ; }; }; } static void SetStyle_P1320(base_v7720, style_v7748) word base_v7720; word style_v7748; { register ptr gf_c51928 = (ptr) &globalframe; word var_c50328; word widget_v47656; /* SetStyle: */ SOURCE(11797, 137) SOURCE(11848, 86) { word tc94; if ((base_v7720 != 0)) { widget_v47656 = base_v7720; { word pd95; if (((* (ptr) (* (( (ptr) widget_v47656)+4) ) ) == (* (( (ptr) gf_c51928)+32) ))) { var_c50328 = 1; } else { pd95 = (* (( (ptr) (* (( (ptr) gf_c51928)+162)/* var_c49624 */ ))+43) ); var_c50328 = (word) ( *( (fPt) ((* (ptr) pd95 ))))(widget_v47656, (* (( (ptr) gf_c51928)+32) ), pd95); }; }; tc94 = (word) (0 != var_c50328); } else { tc94 = (word) 0; }; if (tc94) { SOURCE(11899, 35) { word pd96; pd96 = (* (( (ptr) (* (( (ptr) gf_c51928)+163)/* var_c49752 */ ))+42) ); (void) ( *( (fPt) ((* (ptr) pd96 ))))(base_v7720, style_v7748, 2, pd96); }; }; }; } static void BaseButtonEvent_P1380(event_v17740, clientData_v17768, tq_v17796) word event_v17740; word clientData_v17768; word tq_v17796; { register ptr gf_c51960 = (ptr) &globalframe; word static_v12076; word base_v12104; /* BaseButtonEvent: */ SOURCE(11940, 1640) SOURCE(12003, 42) static_v12076 = XR_Narrow(clientData_v17768, (* (( (ptr) gf_c51960)+16) )); SOURCE(12047, 30) base_v12104 = (* (( (ptr) static_v12076)+6) ); SOURCE(12079, 1501) { word var_c50392; var_c50392 = (* (( (ptr) event_v17740)+4) ); switch (var_c50392) { case 4: SOURCE(12119, 28) (void) SetStyle_P1320(base_v12104, (* (( (ptr) gf_c51960)+31) )); SOURCE(12149, 40) { W2 var_c50424; var_c50424.f0 = (word) -1; var_c50424.f1 = (word) -1; (void) PopUp_P900(static_v12076, event_v17740, base_v12104, (* (( (ptr) static_v12076)+4) ), var_c50424); }; break; case 5: SOURCE(12213, 59) (void) DestroyIncludingAncestorsAndCascaded_P540((* (ptr) (static_v12076) )); SOURCE(12274, 125) if ((base_v12104 != 0)) { SOURCE(12293, 80) if ((0 != (* (( (ptr) static_v12076)+1) ))) { SOURCE(12322, 26) (* (( (ptr) static_v12076)+1) ) = 0; SOURCE(12350, 23) (void) SelectOnly_P2460(base_v12104, event_v17740); }; SOURCE(12380, 19) (void) SetStyle_P1320(base_v12104, 0); }; break; case 8: SOURCE(12422, 292) { word lne_v12160; SOURCE(12424, 40) if ((event_v17740 == 0)) { goto lab_L100017; }; if (((* (( (ptr) event_v17740)+4) ) == 8)) { goto lab_L100017; }; (void) XR_RaiseError(XR_NarrowFault, 0); lab_L100017: ; lne_v12160 = event_v17740; SOURCE(12466, 19) (void) SetStyle_P1320(base_v12104, 0); SOURCE(12487, 140) { word var_c50456; var_c50456 = (* (( (ptr) lne_v12160)+5) ); switch (var_c50456) { case 0: case 1: case 3: case 4: SOURCE(12562, 26) (* (( (ptr) static_v12076)+1) ) = 0; SOURCE(12590, 37) (void) TestUpnessSoon_P1260((* (ptr) (static_v12076) )); break; case 2: break; }; }; SOURCE(12663, 49) { word pd97; pd97 = (* (( (ptr) (* (( (ptr) gf_c51960)+168)/* var_c50104 */ ))+5) ); (void) ( *( (fPt) ((* (ptr) pd97 ))))((* (( (ptr) static_v12076)+8) ), (* (( (ptr) static_v12076)+7) ), 0, pd97); }; }; break; case 7: SOURCE(12732, 856) { word ene_v12204; word state_v12232; SOURCE(12734, 40) if ((event_v17740 == 0)) { goto lab_L100018; }; if (((* (( (ptr) event_v17740)+4) ) == 7)) { goto lab_L100018; }; (void) XR_RaiseError(XR_NarrowFault, 0); lab_L100018: ; ene_v12204 = event_v17740; SOURCE(12776, 37) state_v12232 = (* (( (ptr) ene_v12204)+15) ); SOURCE(12815, 765) if ( ( (base_v12104 != 0) ? ( (((state_v12232 & 0400 || state_v12232 & 01000) || state_v12232 & 02000) || state_v12232 & 04000) ? 1 : (((unsigned)state_v12232 << 19) >> 31) ) : 0 ) ) { SOURCE(12920, 665) { word root_v12276; SOURCE(12924, 39) { word pd98; pd98 = (* (( (ptr) (* (( (ptr) gf_c51960)+162)/* var_c49624 */ ))+33) ); root_v12276 = (word) ( *( (fPt) ((* (ptr) pd98 ))))(base_v12104, pd98); }; SOURCE(12965, 26) (* (( (ptr) static_v12076)+1) ) = 1; SOURCE(12993, 587) if ((0 != (word) IsDynamicPopShell_P60(root_v12276))) { SOURCE(13025, 557) { word width_v12348; W2 pos_v12376; SOURCE(13049, 35) width_v12348 = (* (( (ptr) base_v12104)+41) ); SOURCE(13086, 25) pos_v12376 = (* (W2Pt) (( (ptr) ene_v12204)+11) ); SOURCE(13113, 235) if ( ( ( (int)(* (( (ptr) ene_v12204)+13) ) >= (int)0) ? ( (int)(* (( (ptr) ene_v12204)+13) ) < (int)width_v12348) : 0 ) ) { SOURCE(13160, 190) /*1*/ { /*1*/ word rightLimit_v12420; /*1*/ word shift_v12448; SOURCE(13162, 40) /*1*/ rightLimit_v12420 = (MIN((int)(word), width_v12348, 32)); SOURCE(13204, 39) /*1*/ shift_v12448 = IOP2( / , (int)(width_v12348 - (* (( (ptr) ene_v12204)+13) )), (int)4); SOURCE(13245, 80) /*1*/ if (( (int)(* (( (ptr) ene_v12204)+13) ) < (int)rightLimit_v12420)) { SOURCE(13278, 47) /*1*/ { /*1*/ word x99; /*1*/ shift_v12448 = (x99 = (rightLimit_v12420 - (* (( (ptr) ene_v12204)+13) )), /*1*/ MAX((int)(word), shift_v12448, x99)); /*1*/ }; /*1*/ }; SOURCE(13327, 21) /*1*/ pos_v12376.f0 = (pos_v12376.f0 + shift_v12448); /*1*/ }; /*1*/ }; SOURCE(13353, 96) if ( ( ( (int)(* (( (ptr) ene_v12204)+14) ) >= (int)0) ? ( (int)(* (( (ptr) ene_v12204)+14) ) < (int)(* (( (ptr) base_v12104)+42) )) : 0 ) ) { SOURCE(13420, 29) /*1*/ pos_v12376.f1 = (pos_v12376.f1 - (* (( (ptr) ene_v12204)+14) )); /*1*/ }; SOURCE(13452, 28) (void) SetStyle_P1320(base_v12104, (* (( (ptr) gf_c51960)+31) )); SOURCE(13482, 51) { /*1*/ word pd100; /*1*/ pd100 = (* (( (ptr) (* (( (ptr) gf_c51960)+168)/* var_c50104 */ ))+4) ); /*1*/ (void) ( *( (fPt) ((* (ptr) pd100 ))))((* (( (ptr) static_v12076)+8) ), (* (( (ptr) static_v12076)+7) ), 0, pd100); /*1*/ }; SOURCE(13535, 45) (void) PopUp_P900(static_v12076, event_v17740, root_v12276, (* (( (ptr) static_v12076)+4) ), pos_v12376); }; }; }; }; }; break; }; }; } static void PopShellEvent_P1440(event_v17856, clientData_v17884, tq_v17912) word event_v17856; word clientData_v17884; word tq_v17912; { register ptr gf_c51992 = (ptr) &globalframe; word dyn_v12492; /* PopShellEvent: */ SOURCE(13610, 436) SOURCE(13664, 40) dyn_v12492 = XR_Narrow(clientData_v17884, (* (( (ptr) gf_c51992)+15) )); SOURCE(13706, 340) { word var_c50488; var_c50488 = (* (( (ptr) event_v17856)+4) ); switch (var_c50488) { case 8: SOURCE(13744, 200) { word lne_v12548; SOURCE(13746, 40) if ((event_v17856 == 0)) { goto lab_L100019; }; if (((* (( (ptr) event_v17856)+4) ) == 8)) { goto lab_L100019; }; (void) XR_RaiseError(XR_NarrowFault, 0); lab_L100019: ; lne_v12548 = event_v17856; SOURCE(13788, 121) { word var_c50520; var_c50520 = (* (( (ptr) lne_v12548)+5) ); switch (var_c50520) { case 0: case 1: case 3: case 4: SOURCE(13863, 25) (* (ptr) dyn_v12492 ) = 0; SOURCE(13890, 19) (void) TestUpnessSoon_P1260(dyn_v12492); break; case 2: break; }; }; }; break; case 7: SOURCE(13962, 24) (* (ptr) dyn_v12492 ) = 1; break; case 5: SOURCE(14005, 41) (void) DestroyIncludingAncestorsAndCascaded_P540(dyn_v12492); break; }; }; } static void PriviledgedUpEvent_P1500(event_v17972, clientData_v18000, tq_v18028) word event_v17972; word clientData_v18000; word tq_v18028; { register ptr gf_c52024 = (ptr) &globalframe; word dyn_v12592; /* PriviledgedUpEvent: */ SOURCE(14067, 235) SOURCE(14130, 40) dyn_v12592 = XR_Narrow(clientData_v18000, (* (( (ptr) gf_c52024)+15) )); SOURCE(14172, 130) { word var_c50552; var_c50552 = (* (( (ptr) event_v17972)+4) ); if ((var_c50552 == 5)) { SOURCE(14214, 45) (void) RemovePriviledgedMatch_P180((* (( (ptr) event_v17972)+2) ), dyn_v12592); SOURCE(14261, 41) (void) DestroyIncludingAncestorsAndCascaded_P540(dyn_v12592); }; }; } static word NewPopStatic_P1560(internalTQ_v7808) word internalTQ_v7808; { register ptr gf_c52056 = (ptr) &globalframe; word var_c7852; word static_v12648; /* NewPopStatic: */ SOURCE(14326, 238) SOURCE(14399, 38) static_v12648 = XR_NewObject(40, (* (( (ptr) gf_c52056)+16) )); SOURCE(14439, 76) if ((internalTQ_v7808 == 0)) { SOURCE(14462, 53) { word pd101; pd101 = (* (( (ptr) (* (( (ptr) gf_c52056)+160)/* var_c49464 */ ))+63) ); internalTQ_v7808 = (word) ( *( (fPt) ((* (ptr) pd101 ))))(0, 5, 0, pd101); }; }; SOURCE(14517, 30) (* (( (ptr) static_v12648)+5) ) = internalTQ_v7808; SOURCE(14549, 15) return(static_v12648); } static word CreatePseudoBase_P1620(registerData_v7924) word registerData_v7924; { word pseudoBase_v7980; word static_v12704; /* CreatePseudoBase: */ SOURCE(14570, 184) SOURCE(14570, 184) pseudoBase_v7980 = 0; SOURCE(14663, 38) static_v12704 = (word) NewPopStatic_P1560(0); SOURCE(14703, 34) (* (( (ptr) static_v12704)+3) ) = registerData_v7924; SOURCE(14739, 15) return(static_v12704); } static word AssertBase_P1680(base_v8040) word base_v8040; { register ptr gf_c52088 = (ptr) &globalframe; word var_c8084; /* AssertBase: */ SOURCE(14760, 594) (void) (XR_MonitorEntry((word) (( (bPt) gf_c52088)+16)/* LOCK_v3140 */ )); SOURCE(14760, 594) var_c8084 = 0; SOURCE(14834, 520) if ((base_v8040 != 0)) { SOURCE(14852, 502) { word var_c50616; { word pd102; pd102 = (* (( (ptr) (* (( (ptr) gf_c52088)+162)/* var_c49624 */ ))+10) ); var_c50616 = (word) ( *( (fPt) ((* (ptr) pd102 ))))(base_v8040, (* (( (ptr) gf_c52088)+9)/* myBaseKey_v3224 */ ), pd102) ; }; if ((var_c50616 == 0)) { goto lab_L100020; }; if (((* (( (ptr) gf_c52088)+16) ) == XR_GetReferentType(var_c50616))) { { word static_v12760; static_v12760 = var_c50616; SOURCE(14929, 15) (void) (XR_MonitorExit((word) (( (bPt) gf_c52088)+16)/* LOCK_v3140 */ )); return(static_v12760); }; } else { lab_L100020: ; SOURCE(14957, 399) { word static_v12816; SOURCE(14959, 38) static_v12816 = (word) NewPopStatic_P1560(0); SOURCE(14999, 209) { W4 var_c50648; var_c50648.f0 = (word) (( (bPt) gf_c52088)+284)/* var_c48312 */ ; var_c50648.f1 = (* (( (ptr) gf_c52088)+12)/* filter_v3308 */ ); var_c50648.f2 = (* (( (ptr) static_v12816)+5) ); var_c50648.f3 = static_v12816; { word pd103; pd103 = (* (( (ptr) (* (( (ptr) gf_c52088)+162)/* var_c49624 */ ))+30) ); (void) ( *( (fPt) ((* (ptr) pd103 ))))(base_v8040, var_c50648, 16777276, pd103); }; }; SOURCE(15210, 18) (* (( (ptr) static_v12816)+6) ) = base_v8040; SOURCE(15230, 42) { word pd104; pd104 = (* (( (ptr) (* (( (ptr) gf_c52088)+162)/* var_c49624 */ ))+11) ); (void) ( *( (fPt) ((* (ptr) pd104 ))))(base_v8040, (* (( (ptr) gf_c52088)+9)/* myBaseKey_v3224 */ ), static_v12816, pd104) ; }; SOURCE(15274, 63) { word pd105; pd105 = (* (( (ptr) (* (( (ptr) gf_c52088)+170)/* var_c50680 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd105 ))))(base_v8040, (word) (( (bPt) gf_c52088)+236)/* var_c48120 */ , static_v12816, pd105) ; }; SOURCE(15339, 15) (void) (XR_MonitorExit((word) (( (bPt) gf_c52088)+16)/* LOCK_v3140 */ )); return(static_v12816); }; }; }; }; SOURCE(14760, 594) (void) (XR_MonitorExit((word) (( (bPt) gf_c52088)+16)/* LOCK_v3140 */ )); return(var_c8084); } static void PostRealized_P1740(widget_v18088, registerData_v18116, callData_v18144, event_v18172) word widget_v18088; word registerData_v18116; word callData_v18144; word event_v18172; { register ptr gf_c52120 = (ptr) &globalframe; word static_v12872; /* PostRealized: */ SOURCE(15363, 137) SOURCE(15402, 44) static_v12872 = XR_Narrow(registerData_v18116, (* (( (ptr) gf_c52120)+16) )); SOURCE(15448, 52) { word pd106; pd106 = (* (( (ptr) (* (( (ptr) gf_c52120)+165)/* var_c49912 */ ))+4) ); (* (( (ptr) static_v12872)+8) ) = (word) ( *( (fPt) ((* (ptr) pd106 ))))(widget_v18088, pd106); }; } static void MakeItBase_P1800(base_v8156, registerData_v8184, createMenu_v8212, image_v8240, help_v8268) word base_v8156; word registerData_v8184; word createMenu_v8212; word image_v8240; word help_v8268; { word static_v12928; /* MakeItBase: */ SOURCE(15506, 309) SOURCE(15658, 40) static_v12928 = (word) AssertBase_P1680(base_v8156); SOURCE(15700, 34) (* (( (ptr) static_v12928)+3) ) = registerData_v8184; SOURCE(15736, 33) (* (( (ptr) static_v12928)+2) ) = createMenu_v8212; SOURCE(15773, 20) (* (( (ptr) static_v12928)+4) ) = image_v8240; SOURCE(15797, 18) (* (( (ptr) static_v12928)+7) ) = help_v8268; } static word CreateSimplePopUpButton_P1860(text_v8352, list_v8380, defaultNotify_v8408, notifyTQ_v8436, registerData_v8464, help_v8492) word text_v8352; word list_v8380; word defaultNotify_v8408; word notifyTQ_v8436; word registerData_v8464; word help_v8492; { word button_v8548; word createMenu_v12984; /* CreateSimplePopUpButton: */ SOURCE(15823, 390) SOURCE(15823, 390) button_v8548 = 0; SOURCE(16044, 98) createMenu_v12984 = (word) WidgetCreateClosureFromChoiceList_P2340(list_v8380, defaultNotify_v8408, notifyTQ_v8436); SOURCE(16144, 69) button_v8548 = (word) CreatePopUpButton_P1920(text_v8352, createMenu_v12984, registerData_v8464, 0, help_v8492); SOURCE(15823, 390) return(button_v8548); } static word CreatePopUpButton_P1920(text_v8608, createMenu_v8636, registerData_v8664, image_v8692, help_v8720) word text_v8608; word createMenu_v8636; word registerData_v8664; word image_v8692; word help_v8720; { register ptr gf_c52152 = (ptr) &globalframe; word button_v8788; /* CreatePopUpButton: */ SOURCE(16219, 283) SOURCE(16219, 283) button_v8788 = 0; SOURCE(16406, 43) { word pd107; pd107 = (* (( (ptr) (* (( (ptr) gf_c52152)+163)/* var_c49752 */ ))+35) ); button_v8788 = (word) ( *( (fPt) ((* (ptr) pd107 ))))((* (W9Pt) (( (ptr) gf_c52152)+138)/* var_c49304 */ ), text_v8608, (* (W4Pt) ( ( (ptr) gf_c52152)+147)/* var_c49368 */ ), pd107); }; SOURCE(16451, 51) (void) MakeItBase_P1800(button_v8788, registerData_v8664, createMenu_v8636, image_v8692, 0); SOURCE(16219, 283) return(button_v8788); } static word GetPopStatic_P1980(carrier_v8848) word carrier_v8848; { register ptr gf_c52184 = (ptr) &globalframe; word var_c8892; /* GetPopStatic: */ SOURCE(16508, 250) SOURCE(16508, 250) var_c8892 = 0; SOURCE(16583, 175) { word var_c50712; word var_c50744; var_c50712 = carrier_v8848; if ((var_c50712 == 0)) { goto lab_L100021; }; var_c50744 = XR_GetReferentType(var_c50712); if (((* (( (ptr) gf_c52184)+16) ) == var_c50744)) { { word static_v13028; static_v13028 = var_c50712; SOURCE(16633, 15) return(static_v13028); }; } else { if (((* (( (ptr) gf_c52184)+17) ) == var_c50744)) { { word w_v13084; w_v13084 = var_c50712; SOURCE(16669, 89) { word var_c50776; { word pd108; pd108 = (* (( (ptr) (* (( (ptr) gf_c52184)+162)/* var_c49624 */ ))+10) ); var_c50776 = (word) ( *( (fPt) ((* (ptr) pd108 ))))(w_v13084, (* (( (ptr) gf_c52184)+9)/* myBaseKey_v3224 */ ), pd108); }; if ((var_c50776 == 0)) { goto lab_L100022; }; if (((* (( (ptr) gf_c52184)+16) ) == XR_GetReferentType(var_c50776))) { { word static_v13128; static_v13128 = var_c50776; SOURCE(16743, 15) return(static_v13128); }; } else { lab_L100022: ; }; }; }; } else { lab_L100021: ; }; }; }; SOURCE(16508, 250) return(var_c8892); } static void SetMenuCreator_P2040(carrier_v8964, createMenu_v8992) word carrier_v8964; word createMenu_v8992; { word static_v13184; /* SetMenuCreator: */ SOURCE(16797, 167) SOURCE(16884, 45) static_v13184 = (word) GetPopStatic_P1980(carrier_v8964); SOURCE(16931, 33) (* (( (ptr) static_v13184)+2) ) = createMenu_v8992; } static void SetHelp_P2100(carrier_v9052, help_v9080) word carrier_v9052; word help_v9080; { word static_v13240; /* SetHelp: */ SOURCE(16999, 129) SOURCE(17063, 45) static_v13240 = (word) GetPopStatic_P1980(carrier_v9052); SOURCE(17110, 18) (* (( (ptr) static_v13240)+7) ) = help_v9080; } static void RegisterBaseSelection_P2160(base_v9140, notify_v9168, registerData_v9196, callData_v9224, notifyTQ_v9252) word base_v9140; word notify_v9168; word registerData_v9196; word callData_v9224; word notifyTQ_v9252; { register ptr gf_c52216 = (ptr) &globalframe; word notifyClosure_v13296 = 0; /* RegisterBaseSelection: */ SOURCE(17163, 391) SOURCE(17350, 151) if ((notify_v9168 != 0)) { SOURCE(17369, 132) { word var_c50808; var_c50808 = XR_NewObject(20, (* (( (ptr) gf_c52216)+18) )); (* (ptr) var_c50808 ) = base_v9140; (* (( (ptr) var_c50808)+1) ) = notifyTQ_v9252; (* (( (ptr) var_c50808)+2) ) = XR_CheckProc(notify_v9168); (* (( (ptr) var_c50808)+3) ) = registerData_v9196; (* (( (ptr) var_c50808)+4) ) = callData_v9224; notifyClosure_v13296 = var_c50808; }; }; SOURCE(17503, 51) { word pd109; pd109 = (* (( (ptr) (* (( (ptr) gf_c52216)+162)/* var_c49624 */ ))+11) ); (void) ( *( (fPt) ((* (ptr) pd109 ))))(base_v9140, (* (( (ptr) gf_c52216)+10)/* myChoiceKey_v3252 */ ), notifyClosure_v13296, pd109) ; }; } static word ToRope_P2220(x_v9324, default_v9352) word x_v9324; word default_v9352; { register ptr gf_c52248 = (ptr) &globalframe; word var_c9408; /* ToRope: */ SOURCE(17560, 234) SOURCE(17636, 158) { word var_c50840; word var_c50872; var_c50840 = x_v9324; if ((var_c50840 == 0)) { goto lab_L100023; }; var_c50872 = XR_GetReferentType(var_c50840); { word tc111; if (((* (( (ptr) gf_c52248)+26) ) == var_c50872)) { tc111 = (word) ( (unsigned) (*(int*)var_c50840<0) == 0); } else { tc111 = (word) 0; }; if (tc111) { { word r_v13352; r_v13352 = var_c50840; SOURCE(17671, 10) return(r_v13352); }; }; if (((* (( (ptr) gf_c52248)+27) ) == var_c50872)) { { word r_v13396; r_v13396 = var_c50840; SOURCE(17698, 28) { word pd112; pd112 = (* (( (ptr) (* (( (ptr) gf_c52248)+171)/* var_c50936 */ ))+35) ); return((word) ( *( (fPt) ((* (ptr) pd112 ))))(r_v13396, 0, 32767, pd112)); }; }; }; if (((* (( (ptr) gf_c52248)+23) ) == var_c50872)) { { word a_v13452; a_v13452 = var_c50840; SOURCE(17739, 25) { word pd113; pd113 = (* (( (ptr) (* (( (ptr) gf_c52248)+172)/* var_c51000 */ ))+9) ); return((word) ( *( (fPt) ((* (ptr) pd113 ))))(a_v13452, pd113)); }; }; }; lab_L100023: ; SOURCE(17777, 17) return(default_v9352); }; }; } static word ChoiceListCreateContents_P2280(parent_v18232, closureData_v18260, registerData_v18288, image_v18316, event_v18344) word parent_v18232; word closureData_v18260; word registerData_v18288; word image_v18316; word event_v18344; { register ptr gf_c52280 = (ptr) &globalframe; word var_c18388; word container_v13496; /* ChoiceListCreateContents: */ SOURCE(17927, 1830) SOURCE(17974, 56) { word pd114; pd114 = (* (( (ptr) (* (( (ptr) gf_c52280)+163)/* var_c49752 */ ))+28) ); container_v13496 = (word) ( *( (fPt) ((* (ptr) pd114 ))))((* (W9Pt) (( (ptr) gf_c52280)+151)/* var_c49432 */ ), 0, (word) -1, pd114) ; }; SOURCE(18032, 1675) { word var_c51032; var_c51032 = closureData_v18260; if ((var_c51032 == 0)) { goto lab_L100024; }; if (((* (( (ptr) gf_c52280)+22) ) == XR_GetReferentType(var_c51032))) { { word cld_v13540; cld_v13540 = var_c51032; SOURCE(18090, 1617) { register word cl_v13596; cl_v13596 = (* (( (ptr) cld_v13540)+1) ); lab_L100028: ; if ((cl_v13596 != 0)) { } else { goto lab_L100025; }; { word child_v13640 = 0; word notify_v13668; word impl_v13696; word key_v13724; word text_v13752; SOURCE(18175, 46) notify_v13668 = (* (( (ptr) cl_v13596)+4) ); SOURCE(18223, 25) impl_v13696 = (* (( (ptr) cl_v13596)+2) ); SOURCE(18250, 23) key_v13724 = (* (( (ptr) cl_v13596)+1) ); SOURCE(18275, 45) text_v13752 = (word) ToRope_P2220((* (ptr) cl_v13596 ), 0); SOURCE(18322, 45) if ((notify_v13668 == 0)) { SOURCE(18341, 26) notify_v13668 = XR_CheckProc(* (ptr) cld_v13540 ); }; SOURCE(18369, 1259) if ((impl_v13696 == 0)) { SOURCE(18386, 221) { word help_v13820; SOURCE(18388, 44) help_v13820 = (word) ToRope_P2220((* (( (ptr) cl_v13596)+3) ), 0); SOURCE(18434, 36) if ((key_v13724 == 0)) { SOURCE(18450, 20) key_v13724 = (* (ptr) cl_v13596 ); }; SOURCE(18472, 133) { W19 var_c0326; (* (W9Pt) (word) &var_c0326 ) = (* (W9Pt) (( (ptr) gf_c52280)+151)/* var_c49432 */ ); (* (( (ptr) (word) &var_c0326) + 9) ) = text_v13752; (* (W4Pt) (( (ptr) (word) &var_c0326) + 10) ) = (* (W4Pt) (( (ptr) gf_c52280)+147)/* var_c49368 */ ); (* (( (ptr) (word) &var_c0326) + 14) ) = notify_v13668; (* (( (ptr) (word) &var_c0326) + 15) ) = registerData_v18288; (* (( (ptr) (word) &var_c0326) + 16) ) = key_v13724; (* (( (ptr) (word) &var_c0326) + 17) ) = (* (( (ptr) cld_v13540)+2) ); (* (( (ptr) (word) &var_c0326) + 18) ) = help_v13820; { /*1*/ word pd115; /*1*/ pd115 = (* (( (ptr) (* (( (ptr) gf_c52280)+163)/* var_c49752 */ ))+36) ); /*1*/ child_v13640 = (word) ( *( (fPt) ((* (ptr) pd115 ))))((word) (&var_c0326), pd115); /*1*/ }; }; }; } else { SOURCE(18614, 1014) { word var_c51064; word var_c51096; var_c51064 = impl_v13696; if ((var_c51064 == 0)) { goto lab_L100029; }; var_c51096 = XR_GetReferentType(var_c51064); if (((* (( (ptr) gf_c52280)+29) ) == var_c51096)) { { /*1*/ word cl2_v13864; /*1*/ cl2_v13864 = var_c51064; SOURCE(18655, 419) /*1*/ { /*1*/ word closure_v13908; SOURCE(18657, 122) /*1*/ closure_v13908 = (word) WidgetCreateClosureFromChoiceList_P2340(cl2_v13864, notify_v13668, (* (( (ptr) cld_v13540)+2) )); SOURCE(18781, 33) /*1*/ if ((text_v13752 == 0)) { SOURCE(18798, 16) /*1*/ text_v13752 = (* (( (ptr) gf_c52280)+30) ); /*1*/ }; SOURCE(18816, 109) /*1*/ child_v13640 = (word) CreatePopUpButton_P1920(text_v13752, closure_v13908, registerData_v18288, (* (ptr) cl_v13596 ), 0) /*1*/ ; SOURCE(18927, 145) /*1*/ if ((key_v13724 != 0)) { SOURCE(18944, 128) /*1*/ (void) RegisterBaseSelection_P2160(child_v13640, (* (ptr) cld_v13540 ), registerData_v18288, key_v13724, (* (( (ptr) cld_v13540)+2) /*1*/ )); /*1*/ }; /*1*/ }; /*1*/ }; } else { if (((* (( (ptr) gf_c52280)+24) ) == var_c51096)) { /*1*/ { /*1*/ word wcc_v13952; /*1*/ wcc_v13952 = var_c51064; SOURCE(19107, 521) /*1*/ if (((* (ptr) wcc_v13952 ) == (word) (( (bPt) gf_c52280)+164)/* var_c47832 */ )) { SOURCE(19154, 33) /*1*/ if ((text_v13752 == 0)) { SOURCE(19171, 16) /*1*/ text_v13752 = (* (( (ptr) gf_c52280)+30) ); /*1*/ }; SOURCE(19189, 105) /*1*/ child_v13640 = (word) CreatePopUpButton_P1920(text_v13752, wcc_v13952, registerData_v18288, (* (ptr) cl_v13596 ), 0); /*1*/ } /*1*/ else { SOURCE(19305, 36) /*1*/ if ((key_v13724 == 0)) { SOURCE(19321, 20) /*1*/ key_v13724 = (* (ptr) cl_v13596 ); /*1*/ }; SOURCE(19343, 110) /*1*/ { /*1*/ word pd116; /*1*/ pd116 = (* (ptr) wcc_v13952 ); /*1*/ child_v13640 = (word) ( *( (fPt) ((* (ptr) pd116 ))))(container_v13496, (* (( (ptr) wcc_v13952)+1) ), registerData_v18288, image_v18316, 0, pd116) /*1*/ ; /*1*/ }; SOURCE(19455, 173) /*1*/ if ((child_v13640 != 0)) { SOURCE(19474, 154) /*1*/ { /*1*/ word var_c51128; /*1*/ { /*1*/ word var_c51160; /*1*/ var_c51160 = XR_NewObject(20, (* (( (ptr) gf_c52280)+18) )); /*1*/ (* (ptr) var_c51160 ) = child_v13640; /*1*/ (* (( (ptr) var_c51160)+1) ) = (* (( (ptr) cld_v13540)+2) ); /*1*/ (* (( (ptr) var_c51160)+2) ) = XR_CheckProc(notify_v13668); /*1*/ (* (( (ptr) var_c51160)+3) ) = registerData_v18288; /*1*/ (* (( (ptr) var_c51160)+4) ) = key_v13724; /*1*/ var_c51128 = var_c51160; /*1*/ }; /*1*/ { /*1*/ word pd117; /*1*/ pd117 = (* (( (ptr) (* (( (ptr) gf_c52280)+162)/* var_c49624 */ ))+11) ); /*1*/ (void) ( *( (fPt) ((* (ptr) pd117 ))))(child_v13640, (* (( (ptr) gf_c52280)+10)/* myChoiceKey_v3252 */ ), var_c51128, pd117) /*1*/ ; /*1*/ }; /*1*/ }; /*1*/ }; /*1*/ }; /*1*/ }; /*1*/ } else { /*1*/ lab_L100029: ; /*1*/ }; }; }; }; SOURCE(19649, 58) if ((child_v13640 != 0)) { SOURCE(19667, 40) { word pd118; pd118 = (* (( (ptr) (* (( (ptr) gf_c52280)+163)/* var_c49752 */ ))+31) ); (void) ( *( (fPt) ((* (ptr) pd118 ))))(container_v13496, child_v13640, 1, pd118); }; }; }; cl_v13596 = (* (( (ptr) cl_v13596)+5) ); goto lab_L100028; lab_L100025: ; }; }; } else { lab_L100024: ; SOURCE(19732, 5) (void) XR_RaiseUnnamedError(); }; }; SOURCE(19739, 18) return(container_v13496); } static word WidgetCreateClosureFromChoiceList_P2340(list_v9608, defaultNotify_v9636, notifyTQ_v9664) word list_v9608; word defaultNotify_v9636; word notifyTQ_v9664; { register ptr gf_c52312 = (ptr) &globalframe; word closure_v9708; word cld_v13996; /* WidgetCreateClosureFromChoiceList: */ SOURCE(19763, 351) SOURCE(19763, 351) closure_v9708 = 0; SOURCE(19933, 108) cld_v13996 = XR_NewObject(16, (* (( (ptr) gf_c52312)+22) )); (* (ptr) cld_v13996 ) = XR_CheckProc(defaultNotify_v9636); (* (( (ptr) cld_v13996)+1) ) = list_v9608; (* (( (ptr) cld_v13996)+2) ) = notifyTQ_v9664; SOURCE(20043, 71) { word var_c51224; var_c51224 = XR_NewObject(8, (* (( (ptr) gf_c52312)+24) )); (* (ptr) var_c51224 ) = (word) (( (bPt) gf_c52312)+164)/* var_c47832 */ ; (* (( (ptr) var_c51224)+1) ) = cld_v13996; closure_v9708 = var_c51224; }; SOURCE(19763, 351) return(closure_v9708); } static void Select_P2400(choice_v9768, event_v9796) word choice_v9768; word event_v9796; { register ptr gf_c52344 = (ptr) &globalframe; word root_v14052; /* Select: */ SOURCE(20120, 147) SOURCE(20183, 41) { word pd119; pd119 = (* (( (ptr) (* (( (ptr) gf_c52344)+162)/* var_c49624 */ ))+33) ); root_v14052 = (word) ( *( (fPt) ((* (ptr) pd119 ))))(choice_v9768, pd119); }; SOURCE(20226, 14) (void) TearDown_P300(root_v14052); SOURCE(20242, 25) (void) SelectOnly_P2460(choice_v9768, event_v9796); } static void SelectOnly_P2460(choice_v9856, event_v9884) word choice_v9856; word event_v9884; { register ptr gf_c52376 = (ptr) &globalframe; /* SelectOnly: */ SOURCE(20272, 160) SOURCE(20332, 100) { word var_c51256; { word pd120; pd120 = (* (( (ptr) (* (( (ptr) gf_c52376)+162)/* var_c49624 */ ))+10) ); var_c51256 = (word) ( *( (fPt) ((* (ptr) pd120 ))))(choice_v9856, (* (( (ptr) gf_c52376)+10)/* myChoiceKey_v3252 */ ), pd120) ; }; if ((var_c51256 == 0)) { goto lab_L100030; }; if (((* (( (ptr) gf_c52376)+18) ) == XR_GetReferentType(var_c51256))) { { word nc_v14096; nc_v14096 = var_c51256; SOURCE(20413, 19) (void) DoNotify_P720(nc_v14096, event_v9884); }; } else { lab_L100030: ; }; }; } static void NullNotify_P2520(widget_v18448, registerData_v18476, callData_v18504, event_v18532) word widget_v18448; word registerData_v18476; word callData_v18504; word event_v18532; { /* NullNotify: */ } static word NoName_Q5100(formal_c0124) word formal_c0124; { W3 var_c0126; word var_c0125; /* intermediary proc for a FORK, nArgs: 3, nRets: 0 */ var_c0126 = (* (W3Pt) (( (ptr) formal_c0124)+4) ); var_c0125 = (* (( (ptr) formal_c0124)+2) ); formal_c0124 = XR_ExtensionFree(formal_c0124); (void) ( *( (fPt) ((* (ptr) var_c0125 ))))(var_c0126.f0, var_c0126.f1, var_c0126.f2, var_c0125); return(0); } /* file: XTkPopUpsImpl, module: XTkPopUpsImpl, compiled at: February 23, 1993 11:26:20 pm PST */ extern void XR_install_XTkPopUpsImpl() { NoName_Q5040(); } extern void XR_run_XTkPopUpsImpl() { XR_Start(&globalframe); }