/* Generated with C2C (Cedar To C)*/ /* Copyright (C) 1992 by Xerox Corporation. All rights reserved. */ /* time: February 27, 1992 5:56:37 pm PST */ /* C2C version: October 16, 1990 (native) */ /* ref-counting: off */ /* file: TEditSelection2Impl, module: TEditSelection2Impl */ /* switches: bcfhklnouw */ #include <cedar/InstallationSupport.h> #include <cedar/CedarExtra.h> static char versionStamp[] = "@(#)mob←version [4013370899,1186921808] TEditSelection2Impl"; typedef unsigned word, *ptr; typedef unsigned char byte, *bPt; typedef unsigned short half, *hPt; typedef word (*fPt)(); typedef struct {word f0, f1, f2, f3, f4;} W5; typedef struct {word f0, f1, f2, f3, f4, f5;} W6; typedef struct {word f0, f1, f2, f3, f4, f5, f6;} W7; typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8; typedef struct {W8 f; word r;} W9; #define SOURCE(p, l) /* source p, l */ static void NoName←Q912(); static void TEditSelection2Impl←P0(); static word CaretVisible←P60(); static word NoName←Q972(); static word IsDown←P120(); static word NoName←Q1032(); static void ForceDown←P180(); static word NoName←Q1092(); static void ShowSelection←P240(); static word NoName←Q1152(); static void TakeDownForRedisplay←P300(); static word NoName←Q1212(); static void FixUpAfterDisplay←P360(); static word NoName←Q1272(); static word NoName←Q1332(); static void AdjustSelStates←P420(); static word NoName←Q1392(); static void TakeSelectionDown←P480(); static word NoName←Q1452(); static void TakeSelectionDownI←P540(); static void PutSelectionUp←P600(); static word NoName←Q1512(); static void PutSelectionUpI←P660(); static void NoName←Q1572(); static void NoName←Q1632(); static void NoName←Q1692(); static void NoName←Q1752(); static void NoName←Q1812(); static void NoName←Q1872(); static void NoName←Q1932(); static void NoName←Q1992(); static void NoName←Q2052(); static void NoName←Q2112(); static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\357\067\056\023\300\106\276\375\120\100\164\000\000"}; static struct {unsigned f; char r[4];} string2 = {196611, "\004x\000"}; static struct {unsigned f; char r[16];} string3 = {851984, "\257\300\162\231\152\170\300\133\216\116\202\100\150\000\000"}; static struct {unsigned f; char r[12];} string4 = {1413833833, "tSelection"}; static struct {unsigned f; char r[16];} string5 = {851984, "\257\300\343\112\327\166\300\041\341\335\211\100\150\000\000"}; static struct { word f0[8]; word f8; word f9; word f10; word f11[5]; word f16; word f17; word f18; word f19; word f20; word f21; word f22; word f23; word f24; word f25; word f26; 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[4]; } globalframe = { {0}, 1, 1, 1, {0}, (word) PutSelectionUpI←P660, 0, (word) PutSelectionUp←P600, 0, (word) TakeSelectionDownI←P540, 0, (word) TakeSelectionDown←P480, 0, (word) AdjustSelStates←P420, 0, (word) FixUpAfterDisplay←P360, 0, (word) TakeDownForRedisplay←P300, 0, (word) ShowSelection←P240, 0, (word) ForceDown←P180, 0, (word) IsDown←P120, 0, (word) CaretVisible←P60, 0, (word) TEditSelection2Impl←P0, {0} }; static void NoName←Q912() { register ptr gf←c0142 = (ptr) &globalframe; word var←c8328; (void) XR←DeclareGlobalFrame((word) "TEditSelection2Impl", &globalframe, (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2) , (word) (( (bPt) gf←c0142)+152)/* var←c7848 */ ); var←c8328 = (word) XR←ImportInterface((word) "Carets", (word) XR←GetTypeIndexS((word) (&string3)), 5); (* (( (ptr) gf←c0142)+41)/* var←c8136 */ ) = var←c8328; (void) XR←ImportProcS(var←c8328, 1048580); var←c8328 = (word) XR←ImportInterface((word) &string4, (word) XR←GetTypeIndexS((word) (&string5)), 68); (* (( (ptr) gf←c0142)+40)/* var←c7880 */ ) = var←c8328; (void) XR←ImportProcS(var←c8328, 1057028); (void) XR←ImportProcS(var←c8328, 272385); (void) XR←ImportProcS(var←c8328, 526338); (void) XR←ImportProcS(var←c8328, 1058564); (void) XR←ImportProcS(var←c8328, 1581574); (void) XR←ImportProcS(var←c8328, 67110144); var←c8328 = (word) XR←ExportInterface((word) &string4, (word) XR←GetTypeIndexS((word) (&string5)), 68); (* (( (ptr) gf←c0142)+42)/* var←c8360 */ ) = var←c8328; (void) XR←ExportProcS(var←c8328, (word) (( (bPt) gf←c0142)+144)/* var←c7816 */ , 67114496); (void) XR←ExportProcS(var←c8328, (word) (( (bPt) gf←c0142)+136)/* var←c7784 */ , 67376897); (void) XR←ExportProcS(var←c8328, (word) (( (bPt) gf←c0142)+128)/* var←c7752 */ , 268289); (void) XR←ExportProcS(var←c8328, (word) (( (bPt) gf←c0142)+120)/* var←c7720 */ , 792835); (void) XR←ExportProcS(var←c8328, (word) (( (bPt) gf←c0142)+112)/* var←c7688 */ , 793091); (void) XR←ExportProcS(var←c8328, (word) (( (bPt) gf←c0142)+104)/* var←c7656 */ , 1055492); (void) XR←ExportProcS(var←c8328, (word) (( (bPt) gf←c0142)+96)/* var←c7624 */ , 269313); (void) XR←ExportProcS(var←c8328, (word) (( (bPt) gf←c0142)+88)/* var←c7592 */ , 793859); (void) XR←ExportProcS(var←c8328, (word) (( (bPt) gf←c0142)+72)/* var←c7528 */ , 794115); } static void TEditSelection2Impl←P0(formal←c038, formal←c037) word formal←c038; word formal←c037; { register ptr gf←c8392 = (ptr) &globalframe; /* TEditSelection2Impl: */ SOURCE(276, 4936) SOURCE(439, 48) /* moved to installation proc */ /* moved to installation proc */ /* moved to installation proc */ SOURCE(490, 28) { word pd6; pd6 = (* (( (ptr) (* (( (ptr) gf←c8392)+40)/* var←c7880 */ ))+9) ); (* (( (ptr) gf←c8392)+11)/* pSelUp←v2720 */ ) = (word) ( *( (fPt) ((* (ptr) pd6 ))))(pd6); }; SOURCE(556, 28) { word pd7; pd7 = (* (( (ptr) (* (( (ptr) gf←c8392)+40)/* var←c7880 */ ))+9) ); (* (( (ptr) gf←c8392)+12)/* sSelUp←v2748 */ ) = (word) ( *( (fPt) ((* (ptr) pd7 ))))(pd7); }; SOURCE(622, 28) { word pd8; pd8 = (* (( (ptr) (* (( (ptr) gf←c8392)+40)/* var←c7880 */ ))+9) ); (* (( (ptr) gf←c8392)+13)/* fSelUp←v2776 */ ) = (word) ( *( (fPt) ((* (ptr) pd8 ))))(pd8); }; } static word CaretVisible←P60() { W5 var←c8424; register ptr gf←c8456 = (ptr) &globalframe; /* declaration of var←c01 skipped */ word var←c3264; /* CaretVisible: */ SOURCE(717, 95) (void) (XR←MonitorEntry((word) (( (bPt) gf←c8456)+16)/* LOCK←v2580 */ )); SOURCE(768, 44) { word var←c02; { word var←c0182; var←c0182 = (word) &var←c8424; var←c02 = (word) XR←Enable(( ((word) (fPt) NoName←Q972) ), ( ((word) (fPt) NoName←Q2112) ), var←c0182); }; /* removed trivial cond node */ }; return(var←c8424.f4/* var←c01 */ ); } static word NoName←Q972(formal←c0146) word formal←c0146; { register ptr gf←c0145 = (ptr) &globalframe; SOURCE(791, 21) { word var←c7912; var←c7912 = (* (( (ptr) gf←c0145)+14)/* caretVisible←v2804 */ ); (void) (XR←MonitorExit((word) (( (bPt) gf←c0145)+16)/* LOCK←v2580 */ )); (* (( (ptr) formal←c0146)+4) ) = var←c7912; return(1); }; /* c2c skipped dead code */ } static word IsDown←P120(formal←c0212) word formal←c0212; { W6 var←c8488; /* declaration of id←v3324 skipped */ register ptr gf←c8520 = (ptr) &globalframe; /* declaration of var←c03 skipped */ word var←c3368; var←c8488.f4/* id←v3324 */ = formal←c0212; /* IsDown: */ SOURCE(818, 225) (void) (XR←MonitorEntry((word) (( (bPt) gf←c8520)+16)/* LOCK←v2580 */ )); SOURCE(881, 162) { word var←c04; { word var←c0183; var←c0183 = (word) &var←c8488; var←c04 = (word) XR←Enable(( ((word) (fPt) NoName←Q1032) ), ( ((word) (fPt) NoName←Q2052) ), var←c0183); }; /* removed trivial cond node */ }; return(var←c8488.f5/* var←c03 */ ); } static word NoName←Q1032(formal←c0149) word formal←c0149; { register ptr gf←c0148 = (ptr) &globalframe; SOURCE(904, 118) { word state←v4356; SOURCE(904, 118) { word var←c7944; var←c7944 = (* (( (ptr) formal←c0149)+4) ); switch (var←c7944) { case 0: state←v4356 = (* (( (ptr) gf←c0148)+8)/* pSelState←v2636 */ ); break; case 1: state←v4356 = (* (( (ptr) gf←c0148)+9)/* sSelState←v2664 */ ); break; case 2: state←v4356 = (* (( (ptr) gf←c0148)+10)/* fSelState←v2692 */ ); break; default: state←v4356 = ( XR←RaiseUnnamedError(), 0 ); break; }; }; SOURCE(1024, 19) (void) (XR←MonitorExit((word) (( (bPt) gf←c0148)+16)/* LOCK←v2580 */ )); (* (( (ptr) formal←c0149)+5) ) = (state←v4356 == 1); return(1); }; /* c2c skipped dead code */ } static void ForceDown←P180(formal←c0213) word formal←c0213; { W5 var←c8552; /* declaration of id←v3428 skipped */ register ptr gf←c8584 = (ptr) &globalframe; var←c8552.f4/* id←v3428 */ = formal←c0213; /* ForceDown: */ SOURCE(1049, 177) (void) (XR←MonitorEntry((word) (( (bPt) gf←c8584)+16)/* LOCK←v2580 */ )); SOURCE(1100, 126) { word var←c0184; var←c0184 = (word) &var←c8552; (void) (word) XR←Enable(( ((word) (fPt) NoName←Q1092) ), ( ((word) (fPt) NoName←Q1992) ), var←c0184); }; SOURCE(1049, 177) (void) (XR←MonitorExit((word) (( (bPt) gf←c8584)+16)/* LOCK←v2580 */ )); return; } static word NoName←Q1092(formal←c0152) word formal←c0152; { register ptr gf←c0151 = (ptr) &globalframe; SOURCE(1123, 103) { word var←c7976; var←c7976 = (* (( (ptr) formal←c0152)+4) ); switch (var←c7976) { case 0: SOURCE(1149, 16) (* (( (ptr) gf←c0151)+8)/* pSelState←v2636 */ ) = 1; break; case 1: SOURCE(1180, 16) (* (( (ptr) gf←c0151)+9)/* sSelState←v2664 */ ) = 1; break; case 2: SOURCE(1210, 16) (* (( (ptr) gf←c0151)+10)/* fSelState←v2692 */ ) = 1; break; default: SOURCE(1239, 5) (void) XR←RaiseUnnamedError(); break; }; }; return(0); } static void ShowSelection←P240(formal←c0214, formal←c0215, formal←c0216) word formal←c0214; word formal←c0215; word formal←c0216; { W7 var←c8616; /* declaration of id←v3488 skipped */ /* declaration of self←v3516 skipped */ /* declaration of context←v3544 skipped */ register ptr gf←c8648 = (ptr) &globalframe; var←c8616.f4/* id←v3488 */ = formal←c0214; var←c8616.f5/* self←v3516 */ = formal←c0215; var←c8616.f6/* context←v3544 */ = formal←c0216; /* ShowSelection: */ SOURCE(1250, 618) (void) (XR←MonitorEntry((word) (( (bPt) gf←c8648)+16)/* LOCK←v2580 */ )); SOURCE(1359, 509) { word var←c05; { word var←c0185; var←c0185 = (word) &var←c8616; var←c05 = (word) XR←Enable(( ((word) (fPt) NoName←Q1152) ), ( ((word) (fPt) NoName←Q1932) ), var←c0185); }; if ((var←c05 == 1)) { goto lab←L07; }; }; SOURCE(1250, 618) (void) (XR←MonitorExit((word) (( (bPt) gf←c8648)+16)/* LOCK←v2580 */ )); return; lab←L07: ; return; } static word NoName←Q1152(formal←c0155) word formal←c0155; { register ptr gf←c0154 = (ptr) &globalframe; SOURCE(1382, 102) { word sel←v4400; word selUp←v4428; SOURCE(1382, 102) { word var←c8008; var←c8008 = (* (( (ptr) formal←c0155)+4) ); switch (var←c8008) { case 0: sel←v4400 = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c0154)+40)/* var←c7880 */ ))+4) ) ); break; case 1: sel←v4400 = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c0154)+40)/* var←c7880 */ ))+5) ) ); break; case 2: sel←v4400 = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c0154)+40)/* var←c7880 */ ))+6) ) ); break; default: sel←v4400 = ( XR←RaiseUnnamedError(), 0 ); break; }; }; SOURCE(1486, 110) { word var←c8040; var←c8040 = (* (( (ptr) formal←c0155)+4) ); switch (var←c8040) { case 0: selUp←v4428 = (* (( (ptr) gf←c0154)+11)/* pSelUp←v2720 */ ); break; case 1: selUp←v4428 = (* (( (ptr) gf←c0154)+12)/* sSelUp←v2748 */ ); break; case 2: selUp←v4428 = (* (( (ptr) gf←c0154)+13)/* fSelUp←v2776 */ ); break; default: selUp←v4428 = ( XR←RaiseUnnamedError(), 0 ); break; }; }; SOURCE(1598, 32) if (((* (ptr) sel←v4400 ) != (* (( (ptr) formal←c0155)+5) ))) { SOURCE(1624, 6) (void) (XR←MonitorExit((word) (( (bPt) gf←c0154)+16)/* LOCK←v2580 */ )); return(1); }; SOURCE(1632, 236) if (((* (( (ptr) sel←v4400)+10) ) == (* (( (ptr) sel←v4400)+19) ))) { SOURCE(1686, 43) (void) TakeSelectionDownI←P540((* (( (ptr) formal←c0155)+4) ), (* (( (ptr) formal←c0155)+5) ), (* (( (ptr) formal←c0155)+6) )); } else { SOURCE(1729, 139) if (((* (ptr) selUp←v4428 ) == (* (( (ptr) formal←c0155)+5) ))) { SOURCE(1755, 76) { word pd9; pd9 = (* (( (ptr) (* (( (ptr) gf←c0154)+40)/* var←c7880 */ ))+38) ); (void) ( *( (fPt) ((* (ptr) pd9 ))))((* (( (ptr) formal←c0155)+6) ), (* (( (ptr) formal←c0155)+5) ), selUp←v4428, sel←v4400, (* ( ( (ptr) formal←c0155)+4) ), (* (( (ptr) sel←v4400)+10) ), pd9); }; } else { SOURCE(1831, 37) (void) TakeSelectionDownI←P540((* (( (ptr) formal←c0155)+4) ), (* (( (ptr) formal←c0155)+5) ), (* (( (ptr) formal←c0155)+6) )); }; }; }; return(0); } static void TakeDownForRedisplay←P300(formal←c0217, formal←c0218, formal←c0219) word formal←c0217; word formal←c0218; word formal←c0219; { W7 var←c8680; /* declaration of id←v3604 skipped */ /* declaration of self←v3632 skipped */ /* declaration of context←v3660 skipped */ register ptr gf←c8712 = (ptr) &globalframe; var←c8680.f4/* id←v3604 */ = formal←c0217; var←c8680.f5/* self←v3632 */ = formal←c0218; var←c8680.f6/* context←v3660 */ = formal←c0219; /* TakeDownForRedisplay: */ SOURCE(1874, 545) (void) (XR←MonitorEntry((word) (( (bPt) gf←c8712)+16)/* LOCK←v2580 */ )); SOURCE(1989, 430) { word var←c06; { word var←c0186; var←c0186 = (word) &var←c8680; var←c06 = (word) XR←Enable(( ((word) (fPt) NoName←Q1212) ), ( ((word) (fPt) NoName←Q1872) ), var←c0186); }; if ((var←c06 == 1)) { goto lab←L09; }; }; SOURCE(1874, 545) (void) (XR←MonitorExit((word) (( (bPt) gf←c8712)+16)/* LOCK←v2580 */ )); return; lab←L09: ; return; } static word NoName←Q1212(formal←c0158) word formal←c0158; { register ptr gf←c0157 = (ptr) &globalframe; SOURCE(2012, 21) { word sel←v4472 = 0; word selUp←v4500 = 0; word state←v4528; SOURCE(2052, 201) { word var←c8072; var←c8072 = (* (( (ptr) formal←c0158)+4) ); switch (var←c8072) { case 0: SOURCE(2080, 10) sel←v4472 = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c0157)+40)/* var←c7880 */ ))+4) ) ); SOURCE(2092, 17) state←v4528 = (* (( (ptr) gf←c0157)+8)/* pSelState←v2636 */ ); SOURCE(2111, 15) selUp←v4500 = (* (( (ptr) gf←c0157)+11)/* pSelUp←v2720 */ ); break; case 1: SOURCE(2144, 10) sel←v4472 = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c0157)+40)/* var←c7880 */ ))+5) ) ); SOURCE(2156, 17) state←v4528 = (* (( (ptr) gf←c0157)+9)/* sSelState←v2664 */ ); SOURCE(2175, 15) selUp←v4500 = (* (( (ptr) gf←c0157)+12)/* sSelUp←v2748 */ ); break; case 2: SOURCE(2207, 10) sel←v4472 = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c0157)+40)/* var←c7880 */ ))+6) ) ); SOURCE(2219, 17) state←v4528 = (* (( (ptr) gf←c0157)+10)/* fSelState←v2692 */ ); SOURCE(2238, 15) selUp←v4500 = (* (( (ptr) gf←c0157)+13)/* fSelUp←v2776 */ ); break; default: SOURCE(2267, 5) (void) XR←RaiseUnnamedError(); break; }; }; SOURCE(2274, 34) if (((* (ptr) selUp←v4500 ) != (* (( (ptr) formal←c0158)+5) ))) { SOURCE(2302, 6) (void) (XR←MonitorExit((word) (( (bPt) gf←c0157)+16)/* LOCK←v2580 */ )); return(1); }; SOURCE(2310, 54) if ((state←v4528 == 0)) { SOURCE(2327, 37) (void) TakeSelectionDownI←P540((* (( (ptr) formal←c0158)+4) ), (* (( (ptr) formal←c0158)+5) ), (* (( (ptr) formal←c0158)+6) )); }; SOURCE(2366, 53) (* (( (ptr) sel←v4472)+19) ) = 0; (* (( (ptr) sel←v4472)+10) ) = 0; }; return(0); } static void FixUpAfterDisplay←P360(formal←c0220, formal←c0221, formal←c0222, formal←c0223) word formal←c0220; word formal←c0221; word formal←c0222; word formal←c0223; { W9 var←c8744; /* declaration of id←v3720 skipped */ /* declaration of self←v3748 skipped */ /* declaration of context←v3776 skipped */ /* declaration of caret←v3804 skipped */ register ptr gf←c8776 = (ptr) &globalframe; (* (( (ptr) &var←c8744)+4)/* id←v3720 */ ) = formal←c0220; (* (( (ptr) &var←c8744)+5)/* self←v3748 */ ) = formal←c0221; (* (( (ptr) &var←c8744)+6)/* context←v3776 */ ) = formal←c0222; (* (( (ptr) &var←c8744)+7)/* caret←v3804 */ ) = formal←c0223; /* FixUpAfterDisplay: */ SOURCE(2425, 873) (void) (XR←MonitorEntry((word) (( (bPt) gf←c8776)+16)/* LOCK←v2580 */ )); SOURCE(2550, 748) { /* declaration of sel←v4572 skipped */ word var←c011; { word var←c0187; var←c0187 = (word) &var←c8744; var←c011 = (word) XR←Enable(( ((word) (fPt) NoName←Q1272) ), ( ((word) (fPt) NoName←Q1752) ), var←c0187); }; if ((var←c011 == 1)) { goto lab←L011; }; }; SOURCE(2425, 873) (void) (XR←MonitorExit((word) (( (bPt) gf←c8776)+16)/* LOCK←v2580 */ )); return; lab←L011: ; return; } static word NoName←Q1272(formal←c0161) word formal←c0161; { W7 var←c0205; register ptr gf←c0160 = (ptr) &globalframe; var←c0205.f0 = formal←c0161; SOURCE(2573, 21) { word selUp←v4600 = 0; word state←v4628; SOURCE(2573, 21) (* (( (ptr) formal←c0161)+8) ) = 0; SOURCE(2613, 201) { word var←c8104; var←c8104 = (* (( (ptr) formal←c0161)+4) ); switch (var←c8104) { case 0: SOURCE(2641, 10) (* (( (ptr) formal←c0161)+8) ) = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c0160)+40)/* var←c7880 */ ))+4) ) ); SOURCE(2653, 17) state←v4628 = (* (( (ptr) gf←c0160)+8)/* pSelState←v2636 */ ); SOURCE(2672, 15) selUp←v4600 = (* (( (ptr) gf←c0160)+11)/* pSelUp←v2720 */ ); break; case 1: SOURCE(2705, 10) (* (( (ptr) formal←c0161)+8) ) = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c0160)+40)/* var←c7880 */ ))+5) ) ); SOURCE(2717, 17) state←v4628 = (* (( (ptr) gf←c0160)+9)/* sSelState←v2664 */ ); SOURCE(2736, 15) selUp←v4600 = (* (( (ptr) gf←c0160)+12)/* sSelUp←v2748 */ ); break; case 2: SOURCE(2768, 10) (* (( (ptr) formal←c0161)+8) ) = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c0160)+40)/* var←c7880 */ ))+6) ) ); SOURCE(2780, 17) state←v4628 = (* (( (ptr) gf←c0160)+10)/* fSelState←v2692 */ ); SOURCE(2799, 15) selUp←v4600 = (* (( (ptr) gf←c0160)+13)/* fSelUp←v2776 */ ); break; default: SOURCE(2828, 5) (void) XR←RaiseUnnamedError(); break; }; }; SOURCE(2835, 32) if (((* (ptr) (* (( (ptr) formal←c0161)+8) ) ) != (* (( (ptr) formal←c0161)+5) ))) { SOURCE(2861, 6) (void) (XR←MonitorExit((word) (( (bPt) gf←c0160)+16)/* LOCK←v2580 */ )); return(1); }; SOURCE(2869, 146) SOURCE(2869, 146) { /* declaration of var←c07 skipped */ /* declaration of var←c08 skipped */ /* declaration of var←c09 skipped */ var←c0205.f4/* var←c07 */ = (0 == (* (( (ptr) (* (( (ptr) formal←c0161)+8) ))+10) )); var←c0205.f5/* var←c08 */ = (0 == (* (( (ptr) (* (( (ptr) formal←c0161)+8) ))+19) )); var←c0205.f6/* var←c09 */ = (* (( (ptr) (* (( (ptr) gf←c0160)+40)/* var←c7880 */ ))+43) ); { word var←c010; { word var←c0188; var←c0188 = (word) &var←c0205; var←c010 = (word) XR←Enable(( ((word) (fPt) NoName←Q1332) ), ( ((word) (fPt) NoName←Q1812) ), var←c0188); }; if ((var←c010 == 2)) { /* removed tail goto */ } else { if ((var←c010 == 1)) { return(1); }; }; }; }; SOURCE(3032, 34) (void) PutSelectionUpI←P660((* (( (ptr) formal←c0161)+4) ), (* (( (ptr) formal←c0161)+5) ), (* (( (ptr) formal←c0161)+6) )) ; SOURCE(3068, 230) if ( ( (0 != (* (( (ptr) formal←c0161)+7) )) ? ((* (ptr) (* (( (ptr) formal←c0161)+8) ) ) == (* (( (ptr) formal←c0161)+5) )) : 0 ) ) { SOURCE(3104, 15) { word pd10; pd10 = (* (( (ptr) (* (( (ptr) gf←c0160)+40)/* var←c7880 */ ))+44) ); (void) ( *( (fPt) ((* (ptr) pd10 ))))((* ((( (ptr) formal←c0161)+8)) ), pd10); }; SOURCE(3121, 62) if (((* (( (ptr) formal←c0161)+4) ) == 0)) { SOURCE(3140, 43) (* (( (ptr) gf←c0160)+14)/* caretVisible←v2804 */ ) = ( (int)(* (( (ptr) (* (( (ptr) formal←c0161)+8) ))+21) ) != (int)2147483647); }; SOURCE(3208, 90) { word pd11; pd11 = (* (( (ptr) (* (( (ptr) gf←c0160)+41)/* var←c8136 */ ))+4) ); (void) ( *( (fPt) ((* (ptr) pd11 ))))((* (( (ptr) formal←c0161)+5) ), (* (( (ptr) (* (( (ptr) formal←c0161)+8) ))+20) ), (* ( ( (ptr) (* (( (ptr) formal←c0161)+8) ))+21) ), ( ((* (( (ptr) formal←c0161)+4) ) == 0) ? 0 : 1 ) , pd11); }; }; }; return(0); } static word NoName←Q1332(formal←c0162) word formal←c0162; { SOURCE(2869, 146) { word pd12; pd12 = (* (( (ptr) formal←c0162)+6) ); (void) ( *( (fPt) ((* (ptr) pd12 ))))((* (( (ptr) (* (ptr) formal←c0162 ))+8) ), (* (( (ptr) (* (ptr) formal←c0162 ))+5) ), (* (( (ptr) formal←c0162)+4) ), (* (( (ptr) formal←c0162)+5) ), pd12); }; return(0); } static void AdjustSelStates←P420(formal←c0224) word formal←c0224; { W5 var←c8808; /* declaration of self←v3864 skipped */ register ptr gf←c8840 = (ptr) &globalframe; var←c8808.f4/* self←v3864 */ = formal←c0224; /* AdjustSelStates: */ SOURCE(3307, 275) (void) (XR←MonitorEntry((word) (( (bPt) gf←c8840)+16)/* LOCK←v2580 */ )); SOURCE(3375, 207) { word var←c0189; var←c0189 = (word) &var←c8808; (void) (word) XR←Enable(( ((word) (fPt) NoName←Q1392) ), ( ((word) (fPt) NoName←Q1692) ), var←c0189); }; SOURCE(3307, 275) (void) (XR←MonitorExit((word) (( (bPt) gf←c8840)+16)/* LOCK←v2580 */ )); return; } static word NoName←Q1392(formal←c0165) word formal←c0165; { register ptr gf←c0164 = (ptr) &globalframe; SOURCE(3398, 60) if ( ( ((* (( (ptr) gf←c0164)+8)/* pSelState←v2636 */ ) == 0) ? ((* (ptr) (* (( (ptr) gf←c0164)+11)/* pSelUp←v2720 */ ) ) == (* ( ( (ptr) formal←c0165)+4) )) : 0 ) ) { SOURCE(3442, 16) (* (( (ptr) gf←c0164)+8)/* pSelState←v2636 */ ) = 1; }; SOURCE(3460, 60) if ( ( ((* (( (ptr) gf←c0164)+9)/* sSelState←v2664 */ ) == 0) ? ((* (ptr) (* (( (ptr) gf←c0164)+12)/* sSelUp←v2748 */ ) ) == (* ( ( (ptr) formal←c0165)+4) )) : 0 ) ) { SOURCE(3504, 16) (* (( (ptr) gf←c0164)+9)/* sSelState←v2664 */ ) = 1; }; SOURCE(3522, 60) if ( ( ((* (( (ptr) gf←c0164)+10)/* fSelState←v2692 */ ) == 0) ? ((* (ptr) (* (( (ptr) gf←c0164)+13)/* fSelUp←v2776 */ ) ) == (* ( ( (ptr) formal←c0165)+4) )) : 0 ) ) { SOURCE(3566, 16) (* (( (ptr) gf←c0164)+10)/* fSelState←v2692 */ ) = 1; }; return(0); } static void TakeSelectionDown←P480(formal←c0225, formal←c0226, formal←c0227) word formal←c0225; word formal←c0226; word formal←c0227; { W7 var←c8872; /* declaration of id←v3924 skipped */ /* declaration of self←v3952 skipped */ /* declaration of context←v3980 skipped */ register ptr gf←c8904 = (ptr) &globalframe; var←c8872.f4/* id←v3924 */ = formal←c0225; var←c8872.f5/* self←v3952 */ = formal←c0226; var←c8872.f6/* context←v3980 */ = formal←c0227; /* TakeSelectionDown: */ SOURCE(3588, 172) (void) (XR←MonitorEntry((word) (( (bPt) gf←c8904)+16)/* LOCK←v2580 */ )); SOURCE(3700, 60) { word var←c0190; var←c0190 = (word) &var←c8872; (void) (word) XR←Enable(( ((word) (fPt) NoName←Q1452) ), ( ((word) (fPt) NoName←Q1632) ), var←c0190); }; SOURCE(3588, 172) (void) (XR←MonitorExit((word) (( (bPt) gf←c8904)+16)/* LOCK←v2580 */ )); return; } static word NoName←Q1452(formal←c0167) word formal←c0167; { SOURCE(3723, 37) (void) TakeSelectionDownI←P540((* (( (ptr) formal←c0167)+4) ), (* (( (ptr) formal←c0167)+5) ), (* (( (ptr) formal←c0167)+6) )); return(0); } static void TakeSelectionDownI←P540(id←v4040, self←v4068, context←v4096) word id←v4040; word self←v4068; word context←v4096; { register ptr gf←c8936 = (ptr) &globalframe; word selUp←v4672; word state←v4700; /* TakeSelectionDownI: */ SOURCE(3766, 598) SOURCE(3875, 110) { word var←c8168; var←c8168 = id←v4040; switch (var←c8168) { case 0: selUp←v4672 = (* (( (ptr) gf←c8936)+11)/* pSelUp←v2720 */ ); break; case 1: selUp←v4672 = (* (( (ptr) gf←c8936)+12)/* sSelUp←v2748 */ ); break; case 2: selUp←v4672 = (* (( (ptr) gf←c8936)+13)/* fSelUp←v2776 */ ); break; default: selUp←v4672 = ( XR←RaiseUnnamedError(), 0 ); break; }; }; SOURCE(3987, 118) { word var←c8200; var←c8200 = id←v4040; switch (var←c8200) { case 0: state←v4700 = (* (( (ptr) gf←c8936)+8)/* pSelState←v2636 */ ); break; case 1: state←v4700 = (* (( (ptr) gf←c8936)+9)/* sSelState←v2664 */ ); break; case 2: state←v4700 = (* (( (ptr) gf←c8936)+10)/* fSelState←v2692 */ ); break; default: state←v4700 = ( XR←RaiseUnnamedError(), 0 ); break; }; }; SOURCE(4107, 257) if ((state←v4700 != 1)) { SOURCE(4128, 34) if (((* (ptr) selUp←v4672 ) != self←v4068)) { SOURCE(4156, 6) return; }; SOURCE(4188, 71) if (((* (( (ptr) selUp←v4672)+22) ) != 0)) { SOURCE(4220, 39) { word pd13; pd13 = (* (( (ptr) (* (( (ptr) gf←c8936)+40)/* var←c7880 */ ))+37) ); (void) ( *( (fPt) ((* (ptr) pd13 ))))(context←v4096, self←v4068, selUp←v4672, id←v4040, pd13); }; }; SOURCE(4261, 103) { word var←c8232; var←c8232 = id←v4040; switch (var←c8232) { case 0: SOURCE(4287, 16) (* (( (ptr) gf←c8936)+8)/* pSelState←v2636 */ ) = 1; break; case 1: SOURCE(4318, 16) (* (( (ptr) gf←c8936)+9)/* sSelState←v2664 */ ) = 1; break; case 2: SOURCE(4348, 16) (* (( (ptr) gf←c8936)+10)/* fSelState←v2692 */ ) = 1; break; default: SOURCE(4377, 5) (void) XR←RaiseUnnamedError(); break; }; }; }; } static void PutSelectionUp←P600(formal←c0228, formal←c0229, formal←c0230) word formal←c0228; word formal←c0229; word formal←c0230; { W7 var←c8968; /* declaration of id←v4156 skipped */ /* declaration of self←v4184 skipped */ /* declaration of context←v4212 skipped */ register ptr gf←c9000 = (ptr) &globalframe; var←c8968.f4/* id←v4156 */ = formal←c0228; var←c8968.f5/* self←v4184 */ = formal←c0229; var←c8968.f6/* context←v4212 */ = formal←c0230; /* PutSelectionUp: */ SOURCE(4391, 166) (void) (XR←MonitorEntry((word) (( (bPt) gf←c9000)+16)/* LOCK←v2580 */ )); SOURCE(4500, 57) { word var←c0191; var←c0191 = (word) &var←c8968; (void) (word) XR←Enable(( ((word) (fPt) NoName←Q1512) ), ( ((word) (fPt) NoName←Q1572) ), var←c0191); }; SOURCE(4391, 166) (void) (XR←MonitorExit((word) (( (bPt) gf←c9000)+16)/* LOCK←v2580 */ )); return; } static word NoName←Q1512(formal←c0170) word formal←c0170; { SOURCE(4523, 34) (void) PutSelectionUpI←P660((* (( (ptr) formal←c0170)+4) ), (* (( (ptr) formal←c0170)+5) ), (* (( (ptr) formal←c0170)+6) )) ; return(0); } static void PutSelectionUpI←P660(id←v4272, self←v4300, context←v4328) word id←v4272; word self←v4300; word context←v4328; { register ptr gf←c9032 = (ptr) &globalframe; word sel←v4744 = 0; word selUp←v4772 = 0; word state←v4800; /* PutSelectionUpI: */ SOURCE(4563, 649) SOURCE(4709, 201) { word var←c8264; var←c8264 = id←v4272; switch (var←c8264) { case 0: SOURCE(4737, 10) sel←v4744 = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c9032)+40)/* var←c7880 */ ))+4) ) ); SOURCE(4749, 17) state←v4800 = (* (( (ptr) gf←c9032)+8)/* pSelState←v2636 */ ); SOURCE(4768, 15) selUp←v4772 = (* (( (ptr) gf←c9032)+11)/* pSelUp←v2720 */ ); break; case 1: SOURCE(4801, 10) sel←v4744 = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c9032)+40)/* var←c7880 */ ))+5) ) ); SOURCE(4813, 17) state←v4800 = (* (( (ptr) gf←c9032)+9)/* sSelState←v2664 */ ); SOURCE(4832, 15) selUp←v4772 = (* (( (ptr) gf←c9032)+12)/* sSelUp←v2748 */ ); break; case 2: SOURCE(4864, 10) sel←v4744 = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c9032)+40)/* var←c7880 */ ))+6) ) ); SOURCE(4876, 17) state←v4800 = (* (( (ptr) gf←c9032)+10)/* fSelState←v2692 */ ); SOURCE(4895, 15) selUp←v4772 = (* (( (ptr) gf←c9032)+13)/* fSelUp←v2776 */ ); break; default: SOURCE(4924, 5) (void) XR←RaiseUnnamedError(); break; }; }; SOURCE(4931, 281) if ((state←v4800 != 0)) { SOURCE(4950, 30) { word pd14; pd14 = (* (( (ptr) (* (( (ptr) gf←c9032)+40)/* var←c7880 */ ))+12) ); (void) ( *( (fPt) ((* (ptr) pd14 ))))(sel←v4744, selUp←v4772, pd14); }; SOURCE(4982, 34) if (((* (ptr) selUp←v4772 ) != self←v4300)) { SOURCE(5010, 6) return; }; SOURCE(5042, 71) if (((* (( (ptr) selUp←v4772)+22) ) != 0)) { SOURCE(5074, 39) { word pd15; pd15 = (* (( (ptr) (* (( (ptr) gf←c9032)+40)/* var←c7880 */ ))+37) ); (void) ( *( (fPt) ((* (ptr) pd15 ))))(context←v4328, self←v4300, selUp←v4772, id←v4272, pd15); }; }; SOURCE(5115, 97) { word var←c8296; var←c8296 = id←v4272; switch (var←c8296) { case 0: SOURCE(5141, 14) (* (( (ptr) gf←c9032)+8)/* pSelState←v2636 */ ) = 0; break; case 1: SOURCE(5170, 14) (* (( (ptr) gf←c9032)+9)/* sSelState←v2664 */ ) = 0; break; case 2: SOURCE(5198, 14) (* (( (ptr) gf←c9032)+10)/* fSelState←v2692 */ ) = 0; break; default: SOURCE(5225, 5) (void) XR←RaiseUnnamedError(); break; }; }; }; } static void NoName←Q1572(formal←c096, formal←c200036, formal←c200037, formal←c200038, formal←c200039) word formal←c096; word formal←c200036; word formal←c200037; word formal←c200038; word formal←c200039; { register ptr gf←c0172 = (ptr) &globalframe; if ((formal←c200037 == XR←Unwind)) { (void) (XR←MonitorExit((word) (( (bPt) gf←c0172)+16)/* LOCK←v2580 */ )); }; (* (ptr) formal←c096 ) = 0; (* (( (ptr) formal←c096)+1) ) = 0; return; } static void NoName←Q1632(formal←c0101, formal←c200032, formal←c200033, formal←c200034, formal←c200035) word formal←c0101; word formal←c200032; word formal←c200033; word formal←c200034; word formal←c200035; { register ptr gf←c0173 = (ptr) &globalframe; if ((formal←c200033 == XR←Unwind)) { (void) (XR←MonitorExit((word) (( (bPt) gf←c0173)+16)/* LOCK←v2580 */ )); }; (* (ptr) formal←c0101 ) = 0; (* (( (ptr) formal←c0101)+1) ) = 0; return; } static void NoName←Q1692(formal←c0106, formal←c200028, formal←c200029, formal←c200030, formal←c200031) word formal←c0106; word formal←c200028; word formal←c200029; word formal←c200030; word formal←c200031; { register ptr gf←c0174 = (ptr) &globalframe; if ((formal←c200029 == XR←Unwind)) { (void) (XR←MonitorExit((word) (( (bPt) gf←c0174)+16)/* LOCK←v2580 */ )); }; (* (ptr) formal←c0106 ) = 0; (* (( (ptr) formal←c0106)+1) ) = 0; return; } static void NoName←Q1752(formal←c0111, formal←c200020, formal←c200021, formal←c200022, formal←c200023) word formal←c0111; word formal←c200020; word formal←c200021; word formal←c200022; word formal←c200023; { register ptr gf←c0175 = (ptr) &globalframe; if ((formal←c200021 == XR←Unwind)) { (void) (XR←MonitorExit((word) (( (bPt) gf←c0175)+16)/* LOCK←v2580 */ )); }; (* (ptr) formal←c0111 ) = 0; (* (( (ptr) formal←c0111)+1) ) = 0; return; } static void NoName←Q1812(formal←c0116, formal←c200024, formal←c200025, formal←c200026, formal←c200027) word formal←c0116; word formal←c200024; word formal←c200025; word formal←c200026; word formal←c200027; { register ptr gf←c0176 = (ptr) &globalframe; if ((formal←c200025 == (* (( (ptr) (* (( (ptr) gf←c0176)+40)/* var←c7880 */ ))+39) ))) { SOURCE(2984, 31) { word pd16; pd16 = (* (( (ptr) (* (( (ptr) gf←c0176)+40)/* var←c7880 */ ))+12) ); (void) ( *( (fPt) ((* (ptr) pd16 ))))((* (ptr) (* (( (ptr) (* (( (ptr) gf←c0176)+40)/* var←c7880 */ ))+8) ) ), (* (( (ptr) (* (ptr) formal←c200024 ))+8) ), pd16); }; SOURCE(3017, 8) (* (ptr) formal←c0116 ) = 2; (* (( (ptr) formal←c0116)+1) ) = 2; return; }; (* (ptr) formal←c0116 ) = 0; (* (( (ptr) formal←c0116)+1) ) = 0; return; } static void NoName←Q1872(formal←c0121, formal←c200016, formal←c200017, formal←c200018, formal←c200019) word formal←c0121; word formal←c200016; word formal←c200017; word formal←c200018; word formal←c200019; { register ptr gf←c0177 = (ptr) &globalframe; if ((formal←c200017 == XR←Unwind)) { (void) (XR←MonitorExit((word) (( (bPt) gf←c0177)+16)/* LOCK←v2580 */ )); }; (* (ptr) formal←c0121 ) = 0; (* (( (ptr) formal←c0121)+1) ) = 0; return; } static void NoName←Q1932(formal←c0126, formal←c200012, formal←c200013, formal←c200014, formal←c200015) word formal←c0126; word formal←c200012; word formal←c200013; word formal←c200014; word formal←c200015; { register ptr gf←c0178 = (ptr) &globalframe; if ((formal←c200013 == XR←Unwind)) { (void) (XR←MonitorExit((word) (( (bPt) gf←c0178)+16)/* LOCK←v2580 */ )); }; (* (ptr) formal←c0126 ) = 0; (* (( (ptr) formal←c0126)+1) ) = 0; return; } static void NoName←Q1992(formal←c0131, formal←c200008, formal←c200009, formal←c200010, formal←c200011) word formal←c0131; word formal←c200008; word formal←c200009; word formal←c200010; word formal←c200011; { register ptr gf←c0179 = (ptr) &globalframe; if ((formal←c200009 == XR←Unwind)) { (void) (XR←MonitorExit((word) (( (bPt) gf←c0179)+16)/* LOCK←v2580 */ )); }; (* (ptr) formal←c0131 ) = 0; (* (( (ptr) formal←c0131)+1) ) = 0; return; } static void NoName←Q2052(formal←c0136, formal←c200004, formal←c200005, formal←c200006, formal←c200007) word formal←c0136; word formal←c200004; word formal←c200005; word formal←c200006; word formal←c200007; { register ptr gf←c0180 = (ptr) &globalframe; if ((formal←c200005 == XR←Unwind)) { (void) (XR←MonitorExit((word) (( (bPt) gf←c0180)+16)/* LOCK←v2580 */ )); }; (* (ptr) formal←c0136 ) = 0; (* (( (ptr) formal←c0136)+1) ) = 0; return; } static void NoName←Q2112(formal←c0141, formal←c200000, formal←c200001, formal←c200002, formal←c200003) word formal←c0141; word formal←c200000; word formal←c200001; word formal←c200002; word formal←c200003; { register ptr gf←c0181 = (ptr) &globalframe; if ((formal←c200001 == XR←Unwind)) { (void) (XR←MonitorExit((word) (( (bPt) gf←c0181)+16)/* LOCK←v2580 */ )); }; (* (ptr) formal←c0141 ) = 0; (* (( (ptr) formal←c0141)+1) ) = 0; return; } /* file: TEditSelection2Impl, module: TEditSelection2Impl, compiled at: February 27, 1992 5:56:36 pm PST */ extern void XR←install←TEditSelection2Impl() { NoName←Q912(); } extern void XR←run←TEditSelection2Impl() { XR←Start(&globalframe); }