/* Generated with C2C (Cedar To C)*/ /* Copyright (C) 1993 by Xerox Corporation. All rights reserved. */ /* time: July 11, 1993 8:03:22 pm PDT */ /* C2C version: April 20, 1993 (sun4) */ /* ref-counting: off */ /* file: GGHistoryImpl, module: GGHistoryImpl */ /* switches: bcfhklnouw */ #include #include static char versionStamp[] = "@(#)mob_version [2894736571,2162247208] GGHistoryImpl"; 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; word r;} W9; typedef struct {word f0, f1, f2, f3, f4, f5;} W6; typedef struct {word f0, f1, f2, f3, f4;} W5; typedef struct {word f0, f1, f2;} W3; typedef struct {word f0, f1, f2, f3, f4, f5, f6;} W7; typedef struct {W8 f; W8 r;} W16; typedef struct {W8 f; W5 r;} W13; typedef struct {W16 f; W13 r;} W29; typedef struct {word f0, f1, f2, f3;} W4; typedef struct {W8 f; W4 r;} W12; typedef struct {W16 f; W12 r;} W28; typedef struct {W8 f; W2 r;} W10; typedef struct {W16 f; W10 r;} W26; typedef W26 *W26Pt; typedef W28 *W28Pt; typedef struct {W8 f; W6 r;} W14; typedef struct {W16 f; W14 r;} W30; typedef struct {W8 f; W3 r;} W11; typedef struct {W16 f; W11 r;} W27; typedef W27 *W27Pt; typedef struct {W16 f; W16 r;} W32; typedef struct {W32 f; W4 r;} W36; #define SOURCE(p, l) /* source p, l */ #define SGNCK(i) ((int) (word) (i) < 0 ? XR_RaiseArithmeticFault(): i ) #define IOP2(op, x, y) ( (word) ((x) op (y)) ) static void NoName_Q4608(); static void GGHistoryImpl_P0(); static word NewCurrent_P60(); static void PushCurrent_P120(); static word SetSliceIndex_P2904(); static word MarkSlices_P3012(); static word TopHistory_P3120(); static void KillAdvanceCapture_P180(); static word NoName_Q4668(); static void KillAdvanceCaptureInternal_P240(); static word DiscardAction_P300(); static void DoAdvanceCapture_P360(); static word NoName_Q4728(); static word CaptureAction_P420(); static void NewCapture_P480(); static word NoName_Q4788(); static void Capture_P540(); static void Uncapture_P600(); static word Create_P660(); static void SetCurrent_P720(); static void GetCurrent_P780(); static void DescendASlice_P840(); static void WalkSlicesInEvent_P900(); static void SetHistory_P960(); static word GetHistory_P1020(); static void Push_P1080(); static void Note_P1140(); static void Undo_P1200(); static void ResetHistory_P1260(); static word NoName_Q4848(); static void ResetEvent_P1320(); static word AddSliceToUnlink_P4044(); static void UnlinkListedSlices_P1380(); static void Reset_P1440(); static word Empty_P1500(); static void UndoN_P1560(); static word Reselect_P4296(); static void CapTool_P1620(); static word BuildTool_P1680(); static void EventNumberButton_P1740(); static void HistorySizeButton_P1800(); static void SynchShow_P1860(); static void DoShow_P1920(); static word NoName_Q4908(); static void SynchUndo_P1980(); static void DoUndo_P2040(); static word NoName_Q4968(); static void SynchGetSize_P2100(); static void DoGetSize_P2160(); static void SynchSetSize_P2220(); static void DoSetSize_P2280(); static word NoName_Q5028(); static void ClearTool_P2340(); static word BuildButton_P2400(); static void DataFieldButton_P2460(); static void BuildDataFieldPair_P2520(); static word GetInt_P2580(); static word NoName_Q5088(); static void SetInt_P2640(); static void HRule_P2700(); static void NoName_Q5148(); static void NoName_Q5208(); static void NoName_Q5268(); static void NoName_Q5328(); static void NoName_Q5388(); static void NoName_Q5448(); static void NoName_Q5508(); static void NoName_Q5568(); static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\122\207\370\054\300\315\202\135\375\100\200\000\000"}; static struct {unsigned f; char r[12];} string2 = {589833, "\007\000\040\003\004\036\004\016\014\000\000"}; static struct {unsigned f; char r[16];} string3 = {851984, "\257\300\252\050\175\356\300\250\337\044\120\100\164\000\000"}; static struct {unsigned f; char r[4];} string4 = {131074, "\004\017\000"}; static struct {unsigned f; char r[16];} string5 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"}; static struct {unsigned f; char r[4];} string6 = {65537, "\001\000\000"}; static struct {unsigned f; char r[20];} string7 = {1179668, "\260\006\005\146\151\162\163\164\217\005\004\162\145\163\164\214\217\261\000"}; static struct {unsigned f; char r[4];} string8 = {131074, "\004\003\000"}; static struct {unsigned f; char r[16];} string9 = {851984, "\257\300\252\050\175\356\300\250\337\044\120\100\200\000\000"}; static struct {unsigned f; char r[4];} string10 = {131074, "\003\007\000"}; static struct {unsigned f; char r[4];} string11 = {131076, "\216\251\000"}; static struct {unsigned f; char r[16];} string12 = {851984, "\257\300\252\043\023\037\300\070\056\113\065\100\164\000\000"}; static struct {unsigned f; char r[4];} string13 = {131074, "\004\005\000"}; static struct {unsigned f; char r[16];} string14 = {851984, "\257\300\223\145\303\043\300\372\023\025\003\100\200\000\000"}; static struct {unsigned f; char r[68];} string15 = {4325442, "\006\031\000\001\004\001\010\001\014\001\024\001\030\001\034\001\044\001\050\001\054\001\060\001\064\001\070\001\074\001\100\100\001\100\104\001\100\110\001\100\164\001\100\170\001\100\224\004\017\100\244\004\100\171\100\300\001\100\304\001\100\310\001\100\320\001\000"}; static struct {unsigned f; char r[48];} string16 = {2883632, "\260\006\005\146\151\162\163\164\216\257\300\252\043\023\037\300\070\056\113\065\100\214\005\004\162\145\163\164\214\216\257\300\252\043\023\037\300\070\056\113\065\100\214\261\000\000\000"}; static struct {unsigned f; char r[16];} string17 = {851984, "\257\300\247\365\203\234\300\047\265\225\046\100\324\000\000"}; static struct {unsigned f; char r[32];} string18 = {1966110, "\006\015\000\001\004\001\010\001\034\001\040\001\044\001\050\001\054\001\060\001\064\001\074\001\100\110\001\100\130\001\000"}; static struct {unsigned f; char r[48];} string19 = {2883632, "\260\006\005\146\151\162\163\164\216\257\300\252\043\023\037\300\070\056\113\065\100\164\005\004\162\145\163\164\214\216\257\300\252\043\023\037\300\070\056\113\065\100\164\261\000\000\000"}; static struct {unsigned f; char r[16];} string20 = {851984, "\257\300\252\043\023\037\300\070\056\113\065\100\214\000\000"}; static struct {unsigned f; char r[4];} string21 = {131074, "\003\001\000"}; static struct {unsigned f; char r[44];} string22 = {2752556, "\260\006\005\146\151\162\163\164\257\300\015\277\004\146\300\034\367\146\045\112\114\005\004\162\145\163\164\214\257\300\015\277\004\146\300\034\367\146\045\112\114\261\000"}; static struct {unsigned f; char r[28];} string23 = {1572888, "\006\002\000\007\000\040\016\000\003\001\000\000\000\000\014\014\000\014\014\014\014\000\010\001\000\000\000"}; static struct {unsigned f; char r[48];} string24 = {2883632, "Undo %g event%g. Actually undid %g event%g.\000\000\000"}; static struct {unsigned f; char r[20];} string25 = {1114132, "UndoN Placeholder\000\000"}; static struct {unsigned f; char r[8];} string26 = {458760, "advance"}; static struct {unsigned f; char r[16];} string27 = {917520, "Set scale unit\000"}; static struct {unsigned f; char r[8];} string28 = {262152, "Undo\000\000\000"}; static struct {unsigned f; char r[8];} string29 = {458760, "Motion:"}; static struct {unsigned f; char r[12];} string30 = {524300, "Feedback\000\000\000"}; static struct {unsigned f; char r[12];} string31 = {589836, "Transform\000\000"}; static struct {unsigned f; char r[20];} string32 = {1048596, "PaintEntireScene\000\000\000"}; static struct {unsigned f; char r[12];} string33 = {589836, "Complaint\000\000"}; static struct {unsigned f; char r[40];} string34 = {2490408, "No entries on the history list to Undo\000"}; static struct {unsigned f; char r[16];} string35 = {917520, "GGHistory for \000"}; static struct {unsigned f; char r[40];} string36 = {2359336, "GGHistory tool for %g already exists\000\000\000"}; static struct {unsigned f; char r[4];} string37 = {65540, "s\000\000"}; static struct {unsigned f; char r[16];} string38 = {983056, "%g %g object%g"}; static struct {unsigned f; char r[8];} string39 = {262152, "Show\000\000\000"}; static struct {unsigned f; char r[32];} string40 = {1900576, "since Gargoyle event number: \000\000"}; static struct {unsigned f; char r[4];} string41 = {196612, "Get"}; static struct {unsigned f; char r[4];} string42 = {196612, "Set"}; static struct {unsigned f; char r[16];} string43 = {917520, "history size: \000"}; static struct {unsigned f; char r[8];} string44 = {262152, "Text\000\000\000"}; static struct {unsigned f; char r[16];} string45 = {851984, "%g no object\000\000"}; static struct {unsigned f; char r[12];} string46 = {720908, "HistoryShow"}; static struct {unsigned f; char r[8];} string47 = {393224, "%g\011%g\012\000"}; static struct {unsigned f; char r[12];} string48 = {720908, "HistoryUndo"}; static struct {unsigned f; char r[92];} string49 = {5963868, "Please fill in the \042since Gargoyle event number\042 field with a positive integer event number"}; static struct {unsigned f; char r[16];} string50 = {917520, "HistoryGetSize\000"}; static struct {unsigned f; char r[16];} string51 = {917520, "HistorySetSize\000"}; static struct {unsigned f; char r[72];} string52 = {4456520, "Please fill in the \042history size\042 field with a positive integer size\000\000\000"}; static struct {unsigned f; char r[16];} string53 = {851984, "\257\300\254\212\054\273\300\200\341\106\050\100\164\000\000"}; static struct {unsigned f; char r[16];} string54 = {851981, "\006\003\060\001\070\001\100\220\010\000\004\035\001\000\000"}; static struct {unsigned f; char r[16];} string55 = {851984, "\257\300\301\241\007\150\300\032\111\265\237\100\150\000\000"}; static struct {unsigned f; char r[16];} string56 = {851984, "\257\300\212\210\334\132\300\036\362\033\164\100\150\000\000"}; static struct {unsigned f; char r[16];} string57 = {851984, "\257\300\176\323\376\273\300\203\041\251\010\100\150\000\000"}; static struct {unsigned f; char r[16];} string58 = {851984, "\257\300\322\334\347\304\300\124\107\000\027\100\150\000\000"}; static struct {unsigned f; char r[16];} string59 = {851984, "\257\300\223\031\346\162\300\275\253\133\335\100\150\000\000"}; static struct {unsigned f; char r[16];} string60 = {851984, "\257\300\003\033\274\104\300\263\246\312\006\100\150\000\000"}; static struct {unsigned f; char r[8];} string61 = {1195853929, "story"}; static struct {unsigned f; char r[16];} string62 = {851984, "\257\300\252\050\175\356\300\250\337\044\120\100\150\000\000"}; static struct {unsigned f; char r[16];} string63 = {851984, "\257\300\347\101\365\007\300\150\102\366\020\100\150\000\000"}; static struct {unsigned f; char r[16];} string64 = {851984, "\257\300\011\245\206\305\300\112\326\356\245\100\150\000\000"}; static struct {unsigned f; char r[16];} string65 = {851984, "\257\300U$)\337\300Xo9\243@t\000\000"}; static struct {unsigned f; char r[16];} string66 = {851984, "\257\300\336\025\013\356\300\216\115\352\271\100\150\000\000"}; static struct {unsigned f; char r[16];} string67 = {851984, "\257\300\206\055\004\241\300\261\334\001\116\100\150\000\000"}; static struct {unsigned f; char r[16];} string68 = {851984, "\257\300\370\132\042\205\300\045\133\011\125\100\150\000\000"}; static struct {unsigned f; char r[16];} string69 = {851984, "\257\300\356\024\243\250\300\175\157\203\227\100\150\000\000"}; static struct {unsigned f; char r[16];} string70 = {851984, "\257\300\015\277\004\146\300\034\367\146\045\100\164\000\000"}; static struct {unsigned f; char r[16];} string71 = {851984, "\257\300\234\045\277\356\300\323\171\341\105\100\150\000\000"}; static struct {unsigned f; char r[16];} string72 = {851984, "\257\300\240\236\274\315\300\111\163\325\023\100\150\000\000"}; static struct {unsigned f; char r[16];} string73 = {851984, "\257\300\242\221\264\046\300\105\142\142\023\100\150\000\000"}; static struct {unsigned f; char r[16];} string74 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\100\150\000\000"}; static struct {unsigned f; char r[16];} string75 = {851984, "\257\300\117\004\011\134\300\015\100\060\362\100\150\000\000"}; static struct {unsigned f; char r[16];} string76 = {851984, "\257\300\360\202\255\211\300\267\057\343\102\100\150\000\000"}; static struct {unsigned f; char r[16];} string77 = {851984, "\257\300\351\360\047\051\300\272\273\201\332\100\150\000\000"}; static struct {unsigned f; char r[16];} string78 = {851984, "\257\300\354\332\367\333\300\361\203\205\173\100\150\000\000"}; static struct {unsigned f; char r[16];} string79 = {851984, "\257\300\177\015\147\234\300\177\160\240\356\100\150\000\000"}; static struct {unsigned f; char r[16];} string80 = {851984, "\257\300\045\005\337\143\300\252\356\334\244\100\150\000\000"}; static struct {unsigned f; char r[16];} string81 = {851984, "\257\300\252\043\023\037\300\070\056\113\065\100\150\000\000"}; static struct {unsigned f; char r[20];} string82 = {1245204, "\211\007\006Change\300\252#\023\037\3008.K5"}; static struct {unsigned f; char r[28];} string83 = {1769500, "\211\017\016HistoryToolObj\300\252#\023\037\3008.K5"}; static struct { word f0[9]; word f9; word f10; word f11; word f12; word f13; word f14[54]; word f68; word f69; word f70; word f71; word f72; word f73; word f74; word f75; word f76; word f77; word f78; word f79; word f80; word f81; word f82; word f83; word f84; word f85; word f86; word f87; word f88; word f89; word f90; word f91; word f92; word f93; word f94; word f95; word f96; word f97; word f98; word f99; word f100; word f101; word f102; word f103; word f104; word f105; word f106; word f107; word f108; word f109; word f110; word f111; word f112; word f113; word f114; word f115; word f116; word f117; word f118; word f119; word f120; word f121; word f122; word f123; word f124; word f125; word f126; word f127; word f128; word f129; word f130; word f131; word f132; word f133; word f134; word f135; word f136; word f137; word f138; word f139; word f140; word f141; word f142; word f143; word f144; word f145; word f146; word f147; word f148; word f149; word f150; word f151; word f152; word f153; word f154; word f155; word f156; word f157; word f158; word f159[28]; } globalframe = { {0}, (word) 1, (word) 1, (word) 1, 0, (word) 2, {0}, (word) HRule_P2700, 0, (word) SetInt_P2640, 0, (word) GetInt_P2580, 0, (word) BuildDataFieldPair_P2520, 0, (word) DataFieldButton_P2460, 0, (word) BuildButton_P2400, 0, (word) ClearTool_P2340, 0, (word) DoSetSize_P2280, 0, (word) SynchSetSize_P2220, 0, (word) DoGetSize_P2160, 0, (word) SynchGetSize_P2100, 0, (word) DoUndo_P2040, 0, (word) SynchUndo_P1980, 0, (word) DoShow_P1920, 0, (word) SynchShow_P1860, 0, (word) HistorySizeButton_P1800, 0, (word) EventNumberButton_P1740, 0, (word) BuildTool_P1680, 0, (word) CapTool_P1620, 0, (word) UndoN_P1560, 0, (word) Empty_P1500, 0, (word) Reset_P1440, 0, (word) UnlinkListedSlices_P1380, 0, (word) ResetEvent_P1320, 0, (word) ResetHistory_P1260, 0, (word) Undo_P1200, 0, (word) Note_P1140, 0, (word) Push_P1080, 0, (word) GetHistory_P1020, 0, (word) SetHistory_P960, 0, (word) WalkSlicesInEvent_P900, 0, (word) DescendASlice_P840, 0, (word) GetCurrent_P780, 0, (word) SetCurrent_P720, 0, (word) Create_P660, 0, (word) Uncapture_P600, 0, (word) Capture_P540, 0, (word) NewCapture_P480, 0, (word) CaptureAction_P420, 0, (word) DoAdvanceCapture_P360, 0, (word) DiscardAction_P300, 0, (word) KillAdvanceCaptureInternal_P240, 0, (word) KillAdvanceCapture_P180, 0, (word) PushCurrent_P120, 0, (word) NewCurrent_P60, 0, (word) GGHistoryImpl_P0, {0} }; static void NoName_Q4608() { register ptr gf_c0465 = (ptr) &globalframe; word var_c52720; (* (( (ptr) gf_c0465)+15) ) = (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2); (* (( (ptr) gf_c0465)+16) ) = (word) XR_GetTypeIndex((word) &string3, 0, (word) &string4); (* (( (ptr) gf_c0465)+19) ) = (word) XR_GetTypeIndex((word) &string5, 0, (word) &string6); (* (( (ptr) gf_c0465)+20) ) = (word) XR_GetTypeIndex((word) &string7, 0, (word) &string8); (* (( (ptr) gf_c0465)+22) ) = (word) XR_GetTypeIndex((word) &string9, 0, (word) &string10); (* (( (ptr) gf_c0465)+24) ) = (word) XR_GetTypeIndex((word) &string11, 0, (word) &string6); (* (( (ptr) gf_c0465)+28) ) = (word) XR_GetTypeIndex((word) &string12, 0, (word) &string13); (* (( (ptr) gf_c0465)+29) ) = (word) XR_GetTypeIndex((word) &string14, 0, (word) &string15); (* (( (ptr) gf_c0465)+31) ) = (word) XR_GetTypeIndex((word) &string16, 0, (word) &string8); (* (( (ptr) gf_c0465)+32) ) = (word) XR_GetTypeIndex((word) &string17, 0, (word) &string18); (* (( (ptr) gf_c0465)+33) ) = (word) XR_GetTypeIndex((word) &string19, 0, (word) &string8); (* (( (ptr) gf_c0465)+34) ) = (word) XR_GetTypeIndex((word) &string20, 0, (word) &string21); (* (( (ptr) gf_c0465)+35) ) = (word) XR_GetTypeIndex((word) &string22, 0, (word) &string23); (* (ptr) (( (bPt) gf_c0465)+144) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+19) ), (word) &string24); (* (ptr) (( (bPt) gf_c0465)+148) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+19) ), (word) &string25); (* (ptr) (( (bPt) gf_c0465)+152) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+19) ), (word) &string26); (* (ptr) (( (bPt) gf_c0465)+156) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+19) ), (word) &string27); (* (ptr) (( (bPt) gf_c0465)+160) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+19) ), (word) &string28); (* (ptr) (( (bPt) gf_c0465)+164) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+19) ), (word) &string29); (* (ptr) (( (bPt) gf_c0465)+168) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+24) ), (word) &string30); (* (ptr) (( (bPt) gf_c0465)+172) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+19) ), (word) &string31); (* (ptr) (( (bPt) gf_c0465)+176) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+24) ), (word) &string32); (* (ptr) (( (bPt) gf_c0465)+180) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+24) ), (word) &string33); (* (ptr) (( (bPt) gf_c0465)+184) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+19) ), (word) &string34); (* (ptr) (( (bPt) gf_c0465)+188) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+19) ), (word) &string35); (* (ptr) (( (bPt) gf_c0465)+192) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+19) ), (word) &string36); (* (ptr) (( (bPt) gf_c0465)+196) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+19) ), (word) &string37); (* (ptr) (( (bPt) gf_c0465)+200) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+19) ), (word) &string38); (* (ptr) (( (bPt) gf_c0465)+204) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+19) ), (word) &string39); (* (ptr) (( (bPt) gf_c0465)+208) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+19) ), (word) &string40); (* (ptr) (( (bPt) gf_c0465)+212) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+19) ), (word) &string41); (* (ptr) (( (bPt) gf_c0465)+216) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+19) ), (word) &string42); (* (ptr) (( (bPt) gf_c0465)+220) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+19) ), (word) &string43); (* (ptr) (( (bPt) gf_c0465)+224) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+24) ), (word) &string44); (* (ptr) (( (bPt) gf_c0465)+228) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+19) ), (word) &string45); (* (ptr) (( (bPt) gf_c0465)+232) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+24) ), (word) &string46); (* (ptr) (( (bPt) gf_c0465)+236) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+19) ), (word) &string47); (* (ptr) (( (bPt) gf_c0465)+240) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+24) ), (word) &string48); (* (ptr) (( (bPt) gf_c0465)+244) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+19) ), (word) &string49); (* (ptr) (( (bPt) gf_c0465)+248) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+24) ), (word) &string50); (* (ptr) (( (bPt) gf_c0465)+252) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+24) ), (word) &string51); (* (ptr) (( (bPt) gf_c0465)+256) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0465)+19) ), (word) &string52); (void) XR_DeclareGlobalFrame((word) "GGHistoryImpl", &globalframe, (word) XR_GetTypeIndex((word) &string53, 0, (word) &string54) , (word) (( (bPt) gf_c0465)+632)/* var_c48944 */ ); var_c52720 = (word) XR_ImportInterface((word) "GGParent", (word) XR_GetTypeIndexS((word) (&string55)), 83); (* (( (ptr) gf_c0465)+168)/* var_c50544 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 68175108); var_c52720 = (word) XR_ImportInterface((word) "CedarProcess", (word) XR_GetTypeIndexS((word) (&string56)), 10); (* (( (ptr) gf_c0465)+166)/* var_c49744 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 262145); (void) XR_ImportProcS(var_c52720, 68420355); (void) XR_ImportProcS(var_c52720, 134743298); (void) XR_ImportProcS(var_c52720, 263681); (void) XR_ImportProcS(var_c52720, 67372033); var_c52720 = (word) XR_ImportInterface((word) "Containers", (word) XR_GetTypeIndexS((word) (&string57)), 5); (* (( (ptr) gf_c0465)+178)/* var_c51728 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 524802); (void) XR_ImportProcS(var_c52720, 524546); (void) XR_ImportProcS(var_c52720, 74711042); var_c52720 = (word) XR_ImportInterface((word) "Feedback", (word) XR_GetTypeIndexS((word) (&string58)), 25); (* (( (ptr) gf_c0465)+175)/* var_c51472 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 1575429); (void) XR_ImportProcS(var_c52720, 1050628); var_c52720 = (word) XR_ImportInterface((word) "GGCaret", (word) XR_GetTypeIndexS((word) (&string59)), 13); (* (( (ptr) gf_c0465)+172)/* var_c51344 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 264449); (void) XR_ImportProcS(var_c52720, 525570); var_c52720 = (word) XR_ImportInterface((word) "GGEvent", (word) XR_GetTypeIndexS((word) (&string60)), 38); (* (( (ptr) gf_c0465)+179)/* var_c52048 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 531458); var_c52720 = (word) XR_ImportInterface((word) &string61, (word) XR_GetTypeIndexS((word) (&string62)), 20); (* (( (ptr) gf_c0465)+170)/* var_c50992 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 526338); (void) XR_ImportProcS(var_c52720, 262657); (void) XR_ImportProcS(var_c52720, 134480129); (void) XR_ImportProcS(var_c52720, 526082); (void) XR_ImportProcS(var_c52720, 67633154); (void) XR_ImportProcS(var_c52720, 67374081); (void) XR_ImportProcS(var_c52720, 267009); var_c52720 = (word) XR_ImportInterface((word) "GGScene", (word) XR_GetTypeIndexS((word) (&string63)), 50); (* (( (ptr) gf_c0465)+161)/* var_c49008 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 68164356); (void) XR_ImportProcS(var_c52720, 68165636); var_c52720 = (word) XR_ImportInterface((word) "GGSelect", (word) XR_GetTypeIndexS((word) (&string64)), 23); (* (( (ptr) gf_c0465)+174)/* var_c51408 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 525570); (void) XR_ImportProcS(var_c52720, 264705); var_c52720 = (word) XR_ImportInterface((word) "GGSlice", (word) XR_GetTypeIndexS((word) (&string65)), 128); (* (( (ptr) gf_c0465)+171)/* var_c51088 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 279297); var_c52720 = (word) XR_ImportInterface((word) "GGSliceOps", (word) XR_GetTypeIndexS((word) (&string66)), 73); (* (( (ptr) gf_c0465)+164)/* var_c49488 */ ) = var_c52720; var_c52720 = (word) XR_ImportInterface((word) "GGState", (word) XR_GetTypeIndexS((word) (&string67)), 119); (* (( (ptr) gf_c0465)+173)/* var_c51376 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 550146); (void) XR_ImportProcS(var_c52720, 549122); var_c52720 = (word) XR_ImportInterface((word) "GGUtility", (word) XR_GetTypeIndexS((word) (&string68)), 42); (* (( (ptr) gf_c0465)+165)/* var_c49616 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 135008515); (void) XR_ImportProcS(var_c52720, 793091); (void) XR_ImportProcS(var_c52720, 134748418); (void) XR_ImportProcS(var_c52720, 269057); (void) XR_ImportProcS(var_c52720, 134221824); var_c52720 = (word) XR_ImportInterface((word) "GGWindow", (word) XR_GetTypeIndexS((word) (&string69)), 12); (* (( (ptr) gf_c0465)+176)/* var_c51504 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 1572870); var_c52720 = (word) XR_ImportInterface((word) "IO", (word) XR_GetTypeIndexS((word) (&string70)), 103); (* (( (ptr) gf_c0465)+162)/* var_c49072 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 799490); (void) XR_ImportProcS(var_c52720, 67388417); (void) XR_ImportProcS(var_c52720, 67640578); (void) XR_ImportProcS(var_c52720, 67641090); (void) XR_ImportProcS(var_c52720, 2111493); (void) XR_ImportProcS(var_c52720, 67378689); (void) XR_ImportProcS(var_c52720, 67648770); (void) XR_ImportProcS(var_c52720, 68958724); (void) XR_ImportProcS(var_c52720, 67910402); var_c52720 = (word) XR_ImportInterface((word) "MBQueue", (word) XR_GetTypeIndexS((word) (&string71)), 8); (* (( (ptr) gf_c0465)+160)/* var_c48976 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 76546825); (void) XR_ImportProcS(var_c52720, 67371265); var_c52720 = (word) XR_ImportInterface((word) "Process", (word) XR_GetTypeIndexS((word) (&string72)), 22); (* (( (ptr) gf_c0465)+167)/* var_c49872 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 4864); var_c52720 = (word) XR_ImportInterface((word) "RefTab", (word) XR_GetTypeIndexS((word) (&string73)), 16); (* (( (ptr) gf_c0465)+169)/* var_c50640 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 134742786); var_c52720 = (word) XR_ImportInterface((word) "Rope", (word) XR_GetTypeIndexS((word) (&string74)), 43); (* (( (ptr) gf_c0465)+163)/* var_c49200 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 67633666); (void) XR_ImportProcS(var_c52720, 67898627); (void) XR_ImportProcS(var_c52720, 67896323); var_c52720 = (word) XR_ImportInterface((word) "Rules", (word) XR_GetTypeIndexS((word) (&string75)), 3); (* (( (ptr) gf_c0465)+184)/* var_c52688 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 74973187); var_c52720 = (word) XR_ImportInterface((word) "SlackProcess", (word) XR_GetTypeIndexS((word) (&string76)), 26); (* (( (ptr) gf_c0465)+180)/* var_c52080 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 1573638); var_c52720 = (word) XR_ImportInterface((word) "TEditOps", (word) XR_GetTypeIndexS((word) (&string77)), 12); (* (( (ptr) gf_c0465)+181)/* var_c52240 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 67372033); (void) XR_ImportProcS(var_c52720, 525570); var_c52720 = (word) XR_ImportInterface((word) "ViewerOps", (word) XR_GetTypeIndexS((word) (&string78)), 43); (* (( (ptr) gf_c0465)+177)/* var_c51536 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 532482); (void) XR_ImportProcS(var_c52720, 74973699); (void) XR_ImportProcS(var_c52720, 1049348); (void) XR_ImportProcS(var_c52720, 1051652); var_c52720 = (word) XR_ImportInterface((word) "ViewerSpecs", (word) XR_GetTypeIndexS((word) (&string79)), 24); (* (( (ptr) gf_c0465)+183)/* var_c52560 */ ) = var_c52720; var_c52720 = (word) XR_ImportInterface((word) "ViewerTools", (word) XR_GetTypeIndexS((word) (&string80)), 12); (* (( (ptr) gf_c0465)+182)/* var_c52496 */ ) = var_c52720; (void) XR_ImportProcS(var_c52720, 524802); (void) XR_ImportProcS(var_c52720, 788227); var_c52720 = (word) XR_ExportInterface((word) &string61, (word) XR_GetTypeIndexS((word) (&string62)), 20); (* (( (ptr) gf_c0465)+185)/* var_c52752 */ ) = var_c52720; (void) XR_ExportProcS(var_c52720, (word) (( (bPt) gf_c0465)+624)/* var_c48912 */ , 67633154, (word) "NewCurrent"); (void) XR_ExportProcS(var_c52720, (word) (( (bPt) gf_c0465)+528)/* var_c48528 */ , 134480129, (word) "GetCurrent"); (void) XR_ExportProcS(var_c52720, (word) (( (bPt) gf_c0465)+616)/* var_c48880 */ , 262657, (word) "PushCurrent"); (void) XR_ExportProcS(var_c52720, (word) (( (bPt) gf_c0465)+568)/* var_c48688 */ , 525058, (word) "NewCapture"); (void) XR_ExportProcS(var_c52720, (word) (( (bPt) gf_c0465)+608)/* var_c48848 */ , 263169, (word) "KillAdvanceCapture"); (void) XR_ExportProcS(var_c52720, (word) (( (bPt) gf_c0465)+584)/* var_c48752 */ , 263425, (word) "DoAdvanceCapture"); (void) XR_ExportProcS(var_c52720, (word) (( (bPt) gf_c0465)+480)/* var_c48336 */ , 787971, (word) "Note"); (void) XR_ExportProcS(var_c52720, (word) (( (bPt) gf_c0465)+472)/* var_c48304 */ , 526082, (word) "Undo"); (void) XR_ExportProcS(var_c52720, (word) (( (bPt) gf_c0465)+424)/* var_c48112 */ , 526338, (word) "UndoN"); (void) XR_ExportProcS(var_c52720, (word) (( (bPt) gf_c0465)+544)/* var_c48592 */ , 67373313, (word) "Create"); (void) XR_ExportProcS(var_c52720, (word) (( (bPt) gf_c0465)+536)/* var_c48560 */ , 526850, (word) "SetCurrent"); (void) XR_ExportProcS(var_c52720, (word) (( (bPt) gf_c0465)+504)/* var_c48432 */ , 527106, (word) "SetHistory"); (void) XR_ExportProcS(var_c52720, (word) (( (bPt) gf_c0465)+496)/* var_c48400 */ , 67374081, (word) "GetHistory"); (void) XR_ExportProcS(var_c52720, (word) (( (bPt) gf_c0465)+488)/* var_c48368 */ , 527618, (word) "Push"); (void) XR_ExportProcS(var_c52720, (word) (( (bPt) gf_c0465)+440)/* var_c48176 */ , 265729, (word) "Reset"); (void) XR_ExportProcS(var_c52720, (word) (( (bPt) gf_c0465)+464)/* var_c48272 */ , 265985, (word) "ResetHistory"); (void) XR_ExportProcS(var_c52720, (word) (( (bPt) gf_c0465)+432)/* var_c48144 */ , 67375105, (word) "Empty"); (void) XR_ExportProcS(var_c52720, (word) (( (bPt) gf_c0465)+408)/* var_c48048 */ , 67637506, (word) "BuildTool"); (void) XR_ExportProcS(var_c52720, (word) (( (bPt) gf_c0465)+416)/* var_c48080 */ , 528898, (word) "CapTool"); (void) XR_ExportProcS(var_c52720, (word) (( (bPt) gf_c0465)+320)/* var_c47696 */ , 267009, (word) "ClearTool"); var_c52720 = (word) XR_ExportInterface((word) "GGHistoryTypes", (word) XR_GetTypeIndexS((word) (&string81)), 2); (* (( (ptr) gf_c0465)+186)/* var_c52784 */ ) = var_c52720; (void) XR_ExportType((word) "Change", (word) XR_GetTypeIndexS((word) (&string82)), (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2) ); (void) XR_ExportType((word) "HistoryToolObj", (word) XR_GetTypeIndexS((word) (&string83)), (word) XR_GetTypeIndex((word) &string3, 0, (word) &string4) ); } static void GGHistoryImpl_P0(formal_c0101, formal_c0100) word formal_c0101; word formal_c0100; { register ptr gf_c52816 = (ptr) &globalframe; /* GGHistoryImpl: */ SOURCE(355, 22814) /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ SOURCE(23175, 39) { word pd84; pd84 = (* (( (ptr) (* (( (ptr) gf_c52816)+160)/* var_c48976 */ ))+5) ); (* (( (ptr) gf_c52816)+14)/* queue_v5884 */ ) = (word) ( *( (fPt) ((* (ptr) pd84 ))))(1, pd84); }; } static word NewCurrent_P60(name_v6008, ggData_v6036) word name_v6008; word ggData_v6036; { register ptr gf_c52848 = (ptr) &globalframe; word var_c6080; /* NewCurrent: */ SOURCE(1739, 1261) SOURCE(1739, 1261) var_c6080 = 0; SOURCE(1881, 1119) if ((0 != (* (( (ptr) gf_c52848)+8)/* noHistory_v4428 */ ))) { SOURCE(1899, 12) return(var_c6080); } else { SOURCE(1911, 1094) { word count_v10268; word nameAndCount_v10296; word var_c49232; word var_c49264; SOURCE(1913, 69) { word pd85; word idx86; pd85 = (* (( (ptr) (* (( (ptr) gf_c52848)+161)/* var_c49008 */ ))+36) ); count_v10268 = ( idx86 = (word) ( *( (fPt) ((* (ptr) pd85 ))))((* (( (ptr) ggData_v6036)+11) ), 0, 0, 0, pd85), SGNCK(idx86) ); }; SOURCE(1984, 186) if (( (int)count_v10268 == (int)0)) { { W2 var_c49040; var_c49040.f0 = 11; var_c49040.f1 = name_v6008; { word pd87; pd87 = (* (( (ptr) (* (( (ptr) gf_c52848)+162)/* var_c49072 */ ))+63) ); nameAndCount_v10296 = (word) ( *( (fPt) ((* (ptr) pd87 ))))((* (( (ptr) gf_c52848)+57) ), var_c49040, pd87); }; }; } else { { W2 var_c49104; W2 var_c49136; W2 var_c49168; var_c49104.f0 = 11; var_c49104.f1 = name_v6008; var_c49136.f0 = 5; var_c49136.f1 = count_v10268; var_c49168.f0 = 11; if (( (int)count_v10268 > (int)1)) { var_c49168.f1 = (* (( (ptr) gf_c52848)+49) ); } else { var_c49168.f1 = 0; }; { word pd88; pd88 = (* (( (ptr) (* (( (ptr) gf_c52848)+162)/* var_c49072 */ ))+62) ); nameAndCount_v10296 = (word) ( *( (fPt) ((* (ptr) pd88 ))))((* (( (ptr) gf_c52848)+50) ), var_c49104, var_c49136, var_c49168, pd88) ; }; }; }; SOURCE(2172, 828) if ((0 != (* (( (ptr) gf_c52848)+9)/* tempCapture_v4456 */ ))) { { word pd89; word pd92; word pd94; word pd95; pd89 = (* (( (ptr) (* (( (ptr) gf_c52848)+163)/* var_c49200 */ ))+8) ); if ((0 != (word) ( *( (fPt) ((* (ptr) pd89 ))))((* (( (ptr) gf_c52848)+43) ), name_v6008, 0, pd89))) { goto then090;}; { word pd91; pd91 = (* (( (ptr) (* (( (ptr) gf_c52848)+163)/* var_c49200 */ ))+17) ); var_c49232 = (word) ( *( (fPt) ((* (ptr) pd91 ))))(name_v6008, 0, 7, pd91); }; pd92 = (* (( (ptr) (* (( (ptr) gf_c52848)+163)/* var_c49200 */ ))+8) ); if ((0 != (word) ( *( (fPt) ((* (ptr) pd92 ))))((* (( (ptr) gf_c52848)+41) ), var_c49232, 0, pd92))) { goto then090;}; { word pd93; pd93 = (* (( (ptr) (* (( (ptr) gf_c52848)+163)/* var_c49200 */ ))+17) ); var_c49264 = (word) ( *( (fPt) ((* (ptr) pd93 ))))(name_v6008, 0, 4, pd93); }; pd94 = (* (( (ptr) (* (( (ptr) gf_c52848)+163)/* var_c49200 */ ))+8) ); if ((0 != (word) ( *( (fPt) ((* (ptr) pd94 ))))((* (( (ptr) gf_c52848)+40) ), var_c49264, 0, pd94))) { goto then090;}; pd95 = (* (( (ptr) (* (( (ptr) gf_c52848)+163)/* var_c49200 */ ))+8) ); if ((0 != (word) ( *( (fPt) ((* (ptr) pd95 ))))((* (( (ptr) gf_c52848)+39) ), name_v6008, 0, pd95))) { then090: ; SOURCE(2521, 26) (void) KillAdvanceCapture_P180(ggData_v6036); SOURCE(2620, 40) { word var_c49296; var_c49296 = (word) Create_P660(nameAndCount_v10296); (void) SetCurrent_P720(ggData_v6036, var_c49296); }; SOURCE(2662, 32) { word var_c0533; W2 var_c0114; (void) GetCurrent_P780((word) &var_c0114, ggData_v6036); var_c0533 = var_c0114.f0; return(var_c0533); }; } else { SOURCE(2712, 24) (void) NewCapture_P480(name_v6008, ggData_v6036); SOURCE(2802, 11) return(0); }; }; } else { SOURCE(2827, 26) (void) KillAdvanceCapture_P180(ggData_v6036); SOURCE(2926, 40) { word var_c49360; var_c49360 = (word) Create_P660(nameAndCount_v10296); (void) SetCurrent_P720(ggData_v6036, var_c49360); }; SOURCE(2968, 32) { word var_c0534; W2 var_c0116; (void) GetCurrent_P780((word) &var_c0116, ggData_v6036); var_c0534 = var_c0116.f0; return(var_c0534); }; }; }; }; } static void PushCurrent_P120(ggData_v6140) word ggData_v6140; { W9 var_c52880; register ptr gf_c52912 = (ptr) &globalframe; /* declaration of var_c49424 skipped */ /* declaration of var_c49456 skipped */ /* PushCurrent: */ SOURCE(3012, 1618) { word tmpAddr96; tmpAddr96 = (word) (( (ptr) &var_c52880)+4)/* var_c49424 */ ; (* (ptr) tmpAddr96 ) = ( ((word) (fPt) MarkSlices_P3012) ); (* (( (ptr) tmpAddr96) + 1) ) = 1; }; { word tmpAddr97; tmpAddr97 = (word) (( (ptr) &var_c52880)+6)/* var_c49456 */ ; (* (ptr) tmpAddr97 ) = ( ((word) (fPt) SetSliceIndex_P2904) ); (* (( (ptr) tmpAddr97) + 1) ) = 1; }; SOURCE(3100, 1530) if ((0 != (* (( (ptr) gf_c52912)+8)/* noHistory_v4428 */ ))) { SOURCE(3118, 12) return; } else { SOURCE(3130, 1530) { word event_v10340; W2 var_c0121; SOURCE(3132, 46) (void) GetCurrent_P780((word) &var_c0121, ggData_v6140); event_v10340 = var_c0121.f0; SOURCE(3180, 45) if ((0 != (* (ptr) (* (( (ptr) (* (( (ptr) gf_c52912)+164)/* var_c49488 */ ))+5) ) ))) { SOURCE(3209, 16) (void) (XR_RaiseSignal((word) (( (bPt) gf_c52912)+260), 0, 0)); }; SOURCE(3227, 1403) if ((event_v10340 != 0)) { SOURCE(3245, 1412) { word oldTail_v10412 = 0; word tail_v10440 = 0; /* declaration of newIndex_v10468 skipped */ SOURCE(3429, 45) (* (( (ptr) &var_c52880)+8)/* newIndex_v10468 */ ) = ((* (( (ptr) ggData_v6140)+43) ) + 1); SOURCE(3502, 39) (void) WalkSlicesInEvent_P900(event_v10340, (word) (( (bPt) &var_c52880)+24)/* var_c49456 */ ); SOURCE(3689, 22) (* (( (ptr) event_v10340)+1) ) = (* (( (ptr) &var_c52880)+8)/* newIndex_v10468 */ ); SOURCE(3713, 32) { word var_c49520; var_c49520 = (word) GetHistory_P1020(ggData_v6140); (void) Push_P1080(event_v10340, var_c49520); }; SOURCE(3747, 38) (* (( (ptr) ggData_v6140)+43) ) = (* (( (ptr) &var_c52880)+8)/* newIndex_v10468 */ ); SOURCE(3829, 25) tail_v10440 = (word) GetHistory_P1020(ggData_v6140); SOURCE(3885, 100) { register word noName_c49552 = 0; register word noName_c49584; noName_c49584 = (* (( (ptr) ggData_v6140)+42) ); if (( (int)noName_c49552 >= (int)noName_c49584)) { goto lab_L100000; }; lab_L100003: ; SOURCE(3924, 61) if ((tail_v10440 == 0)) { SOURCE(3941, 10) goto lab_L100001; } else { SOURCE(3953, 14) oldTail_v10412 = tail_v10440; SOURCE(3969, 16) tail_v10440 = (* (( (ptr) tail_v10440)+1) ); }; noName_c49552 = (noName_c49552 + 1); if (( (int)noName_c49552 < (int)noName_c49584)) { goto lab_L100003; }; lab_L100000: ; lab_L100001: ; }; SOURCE(3999, 631) if ( ( (tail_v10440 != 0) ? ((* (ptr) tail_v10440 ) != 0) : 0 ) ) { SOURCE(4035, 619) { word sliceList_v10728 = 0; word ptr_v10756 = 0; SOURCE(4292, 45) { W2 var_c49648; { word pd98; pd98 = (* (( (ptr) (* (( (ptr) gf_c52912)+165)/* var_c49616 */ ))+20) ); (void) ( *( (fPt) ((* (ptr) pd98 ))))((word) (&var_c49648), pd98); }; ptr_v10756 = var_c49648.f1; sliceList_v10728 = var_c49648.f0; }; SOURCE(4340, 56) { word var_c49680; word pd99; pd99 = (* (( (ptr) (* (( (ptr) gf_c52912)+161)/* var_c49008 */ ))+31) ); var_c49680 = (word) ( *( (fPt) ((* (ptr) pd99 ))))((* (( (ptr) ggData_v6140)+11) ), 0, (word) (( (bPt) &var_c52880)+16)/* var_c49424 */ , 0, pd99) ; }; SOURCE(4399, 129) { register word tailEvents_v10988; tailEvents_v10988 = tail_v10440; lab_L100007: ; if ((tailEvents_v10988 != 0)) { } else { goto lab_L100004; }; SOURCE(4484, 44) (void) ResetEvent_P1320((* (ptr) tailEvents_v10988 ), sliceList_v10728, ptr_v10756); tailEvents_v10988 = (* (( (ptr) tailEvents_v10988)+1) ); goto lab_L100007; lab_L100004: ; }; SOURCE(4539, 18) (* (( (ptr) oldTail_v10412)+1) ) = 0; SOURCE(4601, 29) (void) UnlinkListedSlices_P1380(sliceList_v10728); }; }; }; }; }; }; } static word SetSliceIndex_P2904(slice_v10544, formal_c52944) word slice_v10544; word formal_c52944; { word done_v10588; formal_c52944 = (formal_c52944 - 24); /* SetSliceIndex: */ SOURCE(3247, 21) SOURCE(3247, 21) done_v10588 = 0; SOURCE(3315, 27) (* (( (ptr) slice_v10544)+20) ) = (* (( (ptr) formal_c52944)+8) ); SOURCE(3247, 21) return(done_v10588); } static word MarkSlices_P3012(slice_v10832, formal_c53008) word slice_v10832; word formal_c53008; { W6 var_c52976; word done_v10876; /* declaration of var_c49712 skipped */ formal_c53008 = (formal_c53008 - 16); var_c52976.f0 = formal_c53008; /* MarkSlices: */ SOURCE(4062, 18) { word tmpAddr100; tmpAddr100 = (word) (( (ptr) &var_c52976)+4)/* var_c49712 */ ; (* (ptr) tmpAddr100 ) = ( ((word) (fPt) TopHistory_P3120) ); (* (( (ptr) tmpAddr100) + 1) ) = 1; }; SOURCE(4062, 18) done_v10876 = 0; SOURCE(4224, 32) (void) DescendASlice_P840(slice_v10832, (word) (( (bPt) &var_c52976)+16)/* var_c49712 */ ); SOURCE(4062, 18) return(done_v10876); } static word TopHistory_P3120(slice_v11192, formal_c53040) word slice_v11192; word formal_c53040; { word done_v11236; formal_c53040 = (formal_c53040 - 16); /* TopHistory: */ SOURCE(4127, 18) SOURCE(4127, 18) done_v11236 = 0; SOURCE(4192, 27) (* (( (ptr) slice_v11192)+20) ) = (* (( (ptr) (* (ptr) formal_c53040 ))+8) ); SOURCE(4127, 18) return(done_v11236); } static void KillAdvanceCapture_P180(formal_c0568) word formal_c0568; { W5 var_c53072; /* declaration of ggData_v6200 skipped */ register ptr gf_c53104 = (ptr) &globalframe; var_c53072.f4/* ggData_v6200 */ = formal_c0568; /* KillAdvanceCapture: */ SOURCE(4667, 116) (void) (XR_MonitorEntry((word) (( (bPt) gf_c53104)+16)/* LOCK_v3952 */ )); SOURCE(4726, 57) { word var_c0535; var_c0535 = (word) &var_c53072; (void) (word) XR_Enable(( ((word) (fPt) NoName_Q4668) ), ( ((word) (fPt) NoName_Q5568) ), var_c0535); }; SOURCE(4667, 116) (void) (XR_MonitorExit((word) (( (bPt) gf_c53104)+16)/* LOCK_v3952 */ )); return; } static word NoName_Q4668(formal_c0473) word formal_c0473; { SOURCE(4749, 34) (void) KillAdvanceCaptureInternal_P240((* ((( (ptr) formal_c0473)+4)) )); return(0); } static void KillAdvanceCaptureInternal_P240(ggData_v6260) word ggData_v6260; { register ptr gf_c53136 = (ptr) &globalframe; word advanceProcess_v11264; word advanceEvent_v11292; /* KillAdvanceCaptureInternal: */ SOURCE(4789, 764) SOURCE(4852, 68) advanceProcess_v11264 = (* (( (ptr) ggData_v6260)+46) ); SOURCE(4922, 56) advanceEvent_v11292 = (* (( (ptr) ggData_v6260)+47) ); SOURCE(4980, 45) if ((0 != (* (ptr) (* (( (ptr) (* (( (ptr) gf_c53136)+164)/* var_c49488 */ ))+5) ) ))) { SOURCE(5009, 16) (void) (XR_RaiseSignal((word) (( (bPt) gf_c53136)+260), 0, 0)); }; SOURCE(5027, 526) if (((* (( (ptr) ggData_v6260)+46) ) != 0)) { SOURCE(5071, 35) (* (( (ptr) ggData_v6260)+46) ) = 0; SOURCE(5108, 33) (* (( (ptr) ggData_v6260)+47) ) = 0; SOURCE(5143, 86) { word pd101; pd101 = (* (( (ptr) (* (( (ptr) gf_c53136)+166)/* var_c49744 */ ))+8) ); if (((word) ( *( (fPt) ((* (ptr) pd101 ))))(advanceProcess_v11264, pd101) == 3)) { SOURCE(5195, 34) { word pd102; pd102 = (* (( (ptr) (* (( (ptr) gf_c53136)+166)/* var_c49744 */ ))+10) ); (void) ( *( (fPt) ((* (ptr) pd102 ))))(advanceProcess_v11264, pd102); }; }; }; SOURCE(5231, 59) { W2 var_c49776; { word pd103; pd103 = (* (( (ptr) (* (( (ptr) gf_c53136)+166)/* var_c49744 */ ))+9) ); (void) ( *( (fPt) ((* (ptr) pd103 ))))((word) &var_c49776, advanceProcess_v11264, 1, pd103); }; }; SOURCE(5292, 97) { word tc104; word pd105; if ((advanceEvent_v11292 != 0)) { pd105 = (* (( (ptr) (* (( (ptr) gf_c53136)+163)/* var_c49200 */ ))+8) ); tc104 = (word) (0 == (word) ( *( (fPt) ((* (ptr) pd105 ))))((* (ptr) advanceEvent_v11292 ), (* (( (ptr) gf_c53136)+38) ), 0, pd105)); } else { tc104 = (word) 0; }; if (tc104) { SOURCE(5373, 16) (void) (XR_RaiseSignal((word) (( (bPt) gf_c53136)+264), 0, 0)); }; }; SOURCE(5410, 143) if ((advanceEvent_v11292 != 0)) { SOURCE(5435, 118) { word var_c49840; { W3 var_c49808; var_c49808.f0 = (* (( (ptr) gf_c53136)+13)/* tryPriority_v4708 */ ); var_c49808.f1 = 1; var_c49808.f2 = 0; { word pd106; pd106 = (* (( (ptr) (* (( (ptr) gf_c53136)+166)/* var_c49744 */ ))+7) ); var_c49840 = (word) ( *( (fPt) ((* (ptr) pd106 ))))((word) (( (bPt) gf_c53136)+592)/* var_c48784 */ , advanceEvent_v11292, var_c49808, pd106) ; }; }; }; }; }; } static word DiscardAction_P300(data_v19920) word data_v19920; { register ptr gf_c53168 = (ptr) &globalframe; word results_v19964; word advanceEvent_v11336; /* DiscardAction: */ SOURCE(5717, 341) SOURCE(5717, 341) results_v19964 = 0; SOURCE(5762, 41) advanceEvent_v11336 = XR_Narrow(data_v19920, (* (( (ptr) gf_c53168)+28) )); SOURCE(5805, 97) { word tc107; word pd108; if ((advanceEvent_v11336 != 0)) { pd108 = (* (( (ptr) (* (( (ptr) gf_c53168)+163)/* var_c49200 */ ))+8) ); tc107 = (word) (0 == (word) ( *( (fPt) ((* (ptr) pd108 ))))((* (ptr) advanceEvent_v11336 ), (* (( (ptr) gf_c53168)+38) ), 0, pd108)); } else { tc107 = (word) 0; }; if (tc107) { SOURCE(5886, 16) (void) (XR_RaiseSignal((word) (( (bPt) gf_c53168)+264), 0, 0)); }; }; SOURCE(5923, 135) if ((advanceEvent_v11336 != 0)) { SOURCE(5950, 46) { word pd109; pd109 = (* (( (ptr) (* (( (ptr) gf_c53168)+166)/* var_c49744 */ ))+4) ); (void) ( *( (fPt) ((* (ptr) pd109 ))))(1, pd109); }; SOURCE(5998, 15) { word pd110; pd110 = (* (( (ptr) (* (( (ptr) gf_c53168)+167)/* var_c49872 */ ))+23) ); (void) ( *( (fPt) ((* (ptr) pd110 ))))(pd110); }; SOURCE(6015, 43) { word pd111; pd111 = (* (( (ptr) (* (( (ptr) gf_c53168)+165)/* var_c49616 */ ))+31) ); (void) ( *( (fPt) ((* (ptr) pd111 ))))(advanceEvent_v11336, pd111); }; }; SOURCE(5717, 341) return(results_v19964); } static void DoAdvanceCapture_P360(formal_c0569) word formal_c0569; { W5 var_c53200; /* declaration of ggData_v6320 skipped */ register ptr gf_c53232 = (ptr) &globalframe; var_c53200.f4/* ggData_v6320 */ = formal_c0569; /* DoAdvanceCapture: */ SOURCE(6112, 459) (void) (XR_MonitorEntry((word) (( (bPt) gf_c53232)+16)/* LOCK_v3952 */ )); SOURCE(6169, 402) { word var_c01; { word var_c0536; var_c0536 = (word) &var_c53200; var_c01 = (word) XR_Enable(( ((word) (fPt) NoName_Q4728) ), ( ((word) (fPt) NoName_Q5508) ), var_c0536); }; if ((var_c01 == 1)) { goto lab_L03; }; }; SOURCE(6112, 459) (void) (XR_MonitorExit((word) (( (bPt) gf_c53232)+16)/* LOCK_v3952 */ )); return; lab_L03: ; return; } static word NoName_Q4728(formal_c0478) word formal_c0478; { register ptr gf_c0477 = (ptr) &globalframe; SOURCE(6192, 379) if ((0 != (* (( (ptr) gf_c0477)+8)/* noHistory_v4428 */ ))) { SOURCE(6210, 12) (void) (XR_MonitorExit((word) (( (bPt) gf_c0477)+16)/* LOCK_v3952 */ )); return(1); } else { SOURCE(6224, 45) if ((0 != (* (ptr) (* (( (ptr) (* (( (ptr) gf_c0477)+164)/* var_c49488 */ ))+5) ) ))) { SOURCE(6253, 16) (void) (XR_RaiseSignal((word) (( (bPt) gf_c0477)+260), 0, 0)); }; SOURCE(6271, 76) if (((* (( (ptr) (* (( (ptr) formal_c0478)+4) ))+46) ) != 0)) { SOURCE(6313, 34) (void) KillAdvanceCaptureInternal_P240((* ((( (ptr) formal_c0478)+4)) )); }; SOURCE(6382, 47) (* (( (ptr) (* (( (ptr) formal_c0478)+4) ))+47) ) = (word) Create_P660((* ((( (ptr) gf_c0477)+38)) )); SOURCE(6431, 140) { W3 var_c49904; var_c49904.f0 = (* (( (ptr) gf_c0477)+13)/* tryPriority_v4708 */ ); var_c49904.f1 = 1; var_c49904.f2 = 0; { word pd112; pd112 = (* (( (ptr) (* (( (ptr) gf_c0477)+166)/* var_c49744 */ ))+7) ); (* (( (ptr) (* (( (ptr) formal_c0478)+4) ))+46) ) = (word) ( *( (fPt) ((* (ptr) pd112 ))))((word) (( (bPt) gf_c0477)+576) /* var_c48720 */ , (* (( (ptr) formal_c0478)+4) ), var_c49904, pd112); }; }; }; return(0); } static word CaptureAction_P420(data_v20056) word data_v20056; { register ptr gf_c53264 = (ptr) &globalframe; word results_v20100; word ggData_v11380; /* CaptureAction: */ SOURCE(6723, 239) SOURCE(6723, 239) results_v20100 = 0; SOURCE(6768, 29) ggData_v11380 = XR_Narrow(data_v20056, (* (( (ptr) gf_c53264)+29) )); SOURCE(6799, 45) if ((0 != (* (ptr) (* (( (ptr) (* (( (ptr) gf_c53264)+164)/* var_c49488 */ ))+5) ) ))) { SOURCE(6828, 16) (void) (XR_RaiseSignal((word) (( (bPt) gf_c53264)+260), 0, 0)); }; SOURCE(6846, 46) { word pd113; pd113 = (* (( (ptr) (* (( (ptr) gf_c53264)+166)/* var_c49744 */ ))+4) ); (void) ( *( (fPt) ((* (ptr) pd113 ))))(1, pd113); }; SOURCE(6894, 15) { word pd114; pd114 = (* (( (ptr) (* (( (ptr) gf_c53264)+167)/* var_c49872 */ ))+23) ); (void) ( *( (fPt) ((* (ptr) pd114 ))))(pd114); }; SOURCE(6911, 51) (void) Capture_P540(ggData_v11380, (* (( (ptr) ggData_v11380)+47) ), 0); SOURCE(6723, 239) return(results_v20100); } static void NewCapture_P480(formal_c0570, formal_c0571) word formal_c0570; word formal_c0571; { W6 var_c53296; /* declaration of name_v6380 skipped */ /* declaration of ggData_v6408 skipped */ register ptr gf_c53328 = (ptr) &globalframe; var_c53296.f4/* name_v6380 */ = formal_c0570; var_c53296.f5/* ggData_v6408 */ = formal_c0571; /* NewCapture: */ SOURCE(6968, 1146) (void) (XR_MonitorEntry((word) (( (bPt) gf_c53328)+16)/* LOCK_v3952 */ )); SOURCE(7036, 1078) { word var_c02; { word var_c0537; var_c0537 = (word) &var_c53296; var_c02 = (word) XR_Enable(( ((word) (fPt) NoName_Q4788) ), ( ((word) (fPt) NoName_Q5448) ), var_c0537); }; if ((var_c02 == 1)) { goto lab_L05; }; }; SOURCE(6968, 1146) (void) (XR_MonitorExit((word) (( (bPt) gf_c53328)+16)/* LOCK_v3952 */ )); return; lab_L05: ; return; } static word NoName_Q4788(formal_c0482) word formal_c0482; { register ptr gf_c0481 = (ptr) &globalframe; SOURCE(7059, 1055) if ((0 != (* (( (ptr) gf_c0481)+8)/* noHistory_v4428 */ ))) { SOURCE(7077, 12) (void) (XR_MonitorExit((word) (( (bPt) gf_c0481)+16)/* LOCK_v3952 */ )); return(1); } else { SOURCE(7089, 1030) { word count_v11424; word nameAndCount_v11452; SOURCE(7091, 69) { word pd115; word idx116; pd115 = (* (( (ptr) (* (( (ptr) gf_c0481)+161)/* var_c49008 */ ))+36) ); count_v11424 = ( idx116 = (word) ( *( (fPt) ((* (ptr) pd115 ))))((* (( (ptr) (* (( (ptr) formal_c0482)+5) ))+11) ), 0, 0, 0, pd115), SGNCK(idx116) ); }; SOURCE(7162, 186) if (( (int)count_v11424 == (int)0)) { { W2 var_c49936; var_c49936.f0 = 11; var_c49936.f1 = (* (( (ptr) formal_c0482)+4) ); { word pd117; pd117 = (* (( (ptr) (* (( (ptr) gf_c0481)+162)/* var_c49072 */ ))+63) ); nameAndCount_v11452 = (word) ( *( (fPt) ((* (ptr) pd117 ))))((* (( (ptr) gf_c0481)+57) ), var_c49936, pd117); }; }; } else { { W2 var_c49968; W2 var_c50000; W2 var_c50032; var_c49968.f0 = 11; var_c49968.f1 = (* (( (ptr) formal_c0482)+4) ); var_c50000.f0 = 5; var_c50000.f1 = count_v11424; var_c50032.f0 = 11; if (( (int)count_v11424 > (int)1)) { var_c50032.f1 = (* (( (ptr) gf_c0481)+49) ); } else { var_c50032.f1 = 0; }; { word pd118; pd118 = (* (( (ptr) (* (( (ptr) gf_c0481)+162)/* var_c49072 */ ))+62) ); nameAndCount_v11452 = (word) ( *( (fPt) ((* (ptr) pd118 ))))((* (( (ptr) gf_c0481)+50) ), var_c49968, var_c50000, var_c50032, pd118) ; }; }; }; SOURCE(7350, 45) if ((0 != (* (ptr) (* (( (ptr) (* (( (ptr) gf_c0481)+164)/* var_c49488 */ ))+5) ) ))) { SOURCE(7379, 16) (void) (XR_RaiseSignal((word) (( (bPt) gf_c0481)+260), 0, 0)); }; SOURCE(7397, 717) if (((* (( (ptr) (* (( (ptr) formal_c0482)+5) ))+46) ) != 0)) { SOURCE(7439, 561) { word advanceStatus_v11496; W2 var_c0166; SOURCE(7441, 114) { word pd119; pd119 = (* (( (ptr) (* (( (ptr) gf_c0481)+166)/* var_c49744 */ ))+9) ); (void) ( *( (fPt) ((* (ptr) pd119 ))))((word) &var_c0166, (* (( (ptr) (* (( (ptr) formal_c0482)+5) ))+46) ), 1, pd119); }; advanceStatus_v11496 = var_c0166.f0; SOURCE(7557, 348) { word var_c50064; var_c50064 = advanceStatus_v11496; if ((var_c50064 == 0)) { SOURCE(7593, 47) (* (ptr) (* (( (ptr) (* (( (ptr) formal_c0482)+5) ))+47) ) ) = nameAndCount_v11452; SOURCE(7642, 47) (void) SetCurrent_P720((* (( (ptr) formal_c0482)+5) ), (* (( (ptr) (* (( (ptr) formal_c0482)+5) ))+47) )); } else { if ((var_c50064 == 1)) { SOURCE(7815, 40) { word var_c50096; var_c50096 = (word) Create_P660(nameAndCount_v11452); (void) SetCurrent_P720((* (( (ptr) formal_c0482)+5) ), var_c50096); }; SOURCE(7857, 48) { word var_c50128; W2 var_c0170; (void) GetCurrent_P780((word) &var_c0170, (* (( (ptr) formal_c0482)+5) )); var_c50128 = var_c0170.f0; (void) Capture_P540((* (( (ptr) formal_c0482)+5) ), var_c50128, 0); }; } else { SOURCE(7921, 5) (void) XR_RaiseUnnamedError(); }; }; }; SOURCE(7928, 35) (* (( (ptr) (* (( (ptr) formal_c0482)+5) ))+46) ) = 0; SOURCE(7965, 33) (* (( (ptr) (* (( (ptr) formal_c0482)+5) ))+47) ) = 0; }; } else { SOURCE(8024, 40) { word var_c50160; var_c50160 = (word) Create_P660(nameAndCount_v11452); (void) SetCurrent_P720((* (( (ptr) formal_c0482)+5) ), var_c50160); }; SOURCE(8066, 48) { word var_c50192; W2 var_c0173; (void) GetCurrent_P780((word) &var_c0173, (* (( (ptr) formal_c0482)+5) )); var_c50192 = var_c0173.f0; (void) Capture_P540((* (( (ptr) formal_c0482)+5) ), var_c50192, 0); }; }; }; }; return(0); } static void Capture_P540(ggData_v6468, currentEvent_v6496, copyAll_v6524) word ggData_v6468; word currentEvent_v6496; word copyAll_v6524; { register ptr gf_c53360 = (ptr) &globalframe; /* Capture: */ SOURCE(8126, 396) SOURCE(8212, 310) if ((currentEvent_v6496 != 0)) { SOURCE(8237, 287) { word captureRef_v11540 = 0; word virginList_v11568 = 0; word virginMap_v11596 = 0; SOURCE(8321, 73) { W2 var_c50224; { word pd120; pd120 = (* (( (ptr) (* (( (ptr) gf_c53360)+165)/* var_c49616 */ ))+29) ); (void) ( *( (fPt) ((* (ptr) pd120 ))))((word) &var_c50224, (* (( (ptr) ggData_v6468)+11) ), copyAll_v6524, pd120); }; virginMap_v11596 = var_c50224.f1; virginList_v11568 = var_c50224.f0; }; SOURCE(8396, 83) { word var_c50256; var_c50256 = XR_NewObject(16, (* (( (ptr) gf_c53360)+15) )); (* (ptr) var_c50256 ) = 2; (* (( (ptr) var_c50256)+1) ) = (* (( (ptr) ggData_v6468)+11) ); (* (( (ptr) var_c50256)+2) ) = virginList_v11568; (* (( (ptr) var_c50256)+3) ) = virginMap_v11596; captureRef_v11540 = var_c50256; }; SOURCE(8481, 41) (void) Note_P1140(currentEvent_v6496, (word) (( (bPt) gf_c53360)+552)/* var_c48624 */ , captureRef_v11540); }; }; } static void Uncapture_P600(historyData_v6584, currentEvent_v6612) word historyData_v6584; word currentEvent_v6612; { register ptr gf_c53392 = (ptr) &globalframe; /* Uncapture: */ SOURCE(8531, 268) SOURCE(8605, 194) if ((0 != (* (( (ptr) gf_c53392)+8)/* noHistory_v4428 */ ))) { SOURCE(8623, 12) return; } else { SOURCE(8635, 166) { word captureData_v11736 = 0; SOURCE(8670, 34) if ((historyData_v6584 == 0)) { goto lab_L100014; }; if (((* (ptr) historyData_v6584 ) == 2)) { goto lab_L100014; }; (void) XR_RaiseError(XR_NarrowFault, 0); lab_L100014: ; captureData_v11736 = historyData_v6584; SOURCE(8706, 93) { word pd121; pd121 = (* (( (ptr) (* (( (ptr) gf_c53392)+165)/* var_c49616 */ ))+30) ); (void) ( *( (fPt) ((* (ptr) pd121 ))))((* (( (ptr) captureData_v11736)+1) ), (* (( (ptr) captureData_v11736)+2) ), (* (( (ptr) captureData_v11736)+3) ), pd121); }; }; }; } static word Create_P660(name_v6684) word name_v6684; { register ptr gf_c53424 = (ptr) &globalframe; word var_c6728; /* Create: */ SOURCE(8808, 146) SOURCE(8873, 81) if ((0 != (* (( (ptr) gf_c53424)+8)/* noHistory_v4428 */ ))) { return(0); } else { { word var_c50320; word var_c50416; var_c50320 = XR_NewObject(8, (* (( (ptr) gf_c53424)+31) )); { word var_c50384; var_c50384 = var_c50320; }; var_c50416 = XR_NewObject(12, (* (( (ptr) gf_c53424)+28) )); (* (ptr) var_c50416 ) = name_v6684; (* (( (ptr) var_c50416)+1) ) = (word) -1; (* (( (ptr) var_c50416)+2) ) = var_c50320; return(var_c50416); }; }; } static void SetCurrent_P720(ggData_v6788, event_v6816) word ggData_v6788; word event_v6816; { register ptr gf_c53456 = (ptr) &globalframe; /* SetCurrent: */ SOURCE(8960, 179) SOURCE(9057, 45) if ((0 != (* (ptr) (* (( (ptr) (* (( (ptr) gf_c53456)+164)/* var_c49488 */ ))+5) ) ))) { SOURCE(9086, 16) (void) (XR_RaiseSignal((word) (( (bPt) gf_c53456)+260), 0, 0)); }; SOURCE(9104, 35) (* (( (ptr) ggData_v6788)+44) ) = event_v6816; } static void GetCurrent_P780(formal_c0198, ggData_v6876) word formal_c0198; word ggData_v6876; { word event_v6920; word index_v6948; /* GetCurrent: */ SOURCE(9145, 151) SOURCE(9145, 151) event_v6920 = 0; SOURCE(9232, 64) event_v6920 = (* (( (ptr) ggData_v6876)+44) ); index_v6948 = (* (( (ptr) ggData_v6876)+43) ); /* removed tail goto */ (* (ptr) formal_c0198 ) = event_v6920; (* (( (ptr) formal_c0198)+1) ) = index_v6948; return; } static void DescendASlice_P840(slice_v7008, walkProc_v7036) word slice_v7008; word walkProc_v7036; { register ptr gf_c53488 = (ptr) &globalframe; /* DescendASlice: */ SOURCE(9302, 134) SOURCE(9366, 20) { word var_c50512; var_c50512 = (word) ( *( (fPt) ((* (ptr) walkProc_v7036 ))))(slice_v7008, walkProc_v7036); }; SOURCE(9388, 48) { word var_c50576; word pd122; pd122 = (* (( (ptr) (* (( (ptr) gf_c53488)+168)/* var_c50544 */ ))+73) ); var_c50576 = (word) ( *( (fPt) ((* (ptr) pd122 ))))(slice_v7008, 2, walkProc_v7036, 0, pd122); }; } static void WalkSlicesInEvent_P900(event_v7096, walkProc_v7124) word event_v7096; word walkProc_v7124; { register ptr gf_c53520 = (ptr) &globalframe; /* WalkSlicesInEvent: */ SOURCE(9442, 928) SOURCE(9517, 853) if ((event_v7096 != 0)) { SOURCE(9535, 835) { register word subevents_v11792; subevents_v11792 = (* (( (ptr) event_v7096)+2) ); lab_L100019: ; if ((subevents_v11792 != 0)) { } else { goto lab_L100016; }; SOURCE(9624, 746) if (((* (ptr) subevents_v11792 ) != 0)) { SOURCE(9652, 785) { word subevent_v11920; word historyData_v11948; SOURCE(9654, 36) subevent_v11920 = (* (ptr) subevents_v11792 ); SOURCE(9692, 46) historyData_v11948 = (* (( (ptr) subevent_v11920)+1) ); SOURCE(9740, 630) { word var_c50608; var_c50608 = historyData_v11948; if ((var_c50608 == 0)) { goto lab_L100020; }; { word var_c50704; var_c50704 = (* (ptr) var_c50608 ); switch (var_c50704) { case 2: { /*1*/ word captureRef_v12004; /*1*/ captureRef_v12004 = var_c50608; SOURCE(9805, 436) /*1*/ { /*1*/ register word capturedSlices_v12060; /*1*/ capturedSlices_v12060 = (* (( (ptr) captureRef_v12004)+2) ); /*1*/ lab_L100024: ; /*1*/ if ((capturedSlices_v12060 != 0)) { /*1*/ } /*1*/ else { /*1*/ goto lab_L100021; /*1*/ }; /*1*/ { /*1*/ word found_v12188 = 0; /*1*/ word nextVal_v12216 = 0; /*1*/ word nextSlice_v12244; SOURCE(9947, 39) /*1*/ nextSlice_v12244 = (* (ptr) capturedSlices_v12060 ); SOURCE(9988, 64) /*1*/ { /*1*/ W2 var_c50672; /*1*/ { /*1*/ word pd123; /*1*/ pd123 = (* (( (ptr) (* (( (ptr) gf_c53520)+169)/* var_c50640 */ ))+7) ); /*1*/ (void) ( *( (fPt) ((* (ptr) pd123 ))))((word) &var_c50672, (* (( (ptr) captureRef_v12004)+3) ), nextSlice_v12244, pd123) /*1*/ ; /*1*/ }; /*1*/ nextVal_v12216 = var_c50672.f1; /*1*/ found_v12188 = var_c50672.f0; /*1*/ }; SOURCE(10054, 62) /*1*/ if (((* (ptr) nextSlice_v12244 ) != 0)) { SOURCE(10082, 34) /*1*/ (void) DescendASlice_P840(nextSlice_v12244, walkProc_v7124); /*1*/ }; SOURCE(10118, 123) /*1*/ if ((0 != found_v12188)) { SOURCE(10132, 111) /*1*/ { /*1*/ word nextOriginal_v12300; SOURCE(10134, 37) /*1*/ nextOriginal_v12300 = XR_Narrow(nextVal_v12216, (* (( (ptr) gf_c53520)+32) )); SOURCE(10173, 68) /*1*/ if (((* (ptr) nextOriginal_v12300 ) != 0)) { SOURCE(10204, 37) /*1*/ (void) DescendASlice_P840(nextOriginal_v12300, walkProc_v7124); /*1*/ }; /*1*/ }; /*1*/ }; /*1*/ }; /*1*/ capturedSlices_v12060 = (* (( (ptr) capturedSlices_v12060)+1) ); /*1*/ goto lab_L100024; /*1*/ lab_L100021: ; /*1*/ }; /*1*/ }; break; case 0: { /*1*/ word propsRef_v12344; /*1*/ propsRef_v12344 = var_c50608; SOURCE(10298, 72) /*1*/ if (((* (ptr) (* (( (ptr) propsRef_v12344)+2) ) ) != 0)) { SOURCE(10331, 39) /*1*/ (void) DescendASlice_P840((* (( (ptr) propsRef_v12344)+2) ), walkProc_v7124); /*1*/ }; /*1*/ }; break; case 1: { /*1*/ word stateRef_v12400; /*1*/ stateRef_v12400 = var_c50608; /*1*/ }; break; default: lab_L100020: ; SOURCE(10430, 5) (void) XR_RaiseUnnamedError(); break; }; }; }; }; }; subevents_v11792 = (* (( (ptr) subevents_v11792)+1) ); goto lab_L100019; lab_L100016: ; }; }; } static void SetHistory_P960(ggData_v7184, list_v7212) word ggData_v7184; word list_v7212; { register ptr gf_c53552 = (ptr) &globalframe; /* SetHistory: */ SOURCE(10453, 146) SOURCE(10526, 45) if ((0 != (* (ptr) (* (( (ptr) (* (( (ptr) gf_c53552)+164)/* var_c49488 */ ))+5) ) ))) { SOURCE(10555, 16) (void) (XR_RaiseSignal((word) (( (bPt) gf_c53552)+260), 0, 0)); }; SOURCE(10573, 26) (* (( (ptr) ggData_v7184)+41) ) = list_v7212; } static word GetHistory_P1020(ggData_v7356) word ggData_v7356; { word var_c7400; /* GetHistory: */ SOURCE(10605, 103) SOURCE(10681, 27) return((* (( (ptr) ggData_v7356)+41) )); } static void Push_P1080(event_v7544, list_v7572) word event_v7544; word list_v7572; { register ptr gf_c53584 = (ptr) &globalframe; /* Push: */ SOURCE(10714, 397) SOURCE(10786, 45) if ((0 != (* (ptr) (* (( (ptr) (* (( (ptr) gf_c53584)+164)/* var_c49488 */ ))+5) ) ))) { SOURCE(10815, 16) (void) (XR_RaiseSignal((word) (( (bPt) gf_c53584)+260), 0, 0)); }; SOURCE(10833, 278) if ( ( (event_v7544 != 0) ? ((* (( (ptr) event_v7544)+2) ) != 0) : 0 ) ) { SOURCE(10875, 238) { word tempEvent_v12456 = 0; word newList_v12484; word temp_v12512; SOURCE(10902, 9) newList_v12484 = XR_NewObject(8, (* (( (ptr) gf_c53584)+33) )); { word var_c50768; var_c50768 = newList_v12484; (* (ptr) var_c50768 ) = event_v7544; }; SOURCE(10947, 6) temp_v12512 = (* (( (ptr) list_v7572)+1) ); SOURCE(10987, 19) (* (( (ptr) list_v7572)+1) ) = newList_v12484; SOURCE(11008, 19) (* (( (ptr) newList_v12484)+1) ) = temp_v12512; SOURCE(11030, 22) tempEvent_v12456 = (* (ptr) list_v7572 ); SOURCE(11054, 28) (* (ptr) list_v7572 ) = (* (ptr) (* (( (ptr) list_v7572)+1) ) ); SOURCE(11084, 27) (* (ptr) (* (( (ptr) list_v7572)+1) ) ) = tempEvent_v12456; }; }; } static void Note_P1140(event_v7716, historyProc_v7744, historyData_v7772) word event_v7716; word historyProc_v7744; word historyData_v7772; { register ptr gf_c53616 = (ptr) &globalframe; /* Note: */ SOURCE(11120, 399) SOURCE(11215, 26) if ((event_v7716 == 0)) { SOURCE(11235, 6) return; }; SOURCE(11243, 45) if ((0 != (* (ptr) (* (( (ptr) (* (( (ptr) gf_c53616)+164)/* var_c49488 */ ))+5) ) ))) { SOURCE(11272, 16) (void) (XR_RaiseSignal((word) (( (bPt) gf_c53616)+260), 0, 0)); }; SOURCE(11290, 141) if ( ( ( ( (0 != (* (ptr) (* (( (ptr) (* (( (ptr) gf_c53616)+164)/* var_c49488 */ ))+4) ) )) ? ((* (( (ptr) event_v7716)+2) ) != 0) : 0 ) ? ((* (ptr) (* (( (ptr) event_v7716)+2) ) ) != 0) : 0 ) ? ((* (ptr) (* (( (ptr) (* (ptr) (* (( (ptr) event_v7716)+2) ) ))+1) ) ) == 2) : 0 ) ) { SOURCE(11425, 6) return; }; SOURCE(11433, 86) { word var_c50800; word var_c50864; { word var_c50832; var_c50832 = XR_NewObject(8, (* (( (ptr) gf_c53616)+34) )); (* (ptr) var_c50832 ) = XR_CheckProc(historyProc_v7744); (* (( (ptr) var_c50832)+1) ) = historyData_v7772; var_c50800 = var_c50832; }; var_c50864 = XR_NewObject(8, (* (( (ptr) gf_c53616)+31) )); (* (ptr) var_c50864 ) = var_c50800; (* (( (ptr) var_c50864)+1) ) = (* (( (ptr) event_v7716)+2) ); (* (( (ptr) event_v7716)+2) ) = var_c50864; }; } static void Undo_P1200(historyEvent_v7844, currentEvent_v7872) word historyEvent_v7844; word currentEvent_v7872; { register ptr gf_c53648 = (ptr) &globalframe; /* Undo: */ SOURCE(11525, 346) SOURCE(11604, 31) if ((historyEvent_v7844 == 0)) { SOURCE(11629, 6) return; }; SOURCE(11637, 45) if ((0 != (* (ptr) (* (( (ptr) (* (( (ptr) gf_c53648)+164)/* var_c49488 */ ))+5) ) ))) { SOURCE(11666, 16) (void) (XR_RaiseSignal((word) (( (bPt) gf_c53648)+260), 0, 0)); }; SOURCE(11684, 187) { register word nextSubs_v12724; nextSubs_v12724 = (* (( (ptr) historyEvent_v7844)+2) ); lab_L100028: ; if ((nextSubs_v12724 != 0)) { } else { goto lab_L100025; }; { word sub_v12852; SOURCE(11777, 30) sub_v12852 = (* (ptr) nextSubs_v12724 ); SOURCE(11809, 62) if ((sub_v12852 != 0)) { SOURCE(11825, 46) { word pd124; pd124 = (* (ptr) sub_v12852 ); (void) ( *( (fPt) ((* (ptr) pd124 ))))((* (( (ptr) sub_v12852)+1) ), currentEvent_v7872, pd124); }; }; }; nextSubs_v12724 = (* (( (ptr) nextSubs_v12724)+1) ); goto lab_L100028; lab_L100025: ; }; } static void ResetHistory_P1260(formal_c0572) word formal_c0572; { W5 var_c53680; /* declaration of ggData_v7932 skipped */ register ptr gf_c53712 = (ptr) &globalframe; var_c53680.f4/* ggData_v7932 */ = formal_c0572; /* ResetHistory: */ SOURCE(11886, 550) (void) (XR_MonitorEntry((word) (( (bPt) gf_c53712)+16)/* LOCK_v3952 */ )); SOURCE(11939, 497) { word var_c0538; var_c0538 = (word) &var_c53680; (void) (word) XR_Enable(( ((word) (fPt) NoName_Q4848) ), ( ((word) (fPt) NoName_Q5388) ), var_c0538); }; SOURCE(11886, 550) (void) (XR_MonitorExit((word) (( (bPt) gf_c53712)+16)/* LOCK_v3952 */ )); return; } static word NoName_Q4848(formal_c0495) word formal_c0495; { register ptr gf_c0494 = (ptr) &globalframe; SOURCE(11962, 16) { word sliceList_v12896 = 0; word ptr_v12924 = 0; SOURCE(11993, 45) { W2 var_c50896; { word pd125; pd125 = (* (( (ptr) (* (( (ptr) gf_c0494)+165)/* var_c49616 */ ))+20) ); (void) ( *( (fPt) ((* (ptr) pd125 ))))((word) (&var_c50896), pd125); }; ptr_v12924 = var_c50896.f1; sliceList_v12896 = var_c50896.f0; }; SOURCE(12040, 34) (void) KillAdvanceCaptureInternal_P240((* ((( (ptr) formal_c0495)+4)) )); SOURCE(12076, 168) { register word historyEventList_v13052; historyEventList_v13052 = (* (( (ptr) (* (( (ptr) formal_c0495)+4) ))+41) ); lab_L100034: ; if ((historyEventList_v13052 != 0)) { } else { goto lab_L100031; }; SOURCE(12194, 50) (void) ResetEvent_P1320((* (ptr) historyEventList_v13052 ), sliceList_v12896, ptr_v12924); historyEventList_v13052 = (* (( (ptr) historyEventList_v13052)+1) ); goto lab_L100034; lab_L100031: ; }; SOURCE(12255, 29) (void) UnlinkListedSlices_P1380(sliceList_v12896); SOURCE(12308, 31) (* (( (ptr) (* (( (ptr) formal_c0495)+4) ))+41) ) = XR_NewObject(8, (* (( (ptr) gf_c0494)+33) )); { word var_c50960; var_c50960 = (* (( (ptr) (* (( (ptr) formal_c0495)+4) ))+41) ); }; SOURCE(12341, 31) (* (( (ptr) (* (( (ptr) formal_c0495)+4) ))+43) ) = 0; SOURCE(12374, 33) (* (( (ptr) (* (( (ptr) formal_c0495)+4) ))+44) ) = 0; SOURCE(12409, 27) { word pd126; pd126 = (* (( (ptr) (* (( (ptr) gf_c0494)+170)/* var_c50992 */ ))+23) ); (void) ( *( (fPt) ((* (ptr) pd126 ))))((* ((( (ptr) formal_c0495)+4)) ), pd126); }; }; return(0); } static void ResetEvent_P1320(event_v7992, formal_c0573, formal_c0574) word event_v7992; word formal_c0573; word formal_c0574; { W9 var_c53744; /* declaration of sliceList_v8020 skipped */ /* declaration of ptr_v8048 skipped */ /* declaration of var_c51024 skipped */ (* (( (ptr) &var_c53744)+4)/* sliceList_v8020 */ ) = formal_c0573; (* (( (ptr) &var_c53744)+5)/* ptr_v8048 */ ) = formal_c0574; /* ResetEvent: */ SOURCE(12442, 552) { word tmpAddr127; tmpAddr127 = (word) (( (ptr) &var_c53744)+6)/* var_c51024 */ ; (* (ptr) tmpAddr127 ) = ( ((word) (fPt) AddSliceToUnlink_P4044) ); (* (( (ptr) tmpAddr127) + 1) ) = 1; }; SOURCE(12517, 477) if ((event_v7992 != 0)) { SOURCE(12535, 461) { /* declaration of index_v13208 skipped */ SOURCE(12726, 24) (* (( (ptr) &var_c53744)+8)/* index_v13208 */ ) = (* (( (ptr) event_v7992)+1) ); SOURCE(12752, 42) (void) WalkSlicesInEvent_P900(event_v7992, (word) (( (bPt) &var_c53744)+24)/* var_c51024 */ ); SOURCE(12797, 165) { register word subeventList_v13356; subeventList_v13356 = (* (( (ptr) event_v7992)+2) ); lab_L100038: ; if ((subeventList_v13356 != 0)) { } else { goto lab_L100035; }; SOURCE(12895, 67) if (((* (ptr) subeventList_v13356 ) != 0)) { SOURCE(12926, 36) (* (( (ptr) (* (ptr) subeventList_v13356 ))+1) ) = 0; }; subeventList_v13356 = (* (( (ptr) subeventList_v13356)+1) ); goto lab_L100038; lab_L100035: ; }; SOURCE(12973, 21) (* (( (ptr) event_v7992)+2) ) = 0; }; }; } static word AddSliceToUnlink_P4044(slice_v13284, formal_c53808) word slice_v13284; word formal_c53808; { register ptr gf_c53776 = (ptr) &globalframe; word done_v13328; formal_c53808 = (formal_c53808 - 24); /* AddSliceToUnlink: */ SOURCE(12537, 24) SOURCE(12537, 24) done_v13328 = 0; SOURCE(12608, 112) if ( ( ((* (ptr) slice_v13284 ) != 0) ? ( (int)(* (( (ptr) slice_v13284)+20) ) <= (int)(* (( (ptr) formal_c53808)+8) )) : 0 ) ) { SOURCE(12660, 60) { W2 var_c51056; { word pd128; pd128 = (* (( (ptr) (* (( (ptr) gf_c53776)+165)/* var_c49616 */ ))+21) ); (void) ( *( (fPt) ((* (ptr) pd128 ))))((word) &var_c51056, slice_v13284, (* (( (ptr) formal_c53808)+4) ), (* (( (ptr) formal_c53808)+5) ), pd128); }; (* (( (ptr) formal_c53808)+5) ) = var_c51056.f1; (* (( (ptr) formal_c53808)+4) ) = var_c51056.f0; }; }; SOURCE(12537, 24) return(done_v13328); } static void UnlinkListedSlices_P1380(sliceList_v8192) word sliceList_v8192; { register ptr gf_c53840 = (ptr) &globalframe; /* UnlinkListedSlices: */ SOURCE(13003, 177) SOURCE(13059, 121) if ((0 != (* (( (ptr) gf_c53840)+11)/* doUnlink_v4512 */ ))) { SOURCE(13076, 104) { register word slices_v13484; slices_v13484 = sliceList_v8192; lab_L100042: ; if ((slices_v13484 != 0)) { } else { goto lab_L100039; }; SOURCE(13147, 33) { word pd129; pd129 = (* (( (ptr) (* (( (ptr) gf_c53840)+171)/* var_c51088 */ ))+71) ); (void) ( *( (fPt) ((* (ptr) pd129 ))))((* (ptr) (slices_v13484) ), pd129); }; slices_v13484 = (* (( (ptr) slices_v13484)+1) ); goto lab_L100042; lab_L100039: ; }; }; } static void Reset_P1440(event_v8336) word event_v8336; { /* Reset: */ SOURCE(13253, 104) SOURCE(13298, 59) if ((event_v8336 != 0)) { SOURCE(13318, 21) (* (( (ptr) event_v8336)+2) ) = 0; SOURCE(13341, 16) (* (ptr) event_v8336 ) = 0; }; } static word Empty_P1500(event_v8396) word event_v8396; { word var_c8440; /* Empty: */ SOURCE(13366, 102) SOURCE(13426, 42) { word tc130; if ((event_v8396 == 0)) { tc130 = (word) (unsigned) 1; } else { tc130 = (word) (unsigned) ((* (( (ptr) event_v8396)+2) ) == 0); }; return(tc130); }; } static void UndoN_P1560(formal_c0575, N_v8528) word formal_c0575; word N_v8528; { W7 var_c53872; /* declaration of ggData_v8500 skipped */ register ptr gf_c53904 = (ptr) &globalframe; /* declaration of var_c51120 skipped */ var_c53872.f4/* ggData_v8500 */ = formal_c0575; /* UndoN: */ SOURCE(13472, 1743) { word tmpAddr131; tmpAddr131 = (word) (( (ptr) &var_c53872)+5)/* var_c51120 */ ; (* (ptr) tmpAddr131 ) = ( ((word) (fPt) Reselect_P4296) ); (* (( (ptr) tmpAddr131) + 1) ) = 1; }; SOURCE(13524, 1691) if ((0 != (* (( (ptr) gf_c53904)+8)/* noHistory_v4428 */ ))) { SOURCE(13542, 12) return; } else { SOURCE(13554, 1663) { word title_v13640 = 0; word actualCount_v13668 = 0; word currentEvent_v13696 = 0; word list_v13724; SOURCE(13670, 6) { word pd132; pd132 = (* (( (ptr) (* (( (ptr) gf_c53904)+170)/* var_c50992 */ ))+16) ); list_v13724 = (word) ( *( (fPt) ((* (ptr) pd132 ))))(var_c53872.f4/* ggData_v8500 */ , pd132); }; SOURCE(13729, 1486) if ( ( (list_v13724 != 0) ? ((* (ptr) list_v13724 ) != 0) : 0 ) ) { SOURCE(13792, 56) { word pd133; pd133 = (* (( (ptr) (* (( (ptr) gf_c53904)+170)/* var_c50992 */ ))+4) ); currentEvent_v13696 = (word) ( *( (fPt) ((* (ptr) pd133 ))))((* (( (ptr) gf_c53904)+37) ), var_c53872.f4/* ggData_v8500 */ , pd133) ; }; SOURCE(13850, 35) (void) Capture_P540(var_c53872.f4/* ggData_v8500 */ , currentEvent_v13696, 1); SOURCE(13932, 162) { register word noName_c51152 = 0; register word noName_c51184; noName_c51184 = N_v8528; if (( (int)noName_c51152 >= (int)noName_c51184)) { goto lab_L100043; }; lab_L100046: ; SOURCE(13950, 144) if ( ( (list_v13724 != 0) ? ((* (ptr) list_v13724 ) != 0) : 0 ) ) { SOURCE(13988, 59) { word pd134; pd134 = (* (( (ptr) (* (( (ptr) gf_c53904)+170)/* var_c50992 */ ))+11) ); (void) ( *( (fPt) ((* (ptr) pd134 ))))((* (ptr) list_v13724 ), 0, pd134); }; SOURCE(14049, 16) list_v13724 = (* (( (ptr) list_v13724)+1) ); SOURCE(14067, 27) actualCount_v13668 = (actualCount_v13668 + 1); }; noName_c51152 = (noName_c51152 + 1); if (( (int)noName_c51152 < (int)noName_c51184)) { goto lab_L100046; }; lab_L100043: ; }; SOURCE(14108, 232) { word var_c51216; W2 var_c0275; { word var_c51248; { word var_c51280; word var_c51312; var_c51280 = XR_NewObject(12, (* (( (ptr) gf_c53904)+35) )); var_c51312 = var_c51280; (* (ptr) var_c51312 ) = 5; (* (( (ptr) var_c51312)+1) ) = N_v8528; (* (( (ptr) var_c51312)+2) ) = XR_NewObject(12, (* (( (ptr) gf_c53904)+35) )); var_c51312 = (* (( (ptr) var_c51312)+2) ); (* (ptr) var_c51312 ) = 11; if (( (int)N_v8528 > (int)1)) { (* (( (ptr) var_c51312)+1) ) = (* (( (ptr) gf_c53904)+49) ); } else { (* (( (ptr) var_c51312)+1) ) = 0; }; (* (( (ptr) var_c51312)+2) ) = XR_NewObject(12, (* (( (ptr) gf_c53904)+35) )); var_c51312 = (* (( (ptr) var_c51312)+2) ); (* (ptr) var_c51312 ) = 5; (* (( (ptr) var_c51312)+1) ) = actualCount_v13668; (* (( (ptr) var_c51312)+2) ) = XR_NewObject(12, (* (( (ptr) gf_c53904)+35) )); var_c51312 = (* (( (ptr) var_c51312)+2) ); (* (ptr) var_c51312 ) = 11; if (( (int)actualCount_v13668 > (int)1)) { (* (( (ptr) var_c51312)+1) ) = (* (( (ptr) gf_c53904)+49) ); } else { (* (( (ptr) var_c51312)+1) ) = 0; }; var_c51248 = var_c51280; }; { word pd135; pd135 = (* (( (ptr) (* (( (ptr) gf_c53904)+162)/* var_c49072 */ ))+65) ); var_c51216 = (word) ( *( (fPt) ((* (ptr) pd135 ))))((* (( (ptr) gf_c53904)+36) ), var_c51248, pd135); }; }; { word pd136; pd136 = (* (( (ptr) (* (( (ptr) gf_c53904)+170)/* var_c50992 */ ))+5) ); (void) ( *( (fPt) ((* (ptr) pd136 ))))((word) &var_c0275, var_c53872.f4/* ggData_v8500 */ , pd136); }; (* (ptr) var_c0275.f0 ) = var_c51216; title_v13640 = var_c51216; }; SOURCE(14342, 29) { word pd137; pd137 = (* (( (ptr) (* (( (ptr) gf_c53904)+170)/* var_c50992 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd137 ))))(var_c53872.f4/* ggData_v8500 */ , pd137); }; SOURCE(14373, 32) { word pd138; pd138 = (* (( (ptr) (* (( (ptr) gf_c53904)+172)/* var_c51344 */ ))+9) ); (void) ( *( (fPt) ((* (ptr) pd138 ))))((* (( (ptr) var_c53872.f4/* ggData_v8500 */ )+13) ), 0, pd138); }; SOURCE(14426, 33) { word pd139; pd139 = (* (( (ptr) (* (( (ptr) gf_c53904)+172)/* var_c51344 */ ))+13) ); (void) ( *( (fPt) ((* (ptr) pd139 ))))((* ((( (ptr) var_c53872.f4/* ggData_v8500 */ )+13)) ), pd139); }; SOURCE(14484, 37) { word pd140; pd140 = (* (( (ptr) (* (( (ptr) gf_c53904)+173)/* var_c51376 */ ))+101) ); (void) ( *( (fPt) ((* (ptr) pd140 ))))(var_c53872.f4/* ggData_v8500 */ , 0, pd140); }; SOURCE(14546, 35) { word pd141; pd141 = (* (( (ptr) (* (( (ptr) gf_c53904)+173)/* var_c51376 */ ))+105) ); (void) ( *( (fPt) ((* (ptr) pd141 ))))(var_c53872.f4/* ggData_v8500 */ , 8, pd141); }; SOURCE(14612, 44) { word pd142; pd142 = (* (( (ptr) (* (( (ptr) gf_c53904)+174)/* var_c51408 */ ))+14) ); (void) ( *( (fPt) ((* (ptr) pd142 ))))((* ((( (ptr) var_c53872.f4/* ggData_v8500 */ )+11)) ), pd142); }; SOURCE(14689, 217) SOURCE(14829, 75) if ((0 != (* (( (ptr) gf_c53904)+10)/* doSelections_v4484 */ ))) { SOURCE(14850, 54) { word var_c51440; word pd143; pd143 = (* (( (ptr) (* (( (ptr) gf_c53904)+161)/* var_c49008 */ ))+31) ); var_c51440 = (word) ( *( (fPt) ((* (ptr) pd143 ))))((* (( (ptr) var_c53872.f4/* ggData_v8500 */ )+11) ), 0, (word) (( (bPt) &var_c53872)+20) /* var_c51120 */ , 0, pd143); }; }; SOURCE(14911, 58) { word pd144; pd144 = (* (( (ptr) (* (( (ptr) gf_c53904)+175)/* var_c51472 */ ))+12) ); (void) ( *( (fPt) ((* (ptr) pd144 ))))((* (( (ptr) var_c53872.f4/* ggData_v8500 */ )+3) ), 0, (* (( (ptr) gf_c53904)+42) ), title_v13640, pd144); }; SOURCE(14971, 141) { word pd145; pd145 = (* (( (ptr) (* (( (ptr) gf_c53904)+176)/* var_c51504 */ ))+4) ); (void) ( *( (fPt) ((* (ptr) pd145 ))))((* (( (ptr) gf_c53904)+44) ), var_c53872.f4/* ggData_v8500 */ , 0, 1, 0, 0, pd145) ; }; } else { SOURCE(15121, 94) { word pd146; pd146 = (* (( (ptr) (* (( (ptr) gf_c53904)+175)/* var_c51472 */ ))+12) ); (void) ( *( (fPt) ((* (ptr) pd146 ))))((* (( (ptr) var_c53872.f4/* ggData_v8500 */ )+3) ), 0, (* (( (ptr) gf_c53904)+45) ), (* (( (ptr) gf_c53904)+46) ), pd146); }; }; }; }; } static word Reselect_P4296(slice_v13928, formal_c53968) word slice_v13928; word formal_c53968; { register ptr gf_c53936 = (ptr) &globalframe; word done_v13972; formal_c53968 = (formal_c53968 - 20); /* Reselect: */ SOURCE(14695, 16) SOURCE(14695, 16) done_v13972 = 0; SOURCE(14758, 68) { word pd147; pd147 = (* (( (ptr) (* (( (ptr) gf_c53936)+174)/* var_c51408 */ ))+9) ); (void) ( *( (fPt) ((* (ptr) pd147 ))))(slice_v13928, (* (( (ptr) (* (( (ptr) formal_c53968)+4) ))+11) ), pd147); }; SOURCE(14695, 16) return(done_v13972); } static void CapTool_P1620(caption_v8604, ggData_v8632) word caption_v8604; word ggData_v8632; { register ptr gf_c54000 = (ptr) &globalframe; word tool_v14000; /* CapTool: */ SOURCE(15252, 291) SOURCE(15314, 39) tool_v14000 = (* (( (ptr) ggData_v8632)+45) ); SOURCE(15355, 188) if ((tool_v14000 != 0)) { SOURCE(15372, 173) { word container_v14044; SOURCE(15374, 55) container_v14044 = (* (( (ptr) (* (ptr) tool_v14000 ))+7) ); SOURCE(15431, 55) { word pd148; pd148 = (* (( (ptr) (* (( (ptr) gf_c54000)+163)/* var_c49200 */ ))+6) ); (* (( (ptr) container_v14044)+13) ) = (word) ( *( (fPt) ((* (ptr) pd148 ))))((* (( (ptr) gf_c54000)+47) ), caption_v8604, pd148) ; }; SOURCE(15488, 55) { word pd149; pd149 = (* (( (ptr) (* (( (ptr) gf_c54000)+177)/* var_c51536 */ ))+16) ); (void) ( *( (fPt) ((* (ptr) pd149 ))))(container_v14044, 3, 1, 0, pd149); }; }; }; } static word BuildTool_P1680(caption_v8692, ggData_v8720) word caption_v8692; word ggData_v8720; { register ptr gf_c54032 = (ptr) &globalframe; word var_c8764; word openHeight_v14088 = 120; word viewer_v14116 = 0; word tool_v14144 = 0; word layout_v14172 = 0; word name_v14200; /* BuildTool: */ SOURCE(15552, 1704) SOURCE(15731, 56) { word pd150; pd150 = (* (( (ptr) (* (( (ptr) gf_c54032)+163)/* var_c49200 */ ))+6) ); name_v14200 = (word) ( *( (fPt) ((* (ptr) pd150 ))))((* (( (ptr) gf_c54032)+47) ), caption_v8692, pd150); }; SOURCE(15789, 86) if (((* (( (ptr) ggData_v8720)+45) ) == 0)) { viewer_v14116 = 0; } else { viewer_v14116 = (* (( (ptr) (* (ptr) (* (( (ptr) ggData_v8720)+45) ) ))+7) ); }; SOURCE(15877, 294) if ( ( (viewer_v14116 != 0) ? ( ( ! ((* (( (bPt) viewer_v14116)+77) ) & 0100)) ? ! ((* (( (bPt) viewer_v14116)+77) ) & 02) : 0 ) : 0 ) ) { SOURCE(15983, 48) if ((* (( (bPt) viewer_v14116)+76) ) & 020) { SOURCE(16005, 26) { word pd151; pd151 = (* (( (ptr) (* (( (ptr) gf_c54032)+177)/* var_c51536 */ ))+7) ); (void) ( *( (fPt) ((* (ptr) pd151 ))))(viewer_v14116, 0, 1, 1, pd151); }; }; SOURCE(16033, 108) { W2 var_c51568; var_c51568.f0 = 11; var_c51568.f1 = caption_v8692; { word pd152; pd152 = (* (( (ptr) (* (( (ptr) gf_c54032)+175)/* var_c51472 */ ))+14) ); (void) ( *( (fPt) ((* (ptr) pd152 ))))((* (( (ptr) ggData_v8720)+3) ), 0, (* (( (ptr) gf_c54032)+45) ), (* (( (ptr) gf_c54032)+48) ), var_c51568, pd152); }; }; SOURCE(16143, 28) return((* (( (ptr) ggData_v8720)+45) )); }; SOURCE(16176, 26) tool_v14144 = XR_NewObject(16, (* (( (ptr) gf_c54032)+16) )); SOURCE(16204, 37) { word var_c51632; { word var_c51664; var_c51664 = XR_NewObject(32, (* (( (ptr) gf_c54032)+22) )); (* (ptr) var_c51664 ) = 5; (* (( (ptr) var_c51664)+1) ) = 5; (* (( (ptr) var_c51664)+2) ) = 5; (* (( (ptr) var_c51664)+3) ) = 5; (* (( (ptr) var_c51664)+4) ) = 15; (* (( (ptr) var_c51664)+5) ) = 5; (* (( (ptr) var_c51664)+6) ) = 5; var_c51632 = var_c51664; }; (* (ptr) tool_v14144 ) = var_c51632; layout_v14172 = var_c51632; }; SOURCE(16243, 112) { W28 var_c51696; W29 var_c0295; XR_FillWords(&(* (W26Pt) (&var_c51696)), 26, 0); (* (( (ptr) &var_c51696)+13) ) = name_v14200; (* (( (ptr) &var_c51696)+17) ) = (word) -1; (* (( (ptr) &var_c51696)+18) ) = 2; (* (( (ptr) &var_c51696)+19) ) = 419430400; (* (( (ptr) &var_c51696)+26) ) = ggData_v8720; (* (( (ptr) &var_c51696)+27) ) = 27; (* (W28Pt) (word) &var_c0295 ) = var_c51696; (* (( (ptr) (word) &var_c0295) + 28) ) = 1; { word pd153; pd153 = (* (( (ptr) (* (( (ptr) gf_c54032)+178)/* var_c51728 */ ))+4) ); (* (( (ptr) layout_v14172)+7) ) = (word) ( *( (fPt) ((* (ptr) pd153 ))))((word) (&var_c0295), pd153); }; }; SOURCE(16357, 51) { word var_c51760; var_c51760 = (word) BuildButton_P2400(layout_v14172, (* (( (ptr) gf_c54032)+51) ), (word) (( (bPt) gf_c54032)+384)/* var_c47952 */ , ggData_v8720, 0, 1 , 0); }; SOURCE(16410, 51) { word var_c51792; var_c51792 = (word) BuildButton_P2400(layout_v14172, (* (( (ptr) gf_c54032)+40) ), (word) (( (bPt) gf_c54032)+368)/* var_c47888 */ , ggData_v8720, 0, 1 , 0); }; SOURCE(16463, 117) { W2 var_c51824; (void) BuildDataFieldPair_P2520((word) &var_c51824, layout_v14172, (* (( (ptr) gf_c54032)+52) ), (word) (( (bPt) gf_c54032)+400) /* var_c48016 */ , ggData_v8720, 1); (* (( (ptr) tool_v14144)+1) ) = var_c51824.f1; }; SOURCE(16582, 62) (* (( (ptr) layout_v14172)+2) ) = ((* (( (ptr) layout_v14172)+2) ) + IOP2( / , (int)(* (( (ptr) layout_v14172)+5) ), (int)2) ); SOURCE(16646, 53) { word var_c51856; var_c51856 = (word) BuildButton_P2400(layout_v14172, (* (( (ptr) gf_c54032)+53) ), (word) (( (bPt) gf_c54032)+352)/* var_c47824 */ , ggData_v8720, 0, 1 , 0); }; SOURCE(16701, 53) { word var_c51888; var_c51888 = (word) BuildButton_P2400(layout_v14172, (* (( (ptr) gf_c54032)+54) ), (word) (( (bPt) gf_c54032)+336)/* var_c47760 */ , ggData_v8720, 0, 1 , 0); }; SOURCE(16756, 98) { W2 var_c51920; (void) BuildDataFieldPair_P2520((word) &var_c51920, layout_v14172, (* (( (ptr) gf_c54032)+55) ), (word) (( (bPt) gf_c54032)+392) /* var_c47984 */ , ggData_v8720, 1); (* (( (ptr) tool_v14144)+2) ) = var_c51920.f1; }; SOURCE(16856, 13) (void) HRule_P2700(layout_v14172, 1, 1, 1); SOURCE(16871, 199) { W28 var_c51952; W30 var_c0305; (* (ptr) (word) &var_c0305 ) = (* (( (ptr) gf_c54032)+56) ); XR_FillWords(&(* (W27Pt) (&var_c51952)), 27, 0); (* (( (ptr) &var_c51952)+1) ) = (* (ptr) layout_v14172 ); (* (( (ptr) &var_c51952)+2) ) = (* (( (ptr) layout_v14172)+2) ); (* (( (ptr) &var_c51952)+3) ) = 200; (* (( (ptr) &var_c51952)+4) ) = 700; (* (( (ptr) &var_c51952)+17) ) = (word) -1; (* (( (ptr) &var_c51952)+18) ) = 1; (* (( (ptr) &var_c51952)+19) ) = 1358954496; (* (( (ptr) &var_c51952)+22) ) = (* (( (ptr) layout_v14172)+7) ); (* (( (ptr) &var_c51952)+27) ) = 27; (* (W28Pt) (( (ptr) (word) &var_c0305) + 1) ) = (var_c51952 ); (* (( (ptr) (word) &var_c0305) + 29) ) = 0; { word pd154; pd154 = (* (( (ptr) (* (( (ptr) gf_c54032)+177)/* var_c51536 */ ))+6) ); (* (( (ptr) tool_v14144)+3) ) = (word) ( *( (fPt) ((* (ptr) pd154 ))))((word) (&var_c0305), pd154); }; }; SOURCE(17072, 56) { word pd155; pd155 = (* (( (ptr) (* (( (ptr) gf_c54032)+178)/* var_c51728 */ ))+5) ); (void) ( *( (fPt) ((* (ptr) pd155 ))))((* (( (ptr) layout_v14172)+7) ), (* (( (ptr) tool_v14144)+3) ), pd155); }; SOURCE(17130, 56) { word pd156; pd156 = (* (( (ptr) (* (( (ptr) gf_c54032)+178)/* var_c51728 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd156 ))))((* (( (ptr) layout_v14172)+7) ), (* (( (ptr) tool_v14144)+3) ), pd156); }; SOURCE(17188, 53) { word pd157; pd157 = (* (( (ptr) (* (( (ptr) gf_c54032)+177)/* var_c51536 */ ))+36) ); (void) ( *( (fPt) ((* (ptr) pd157 ))))((* (( (ptr) layout_v14172)+7) ), openHeight_v14088, pd157); }; SOURCE(17243, 13) return(tool_v14144); } static void EventNumberButton_P1740(parent_v20160, clientData_v20188, mouseButton_v20216, shift_v20244, control_v20272) word parent_v20160; word clientData_v20188; word mouseButton_v20216; word shift_v20244; word control_v20272; { register ptr gf_c54064 = (ptr) &globalframe; word ggData_v14244; word tool_v14272; /* EventNumberButton: */ SOURCE(17262, 170) SOURCE(17304, 35) ggData_v14244 = XR_Narrow(clientData_v20188, (* (( (ptr) gf_c54064)+29) )); SOURCE(17341, 39) tool_v14272 = (* (( (ptr) ggData_v14244)+45) ); SOURCE(17382, 50) (void) DataFieldButton_P2460((* (( (ptr) tool_v14272)+1) ), (unsigned) (mouseButton_v20216 != 0)); } static void HistorySizeButton_P1800(parent_v20332, clientData_v20360, mouseButton_v20388, shift_v20416, control_v20444) word parent_v20332; word clientData_v20360; word mouseButton_v20388; word shift_v20416; word control_v20444; { register ptr gf_c54096 = (ptr) &globalframe; word ggData_v14316; word tool_v14344; /* HistorySizeButton: */ SOURCE(17438, 166) SOURCE(17480, 35) ggData_v14316 = XR_Narrow(clientData_v20360, (* (( (ptr) gf_c54096)+29) )); SOURCE(17517, 39) tool_v14344 = (* (( (ptr) ggData_v14316)+45) ); SOURCE(17558, 46) (void) DataFieldButton_P2460((* (( (ptr) tool_v14344)+2) ), (unsigned) (mouseButton_v20388 != 0)); } static void SynchShow_P1860(parent_v20504, clientData_v20532, mouseButton_v20560, shift_v20588, control_v20616) word parent_v20504; word clientData_v20532; word mouseButton_v20560; word shift_v20588; word control_v20616; { register ptr gf_c54128 = (ptr) &globalframe; word ggData_v14388; word handle_v14416; word event_v14444; /* SynchShow: */ SOURCE(17610, 259) SOURCE(17644, 35) ggData_v14388 = XR_Narrow(clientData_v20532, (* (( (ptr) gf_c54128)+29) )); SOURCE(17681, 40) handle_v14416 = (* (( (ptr) ggData_v14388)+48) ); SOURCE(17723, 7) { word var_c52016; event_v14444 = XR_NewObject(8, (* (( (ptr) gf_c54128)+20) )); var_c52016 = event_v14444; (* (ptr) var_c52016 ) = (* (( (ptr) gf_c54128)+58) ); }; SOURCE(17764, 36) { word pd158; pd158 = (* (( (ptr) (* (( (ptr) gf_c54128)+179)/* var_c52048 */ ))+32) ); (void) ( *( (fPt) ((* (ptr) pd158 ))))(ggData_v14388, event_v14444, pd158); }; SOURCE(17809, 60) { word pd159; pd159 = (* (( (ptr) (* (( (ptr) gf_c54128)+180)/* var_c52080 */ ))+7) ); (void) ( *( (fPt) ((* (ptr) pd159 ))))(handle_v14416, (word) (( (bPt) gf_c54128)+376)/* var_c47920 */ , event_v14444, ggData_v14388, 0, (word) -1, pd159) ; }; } static void DoShow_P1920(clientData_v8824, inputAction_v8852) word clientData_v8824; word inputAction_v8852; { W7 var_c54160; register ptr gf_c54192 = (ptr) &globalframe; word ggData_v14584; word tool_v14612; word num_v14640 = 0; /* declaration of stop_v14668 skipped */ word h_v14696; word list_v14724; W2 var_c0337; /* DoShow: */ SOURCE(17875, 646) SOURCE(17932, 35) ggData_v14584 = XR_Narrow(clientData_v8824, (* (( (ptr) gf_c54192)+29) )); SOURCE(17969, 39) tool_v14612 = (* (( (ptr) ggData_v14584)+45) ); SOURCE(18010, 18) var_c54160.f4/* stop_v14668 */ = 0; SOURCE(18030, 23) { word pd160; pd160 = (* (( (ptr) (* (( (ptr) gf_c54192)+162)/* var_c49072 */ ))+34) ); h_v14696 = (word) ( *( (fPt) ((* (ptr) pd160 ))))(0, pd160); }; SOURCE(18055, 6) { word pd161; pd161 = (* (( (ptr) (* (( (ptr) gf_c54192)+170)/* var_c50992 */ ))+16) ); list_v14724 = (word) ( *( (fPt) ((* (ptr) pd161 ))))(ggData_v14584, pd161); }; SOURCE(18114, 40) { word pd162; pd162 = (* (( (ptr) (* (( (ptr) gf_c54192)+170)/* var_c50992 */ ))+5) ); (void) ( *( (fPt) ((* (ptr) pd162 ))))((word) &var_c0337, ggData_v14584, pd162); }; num_v14640 = var_c0337.f1; SOURCE(18180, 56) SOURCE(18180, 56) { /* declaration of var_c03 skipped */ var_c54160.f5/* var_c03 */ = (* (( (ptr) tool_v14612)+1) ); { /* declaration of var_c04 skipped */ { word var_c05; { word var_c0539; var_c0539 = (word) &var_c54160; var_c05 = (word) XR_Enable(( ((word) (fPt) NoName_Q4908) ), ( ((word) (fPt) NoName_Q5328) ), var_c0539); }; if ((var_c05 == 2)) { goto lab_L100048; }; }; var_c54160.f4/* stop_v14668 */ = var_c54160.f6/* var_c04 */ ; }; }; lab_L100048: ; SOURCE(18308, 143) lab_L100053: ; if ( ( ( ( (int)num_v14640 > (int)var_c54160.f4/* stop_v14668 */ ) ? (list_v14724 != 0) : 0 ) ? ((* (ptr) list_v14724 ) != 0) : 0 ) ) { } else { goto lab_L100051; }; SOURCE(18360, 60) { W2 var_c52112; W2 var_c52144; W2 var_c0540; var_c52112.f0 = 5; var_c52112.f1 = num_v14640; var_c52144.f0 = 11; var_c52144.f1 = (* (ptr) (* (ptr) list_v14724 ) ); (* (ptr) (word) &var_c0540 ) = 0; (* (( (ptr) (word) &var_c0540) + 1) ) = 0; { word pd163; pd163 = (* (( (ptr) (* (( (ptr) gf_c54192)+162)/* var_c49072 */ ))+60) ); (void) ( *( (fPt) ((* (ptr) pd163 ))))(h_v14696, (* (( (ptr) gf_c54192)+59) ), var_c52112, var_c52144, var_c0540, pd163) ; }; }; SOURCE(18422, 11) num_v14640 = (num_v14640 - 1); SOURCE(18435, 16) list_v14724 = (* (( (ptr) list_v14724)+1) ); goto lab_L100053; lab_L100051: ; SOURCE(18462, 59) { word var_c52208; { word pd164; pd164 = (* (( (ptr) (* (( (ptr) gf_c54192)+162)/* var_c49072 */ ))+35) ); var_c52208 = (word) ( *( (fPt) ((* (ptr) pd164 ))))(h_v14696, 1, pd164); }; { word pd165; pd165 = (* (( (ptr) (* (( (ptr) gf_c54192)+181)/* var_c52240 */ ))+9) ); (void) ( *( (fPt) ((* (ptr) pd165 ))))((* (( (ptr) tool_v14612)+3) ), var_c52208, pd165); }; }; } static word NoName_Q4908(formal_c0508) word formal_c0508; { SOURCE(18180, 56) (* (( (ptr) formal_c0508)+6) ) = (word) GetInt_P2580((* ((( (ptr) formal_c0508)+5)) )); return(0); } static void SynchUndo_P1980(parent_v20676, clientData_v20704, mouseButton_v20732, shift_v20760, control_v20788) word parent_v20676; word clientData_v20704; word mouseButton_v20732; word shift_v20760; word control_v20788; { register ptr gf_c54224 = (ptr) &globalframe; word ggData_v14852; word handle_v14880; word event_v14908; /* SynchUndo: */ SOURCE(18527, 259) SOURCE(18561, 35) ggData_v14852 = XR_Narrow(clientData_v20704, (* (( (ptr) gf_c54224)+29) )); SOURCE(18598, 40) handle_v14880 = (* (( (ptr) ggData_v14852)+48) ); SOURCE(18640, 7) { word var_c52304; event_v14908 = XR_NewObject(8, (* (( (ptr) gf_c54224)+20) )); var_c52304 = event_v14908; (* (ptr) var_c52304 ) = (* (( (ptr) gf_c54224)+60) ); }; SOURCE(18681, 36) { word pd166; pd166 = (* (( (ptr) (* (( (ptr) gf_c54224)+179)/* var_c52048 */ ))+32) ); (void) ( *( (fPt) ((* (ptr) pd166 ))))(ggData_v14852, event_v14908, pd166); }; SOURCE(18726, 60) { word pd167; pd167 = (* (( (ptr) (* (( (ptr) gf_c54224)+180)/* var_c52080 */ ))+7) ); (void) ( *( (fPt) ((* (ptr) pd167 ))))(handle_v14880, (word) (( (bPt) gf_c54224)+360)/* var_c47856 */ , event_v14908, ggData_v14852, 0, (word) -1, pd167) ; }; } static void DoUndo_P2040(clientData_v8940, inputAction_v8968) word clientData_v8940; word inputAction_v8968; { W6 var_c54256; register ptr gf_c54288 = (ptr) &globalframe; word ggData_v15048; /* DoUndo: */ SOURCE(18792, 560) SOURCE(18849, 35) ggData_v15048 = XR_Narrow(clientData_v8940, (* (( (ptr) gf_c54288)+29) )); SOURCE(18886, 466) SOURCE(18888, 39) { word tool_v15092; word num_v15120; W2 var_c0355; word stop_v15148; word back_v15176; SOURCE(18888, 39) tool_v15092 = (* (( (ptr) ggData_v15048)+45) ); SOURCE(18929, 45) { word pd168; pd168 = (* (( (ptr) (* (( (ptr) gf_c54288)+170)/* var_c50992 */ ))+5) ); (void) ( *( (fPt) ((* (ptr) pd168 ))))((word) &var_c0355, ggData_v15048, pd168); }; num_v15120 = var_c0355.f1; SOURCE(19000, 51) { /* declaration of var_c06 skipped */ var_c54256.f4/* var_c06 */ = (* (( (ptr) tool_v15092)+1) ); { /* declaration of var_c07 skipped */ { word var_c08; { word var_c0541; var_c0541 = (word) &var_c54256; var_c08 = (word) XR_Enable(( ((word) (fPt) NoName_Q4968) ), ( ((word) (fPt) NoName_Q5268) ), var_c0541); }; if ((var_c08 == 3)) { goto lab_L100054; }; }; stop_v15148 = var_c54256.f5/* var_c07 */ ; }; }; SOURCE(19118, 20) back_v15176 = (num_v15120 - stop_v15148); SOURCE(19140, 46) if (( (int)back_v15176 > (int)0)) { SOURCE(19157, 29) { word pd169; pd169 = (* (( (ptr) (* (( (ptr) gf_c54288)+170)/* var_c50992 */ ))+12) ); (void) ( *( (fPt) ((* (ptr) pd169 ))))(ggData_v15048, back_v15176, pd169); }; }; }; goto lab_L100057; lab_L100054: ; SOURCE(19201, 149) { word pd170; pd170 = (* (( (ptr) (* (( (ptr) gf_c54288)+175)/* var_c51472 */ ))+12) ); (void) ( *( (fPt) ((* (ptr) pd170 ))))((* (( (ptr) ggData_v15048)+3) ), 0, (* (( (ptr) gf_c54288)+45) ), (* (( (ptr) gf_c54288)+61) ), pd170); }; lab_L100057: ; } static word NoName_Q4968(formal_c0511) word formal_c0511; { SOURCE(19000, 51) (* (( (ptr) formal_c0511)+5) ) = (word) GetInt_P2580((* ((( (ptr) formal_c0511)+4)) )); return(0); } static void SynchGetSize_P2100(parent_v20848, clientData_v20876, mouseButton_v20904, shift_v20932, control_v20960) word parent_v20848; word clientData_v20876; word mouseButton_v20904; word shift_v20932; word control_v20960; { register ptr gf_c54320 = (ptr) &globalframe; word ggData_v15220; word handle_v15248; word event_v15276; /* SynchGetSize: */ SOURCE(19359, 268) SOURCE(19396, 35) ggData_v15220 = XR_Narrow(clientData_v20876, (* (( (ptr) gf_c54320)+29) )); SOURCE(19433, 40) handle_v15248 = (* (( (ptr) ggData_v15220)+48) ); SOURCE(19475, 7) { word var_c52368; event_v15276 = XR_NewObject(8, (* (( (ptr) gf_c54320)+20) )); var_c52368 = event_v15276; (* (ptr) var_c52368 ) = (* (( (ptr) gf_c54320)+62) ); }; SOURCE(19519, 36) { word pd171; pd171 = (* (( (ptr) (* (( (ptr) gf_c54320)+179)/* var_c52048 */ ))+32) ); (void) ( *( (fPt) ((* (ptr) pd171 ))))(ggData_v15220, event_v15276, pd171); }; SOURCE(19564, 63) { word pd172; pd172 = (* (( (ptr) (* (( (ptr) gf_c54320)+180)/* var_c52080 */ ))+7) ); (void) ( *( (fPt) ((* (ptr) pd172 ))))(handle_v15248, (word) (( (bPt) gf_c54320)+344)/* var_c47792 */ , event_v15276, ggData_v15220, 0, (word) -1, pd172) ; }; } static void DoGetSize_P2160(clientData_v9052, inputAction_v9080) word clientData_v9052; word inputAction_v9080; { register ptr gf_c54352 = (ptr) &globalframe; word ggData_v15416; word tool_v15444; /* DoGetSize: */ SOURCE(19633, 182) SOURCE(19693, 35) ggData_v15416 = XR_Narrow(clientData_v9052, (* (( (ptr) gf_c54352)+29) )); SOURCE(19730, 39) tool_v15444 = (* (( (ptr) ggData_v15416)+45) ); SOURCE(19771, 44) (void) SetInt_P2640((* (( (ptr) tool_v15444)+2) ), (* (( (ptr) ggData_v15416)+42) )); } static void SynchSetSize_P2220(parent_v21020, clientData_v21048, mouseButton_v21076, shift_v21104, control_v21132) word parent_v21020; word clientData_v21048; word mouseButton_v21076; word shift_v21104; word control_v21132; { register ptr gf_c54384 = (ptr) &globalframe; word ggData_v15488; word handle_v15516; word event_v15544; /* SynchSetSize: */ SOURCE(19821, 268) SOURCE(19858, 35) ggData_v15488 = XR_Narrow(clientData_v21048, (* (( (ptr) gf_c54384)+29) )); SOURCE(19895, 40) handle_v15516 = (* (( (ptr) ggData_v15488)+48) ); SOURCE(19937, 7) { word var_c52432; event_v15544 = XR_NewObject(8, (* (( (ptr) gf_c54384)+20) )); var_c52432 = event_v15544; (* (ptr) var_c52432 ) = (* (( (ptr) gf_c54384)+63) ); }; SOURCE(19981, 36) { word pd173; pd173 = (* (( (ptr) (* (( (ptr) gf_c54384)+179)/* var_c52048 */ ))+32) ); (void) ( *( (fPt) ((* (ptr) pd173 ))))(ggData_v15488, event_v15544, pd173); }; SOURCE(20026, 63) { word pd174; pd174 = (* (( (ptr) (* (( (ptr) gf_c54384)+180)/* var_c52080 */ ))+7) ); (void) ( *( (fPt) ((* (ptr) pd174 ))))(handle_v15516, (word) (( (bPt) gf_c54384)+328)/* var_c47728 */ , event_v15544, ggData_v15488, 0, (word) -1, pd174) ; }; } static void DoSetSize_P2280(clientData_v9164, inputAction_v9192) word clientData_v9164; word inputAction_v9192; { W6 var_c54416; register ptr gf_c54448 = (ptr) &globalframe; word ggData_v15684; /* DoSetSize: */ SOURCE(20095, 436) SOURCE(20155, 35) ggData_v15684 = XR_Narrow(clientData_v9164, (* (( (ptr) gf_c54448)+29) )); SOURCE(20192, 339) SOURCE(20194, 39) { word tool_v15728; word num_v15756; SOURCE(20194, 39) tool_v15728 = (* (( (ptr) ggData_v15684)+45) ); SOURCE(20235, 46) { /* declaration of var_c09 skipped */ var_c54416.f4/* var_c09 */ = (* (( (ptr) tool_v15728)+2) ); { /* declaration of var_c010 skipped */ { word var_c011; { word var_c0542; var_c0542 = (word) &var_c54416; var_c011 = (word) XR_Enable(( ((word) (fPt) NoName_Q5028) ), ( ((word) (fPt) NoName_Q5208) ), var_c0542); }; if ((var_c011 == 4)) { goto lab_L100058; }; }; num_v15756 = var_c54416.f5/* var_c010 */ ; }; }; SOURCE(20292, 50) if (( (int)num_v15756 <= (int)0)) { (* (( (ptr) ggData_v15684)+42) ) = 1; } else { (* (( (ptr) ggData_v15684)+42) ) = num_v15756; }; SOURCE(20344, 44) (void) SetInt_P2640((* (( (ptr) tool_v15728)+2) ), (* (( (ptr) ggData_v15684)+42) )); }; goto lab_L100061; lab_L100058: ; SOURCE(20403, 126) { word pd175; pd175 = (* (( (ptr) (* (( (ptr) gf_c54448)+175)/* var_c51472 */ ))+12) ); (void) ( *( (fPt) ((* (ptr) pd175 ))))((* (( (ptr) ggData_v15684)+3) ), 0, (* (( (ptr) gf_c54448)+45) ), (* (( (ptr) gf_c54448)+64) ), pd175); }; lab_L100061: ; } static word NoName_Q5028(formal_c0516) word formal_c0516; { SOURCE(20235, 46) (* (( (ptr) formal_c0516)+5) ) = (word) GetInt_P2580((* ((( (ptr) formal_c0516)+4)) )); return(0); } static void ClearTool_P2340(ggData_v9276) word ggData_v9276; { register ptr gf_c54480 = (ptr) &globalframe; word tool_v15800; /* ClearTool: */ SOURCE(20538, 199) SOURCE(20582, 40) tool_v15800 = (* (( (ptr) ggData_v9276)+45) ); SOURCE(20624, 113) if ((tool_v15800 != 0)) { SOURCE(20643, 45) { word pd176; pd176 = (* (( (ptr) (* (( (ptr) gf_c54480)+181)/* var_c52240 */ ))+9) ); (void) ( *( (fPt) ((* (ptr) pd176 ))))((* (( (ptr) tool_v15800)+3) ), 0, pd176); }; SOURCE(20690, 47) { word pd177; pd177 = (* (( (ptr) (* (( (ptr) gf_c54480)+181)/* var_c52240 */ ))+9) ); (void) ( *( (fPt) ((* (ptr) pd177 ))))((* (( (ptr) tool_v15800)+1) ), 0, pd177); }; }; } static word BuildButton_P2400(info_v9336, name_v9364, proc_v9392, clientData_v9420, fork_v9448, gapAfter_v9476, border_v9504) word info_v9336; word name_v9364; word proc_v9392; word clientData_v9420; word fork_v9448; word gapAfter_v9476; word border_v9504; { register ptr gf_c54512 = (ptr) &globalframe; word button_v9560; /* BuildButton: */ SOURCE(20747, 525) SOURCE(20747, 525) button_v9560 = 0; SOURCE(20952, 192) { W28 var_c52464; W36 var_c0396; (* (ptr) (word) &var_c0396 ) = (* (( (ptr) gf_c54512)+14)/* queue_v5884 */ ); XR_FillWords(&(* (W27Pt) (&var_c52464)), 27, 0); (* (( (ptr) &var_c52464)+1) ) = (* (ptr) info_v9336 ); (* (( (ptr) &var_c52464)+2) ) = (* (( (ptr) info_v9336)+2) ); (* (( (ptr) &var_c52464)+13) ) = name_v9364; (* (( (ptr) &var_c52464)+17) ) = (word) -1; (* (( (ptr) &var_c52464)+18) ) = 1; (* (( (ptr) &var_c52464)+19) ) = (((word) (unsigned) (border_v9504 & 1) << 27) + 1358954496); (* (( (ptr) &var_c52464)+22) ) = (* (( (ptr) info_v9336)+7) ); (* (( (ptr) &var_c52464)+27) ) = 27; (* (W28Pt) (( (ptr) (word) &var_c0396) + 1) ) = var_c52464; (* (( (ptr) (word) &var_c0396) + 29) ) = proc_v9392; (* (( (ptr) (word) &var_c0396) + 30) ) = clientData_v9420; (* (( (ptr) (word) &var_c0396) + 31) ) = 0; (* (( (ptr) (word) &var_c0396) + 32) ) = 0; (* (( (ptr) (word) &var_c0396) + 33) ) = 0; (* (( (ptr) (word) &var_c0396) + 34) ) = 0; (* (( (ptr) (word) &var_c0396) + 35) ) = 0; { word pd178; pd178 = (* (( (ptr) (* (( (ptr) gf_c54512)+160)/* var_c48976 */ ))+7) ); button_v9560 = (word) ( *( (fPt) ((* (ptr) pd178 ))))((word) (&var_c0396), pd178); }; }; SOURCE(21146, 43) (* (ptr) info_v9336 ) = ((* (ptr) info_v9336 ) + (* (( (ptr) button_v9560)+3) )); SOURCE(21191, 63) if ((0 != gapAfter_v9476)) { SOURCE(21208, 46) (* (ptr) info_v9336 ) = ((* (ptr) info_v9336 ) + (* (( (ptr) info_v9336)+6) )); }; SOURCE(21256, 16) return(button_v9560); } static void DataFieldButton_P2460(arg_v9620, clear_v9648) word arg_v9620; word clear_v9648; { register ptr gf_c54544 = (ptr) &globalframe; /* DataFieldButton: */ SOURCE(21278, 177) SOURCE(21345, 47) if ((0 != clear_v9648)) { SOURCE(21359, 33) { word pd179; pd179 = (* (( (ptr) (* (( (ptr) gf_c54544)+182)/* var_c52496 */ ))+11) ); (void) ( *( (fPt) ((* (ptr) pd179 ))))(arg_v9620, 0, 1, pd179); }; }; SOURCE(21421, 34) { word pd180; pd180 = (* (( (ptr) (* (( (ptr) gf_c54544)+182)/* var_c52496 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd180 ))))(arg_v9620, 0, pd180); }; } static void BuildDataFieldPair_P2520(formal_c0408, info_v9708, buttonRope_v9736, buttonProc_v9764, clientData_v9792, lines_v9820) word formal_c0408; word info_v9708; word buttonRope_v9736; word buttonProc_v9764; word clientData_v9792; word lines_v9820; { register ptr gf_c54576 = (ptr) &globalframe; word button_v9876; word arg_v9904; /* BuildDataFieldPair: */ SOURCE(21512, 739) SOURCE(21512, 739) button_v9876 = 0; SOURCE(21512, 739) arg_v9904 = 0; SOURCE(21740, 122) button_v9876 = (word) BuildButton_P2400(info_v9708, buttonRope_v9736, buttonProc_v9764, clientData_v9792, 0, 0 , 0); SOURCE(21864, 248) { W28 var_c52528; W30 var_c0407; (* (ptr) (word) &var_c0407 ) = (* (( (ptr) gf_c54576)+56) ); XR_FillWords(&(* (W27Pt) (&var_c52528)), 27, 0); (* (( (ptr) &var_c52528)+1) ) = (* (ptr) info_v9708 ); (* (( (ptr) &var_c52528)+2) ) = ((* (( (ptr) info_v9708)+2) ) + 1); (* (( (ptr) &var_c52528)+3) ) = (((* (ptr) (* (( (ptr) (* (( (ptr) gf_c54576)+183)/* var_c52560 */ ))+18) ) ) - (* (ptr) info_v9708 )) - 5); (* (( (ptr) &var_c52528)+4) ) = IOP2( * , (int)(* (( (ptr) info_v9708)+4) ), (int)lines_v9820); (* (( (ptr) &var_c52528)+17) ) = (word) -1; (* (( (ptr) &var_c52528)+18) ) = 1; (* (( (ptr) &var_c52528)+19) ) = 285212672; (* (( (ptr) &var_c52528)+22) ) = (* (( (ptr) info_v9708)+7) ); (* (( (ptr) &var_c52528)+27) ) = 27; (* (W28Pt) (( (ptr) (word) &var_c0407) + 1) ) = (var_c52528 ); (* (( (ptr) (word) &var_c0407) + 29) ) = 0; { word pd181; pd181 = (* (( (ptr) (* (( (ptr) gf_c54576)+177)/* var_c51536 */ ))+6) ); arg_v9904 = (word) ( *( (fPt) ((* (ptr) pd181 ))))((word) (&var_c0407), pd181); }; }; SOURCE(22114, 60) (* (( (ptr) info_v9708)+2) ) = ((* (( (ptr) info_v9708)+2) ) + IOP2( * , (int)(* (( (ptr) info_v9708)+4) ), (int)lines_v9820) ); SOURCE(22176, 30) (* (ptr) info_v9708 ) = (* (( (ptr) info_v9708)+1) ); SOURCE(22208, 43) { word pd182; pd182 = (* (( (ptr) (* (( (ptr) gf_c54576)+178)/* var_c51728 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd182 ))))((* (( (ptr) info_v9708)+7) ), arg_v9904, pd182); }; /* removed tail goto */ (* (ptr) formal_c0408 ) = button_v9876; (* (( (ptr) formal_c0408)+1) ) = arg_v9904; return; } static word GetInt_P2580(arg_v9964) word arg_v9964; { W7 var_c54608; register ptr gf_c54640 = (ptr) &globalframe; word num_v10008; /* GetInt: */ SOURCE(22257, 238) SOURCE(22319, 176) SOURCE(22321, 47) { word rope_v15888; /* declaration of h_v15916 skipped */ SOURCE(22321, 47) { word pd183; pd183 = (* (( (ptr) (* (( (ptr) gf_c54640)+181)/* var_c52240 */ ))+8) ); rope_v15888 = (word) ( *( (fPt) ((* (ptr) pd183 ))))(arg_v9964, pd183); }; SOURCE(22370, 27) { word pd184; pd184 = (* (( (ptr) (* (( (ptr) gf_c54640)+162)/* var_c49072 */ ))+33) ); var_c54608.f4/* h_v15916 */ = (word) ( *( (fPt) ((* (ptr) pd184 ))))(rope_v15888, 0, pd184); }; SOURCE(22399, 48) { /* declaration of var_c012 skipped */ var_c54608.f5/* var_c012 */ = (* (( (ptr) (* (( (ptr) gf_c54640)+162)/* var_c49072 */ ))+72) ); { /* declaration of var_c013 skipped */ { word var_c014; { word var_c0543; var_c0543 = (word) &var_c54608; var_c014 = (word) XR_Enable(( ((word) (fPt) NoName_Q5088) ), ( ((word) (fPt) NoName_Q5148) ), var_c0543); }; if ((var_c014 == 5)) { goto lab_L100063; }; }; num_v10008 = var_c54608.f6/* var_c013 */ ; }; }; }; goto lab_L100066; lab_L100063: ; SOURCE(22477, 16) (void) (XR_RaiseSignal((word) (( (bPt) gf_c54640)+268), 0, 0)); lab_L100066: ; SOURCE(22257, 238) return(num_v10008); } static word NoName_Q5088(formal_c0522) word formal_c0522; { SOURCE(22399, 48) { word pd185; pd185 = (* (( (ptr) formal_c0522)+5) ); (* (( (ptr) formal_c0522)+6) ) = (word) ( *( (fPt) ((* (ptr) pd185 ))))((* ((( (ptr) formal_c0522)+4)) ), pd185); }; return(0); } static void SetInt_P2640(arg_v10068, num_v10096) word arg_v10068; word num_v10096; { register ptr gf_c54672 = (ptr) &globalframe; word h_v15960; /* SetInt: */ SOURCE(22499, 153) SOURCE(22554, 23) { word pd186; pd186 = (* (( (ptr) (* (( (ptr) gf_c54672)+162)/* var_c49072 */ ))+34) ); h_v15960 = (word) ( *( (fPt) ((* (ptr) pd186 ))))(0, pd186); }; SOURCE(22579, 23) { W2 var_c52592; var_c52592.f0 = 5; var_c52592.f1 = num_v10096; { word pd187; pd187 = (* (( (ptr) (* (( (ptr) gf_c54672)+162)/* var_c49072 */ ))+55) ); (void) ( *( (fPt) ((* (ptr) pd187 ))))(h_v15960, var_c52592, pd187); }; }; SOURCE(22604, 48) { word var_c52624; { word pd188; pd188 = (* (( (ptr) (* (( (ptr) gf_c54672)+162)/* var_c49072 */ ))+35) ); var_c52624 = (word) ( *( (fPt) ((* (ptr) pd188 ))))(h_v15960, 1, pd188); }; { word pd189; pd189 = (* (( (ptr) (* (( (ptr) gf_c54672)+181)/* var_c52240 */ ))+9) ); (void) ( *( (fPt) ((* (ptr) pd189 ))))(arg_v10068, var_c52624, pd189); }; }; } static void HRule_P2700(info_v10156, thickness_v10184, gapAbove_v10212, gapBelow_v10240) word info_v10156; word thickness_v10184; word gapAbove_v10212; word gapBelow_v10240; { register ptr gf_c54704 = (ptr) &globalframe; word rule_v16004 = 0; /* HRule: */ SOURCE(22658, 511) SOURCE(22765, 73) if ((0 != gapAbove_v10212)) { SOURCE(22782, 56) (* (( (ptr) info_v10156)+2) ) = ((* (( (ptr) info_v10156)+2) ) + IOP2( * , (int)(* (( (ptr) info_v10156)+5) ), (int)2)); }; SOURCE(22840, 141) { W28 var_c52656; W30 var_c0424; XR_FillWords(&(* (W27Pt) (&var_c52656)), 27, 0); (* (( (ptr) &var_c52656)+2) ) = (* (( (ptr) info_v10156)+2) ); (* (( (ptr) &var_c52656)+3) ) = (* (ptr) (* (( (ptr) (* (( (ptr) gf_c54704)+183)/* var_c52560 */ ))+18) ) ); (* (( (ptr) &var_c52656)+4) ) = SGNCK(thickness_v10184); (* (( (ptr) &var_c52656)+17) ) = (word) -1; (* (( (ptr) &var_c52656)+18) ) = 1; (* (( (ptr) &var_c52656)+19) ) = 1493172224; (* (( (ptr) &var_c52656)+22) ) = (* (( (ptr) info_v10156)+7) ); (* (( (ptr) &var_c52656)+27) ) = 27; (* (W28Pt) (word) &var_c0424 ) = var_c52656; (* (( (ptr) (word) &var_c0424) + 28) ) = 0; (* (( (ptr) (word) &var_c0424) + 29) ) = 0; { word pd190; pd190 = (* (( (ptr) (* (( (ptr) gf_c54704)+184)/* var_c52688 */ ))+4) ); rule_v16004 = (word) ( *( (fPt) ((* (ptr) pd190 ))))((word) (&var_c0424), pd190); }; }; SOURCE(22983, 62) { word pd191; pd191 = (* (( (ptr) (* (( (ptr) gf_c54704)+178)/* var_c51728 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd191 ))))((* (( (ptr) info_v10156)+7) ), rule_v16004, pd191); }; SOURCE(23047, 47) (* (( (ptr) info_v10156)+2) ) = ((* (( (ptr) info_v10156)+2) ) + thickness_v10184); SOURCE(23096, 73) if ((0 != gapBelow_v10240)) { SOURCE(23113, 56) (* (( (ptr) info_v10156)+2) ) = ((* (( (ptr) info_v10156)+2) ) + IOP2( * , (int)(* (( (ptr) info_v10156)+5) ), (int)2)); }; } static void NoName_Q5148(formal_c0429, formal_c200028, formal_c200029, formal_c200030, formal_c200031) word formal_c0429; word formal_c200028; word formal_c200029; word formal_c200030; word formal_c200031; { register ptr gf_c0525 = (ptr) &globalframe; if ((formal_c200029 == (* (( (ptr) (* (( (ptr) gf_c0525)+162)/* var_c49072 */ ))+5) )) || (formal_c200029 == (* (( (ptr) (* ( ( (ptr) gf_c0525)+162)/* var_c49072 */ ))+4) ))) { SOURCE(22447, 12) (* (ptr) formal_c0429 ) = 2; (* (( (ptr) formal_c0429)+1) ) = 5; return; }; (* (ptr) formal_c0429 ) = 0; (* (( (ptr) formal_c0429)+1) ) = 0; return; } static void NoName_Q5208(formal_c0434, formal_c200024, formal_c200025, formal_c200026, formal_c200027) word formal_c0434; word formal_c200024; word formal_c200025; word formal_c200026; word formal_c200027; { register ptr gf_c0526 = (ptr) &globalframe; if ((formal_c200025 == (word) (( (bPt) gf_c0526)+268))) { SOURCE(20281, 9) (* (ptr) formal_c0434 ) = 2; (* (( (ptr) formal_c0434)+1) ) = 4; return; }; (* (ptr) formal_c0434 ) = 0; (* (( (ptr) formal_c0434)+1) ) = 0; return; } static void NoName_Q5268(formal_c0439, formal_c200020, formal_c200021, formal_c200022, formal_c200023) word formal_c0439; word formal_c200020; word formal_c200021; word formal_c200022; word formal_c200023; { register ptr gf_c0527 = (ptr) &globalframe; if ((formal_c200021 == (word) (( (bPt) gf_c0527)+268))) { SOURCE(19051, 9) (* (ptr) formal_c0439 ) = 2; (* (( (ptr) formal_c0439)+1) ) = 3; return; }; (* (ptr) formal_c0439 ) = 0; (* (( (ptr) formal_c0439)+1) ) = 0; return; } static void NoName_Q5328(formal_c0444, formal_c200016, formal_c200017, formal_c200018, formal_c200019) word formal_c0444; word formal_c200016; word formal_c200017; word formal_c200018; word formal_c200019; { register ptr gf_c0528 = (ptr) &globalframe; if ((formal_c200017 == (word) (( (bPt) gf_c0528)+268))) { SOURCE(18228, 8) (* (( (ptr) formal_c200016)+4) ) = 0; SOURCE(18238, 9) (* (ptr) formal_c0444 ) = 2; (* (( (ptr) formal_c0444)+1) ) = 2; return; }; (* (ptr) formal_c0444 ) = 0; (* (( (ptr) formal_c0444)+1) ) = 0; return; } static void NoName_Q5388(formal_c0449, formal_c200012, formal_c200013, formal_c200014, formal_c200015) word formal_c0449; word formal_c200012; word formal_c200013; word formal_c200014; word formal_c200015; { register ptr gf_c0529 = (ptr) &globalframe; if ((formal_c200013 == XR_Unwind)) { (void) (XR_MonitorExit((word) (( (bPt) gf_c0529)+16)/* LOCK_v3952 */ )); }; (* (ptr) formal_c0449 ) = 0; (* (( (ptr) formal_c0449)+1) ) = 0; return; } static void NoName_Q5448(formal_c0454, formal_c200008, formal_c200009, formal_c200010, formal_c200011) word formal_c0454; word formal_c200008; word formal_c200009; word formal_c200010; word formal_c200011; { register ptr gf_c0530 = (ptr) &globalframe; if ((formal_c200009 == XR_Unwind)) { (void) (XR_MonitorExit((word) (( (bPt) gf_c0530)+16)/* LOCK_v3952 */ )); }; (* (ptr) formal_c0454 ) = 0; (* (( (ptr) formal_c0454)+1) ) = 0; return; } static void NoName_Q5508(formal_c0459, formal_c200004, formal_c200005, formal_c200006, formal_c200007) word formal_c0459; word formal_c200004; word formal_c200005; word formal_c200006; word formal_c200007; { register ptr gf_c0531 = (ptr) &globalframe; if ((formal_c200005 == XR_Unwind)) { (void) (XR_MonitorExit((word) (( (bPt) gf_c0531)+16)/* LOCK_v3952 */ )); }; (* (ptr) formal_c0459 ) = 0; (* (( (ptr) formal_c0459)+1) ) = 0; return; } static void NoName_Q5568(formal_c0464, formal_c200000, formal_c200001, formal_c200002, formal_c200003) word formal_c0464; word formal_c200000; word formal_c200001; word formal_c200002; word formal_c200003; { register ptr gf_c0532 = (ptr) &globalframe; if ((formal_c200001 == XR_Unwind)) { (void) (XR_MonitorExit((word) (( (bPt) gf_c0532)+16)/* LOCK_v3952 */ )); }; (* (ptr) formal_c0464 ) = 0; (* (( (ptr) formal_c0464)+1) ) = 0; return; } /* file: GGHistoryImpl, module: GGHistoryImpl, compiled at: July 11, 1993 8:03:21 pm PDT */ extern void XR_install_GGHistoryImpl() { NoName_Q4608(); } extern void XR_run_GGHistoryImpl() { XR_Start(&globalframe); }