/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1992 by Xerox Corporation. All rights reserved. */
/* time: February 22, 1992 0:01:04 am PST */
/* C2C version: October 16, 1990 (native) */
/* ref-counting: off */
/* file: SignalsTest, module: SignalsTest */
/* switches: bcfhklnouw */
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob←version [1172264596,3892339330] SignalsTest";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef struct {word f0, f1, f2, f3;} W4;
typedef W4 *W4Pt;
typedef struct {word f0, f1, f2;} W3;
typedef W3 *W3Pt;
typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8;
typedef struct {W8 f; W8 r;} W16;
typedef struct {W16 f; word r;} W17;
typedef struct {word f0, f1;} W2;
typedef word (*fPt)();
typedef struct {word f0, f1, f2, f3, f4;} W5;
typedef struct {word f0, f1, f2, f3, f4, f5, f6;} W7;
typedef struct {word f0, f1, f2, f3, f4, f5;} W6;
typedef struct {W8 f; W4 r;} W12;
#define SOURCE(p, l) /* source p, l */
#define BCK(idx, lim) ( ((unsigned) idx) >= ((unsigned) lim) ? (XR←RaiseBoundsFault()) : (idx) )
static void NoName←Q1236();
static void SignalsTest←P0();
static void PrintS←P60();
static void PrintCR←P120();
static void PutFailMessage←P180();
static void XMesaCall7←P240();
static void XMesa7a←P300();
static void Proc1←P768();
static word NoName←Q1296();
static word NoName←Q1356();
static word NoName←Q1416();
static void Proc2←P828();
static word NoName←Q1476();
static void Proc3←P888();
static void XMesa7b←P360();
static word NoName←Q1536();
static void Proc1←P948();
static void XMesa7c←P420();
static word NoName←Q1596();
static word NoName←Q1656();
static word GetReply←P1008();
static void XMesa7d←P480();
static word NoName←Q1716();
static void XMesa7e←P540();
static word NoName←Q1776();
static void XMesa7f←P600();
static word NoName←Q1836();
static word NoName←Q1896();
static word AddNum←P1068();
static word FixValue←P1128();
static void XMesa7g←P660();
static word NoName←Q1956();
static void NoName←Q2016();
static void NoName←Q2076();
static void NoName←Q2136();
static void NoName←Q2196();
static void NoName←Q2256();
static void NoName←Q2316();
static void NoName←Q2376();
static void NoName←Q2436();
static void NoName←Q2496();
static void NoName←Q2556();
static void NoName←Q2616();
static void NoName←Q2676();
static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\105\337\126\224\300\350\000\142\202\100\164\000\000"};
static struct {unsigned f; char r[16];} string2 = {851984, "\257\300\354\241\072\167\300\017\164\046\072\100\164\000\000"};
static struct {unsigned f; char r[12];} string3 = {720908, "SignalsTest"};
static struct {unsigned f; char r[8];} string5 = {327688, "Test \000\000"};
static struct {unsigned f; char r[12];} string6 = {720908, " in module "};
static struct {unsigned f; char r[12];} string7 = {589836, " failed; \000\000"};
static struct {unsigned f; char r[8];} string8 = {262152, "Done\000\000\000"};
static struct {unsigned f; char r[8];} string12 = {262152, "3610\000\000\000"};
static struct {unsigned f; char r[8];} string13 = {262152, "3630\000\000\000"};
static struct {unsigned f; char r[8];} string14 = {262152, "3650\000\000\000"};
static struct {unsigned f; char r[8];} string15 = {262152, "3651\000\000\000"};
static struct {unsigned f; char r[8];} string16 = {262152, "3652\000\000\000"};
static struct {unsigned f; char r[8];} string17 = {262152, "3653\000\000\000"};
static struct {unsigned f; char r[8];} string19 = {262152, "3660\000\000\000"};
static struct {unsigned f; char r[8];} string20 = {262152, "3661\000\000\000"};
static struct {unsigned f; char r[8];} string23 = {262152, "3690\000\000\000"};
static struct {unsigned f; char r[8];} string24 = {262152, "3700\000\000\000"};
static struct {unsigned f; char r[8];} string25 = {262152, "3701\000\000\000"};
static struct {unsigned f; char r[8];} string26 = {262152, "3730\000\000\000"};
static struct {unsigned f; char r[8];} string27 = {262152, "3731\000\000\000"};
static struct {unsigned f; char r[8];} string28 = {262152, "3732\000\000\000"};
static struct {unsigned f; char r[8];} string29 = {262152, "3733\000\000\000"};
static struct {unsigned f; char r[8];} string30 = {262152, "3740\000\000\000"};
static struct {unsigned f; char r[8];} string31 = {262152, "3741\000\000\000"};
static struct {unsigned f; char r[8];} string34 = {262152, "3770\000\000\000"};
static struct {unsigned f; char r[8];} string35 = {262152, "3790\000\000\000"};
static struct {unsigned f; char r[8];} string36 = {262152, "3795\000\000\000"};
static struct {unsigned f; char r[8];} string37 = {262152, "3796\000\000\000"};
static struct {
word f0[11]; 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; word f32; word f33;
word f34[2];
} globalframe = {
{0}, (word) XMesa7g←P660, 0, (word) XMesa7f←P600,
0, (word) XMesa7e←P540, 0, (word) XMesa7d←P480,
0, (word) XMesa7c←P420, 0, (word) XMesa7b←P360,
0, (word) XMesa7a←P300, 0, (word) XMesaCall7←P240,
0, (word) PutFailMessage←P180, 0, (word) PrintCR←P120,
0, (word) PrintS←P60, 0, (word) SignalsTest←P0,
{0}
};
static void NoName←Q1236()
{
register ptr gf←c0154 = (ptr) &globalframe;
word var←c7780;
(void) XR←DeclareGlobalFrame((word) "SignalsTest", &globalframe, (word) XR←GetTypeIndexS((word) (&string1)), (word) (( (bPt) gf←c0154)+132)
/* var←c7332 */ );
var←c7780 = (word) XR←ImportInterface((word) "VM", (word) XR←GetTypeIndexS((word) (&string2)), 19);
(* (( (ptr) gf←c0154)+35)/* var←c7748 */ ) = var←c7780;
}
static void SignalsTest←P0(formal←c029, formal←c028)
word formal←c029;
word formal←c028;
{
register ptr gf←c7812 = (ptr) &globalframe;
/* SignalsTest: */
SOURCE(40, 5319)
SOURCE(82, 38)
(* (( (ptr) gf←c7812)+4)/* filename←v2440 */ ) = (word) &string3;
SOURCE(5347, 12)
(void) XMesaCall7←P240();
}
static void PrintS←P60(s←v2916)
word s←v2916;
{
/* PrintS: */
SOURCE(192, 92)
SOURCE(238, 46)
{
register word i←v3176 = 0;
register word noName←c7364;
noName←c7364 = (* (hPt) s←v2916 );
if ((i←v3176 >= noName←c7364)) {
goto lab←L100000;
};
lab←L100003: ;
SOURCE(274, 10)
{
word limit4;
(void) XR←DebugPutChar((word) ((* ((( (bPt) s←v2916)+4)+(
limit4 = (word) (* (( (hPt) s←v2916)+1) ),
BCK(i←v3176, limit4)
)) )));
};
i←v3176 = (i←v3176 + 1);
if ((i←v3176 < noName←c7364)) {
goto lab←L100003;
};
lab←L100000: ;
};
}
static void PrintCR←P120()
{
/* PrintCR: */
SOURCE(299, 39)
SOURCE(329, 9)
(void) XR←DebugPutChar(10);
}
static void PutFailMessage←P180(x←v2992, modname←v3020)
word x←v2992;
word modname←v3020;
{
W4 var←c7396;
/* PutFailMessage: */
SOURCE(342, 162)
SOURCE(405, 15)
(void) PrintS←P60((word) (&string5));
SOURCE(422, 9)
(void) PrintS←P60(x←v2992);
SOURCE(433, 21)
(void) PrintS←P60((word) (&string6));
SOURCE(456, 15)
(void) PrintS←P60(modname←v3020);
var←c7396 = (* (W4Pt) &string7 );
SOURCE(473, 20)
(void) PrintS←P60((word) (&var←c7396));
SOURCE(495, 9)
(void) PrintCR←P120();
}
static void XMesaCall7←P240()
{
register ptr gf←c7844 = (ptr) &globalframe;
W3 var←c7428;
/* XMesaCall7: */
SOURCE(510, 316)
SOURCE(537, 7)
(void) PrintCR←P120();
SOURCE(546, 16)
(void) PrintS←P60((* ((( (ptr) gf←c7844)+4)/* filename←v2440 */ ) ));
SOURCE(564, 7)
(void) PrintCR←P120();
SOURCE(574, 9)
(void) XMesa7a←P300();
SOURCE(625, 9)
(void) XMesa7b←P360();
SOURCE(649, 9)
(void) XMesa7c←P420();
SOURCE(671, 9)
(void) XMesa7d←P480();
SOURCE(714, 9)
(void) XMesa7e←P540();
SOURCE(754, 9)
(void) XMesa7f←P600();
SOURCE(776, 9)
(void) XMesa7g←P660();
var←c7428 = (* (W3Pt) &string8 );
SOURCE(802, 15)
(void) PrintS←P60((word) (&var←c7428));
SOURCE(819, 7)
(void) PrintCR←P120();
}
static void XMesa7a←P300()
{
W17 var←c7876;
register ptr gf←c7908 = (ptr) &globalframe;
/* declaration of var←c7460 skipped */
/* declaration of var←c7492 skipped */
/* declaration of var←c7524 skipped */
/* declaration of sig2Cnt←v3304 skipped */
/* declaration of sig1Cnt←v3332 skipped */
/* declaration of unwindCnt←v3360 skipped */
/* declaration of flag1←v3388 skipped */
/* declaration of flag2←v3416 skipped */
/* declaration of flag3←v3444 skipped */
/* declaration of flag4←v3472 skipped */
/* XMesa7a: */
SOURCE(854, 1209)
{
word tmpAddr9;
tmpAddr9 = (word) (( (ptr) &var←c7876)+4)/* var←c7460 */ ;
(* (ptr) tmpAddr9 ) = ( ((word) (fPt) Proc3←P888) );
(* (( (ptr) tmpAddr9) + 1) ) = 1;
};
{
word tmpAddr10;
tmpAddr10 = (word) (( (ptr) &var←c7876)+6)/* var←c7492 */ ;
(* (ptr) tmpAddr10 ) = ( ((word) (fPt) Proc2←P828) );
(* (( (ptr) tmpAddr10) + 1) ) = 1;
};
{
word tmpAddr11;
tmpAddr11 = (word) (( (ptr) &var←c7876)+8)/* var←c7524 */ ;
(* (ptr) tmpAddr11 ) = ( ((word) (fPt) Proc1←P768) );
(* (( (ptr) tmpAddr11) + 1) ) = 1;
};
SOURCE(1018, 41)
(* (( (ptr) &var←c7876)+10)/* sig2Cnt←v3304 */ ) = 0;
(* (( (ptr) &var←c7876)+11)/* sig1Cnt←v3332 */ ) = 0;
(* (( (ptr) &var←c7876)+12)/* unwindCnt←v3360 */ ) = 0;
SOURCE(1061, 46)
(* (( (ptr) &var←c7876)+13)/* flag1←v3388 */ ) = 0;
(* (( (ptr) &var←c7876)+14)/* flag2←v3416 */ ) = 0;
(* (( (ptr) &var←c7876)+15)/* flag3←v3444 */ ) = 0;
(* (( (ptr) &var←c7876)+16)/* flag4←v3472 */ ) = 0;
SOURCE(1713, 8)
(void) Proc1←P768(0, (word) (( (bPt) &var←c7876)+32)/* var←c7524 */ );
SOURCE(1724, 52)
if (((* (( (ptr) &var←c7876)+11)/* sig1Cnt←v3332 */ ) != 2)) {
SOURCE(1744, 32)
(void) PutFailMessage←P180((word) &string12, (* (( (ptr) gf←c7908)+4)/* filename←v2440 */ ));
};
SOURCE(1779, 54)
if (((* (( (ptr) &var←c7876)+12)/* unwindCnt←v3360 */ ) != 2)) {
SOURCE(1801, 32)
(void) PutFailMessage←P180((word) &string13, (* (( (ptr) gf←c7908)+4)/* filename←v2440 */ ));
};
SOURCE(1836, 55)
if (((* (( (ptr) &var←c7876)+13)/* flag1←v3388 */ ) != 1)) {
SOURCE(1859, 32)
(void) PutFailMessage←P180((word) &string14, (* (( (ptr) gf←c7908)+4)/* filename←v2440 */ ));
};
SOURCE(1893, 55)
if (((* (( (ptr) &var←c7876)+14)/* flag2←v3416 */ ) != 2)) {
SOURCE(1916, 32)
(void) PutFailMessage←P180((word) &string15, (* (( (ptr) gf←c7908)+4)/* filename←v2440 */ ));
};
SOURCE(1950, 56)
if (((* (( (ptr) &var←c7876)+15)/* flag3←v3444 */ ) != 0)) {
SOURCE(1974, 32)
(void) PutFailMessage←P180((word) &string16, (* (( (ptr) gf←c7908)+4)/* filename←v2440 */ ));
};
SOURCE(2008, 55)
if (((* (( (ptr) &var←c7876)+16)/* flag4←v3472 */ ) != 4)) {
SOURCE(2031, 32)
(void) PutFailMessage←P180((word) &string17, (* (( (ptr) gf←c7908)+4)/* filename←v2440 */ ));
};
}
static void Proc1←P768(formal←c0232, formal←c7972)
word formal←c0232;
word formal←c7972;
{
W5 var←c7940;
/* declaration of x←v3820 skipped */
formal←c7972 = (formal←c7972 - 32);
var←c7940.f4/* x←v3820 */ = formal←c0232;
var←c7940.f0 = formal←c7972;
/* Proc1: */
SOURCE(1110, 354)
SOURCE(1143, 321)
SOURCE(1150, 282)
{
word var←c01;
{
word var←c0198;
var←c0198 = (word) &var←c7940;
var←c01 = (word) XR←Enable(( ((word) (fPt) NoName←Q1296) ), ( ((word) (fPt) NoName←Q2556) ), var←c0198);
};
if ((var←c01 == 2)) {
goto lab←L100004;
};
};
goto lab←L100011;
lab←L100004: ;
SOURCE(1448, 14)
(* (( (ptr) formal←c7972)+16) ) = 4;
lab←L100011: ;
}
static word NoName←Q1296(formal←c0159)
word formal←c0159;
{
W4 var←c0215;
var←c0215.f0 = formal←c0159;
SOURCE(1255, 14)
(* (( (ptr) (* (ptr) formal←c0159 ))+13) ) = 1;
SOURCE(1277, 131)
{
word var←c0199;
var←c0199 = (word) &var←c0215;
(void) (word) XR←Enable(( ((word) (fPt) NoName←Q1356) ), ( ((word) (fPt) NoName←Q2616) ), var←c0199);
};
SOURCE(1418, 14)
(* (( (ptr) (* (ptr) formal←c0159 ))+15) ) = 3;
return(0);
}
static word NoName←Q1356(formal←c0160)
word formal←c0160;
{
W4 var←c0217;
var←c0217.f0 = formal←c0160;
SOURCE(1315, 14)
(* (( (ptr) (* (ptr) (* (ptr) formal←c0160 ) ))+14) ) = 2;
SOURCE(1331, 77)
{
word var←c0200;
var←c0200 = (word) &var←c0217;
(void) (word) XR←Enable(( ((word) (fPt) NoName←Q1416) ), ( ((word) (fPt) NoName←Q2676) ), var←c0200);
};
return(0);
}
static word NoName←Q1416(formal←c0161)
word formal←c0161;
{
SOURCE(1331, 77)
(void) Proc2←P828((* (( (ptr) (* (ptr) (* (ptr) formal←c0161 ) ))+4) ), (word) (( (bPt) (* (ptr) (* (ptr) (* (ptr) formal←c0161 ) ) ))+24)
);
return(0);
}
static void Proc2←P828(formal←c0233, formal←c8036)
word formal←c0233;
word formal←c8036;
{
W5 var←c8004;
/* declaration of x←v3880 skipped */
formal←c8036 = (formal←c8036 - 24);
var←c8004.f4/* x←v3880 */ = formal←c0233;
var←c8004.f0 = formal←c8036;
/* Proc2: */
SOURCE(1470, 148)
SOURCE(1509, 109)
{
word var←c0201;
var←c0201 = (word) &var←c8004;
(void) (word) XR←Enable(( ((word) (fPt) NoName←Q1476) ), ( ((word) (fPt) NoName←Q2496) ), var←c0201);
};
}
static word NoName←Q1476(formal←c0163)
word formal←c0163;
{
SOURCE(1509, 109)
(void) Proc3←P888((* (( (ptr) formal←c0163)+4) ), (word) (( (bPt) (* (ptr) formal←c0163 ))+16));
return(0);
}
static void Proc3←P888(x←v3940, formal←c8100)
word x←v3940;
word formal←c8100;
{
register ptr gf←c8068 = (ptr) &globalframe;
formal←c8100 = (formal←c8100 - 16);
/* Proc3: */
SOURCE(1626, 79)
SOURCE(1665, 40)
if ((x←v3940 == 0)) {
SOURCE(1679, 16)
(void) XR←RaiseError((word) (( (bPt) gf←c8068)+20), 0);
}
else {
SOURCE(1695, 10)
(void) XR←RaiseError((word) (( (bPt) gf←c8068)+24), 0);
};
}
static void XMesa7b←P360()
{
W8 var←c8132;
register ptr gf←c8164 = (ptr) &globalframe;
/* declaration of var←c7556 skipped */
/* declaration of button←v3996 skipped */
/* declaration of errFlag←v4052 skipped */
word flag1←v4080 = 0;
/* XMesa7b: */
SOURCE(2070, 514)
{
word tmpAddr18;
tmpAddr18 = (word) (( (ptr) &var←c8132)+4)/* var←c7556 */ ;
(* (ptr) tmpAddr18 ) = ( ((word) (fPt) Proc1←P948) );
(* (( (ptr) tmpAddr18) + 1) ) = 1;
};
SOURCE(2213, 28)
var←c8132.f7/* errFlag←v4052 */ = 0;
SOURCE(2383, 70)
SOURCE(2383, 70)
{
word var←c02;
{
word var←c0202;
var←c0202 = (word) &var←c8132;
var←c02 = (word) XR←Enable(( ((word) (fPt) NoName←Q1536) ), ( ((word) (fPt) NoName←Q2436) ), var←c0202);
};
/* removed trivial cond node */
};
SOURCE(2460, 12)
flag1←v4080 = 1;
SOURCE(2474, 55)
if ((var←c8132.f7/* errFlag←v4052 */ != 1)) {
SOURCE(2497, 32)
(void) PutFailMessage←P180((word) &string19, (* (( (ptr) gf←c8164)+4)/* filename←v2440 */ ));
};
SOURCE(2531, 53)
if ((flag1←v4080 != 1)) {
SOURCE(2552, 32)
(void) PutFailMessage←P180((word) &string20, (* (( (ptr) gf←c8164)+4)/* filename←v2440 */ ));
};
}
static word NoName←Q1536(formal←c0167)
word formal←c0167;
{
SOURCE(2440, 13)
(void) Proc1←P948(1, (word) (( (bPt) formal←c0167)+16));
return(0);
}
static void Proc1←P948(c1←v4404, formal←c8228)
word c1←v4404;
word formal←c8228;
{
register ptr gf←c8196 = (ptr) &globalframe;
formal←c8228 = (formal←c8228 - 16);
/* Proc1: */
SOURCE(2244, 127)
SOURCE(2277, 94)
{
word var←c7588;
var←c7588 = c1←v4404;
{
word idx21;
(* (( (ptr) formal←c8228)+6) ) = (
idx21 = (word) ( (var←c7588 == 0) ? 0 : ( (var←c7588 == 2) ? 1 : ( (var←c7588 == 3) ? 2 : (
XR←RaiseError((word) (( (bPt) gf←c8196)+28), 0), 0
) ) ) ) ,
BCK(idx21, 3)
);
};
};
}
static void XMesa7c←P420()
{
W8 var←c8260;
register ptr gf←c8292 = (ptr) &globalframe;
/* declaration of var←c7620 skipped */
word answer←v4432 = 0;
/* declaration of p1←v4516 skipped */
word flag1←v4544 = 0;
/* XMesa7c: */
SOURCE(2590, 633)
{
word tmpAddr22;
tmpAddr22 = (word) (( (ptr) &var←c8260)+4)/* var←c7620 */ ;
(* (ptr) tmpAddr22 ) = ( ((word) (fPt) GetReply←P1008) );
(* (( (ptr) tmpAddr22) + 1) ) = 1;
};
SOURCE(2717, 18)
var←c8260.f6/* p1←v4516 */ = 3;
SOURCE(2913, 48)
lab←L100018: ;
SOURCE(2913, 48)
{
/* declaration of var←c03 skipped */
{
word var←c04;
{
word var←c0203;
var←c0203 = (word) &var←c8260;
var←c04 = (word) XR←Enable(( ((word) (fPt) NoName←Q1656) ), ( ((word) (fPt) NoName←Q2376) ), var←c0203);
};
if ((var←c04 == 4)) {
goto lab←L100018;
};
};
answer←v4432 = var←c8260.f7/* var←c03 */ ;
};
SOURCE(2972, 51)
if (( (int)answer←v4432 != (int)0)) {
SOURCE(2991, 32)
(void) PutFailMessage←P180((word) &string23, (* (( (ptr) gf←c8292)+4)/* filename←v2440 */ ));
};
SOURCE(3026, 11)
var←c8260.f6/* p1←v4516 */ = 3;
SOURCE(3039, 48)
SOURCE(3039, 48)
{
/* declaration of var←c05 skipped */
{
word var←c06;
{
word var←c0204;
var←c0204 = (word) &var←c8260;
var←c06 = (word) XR←Enable(( ((word) (fPt) NoName←Q1596) ), ( ((word) (fPt) NoName←Q2316) ), var←c0204);
};
if ((var←c06 == 5)) {
goto lab←L100023;
};
};
answer←v4432 = var←c8260.f7/* var←c05 */ ;
};
lab←L100023: ;
SOURCE(3101, 12)
flag1←v4544 = 1;
SOURCE(3115, 53)
if ((flag1←v4544 != 1)) {
SOURCE(3136, 32)
(void) PutFailMessage←P180((word) &string24, (* (( (ptr) gf←c8292)+4)/* filename←v2440 */ ));
};
SOURCE(3170, 53)
if ((var←c8260.f6/* p1←v4516 */ != 0)) {
SOURCE(3191, 32)
(void) PutFailMessage←P180((word) &string25, (* (( (ptr) gf←c8292)+4)/* filename←v2440 */ ));
};
}
static word NoName←Q1596(formal←c0171)
word formal←c0171;
{
SOURCE(3039, 48)
(* (( (ptr) formal←c0171)+7) ) = (word) GetReply←P1008((* (( (ptr) formal←c0171)+6) ), (word) (( (bPt) formal←c0171)+16))
;
return(0);
}
static word NoName←Q1656(formal←c0172)
word formal←c0172;
{
SOURCE(2913, 48)
(* (( (ptr) formal←c0172)+7) ) = (word) GetReply←P1008((* (( (ptr) formal←c0172)+6) ), (word) (( (bPt) formal←c0172)+16))
;
return(0);
}
static word GetReply←P1008(p←v4792, formal←c8356)
word p←v4792;
word formal←c8356;
{
register ptr gf←c8324 = (ptr) &globalframe;
word a←v4836;
formal←c8356 = (formal←c8356 - 16);
/* GetReply: */
SOURCE(2759, 148)
SOURCE(2815, 92)
{
word var←c7652;
var←c7652 = p←v4792;
switch (var←c7652) {
case 0:
SOURCE(2840, 5)
a←v4836 = 0;
break;
case 1:
SOURCE(2857, 5)
a←v4836 = 1;
break;
case 2:
SOURCE(2874, 5)
a←v4836 = 2;
break;
default:
SOURCE(2892, 15)
(void) (XR←RaiseSignal((word) (( (bPt) gf←c8324)+32), 0, 0));
break;
};
};
SOURCE(2759, 148)
return(a←v4836);
}
static void XMesa7d←P480()
{
W7 var←c8388;
register ptr gf←c8420 = (ptr) &globalframe;
/* declaration of int←v4892 skipped */
/* declaration of p←v4948 skipped */
/* declaration of flag1←v4976 skipped */
word flag2←v5004 = 0;
/* XMesa7d: */
SOURCE(3230, 573)
SOURCE(3305, 16)
var←c8388.f4/* int←v4892 */ = 0;
SOURCE(3372, 17)
var←c8388.f5/* p←v4948 */ = 2;
SOURCE(3391, 26)
var←c8388.f6/* flag1←v4976 */ = 0;
SOURCE(3419, 140)
lab←L100028: ;
if ((var←c8388.f5/* p←v4948 */ != 0)) {
}
else {
goto lab←L100026;
};
SOURCE(3446, 113)
SOURCE(3446, 113)
{
word var←c07;
{
word var←c0205;
var←c0205 = (word) &var←c8388;
var←c07 = (word) XR←Enable(( ((word) (fPt) NoName←Q1716) ), ( ((word) (fPt) NoName←Q2256) ), var←c0205);
};
/* removed trivial cond node */
};
goto lab←L100028;
lab←L100026: ;
SOURCE(3576, 12)
flag2←v5004 = 1;
SOURCE(3591, 48)
if (( (int)var←c8388.f4/* int←v4892 */ != (int)2)) {
SOURCE(3607, 32)
(void) PutFailMessage←P180((word) &string26, (* (( (ptr) gf←c8420)+4)/* filename←v2440 */ ));
};
SOURCE(3641, 53)
if ((var←c8388.f6/* flag1←v4976 */ != 1)) {
SOURCE(3662, 32)
(void) PutFailMessage←P180((word) &string27, (* (( (ptr) gf←c8420)+4)/* filename←v2440 */ ));
};
SOURCE(3696, 53)
if ((flag2←v5004 != 1)) {
SOURCE(3717, 32)
(void) PutFailMessage←P180((word) &string28, (* (( (ptr) gf←c8420)+4)/* filename←v2440 */ ));
};
SOURCE(3751, 52)
if ((var←c8388.f5/* p←v4948 */ != 0)) {
SOURCE(3771, 32)
(void) PutFailMessage←P180((word) &string29, (* (( (ptr) gf←c8420)+4)/* filename←v2440 */ ));
};
}
static word NoName←Q1716(formal←c0177)
word formal←c0177;
{
register ptr gf←c0176 = (ptr) &globalframe;
SOURCE(3534, 12)
(* (( (ptr) formal←c0177)+6) ) = 1;
SOURCE(3548, 11)
(void) (XR←RaiseSignal((word) (( (bPt) gf←c0176)+36), 0, 0));
return(0);
}
static void XMesa7e←P540()
{
W6 var←c8452;
register ptr gf←c8484 = (ptr) &globalframe;
/* declaration of int←v5220 skipped */
/* declaration of retryCnt←v5248 skipped */
word p←v5304 = 2;
word flag1←v5332 = 0;
word flag2←v5360 = 0;
/* XMesa7e: */
SOURCE(3810, 457)
SOURCE(3882, 26)
var←c8452.f4/* int←v5220 */ = 0;
var←c8452.f5/* retryCnt←v5248 */ = 0;
SOURCE(4006, 125)
lab←L100035: ;
if ((p←v5304 != 0)) {
}
else {
goto lab←L100033;
};
SOURCE(4033, 98)
lab←L100036: ;
SOURCE(4033, 98)
{
word var←c08;
{
word var←c0206;
var←c0206 = (word) &var←c8452;
var←c08 = (word) XR←Enable(( ((word) (fPt) NoName←Q1776) ), ( ((word) (fPt) NoName←Q2196) ), var←c0206);
};
if ((var←c08 == 8)) {
goto lab←L100036;
}
else {
if ((var←c08 == 7)) {
goto lab←L100034;
};
};
};
goto lab←L100035;
lab←L100033: ;
lab←L100034: ;
SOURCE(4150, 12)
flag1←v5332 = 1;
SOURCE(4164, 48)
if (( (int)var←c8452.f4/* int←v5220 */ != (int)4)) {
SOURCE(4180, 32)
(void) PutFailMessage←P180((word) &string30, (* (( (ptr) gf←c8484)+4)/* filename←v2440 */ ));
};
SOURCE(4214, 53)
if (( (int)var←c8452.f5/* retryCnt←v5248 */ != (int)3)) {
SOURCE(4235, 32)
(void) PutFailMessage←P180((word) &string31, (* (( (ptr) gf←c8484)+4)/* filename←v2440 */ ));
};
}
static word NoName←Q1776(formal←c0180)
word formal←c0180;
{
register ptr gf←c0179 = (ptr) &globalframe;
SOURCE(4082, 13)
(* (( (ptr) formal←c0180)+4) ) = ((* (( (ptr) formal←c0180)+4) ) + 1);
SOURCE(4097, 34)
if (( (int)(* (( (ptr) formal←c0180)+4) ) <= (int)3)) {
SOURCE(4114, 17)
(void) (XR←RaiseSignal((word) (( (bPt) gf←c0179)+40), 0, 0));
}
else {
SOURCE(4131, 4)
return(7);
};
return(0);
}
static void XMesa7f←P600()
{
W12 var←c8516;
register ptr gf←c8548 = (ptr) &globalframe;
/* declaration of var←c7684 skipped */
/* declaration of var←c7716 skipped */
/* declaration of sum←v5548 skipped */
/* declaration of num1←v5576 skipped */
word num2←v5604 = 0;
/* declaration of NumBoundsFault←v5632 skipped */
/* XMesa7f: */
SOURCE(4273, 736)
{
word tmpAddr32;
tmpAddr32 = (word) (( (ptr) &var←c8516)+4)/* var←c7684 */ ;
(* (ptr) tmpAddr32 ) = ( ((word) (fPt) FixValue←P1128) );
(* (( (ptr) tmpAddr32) + 1) ) = 1;
};
{
word tmpAddr33;
tmpAddr33 = (word) (( (ptr) &var←c8516)+6)/* var←c7716 */ ;
(* (ptr) tmpAddr33 ) = ( ((word) (fPt) AddNum←P1068) );
(* (( (ptr) tmpAddr33) + 1) ) = 1;
};
SOURCE(4306, 28)
(* (( (ptr) &var←c8516)+8)/* sum←v5548 */ ) = 0;
(* (( (ptr) &var←c8516)+9)/* num1←v5576 */ ) = 0;
SOURCE(4336, 24)
(* (( (ptr) &var←c8516)+10)/* NumBoundsFault←v5632 */ ) = 0;
SOURCE(4650, 8)
(* (( (ptr) &var←c8516)+8)/* sum←v5548 */ ) = 20;
SOURCE(4660, 9)
(* (( (ptr) &var←c8516)+9)/* num1←v5576 */ ) = 15;
SOURCE(4672, 97)
{
/* declaration of var←c09 skipped */
{
word var←c0207;
var←c0207 = (word) &var←c8516;
(void) (word) XR←Enable(( ((word) (fPt) NoName←Q1896) ), ( ((word) (fPt) NoName←Q2136) ), var←c0207);
};
num2←v5604 = (* (( (ptr) &var←c8516)+11)/* var←c09 */ );
};
SOURCE(4778, 50)
if (( (int)num2←v5604 != (int)35)) {
SOURCE(4796, 32)
(void) PutFailMessage←P180((word) &string34, (* (( (ptr) gf←c8548)+4)/* filename←v2440 */ ));
};
SOURCE(4831, 8)
(* (( (ptr) &var←c8516)+8)/* sum←v5548 */ ) = 20;
SOURCE(4841, 9)
(* (( (ptr) &var←c8516)+9)/* num1←v5576 */ ) = 25;
SOURCE(4853, 97)
{
/* declaration of var←c010 skipped */
{
word var←c0208;
var←c0208 = (word) &var←c8516;
(void) (word) XR←Enable(( ((word) (fPt) NoName←Q1836) ), ( ((word) (fPt) NoName←Q2076) ), var←c0208);
};
num2←v5604 = (* (( (ptr) &var←c8516)+11)/* var←c010 */ );
};
SOURCE(4959, 50)
if (( (int)num2←v5604 != (int)35)) {
SOURCE(4977, 32)
(void) PutFailMessage←P180((word) &string35, (* (( (ptr) gf←c8548)+4)/* filename←v2440 */ ));
};
}
static word NoName←Q1836(formal←c0182)
word formal←c0182;
{
SOURCE(4853, 97)
(* (( (ptr) formal←c0182)+11) ) = (word) AddNum←P1068((* (( (ptr) formal←c0182)+8) ), (* (( (ptr) formal←c0182)+9) ), (word) (
( (bPt) formal←c0182)+24));
return(0);
}
static word NoName←Q1896(formal←c0183)
word formal←c0183;
{
SOURCE(4672, 97)
(* (( (ptr) formal←c0183)+11) ) = (word) AddNum←P1068((* (( (ptr) formal←c0183)+8) ), (* (( (ptr) formal←c0183)+9) ), (word) (
( (bPt) formal←c0183)+24));
return(0);
}
static word AddNum←P1068(total←v5868, elem←v5896, formal←c8580)
word total←v5868;
word elem←v5896;
word formal←c8580;
{
word newtot←v5940;
formal←c8580 = (formal←c8580 - 24);
/* AddNum: */
SOURCE(4402, 148)
SOURCE(4473, 55)
if (( (int)elem←v5896 > (int)total←v5868)) {
SOURCE(4494, 34)
{
word var←c081;
var←c081 = elem←v5896;
{
word var←c082;
(void) (XR←RaiseSignal((* (( (ptr) formal←c8580)+10) ), (word) &var←c082, (word) &var←c081));
elem←v5896 = var←c082;
};
};
};
SOURCE(4530, 20)
return((total←v5868 + elem←v5896));
}
static word FixValue←P1128(elem←v6000, formal←c8612)
word elem←v6000;
word formal←c8612;
{
word var←c6044;
formal←c8612 = (formal←c8612 - 16);
/* FixValue: */
SOURCE(4556, 88)
SOURCE(4614, 16)
elem←v6000 = (elem←v6000 - 10);
SOURCE(4632, 12)
return(elem←v6000);
}
static void XMesa7g←P660()
{
W7 var←c8644;
register ptr gf←c8676 = (ptr) &globalframe;
/* declaration of num1←v6100 skipped */
/* declaration of num2←v6128 skipped */
/* declaration of r←v6156 skipped */
/* XMesa7g: */
SOURCE(5016, 325)
SOURCE(5073, 13)
var←c8644.f4/* num1←v6100 */ = 0;
SOURCE(5088, 13)
var←c8644.f5/* num2←v6128 */ = 0;
SOURCE(5103, 16)
var←c8644.f6/* r←v6156 */ = 0;
SOURCE(5123, 86)
SOURCE(5123, 86)
{
word var←c011;
{
word var←c0209;
var←c0209 = (word) &var←c8644;
var←c011 = (word) XR←Enable(( ((word) (fPt) NoName←Q1956) ), ( ((word) (fPt) NoName←Q2016) ), var←c0209);
};
/* removed trivial cond node */
};
SOURCE(5241, 49)
if (( (int)var←c8644.f4/* num1←v6100 */ != (int)1)) {
SOURCE(5258, 32)
(void) PutFailMessage←P180((word) &string36, (* (( (ptr) gf←c8676)+4)/* filename←v2440 */ ));
};
SOURCE(5292, 49)
if (( (int)var←c8644.f5/* num2←v6128 */ != (int)0)) {
SOURCE(5309, 32)
(void) PutFailMessage←P180((word) &string37, (* (( (ptr) gf←c8676)+4)/* filename←v2440 */ ));
};
}
static word NoName←Q1956(formal←c0187)
word formal←c0187;
{
word i←v6284;
SOURCE(5224, 12)
SOURCE(5224, 12)
i←v6284 = (* (ptr) (* (( (ptr) formal←c0187)+6) ) );
return(0);
}
static void NoName←Q2016(formal←c094, formal←c200044, formal←c200045, formal←c200046, formal←c200047)
word formal←c094;
word formal←c200044;
word formal←c200045;
word formal←c200046;
word formal←c200047;
{
register ptr gf←c0188 = (ptr) &globalframe;
if ((formal←c200045 == (* (( (ptr) (* (( (ptr) gf←c0188)+35)/* var←c7748 */ ))+9) ))) {
{
word address←v6904;
address←v6904 = (* (ptr) formal←c200047 );
SOURCE(5150, 59)
if ((address←v6904 == 0)) {
SOURCE(5172, 8)
(* (( (ptr) formal←c200044)+4) ) = 1;
SOURCE(5182, 9)
(* (ptr) formal←c094 ) = 2;
(* (( (ptr) formal←c094)+1) ) = 9;
return;
}
else {
SOURCE(5201, 8)
(* (( (ptr) formal←c200044)+5) ) = 1;
SOURCE(5211, 8)
(* (ptr) formal←c094 ) = 2;
(* (( (ptr) formal←c094)+1) ) = 9;
return;
};
};
};
(* (ptr) formal←c094 ) = 0;
(* (( (ptr) formal←c094)+1) ) = 0;
return;
}
static void NoName←Q2076(formal←c0101, formal←c200040, formal←c200041, formal←c200042, formal←c200043)
word formal←c0101;
word formal←c200040;
word formal←c200041;
word formal←c200042;
word formal←c200043;
{
if ((formal←c200041 == (* (( (ptr) formal←c200040)+10) ))) {
{
word num←v6800;
word newnum←v6844;
num←v6800 = (* (ptr) formal←c200043 );
SOURCE(4904, 22)
newnum←v6844 = (word) FixValue←P1128(num←v6800, (word) (( (bPt) formal←c200040)+16));
SOURCE(4928, 22)
(* (( (ptr) formal←c200040)+9) ) = newnum←v6844;
(* (ptr) formal←c200042 ) = newnum←v6844;
(* (ptr) formal←c0101 ) = 1;
(* (( (ptr) formal←c0101)+1) ) = 0;
return;
};
};
(* (ptr) formal←c0101 ) = 0;
(* (( (ptr) formal←c0101)+1) ) = 0;
return;
}
static void NoName←Q2136(formal←c0108, formal←c200036, formal←c200037, formal←c200038, formal←c200039)
word formal←c0108;
word formal←c200036;
word formal←c200037;
word formal←c200038;
word formal←c200039;
{
if ((formal←c200037 == (* (( (ptr) formal←c200036)+10) ))) {
{
word num←v6696;
word newnum←v6740;
num←v6696 = (* (ptr) formal←c200039 );
SOURCE(4723, 22)
newnum←v6740 = (word) FixValue←P1128(num←v6696, (word) (( (bPt) formal←c200036)+16));
SOURCE(4747, 22)
(* (( (ptr) formal←c200036)+9) ) = newnum←v6740;
(* (ptr) formal←c200038 ) = newnum←v6740;
(* (ptr) formal←c0108 ) = 1;
(* (( (ptr) formal←c0108)+1) ) = 0;
return;
};
};
(* (ptr) formal←c0108 ) = 0;
(* (( (ptr) formal←c0108)+1) ) = 0;
return;
}
static void NoName←Q2196(formal←c0113, formal←c200032, formal←c200033, formal←c200034, formal←c200035)
word formal←c0113;
word formal←c200032;
word formal←c200033;
word formal←c200034;
word formal←c200035;
{
register ptr gf←c0189 = (ptr) &globalframe;
if ((formal←c200033 == (word) (( (bPt) gf←c0189)+40))) {
SOURCE(4049, 23)
(* (( (ptr) formal←c200032)+5) ) = ((* (( (ptr) formal←c200032)+5) ) + 1);
SOURCE(4074, 5)
(* (ptr) formal←c0113 ) = 2;
(* (( (ptr) formal←c0113)+1) ) = 8;
return;
};
(* (ptr) formal←c0113 ) = 0;
(* (( (ptr) formal←c0113)+1) ) = 0;
return;
}
static void NoName←Q2256(formal←c0118, formal←c200028, formal←c200029, formal←c200030, formal←c200031)
word formal←c0118;
word formal←c200028;
word formal←c200029;
word formal←c200030;
word formal←c200031;
{
register ptr gf←c0190 = (ptr) &globalframe;
if ((formal←c200029 == (word) (( (bPt) gf←c0190)+36))) {
SOURCE(3463, 13)
(* (( (ptr) formal←c200028)+4) ) = ((* (( (ptr) formal←c200028)+4) ) + 1);
SOURCE(3478, 43)
if (( (int)(* (( (ptr) formal←c200028)+4) ) == (int)1)) {
SOURCE(3494, 16)
(* (( (ptr) formal←c200028)+5) ) = 1;
}
else {
SOURCE(3510, 11)
(* (( (ptr) formal←c200028)+5) ) = 0;
};
SOURCE(3523, 8)
(* (ptr) formal←c0118 ) = 2;
(* (( (ptr) formal←c0118)+1) ) = 6;
return;
};
(* (ptr) formal←c0118 ) = 0;
(* (( (ptr) formal←c0118)+1) ) = 0;
return;
}
static void NoName←Q2316(formal←c0123, formal←c200024, formal←c200025, formal←c200026, formal←c200027)
word formal←c0123;
word formal←c200024;
word formal←c200025;
word formal←c200026;
word formal←c200027;
{
register ptr gf←c0191 = (ptr) &globalframe;
if ((formal←c200025 == (word) (( (bPt) gf←c0191)+32))) {
SOURCE(3075, 12)
(* (( (ptr) formal←c200024)+6) ) = 0;
SOURCE(3089, 8)
(* (ptr) formal←c0123 ) = 2;
(* (( (ptr) formal←c0123)+1) ) = 5;
return;
};
(* (ptr) formal←c0123 ) = 0;
(* (( (ptr) formal←c0123)+1) ) = 0;
return;
}
static void NoName←Q2376(formal←c0128, formal←c200020, formal←c200021, formal←c200022, formal←c200023)
word formal←c0128;
word formal←c200020;
word formal←c200021;
word formal←c200022;
word formal←c200023;
{
register ptr gf←c0192 = (ptr) &globalframe;
if ((formal←c200021 == (word) (( (bPt) gf←c0192)+32))) {
SOURCE(2949, 12)
(* (( (ptr) formal←c200020)+6) ) = 0;
SOURCE(2963, 5)
(* (ptr) formal←c0128 ) = 2;
(* (( (ptr) formal←c0128)+1) ) = 4;
return;
};
(* (ptr) formal←c0128 ) = 0;
(* (( (ptr) formal←c0128)+1) ) = 0;
return;
}
static void NoName←Q2436(formal←c0133, formal←c200016, formal←c200017, formal←c200018, formal←c200019)
word formal←c0133;
word formal←c200016;
word formal←c200017;
word formal←c200018;
word formal←c200019;
{
register ptr gf←c0193 = (ptr) &globalframe;
if ((formal←c200017 == (word) (( (bPt) gf←c0193)+28))) {
SOURCE(2413, 14)
(* (( (ptr) formal←c200016)+7) ) = 1;
SOURCE(2429, 8)
(* (ptr) formal←c0133 ) = 2;
(* (( (ptr) formal←c0133)+1) ) = 3;
return;
};
(* (ptr) formal←c0133 ) = 0;
(* (( (ptr) formal←c0133)+1) ) = 0;
return;
}
static void NoName←Q2496(formal←c0138, formal←c200012, formal←c200013, formal←c200014, formal←c200015)
word formal←c0138;
word formal←c200012;
word formal←c200013;
word formal←c200014;
word formal←c200015;
{
register ptr gf←c0194 = (ptr) &globalframe;
if ((formal←c200013 == (word) (( (bPt) gf←c0194)+20))) {
SOURCE(1528, 21)
(* (( (ptr) (* (ptr) formal←c200012 ))+11) ) = ((* (( (ptr) (* (ptr) formal←c200012 ))+11) ) + 1);
}
else {
if ((formal←c200013 == (word) (( (bPt) gf←c0194)+24))) {
SOURCE(1559, 21)
(* (( (ptr) (* (ptr) formal←c200012 ))+10) ) = ((* (( (ptr) (* (ptr) formal←c200012 ))+10) ) + 1);
}
else {
if ((formal←c200013 == XR←Unwind)) {
SOURCE(1592, 26)
(* (( (ptr) (* (ptr) formal←c200012 ))+12) ) = ((* (( (ptr) (* (ptr) formal←c200012 ))+12) ) + 1);
};
};
};
(* (ptr) formal←c0138 ) = 0;
(* (( (ptr) formal←c0138)+1) ) = 0;
return;
}
static void NoName←Q2556(formal←c0143, formal←c200000, formal←c200001, formal←c200002, formal←c200003)
word formal←c0143;
word formal←c200000;
word formal←c200001;
word formal←c200002;
word formal←c200003;
{
register ptr gf←c0195 = (ptr) &globalframe;
if ((formal←c200001 == (word) (( (bPt) gf←c0195)+20))) {
SOURCE(1171, 9)
(* (ptr) formal←c0143 ) = 2;
(* (( (ptr) formal←c0143)+1) ) = 2;
return;
}
else {
if ((formal←c200001 == (word) (( (bPt) gf←c0195)+24))) {
SOURCE(1190, 21)
(* (( (ptr) (* (ptr) formal←c200000 ))+10) ) = ((* (( (ptr) (* (ptr) formal←c200000 ))+10) ) + 1);
}
else {
if ((formal←c200001 == XR←Unwind)) {
SOURCE(1223, 25)
(* (( (ptr) (* (ptr) formal←c200000 ))+12) ) = ((* (( (ptr) (* (ptr) formal←c200000 ))+12) ) + 1);
};
};
};
(* (ptr) formal←c0143 ) = 0;
(* (( (ptr) formal←c0143)+1) ) = 0;
return;
}
static void NoName←Q2616(formal←c0148, formal←c200004, formal←c200005, formal←c200006, formal←c200007)
word formal←c0148;
word formal←c200004;
word formal←c200005;
word formal←c200006;
word formal←c200007;
{
register ptr gf←c0196 = (ptr) &globalframe;
if ((formal←c200005 == (word) (( (bPt) gf←c0196)+20))) {
SOURCE(1292, 21)
(* (( (ptr) (* (ptr) (* (ptr) formal←c200004 ) ))+11) ) = ((* (( (ptr) (* (ptr) (* (ptr) formal←c200004 ) ))+11) ) +
1);
};
(* (ptr) formal←c0148 ) = 0;
(* (( (ptr) formal←c0148)+1) ) = 0;
return;
}
static void NoName←Q2676(formal←c0153, formal←c200008, formal←c200009, formal←c200010, formal←c200011)
word formal←c0153;
word formal←c200008;
word formal←c200009;
word formal←c200010;
word formal←c200011;
{
register ptr gf←c0197 = (ptr) &globalframe;
if ((formal←c200009 == (word) (( (bPt) gf←c0197)+24))) {
SOURCE(1350, 21)
(* (( (ptr) (* (ptr) (* (ptr) (* (ptr) formal←c200008 ) ) ))+10) ) = ((* (( (ptr) (* (ptr) (* (ptr) (* (ptr) formal←c200008 ) ) ))+10)
) + 1);
}
else {
if ((formal←c200009 == XR←Unwind)) {
SOURCE(1383, 25)
(* (( (ptr) (* (ptr) (* (ptr) (* (ptr) formal←c200008 ) ) ))+12) ) = ((* (( (ptr) (* (ptr) (* (ptr) (* (ptr) formal←c200008 ) ) ))+12)
) + 1);
};
};
(* (ptr) formal←c0153 ) = 0;
(* (( (ptr) formal←c0153)+1) ) = 0;
return;
}
/* file: SignalsTest, module: SignalsTest, compiled at: February 22, 1992 0:01:04 am PST */
extern void XR←install←SignalsTest() {
NoName←Q1236();
}
extern void XR←run←SignalsTest() { XR←Start(&globalframe); }