/* Generated with C2C (Cedar To C)*/ /* Copyright (C) 1993 by Xerox Corporation. All rights reserved. */ /* time: February 24, 1993 0:05:57 am PST */ /* C2C version: January 29, 1993 (sun4) */ /* ref-counting: off */ /* file: XTkOpsImpl, module: XTkOpsImpl */ /* switches: bcfhklnouw */ #include <cedar/InstallationSupport.h> #include <cedar/CedarExtra.h> static char versionStamp[] = "@(#)mob←version [3282180165,2618423038] XTkOpsImpl"; typedef unsigned word, *ptr; typedef unsigned char byte, *bPt; typedef unsigned short half, *hPt; typedef struct {word f0, f1, f2, f3;} W4; typedef word (*fPt)(); #define SOURCE(p, l) /* source p, l */ static void NoName←Q708(); static void XTkOpsImpl←P0(); static void RegisterNotifierProcOnEvents←P60(); static void CallThisNotifierNow←P120(); static void RegisterCallNotifiersOnEvents←P180(); static void CallRegisteredNotifiersNow←P240(); static void RemoveRegisteredNotifiers←P300(); static void GetWidgetPropStar←P360(); static void TriggerNotify←P420(); static void CanUnregisterNotify←P480(); static void SetupDestruction←P540(); static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\303\242\030\105\300\234\021\366\376\100\230\000\000"}; static struct {unsigned f; char r[4];} string2 = {131074, "\004\015\000"}; static struct {unsigned f; char r[16];} string3 = {851984, "\257\300\303\242\030\105\300\234\021\366\376\100\260\000\000"}; static struct {unsigned f; char r[4];} string4 = {131074, "\004\007\000"}; static struct {unsigned f; char r[16];} string5 = {851984, "\257\300\303\242\030\105\300\234\021\366\376\100\324\000\000"}; static struct {unsigned f; char r[16];} string6 = {851984, "\257\300\303\242\030\105\300\234\021\366\376\100\200\000\000"}; static struct {unsigned f; char r[16];} string7 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\100\164\000\000"}; static struct {unsigned f; char r[16];} string8 = {851984, "\257\300\033\115\307\000\300\214\060\055\310\100\150\000\000"}; static struct {unsigned f; char r[16];} string9 = {851984, "\257\300\227\370\144\253\300\176\165\034\110\100\150\000\000"}; static struct {unsigned f; char r[16];} string10 = {851984, "\257\300\054\174\025\242\300\120\014\117\154\100\150\000\000"}; static struct {unsigned f; char r[16];} string11 = {851984, "\257\300\372\252\147\374\300\170\207\127\200\100\150\000\000"}; static struct { word f0[7]; word f7; word f8; word f9; word f10; word f11; word f12; word f13; word f14; word f15; word f16; word f17; word f18; word f19; word f20; word f21; word f22; word f23; word f24; word f25; word f26[6]; } globalframe = { {0}, (word) SetupDestruction←P540, 0, (word) CanUnregisterNotify←P480, 0, (word) TriggerNotify←P420, 0, (word) GetWidgetPropStar←P360, 0, (word) RemoveRegisteredNotifiers←P300, 0, (word) CallRegisteredNotifiersNow←P240, 0, (word) RegisterCallNotifiersOnEvents←P180, 0, (word) CallThisNotifierNow←P120, 0, (word) RegisterNotifierProcOnEvents←P60, 0, (word) XTkOpsImpl←P0, {0} }; static void NoName←Q708() { register ptr gf←c077 = (ptr) &globalframe; word var←c9660; (* (( (ptr) gf←c077)+4) ) = (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2); (* (( (ptr) gf←c077)+5) ) = (word) XR←GetTypeIndex((word) &string3, 0, (word) &string4); (* (( (ptr) gf←c077)+6) ) = (word) XR←GetTypeIndex((word) &string5, 0, (word) &string4); (void) XR←DeclareGlobalFrame((word) "XTkOpsImpl", &globalframe, (word) XR←GetTypeIndexS((word) (&string6)), (word) (( (bPt) gf←c077)+100) /* var←c9276 */ ); var←c9660 = (word) XR←ImportInterface((word) "Xl", (word) XR←GetTypeIndexS((word) (&string7)), 218); (* (( (ptr) gf←c077)+29)/* var←c9564 */ ) = var←c9660; (void) XR←ImportProcS(var←c9660, 67639298); var←c9660 = (word) XR←ImportInterface((word) "XTk", (word) XR←GetTypeIndexS((word) (&string8)), 50); (* (( (ptr) gf←c077)+27)/* var←c9372 */ ) = var←c9660; (void) XR←ImportProcS(var←c9660, 1050884); (void) XR←ImportProcS(var←c9660, 67634690); (void) XR←ImportProcS(var←c9660, 1050628); (void) XR←ImportProcS(var←c9660, 1579523); (void) XR←ImportProcS(var←c9660, 1579779); var←c9660 = (word) XR←ImportInterface((word) "XTkFriends", (word) XR←GetTypeIndexS((word) (&string9)), 33); (* (( (ptr) gf←c077)+28)/* var←c9532 */ ) = var←c9660; (void) XR←ImportProcS(var←c9660, 524546); (void) XR←ImportProcS(var←c9660, 1048580); var←c9660 = (word) XR←ImportInterface((word) "XTkShellWidgets", (word) XR←GetTypeIndexS((word) (&string10)), 26); (* (( (ptr) gf←c077)+30)/* var←c9596 */ ) = var←c9660; (void) XR←ImportProcS(var←c9660, 264705); var←c9660 = (word) XR←ExportInterface((word) "XTkOps", (word) XR←GetTypeIndexS((word) (&string11)), 5); (* (( (ptr) gf←c077)+31)/* var←c9692 */ ) = var←c9660; (void) XR←ExportProcS(var←c9660, (word) (( (bPt) gf←c077)+92)/* var←c9244 */ , 2097160); (void) XR←ExportProcS(var←c9660, (word) (( (bPt) gf←c077)+76)/* var←c9180 */ , 1835271); (void) XR←ExportProcS(var←c9660, (word) (( (bPt) gf←c077)+52)/* var←c9084 */ , 134742786); (void) XR←ExportProcS(var←c9660, (word) (( (bPt) gf←c077)+28)/* var←c8988 */ , 787459); } static void XTkOpsImpl←P0(formal←c019, formal←c018) word formal←c019; word formal←c018; { /* XTkOpsImpl: */ } static void RegisterNotifierProcOnEvents←P60(widget←v3052, handles←v3080, tq←v3108, generate←v3136, proc←v3164, registerData←v3192, callData←v3220, temporary←v3248) word widget←v3052; word handles←v3080; word tq←v3108; word generate←v3136; word proc←v3164; word registerData←v3192; word callData←v3220; word temporary←v3248; { register ptr gf←c9724 = (ptr) &globalframe; word d←v4220; /* RegisterNotifierProcOnEvents: */ SOURCE(196, 580) SOURCE(413, 121) d←v4220 = XR←NewObject(16, (* (( (ptr) gf←c9724)+4) )); (* (ptr) d←v4220 ) = widget←v3052; (* (( (ptr) d←v4220)+1) ) = XR←CheckProc(proc←v3164); (* (( (ptr) d←v4220)+2) ) = registerData←v3192; (* (( (ptr) d←v4220)+3) ) = callData←v3220; SOURCE(536, 33) if ((tq←v3108 == 0)) { SOURCE(551, 18) tq←v3108 = (* (( (ptr) widget←v3052)+45) ); }; SOURCE(571, 17) if ((proc←v3164 == 0)) { SOURCE(588, 5) (void) XR←RaiseUnnamedError(); }; SOURCE(595, 181) if ((0 != temporary←v3248)) { SOURCE(614, 84) { W4 var←c9340; var←c9340.f0 = (word) (( (bPt) gf←c9724)+84)/* var←c9212 */ ; var←c9340.f1 = handles←v3080; var←c9340.f2 = tq←v3108; var←c9340.f3 = d←v4220; { word pd12; pd12 = (* (( (ptr) (* (( (ptr) gf←c9724)+27)/* var←c9372 */ ))+31) ); (void) ( *( (fPt) ((* (ptr) pd12 ))))(widget←v3052, var←c9340, generate←v3136, pd12); }; }; } else { SOURCE(698, 78) { W4 var←c9404; var←c9404.f0 = (word) (( (bPt) gf←c9724)+84)/* var←c9212 */ ; var←c9404.f1 = handles←v3080; var←c9404.f2 = tq←v3108; var←c9404.f3 = d←v4220; { word pd13; pd13 = (* (( (ptr) (* (( (ptr) gf←c9724)+27)/* var←c9372 */ ))+30) ); (void) ( *( (fPt) ((* (ptr) pd13 ))))(widget←v3052, var←c9404, generate←v3136, pd13); }; }; }; } static void CallThisNotifierNow←P120(event←v5800, clientData←v5828, tq←v5856) word event←v5800; word clientData←v5828; word tq←v5856; { register ptr gf←c9756 = (ptr) &globalframe; word d←v4276; /* CallThisNotifierNow: */ SOURCE(782, 173) SOURCE(824, 44) d←v4276 = XR←Narrow(clientData←v5828, (* (( (ptr) gf←c9756)+4) )); SOURCE(870, 85) { word pd14; pd14 = (* (( (ptr) d←v4276)+1) ); (void) ( *( (fPt) ((* (ptr) pd14 ))))((* (ptr) d←v4276 ), (* (( (ptr) d←v4276)+2) ), (* (( (ptr) d←v4276)+3) ), event←v5800, pd14) ; }; } static void RegisterCallNotifiersOnEvents←P180(widget←v3464, handles←v3492, tq←v3520, generate←v3548, notifierKey←v3576, callData←v3604, temporary←v3632) word widget←v3464; word handles←v3492; word tq←v3520; word generate←v3548; word notifierKey←v3576; word callData←v3604; word temporary←v3632; { register ptr gf←c9788 = (ptr) &globalframe; word d←v4332; /* RegisterCallNotifiersOnEvents: */ SOURCE(1071, 628) SOURCE(1259, 121) d←v4332 = XR←NewObject(12, (* (( (ptr) gf←c9788)+5) )); (* (ptr) d←v4332 ) = widget←v3464; (* (( (ptr) d←v4332)+1) ) = notifierKey←v3576; (* (( (ptr) d←v4332)+2) ) = callData←v3604; SOURCE(1382, 33) if ((tq←v3520 == 0)) { SOURCE(1397, 18) tq←v3520 = (* (( (ptr) widget←v3464)+45) ); }; SOURCE(1417, 85) { word pd15; pd15 = (* (( (ptr) (* (( (ptr) gf←c9788)+27)/* var←c9372 */ ))+12) ); (void) ( *( (fPt) ((* (ptr) pd15 ))))(widget←v3464, (* (ptr) (* (( (ptr) (* (( (ptr) gf←c9788)+27)/* var←c9372 */ ))+24) ) ), (word) (( (bPt) gf←c9788)+60)/* var←c9116 */ , d←v4332, pd15); }; SOURCE(1504, 195) if ((0 != temporary←v3632)) { SOURCE(1523, 91) { W4 var←c9468; var←c9468.f0 = (word) (( (bPt) gf←c9788)+68)/* var←c9148 */ ; var←c9468.f1 = handles←v3492; var←c9468.f2 = tq←v3520; var←c9468.f3 = d←v4332; { word pd16; pd16 = (* (( (ptr) (* (( (ptr) gf←c9788)+27)/* var←c9372 */ ))+31) ); (void) ( *( (fPt) ((* (ptr) pd16 ))))(widget←v3464, var←c9468, generate←v3548, pd16); }; }; } else { SOURCE(1614, 85) { W4 var←c9500; var←c9500.f0 = (word) (( (bPt) gf←c9788)+68)/* var←c9148 */ ; var←c9500.f1 = handles←v3492; var←c9500.f2 = tq←v3520; var←c9500.f3 = d←v4332; { word pd17; pd17 = (* (( (ptr) (* (( (ptr) gf←c9788)+27)/* var←c9372 */ ))+30) ); (void) ( *( (fPt) ((* (ptr) pd17 ))))(widget←v3464, var←c9500, generate←v3548, pd17); }; }; }; } static void CallRegisteredNotifiersNow←P240(event←v5916, clientData←v5944, tq←v5972) word event←v5916; word clientData←v5944; word tq←v5972; { register ptr gf←c9820 = (ptr) &globalframe; word d←v4388; /* CallRegisteredNotifiersNow: */ SOURCE(1791, 195) SOURCE(1840, 51) d←v4388 = XR←Narrow(clientData←v5944, (* (( (ptr) gf←c9820)+5) )); SOURCE(1893, 93) { word pd18; pd18 = (* (( (ptr) (* (( (ptr) gf←c9820)+28)/* var←c9532 */ ))+4) ); (void) ( *( (fPt) ((* (ptr) pd18 ))))((* (ptr) d←v4388 ), (* (( (ptr) d←v4388)+1) ), (* (( (ptr) d←v4388)+2) ), event←v5916, pd18) ; }; } static void RemoveRegisteredNotifiers←P300(widget←v6032, registerData←v6060, callData←v6088, event←v6116) word widget←v6032; word registerData←v6060; word callData←v6088; word event←v6116; { register ptr gf←c9852 = (ptr) &globalframe; word d←v4444; /* RemoveRegisteredNotifiers: */ SOURCE(1993, 166) SOURCE(2045, 53) d←v4444 = XR←Narrow(registerData←v6060, (* (( (ptr) gf←c9852)+5) )); SOURCE(2100, 59) { word pd19; pd19 = (* (( (ptr) (* (( (ptr) gf←c9852)+28)/* var←c9532 */ ))+5) ); (void) ( *( (fPt) ((* (ptr) pd19 ))))((* (ptr) d←v4444 ), (* (( (ptr) d←v4444)+1) ), pd19); }; } static void GetWidgetPropStar←P360(formal←c059, w←v3828, key←v3856) word formal←c059; word w←v3828; word key←v3856; { register ptr gf←c9884 = (ptr) &globalframe; word val←v3912; word who←v3940; /* GetWidgetPropStar: */ SOURCE(2165, 380) SOURCE(2165, 380) val←v3912 = 0; SOURCE(2165, 380) who←v3940 = 0; SOURCE(2274, 31) { word pd20; pd20 = (* (( (ptr) (* (( (ptr) gf←c9884)+27)/* var←c9372 */ ))+10) ); val←v3912 = (word) ( *( (fPt) ((* (ptr) pd20 ))))(w←v3828, key←v3856, pd20); }; SOURCE(2307, 7) who←v3940 = w←v3828; SOURCE(2316, 89) lab←L100003: ; if ( ( (val←v3912 == 0) ? ((* (( (ptr) w←v3828)+31) ) != 0) : 0 ) ) { } else { goto lab←L100001; }; SOURCE(2351, 12) w←v3828 = (* (( (ptr) w←v3828)+31) ); SOURCE(2365, 31) { word pd21; pd21 = (* (( (ptr) (* (( (ptr) gf←c9884)+27)/* var←c9372 */ ))+10) ); val←v3912 = (word) ( *( (fPt) ((* (ptr) pd21 ))))(w←v3828, key←v3856, pd21); }; SOURCE(2398, 7) who←v3940 = w←v3828; goto lab←L100003; lab←L100001: ; SOURCE(2416, 129) if ((val←v3912 == 0)) { SOURCE(2432, 113) { word c←v4500; SOURCE(2434, 31) c←v4500 = (* (( (ptr) w←v3828)+34) ); SOURCE(2467, 65) if ( ( (c←v4500 != 0) ? (0 != (* (( (ptr) c←v4500)+15) )) : 0 ) ) { SOURCE(2487, 45) { word pd22; pd22 = (* (( (ptr) (* (( (ptr) gf←c9884)+29)/* var←c9564 */ ))+28) ); val←v3912 = (word) ( *( (fPt) ((* (ptr) pd22 ))))((* (( (ptr) w←v3828)+34) ), key←v3856, pd22); }; }; SOURCE(2535, 10) who←v3940 = 0; }; }; /* removed tail goto */ (* (ptr) formal←c059 ) = val←v3912; (* (( (ptr) formal←c059)+1) ) = who←v3940; return; } static void TriggerNotify←P420(widget←v6176, registerData←v6204, callData←v6232, event←v6260) word widget←v6176; word registerData←v6204; word callData←v6232; word event←v6260; { register ptr gf←c9916 = (ptr) &globalframe; word drr←v4544; word shell←v4572; /* TriggerNotify: */ SOURCE(2665, 194) SOURCE(2705, 49) drr←v4544 = XR←Narrow(registerData←v6204, (* (( (ptr) gf←c9916)+6) )); SOURCE(2756, 29) shell←v4572 = (* (ptr) drr←v4544 ); SOURCE(2787, 72) if ((shell←v4572 != 0)) { SOURCE(2807, 35) { word pd23; pd23 = (* (( (ptr) (* (( (ptr) gf←c9916)+30)/* var←c9596 */ ))+14) ); (void) ( *( (fPt) ((* (ptr) pd23 ))))(shell←v4572, pd23); }; SOURCE(2844, 15) (* (ptr) drr←v4544 ) = 0; }; } static void CanUnregisterNotify←P480(widget←v6320, registerData←v6348, callData←v6376, event←v6404) word widget←v6320; word registerData←v6348; word callData←v6376; word event←v6404; { register ptr gf←c9948 = (ptr) &globalframe; word drr←v4628; word trigger←v4656; /* CanUnregisterNotify: */ SOURCE(2891, 240) SOURCE(2937, 49) drr←v4628 = XR←Narrow(registerData←v6348, (* (( (ptr) gf←c9948)+6) )); SOURCE(2988, 33) trigger←v4656 = (* (( (ptr) drr←v4628)+2) ); SOURCE(3023, 108) if ((trigger←v4656 != 0)) { SOURCE(3045, 67) { word pd24; pd24 = (* (( (ptr) (* (( (ptr) gf←c9948)+27)/* var←c9372 */ ))+13) ); (void) ( *( (fPt) ((* (ptr) pd24 ))))(trigger←v4656, (* (( (ptr) drr←v4628)+1) ), (word) (( (bPt) gf←c9948)+44)/* var←c9052 */ , drr←v4628, pd24) ; }; SOURCE(3114, 17) (* (( (ptr) drr←v4628)+2) ) = 0; }; } static void SetupDestruction←P540(shell←v4124, trigger←v4152, triggerKey←v4180) word shell←v4124; word trigger←v4152; word triggerKey←v4180; { register ptr gf←c9980 = (ptr) &globalframe; word drr←v4712 = 0; /* SetupDestruction: */ SOURCE(3162, 418) SOURCE(3288, 55) if ((triggerKey←v4180 == 0)) { SOURCE(3311, 32) triggerKey←v4180 = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c9980)+27)/* var←c9372 */ ))+28) ) ); }; SOURCE(3345, 87) { word var←c9628; var←c9628 = XR←NewObject(12, (* (( (ptr) gf←c9980)+6) )); (* (ptr) var←c9628 ) = shell←v4124; (* (( (ptr) var←c9628)+1) ) = triggerKey←v4180; (* (( (ptr) var←c9628)+2) ) = trigger←v4152; drr←v4712 = var←c9628; }; SOURCE(3434, 61) { word pd25; pd25 = (* (( (ptr) (* (( (ptr) gf←c9980)+27)/* var←c9372 */ ))+12) ); (void) ( *( (fPt) ((* (ptr) pd25 ))))(trigger←v4152, triggerKey←v4180, (word) (( (bPt) gf←c9980)+44)/* var←c9052 */ , drr←v4712, pd25) ; }; SOURCE(3497, 83) { word pd26; pd26 = (* (( (ptr) (* (( (ptr) gf←c9980)+27)/* var←c9372 */ ))+12) ); (void) ( *( (fPt) ((* (ptr) pd26 ))))(shell←v4124, (* (ptr) (* (( (ptr) (* (( (ptr) gf←c9980)+27)/* var←c9372 */ ))+29) ) ), (word) (( (bPt) gf←c9980)+36)/* var←c9020 */ , drr←v4712, pd26); }; } /* file: XTkOpsImpl, module: XTkOpsImpl, compiled at: February 24, 1993 0:05:56 am PST */ extern void XR←install←XTkOpsImpl() { NoName←Q708(); } extern void XR←run←XTkOpsImpl() { XR←Start(&globalframe); }