/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1992 by Xerox Corporation. All rights reserved. */
/* time: April 21, 1992 12:48:04 pm PDT */
/* C2C version: October 16, 1990 (native) */
/* ref-counting: off */
/* file: X11Hello, module: X11Hello */
/* switches: bcfhklnouw */
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob←version [270068000,3915101592] X11Hello";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef word (*fPt)();
typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8;
typedef struct {W8 f; word r;} W9;
typedef W9 *W9Pt;
typedef struct {word f0, f1, f2, f3;} W4;
typedef W4 *W4Pt;
typedef struct {W8 f; W8 r;} W16;
typedef struct {W16 f; W4 r;} W20;
typedef struct {word f0, f1, f2, f3, f4;} W5;
typedef W5 *W5Pt;
#define SOURCE(p, l) /* source p, l */
static void NoName←Q120();
static void X11Hello←P0();
static void Hello←P60();
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[28];} string3 = {1638428, "Open a hello world widget\000\000"};
static struct {unsigned f; char r[12];} string4 = {655372, "hello PARC\000"};
static struct {unsigned f; char r[20];} string5 = {1179668, "hello world widget\000"};
static struct {unsigned f; char r[12];} string6 = {524300, "X11Hello\000\000\000"};
static struct {unsigned f; char r[16];} string7 = {851984, "\257\300\020\030\351\040\300\351\133\265\230\100\164\000\000"};
static struct {unsigned f; char r[4];} string8 = {196611, "\004G\200"};
static struct {unsigned f; char r[16];} string9 = {851984, "\257\300\373\225\000\071\300\362\156\307\320\100\150\000\000"};
static struct {unsigned f; char r[16];} string10 = {851984, "\257\300\145\202\371\143\300\336\312\353\353\100\150\000\000"};
static struct {
word f0[11]; word f11; word f12; word f13;
word f14[2]; word f16; word f17; word f18;
word f19; word f20; word f21; word f22[2];
word f24; word f25; word f26[2]; word f28;
word f29; word f30; word f31; word f32;
word f33[2];
} globalframe = {
{0}, (word) Hello←P60, 0, (word) X11Hello←P0,
{0}, 2147483648, 2147483648, 2147483648,
2147483648, 2147483648, 3, {0},
4294967295, 4294967295, {0}, 2147483648,
2147483648, 2147483648, 2147483648, 2147483648,
{0}
};
static void NoName←Q120()
{
register ptr gf←c020 = (ptr) &globalframe;
word var←c8876;
(* (( (ptr) gf←c020)+5) ) = (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2);
(* (ptr) (( (bPt) gf←c020)+28) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c020)+5) ), (word) &string3);
(* (ptr) (( (bPt) gf←c020)+32) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c020)+5) ), (word) &string4);
(* (ptr) (( (bPt) gf←c020)+36) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c020)+5) ), (word) &string5);
(* (ptr) (( (bPt) gf←c020)+40) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c020)+5) ), (word) &string6);
(void) XR←DeclareGlobalFrame((word) "X11Hello", &globalframe, (word) XR←GetTypeIndex((word) &string7, 0, (word) &string8)
, (word) (( (bPt) gf←c020)+52)/* var←c8588 */ );
var←c8876 = (word) XR←ImportInterface((word) "Commander", (word) XR←GetTypeIndexS((word) (&string9)), 3);
(* (( (ptr) gf←c020)+33)/* var←c8812 */ ) = var←c8876;
(void) XR←ImportProcS(var←c8876, 1310725);
var←c8876 = (word) XR←ImportInterface((word) "XTkWidgets", (word) XR←GetTypeIndexS((word) (&string10)), 52);
(* (( (ptr) gf←c020)+34)/* var←c8844 */ ) = var←c8876;
(void) XR←ImportProcS(var←c8876, 2099460);
(void) XR←ImportProcS(var←c8876, 72352268);
(void) XR←ImportProcS(var←c8876, 70786819);
}
static void X11Hello←P0(formal←c012, formal←c011)
word formal←c012;
word formal←c011;
{
register ptr gf←c8908 = (ptr) &globalframe;
/* X11Hello: */
SOURCE(35, 396)
/* moved to installation proc */
/* moved to installation proc */
/* moved to installation proc */
/* moved to installation proc */
/* moved to installation proc */
/* moved to installation proc */
/* moved to installation proc */
/* moved to installation proc */
/* moved to installation proc */
/* moved to installation proc */
/* moved to installation proc */
/* moved to installation proc */
/* moved to installation proc */
SOURCE(365, 66)
{
word pd11;
pd11 = (* (( (ptr) (* (( (ptr) gf←c8908)+33)/* var←c8812 */ ))+4) );
(void) ( *( (fPt) ((* (ptr) pd11 ))))((* (( (ptr) gf←c8908)+10) ), (word) (( (bPt) gf←c8908)+44)/* var←c8556 */ , (* (( (ptr) gf←c8908)+7)
), 0, 1, pd11);
};
}
static void Hello←P60(formal←c019, cmd←v3136)
word formal←c019;
word cmd←v3136;
{
register ptr gf←c8940 = (ptr) &globalframe;
word result←v3180;
word msg←v3208;
word label←v2544;
word shell←v2572;
/* Hello: */
SOURCE(99, 260)
SOURCE(99, 260)
result←v3180 = 0;
SOURCE(99, 260)
msg←v3208 = 0;
SOURCE(132, 69)
{
word pd12;
pd12 = (* (( (ptr) (* (( (ptr) gf←c8940)+34)/* var←c8844 */ ))+35) );
label←v2544 = (word) ( *( (fPt) ((* (ptr) pd12 ))))((* (W9Pt) (( (ptr) gf←c8940)+15)/* var←c8652 */ ), (* (( (ptr) gf←c8940)+8)
), (* (W4Pt) (( (ptr) gf←c8940)+24)/* var←c8716 */ ), pd12);
};
SOURCE(203, 124)
{
W20 var←c018;
(* (W9Pt) (word) &var←c018 ) = (* (W9Pt) (( (ptr) gf←c8940)+15)/* var←c8652 */ );
(* (( (ptr) (word) &var←c018) + 9) ) = label←v2544;
(* (( (ptr) (word) &var←c018) + 10) ) = (* (( (ptr) gf←c8940)+9) );
(* (( (ptr) (word) &var←c018) + 11) ) = 0;
(* (( (ptr) (word) &var←c018) + 12) ) = 0;
(* (( (ptr) (word) &var←c018) + 13) ) = 0;
(* (( (ptr) (word) &var←c018) + 14) ) = 0;
(* (( (ptr) (word) &var←c018) + 15) ) = 0;
(* (( (ptr) (word) &var←c018) + 16) ) = 0;
(* (( (ptr) (word) &var←c018) + 17) ) = 1;
(* (( (ptr) (word) &var←c018) + 18) ) = 1;
(* (( (ptr) (word) &var←c018) + 19) ) = 1;
{
word pd13;
pd13 = (* (( (ptr) (* (( (ptr) gf←c8940)+34)/* var←c8844 */ ))+6) );
shell←v2572 = (word) ( *( (fPt) ((* (ptr) pd13 ))))((word) (&var←c018), pd13);
};
};
SOURCE(329, 30)
{
word pd14;
pd14 = (* (( (ptr) (* (( (ptr) gf←c8940)+34)/* var←c8844 */ ))+13) );
(void) ( *( (fPt) ((* (ptr) pd14 ))))(shell←v2572, (* (W5Pt) (( (ptr) gf←c8940)+28)/* var←c8780 */ ), 0, 1, pd14);
};
/* removed tail goto */
(* (ptr) formal←c019 ) = result←v3180;
(* (( (ptr) formal←c019)+1) ) = msg←v3208;
return;
}
/* file: X11Hello, module: X11Hello, compiled at: April 21, 1992 12:48:04 pm PDT */
extern void XR←install←X11Hello() {
NoName←Q120();
}
extern void XR←run←X11Hello() { XR←Start(&globalframe); }