/* Generated with C2C (Cedar To C)*/ /* Copyright (C) 1992 by Xerox Corporation. All rights reserved. */ /* time: May 11, 1992 10:34:59 am PDT */ /* C2C version: October 16, 1990 (native) */ /* ref-counting: off */ /* file: XTkMigrationImpl, module: XTkMigrationImpl */ /* switches: bcfhklnouw */ #include #include static char versionStamp[] = "@(#)mob_version [3923991155,1985978248] XTkMigrationImpl"; typedef unsigned word, *ptr; typedef unsigned char byte, *bPt; typedef unsigned short half, *hPt; typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8; typedef struct {W8 f; W8 r;} W16; typedef word (*fPt)(); typedef struct {word f0, f1, f2, f3;} W4; typedef W4 *W4Pt; typedef struct {word f0, f1, f2;} W3; typedef struct {W8 f; W3 r;} W11; typedef struct {word f0, f1, f2, f3, f4;} W5; typedef W5 *W5Pt; #define SOURCE(p, l) /* source p, l */ static void NoName_Q1152(); static void XTkMigrationImpl_P0(); static void TryMigrate_P60(); static word NoName_Q1212(); static word NoName_Q1272(); static void SetMigrationOwner_P120(); static word Migrate_P180(); static word NoName_Q1332(); static word NoName_Q1392(); static word SetMigrating_P240(); static void ClearMigrating_P300(); static void SetMigrationOwnerProperty_P360(); static void RegisterMigrator_P420(); static void PostWindowCreation_P480(); static word StandardMigrator_P540(); static word NoName_Q1452(); static void NoName_Q1512(); static void NoName_Q1572(); static void NoName_Q1632(); static void NoName_Q1692(); static void NoName_Q1752(); static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\033\115\307\000\300\214\060\055\310\100\244\000\000"}; static struct {unsigned f; char r[40];} string2 = {2555943, "\011\000\004\106\000\040\006\011\020\004\101\201\100\174\001\100\200\001\100\204\001\100\210\001\100\220\001\100\264\001\100\270\001\100\274\001\100\304\001"}; static struct {unsigned f; char r[16];} string3 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\104\304\000\000"}; static struct {unsigned f; char r[24];} string4 = {1376277, "\007\000\001\002\007\020\001\002\000\007\036\002\004\003\002\004\014\016\015\003\001\000\000"}; static struct {unsigned f; char r[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[48];} string7 = {2883632, "\260\006\005\146\151\162\163\164\216\257\300\363\223\326\161\300\017\164\046\072\104\350\005\004\162\145\163\164\214\216\257\300\363\223\326\161\300\017\164\046\072\104\350\261\000\000\000"}; static struct {unsigned f; char r[4];} string8 = {131074, "\004\003\000"}; static struct {unsigned f; char r[4];} string9 = {65540, "\242\000\000"}; static struct {unsigned f; char r[4];} string10 = {131076, "\216\251\000"}; static struct {unsigned f; char r[76];} string11 = {4718668, "\262\260\006\005\163\150\145\154\154\216\257\300\033\115\307\000\300\214\060\055\310\100\244\014\013\144\145\163\164\151\156\141\164\151\157\156\216\257\300\351\276\264\273\300\115\104\320\264\126\304\261\260\004\003\155\163\147\216\257\300\363\223\326\161\300\017\164\046\072\104\350\261\000\000\000"}; static struct {unsigned f; char r[16];} string12 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\126\304\000\000"}; static struct {unsigned f; char r[60];} string13 = {3735609, "\006\023\040\001\070\001\100\100\001\100\104\001\100\110\001\100\140\001\100\144\001\100\150\001\100\154\001\100\160\001\100\164\001\100\170\001\100\174\001\100\200\001\100\224\001\100\234\001\100\240\001\100\244\001\100\250\001\000\000"}; static struct {unsigned f; char r[32];} string14 = {1900576, "migration already in progress\000\000"}; static struct {unsigned f; char r[12];} string15 = {589836, "migration\000\000"}; static struct {unsigned f; char r[16];} string16 = {917520, "MigrationOwner\000"}; static struct {unsigned f; char r[12];} string17 = {589836, "Migrating\000\000"}; static struct {unsigned f; char r[24];} string18 = {1310744, "PARC_Migration_Owner\000\000\000"}; static struct {unsigned f; char r[16];} string19 = {917520, "PARC_Migration\000"}; static struct {unsigned f; char r[24];} string20 = {1310744, "connection not alive\000\000\000"}; static struct {unsigned f; char r[16];} string21 = {786448, "WM_PROTOCOLS\000\000\000"}; static struct {unsigned f; char r[16];} string22 = {851984, "\257\300\351\343\132\163\300\166\137\237\210\100\164\000\000"}; static struct {unsigned f; char r[8];} string23 = {458759, "\006\001@L\004@\377"}; static struct {unsigned f; char r[16];} string24 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\100\164\000\000"}; static struct {unsigned f; char r[16];} string25 = {851984, "\257\300\033\115\307\000\300\214\060\055\310\100\150\000\000"}; static struct {unsigned f; char r[16];} string26 = {851984, "\257\300\054\174\025\242\300\120\014\117\154\100\150\000\000"}; static struct {unsigned f; char r[16];} string27 = {851984, "\257\300\273`R#\300\206CBt@h\000\000"}; static struct { word f0[27]; word f27; word f28; word f29; word f30; word f31; word f32; word f33; word f34; word f35; word f36; word f37; word f38; word f39; word f40; word f41; word f42; word f43; word f44; word f45; word f46; word f47; word f48; word f49; word f50; word f51; word f52[4]; } globalframe = { {0}, (word) StandardMigrator_P540, 0, (word) PostWindowCreation_P480, 0, (word) RegisterMigrator_P420, 0, (word) SetMigrationOwnerProperty_P360, 0, (word) ClearMigrating_P300, 0, (word) SetMigrating_P240, 0, (word) Migrate_P180, 0, (word) SetMigrationOwner_P120, 0, (word) TryMigrate_P60, 0, (word) XTkMigrationImpl_P0, 0, 2147483648, 2147483648, 2147483648, 2147483648, 2147483648, {0} }; static void NoName_Q1152() { register ptr gf_c0121 = (ptr) &globalframe; word var_c31108; (* (( (ptr) gf_c0121)+8) ) = (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2); (* (( (ptr) gf_c0121)+10) ) = (word) XR_GetTypeIndex((word) &string3, 0, (word) &string4); (* (( (ptr) gf_c0121)+11) ) = (word) XR_GetTypeIndex((word) &string5, 0, (word) &string6); (* (( (ptr) gf_c0121)+13) ) = (word) XR_GetTypeIndex((word) &string7, 0, (word) &string8); (* (( (ptr) gf_c0121)+14) ) = (word) XR_GetTypeIndexS((word) (&string9)); (* (( (ptr) gf_c0121)+15) ) = (word) XR_GetTypeIndex((word) &string10, 0, (word) &string6); (* (( (ptr) gf_c0121)+16) ) = (word) XR_GetTypeIndexS((word) (&string11)); (* (( (ptr) gf_c0121)+18) ) = (word) XR_GetTypeIndex((word) &string12, 0, (word) &string13); (* (ptr) (( (bPt) gf_c0121)+76) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0121)+11) ), (word) &string14); (* (ptr) (( (bPt) gf_c0121)+80) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0121)+15) ), (word) &string15); (* (ptr) (( (bPt) gf_c0121)+84) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0121)+15) ), (word) &string16); (* (ptr) (( (bPt) gf_c0121)+88) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0121)+15) ), (word) &string17); (* (ptr) (( (bPt) gf_c0121)+92) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0121)+11) ), (word) &string18); (* (ptr) (( (bPt) gf_c0121)+96) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0121)+11) ), (word) &string19); (* (ptr) (( (bPt) gf_c0121)+100) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0121)+11) ), (word) &string20); (* (ptr) (( (bPt) gf_c0121)+104) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0121)+11) ), (word) &string21); (void) XR_DeclareGlobalFrame((word) "XTkMigrationImpl", &globalframe, (word) XR_GetTypeIndex((word) &string22, 0, (word) &string23) , (word) (( (bPt) gf_c0121)+180)/* var_c30404 */ ); var_c31108 = (word) XR_ImportInterface((word) "Xl", (word) XR_GetTypeIndexS((word) (&string24)), 218); (* (( (ptr) gf_c0121)+52)/* var_c30500 */ ) = var_c31108; (void) XR_ImportProcS(var_c31108, 533506); (void) XR_ImportProcS(var_c31108, 67910403); (void) XR_ImportProcS(var_c31108, 68207876); (void) XR_ImportProcS(var_c31108, 2371849); (void) XR_ImportProcS(var_c31108, 533762); (void) XR_ImportProcS(var_c31108, 271873); (void) XR_ImportProcS(var_c31108, 68690438); (void) XR_ImportProcS(var_c31108, 270545672); (void) XR_ImportProcS(var_c31108, 67644930); var_c31108 = (word) XR_ImportInterface((word) "XTk", (word) XR_GetTypeIndexS((word) (&string25)), 50); (* (( (ptr) gf_c0121)+53)/* var_c30692 */ ) = var_c31108; (void) XR_ImportProcS(var_c31108, 1050628); (void) XR_ImportProcS(var_c31108, 1579523); (void) XR_ImportProcS(var_c31108, 67634690); (void) XR_ImportProcS(var_c31108, 788227); var_c31108 = (word) XR_ImportInterface((word) "XTkShellWidgets", (word) XR_GetTypeIndexS((word) (&string26)), 26); (* (( (ptr) gf_c0121)+54)/* var_c30916 */ ) = var_c31108; (void) XR_ImportProcS(var_c31108, 2099204); (void) XR_ImportProcS(var_c31108, 786947); (void) XR_ImportProcS(var_c31108, 262913); (void) XR_ImportProcS(var_c31108, 67376641); var_c31108 = (word) XR_ExportInterface((word) "XTkMigration", (word) XR_GetTypeIndexS((word) (&string27)), 3); (* (( (ptr) gf_c0121)+55)/* var_c31140 */ ) = var_c31108; (void) XR_ExportProcS(var_c31108, (word) (( (bPt) gf_c0121)+156)/* var_c30308 */ , 67633154); (void) XR_ExportProcS(var_c31108, (word) (( (bPt) gf_c0121)+124)/* var_c30180 */ , 524546); (void) XR_ExportProcS(var_c31108, (word) (( (bPt) gf_c0121)+108)/* var_c30116 */ , 67633666); } static void XTkMigrationImpl_P0(formal_c033, formal_c032) word formal_c033; word formal_c032; { /* XTkMigrationImpl: */ SOURCE(58, 4493) /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ } static void TryMigrate_P60(event_v5516, clientData_v5544, tq_v5572) word event_v5516; word clientData_v5544; word tq_v5572; { W16 var_c31172; register ptr gf_c31204 = (ptr) &globalframe; /* TryMigrate: */ SOURCE(179, 1221) SOURCE(210, 1190) SOURCE(212, 41) { /* declaration of migrateAtom_v3484 skipped */ /* declaration of migrationOwnerAtom_v3512 skipped */ word shell_v3540; /* declaration of ev_v3568 skipped */ /* declaration of connection_v3596 skipped */ SOURCE(255, 38) shell_v3540 = XR_Narrow(clientData_v5544, (* (( (ptr) gf_c31204)+8) )); SOURCE(295, 41) if ((event_v5516 == 0)) { goto lab_L100001; }; if (((* (( (ptr) event_v5516)+4) ) == 33)) { goto lab_L100001; }; (void) XR_RaiseError(XR_NarrowFault, 0); lab_L100001: ; (* (( (ptr) &var_c31172)+6)/* ev_v3568 */ ) = event_v5516; SOURCE(338, 41) (* (( (ptr) &var_c31172)+7)/* connection_v3596 */ ) = (* (( (ptr) (* (( (ptr) &var_c31172)+6)/* ev_v3568 */ ))+2) ); SOURCE(381, 53) if (((* (( (ptr) (* (( (ptr) &var_c31172)+6)/* ev_v3568 */ ))+7) ) != (* (( (ptr) shell_v3540)+35) )) || ((* (( (ptr) (* ( ( (ptr) &var_c31172)+6)/* ev_v3568 */ ))+5) ) != 32)) { SOURCE(428, 6) return; }; SOURCE(436, 36) if (((* (( (ptr) &var_c31172)+7)/* connection_v3596 */ ) == 0) || (0 == (* (( (ptr) (* (( (ptr) &var_c31172)+7)/* connection_v3596 */ ))+15) ))) { SOURCE(466, 6) return; }; SOURCE(480, 290) { word var_c01; { word var_c0143; var_c0143 = (word) &var_c31172; var_c01 = (word) XR_Enable(( ((word) (fPt) NoName_Q1272) ), ( ((word) (fPt) NoName_Q1752) ), var_c0143); }; if ((var_c01 == 2)) { goto lab_L100000; } else { if ((var_c01 == 1)) { goto lab_L02; }; }; }; SOURCE(777, 603) { word var_c30532; var_c30532 = (* (( (ptr) (* (( (ptr) &var_c31172)+6)/* ev_v3568 */ ))+9) ); if ((var_c30532 == (* (( (ptr) &var_c31172)+4)/* migrateAtom_v3484 */ )) || (var_c30532 == (* (( (ptr) &var_c31172)+5)/* migrationOwnerAtom_v3512 */ ))) { SOURCE(832, 528) { W4 pr_v3640; word unusedTimeStamp_v3668; /* declaration of window_v3696 skipped */ /* declaration of property_v3724 skipped */ SOURCE(834, 24) pr_v3640.f0 = 0; pr_v3640.f1 = 0; pr_v3640.f2 = 0; pr_v3640.f3 = 0; SOURCE(860, 41) unusedTimeStamp_v3668 = (* (( (ptr) (* (( (ptr) &var_c31172)+6)/* ev_v3568 */ ))+10) ); SOURCE(904, 31) (* (( (ptr) &var_c31172)+8)/* window_v3696 */ ) = (* (( (ptr) (* (( (ptr) &var_c31172)+6)/* ev_v3568 */ ))+11) ); SOURCE(938, 30) (* (( (ptr) &var_c31172)+9)/* property_v3724 */ ) = (* (( (ptr) (* (( (ptr) &var_c31172)+6)/* ev_v3568 */ ))+12) ); SOURCE(971, 36) if (((* (( (ptr) &var_c31172)+9)/* property_v3724 */ ) == 0)) { SOURCE(1001, 6) return; }; SOURCE(1009, 35) if (((* (( (ptr) &var_c31172)+8)/* window_v3696 */ ) == 0)) { SOURCE(1038, 6) return; }; SOURCE(1046, 83) { /* declaration of var_c02 skipped */ /* declaration of var_c03 skipped */ (* (( (ptr) &var_c31172)+10)/* var_c02 */ ) = (* (( (ptr) (* (( (ptr) &var_c31172)+6)/* ev_v3568 */ ))+2) ); (* (( (ptr) &var_c31172)+11)/* var_c03 */ ) = (* (( (ptr) (* (( (ptr) gf_c31204)+52)/* var_c30500 */ ))+55) ); { /* declaration of var_c04 skipped */ { word var_c05; { word var_c0144; var_c0144 = (word) &var_c31172; var_c05 = (word) XR_Enable(( ((word) (fPt) NoName_Q1212) ), ( ((word) (fPt) NoName_Q1692) ), var_c0144); }; if ((var_c05 == 2)) { goto lab_L100000; }; }; pr_v3640 = (* (W4Pt) (( (ptr) &var_c31172)+12)/* var_c04 */ ); }; }; SOURCE(1142, 193) { word var_c30596; var_c30596 = pr_v3640.f2; if ((var_c30596 == 0)) { goto lab_L100006; }; { word tc28; if (((* (( (ptr) gf_c31204)+10) ) == XR_GetReferentType(var_c30596))) { tc28 = (word) ((*(int*)var_c30596<0) == 0); } else { tc28 = (word) 0; }; if (tc28) { { word r_v3768; r_v3768 = var_c30596; SOURCE(1186, 149) { /*1*/ word var_c30628; /*1*/ var_c30628 = (* (( (ptr) (* (( (ptr) &var_c31172)+6)/* ev_v3568 */ ))+9) ); /*1*/ if ((var_c30628 == (* (( (ptr) &var_c31172)+4)/* migrateAtom_v3484 */ ))) { SOURCE(1222, 22) /*1*/ { /*1*/ word var_c30660; /*1*/ var_c30660 = (word) Migrate_P180(shell_v3540, r_v3768); /*1*/ }; SOURCE(1246, 6) /*1*/ return; /*1*/ } /*1*/ else { /*1*/ if ((var_c30628 == (* (( (ptr) &var_c31172)+5)/* migrationOwnerAtom_v3512 */ ))) { SOURCE(1278, 27) /*1*/ (void) SetMigrationOwner_P120(shell_v3540, r_v3768); SOURCE(1307, 6) /*1*/ return; /*1*/ } /*1*/ else { SOURCE(1327, 8) /*1*/ return; /*1*/ }; /*1*/ }; /*1*/ }; }; } else { lab_L100006: ; SOURCE(1349, 9) goto lab_L100000; }; }; }; }; } else { SOURCE(1374, 6) return; }; }; }; /* c2c skipped dead code */ lab_L100000: ; lab_L02: ; return; } static word NoName_Q1212(formal_c0123) word formal_c0123; { SOURCE(1046, 83) { word pd29; pd29 = (* (( (ptr) formal_c0123)+11) ); (void) ( *( (fPt) ((* (ptr) pd29 ))))((word) (( (bPt) formal_c0123)+48), (* (( (ptr) formal_c0123)+10) ), (* (( (ptr) formal_c0123)+8) ), (* (( (ptr) formal_c0123)+9) ), 0, 0 , 0, 2147483647, 0, pd29); }; return(0); } static word NoName_Q1272(formal_c0125) word formal_c0125; { register ptr gf_c0124 = (ptr) &globalframe; SOURCE(577, 66) { word pd30; pd30 = (* (( (ptr) (* (( (ptr) gf_c0124)+52)/* var_c30500 */ ))+50) ); if (((* (( (ptr) (* (( (ptr) formal_c0125)+6) ))+8) ) != (word) ( *( (fPt) ((* (ptr) pd30 ))))((* (( (ptr) formal_c0125)+7) ), (* (( (ptr) gf_c0124)+26) ), pd30))) { SOURCE(637, 6) return(1); }; }; SOURCE(645, 55) { word pd31; pd31 = (* (( (ptr) (* (( (ptr) gf_c0124)+52)/* var_c30500 */ ))+50) ); (* (( (ptr) formal_c0125)+4) ) = (word) ( *( (fPt) ((* (ptr) pd31 ))))((* (( (ptr) formal_c0125)+7) ), (* (( (ptr) gf_c0124)+24) ), pd31); }; SOURCE(702, 68) { word pd32; pd32 = (* (( (ptr) (* (( (ptr) gf_c0124)+52)/* var_c30500 */ ))+50) ); (* (( (ptr) formal_c0125)+5) ) = (word) ( *( (fPt) ((* (ptr) pd32 ))))((* (( (ptr) formal_c0125)+7) ), (* (( (ptr) gf_c0124)+23) ), pd32); }; return(0); } static void SetMigrationOwner_P120(shell_v2940, owner_v2968) word shell_v2940; word owner_v2968; { register ptr gf_c31236 = (ptr) &globalframe; /* SetMigrationOwner: */ SOURCE(1404, 156) SOURCE(1470, 48) { word pd33; pd33 = (* (( (ptr) (* (( (ptr) gf_c31236)+53)/* var_c30692 */ ))+11) ); (void) ( *( (fPt) ((* (ptr) pd33 ))))(shell_v2940, (* (( (ptr) gf_c31236)+21) ), owner_v2968, pd33); }; SOURCE(1520, 40) (void) SetMigrationOwnerProperty_P360(shell_v2940, owner_v2968); } static word Migrate_P180(formal_c0154, destination_v3056) word formal_c0154; word destination_v3056; { W11 var_c31268; /* declaration of shell_v3028 skipped */ register ptr gf_c31300 = (ptr) &globalframe; /* declaration of msg_v3116 skipped */ (* (( (ptr) &var_c31268)+4)/* shell_v3028 */ ) = formal_c0154; /* Migrate: */ SOURCE(1564, 834) SOURCE(1564, 834) (* (( (ptr) &var_c31268)+5)/* msg_v3116 */ ) = 0; SOURCE(1656, 742) SOURCE(1658, 703) { word var_c30724; { word pd34; pd34 = (* (( (ptr) (* (( (ptr) gf_c31300)+53)/* var_c30692 */ ))+10) ); var_c30724 = (word) ( *( (fPt) ((* (ptr) pd34 ))))((* (( (ptr) &var_c31268)+4)/* shell_v3028 */ ), (* (( (ptr) gf_c31300)+20) ), pd34); }; if ((var_c30724 == 0)) { goto lab_L100009; }; if (((* (( (ptr) gf_c31300)+16) ) == XR_GetReferentType(var_c30724))) { { word proc_v3812; proc_v3812 = var_c30724; SOURCE(1752, 611) { /* declaration of iMadeIt_v3868 skipped */ /* declaration of newConnection_v3896 skipped */ SOURCE(1754, 21) (* (( (ptr) &var_c31268)+6)/* iMadeIt_v3868 */ ) = 0; SOURCE(1777, 28) (* (( (ptr) &var_c31268)+7)/* newConnection_v3896 */ ) = 0; SOURCE(1807, 72) if ((0 == (word) SetMigrating_P240((* ((( (ptr) &var_c31268)+4)/* shell_v3028 */ ) )))) { SOURCE(1839, 40) return((* (( (ptr) gf_c31300)+19) )); }; SOURCE(1881, 271) { word var_c30756; word var_c30788; var_c30756 = destination_v3056; if ((var_c30756 == 0)) { goto lab_L100010; }; var_c30788 = XR_GetReferentType(var_c30756); { word tc35; if (((* (( (ptr) gf_c31300)+18) ) == var_c30788)) { { word c_v3940; c_v3940 = var_c30756; SOURCE(1930, 17) (* (( (ptr) &var_c31268)+7)/* newConnection_v3896 */ ) = c_v3940; }; } else { if (((* (( (ptr) gf_c31300)+10) ) == var_c30788)) { tc35 = (word) ((*(int*)var_c30756<0) == 0); } else { tc35 = (word) 0; }; if (tc35) { { /*1*/ /* declaration of r_v3984 skipped */ /*1*/ (* (( (ptr) &var_c31268)+8)/* r_v3984 */ ) = var_c30756; SOURCE(1967, 14) /*1*/ (* (( (ptr) &var_c31268)+6)/* iMadeIt_v3868 */ ) = 1; SOURCE(1983, 116) /*1*/ { /*1*/ /* declaration of var_c06 skipped */ /*1*/ (* (( (ptr) &var_c31268)+9)/* var_c06 */ ) = (* (( (ptr) (* (( (ptr) gf_c31300)+52)/* var_c30500 */ ))+38) ); /*1*/ { /*1*/ /* declaration of var_c07 skipped */ /*1*/ { /*1*/ word var_c08; /*1*/ { /*1*/ word var_c0145; /*1*/ var_c0145 = (word) &var_c31268; /*1*/ var_c08 = (word) XR_Enable(( ((word) (fPt) NoName_Q1392) ), ( ((word) (fPt) NoName_Q1632) ), var_c0145); /*1*/ }; /*1*/ if ((var_c08 == 3)) { /*1*/ goto lab_L100008; /*1*/ }; /*1*/ }; /*1*/ (* (( (ptr) &var_c31268)+7)/* newConnection_v3896 */ ) = (* (( (ptr) &var_c31268)+10)/* var_c07 */ ); /*1*/ }; /*1*/ }; /*1*/ }; } else { lab_L100010: ; SOURCE(2131, 21) (void) ClearMigrating_P300((* ((( (ptr) &var_c31268)+4)/* shell_v3028 */ ) )); SOURCE(2154, 5) (void) XR_RaiseUnnamedError(); }; }; }; }; SOURCE(2164, 118) { /* declaration of var_c09 skipped */ (* (( (ptr) &var_c31268)+8)/* var_c09 */ ) = (* (ptr) proc_v3812 ); { /* declaration of var_c010 skipped */ { word var_c0146; var_c0146 = (word) &var_c31268; (void) (word) XR_Enable(( ((word) (fPt) NoName_Q1332) ), ( ((word) (fPt) NoName_Q1572) ), var_c0146); }; (* (( (ptr) &var_c31268)+5)/* msg_v3116 */ ) = (* (( (ptr) &var_c31268)+9)/* var_c010 */ ); }; }; SOURCE(2288, 21) (void) ClearMigrating_P300((* ((( (ptr) &var_c31268)+4)/* shell_v3028 */ ) )); SOURCE(2311, 50) if ((0 != (* (( (ptr) &var_c31268)+6)/* iMadeIt_v3868 */ ))) { SOURCE(2327, 34) { word pd36; pd36 = (* (( (ptr) (* (( (ptr) gf_c31300)+52)/* var_c30500 */ ))+41) ); (void) ( *( (fPt) ((* (ptr) pd36 ))))((* (( (ptr) &var_c31268)+7)/* newConnection_v3896 */ ), 0, pd36); }; }; }; }; } else { lab_L100009: ; }; }; goto lab_L100015; lab_L100008: ; lab_L100015: ; SOURCE(1564, 834) return((* (( (ptr) &var_c31268)+5)/* msg_v3116 */ )); } static word NoName_Q1332(formal_c0128) word formal_c0128; { SOURCE(2164, 118) { word pd37; pd37 = (* (( (ptr) formal_c0128)+8) ); (* (( (ptr) formal_c0128)+9) ) = (word) ( *( (fPt) ((* (ptr) pd37 ))))((* (( (ptr) formal_c0128)+4) ), (* (( (ptr) formal_c0128)+7) ), pd37); }; return(0); } static word NoName_Q1392(formal_c0129) word formal_c0129; { SOURCE(1983, 116) { word pd38; pd38 = (* (( (ptr) formal_c0129)+9) ); (* (( (ptr) formal_c0129)+10) ) = (word) ( *( (fPt) ((* (ptr) pd38 ))))((* (( (ptr) formal_c0129)+8) ), 0, 0, 0, 0, 0, pd38) ; }; return(0); } static word SetMigrating_P240(shell_v3176) word shell_v3176; { register ptr gf_c31332 = (ptr) &globalframe; word ok_v3220; /* SetMigrating: */ SOURCE(2402, 194) (void) (XR_MonitorEntry((word) (( (bPt) gf_c31332)+16)/* LOCK_v2608 */ )); SOURCE(2470, 63) { word pd39; pd39 = (* (( (ptr) (* (( (ptr) gf_c31332)+53)/* var_c30692 */ ))+10) ); if (((word) ( *( (fPt) ((* (ptr) pd39 ))))(shell_v3176, (* (( (ptr) gf_c31332)+22) ), pd39) != 0)) { SOURCE(2519, 14) (void) (XR_MonitorExit((word) (( (bPt) gf_c31332)+16)/* LOCK_v2608 */ )); return(0); }; }; SOURCE(2535, 46) { word var_c30820; var_c30820 = XR_NewObject(4, (* (( (ptr) gf_c31332)+14) )); { word pd40; pd40 = (* (( (ptr) (* (( (ptr) gf_c31332)+53)/* var_c30692 */ ))+11) ); (void) ( *( (fPt) ((* (ptr) pd40 ))))(shell_v3176, (* (( (ptr) gf_c31332)+22) ), var_c30820, pd40); }; }; SOURCE(2583, 13) (void) (XR_MonitorExit((word) (( (bPt) gf_c31332)+16)/* LOCK_v2608 */ )); return(1); } static void ClearMigrating_P300(shell_v3280) word shell_v3280; { register ptr gf_c31364 = (ptr) &globalframe; /* ClearMigrating: */ SOURCE(2602, 86) SOURCE(2647, 41) { word pd41; pd41 = (* (( (ptr) (* (( (ptr) gf_c31364)+53)/* var_c30692 */ ))+11) ); (void) ( *( (fPt) ((* (ptr) pd41 ))))(shell_v3280, (* (( (ptr) gf_c31364)+22) ), 0, pd41); }; } static void SetMigrationOwnerProperty_P360(shell_v3340, owner_v3368) word shell_v3340; word owner_v3368; { register ptr gf_c31396 = (ptr) &globalframe; word migrationOwnerAtom_v4028; /* SetMigrationOwnerProperty: */ SOURCE(2694, 285) SOURCE(2768, 84) { word pd42; pd42 = (* (( (ptr) (* (( (ptr) gf_c31396)+52)/* var_c30500 */ ))+50) ); migrationOwnerAtom_v4028 = (word) ( *( (fPt) ((* (ptr) pd42 ))))((* (( (ptr) shell_v3340)+34) ), (* (( (ptr) gf_c31396)+23) ), pd42); }; SOURCE(2854, 125) { word pd43; pd43 = (* (( (ptr) (* (( (ptr) gf_c31396)+52)/* var_c30500 */ ))+53) ); (void) ( *( (fPt) ((* (ptr) pd43 ))))((* (( (ptr) shell_v3340)+34) ), (* (( (ptr) shell_v3340)+35) ), migrationOwnerAtom_v4028, migrationOwnerAtom_v4028, 0, owner_v3368 , 0, 2147483647, 0, pd43); }; } static void RegisterMigrator_P420(shell_v3428, migrator_v3456) word shell_v3428; word migrator_v3456; { register ptr gf_c31428 = (ptr) &globalframe; word old_v4072; /* RegisterMigrator: */ SOURCE(2984, 654) SOURCE(3082, 47) { word pd44; pd44 = (* (( (ptr) (* (( (ptr) gf_c31428)+53)/* var_c30692 */ ))+10) ); old_v4072 = (word) ( *( (fPt) ((* (ptr) pd44 ))))(shell_v3428, (* (( (ptr) gf_c31428)+20) ), pd44); }; SOURCE(3131, 48) if ((migrator_v3456 == 0)) { SOURCE(3152, 27) migrator_v3456 = (word) (( (bPt) gf_c31428)+108)/* var_c30116 */ ; }; SOURCE(3181, 80) { word var_c30852; { word var_c30884; var_c30884 = XR_NewObject(4, (* (( (ptr) gf_c31428)+16) )); (* (ptr) var_c30884 ) = XR_CheckProc(migrator_v3456); var_c30852 = var_c30884; }; { word pd45; pd45 = (* (( (ptr) (* (( (ptr) gf_c31428)+53)/* var_c30692 */ ))+11) ); (void) ( *( (fPt) ((* (ptr) pd45 ))))(shell_v3428, (* (( (ptr) gf_c31428)+20) ), var_c30852, pd45); }; }; SOURCE(3263, 375) if ((old_v4072 == 0)) { SOURCE(3279, 361) { word hints_v4128; SOURCE(3281, 71) { word pd46; pd46 = (* (( (ptr) (* (( (ptr) gf_c31428)+54)/* var_c30916 */ ))+26) ); hints_v4128 = (word) ( *( (fPt) ((* (ptr) pd46 ))))(shell_v3428, pd46); }; SOURCE(3354, 77) if ((hints_v4128 != 0)) { SOURCE(3374, 57) { word var_c30948; var_c30948 = XR_NewObject(8, (* (( (ptr) gf_c31428)+13) )); (* (ptr) var_c30948 ) = (* (( (ptr) gf_c31428)+24) ); (* (( (ptr) var_c30948)+1) ) = (* (( (ptr) hints_v4128)+44) ); (* (( (ptr) hints_v4128)+44) ) = var_c30948; }; }; SOURCE(3436, 126) { word var_c30980; word var_c31012; { word pd47; pd47 = (* (( (ptr) (* (( (ptr) gf_c31428)+52)/* var_c30500 */ ))+201) ); var_c30980 = (word) ( *( (fPt) ((* (ptr) pd47 ))))(33, 35, 35, 35, pd47); }; { word pd48; pd48 = (* (( (ptr) (* (( (ptr) gf_c31428)+52)/* var_c30500 */ ))+63) ); var_c31012 = (word) ( *( (fPt) ((* (ptr) pd48 ))))(0, 0, 0, pd48); }; { W4 var_c31044; var_c31044.f0 = (word) (( (bPt) gf_c31428)+172)/* var_c30372 */ ; var_c31044.f1 = var_c30980; var_c31044.f2 = var_c31012; var_c31044.f3 = shell_v3428; { word pd49; pd49 = (* (( (ptr) (* (( (ptr) gf_c31428)+53)/* var_c30692 */ ))+30) ); (void) ( *( (fPt) ((* (ptr) pd49 ))))(shell_v3428, var_c31044, 0, pd49); }; }; }; SOURCE(3564, 74) { word pd50; pd50 = (* (( (ptr) (* (( (ptr) gf_c31428)+53)/* var_c30692 */ ))+12) ); (void) ( *( (fPt) ((* (ptr) pd50 ))))(shell_v3428, (* (ptr) (* (( (ptr) (* (( (ptr) gf_c31428)+53)/* var_c30692 */ ))+17) ) ), (word) (( (bPt) gf_c31428)+116)/* var_c30148 */ , 0, pd50); }; }; }; } static void PostWindowCreation_P480(widget_v5632, registerData_v5660, callData_v5688, event_v5716) word widget_v5632; word registerData_v5660; word callData_v5688; word event_v5716; { register ptr gf_c31460 = (ptr) &globalframe; /* PostWindowCreation: */ SOURCE(3647, 177) SOURCE(3692, 132) { word var_c31076; { word pd51; pd51 = (* (( (ptr) (* (( (ptr) gf_c31460)+53)/* var_c30692 */ ))+10) ); var_c31076 = (word) ( *( (fPt) ((* (ptr) pd51 ))))(widget_v5632, (* (( (ptr) gf_c31460)+21) ), pd51); }; if ((var_c31076 == 0)) { goto lab_L100016; }; { word tc52; if (((* (( (ptr) gf_c31460)+10) ) == XR_GetReferentType(var_c31076))) { tc52 = (word) ((*(int*)var_c31076<0) == 0); } else { tc52 = (word) 0; }; if (tc52) { { word owner_v4184; owner_v4184 = var_c31076; SOURCE(3772, 52) (void) SetMigrationOwnerProperty_P360(widget_v5632, owner_v4184); }; } else { lab_L100016: ; }; }; }; } static word StandardMigrator_P540(formal_c0155, destination_v5804) word formal_c0155; word destination_v5804; { W8 var_c31492; /* declaration of shell_v5776 skipped */ register ptr gf_c31524 = (ptr) &globalframe; /* declaration of msg_v5848 skipped */ /* declaration of failed_v4228 skipped */ word oldConnection_v4256; var_c31492.f4/* shell_v5776 */ = formal_c0155; /* StandardMigrator: */ SOURCE(3832, 719) SOURCE(3832, 719) var_c31492.f5/* msg_v5848 */ = 0; SOURCE(3888, 20) var_c31492.f6/* failed_v4228 */ = 0; SOURCE(3910, 47) oldConnection_v4256 = (* (( (ptr) var_c31492.f4/* shell_v5776 */ )+34) ); SOURCE(3959, 62) if ((destination_v5804 == 0) || (0 == (* (( (ptr) destination_v5804)+15) ))) { SOURCE(3990, 31) return((* (( (ptr) gf_c31524)+25) )); }; SOURCE(4023, 68) if ( ( (oldConnection_v4256 != 0) ? (0 != (* (( (ptr) oldConnection_v4256)+15) )) : 0 ) ) { SOURCE(4055, 36) { word pd53; pd53 = (* (( (ptr) (* (( (ptr) gf_c31524)+52)/* var_c30500 */ ))+40) ); (void) ( *( (fPt) ((* (ptr) pd53 ))))(oldConnection_v4256, var_c31492.f4/* shell_v5776 */ , pd53); }; }; SOURCE(4093, 40) { word pd54; pd54 = (* (( (ptr) (* (( (ptr) gf_c31524)+54)/* var_c30916 */ ))+7) ); (void) ( *( (fPt) ((* (ptr) pd54 ))))(var_c31492.f4/* shell_v5776 */ , pd54); }; SOURCE(4135, 51) { word pd55; pd55 = (* (( (ptr) (* (( (ptr) gf_c31524)+54)/* var_c30916 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd55 ))))(var_c31492.f4/* shell_v5776 */ , destination_v5804, 0, pd55); }; SOURCE(4188, 88) SOURCE(4188, 88) { /* declaration of var_c011 skipped */ var_c31492.f7/* var_c011 */ = (* (( (ptr) (* (( (ptr) gf_c31524)+54)/* var_c30916 */ ))+12) ); { word var_c012; { word var_c0147; var_c0147 = (word) &var_c31492; var_c012 = (word) XR_Enable(( ((word) (fPt) NoName_Q1452) ), ( ((word) (fPt) NoName_Q1512) ), var_c0147); }; /* removed trivial cond node */ }; }; SOURCE(4292, 183) if ((0 != var_c31492.f6/* failed_v4228 */ )) { SOURCE(4309, 40) { word pd56; pd56 = (* (( (ptr) (* (( (ptr) gf_c31524)+54)/* var_c30916 */ ))+7) ); (void) ( *( (fPt) ((* (ptr) pd56 ))))(var_c31492.f4/* shell_v5776 */ , pd56); }; SOURCE(4351, 124) if ( ( (oldConnection_v4256 != 0) ? (0 != (* (( (ptr) oldConnection_v4256)+15) )) : 0 ) ) { SOURCE(4385, 53) { word pd57; pd57 = (* (( (ptr) (* (( (ptr) gf_c31524)+54)/* var_c30916 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd57 ))))(var_c31492.f4/* shell_v5776 */ , oldConnection_v4256, 0, pd57); }; SOURCE(4440, 35) { word pd58; pd58 = (* (( (ptr) (* (( (ptr) gf_c31524)+54)/* var_c30916 */ ))+12) ); (void) ( *( (fPt) ((* (ptr) pd58 ))))(var_c31492.f4/* shell_v5776 */ , (* (W5Pt) (( (ptr) gf_c31524)+47)/* var_c30468 */ ), 0, 1, pd58) ; }; }; }; SOURCE(4483, 68) if ( ( (oldConnection_v4256 != 0) ? (0 != (* (( (ptr) oldConnection_v4256)+15) )) : 0 ) ) { SOURCE(4515, 36) { word pd59; pd59 = (* (( (ptr) (* (( (ptr) gf_c31524)+52)/* var_c30500 */ ))+41) ); (void) ( *( (fPt) ((* (ptr) pd59 ))))(oldConnection_v4256, var_c31492.f4/* shell_v5776 */ , pd59); }; }; SOURCE(3832, 719) return(var_c31492.f5/* msg_v5848 */ ); } static word NoName_Q1452(formal_c0137) word formal_c0137; { register ptr gf_c0136 = (ptr) &globalframe; SOURCE(4188, 88) { word pd60; pd60 = (* (( (ptr) formal_c0137)+7) ); (void) ( *( (fPt) ((* (ptr) pd60 ))))((* (( (ptr) formal_c0137)+4) ), (* (W5Pt) (( (ptr) gf_c0136)+47)/* var_c30468 */ ), 0, 1, pd60) ; }; return(0); } static void NoName_Q1512(formal_c098, formal_c200016, formal_c200017, formal_c200018, formal_c200019) word formal_c098; word formal_c200016; word formal_c200017; word formal_c200018; word formal_c200019; { register ptr gf_c0138 = (ptr) &globalframe; if ((formal_c200017 == (* (( (ptr) (* (( (ptr) gf_c0138)+52)/* var_c30500 */ ))+4) ))) { { word err_v29936; err_v29936 = (* (ptr) formal_c200019 ); SOURCE(4240, 21) (* (( (ptr) formal_c200016)+5) ) = (* (( (ptr) err_v29936)+5) ); SOURCE(4263, 13) (* (( (ptr) formal_c200016)+6) ) = 1; SOURCE(4279, 9) (* (ptr) formal_c098 ) = 2; (* (( (ptr) formal_c098)+1) ) = 4; return; }; }; (* (ptr) formal_c098 ) = 0; (* (( (ptr) formal_c098)+1) ) = 0; return; } static void NoName_Q1572(formal_c0103, formal_c200012, formal_c200013, formal_c200014, formal_c200015) word formal_c0103; word formal_c200012; word formal_c200013; word formal_c200014; word formal_c200015; { register ptr gf_c0139 = (ptr) &globalframe; if ((formal_c200013 == XR_Unwind)) { SOURCE(2210, 21) (void) ClearMigrating_P300((* ((( (ptr) formal_c200012)+4)) )); SOURCE(2233, 49) if ((0 != (* (( (ptr) formal_c200012)+6) ))) { SOURCE(2249, 33) { word pd61; pd61 = (* (( (ptr) (* (( (ptr) gf_c0139)+52)/* var_c30500 */ ))+42) ); (void) ( *( (fPt) ((* (ptr) pd61 ))))((* ((( (ptr) formal_c200012)+7)) ), pd61); }; }; }; (* (ptr) formal_c0103 ) = 0; (* (( (ptr) formal_c0103)+1) ) = 0; return; } static void NoName_Q1632(formal_c0109, formal_c200008, formal_c200009, formal_c200010, formal_c200011) word formal_c0109; word formal_c200008; word formal_c200009; word formal_c200010; word formal_c200011; { register ptr gf_c0140 = (ptr) &globalframe; if ((formal_c200009 == (* (( (ptr) (* (( (ptr) gf_c0140)+52)/* var_c30500 */ ))+39) ))) { { word why_v26908; why_v26908 = (* (ptr) formal_c200011 ); SOURCE(2060, 16) (* (( (ptr) formal_c200008)+5) ) = (* (( (ptr) why_v26908)+1) ); SOURCE(2078, 21) (void) ClearMigrating_P300((* ((( (ptr) formal_c200008)+4)) )); SOURCE(2101, 9) (* (ptr) formal_c0109 ) = 2; (* (( (ptr) formal_c0109)+1) ) = 3; return; }; }; (* (ptr) formal_c0109 ) = 0; (* (( (ptr) formal_c0109)+1) ) = 0; return; } static void NoName_Q1692(formal_c0115, formal_c200004, formal_c200005, formal_c200006, formal_c200007) word formal_c0115; word formal_c200004; word formal_c200005; word formal_c200006; word formal_c200007; { register ptr gf_c0141 = (ptr) &globalframe; if ((formal_c200005 == (* (( (ptr) (* (( (ptr) gf_c0141)+52)/* var_c30500 */ ))+4) ))) { { word err_v23668; err_v23668 = (* (ptr) formal_c200007 ); SOURCE(1129, 11) (* (ptr) formal_c0115 ) = 2; (* (( (ptr) formal_c0115)+1) ) = 2; return; }; }; (* (ptr) formal_c0115 ) = 0; (* (( (ptr) formal_c0115)+1) ) = 0; return; } static void NoName_Q1752(formal_c0120, formal_c200000, formal_c200001, formal_c200002, formal_c200003) word formal_c0120; word formal_c200000; word formal_c200001; word formal_c200002; word formal_c200003; { register ptr gf_c0142 = (ptr) &globalframe; if ((formal_c200001 == (* (( (ptr) (* (( (ptr) gf_c0142)+52)/* var_c30500 */ ))+4) )) || (formal_c200001 == XR_Uncaught)) { SOURCE(510, 9) (* (ptr) formal_c0120 ) = 2; (* (( (ptr) formal_c0120)+1) ) = 2; return; }; (* (ptr) formal_c0120 ) = 0; (* (( (ptr) formal_c0120)+1) ) = 0; return; } /* file: XTkMigrationImpl, module: XTkMigrationImpl, compiled at: May 11, 1992 10:34:58 am PDT */ extern void XR_install_XTkMigrationImpl() { NoName_Q1152(); } extern void XR_run_XTkMigrationImpl() { XR_Start(&globalframe); }