/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1992 by Xerox Corporation. All rights reserved. */
/* time: March 9, 1992 6:00:40 pm PST */
/* C2C version: October 16, 1990 (native) */
/* ref-counting: off */
/* file: HelpStringsImpl, module: HelpStringsImpl */
/* switches: bcfhklnouw */
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob←version [647557632,2064795176] HelpStringsImpl";
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←Q480();
static void HelpStringsImpl←P0();
static void NoDisplay←P60();
static void NoVisble←P120();
static word NoHelp←P180();
static void Display←P240();
static void Clear←P300();
static void MakeVisible←P360();
static void Hide←P420();
static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\267\210\110\244\300\302\136\033\142\100\200\000\000"};
static struct {unsigned f; char r[4];} string2 = {131074, "\003\004\000"};
static struct {unsigned f; char r[16];} string3 = {851984, "\257\300\267\210\110\244\300\302\136\033\142\100\164\000\000"};
static struct {unsigned f; char r[4];} string4 = {131074, "\004\003\000"};
static struct {unsigned f; char r[16];} string5 = {851984, "\257\300\046\230\362\000\300\173\022\106\050\100\150\000\000"};
static struct {unsigned f; char r[4];} string6 = {131074, "\003\010\000"};
static struct {unsigned f; char r[16];} string7 = {851984, "\257\300\267\210\110\244\300\302\136\033\142\100\150\000\000"};
static struct {
word f0[12]; 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[2];
} globalframe = {
{0}, (word) Hide←P420, 0, (word) MakeVisible←P360,
0, (word) Clear←P300, 0, (word) Display←P240,
0, (word) NoHelp←P180, 0, (word) NoVisble←P120,
0, (word) NoDisplay←P60, 0, (word) HelpStringsImpl←P0,
{0}
};
static void NoName←Q480()
{
register ptr gf←c034 = (ptr) &globalframe;
word var←c4832;
(* (( (ptr) gf←c034)+9) ) = (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2);
(* (( (ptr) gf←c034)+11) ) = (word) XR←GetTypeIndex((word) &string3, 0, (word) &string4);
(void) XR←DeclareGlobalFrame((word) "HelpStringsImpl", &globalframe, (word) XR←GetTypeIndex((word) &string5, 0, (word) &string6)
, (word) (( (bPt) gf←c034)+104)/* var←c4672 */ );
var←c4832 = (word) XR←ExportInterface((word) "HelpStrings", (word) XR←GetTypeIndexS((word) (&string7)), 5);
(* (( (ptr) gf←c034)+28)/* var←c4800 */ ) = var←c4832;
(void) XR←ExportProcS(var←c4832, (word) (( (bPt) gf←c034)+72)/* var←c4544 */ , 786435);
(void) XR←ExportProcS(var←c4832, (word) (( (bPt) gf←c034)+64)/* var←c4512 */ , 786691);
(void) XR←ExportProcS(var←c4832, (word) (( (bPt) gf←c034)+56)/* var←c4480 */ , 524802);
(void) XR←ExportProcS(var←c4832, (word) (( (bPt) gf←c034)+48)/* var←c4448 */ , 525058);
(void) XR←ExportProcS(var←c4832, (word) (( (bPt) gf←c034)+80)/* var←c4576 */ , 67109888);
}
static void HelpStringsImpl←P0(formal←c016, formal←c014)
word formal←c016;
word formal←c014;
{
register ptr gf←c4864 = (ptr) &globalframe;
/* HelpStringsImpl: */
SOURCE(25, 906)
SOURCE(104, 158)
{
word var←c4704;
var←c4704 = XR←NewObject(20, (* (( (ptr) gf←c4864)+9) ));
(* (ptr) var←c4704 ) = (word) (( (bPt) gf←c4864)+96)/* var←c4640 */ ;
(* (( (ptr) var←c4704)+1) ) = (word) (( (bPt) gf←c4864)+96)/* var←c4640 */ ;
(* (( (ptr) var←c4704)+2) ) = (word) (( (bPt) gf←c4864)+88)/* var←c4608 */ ;
(* (( (ptr) var←c4704)+3) ) = (word) (( (bPt) gf←c4864)+88)/* var←c4608 */ ;
(* (( (ptr) gf←c4864)+8)/* noHelpClass←v2436 */ ) = var←c4704;
};
}
static void NoDisplay←P60(h←v2724, string←v2752, key←v2780)
word h←v2724;
word string←v2752;
word key←v2780;
{
/* NoDisplay: */
}
static void NoVisble←P120(h←v2868, data←v2896)
word h←v2868;
word data←v2896;
{
/* NoVisble: */
}
static word NoHelp←P180()
{
register ptr gf←c4896 = (ptr) &globalframe;
word h←v2968;
/* NoHelp: */
SOURCE(397, 104)
SOURCE(397, 104)
h←v2968 = 0;
SOURCE(444, 57)
{
word var←c4768;
var←c4768 = XR←NewObject(8, (* (( (ptr) gf←c4896)+11) ));
(* (ptr) var←c4768 ) = (* (( (ptr) gf←c4896)+8)/* noHelpClass←v2436 */ );
return(var←c4768);
};
}
static void Display←P240(h←v3028, string←v3056, key←v3084)
word h←v3028;
word string←v3056;
word key←v3084;
{
/* Display: */
SOURCE(505, 112)
SOURCE(571, 46)
if ((h←v3028 != 0)) {
SOURCE(585, 32)
{
word pd8;
pd8 = (* (ptr) (* (ptr) h←v3028 ) );
(void) ( *( (fPt) ((* (ptr) pd8 ))))(h←v3028, string←v3056, key←v3084, pd8);
};
};
}
static void Clear←P300(h←v3168, string←v3196, key←v3224)
word h←v3168;
word string←v3196;
word key←v3224;
{
/* Clear: */
SOURCE(620, 114)
SOURCE(690, 44)
if ((h←v3168 != 0)) {
SOURCE(704, 30)
{
word pd9;
pd9 = (* (( (ptr) (* (ptr) h←v3168 ))+1) );
(void) ( *( (fPt) ((* (ptr) pd9 ))))(h←v3168, string←v3196, key←v3224, pd9);
};
};
}
static void MakeVisible←P360(h←v3308, data←v3336)
word h←v3308;
word data←v3336;
{
/* MakeVisible: */
SOURCE(738, 101)
SOURCE(796, 43)
if ((h←v3308 != 0)) {
SOURCE(810, 29)
{
word pd10;
pd10 = (* (( (ptr) (* (ptr) h←v3308 ))+2) );
(void) ( *( (fPt) ((* (ptr) pd10 ))))(h←v3308, data←v3336, pd10);
};
};
}
static void Hide←P420(h←v3408, data←v3436)
word h←v3408;
word data←v3436;
{
/* Hide: */
SOURCE(844, 87)
SOURCE(895, 36)
if ((h←v3408 != 0)) {
SOURCE(909, 22)
{
word pd11;
pd11 = (* (( (ptr) (* (ptr) h←v3408 ))+3) );
(void) ( *( (fPt) ((* (ptr) pd11 ))))(h←v3408, data←v3436, pd11);
};
};
}
/* file: HelpStringsImpl, module: HelpStringsImpl, compiled at: March 9, 1992 6:00:39 pm PST */
extern void XR←install←HelpStringsImpl() {
NoName←Q480();
}
extern void XR←run←HelpStringsImpl() { XR←Start(&globalframe); }