/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1993 by Xerox Corporation. All rights reserved. */
/* time: March 10, 1993 11:33:07 am PST */
/* C2C version: February 24, 1993 (sun4) */
/* ref-counting: off */
/* file: StartXAnyImpl, module: StartXAnyImpl */
/* switches: bcfhklnouw */
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob←version [2408941768,3905692805] StartXAnyImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef word (*fPt)();
#define SOURCE(p, l) /* source p, l */
static void NoName←Q60();
static void StartXAnyImpl←P0();
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[8];} string3 = {327688, "RETRY\000\000"};
static struct {unsigned f; char r[28];} string4 = {1638428, "X11ViewersInitialStartUp+\000\000"};
static struct {unsigned f; char r[28];} string5 = {1638428, "X11ViewersInitialStartUp!\000\000"};
static struct {unsigned f; char r[24];} string6 = {1441816, "CEDAR←INITIAL←XFAILURE\000"};
static struct {unsigned f; char r[16];} string7 = {851984, "\257\300\217\225\210\310\300\350\314\044\205\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\311\235\133\064\300\165\175\234\175\100\150\000\000"};
static struct {unsigned f; char r[16];} string10 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\100\150\000\000"};
static struct {unsigned f; char r[16];} string11 = {851984, "\257\300\314\240\077\114\300\013\241\042\210\100\150\000\000"};
static struct {
word f0[11]; word f11; word f12[4];
} globalframe = {
{0}, (word) StartXAnyImpl←P0, {0}
};
static void NoName←Q60()
{
register ptr gf←c013 = (ptr) &globalframe;
word var←c6340;
(* (( (ptr) gf←c013)+5) ) = (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2);
(* (ptr) (( (bPt) gf←c013)+28) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c013)+5) ), (word) &string3);
(* (ptr) (( (bPt) gf←c013)+32) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c013)+5) ), (word) &string4);
(* (ptr) (( (bPt) gf←c013)+36) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c013)+5) ), (word) &string5);
(* (ptr) (( (bPt) gf←c013)+40) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c013)+5) ), (word) &string6);
(void) XR←DeclareGlobalFrame((word) "StartXAnyImpl", &globalframe, (word) XR←GetTypeIndex((word) &string7, 0, (word) &string8)
, (word) (( (bPt) gf←c013)+44)/* var←c6116 */ );
var←c6340 = (word) XR←ImportInterface((word) "CommanderOps", (word) XR←GetTypeIndexS((word) (&string9)), 14);
(* (( (ptr) gf←c013)+15)/* var←c6244 */ ) = var←c6340;
(void) XR←ImportProcS(var←c6340, 67634946);
var←c6340 = (word) XR←ImportInterface((word) "Rope", (word) XR←GetTypeIndexS((word) (&string10)), 43);
(* (( (ptr) gf←c013)+14)/* var←c6212 */ ) = var←c6340;
(void) XR←ImportProcS(var←c6340, 67896323);
var←c6340 = (word) XR←ImportInterface((word) "EnvironmentVariables", (word) XR←GetTypeIndexS((word) (&string11)), 1);
(* (( (ptr) gf←c013)+13)/* var←c6180 */ ) = var←c6340;
(void) XR←ImportProcS(var←c6340, 67371009);
}
static void StartXAnyImpl←P0(formal←c012, formal←c08)
word formal←c012;
word formal←c08;
{
register ptr gf←c6372 = (ptr) &globalframe;
word var←c6148;
/* StartXAnyImpl: */
SOURCE(55, 297)
SOURCE(144, 208)
{
word pd13;
{
word pd12;
pd12 = (* (( (ptr) (* (( (ptr) gf←c6372)+13)/* var←c6180 */ ))+4) );
var←c6148 = (word) ( *( (fPt) ((* (ptr) pd12 ))))((* ((( (ptr) gf←c6372)+10)) ), pd12);
};
pd13 = (* (( (ptr) (* (( (ptr) gf←c6372)+14)/* var←c6212 */ ))+8) );
if ((0 != (word) ( *( (fPt) ((* (ptr) pd13 ))))(var←c6148, (* (( (ptr) gf←c6372)+7) ), 1, pd13))) {
SOURCE(224, 67)
{
word var←c6276;
word pd14;
pd14 = (* (( (ptr) (* (( (ptr) gf←c6372)+15)/* var←c6244 */ ))+11) );
var←c6276 = (word) ( *( (fPt) ((* (ptr) pd14 ))))((* (( (ptr) gf←c6372)+8) ), 0, pd14);
};
}
else {
SOURCE(291, 61)
{
word var←c6308;
word pd15;
pd15 = (* (( (ptr) (* (( (ptr) gf←c6372)+15)/* var←c6244 */ ))+11) );
var←c6308 = (word) ( *( (fPt) ((* (ptr) pd15 ))))((* (( (ptr) gf←c6372)+9) ), 0, pd15);
};
};
};
}
/* file: StartXAnyImpl, module: StartXAnyImpl, compiled at: March 10, 1993 11:33:07 am PST */
extern void XR←install←StartXAnyImpl() {
NoName←Q60();
}
extern void XR←run←StartXAnyImpl() { XR←Start(&globalframe); }