/* Generated with C2C (Cedar To C)*/ /* Copyright (C) 1992 by Xerox Corporation. All rights reserved. */ /* time: March 20, 1992 12:40:55 pm PST */ /* C2C version: October 16, 1990 (native) */ /* ref-counting: off */ /* file: EchoStreamImpl, module: EchoStreamImpl */ /* switches: bcfhklnouw */ #include #include static char versionStamp[] = "@(#)mob_version [3454592001,1892699241] EchoStreamImpl"; 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 struct {word f0, f1, f2;} W3; typedef struct {W16 f; W3 r;} W19; typedef word (*fPt)(); typedef struct {word f0, f1;} W2; typedef struct {W8 f; W2 r;} W10; typedef struct {word f0, f1, f2, f3, f4, f5;} W6; typedef struct {W8 f; W6 r;} W14; typedef W3 *W3Pt; typedef struct {W8 f; word r;} W9; typedef struct {word f0, f1, f2, f3;} W4; #define SOURCE(p, l) /* source p, l */ #define MIN(cast, x, y) ( ( cast x) < ( cast y) ? (x) : (y) ) static void NoName_Q660(); static void EchoStreamImpl_P0(); static word CreateEchoStream_P60(); static word GetChar_P120(); static word NoName_Q720(); static word NoName_Q780(); static word UnsafeGetBlock_P180(); static word NoName_Q840(); static word NoName_Q900(); static word EndOf_P240(); static word NoName_Q960(); static word CharsAvail_P300(); static word NoName_Q1020(); static void Backup_P360(); static word NoName_Q1080(); static word NoName_Q1140(); static void Reset_P420(); static word NoName_Q1200(); static word NoName_Q1260(); static void Close_P480(); static word NoName_Q1320(); static word NoName_Q1380(); static word GetIndex_P540(); static word GetLength_P600(); static word NoName_Q1440(); static void NoName_Q1500(); static void NoName_Q1560(); static void NoName_Q1620(); static void NoName_Q1680(); static void NoName_Q1740(); static void NoName_Q1800(); static void NoName_Q1860(); static void NoName_Q1920(); static void NoName_Q1980(); static void NoName_Q2040(); static void NoName_Q2100(); static void NoName_Q2160(); static void NoName_Q2220(); static struct {unsigned f; char r[4];} string1 = {131076, "\216\251\000"}; static struct {unsigned f; char r[4];} string2 = {65537, "\001\000\000"}; static struct {unsigned f; char r[16];} string3 = {851984, "\257\300\315\350\344\001\300\160\320\114\151\100\200\000\000"}; static struct {unsigned f; char r[4];} string4 = {131074, "\004\003\000"}; static struct {unsigned f; char r[8];} string5 = {262152, "Echo\000\000\000"}; static struct {unsigned f; char r[16];} string6 = {851984, "\257\300\315\350\344\001\300\160\320\114\151\100\164\000\000"}; static struct {unsigned f; char r[4];} string7 = {196611, "\004B\020"}; static struct {unsigned f; char r[16];} string8 = {851984, "\257\300\015\277\004\146\300\034\367\146\045\100\164\000\000"}; static struct {unsigned f; char r[16];} string9 = {851984, "\257\300\165\000\243\166\300\177\026\106\323\100\150\000\000"}; static struct {unsigned f; char r[16];} string10 = {851984, "\257\300\376\156\222\311\300\241\263\234\321\100\150\000\000"}; static struct { word f0[10]; 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; word f27; word f28; word f29; word f30; word f31[4]; } globalframe = { {0}, (word) GetLength_P600, 0, (word) GetIndex_P540, 0, (word) Close_P480, 0, (word) Reset_P420, 0, (word) Backup_P360, 0, (word) CharsAvail_P300, 0, (word) EndOf_P240, 0, (word) UnsafeGetBlock_P180, 0, (word) GetChar_P120, 0, (word) CreateEchoStream_P60, 0, (word) EchoStreamImpl_P0, {0} }; static void NoName_Q660() { register ptr gf_c0238 = (ptr) &globalframe; word var_c14120; (* (( (ptr) gf_c0238)+5) ) = (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2); (* (( (ptr) gf_c0238)+6) ) = (word) XR_GetTypeIndex((word) &string3, 0, (word) &string4); (* (ptr) (( (bPt) gf_c0238)+36) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0238)+5) ), (word) &string5); (void) XR_DeclareGlobalFrame((word) "EchoStreamImpl", &globalframe, (word) XR_GetTypeIndex((word) &string6, 0, (word) &string7) , (word) (( (bPt) gf_c0238)+120)/* var_c13896 */ ); var_c14120 = (word) XR_ImportInterface((word) "IO", (word) XR_GetTypeIndexS((word) (&string8)), 103); (* (( (ptr) gf_c0238)+32)/* var_c13928 */ ) = var_c14120; (void) XR_ImportProcS(var_c14120, 67377921); (void) XR_ImportProcS(var_c14120, 530434); (void) XR_ImportProcS(var_c14120, 268033); (void) XR_ImportProcS(var_c14120, 529922); (void) XR_ImportProcS(var_c14120, 527874); (void) XR_ImportProcS(var_c14120, 67636482); (void) XR_ImportProcS(var_c14120, 67373825); (void) XR_ImportProcS(var_c14120, 1053698); (void) XR_ImportProcS(var_c14120, 68160002); (void) XR_ImportProcS(var_c14120, 528642); (void) XR_ImportProcS(var_c14120, 67372801); (void) XR_ImportProcS(var_c14120, 67921155); (void) XR_ImportProcS(var_c14120, 72115219); var_c14120 = (word) XR_ImportInterface((word) "IOUtils", (word) XR_GetTypeIndexS((word) (&string9)), 27); (* (( (ptr) gf_c0238)+33)/* var_c14088 */ ) = var_c14120; (void) XR_ImportProcS(var_c14120, 1053700); var_c14120 = (word) XR_ExportInterface((word) "EchoStream", (word) XR_GetTypeIndexS((word) (&string10)), 1); (* (( (ptr) gf_c0238)+34)/* var_c14152 */ ) = var_c14120; (void) XR_ExportProcS(var_c14120, (word) (( (bPt) gf_c0238)+112)/* var_c13864 */ , 68943879); } static void EchoStreamImpl_P0(formal_c050, formal_c048) word formal_c050; word formal_c048; { register ptr gf_c14184 = (ptr) &globalframe; /* EchoStreamImpl: */ SOURCE(45, 4046) SOURCE(347, 257) { W19 var_c049; (* (ptr) (word) &var_c049 ) = 0; (* (( (ptr) (word) &var_c049) + 1) ) = (* (( (ptr) gf_c14184)+9) ); (* (( (ptr) (word) &var_c049) + 2) ) = (word) (( (bPt) gf_c14184)+104)/* var_c13832 */ ; (* (( (ptr) (word) &var_c049) + 3) ) = 0; (* (( (ptr) (word) &var_c049) + 4) ) = (word) (( (bPt) gf_c14184)+96)/* var_c13800 */ ; (* (( (ptr) (word) &var_c049) + 5) ) = (word) (( (bPt) gf_c14184)+88)/* var_c13768 */ ; (* (( (ptr) (word) &var_c049) + 6) ) = (word) (( (bPt) gf_c14184)+80)/* var_c13736 */ ; (* (( (ptr) (word) &var_c049) + 7) ) = (word) (( (bPt) gf_c14184)+72)/* var_c13704 */ ; (* (( (ptr) (word) &var_c049) + 8) ) = 0; (* (( (ptr) (word) &var_c049) + 9) ) = 0; (* (( (ptr) (word) &var_c049) + 10) ) = 0; (* (( (ptr) (word) &var_c049) + 11) ) = 0; (* (( (ptr) (word) &var_c049) + 12) ) = (word) (( (bPt) gf_c14184)+64)/* var_c13672 */ ; (* (( (ptr) (word) &var_c049) + 13) ) = (word) (( (bPt) gf_c14184)+56)/* var_c13640 */ ; (* (( (ptr) (word) &var_c049) + 14) ) = (word) (( (bPt) gf_c14184)+48)/* var_c13608 */ ; (* (( (ptr) (word) &var_c049) + 15) ) = 0; (* (( (ptr) (word) &var_c049) + 16) ) = (word) (( (bPt) gf_c14184)+40)/* var_c13576 */ ; (* (( (ptr) (word) &var_c049) + 17) ) = 0; (* (( (ptr) (word) &var_c049) + 18) ) = 0; { word pd11; pd11 = (* (( (ptr) (* (( (ptr) gf_c14184)+32)/* var_c13928 */ ))+104) ); (* (( (ptr) gf_c14184)+4)/* echoProcs_v2636 */ ) = (word) ( *( (fPt) ((* (ptr) pd11 ))))((word) (&var_c049), pd11); }; }; } static word CreateEchoStream_P60(in_v3288, out_v3316, mapErrors_v3344, eraseBackup_v3372, resetOutput_v3400, closeIn_v3428, closeOut_v3456) word in_v3288; word out_v3316; word mapErrors_v3344; word eraseBackup_v3372; word resetOutput_v3400; word closeIn_v3428; word closeOut_v3456; { register ptr gf_c14216 = (ptr) &globalframe; word var_c3500; word esd_v4444; /* CreateEchoStream: */ SOURCE(607, 322) SOURCE(765, 117) esd_v4444 = XR_NewObject(36, (* (( (ptr) gf_c14216)+6) )); (* (ptr) esd_v4444 ) = in_v3288; (* (( (ptr) esd_v4444)+1) ) = out_v3316; (* (( (ptr) esd_v4444)+2) ) = mapErrors_v3344; (* (( (ptr) esd_v4444)+3) ) = eraseBackup_v3372; (* (( (ptr) esd_v4444)+4) ) = resetOutput_v3400; (* (( (ptr) esd_v4444)+5) ) = closeIn_v3428; (* (( (ptr) esd_v4444)+6) ) = closeOut_v3456; SOURCE(884, 45) { word pd12; pd12 = (* (( (ptr) (* (( (ptr) gf_c14216)+32)/* var_c13928 */ ))+105) ); return((word) ( *( (fPt) ((* (ptr) pd12 ))))((* (( (ptr) gf_c14216)+4)/* echoProcs_v2636 */ ), esd_v4444, 0, pd12)); }; } static word GetChar_P120(formal_c0303) word formal_c0303; { W10 var_c14248; /* declaration of self_v3560 skipped */ register ptr gf_c14280 = (ptr) &globalframe; word var_c3604; /* declaration of esd_v4488 skipped */ /* declaration of c_v4516 skipped */ (* (( (ptr) &var_c14248)+4)/* self_v3560 */ ) = formal_c0303; /* GetChar: */ SOURCE(933, 448) SOURCE(981, 45) (* (( (ptr) &var_c14248)+5)/* esd_v4488 */ ) = XR_Narrow((* (( (ptr) (* (( (ptr) &var_c14248)+4)/* self_v3560 */ ))+1) ), (* ( ( (ptr) gf_c14280)+6) )); SOURCE(1028, 39) { /* declaration of var_c01 skipped */ /* declaration of var_c02 skipped */ (* (( (ptr) &var_c14248)+7)/* var_c01 */ ) = (* (ptr) (* (( (ptr) &var_c14248)+5)/* esd_v4488 */ ) ); (* (( (ptr) &var_c14248)+8)/* var_c02 */ ) = (* (( (ptr) (* (( (ptr) gf_c14280)+32)/* var_c13928 */ ))+11) ); { /* declaration of var_c03 skipped */ { word var_c0277; var_c0277 = (word) &var_c14248; (void) (word) XR_Enable(( ((word) (fPt) NoName_Q780) ), ( ((word) (fPt) NoName_Q2220) ), var_c0277); }; (* (( (ptr) &var_c14248)+6)/* c_v4516 */ ) = (* (( (ptr) &var_c14248)+9)/* var_c03 */ ); }; }; SOURCE(1173, 113) if (( (int)(* (( (ptr) (* (( (ptr) &var_c14248)+5)/* esd_v4488 */ ))+8) ) <= (int)0) || (0 != (* (( (ptr) (* (( (ptr) &var_c14248)+5) /* esd_v4488 */ ))+3) ))) { SOURCE(1214, 72) { /* declaration of var_c04 skipped */ /* declaration of var_c05 skipped */ (* (( (ptr) &var_c14248)+7)/* var_c04 */ ) = (* (( (ptr) (* (( (ptr) &var_c14248)+5)/* esd_v4488 */ ))+1) ); (* (( (ptr) &var_c14248)+8)/* var_c05 */ ) = (* (( (ptr) (* (( (ptr) gf_c14280)+32)/* var_c13928 */ ))+21) ); { word var_c0278; var_c0278 = (word) &var_c14248; (void) (word) XR_Enable(( ((word) (fPt) NoName_Q720) ), ( ((word) (fPt) NoName_Q2160) ), var_c0278); }; }; }; SOURCE(1288, 81) if (( (int)(* (( (ptr) (* (( (ptr) &var_c14248)+5)/* esd_v4488 */ ))+8) ) > (int)0)) { SOURCE(1309, 34) (* (( (ptr) (* (( (ptr) &var_c14248)+5)/* esd_v4488 */ ))+8) ) = ((* (( (ptr) (* (( (ptr) &var_c14248)+5)/* esd_v4488 */ ))+8) ) - 1); } else { SOURCE(1343, 26) (* (( (ptr) (* (( (ptr) &var_c14248)+5)/* esd_v4488 */ ))+7) ) = ((* (( (ptr) (* (( (ptr) &var_c14248)+5)/* esd_v4488 */ ))+7) ) + 1); }; SOURCE(1371, 10) return((* (( (ptr) &var_c14248)+6)/* c_v4516 */ )); } static word NoName_Q720(formal_c0242) word formal_c0242; { SOURCE(1214, 72) { word pd13; pd13 = (* (( (ptr) formal_c0242)+8) ); (void) ( *( (fPt) ((* (ptr) pd13 ))))((* (( (ptr) formal_c0242)+7) ), (* (( (ptr) formal_c0242)+6) ), pd13); }; return(0); } static word NoName_Q780(formal_c0243) word formal_c0243; { SOURCE(1028, 39) { word pd14; pd14 = (* (( (ptr) formal_c0243)+8) ); (* (( (ptr) formal_c0243)+9) ) = (word) ( *( (fPt) ((* (ptr) pd14 ))))((* ((( (ptr) formal_c0243)+7)) ), pd14); }; return(0); } static word UnsafeGetBlock_P180(formal_c0304, formal_c0305) word formal_c0304; W3 formal_c0305; { W14 var_c14312; /* declaration of self_v3664 skipped */ /* declaration of block_v3692 skipped */ register ptr gf_c14344 = (ptr) &globalframe; /* declaration of nBytesRead_v3736 skipped */ /* declaration of esd_v4560 skipped */ /* declaration of unbacked_v4588 skipped */ (* (( (ptr) &var_c14312)+4)/* self_v3664 */ ) = formal_c0304; (* (W3Pt) (( (ptr) &var_c14312)+5)/* block_v3692 */ ) = formal_c0305; /* UnsafeGetBlock: */ SOURCE(1385, 713) SOURCE(1385, 713) (* (( (ptr) &var_c14312)+8)/* nBytesRead_v3736 */ ) = 0; SOURCE(1489, 45) (* (( (ptr) &var_c14312)+9)/* esd_v4560 */ ) = XR_Narrow((* (( (ptr) (* (( (ptr) &var_c14312)+4)/* self_v3664 */ ))+1) ), (* ( ( (ptr) gf_c14344)+6) )); SOURCE(1559, 160) SOURCE(1560, 159) { /* declaration of var_c06 skipped */ /* declaration of var_c07 skipped */ (* (( (ptr) &var_c14312)+11)/* var_c06 */ ) = (* (ptr) (* (( (ptr) &var_c14312)+9)/* esd_v4560 */ ) ); (* (( (ptr) &var_c14312)+12)/* var_c07 */ ) = (* (( (ptr) (* (( (ptr) gf_c14344)+32)/* var_c13928 */ ))+14) ); { /* declaration of var_c08 skipped */ { word var_c0279; var_c0279 = (word) &var_c14312; (void) (word) XR_Enable(( ((word) (fPt) NoName_Q900) ), ( ((word) (fPt) NoName_Q2100) ), var_c0279); }; (* (( (ptr) &var_c14312)+8)/* nBytesRead_v3736 */ ) = (* (( (ptr) &var_c14312)+13)/* var_c08 */ ); }; }; SOURCE(1722, 38) { word x15; word x16; (* (( (ptr) &var_c14312)+10)/* unbacked_v4588 */ ) = (x15 = (* (( (ptr) &var_c14312)+8)/* nBytesRead_v3736 */ ), x16 = (* (( (ptr) (* (( (ptr) &var_c14312)+9)/* esd_v4560 */ ))+8) ), MIN((int)(word), x15, x16)); }; SOURCE(1763, 241) { word var_c0280; var_c0280 = (word) &var_c14312; (void) (word) XR_Enable(( ((word) (fPt) NoName_Q840) ), ( ((word) (fPt) NoName_Q2040) ), var_c0280); }; SOURCE(2009, 34) (* (( (ptr) (* (( (ptr) &var_c14312)+9)/* esd_v4560 */ ))+8) ) = ((* (( (ptr) (* (( (ptr) &var_c14312)+9)/* esd_v4560 */ ))+8) ) - (* (( (ptr) &var_c14312)+10)/* unbacked_v4588 */ )); SOURCE(2045, 45) (* (( (ptr) (* (( (ptr) &var_c14312)+9)/* esd_v4560 */ ))+7) ) = (((* (( (ptr) (* (( (ptr) &var_c14312)+9)/* esd_v4560 */ ))+7) ) + (* (( (ptr) &var_c14312)+8)/* nBytesRead_v3736 */ )) - (* (( (ptr) &var_c14312)+10)/* unbacked_v4588 */ )); SOURCE(2092, 6) return((* (( (ptr) &var_c14312)+8)/* nBytesRead_v3736 */ )); } static word NoName_Q840(formal_c0246) word formal_c0246; { register ptr gf_c0245 = (ptr) &globalframe; SOURCE(1824, 180) if ((0 != (* (( (ptr) (* (( (ptr) formal_c0246)+9) ))+3) ))) { SOURCE(1848, 72) { W3 var_c14024; var_c14024.f0 = (* (( (ptr) formal_c0246)+5) ); var_c14024.f1 = (* (( (ptr) formal_c0246)+6) ); var_c14024.f2 = (* (( (ptr) formal_c0246)+8) ); { word pd17; pd17 = (* (( (ptr) (* (( (ptr) gf_c0245)+32)/* var_c13928 */ ))+24) ); (void) ( *( (fPt) ((* (ptr) pd17 ))))((* (( (ptr) (* (( (ptr) formal_c0246)+9) ))+1) ), var_c14024, pd17); }; }; } else { SOURCE(1920, 84) { W3 var_c14056; var_c14056.f0 = (* (( (ptr) formal_c0246)+5) ); var_c14056.f1 = ((* (( (ptr) formal_c0246)+6) ) + (* (( (ptr) formal_c0246)+10) )); var_c14056.f2 = ((* (( (ptr) formal_c0246)+8) ) - (* (( (ptr) formal_c0246)+10) )); { word pd18; pd18 = (* (( (ptr) (* (( (ptr) gf_c0245)+32)/* var_c13928 */ ))+24) ); (void) ( *( (fPt) ((* (ptr) pd18 ))))((* (( (ptr) (* (( (ptr) formal_c0246)+9) ))+1) ), var_c14056, pd18); }; }; }; return(0); } static word NoName_Q900(formal_c0247) word formal_c0247; { SOURCE(1560, 159) { word pd19; pd19 = (* (( (ptr) formal_c0247)+12) ); (* (( (ptr) formal_c0247)+13) ) = (word) ( *( (fPt) ((* (ptr) pd19 ))))((* (( (ptr) formal_c0247)+11) ), (* (W3Pt) (( (ptr) formal_c0247)+5) ), pd19); }; return(0); } static word EndOf_P240(formal_c0306) word formal_c0306; { W9 var_c14376; /* declaration of self_v3796 skipped */ register ptr gf_c14408 = (ptr) &globalframe; word var_c3840; /* declaration of esd_v4632 skipped */ (* (( (ptr) &var_c14376)+4)/* self_v3796 */ ) = formal_c0306; /* EndOf: */ SOURCE(2102, 231) SOURCE(2148, 45) (* (( (ptr) &var_c14376)+5)/* esd_v4632 */ ) = XR_Narrow((* (( (ptr) (* (( (ptr) &var_c14376)+4)/* self_v3796 */ ))+1) ), (* ( ( (ptr) gf_c14408)+6) )); SOURCE(2195, 138) { /* declaration of var_c09 skipped */ /* declaration of var_c010 skipped */ (* (( (ptr) &var_c14376)+6)/* var_c09 */ ) = (* (ptr) (* (( (ptr) &var_c14376)+5)/* esd_v4632 */ ) ); (* (( (ptr) &var_c14376)+7)/* var_c010 */ ) = (* (( (ptr) (* (( (ptr) gf_c14408)+32)/* var_c13928 */ ))+15) ); { /* declaration of var_c011 skipped */ (void) (word) XR_Enable(( ((word) (fPt) NoName_Q960) ), ( ((word) (fPt) NoName_Q1980) ), (word) &var_c14376); return((* (( (ptr) &var_c14376)+8)/* var_c011 */ )); }; }; } static word NoName_Q960(formal_c0249) word formal_c0249; { SOURCE(2195, 138) { word pd20; pd20 = (* (( (ptr) formal_c0249)+7) ); (* (( (ptr) formal_c0249)+8) ) = (word) ( *( (fPt) ((* (ptr) pd20 ))))((* ((( (ptr) formal_c0249)+6)) ), pd20); }; return(0); } static word CharsAvail_P300(formal_c0307, wait_v3928) word formal_c0307; word wait_v3928; { W9 var_c14440; /* declaration of self_v3900 skipped */ register ptr gf_c14472 = (ptr) &globalframe; word var_c3972; /* declaration of esd_v4676 skipped */ (* (( (ptr) &var_c14440)+4)/* self_v3900 */ ) = formal_c0307; /* CharsAvail: */ SOURCE(2337, 252) SOURCE(2399, 45) (* (( (ptr) &var_c14440)+5)/* esd_v4676 */ ) = XR_Narrow((* (( (ptr) (* (( (ptr) &var_c14440)+4)/* self_v3900 */ ))+1) ), (* ( ( (ptr) gf_c14472)+6) )); SOURCE(2446, 143) { /* declaration of var_c012 skipped */ /* declaration of var_c013 skipped */ (* (( (ptr) &var_c14440)+6)/* var_c012 */ ) = (* (ptr) (* (( (ptr) &var_c14440)+5)/* esd_v4676 */ ) ); (* (( (ptr) &var_c14440)+7)/* var_c013 */ ) = (* (( (ptr) (* (( (ptr) gf_c14472)+32)/* var_c13928 */ ))+17) ); { /* declaration of var_c014 skipped */ (void) (word) XR_Enable(( ((word) (fPt) NoName_Q1020) ), ( ((word) (fPt) NoName_Q1920) ), (word) &var_c14440); return((* (( (ptr) &var_c14440)+8)/* var_c014 */ )); }; }; } static word NoName_Q1020(formal_c0251) word formal_c0251; { SOURCE(2446, 143) { word pd21; pd21 = (* (( (ptr) formal_c0251)+7) ); (* (( (ptr) formal_c0251)+8) ) = (word) ( *( (fPt) ((* (ptr) pd21 ))))((* (( (ptr) formal_c0251)+6) ), 0, pd21); }; return(0); } static void Backup_P360(formal_c0308, formal_c0309) word formal_c0308; word formal_c0309; { W9 var_c14504; /* declaration of self_v4032 skipped */ /* declaration of char_v4060 skipped */ register ptr gf_c14536 = (ptr) &globalframe; /* declaration of esd_v4720 skipped */ (* (( (ptr) &var_c14504)+4)/* self_v4032 */ ) = formal_c0308; (* (( (ptr) &var_c14504)+5)/* char_v4060 */ ) = formal_c0309; /* Backup: */ SOURCE(2593, 370) SOURCE(2637, 45) (* (( (ptr) &var_c14504)+6)/* esd_v4720 */ ) = XR_Narrow((* (( (ptr) (* (( (ptr) &var_c14504)+4)/* self_v4032 */ ))+1) ), (* ( ( (ptr) gf_c14536)+6) )); SOURCE(2684, 137) { /* declaration of var_c015 skipped */ /* declaration of var_c016 skipped */ (* (( (ptr) &var_c14504)+7)/* var_c015 */ ) = (* (ptr) (* (( (ptr) &var_c14504)+6)/* esd_v4720 */ ) ); (* (( (ptr) &var_c14504)+8)/* var_c016 */ ) = (* (( (ptr) (* (( (ptr) gf_c14536)+32)/* var_c13928 */ ))+18) ); { word var_c0281; var_c0281 = (word) &var_c14504; (void) (word) XR_Enable(( ((word) (fPt) NoName_Q1140) ), ( ((word) (fPt) NoName_Q1860) ), var_c0281); }; }; SOURCE(2823, 28) (* (( (ptr) (* (( (ptr) &var_c14504)+6)/* esd_v4720 */ ))+8) ) = ((* (( (ptr) (* (( (ptr) &var_c14504)+6)/* esd_v4720 */ ))+8) ) + 1); SOURCE(2853, 102) if ((0 != (* (( (ptr) (* (( (ptr) &var_c14504)+6)/* esd_v4720 */ ))+3) ))) { SOURCE(2877, 78) { /* declaration of var_c017 skipped */ /* declaration of var_c018 skipped */ (* (( (ptr) &var_c14504)+7)/* var_c017 */ ) = (* (( (ptr) (* (( (ptr) &var_c14504)+6)/* esd_v4720 */ ))+1) ); (* (( (ptr) &var_c14504)+8)/* var_c018 */ ) = (* (( (ptr) (* (( (ptr) gf_c14536)+32)/* var_c13928 */ ))+26) ); { word var_c0282; var_c0282 = (word) &var_c14504; (void) (word) XR_Enable(( ((word) (fPt) NoName_Q1080) ), ( ((word) (fPt) NoName_Q1800) ), var_c0282); }; }; }; SOURCE(2957, 6) return; } static word NoName_Q1080(formal_c0253) word formal_c0253; { SOURCE(2877, 78) { word pd22; pd22 = (* (( (ptr) formal_c0253)+8) ); (void) ( *( (fPt) ((* (ptr) pd22 ))))((* (( (ptr) formal_c0253)+7) ), (* (( (ptr) formal_c0253)+5) ), pd22); }; return(0); } static word NoName_Q1140(formal_c0254) word formal_c0254; { SOURCE(2684, 137) { word pd23; pd23 = (* (( (ptr) formal_c0254)+8) ); (void) ( *( (fPt) ((* (ptr) pd23 ))))((* (( (ptr) formal_c0254)+7) ), (* (( (ptr) formal_c0254)+5) ), pd23); }; return(0); } static void Reset_P420(formal_c0310) word formal_c0310; { W8 var_c14568; /* declaration of self_v4120 skipped */ register ptr gf_c14600 = (ptr) &globalframe; /* declaration of esd_v4764 skipped */ var_c14568.f4/* self_v4120 */ = formal_c0310; /* Reset: */ SOURCE(2967, 312) SOURCE(2998, 45) var_c14568.f5/* esd_v4764 */ = XR_Narrow((* (( (ptr) var_c14568.f4/* self_v4120 */ )+1) ), (* (( (ptr) gf_c14600)+6) )); SOURCE(3045, 131) { /* declaration of var_c019 skipped */ /* declaration of var_c020 skipped */ var_c14568.f6/* var_c019 */ = (* (ptr) var_c14568.f5/* esd_v4764 */ ); var_c14568.f7/* var_c020 */ = (* (( (ptr) (* (( (ptr) gf_c14600)+32)/* var_c13928 */ ))+27) ); { word var_c0283; var_c0283 = (word) &var_c14568; (void) (word) XR_Enable(( ((word) (fPt) NoName_Q1260) ), ( ((word) (fPt) NoName_Q1740) ), var_c0283); }; }; SOURCE(3178, 93) if ((0 != (* (( (ptr) var_c14568.f5/* esd_v4764 */ )+4) ))) { SOURCE(3202, 69) { /* declaration of var_c021 skipped */ /* declaration of var_c022 skipped */ var_c14568.f6/* var_c021 */ = (* (( (ptr) var_c14568.f5/* esd_v4764 */ )+1) ); var_c14568.f7/* var_c022 */ = (* (( (ptr) (* (( (ptr) gf_c14600)+32)/* var_c13928 */ ))+27) ); { word var_c0284; var_c0284 = (word) &var_c14568; (void) (word) XR_Enable(( ((word) (fPt) NoName_Q1200) ), ( ((word) (fPt) NoName_Q1680) ), var_c0284); }; }; }; SOURCE(3273, 6) return; } static word NoName_Q1200(formal_c0256) word formal_c0256; { SOURCE(3202, 69) { word pd24; pd24 = (* (( (ptr) formal_c0256)+7) ); (void) ( *( (fPt) ((* (ptr) pd24 ))))((* ((( (ptr) formal_c0256)+6)) ), pd24); }; return(0); } static word NoName_Q1260(formal_c0257) word formal_c0257; { SOURCE(3045, 131) { word pd25; pd25 = (* (( (ptr) formal_c0257)+7) ); (void) ( *( (fPt) ((* (ptr) pd25 ))))((* ((( (ptr) formal_c0257)+6)) ), pd25); }; return(0); } static void Close_P480(formal_c0311, formal_c0312) word formal_c0311; word formal_c0312; { W9 var_c14632; /* declaration of self_v4180 skipped */ /* declaration of abort_v4208 skipped */ register ptr gf_c14664 = (ptr) &globalframe; /* declaration of esd_v4808 skipped */ (* (( (ptr) &var_c14632)+4)/* self_v4180 */ ) = formal_c0311; (* (( (ptr) &var_c14632)+5)/* abort_v4208 */ ) = formal_c0312; /* Close: */ SOURCE(3283, 428) SOURCE(3335, 45) (* (( (ptr) &var_c14632)+6)/* esd_v4808 */ ) = XR_Narrow((* (( (ptr) (* (( (ptr) &var_c14632)+4)/* self_v4180 */ ))+1) ), (* ( ( (ptr) gf_c14664)+6) )); SOURCE(3382, 157) if ((0 != (* (( (ptr) (* (( (ptr) &var_c14632)+6)/* esd_v4808 */ ))+5) ))) { SOURCE(3402, 137) { /* declaration of var_c023 skipped */ /* declaration of var_c024 skipped */ (* (( (ptr) &var_c14632)+7)/* var_c023 */ ) = (* (ptr) (* (( (ptr) &var_c14632)+6)/* esd_v4808 */ ) ); (* (( (ptr) &var_c14632)+8)/* var_c024 */ ) = (* (( (ptr) (* (( (ptr) gf_c14664)+32)/* var_c13928 */ ))+28) ); { word var_c0285; var_c0285 = (word) &var_c14632; (void) (word) XR_Enable(( ((word) (fPt) NoName_Q1380) ), ( ((word) (fPt) NoName_Q1620) ), var_c0285); }; }; }; SOURCE(3541, 97) if ((0 != (* (( (ptr) (* (( (ptr) &var_c14632)+6)/* esd_v4808 */ ))+6) ))) { SOURCE(3562, 76) { /* declaration of var_c025 skipped */ /* declaration of var_c026 skipped */ (* (( (ptr) &var_c14632)+7)/* var_c025 */ ) = (* (( (ptr) (* (( (ptr) &var_c14632)+6)/* esd_v4808 */ ))+1) ); (* (( (ptr) &var_c14632)+8)/* var_c026 */ ) = (* (( (ptr) (* (( (ptr) gf_c14664)+32)/* var_c13928 */ ))+28) ); { word var_c0286; var_c0286 = (word) &var_c14632; (void) (word) XR_Enable(( ((word) (fPt) NoName_Q1320) ), ( ((word) (fPt) NoName_Q1560) ), var_c0286); }; }; }; SOURCE(3640, 63) { word pd26; pd26 = (* (( (ptr) (* (( (ptr) gf_c14664)+33)/* var_c14088 */ ))+24) ); (void) ( *( (fPt) ((* (ptr) pd26 ))))((* (( (ptr) &var_c14632)+4)/* self_v4180 */ ), (* (ptr) (* (( (ptr) (* (( (ptr) gf_c14664)+33) /* var_c14088 */ ))+15) ) ), 0, 0, pd26); }; SOURCE(3705, 6) return; } static word NoName_Q1320(formal_c0259) word formal_c0259; { SOURCE(3562, 76) { word pd27; pd27 = (* (( (ptr) formal_c0259)+8) ); (void) ( *( (fPt) ((* (ptr) pd27 ))))((* (( (ptr) formal_c0259)+7) ), (* (( (ptr) formal_c0259)+5) ), pd27); }; return(0); } static word NoName_Q1380(formal_c0260) word formal_c0260; { SOURCE(3402, 137) { word pd28; pd28 = (* (( (ptr) formal_c0260)+8) ); (void) ( *( (fPt) ((* (ptr) pd28 ))))((* (( (ptr) formal_c0260)+7) ), (* (( (ptr) formal_c0260)+5) ), pd28); }; return(0); } static word GetIndex_P540(self_v4268) word self_v4268; { register ptr gf_c14696 = (ptr) &globalframe; word var_c4312; word esd_v4852; /* GetIndex: */ SOURCE(3715, 126) SOURCE(3763, 45) esd_v4852 = XR_Narrow((* (( (ptr) self_v4268)+1) ), (* (( (ptr) gf_c14696)+6) )); SOURCE(3810, 31) return(((* (( (ptr) esd_v4852)+7) ) - (* (( (ptr) esd_v4852)+8) ))); } static word GetLength_P600(formal_c0313) word formal_c0313; { W9 var_c14728; /* declaration of self_v4372 skipped */ register ptr gf_c14760 = (ptr) &globalframe; word length_v4416; /* declaration of esd_v4896 skipped */ (* (( (ptr) &var_c14728)+4)/* self_v4372 */ ) = formal_c0313; /* GetLength: */ SOURCE(3845, 246) SOURCE(3902, 45) (* (( (ptr) &var_c14728)+5)/* esd_v4896 */ ) = XR_Narrow((* (( (ptr) (* (( (ptr) &var_c14728)+4)/* self_v4372 */ ))+1) ), (* ( ( (ptr) gf_c14760)+6) )); SOURCE(3949, 142) { /* declaration of var_c027 skipped */ /* declaration of var_c028 skipped */ (* (( (ptr) &var_c14728)+6)/* var_c027 */ ) = (* (ptr) (* (( (ptr) &var_c14728)+5)/* esd_v4896 */ ) ); (* (( (ptr) &var_c14728)+7)/* var_c028 */ ) = (* (( (ptr) (* (( (ptr) gf_c14760)+32)/* var_c13928 */ ))+31) ); { /* declaration of var_c029 skipped */ (void) (word) XR_Enable(( ((word) (fPt) NoName_Q1440) ), ( ((word) (fPt) NoName_Q1500) ), (word) &var_c14728); return((* (( (ptr) &var_c14728)+8)/* var_c029 */ )); }; }; } static word NoName_Q1440(formal_c0263) word formal_c0263; { SOURCE(3949, 142) { word pd29; pd29 = (* (( (ptr) formal_c0263)+7) ); (* (( (ptr) formal_c0263)+8) ) = (word) ( *( (fPt) ((* (ptr) pd29 ))))((* ((( (ptr) formal_c0263)+6)) ), pd29); }; return(0); } static void NoName_Q1500(formal_c0103, formal_c200048, formal_c200049, formal_c200050, formal_c200051) word formal_c0103; word formal_c200048; word formal_c200049; word formal_c200050; word formal_c200051; { register ptr gf_c0264 = (ptr) &globalframe; if ((formal_c200049 == (* (( (ptr) (* (( (ptr) gf_c0264)+32)/* var_c13928 */ ))+5) ))) { { word ec_v13252; word stream_v13280; word details_v13308; word msg_v13336; ec_v13252 = (* (ptr) formal_c200051 ); stream_v13280 = (* (( (ptr) formal_c200051)+1) ); details_v13308 = (* (( (ptr) formal_c200051)+2) ); msg_v13336 = (* (( (ptr) formal_c200051)+3) ); SOURCE(3987, 40) if ((0 != (* (( (ptr) (* (( (ptr) formal_c200048)+5) ))+2) ))) { SOURCE(4009, 18) { W4 var_c0100; (* (ptr) (word) &var_c0100 ) = ec_v13252; (* (( (ptr) (word) &var_c0100) + 1) ) = (* (( (ptr) formal_c200048)+4) ); (* (( (ptr) (word) &var_c0100) + 2) ) = 0; (* (( (ptr) (word) &var_c0100) + 3) ) = 0; (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c0264)+32)/* var_c13928 */ ))+5) ), (word) &var_c0100); }; }; }; } else { if ((formal_c200049 == (* (( (ptr) (* (( (ptr) gf_c0264)+32)/* var_c13928 */ ))+4) ))) { { word stream_v13396; stream_v13396 = (* (ptr) formal_c200051 ); SOURCE(4047, 44) if ((0 != (* (( (ptr) (* (( (ptr) formal_c200048)+5) ))+2) ))) { SOURCE(4069, 22) { word var_c0102; var_c0102 = (* (( (ptr) formal_c200048)+4) ); (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c0264)+32)/* var_c13928 */ ))+4) ), (word) &var_c0102); }; }; }; }; }; (* (ptr) formal_c0103 ) = 0; (* (( (ptr) formal_c0103)+1) ) = 0; return; } static void NoName_Q1560(formal_c0113, formal_c200044, formal_c200045, formal_c200046, formal_c200047) word formal_c0113; word formal_c200044; word formal_c200045; word formal_c200046; word formal_c200047; { register ptr gf_c0265 = (ptr) &globalframe; if ((formal_c200045 == (* (( (ptr) (* (( (ptr) gf_c0265)+32)/* var_c13928 */ ))+5) ))) { { word ec_v12648; word stream_v12676; word details_v12704; word msg_v12732; ec_v12648 = (* (ptr) formal_c200047 ); stream_v12676 = (* (( (ptr) formal_c200047)+1) ); details_v12704 = (* (( (ptr) formal_c200047)+2) ); msg_v12732 = (* (( (ptr) formal_c200047)+3) ); SOURCE(3596, 42) if ((0 != (* (( (ptr) (* (( (ptr) formal_c200044)+6) ))+2) ))) { SOURCE(3618, 20) { W4 var_c0112; (* (ptr) (word) &var_c0112 ) = ec_v12648; (* (( (ptr) (word) &var_c0112) + 1) ) = (* (( (ptr) formal_c200044)+4) ); (* (( (ptr) (word) &var_c0112) + 2) ) = 0; (* (( (ptr) (word) &var_c0112) + 3) ) = 0; (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c0265)+32)/* var_c13928 */ ))+5) ), (word) &var_c0112); }; }; }; }; (* (ptr) formal_c0113 ) = 0; (* (( (ptr) formal_c0113)+1) ) = 0; return; } static void NoName_Q1620(formal_c0125, formal_c200040, formal_c200041, formal_c200042, formal_c200043) word formal_c0125; word formal_c200040; word formal_c200041; word formal_c200042; word formal_c200043; { register ptr gf_c0266 = (ptr) &globalframe; if ((formal_c200041 == (* (( (ptr) (* (( (ptr) gf_c0266)+32)/* var_c13928 */ ))+5) ))) { { word ec_v12444; word stream_v12472; word details_v12500; word msg_v12528; ec_v12444 = (* (ptr) formal_c200043 ); stream_v12472 = (* (( (ptr) formal_c200043)+1) ); details_v12500 = (* (( (ptr) formal_c200043)+2) ); msg_v12528 = (* (( (ptr) formal_c200043)+3) ); SOURCE(3435, 40) if ((0 != (* (( (ptr) (* (( (ptr) formal_c200040)+6) ))+2) ))) { SOURCE(3457, 18) { W4 var_c0122; (* (ptr) (word) &var_c0122 ) = ec_v12444; (* (( (ptr) (word) &var_c0122) + 1) ) = (* (( (ptr) formal_c200040)+4) ); (* (( (ptr) (word) &var_c0122) + 2) ) = 0; (* (( (ptr) (word) &var_c0122) + 3) ) = 0; (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c0266)+32)/* var_c13928 */ ))+5) ), (word) &var_c0122); }; }; }; } else { if ((formal_c200041 == (* (( (ptr) (* (( (ptr) gf_c0266)+32)/* var_c13928 */ ))+4) ))) { { word stream_v12588; stream_v12588 = (* (ptr) formal_c200043 ); SOURCE(3495, 44) if ((0 != (* (( (ptr) (* (( (ptr) formal_c200040)+6) ))+2) ))) { SOURCE(3517, 22) { word var_c0124; var_c0124 = (* (( (ptr) formal_c200040)+4) ); (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c0266)+32)/* var_c13928 */ ))+4) ), (word) &var_c0124); }; }; }; }; }; (* (ptr) formal_c0125 ) = 0; (* (( (ptr) formal_c0125)+1) ) = 0; return; } static void NoName_Q1680(formal_c0135, formal_c200036, formal_c200037, formal_c200038, formal_c200039) word formal_c0135; word formal_c200036; word formal_c200037; word formal_c200038; word formal_c200039; { register ptr gf_c0267 = (ptr) &globalframe; if ((formal_c200037 == (* (( (ptr) (* (( (ptr) gf_c0267)+32)/* var_c13928 */ ))+5) ))) { { word ec_v12180; word stream_v12208; word details_v12236; word msg_v12264; ec_v12180 = (* (ptr) formal_c200039 ); stream_v12208 = (* (( (ptr) formal_c200039)+1) ); details_v12236 = (* (( (ptr) formal_c200039)+2) ); msg_v12264 = (* (( (ptr) formal_c200039)+3) ); SOURCE(3229, 42) if ((0 != (* (( (ptr) (* (( (ptr) formal_c200036)+5) ))+2) ))) { SOURCE(3251, 20) { W4 var_c0134; (* (ptr) (word) &var_c0134 ) = ec_v12180; (* (( (ptr) (word) &var_c0134) + 1) ) = (* (( (ptr) formal_c200036)+4) ); (* (( (ptr) (word) &var_c0134) + 2) ) = 0; (* (( (ptr) (word) &var_c0134) + 3) ) = 0; (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c0267)+32)/* var_c13928 */ ))+5) ), (word) &var_c0134); }; }; }; }; (* (ptr) formal_c0135 ) = 0; (* (( (ptr) formal_c0135)+1) ) = 0; return; } static void NoName_Q1740(formal_c0147, formal_c200032, formal_c200033, formal_c200034, formal_c200035) word formal_c0147; word formal_c200032; word formal_c200033; word formal_c200034; word formal_c200035; { register ptr gf_c0268 = (ptr) &globalframe; if ((formal_c200033 == (* (( (ptr) (* (( (ptr) gf_c0268)+32)/* var_c13928 */ ))+5) ))) { { word ec_v11976; word stream_v12004; word details_v12032; word msg_v12060; ec_v11976 = (* (ptr) formal_c200035 ); stream_v12004 = (* (( (ptr) formal_c200035)+1) ); details_v12032 = (* (( (ptr) formal_c200035)+2) ); msg_v12060 = (* (( (ptr) formal_c200035)+3) ); SOURCE(3072, 40) if ((0 != (* (( (ptr) (* (( (ptr) formal_c200032)+5) ))+2) ))) { SOURCE(3094, 18) { W4 var_c0144; (* (ptr) (word) &var_c0144 ) = ec_v11976; (* (( (ptr) (word) &var_c0144) + 1) ) = (* (( (ptr) formal_c200032)+4) ); (* (( (ptr) (word) &var_c0144) + 2) ) = 0; (* (( (ptr) (word) &var_c0144) + 3) ) = 0; (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c0268)+32)/* var_c13928 */ ))+5) ), (word) &var_c0144); }; }; }; } else { if ((formal_c200033 == (* (( (ptr) (* (( (ptr) gf_c0268)+32)/* var_c13928 */ ))+4) ))) { { word stream_v12120; stream_v12120 = (* (ptr) formal_c200035 ); SOURCE(3132, 44) if ((0 != (* (( (ptr) (* (( (ptr) formal_c200032)+5) ))+2) ))) { SOURCE(3154, 22) { word var_c0146; var_c0146 = (* (( (ptr) formal_c200032)+4) ); (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c0268)+32)/* var_c13928 */ ))+4) ), (word) &var_c0146); }; }; }; }; }; (* (ptr) formal_c0147 ) = 0; (* (( (ptr) formal_c0147)+1) ) = 0; return; } static void NoName_Q1800(formal_c0157, formal_c200028, formal_c200029, formal_c200030, formal_c200031) word formal_c0157; word formal_c200028; word formal_c200029; word formal_c200030; word formal_c200031; { register ptr gf_c0269 = (ptr) &globalframe; if ((formal_c200029 == (* (( (ptr) (* (( (ptr) gf_c0269)+32)/* var_c13928 */ ))+5) ))) { { word ec_v11740; word stream_v11768; word details_v11796; word msg_v11824; ec_v11740 = (* (ptr) formal_c200031 ); stream_v11768 = (* (( (ptr) formal_c200031)+1) ); details_v11796 = (* (( (ptr) formal_c200031)+2) ); msg_v11824 = (* (( (ptr) formal_c200031)+3) ); SOURCE(2914, 41) if ((0 != (* (( (ptr) (* (( (ptr) formal_c200028)+6) ))+2) ))) { SOURCE(2936, 19) { W4 var_c0156; (* (ptr) (word) &var_c0156 ) = ec_v11740; (* (( (ptr) (word) &var_c0156) + 1) ) = (* (( (ptr) formal_c200028)+4) ); (* (( (ptr) (word) &var_c0156) + 2) ) = 0; (* (( (ptr) (word) &var_c0156) + 3) ) = 0; (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c0269)+32)/* var_c13928 */ ))+5) ), (word) &var_c0156); }; }; }; }; (* (ptr) formal_c0157 ) = 0; (* (( (ptr) formal_c0157)+1) ) = 0; return; } static void NoName_Q1860(formal_c0169, formal_c200024, formal_c200025, formal_c200026, formal_c200027) word formal_c0169; word formal_c200024; word formal_c200025; word formal_c200026; word formal_c200027; { register ptr gf_c0270 = (ptr) &globalframe; if ((formal_c200025 == (* (( (ptr) (* (( (ptr) gf_c0270)+32)/* var_c13928 */ ))+5) ))) { { word ec_v11416; word stream_v11444; word details_v11472; word msg_v11500; ec_v11416 = (* (ptr) formal_c200027 ); stream_v11444 = (* (( (ptr) formal_c200027)+1) ); details_v11472 = (* (( (ptr) formal_c200027)+2) ); msg_v11500 = (* (( (ptr) formal_c200027)+3) ); SOURCE(2717, 40) if ((0 != (* (( (ptr) (* (( (ptr) formal_c200024)+6) ))+2) ))) { SOURCE(2739, 18) { W4 var_c0166; (* (ptr) (word) &var_c0166 ) = ec_v11416; (* (( (ptr) (word) &var_c0166) + 1) ) = (* (( (ptr) formal_c200024)+4) ); (* (( (ptr) (word) &var_c0166) + 2) ) = 0; (* (( (ptr) (word) &var_c0166) + 3) ) = 0; (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c0270)+32)/* var_c13928 */ ))+5) ), (word) &var_c0166); }; }; }; } else { if ((formal_c200025 == (* (( (ptr) (* (( (ptr) gf_c0270)+32)/* var_c13928 */ ))+4) ))) { { word stream_v11560; stream_v11560 = (* (ptr) formal_c200027 ); SOURCE(2777, 44) if ((0 != (* (( (ptr) (* (( (ptr) formal_c200024)+6) ))+2) ))) { SOURCE(2799, 22) { word var_c0168; var_c0168 = (* (( (ptr) formal_c200024)+4) ); (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c0270)+32)/* var_c13928 */ ))+4) ), (word) &var_c0168); }; }; }; }; }; (* (ptr) formal_c0169 ) = 0; (* (( (ptr) formal_c0169)+1) ) = 0; return; } static void NoName_Q1920(formal_c0181, formal_c200020, formal_c200021, formal_c200022, formal_c200023) word formal_c0181; word formal_c200020; word formal_c200021; word formal_c200022; word formal_c200023; { register ptr gf_c0271 = (ptr) &globalframe; if ((formal_c200021 == (* (( (ptr) (* (( (ptr) gf_c0271)+32)/* var_c13928 */ ))+5) ))) { { word ec_v11092; word stream_v11120; word details_v11148; word msg_v11176; ec_v11092 = (* (ptr) formal_c200023 ); stream_v11120 = (* (( (ptr) formal_c200023)+1) ); details_v11148 = (* (( (ptr) formal_c200023)+2) ); msg_v11176 = (* (( (ptr) formal_c200023)+3) ); SOURCE(2485, 40) if ((0 != (* (( (ptr) (* (( (ptr) formal_c200020)+5) ))+2) ))) { SOURCE(2507, 18) { W4 var_c0178; (* (ptr) (word) &var_c0178 ) = ec_v11092; (* (( (ptr) (word) &var_c0178) + 1) ) = (* (( (ptr) formal_c200020)+4) ); (* (( (ptr) (word) &var_c0178) + 2) ) = 0; (* (( (ptr) (word) &var_c0178) + 3) ) = 0; (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c0271)+32)/* var_c13928 */ ))+5) ), (word) &var_c0178); }; }; }; } else { if ((formal_c200021 == (* (( (ptr) (* (( (ptr) gf_c0271)+32)/* var_c13928 */ ))+4) ))) { { word stream_v11236; stream_v11236 = (* (ptr) formal_c200023 ); SOURCE(2545, 44) if ((0 != (* (( (ptr) (* (( (ptr) formal_c200020)+5) ))+2) ))) { SOURCE(2567, 22) { word var_c0180; var_c0180 = (* (( (ptr) formal_c200020)+4) ); (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c0271)+32)/* var_c13928 */ ))+4) ), (word) &var_c0180); }; }; }; }; }; (* (ptr) formal_c0181 ) = 0; (* (( (ptr) formal_c0181)+1) ) = 0; return; } static void NoName_Q1980(formal_c0193, formal_c200016, formal_c200017, formal_c200018, formal_c200019) word formal_c0193; word formal_c200016; word formal_c200017; word formal_c200018; word formal_c200019; { register ptr gf_c0272 = (ptr) &globalframe; if ((formal_c200017 == (* (( (ptr) (* (( (ptr) gf_c0272)+32)/* var_c13928 */ ))+5) ))) { { word ec_v10724; word stream_v10752; word details_v10780; word msg_v10808; ec_v10724 = (* (ptr) formal_c200019 ); stream_v10752 = (* (( (ptr) formal_c200019)+1) ); details_v10780 = (* (( (ptr) formal_c200019)+2) ); msg_v10808 = (* (( (ptr) formal_c200019)+3) ); SOURCE(2229, 40) if ((0 != (* (( (ptr) (* (( (ptr) formal_c200016)+5) ))+2) ))) { SOURCE(2251, 18) { W4 var_c0190; (* (ptr) (word) &var_c0190 ) = ec_v10724; (* (( (ptr) (word) &var_c0190) + 1) ) = (* (( (ptr) formal_c200016)+4) ); (* (( (ptr) (word) &var_c0190) + 2) ) = 0; (* (( (ptr) (word) &var_c0190) + 3) ) = 0; (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c0272)+32)/* var_c13928 */ ))+5) ), (word) &var_c0190); }; }; }; } else { if ((formal_c200017 == (* (( (ptr) (* (( (ptr) gf_c0272)+32)/* var_c13928 */ ))+4) ))) { { word stream_v10868; stream_v10868 = (* (ptr) formal_c200019 ); SOURCE(2289, 44) if ((0 != (* (( (ptr) (* (( (ptr) formal_c200016)+5) ))+2) ))) { SOURCE(2311, 22) { word var_c0192; var_c0192 = (* (( (ptr) formal_c200016)+4) ); (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c0272)+32)/* var_c13928 */ ))+4) ), (word) &var_c0192); }; }; }; }; }; (* (ptr) formal_c0193 ) = 0; (* (( (ptr) formal_c0193)+1) ) = 0; return; } static void NoName_Q2040(formal_c0203, formal_c200012, formal_c200013, formal_c200014, formal_c200015) word formal_c0203; word formal_c200012; word formal_c200013; word formal_c200014; word formal_c200015; { register ptr gf_c0273 = (ptr) &globalframe; if ((formal_c200013 == (* (( (ptr) (* (( (ptr) gf_c0273)+32)/* var_c13928 */ ))+5) ))) { { word ec_v10168; word stream_v10196; word details_v10224; word msg_v10252; ec_v10168 = (* (ptr) formal_c200015 ); stream_v10196 = (* (( (ptr) formal_c200015)+1) ); details_v10224 = (* (( (ptr) formal_c200015)+2) ); msg_v10252 = (* (( (ptr) formal_c200015)+3) ); SOURCE(1782, 40) if ((0 != (* (( (ptr) (* (( (ptr) formal_c200012)+9) ))+2) ))) { SOURCE(1804, 18) { W4 var_c0202; (* (ptr) (word) &var_c0202 ) = ec_v10168; (* (( (ptr) (word) &var_c0202) + 1) ) = (* (( (ptr) formal_c200012)+4) ); (* (( (ptr) (word) &var_c0202) + 2) ) = 0; (* (( (ptr) (word) &var_c0202) + 3) ) = 0; (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c0273)+32)/* var_c13928 */ ))+5) ), (word) &var_c0202); }; }; }; }; (* (ptr) formal_c0203 ) = 0; (* (( (ptr) formal_c0203)+1) ) = 0; return; } static void NoName_Q2100(formal_c0215, formal_c200008, formal_c200009, formal_c200010, formal_c200011) word formal_c0215; word formal_c200008; word formal_c200009; word formal_c200010; word formal_c200011; { register ptr gf_c0274 = (ptr) &globalframe; if ((formal_c200009 == (* (( (ptr) (* (( (ptr) gf_c0274)+32)/* var_c13928 */ ))+5) ))) { { word ec_v9964; word stream_v9992; word details_v10020; word msg_v10048; ec_v9964 = (* (ptr) formal_c200011 ); stream_v9992 = (* (( (ptr) formal_c200011)+1) ); details_v10020 = (* (( (ptr) formal_c200011)+2) ); msg_v10048 = (* (( (ptr) formal_c200011)+3) ); SOURCE(1615, 40) if ((0 != (* (( (ptr) (* (( (ptr) formal_c200008)+9) ))+2) ))) { SOURCE(1637, 18) { W4 var_c0212; (* (ptr) (word) &var_c0212 ) = ec_v9964; (* (( (ptr) (word) &var_c0212) + 1) ) = (* (( (ptr) formal_c200008)+4) ); (* (( (ptr) (word) &var_c0212) + 2) ) = 0; (* (( (ptr) (word) &var_c0212) + 3) ) = 0; (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c0274)+32)/* var_c13928 */ ))+5) ), (word) &var_c0212); }; }; }; } else { if ((formal_c200009 == (* (( (ptr) (* (( (ptr) gf_c0274)+32)/* var_c13928 */ ))+4) ))) { { word stream_v10108; stream_v10108 = (* (ptr) formal_c200011 ); SOURCE(1675, 44) if ((0 != (* (( (ptr) (* (( (ptr) formal_c200008)+9) ))+2) ))) { SOURCE(1697, 22) { word var_c0214; var_c0214 = (* (( (ptr) formal_c200008)+4) ); (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c0274)+32)/* var_c13928 */ ))+4) ), (word) &var_c0214); }; }; }; }; }; (* (ptr) formal_c0215 ) = 0; (* (( (ptr) formal_c0215)+1) ) = 0; return; } static void NoName_Q2160(formal_c0225, formal_c200004, formal_c200005, formal_c200006, formal_c200007) word formal_c0225; word formal_c200004; word formal_c200005; word formal_c200006; word formal_c200007; { register ptr gf_c0275 = (ptr) &globalframe; if ((formal_c200005 == (* (( (ptr) (* (( (ptr) gf_c0275)+32)/* var_c13928 */ ))+5) ))) { { word ec_v9656; word stream_v9684; word details_v9712; word msg_v9740; ec_v9656 = (* (ptr) formal_c200007 ); stream_v9684 = (* (( (ptr) formal_c200007)+1) ); details_v9712 = (* (( (ptr) formal_c200007)+2) ); msg_v9740 = (* (( (ptr) formal_c200007)+3) ); SOURCE(1245, 41) if ((0 != (* (( (ptr) (* (( (ptr) formal_c200004)+5) ))+2) ))) { SOURCE(1267, 19) { W4 var_c0224; (* (ptr) (word) &var_c0224 ) = ec_v9656; (* (( (ptr) (word) &var_c0224) + 1) ) = (* (( (ptr) formal_c200004)+4) ); (* (( (ptr) (word) &var_c0224) + 2) ) = 0; (* (( (ptr) (word) &var_c0224) + 3) ) = 0; (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c0275)+32)/* var_c13928 */ ))+5) ), (word) &var_c0224); }; }; }; }; (* (ptr) formal_c0225 ) = 0; (* (( (ptr) formal_c0225)+1) ) = 0; return; } static void NoName_Q2220(formal_c0237, formal_c200000, formal_c200001, formal_c200002, formal_c200003) word formal_c0237; word formal_c200000; word formal_c200001; word formal_c200002; word formal_c200003; { register ptr gf_c0276 = (ptr) &globalframe; if ((formal_c200001 == (* (( (ptr) (* (( (ptr) gf_c0276)+32)/* var_c13928 */ ))+5) ))) { { word ec_v9240; word stream_v9268; word details_v9296; word msg_v9324; ec_v9240 = (* (ptr) formal_c200003 ); stream_v9268 = (* (( (ptr) formal_c200003)+1) ); details_v9296 = (* (( (ptr) formal_c200003)+2) ); msg_v9324 = (* (( (ptr) formal_c200003)+3) ); SOURCE(1067, 40) if ((0 != (* (( (ptr) (* (( (ptr) formal_c200000)+5) ))+2) ))) { SOURCE(1089, 18) { W4 var_c0234; (* (ptr) (word) &var_c0234 ) = ec_v9240; (* (( (ptr) (word) &var_c0234) + 1) ) = (* (( (ptr) formal_c200000)+4) ); (* (( (ptr) (word) &var_c0234) + 2) ) = 0; (* (( (ptr) (word) &var_c0234) + 3) ) = 0; (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c0276)+32)/* var_c13928 */ ))+5) ), (word) &var_c0234); }; }; }; } else { if ((formal_c200001 == (* (( (ptr) (* (( (ptr) gf_c0276)+32)/* var_c13928 */ ))+4) ))) { { word stream_v9476; stream_v9476 = (* (ptr) formal_c200003 ); SOURCE(1127, 44) if ((0 != (* (( (ptr) (* (( (ptr) formal_c200000)+5) ))+2) ))) { SOURCE(1149, 22) { word var_c0236; var_c0236 = (* (( (ptr) formal_c200000)+4) ); (void) XR_RaiseError((* (( (ptr) (* (( (ptr) gf_c0276)+32)/* var_c13928 */ ))+4) ), (word) &var_c0236); }; }; }; }; }; (* (ptr) formal_c0237 ) = 0; (* (( (ptr) formal_c0237)+1) ) = 0; return; } /* file: EchoStreamImpl, module: EchoStreamImpl, compiled at: March 20, 1992 12:40:54 pm PST */ extern void XR_install_EchoStreamImpl() { NoName_Q660(); } extern void XR_run_EchoStreamImpl() { XR_Start(&globalframe); }