/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1993 by Xerox Corporation. All rights reserved. */
/* time: October 22, 1993 5:07:41 pm PDT */
/* C2C version: April 20, 1993 (sun4) */
/* ref-counting: off */
/* file: X11ViewersSpecialCommandsImpl, module: X11ViewersSpecialCommandsImpl */
/* switches: bcfhklnouw */
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob←version [3740765544,1807752557] X11ViewersSpecialCommandsImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef word (*fPt)();
typedef struct {word f0, f1;} W2;
typedef struct {word f0, f1, f2, f3, f4, f5, f6;} W7;
typedef struct {word f0, f1, f2;} W3;
typedef W3 *W3Pt;
typedef W7 *W7Pt;
#define SOURCE(p, l) /* source p, l */
static void NoName←Q1116();
static void X11ViewersSpecialCommandsImpl←P0();
static word SSDataOrFail←P60();
static word BMWidgetOrFail←P120();
static void ColorMapInfoCommand←P180();
static void ForceInvertColors←P240();
static void ForceBWColors←P300();
static struct {unsigned f; char r[16];} string1 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"};
static struct {unsigned f; char r[4];} string2 = {65537, "\001\000\000"};
static struct {unsigned f; char r[44];} string3 = {2752556, "\260\006\005\146\151\162\163\164\257\300\351\276\264\273\300\115\104\320\264\122\200\005\004\162\145\163\164\214\257\300\351\276\264\273\300\115\104\320\264\122\200\261\000"};
static struct {unsigned f; char r[4];} string4 = {131074, "\003\007\000"};
static struct {unsigned f; char r[44];} string5 = {2752556, "\260\006\005\146\151\162\163\164\257\300\265\371\352\317\300\364\125\216\164\100\164\005\004\162\145\163\164\214\257\300\265\371\352\317\300\364\125\216\164\100\164\261\000"};
static struct {unsigned f; char r[4];} string6 = {131074, "\003\001\000"};
static struct {unsigned f; char r[24];} string7 = {1507352, "X11ViewersForceBWColors"};
static struct {unsigned f; char r[32];} string8 = {1966112, "world has not yet been started\000"};
static struct {unsigned f; char r[20];} string9 = {1048596, "world not active\000\000\000"};
static struct {unsigned f; char r[12];} string10 = {589836, "no colors\000\000"};
static struct {unsigned f; char r[24];} string11 = {1441816, "has private color map\012\000"};
static struct {unsigned f; char r[24];} string12 = {1507352, "uses default color map\012"};
static struct {unsigned f; char r[24];} string13 = {1441816, "black: %g, white: %g \012\000"};
static struct {unsigned f; char r[32];} string14 = {1900576, "XlColorAccess colormap: 0x%x\012\000\000"};
static struct {unsigned f; char r[24];} string15 = {1441816, "widget colormap: 0x%x\012\000"};
static struct {unsigned f; char r[12];} string16 = {655372, "idx: %4g \000"};
static struct {unsigned f; char r[20];} string17 = {1179668, "rgb: %4g %4g %4g \012\000"};
static struct {unsigned f; char r[28];} string18 = {1769500, "X11ViewersForceInvertColors"};
static struct {unsigned f; char r[28];} string19 = {1572892, "For debugging X11Viewers\000\000\000"};
static struct {unsigned f; char r[28];} string20 = {1769500, "X11ViewersPrintColorMapInfo"};
static struct {unsigned f; char r[16];} string21 = {851984, "\257\300\336\367\215\150\300\153\300\035\155\100\164\000\000"};
static struct {unsigned f; char r[8];} string22 = {393222, "\006\0014\004\177\377\000"};
static struct {unsigned f; char r[16];} string23 = {851984, "\257\300\373\225\000\071\300\362\156\307\320\100\150\000\000"};
static struct {unsigned f; char r[16];} string24 = {851984, "\257\300\311\235\133\064\300\165\175\234\175\100\150\000\000"};
static struct {unsigned f; char r[16];} string25 = {851984, "\257\300\015\277\004\146\300\034\367\146\045\100\164\000\000"};
static struct {unsigned f; char r[16];} string26 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\100\164\000\000"};
static struct {unsigned f; char r[16];} string27 = {851984, "\257\300\331\133\131\347\300\165\343\006\212\100\150\000\000"};
static struct {unsigned f; char r[16];} string28 = {851984, "\257\300\337\070\153\303\300\227\216\321\214\100\150\000\000"};
static struct {unsigned f; char r[16];} string29 = {851984, "\257\300\175\013\076\107\300\034\225\050\255\100\150\000\000"};
static W3 dummy43;
static struct {
word f0[27]; word f27; word f28; word f29;
word f30; word f31; word f32; word f33;
word f34; word f35; word f36; word f37;
word f38[8];
} globalframe = {
{0}, (word) ForceBWColors←P300, 0, (word) ForceInvertColors←P240,
0, (word) ColorMapInfoCommand←P180, 0, (word) BMWidgetOrFail←P120,
0, (word) SSDataOrFail←P60, 0, (word) X11ViewersSpecialCommandsImpl←P0,
{0}
};
static void NoName←Q1116()
{
register ptr gf←c087 = (ptr) &globalframe;
word var←c15504;
(* (( (ptr) gf←c087)+9) ) = (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2);
(* (( (ptr) gf←c087)+11) ) = (word) XR←GetTypeIndex((word) &string3, 0, (word) &string4);
(* (( (ptr) gf←c087)+12) ) = (word) XR←GetTypeIndex((word) &string5, 0, (word) &string6);
(* (ptr) (( (bPt) gf←c087)+52) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c087)+9) ), (word) &string7);
(* (ptr) (( (bPt) gf←c087)+56) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c087)+9) ), (word) &string8);
(* (ptr) (( (bPt) gf←c087)+60) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c087)+9) ), (word) &string9);
(* (ptr) (( (bPt) gf←c087)+64) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c087)+9) ), (word) &string10);
(* (ptr) (( (bPt) gf←c087)+68) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c087)+9) ), (word) &string11);
(* (ptr) (( (bPt) gf←c087)+72) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c087)+9) ), (word) &string12);
(* (ptr) (( (bPt) gf←c087)+76) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c087)+9) ), (word) &string13);
(* (ptr) (( (bPt) gf←c087)+80) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c087)+9) ), (word) &string14);
(* (ptr) (( (bPt) gf←c087)+84) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c087)+9) ), (word) &string15);
(* (ptr) (( (bPt) gf←c087)+88) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c087)+9) ), (word) &string16);
(* (ptr) (( (bPt) gf←c087)+92) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c087)+9) ), (word) &string17);
(* (ptr) (( (bPt) gf←c087)+96) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c087)+9) ), (word) &string18);
(* (ptr) (( (bPt) gf←c087)+100) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c087)+9) ), (word) &string19);
(* (ptr) (( (bPt) gf←c087)+104) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c087)+9) ), (word) &string20);
(void) XR←DeclareGlobalFrame((word) "X11ViewersSpecialCommandsImpl", &globalframe, (word) XR←GetTypeIndex((word) &string21, 0, (word) &string22)
, (word) (( (bPt) gf←c087)+148)/* var←c14096 */ );
var←c15504 = (word) XR←ImportInterface((word) "Commander", (word) XR←GetTypeIndexS((word) (&string23)), 3);
(* (( (ptr) gf←c087)+39)/* var←c14128 */ ) = var←c15504;
(void) XR←ImportProcS(var←c15504, 1310725);
var←c15504 = (word) XR←ImportInterface((word) "CommanderOps", (word) XR←GetTypeIndexS((word) (&string24)), 14);
(* (( (ptr) gf←c087)+41)/* var←c14192 */ ) = var←c15504;
var←c15504 = (word) XR←ImportInterface((word) "IO", (word) XR←GetTypeIndexS((word) (&string25)), 103);
(* (( (ptr) gf←c087)+43)/* var←c14256 */ ) = var←c15504;
(void) XR←ImportProcS(var←c15504, 1063171);
(void) XR←ImportProcS(var←c15504, 2111493);
(void) XR←ImportProcS(var←c15504, 1071364);
var←c15504 = (word) XR←ImportInterface((word) "Xl", (word) XR←GetTypeIndexS((word) (&string26)), 218);
(* (( (ptr) gf←c087)+45)/* var←c15344 */ ) = var←c15504;
(void) XR←ImportProcS(var←c15504, 1097476);
var←c15504 = (word) XR←ImportInterface((word) "XlColorAccess", (word) XR←GetTypeIndexS((word) (&string27)), 3);
(* (( (ptr) gf←c087)+42)/* var←c14224 */ ) = var←c15504;
(void) XR←ImportProcS(var←c15504, 67895299);
var←c15504 = (word) XR←ImportInterface((word) "XlDetails", (word) XR←GetTypeIndexS((word) (&string28)), 4);
(* (( (ptr) gf←c087)+44)/* var←c15312 */ ) = var←c15504;
var←c15504 = (word) XR←ImportInterface((word) "X11ViewersInstance", (word) XR←GetTypeIndexS((word) (&string29)), 1);
(* (( (ptr) gf←c087)+40)/* var←c14160 */ ) = var←c15504;
(void) XR←ImportProcS(var←c15504, 67108864);
}
static void X11ViewersSpecialCommandsImpl←P0(formal←c019, formal←c018)
word formal←c019;
word formal←c018;
{
register ptr gf←c15536 = (ptr) &globalframe;
/* X11ViewersSpecialCommandsImpl: */
SOURCE(121, 2868)
SOURCE(2703, 98)
{
word pd30;
pd30 = (* (( (ptr) (* (( (ptr) gf←c15536)+39)/* var←c14128 */ ))+4) );
(void) ( *( (fPt) ((* (ptr) pd30 ))))((* (( (ptr) gf←c15536)+26) ), (word) (( (bPt) gf←c15536)+124)/* var←c14000 */ , (* (
( (ptr) gf←c15536)+25) ), 0, 1, pd30);
};
SOURCE(2803, 96)
{
word pd31;
pd31 = (* (( (ptr) (* (( (ptr) gf←c15536)+39)/* var←c14128 */ ))+4) );
(void) ( *( (fPt) ((* (ptr) pd31 ))))((* (( (ptr) gf←c15536)+24) ), (word) (( (bPt) gf←c15536)+116)/* var←c13968 */ , (* (
( (ptr) gf←c15536)+25) ), 0, 1, pd31);
};
SOURCE(2901, 88)
{
word pd32;
pd32 = (* (( (ptr) (* (( (ptr) gf←c15536)+39)/* var←c14128 */ ))+4) );
(void) ( *( (fPt) ((* (ptr) pd32 ))))((* (( (ptr) gf←c15536)+13) ), (word) (( (bPt) gf←c15536)+108)/* var←c13936 */ , (* (
( (ptr) gf←c15536)+25) ), 0, 1, pd32);
};
}
static word SSDataOrFail←P60()
{
register ptr gf←c15568 = (ptr) &globalframe;
word var←c3080;
word ssd←v3168;
/* SSDataOrFail: */
SOURCE(279, 210)
SOURCE(343, 60)
{
word pd33;
pd33 = (* (( (ptr) (* (( (ptr) gf←c15568)+40)/* var←c14160 */ ))+4) );
ssd←v3168 = (word) ( *( (fPt) ((* (ptr) pd33 ))))(pd33);
};
SOURCE(405, 69)
if ((ssd←v3168 == 0)) {
SOURCE(421, 53)
{
word var←c022;
var←c022 = (* (( (ptr) gf←c15568)+14) );
(void) XR←RaiseError((* (( (ptr) (* (( (ptr) gf←c15568)+41)/* var←c14192 */ ))+4) ), (word) &var←c022);
};
};
SOURCE(476, 13)
return(ssd←v3168);
}
static word BMWidgetOrFail←P120()
{
register ptr gf←c15600 = (ptr) &globalframe;
word bm←v3140;
word ssd←v3212;
/* BMWidgetOrFail: */
SOURCE(493, 175)
SOURCE(493, 175)
bm←v3140 = 0;
SOURCE(546, 49)
ssd←v3212 = (word) SSDataOrFail←P60();
SOURCE(597, 71)
bm←v3140 = (* (( (ptr) ssd←v3212)+4) );
if ((bm←v3140 == 0)) {
SOURCE(629, 39)
{
word var←c025;
var←c025 = (* (( (ptr) gf←c15600)+15) );
(void) XR←RaiseError((* (( (ptr) (* (( (ptr) gf←c15600)+41)/* var←c14192 */ ))+4) ), (word) &var←c025);
};
};
SOURCE(493, 175)
return(bm←v3140);
}
static void ColorMapInfoCommand←P180(formal←c062, cmd←v4532)
word formal←c062;
word cmd←v4532;
{
register ptr gf←c15632 = (ptr) &globalframe;
word result←v4576;
word msg←v4604;
word bmw←v3256;
word cd←v3284;
/* ColorMapInfoCommand: */
SOURCE(674, 1029)
SOURCE(674, 1029)
result←v4576 = 0;
SOURCE(674, 1029)
msg←v4604 = 0;
SOURCE(721, 34)
bmw←v3256 = (word) BMWidgetOrFail←P120();
SOURCE(757, 105)
{
word pd34;
pd34 = (* (( (ptr) (* (( (ptr) gf←c15632)+42)/* var←c14224 */ ))+4) );
cd←v3284 = (word) ( *( (fPt) ((* (ptr) pd34 ))))((* (( (ptr) (* (( (ptr) bmw←v3256)+36) ))+1) ), 8, 3, pd34);
};
SOURCE(864, 64)
if ((cd←v3284 == 0) || (0 == (* (ptr) cd←v3284 ))) {
SOURCE(896, 32)
{
word var←c031;
var←c031 = (* (( (ptr) gf←c15632)+16) );
(void) XR←RaiseError((* (( (ptr) (* (( (ptr) gf←c15632)+41)/* var←c14192 */ ))+4) ), (word) &var←c031);
};
};
SOURCE(930, 130)
if ((0 != (* (( (ptr) cd←v3284)+1) ))) {
SOURCE(961, 52)
{
word pd35;
pd35 = (* (( (ptr) (* (( (ptr) gf←c15632)+43)/* var←c14256 */ ))+93) );
(void) ( *( (fPt) ((* (ptr) pd35 ))))((* (( (ptr) cmd←v4532)+1) ), (* (( (ptr) gf←c15632)+17) ), 0, 2147483647, pd35);
};
}
else {
SOURCE(1013, 47)
{
word pd36;
pd36 = (* (( (ptr) (* (( (ptr) gf←c15632)+43)/* var←c14256 */ ))+93) );
(void) ( *( (fPt) ((* (ptr) pd36 ))))((* (( (ptr) cmd←v4532)+1) ), (* (( (ptr) gf←c15632)+18) ), 0, 2147483647, pd36);
};
};
SOURCE(1062, 103)
{
W2 var←c14288;
W2 var←c14384;
{
W2 var←c14320;
word v←v13888;
v←v13888 = (* (( (ptr) cd←v3284)+3) );
var←c14320.f0 = 4;
var←c14320.f1 = v←v13888;
var←c14288 = var←c14320;
};
{
W2 var←c14416;
word v←v13840;
v←v13840 = (* (( (ptr) cd←v3284)+4) );
var←c14416.f0 = 4;
var←c14416.f1 = v←v13840;
var←c14384 = var←c14416;
};
{
W2 var←c094;
(* (ptr) (word) &var←c094 ) = 0;
(* (( (ptr) (word) &var←c094) + 1) ) = 0;
{
word pd37;
pd37 = (* (( (ptr) (* (( (ptr) gf←c15632)+43)/* var←c14256 */ ))+60) );
(void) ( *( (fPt) ((* (ptr) pd37 ))))((* (( (ptr) cmd←v4532)+1) ), (* (( (ptr) gf←c15632)+19) ), var←c14288, var←c14384, var←c094, pd37)
;
};
};
};
SOURCE(1167, 88)
{
W2 var←c14512;
{
W2 var←c14544;
word v←v13792;
{
word m←v13696;
m←v13696 = (* (( (ptr) cd←v3284)+2) );
v←v13792 = m←v13696;
};
var←c14544.f0 = 4;
var←c14544.f1 = v←v13792;
var←c14512 = var←c14544;
};
{
word pd38;
pd38 = (* (( (ptr) (* (( (ptr) gf←c15632)+43)/* var←c14256 */ ))+61) );
(void) ( *( (fPt) ((* (ptr) pd38 ))))((* (( (ptr) cmd←v4532)+1) ), (* (( (ptr) gf←c15632)+20) ), var←c14512, pd38);
};
};
SOURCE(1257, 93)
{
W2 var←c14640;
{
W2 var←c14672;
word v←v13744;
{
word m←v13648;
m←v13648 = (* (( (ptr) bmw←v3256)+28) );
v←v13744 = m←v13648;
};
var←c14672.f0 = 4;
var←c14672.f1 = v←v13744;
var←c14640 = var←c14672;
};
{
word pd39;
pd39 = (* (( (ptr) (* (( (ptr) gf←c15632)+43)/* var←c14256 */ ))+61) );
(void) ( *( (fPt) ((* (ptr) pd39 ))))((* (( (ptr) cmd←v4532)+1) ), (* (( (ptr) gf←c15632)+21) ), var←c14640, pd39);
};
};
SOURCE(1352, 351)
{
word var←c14768;
var←c14768 = (* (( (ptr) cd←v3284)+5) );
if ((var←c14768 == 0)) {
goto lab←L100007;
};
if (((* (( (ptr) gf←c15632)+12) ) == XR←GetReferentType(var←c14768))) {
{
word entries←v3328;
entries←v3328 = var←c14768;
SOURCE(1418, 228)
{
register word l←v3372;
l←v3372 = entries←v3328;
lab←L100011: ;
if ((l←v3372 != 0)) {
}
else {
goto lab←L100008;
};
SOURCE(1482, 57)
{
W2 var←c14800;
{
W2 var←c14832;
word v←v13600;
v←v13600 = (unsigned) (* (bPt) l←v3372 );
var←c14832.f0 = 5;
var←c14832.f1 = v←v13600;
var←c14800 = var←c14832;
};
{
word pd40;
pd40 = (* (( (ptr) (* (( (ptr) gf←c15632)+43)/* var←c14256 */ ))+61) );
(void) ( *( (fPt) ((* (ptr) pd40 ))))((* (( (ptr) cmd←v4532)+1) ), (* (( (ptr) gf←c15632)+22) ), var←c14800, pd40);
};
};
SOURCE(1541, 105)
{
W2 var←c14896;
W2 var←c14992;
W2 var←c15088;
{
W2 var←c14928;
word v←v13552;
v←v13552 = (unsigned) (* (( (bPt) l←v3372)+1) );
var←c14928.f0 = 5;
var←c14928.f1 = v←v13552;
var←c14896 = var←c14928;
};
{
W2 var←c15024;
word v←v13504;
v←v13504 = (unsigned) (* (( (bPt) l←v3372)+2) );
var←c15024.f0 = 5;
var←c15024.f1 = v←v13504;
var←c14992 = var←c15024;
};
{
W2 var←c15120;
word v←v13456;
v←v13456 = (unsigned) (* (( (bPt) l←v3372)+3) );
var←c15120.f0 = 5;
var←c15120.f1 = v←v13456;
var←c15088 = var←c15120;
};
{
word pd41;
pd41 = (* (( (ptr) (* (( (ptr) gf←c15632)+43)/* var←c14256 */ ))+60) );
(void) ( *( (fPt) ((* (ptr) pd41 ))))((* (( (ptr) cmd←v4532)+1) ), (* (( (ptr) gf←c15632)+23) ), var←c14896, var←c14992, var←c15088, pd41)
;
};
};
l←v3372 = (* (( (ptr) l←v3372)+1) );
goto lab←L100011;
lab←L100008: ;
};
};
}
else {
lab←L100007: ;
SOURCE(1671, 32)
{
word var←c061;
var←c061 = (* (( (ptr) gf←c15632)+16) );
(void) XR←RaiseError((* (( (ptr) (* (( (ptr) gf←c15632)+41)/* var←c14192 */ ))+4) ), (word) &var←c061);
};
};
};
/* removed tail goto */
(* (ptr) formal←c062 ) = result←v4576;
(* (( (ptr) formal←c062)+1) ) = msg←v4604;
return;
}
static void ForceInvertColors←P240(formal←c074, cmd←v4664)
word formal←c074;
word cmd←v4664;
{
register ptr gf←c15664 = (ptr) &globalframe;
word result←v4708;
word msg←v4736;
word bmw←v3416;
word cd←v3444;
W7 i1←v3472;
W7 i2←v3500;
/* ForceInvertColors: */
SOURCE(1709, 497)
SOURCE(1709, 497)
result←v4708 = 0;
SOURCE(1709, 497)
msg←v4736 = 0;
SOURCE(1754, 34)
bmw←v3416 = (word) BMWidgetOrFail←P120();
SOURCE(1790, 105)
{
word pd42;
pd42 = (* (( (ptr) (* (( (ptr) gf←c15664)+42)/* var←c14224 */ ))+4) );
cd←v3444 = (word) ( *( (fPt) ((* (ptr) pd42 ))))((* (( (ptr) (* (( (ptr) bmw←v3416)+36) ))+1) ), 8, 3, pd42);
};
SOURCE(1897, 20)
i1←v3472.f0 = 0;
i1←v3472.f1 = 1;
i1←v3472.f2 = 1;
i1←v3472.f3 = 1;
(* (W3Pt) (( (ptr) &i1←v3472)+4) ) = (* (W3Pt) &dummy43 );
i2←v3500 = i1←v3472;
SOURCE(1919, 64)
if ((cd←v3444 == 0) || (0 == (* (ptr) cd←v3444 ))) {
SOURCE(1951, 32)
{
word var←c070;
var←c070 = (* (( (ptr) gf←c15664)+16) );
(void) XR←RaiseError((* (( (ptr) (* (( (ptr) gf←c15664)+41)/* var←c14192 */ ))+4) ), (word) &var←c070);
};
};
SOURCE(1985, 34)
i1←v3472.f0 = (255 - (* (( (ptr) cd←v3444)+3) ));
SOURCE(2021, 30)
i1←v3472.f4 = 65535;
i1←v3472.f5 = 65535;
i1←v3472.f6 = 65535;
SOURCE(2061, 34)
i2←v3500.f0 = (255 - (* (( (ptr) cd←v3444)+4) ));
SOURCE(2097, 18)
i2←v3500.f4 = 0;
i2←v3500.f5 = 0;
i2←v3500.f6 = 0;
SOURCE(2125, 81)
{
word var←c15216;
{
word var←c15248;
word var←c15280;
var←c15248 = XR←NewObject(32, (* (( (ptr) gf←c15664)+11) ));
var←c15280 = var←c15248;
(* (W7Pt) var←c15280 ) = i1←v3472;
(* (( (ptr) var←c15280)+7) ) = XR←NewObject(32, (* (( (ptr) gf←c15664)+11) ));
var←c15280 = (* (( (ptr) var←c15280)+7) );
(* (W7Pt) var←c15280 ) = i2←v3500;
var←c15216 = var←c15248;
};
{
word pd44;
pd44 = (* (( (ptr) (* (( (ptr) gf←c15664)+45)/* var←c15344 */ ))+195) );
(void) ( *( (fPt) ((* (ptr) pd44 ))))((* (( (ptr) bmw←v3416)+34) ), (* (( (ptr) cd←v3444)+2) ), var←c15216, (* (ptr) (* (
( (ptr) (* (( (ptr) gf←c15664)+44)/* var←c15312 */ ))+5) ) ), pd44);
};
};
/* removed tail goto */
(* (ptr) formal←c074 ) = result←v4708;
(* (( (ptr) formal←c074)+1) ) = msg←v4736;
return;
}
static void ForceBWColors←P300(formal←c086, cmd←v4796)
word formal←c086;
word cmd←v4796;
{
register ptr gf←c15696 = (ptr) &globalframe;
word result←v4840;
word msg←v4868;
word bmw←v3544;
word cd←v3572;
W7 i1←v3600;
W7 i2←v3628;
/* ForceBWColors: */
SOURCE(2212, 485)
SOURCE(2212, 485)
result←v4840 = 0;
SOURCE(2212, 485)
msg←v4868 = 0;
SOURCE(2253, 34)
bmw←v3544 = (word) BMWidgetOrFail←P120();
SOURCE(2289, 105)
{
word pd45;
pd45 = (* (( (ptr) (* (( (ptr) gf←c15696)+42)/* var←c14224 */ ))+4) );
cd←v3572 = (word) ( *( (fPt) ((* (ptr) pd45 ))))((* (( (ptr) (* (( (ptr) bmw←v3544)+36) ))+1) ), 8, 3, pd45);
};
SOURCE(2396, 20)
i1←v3600.f0 = 0;
i1←v3600.f1 = 1;
i1←v3600.f2 = 1;
i1←v3600.f3 = 1;
(* (W3Pt) (( (ptr) &i1←v3600)+4) ) = (* (W3Pt) &dummy43 );
i2←v3628 = i1←v3600;
SOURCE(2418, 64)
if ((cd←v3572 == 0) || (0 == (* (ptr) cd←v3572 ))) {
SOURCE(2450, 32)
{
word var←c082;
var←c082 = (* (( (ptr) gf←c15696)+16) );
(void) XR←RaiseError((* (( (ptr) (* (( (ptr) gf←c15696)+41)/* var←c14192 */ ))+4) ), (word) &var←c082);
};
};
SOURCE(2484, 30)
i1←v3600.f0 = (* (( (ptr) cd←v3572)+3) );
SOURCE(2516, 18)
i1←v3600.f4 = 0;
i1←v3600.f5 = 0;
i1←v3600.f6 = 0;
SOURCE(2544, 30)
i2←v3628.f0 = (* (( (ptr) cd←v3572)+4) );
SOURCE(2576, 30)
i2←v3628.f4 = 65535;
i2←v3628.f5 = 65535;
i2←v3628.f6 = 65535;
SOURCE(2616, 81)
{
word var←c15408;
{
word var←c15440;
word var←c15472;
var←c15440 = XR←NewObject(32, (* (( (ptr) gf←c15696)+11) ));
var←c15472 = var←c15440;
(* (W7Pt) var←c15472 ) = i1←v3600;
(* (( (ptr) var←c15472)+7) ) = XR←NewObject(32, (* (( (ptr) gf←c15696)+11) ));
var←c15472 = (* (( (ptr) var←c15472)+7) );
(* (W7Pt) var←c15472 ) = i2←v3628;
var←c15408 = var←c15440;
};
{
word pd46;
pd46 = (* (( (ptr) (* (( (ptr) gf←c15696)+45)/* var←c15344 */ ))+195) );
(void) ( *( (fPt) ((* (ptr) pd46 ))))((* (( (ptr) bmw←v3544)+34) ), (* (( (ptr) cd←v3572)+2) ), var←c15408, (* (ptr) (* (
( (ptr) (* (( (ptr) gf←c15696)+44)/* var←c15312 */ ))+5) ) ), pd46);
};
};
/* removed tail goto */
(* (ptr) formal←c086 ) = result←v4840;
(* (( (ptr) formal←c086)+1) ) = msg←v4868;
return;
}
/* file: X11ViewersSpecialCommandsImpl, module: X11ViewersSpecialCommandsImpl, compiled at: October 22, 1993 5:07:40 pm PDT */
extern void XR←install←X11ViewersSpecialCommandsImpl() {
XR←FillWords(&dummy43, 3, 0);
NoName←Q1116();
}
extern void XR←run←X11ViewersSpecialCommandsImpl() { XR←Start(&globalframe); }