/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1992 by Xerox Corporation. All rights reserved. */
/* time: December 16, 1992 11:12:58 am PST */
/* C2C version: October 7, 1992 (native) */
/* ref-counting: off */
/* file: X11TextDemo, module: X11TextDemo */
/* switches: bcfhklnouw */
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob←version [2374761698,1706201310] X11TextDemo";
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, f7;} W8;
typedef struct {W8 f; W8 r;} W16;
typedef struct {word f0, f1, f2, f3;} W4;
typedef struct {W16 f; W4 r;} W20;
typedef struct {W8 f; word r;} W9;
typedef W9 *W9Pt;
typedef struct {W16 f; W2 r;} W18;
typedef W4 *W4Pt;
typedef struct {word f0, f1, f2;} W3;
typedef struct {W16 f; W3 r;} W19;
typedef struct {word f0, f1, f2, f3, f4;} W5;
typedef W5 *W5Pt;
#define SOURCE(p, l) /* source p, l */
static float fc47 = 26.0;
static float fc48 = 360.0;
static float fc50 = 193.0;
#define BCK(idx, lim) ( ((unsigned) idx) >= ((unsigned) lim) ? (XR←RaiseBoundsFault()) : (idx) )
static float fc56 = 20.0;
static float fc62 = 0.0;
static float fc69 = 2.0;
#define IOP2(op, x, y) ( (word) ((x) op (y)) )
static void NoName←Q840();
static void X11TextDemo←P0();
static void MoreHit←P60();
static void ResetHit←P120();
static void SetWaitHit←P180();
static void CreateDemoWidget←P240();
static word InitFonts←P300();
static void RunOneText←P420();
static void BitmapChanged←P480();
static word NoName←Q900();
static word NoName←Q960();
static struct {unsigned f; char r[4];} string1 = {131076, "\216\251\000"};
static struct {unsigned f; char r[4];} string2 = {65537, "\001\000\000"};
static struct {unsigned f; char r[24];} string3 = {1310744, "\205\210\242\000\100\300\216\257\300\046\300\267\143\300\022\215\240\122\100\244\000\000\000"};
static struct {unsigned f; char r[8];} string4 = {393222, "\010\000\004@\301\001\000"};
static struct {unsigned f; char r[16];} string5 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"};
static struct {unsigned f; char r[48];} string6 = {2883632, "\260\006\005\146\151\162\163\164\216\257\300\033\115\307\000\300\214\060\055\310\100\244\005\004\162\145\163\164\214\216\257\300\033\115\307\000\300\214\060\055\310\100\244\261\000\000\000"};
static struct {unsigned f; char r[4];} string7 = {131074, "\004\003\000"};
static struct {unsigned f; char r[16];} string8 = {851984, "\257\300\215\213\374\342\300\145\262\220\336\100\200\000\000"};
static struct {unsigned f; char r[4];} string9 = {131074, "\004\013\000"};
static struct {unsigned f; char r[4];} string10 = {65540, "\242\000\000"};
static struct {unsigned f; char r[44];} string11 = {2752556, "\260\006\005\146\151\162\163\164\257\300\067\247\367\025\300\305\121\116\376\100\214\005\004\162\145\163\164\214\257\300\067\247\367\025\300\305\121\116\376\100\214\261\000"};
static struct {unsigned f; char r[4];} string12 = {131074, "\004\007\000"};
static struct {unsigned f; char r[12];} string13 = {720908, "X11TextDemo"};
static struct {unsigned f; char r[20];} string14 = {1179668, "X11 text demo tool\000"};
static struct {unsigned f; char r[8];} string15 = {393224, "remote\000"};
static struct {unsigned f; char r[40];} string16 = {2359336, "Create X11 text rotation demo widget\000\000\000"};
static struct {unsigned f; char r[8];} string17 = {327688, "local\000\000"};
static struct {unsigned f; char r[8];} string18 = {327688, "yield\000\000"};
static struct {unsigned f; char r[12];} string19 = {720908, "wait-mode: "};
static struct {unsigned f; char r[16];} string20 = {983056, "add moving word"};
static struct {unsigned f; char r[12];} string21 = {720908, "stop moving"};
static struct {unsigned f; char r[24];} string22 = {1310744, "Xerox/XC1-2-2/Modern\000\000\000"};
static struct {unsigned f; char r[8];} string23 = {262152, "abcd\000\000\000"};
static struct {unsigned f; char r[16];} string24 = {851984, "\257\300\215\213\374\342\300\145\262\220\336\100\164\000\000"};
static struct {unsigned f; char r[16];} string25 = {786444, "\006\003\040\001\044\001\100\124\004\200\177\377\000\000\000"};
static struct {unsigned f; char r[16];} string26 = {851984, "\257\300\373\225\000\071\300\362\156\307\320\100\150\000\000"};
static struct {unsigned f; char r[16];} string27 = {851984, "\257\300\074\177\166\242\300\203\113\217\044\100\150\000\000"};
static struct {unsigned f; char r[16];} string28 = {851984, "\257\300\170\064\225\306\300\207\372\245\271\100\150\000\000"};
static struct {unsigned f; char r[16];} string29 = {851984, "\257\300\046\300\267\143\300\022\215\240\122\100\150\000\000"};
static struct {unsigned f; char r[16];} string30 = {851984, "\257\300\121\117\377\026\300\315\013\026\004\100\150\000\000"};
static struct {unsigned f; char r[16];} string31 = {851984, "\257\300\240\236\274\315\300\111\163\325\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string32 = {851984, "\257\300\242\215\274\036\300\123\155\142\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string33 = {851984, "\257\300\114\360\325\157\300\264\322\230\211\100\150\000\000"};
static struct {unsigned f; char r[16];} string34 = {851984, "\257\300\145\202\371\143\300\336\312\353\353\100\150\000\000"};
static struct {
word f0[36]; word f36; word f37; word f38;
word f39; word f40; word f41; word f42;
word f43; word f44; word f45; word f46;
word f47; word f48; word f49; word f50;
word f51[2]; word f53; word f54; word f55;
word f56; word f57; word f58; word f59[3];
word f62; word f63; word f64; word f65;
word f66; word f67; word f68[3]; word f71;
word f72; word f73; word f74; word f75;
word f76; word f77[2]; word f79; word f80;
word f81[3]; word f84; word f85; word f86;
word f87; word f88; word f89; word f90[2];
word f92; word f93; word f94; word f95;
word f96; word f97[9];
} globalframe = {
{0}, (word) BitmapChanged←P480, 0, (word) RunOneText←P420,
0, (word) InitFonts←P300, 0, (word) CreateDemoWidget←P240,
0, (word) SetWaitHit←P180, 0, (word) ResetHit←P120,
0, (word) MoreHit←P60, 0, (word) X11TextDemo←P0,
{0}, (word) 2147483648, (word) 2147483648, (word) 2147483648,
(word) 2147483648, (word) 2147483648, (word) 3, {0},
(word) 2147483648, (word) 2147483648, (word) 220, (word) 320,
(word) 1, (word) 3, {0}, (word) 2147483648,
(word) 2147483648, (word) 2147483648, (word) 2147483648, (word) 2147483648,
(word) 3, {0}, (word) 4294967295, (word) 4294967295,
{0}, (word) 2147483648, (word) 2147483648, (word) 2147483648,
(word) 2147483648, (word) 2147483648, (word) 3, {0},
(word) 2147483648, (word) 2147483648, (word) 2147483648, (word) 2147483648,
(word) 2147483648, {0}
};
static void NoName←Q840()
{
register ptr gf←c0116 = (ptr) &globalframe;
word var←c19696;
(* (( (ptr) gf←c0116)+10) ) = (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2);
(* (( (ptr) gf←c0116)+11) ) = (word) XR←GetTypeIndex((word) &string3, 0, (word) &string4);
(* (( (ptr) gf←c0116)+15) ) = (word) XR←GetTypeIndex((word) &string5, 0, (word) &string2);
(* (( (ptr) gf←c0116)+16) ) = (word) XR←GetTypeIndex((word) &string6, 0, (word) &string7);
(* (( (ptr) gf←c0116)+18) ) = (word) XR←GetTypeIndex((word) &string8, 0, (word) &string9);
(* (( (ptr) gf←c0116)+19) ) = (word) XR←GetTypeIndexS((word) (&string10));
(* (( (ptr) gf←c0116)+20) ) = (word) XR←GetTypeIndex((word) &string11, 0, (word) &string12);
(* (ptr) (( (bPt) gf←c0116)+84) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0116)+10) ), (word) &string13);
(* (ptr) (( (bPt) gf←c0116)+88) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0116)+15) ), (word) &string14);
(* (ptr) (( (bPt) gf←c0116)+92) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0116)+15) ), (word) &string15);
(* (ptr) (( (bPt) gf←c0116)+96) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0116)+10) ), (word) &string15);
(* (ptr) (( (bPt) gf←c0116)+100) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0116)+15) ), (word) &string16);
(* (ptr) (( (bPt) gf←c0116)+104) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0116)+15) ), (word) &string17);
(* (ptr) (( (bPt) gf←c0116)+108) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0116)+10) ), (word) &string17);
(* (ptr) (( (bPt) gf←c0116)+112) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0116)+15) ), (word) &string18);
(* (ptr) (( (bPt) gf←c0116)+116) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0116)+15) ), (word) &string19);
(* (ptr) (( (bPt) gf←c0116)+120) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0116)+15) ), (word) &string20);
(* (ptr) (( (bPt) gf←c0116)+124) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0116)+15) ), (word) &string21);
(* (ptr) (( (bPt) gf←c0116)+128) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0116)+15) ), (word) &string13);
(* (ptr) (( (bPt) gf←c0116)+132) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0116)+15) ), (word) &string22);
(* (ptr) (( (bPt) gf←c0116)+136) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0116)+10) ), (word) &string18);
(* (ptr) (( (bPt) gf←c0116)+140) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0116)+15) ), (word) &string23);
(void) XR←DeclareGlobalFrame((word) "X11TextDemo", &globalframe, (word) XR←GetTypeIndex((word) &string24, 0, (word) &string25)
, (word) (( (bPt) gf←c0116)+200)/* var←c18352 */ );
var←c19696 = (word) XR←ImportInterface((word) "Commander", (word) XR←GetTypeIndexS((word) (&string26)), 3);
(* (( (ptr) gf←c0116)+97)/* var←c18768 */ ) = var←c19696;
(void) XR←ImportProcS(var←c19696, 1310725);
var←c19696 = (word) XR←ImportInterface((word) "Imager", (word) XR←GetTypeIndexS((word) (&string27)), 84);
(* (( (ptr) gf←c0116)+105)/* var←c19440 */ ) = var←c19696;
(void) XR←ImportProcS(var←c19696, 1319429);
(void) XR←ImportProcS(var←c19696, 530946);
(void) XR←ImportProcS(var←c19696, 790786);
(void) XR←ImportProcS(var←c19696, 536578);
var←c19696 = (word) XR←ImportInterface((word) "ImagerBackdoor", (word) XR←GetTypeIndexS((word) (&string28)), 42);
(* (( (ptr) gf←c0116)+104)/* var←c19376 */ ) = var←c19696;
(void) XR←ImportProcS(var←c19696, 268700417);
var←c19696 = (word) XR←ImportInterface((word) "ImagerFont", (word) XR←GetTypeIndexS((word) (&string29)), 26);
(* (( (ptr) gf←c0116)+101)/* var←c19184 */ ) = var←c19696;
(void) XR←ImportProcS(var←c19696, 67634178);
(void) XR←ImportProcS(var←c19696, 67634690);
var←c19696 = (word) XR←ImportInterface((word) "ImagerTransformation", (word) XR←GetTypeIndexS((word) (&string30)), 55);
(* (( (ptr) gf←c0116)+102)/* var←c19312 */ ) = var←c19696;
(void) XR←ImportProcS(var←c19696, 67372289);
var←c19696 = (word) XR←ImportInterface((word) "Process", (word) XR←GetTypeIndexS((word) (&string31)), 22);
(* (( (ptr) gf←c0116)+98)/* var←c18832 */ ) = var←c19696;
(void) XR←ImportProcS(var←c19696, 4864);
(void) XR←ImportProcS(var←c19696, 264449);
(void) XR←ImportProcS(var←c19696, 526081);
var←c19696 = (word) XR←ImportInterface((word) "Random", (word) XR←GetTypeIndexS((word) (&string32)), 4);
(* (( (ptr) gf←c0116)+103)/* var←c19344 */ ) = var←c19696;
(void) XR←ImportProcS(var←c19696, 67895811);
var←c19696 = (word) XR←ImportInterface((word) "XTkBitmapWidgets", (word) XR←GetTypeIndexS((word) (&string33)), 8);
(* (( (ptr) gf←c0116)+100)/* var←c18928 */ ) = var←c19696;
(void) XR←ImportProcS(var←c19696, 1574404);
(void) XR←ImportProcS(var←c19696, 525314);
(void) XR←ImportProcS(var←c19696, 67634434);
(void) XR←ImportProcS(var←c19696, 69992451);
var←c19696 = (word) XR←ImportInterface((word) "XTkWidgets", (word) XR←GetTypeIndexS((word) (&string34)), 52);
(* (( (ptr) gf←c0116)+99)/* var←c18896 */ ) = var←c19696;
(void) XR←ImportProcS(var←c19696, 2099460);
(void) XR←ImportProcS(var←c19696, 526338);
(void) XR←ImportProcS(var←c19696, 69998595);
(void) XR←ImportProcS(var←c19696, 72097800);
(void) XR←ImportProcS(var←c19696, 71837959);
(void) XR←ImportProcS(var←c19696, 72352268);
}
static void X11TextDemo←P0(formal←c031, formal←c030)
word formal←c031;
word formal←c030;
{
register ptr gf←c19728 = (ptr) &globalframe;
/* X11TextDemo: */
SOURCE(157, 4098)
/* 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 */
/* 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 */
/* moved to installation proc */
/* moved to installation proc */
/* moved to installation proc */
/* moved to installation proc */
/* moved to installation proc */
SOURCE(4164, 91)
{
word pd35;
pd35 = (* (( (ptr) (* (( (ptr) gf←c19728)+97)/* var←c18768 */ ))+4) );
(void) ( *( (fPt) ((* (ptr) pd35 ))))((* (( (ptr) gf←c19728)+32) ), (word) (( (bPt) gf←c19728)+168)/* var←c18224 */ , (* (
( (ptr) gf←c19728)+25) ), 0, 1, pd35);
};
}
static void MoreHit←P60(widget←v6588, registerData←v6616, callData←v6644, event←v6672)
word widget←v6588;
word registerData←v6616;
word callData←v6644;
word event←v6672;
{
register ptr gf←c19760 = (ptr) &globalframe;
word i←v3964;
/* MoreHit: */
SOURCE(539, 144)
SOURCE(581, 34)
i←v3964 = XR←Narrow(registerData←v6616, (* (( (ptr) gf←c19760)+18) ));
SOURCE(617, 21)
(* (( (ptr) i←v3964)+2) ) = ((* (( (ptr) i←v3964)+2) ) + 1);
SOURCE(648, 35)
SOURCE(649, 34)
{
W2 var←c18800;
{
W2 var←c039;
word var←c038;
var←c038 = XR←ExtensionAlloc(5);
{
word tmpAddr36;
tmpAddr36 = (word) var←c038;
(* (ptr) tmpAddr36 ) = ( ((word) (fPt) NoName←Q900) );
(* (( (ptr) tmpAddr36) + 1) ) = 0;
(* (( (ptr) tmpAddr36) + 2) ) = (word) (( (bPt) gf←c19760)+152)/* var←c18160 */ ;
(* (( (ptr) tmpAddr36) + 3) ) = 0;
(* (( (ptr) tmpAddr36) + 4) ) = i←v3964;
};
(void) XR←Fork((word) &var←c039, var←c038);
var←c18800 = var←c039;
};
{
word pd37;
pd37 = (* (( (ptr) (* (( (ptr) gf←c19760)+98)/* var←c18832 */ ))+11) );
(void) ( *( (fPt) ((* (ptr) pd37 ))))(var←c18800, pd37);
};
};
}
static void ResetHit←P120(widget←v6732, registerData←v6760, callData←v6788, event←v6816)
word widget←v6732;
word registerData←v6760;
word callData←v6788;
word event←v6816;
{
register ptr gf←c19792 = (ptr) &globalframe;
word i←v4008;
/* ResetHit: */
SOURCE(689, 108)
SOURCE(732, 34)
i←v4008 = XR←Narrow(registerData←v6760, (* (( (ptr) gf←c19792)+18) ));
SOURCE(768, 11)
(* (( (ptr) i←v4008)+2) ) = 0;
SOURCE(781, 16)
(* (( (ptr) i←v4008)+1) ) = XR←NewObject(4, (* (( (ptr) gf←c19792)+19) ));
}
static void SetWaitHit←P180(widget←v6876, registerData←v6904, callData←v6932, event←v6960)
word widget←v6876;
word registerData←v6904;
word callData←v6932;
word event←v6960;
{
register ptr gf←c19824 = (ptr) &globalframe;
word i←v4052;
/* SetWaitHit: */
SOURCE(803, 100)
SOURCE(848, 34)
i←v4052 = XR←Narrow(registerData←v6904, (* (( (ptr) gf←c19824)+18) ));
SOURCE(884, 19)
(* (ptr) i←v4052 ) = callData←v6932;
}
static void CreateDemoWidget←P240(formal←c074, cmd←v7020)
word formal←c074;
word cmd←v7020;
{
register ptr gf←c19856 = (ptr) &globalframe;
word result←v7064;
word msg←v7092;
word i←v4096;
word shell←v4124;
word bitmap←v4152;
word toggle←v4180;
word more←v4208;
word reset←v4236;
word contents←v4264;
/* CreateDemoWidget: */
SOURCE(909, 924)
SOURCE(909, 924)
result←v7064 = 0;
SOURCE(909, 924)
msg←v7092 = 0;
SOURCE(953, 50)
{
word var←c18864;
var←c18864 = XR←NewObject(16, (* (( (ptr) gf←c19856)+18) ));
(* (ptr) var←c18864 ) = (* (( (ptr) gf←c19856)+34) );
(* (( (ptr) gf←c19856)+8)/* debuggingInstance←v3084 */ ) = var←c18864;
};
i←v4096 = (* (( (ptr) gf←c19856)+8)/* debuggingInstance←v3084 */ );
SOURCE(1005, 124)
{
W20 var←c059;
(* (W9Pt) (word) &var←c059 ) = (* (W9Pt) (( (ptr) gf←c19856)+52)/* var←c18416 */ );
(* (( (ptr) (word) &var←c059) + 9) ) = 0;
(* (( (ptr) (word) &var←c059) + 10) ) = (* (( (ptr) gf←c19856)+22) );
(* (( (ptr) (word) &var←c059) + 11) ) = 0;
(* (( (ptr) (word) &var←c059) + 12) ) = (* (( (ptr) gf←c19856)+21) );
(* (( (ptr) (word) &var←c059) + 13) ) = 0;
(* (( (ptr) (word) &var←c059) + 14) ) = 0;
(* (( (ptr) (word) &var←c059) + 15) ) = 0;
(* (( (ptr) (word) &var←c059) + 16) ) = 0;
(* (( (ptr) (word) &var←c059) + 17) ) = 1;
(* (( (ptr) (word) &var←c059) + 18) ) = 1;
(* (( (ptr) (word) &var←c059) + 19) ) = 1;
{
word pd38;
pd38 = (* (( (ptr) (* (( (ptr) gf←c19856)+99)/* var←c18896 */ ))+6) );
shell←v4124 = (word) ( *( (fPt) ((* (ptr) pd38 ))))((word) (&var←c059), pd38);
};
};
SOURCE(1131, 157)
{
word pd39;
pd39 = (* (( (ptr) (* (( (ptr) gf←c19856)+100)/* var←c18928 */ ))+4) );
bitmap←v4152 = (word) ( *( (fPt) ((* (ptr) pd39 ))))((* (W9Pt) (( (ptr) gf←c19856)+61)/* var←c18480 */ ), (word) (( (bPt) gf←c19856)+144)
/* var←c18128 */ , i←v4096, pd39);
};
(* (( (ptr) i←v4096)+3) ) = bitmap←v4152;
SOURCE(1290, 183)
{
word var←c18992;
{
word var←c19024;
word var←c19056;
var←c19024 = XR←NewObject(12, (* (( (ptr) gf←c19856)+20) ));
var←c19056 = var←c19024;
(* (ptr) var←c19056 ) = (* (( (ptr) gf←c19856)+29) );
(* (( (ptr) var←c19056)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c19856)+20) ));
var←c19056 = (* (( (ptr) var←c19056)+2) );
(* (ptr) var←c19056 ) = (* (( (ptr) gf←c19856)+28) );
(* (( (ptr) var←c19056)+1) ) = (* (( (ptr) gf←c19856)+34) );
(* (( (ptr) var←c19056)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c19856)+20) ));
var←c19056 = (* (( (ptr) var←c19056)+2) );
(* (ptr) var←c19056 ) = (* (( (ptr) gf←c19856)+26) );
(* (( (ptr) var←c19056)+1) ) = (* (( (ptr) gf←c19856)+27) );
(* (( (ptr) var←c19056)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c19856)+20) ));
var←c19056 = (* (( (ptr) var←c19056)+2) );
(* (ptr) var←c19056 ) = (* (( (ptr) gf←c19856)+23) );
(* (( (ptr) var←c19056)+1) ) = (* (( (ptr) gf←c19856)+24) );
var←c18992 = var←c19024;
};
{
W18 var←c065;
(* (W9Pt) (word) &var←c065 ) = (* (W9Pt) (( (ptr) gf←c19856)+70)/* var←c18544 */ );
(* (( (ptr) (word) &var←c065) + 9) ) = var←c18992;
(* (( (ptr) (word) &var←c065) + 10) ) = 1;
(* (( (ptr) (word) &var←c065) + 11) ) = (word) (( (bPt) gf←c19856)+176)/* var←c18256 */ ;
(* (( (ptr) (word) &var←c065) + 12) ) = i←v4096;
(* (( (ptr) (word) &var←c065) + 13) ) = 0;
(* (W4Pt) (( (ptr) (word) &var←c065) + 14) ) = (* (W4Pt) (( (ptr) gf←c19856)+79)/* var←c18608 */ );
{
word pd40;
pd40 = (* (( (ptr) (* (( (ptr) gf←c19856)+99)/* var←c18896 */ ))+45) );
toggle←v4180 = (word) ( *( (fPt) ((* (ptr) pd40 ))))((word) (&var←c065), pd40);
};
};
};
SOURCE(1475, 100)
{
W19 var←c067;
(* (W9Pt) (word) &var←c067 ) = (* (W9Pt) (( (ptr) gf←c19856)+70)/* var←c18544 */ );
(* (( (ptr) (word) &var←c067) + 9) ) = (* (( (ptr) gf←c19856)+30) );
(* (W4Pt) (( (ptr) (word) &var←c067) + 10) ) = (* (W4Pt) (( (ptr) gf←c19856)+79)/* var←c18608 */ );
(* (( (ptr) (word) &var←c067) + 14) ) = (word) (( (bPt) gf←c19856)+192)/* var←c18320 */ ;
(* (( (ptr) (word) &var←c067) + 15) ) = i←v4096;
(* (( (ptr) (word) &var←c067) + 16) ) = 0;
(* (( (ptr) (word) &var←c067) + 17) ) = 0;
(* (( (ptr) (word) &var←c067) + 18) ) = 0;
{
word pd41;
pd41 = (* (( (ptr) (* (( (ptr) gf←c19856)+99)/* var←c18896 */ ))+36) );
more←v4208 = (word) ( *( (fPt) ((* (ptr) pd41 ))))((word) (&var←c067), pd41);
};
};
SOURCE(1577, 98)
{
W19 var←c069;
(* (W9Pt) (word) &var←c069 ) = (* (W9Pt) (( (ptr) gf←c19856)+70)/* var←c18544 */ );
(* (( (ptr) (word) &var←c069) + 9) ) = (* (( (ptr) gf←c19856)+31) );
(* (W4Pt) (( (ptr) (word) &var←c069) + 10) ) = (* (W4Pt) (( (ptr) gf←c19856)+79)/* var←c18608 */ );
(* (( (ptr) (word) &var←c069) + 14) ) = (word) (( (bPt) gf←c19856)+184)/* var←c18288 */ ;
(* (( (ptr) (word) &var←c069) + 15) ) = i←v4096;
(* (( (ptr) (word) &var←c069) + 16) ) = 0;
(* (( (ptr) (word) &var←c069) + 17) ) = 0;
(* (( (ptr) (word) &var←c069) + 18) ) = 0;
{
word pd42;
pd42 = (* (( (ptr) (* (( (ptr) gf←c19856)+99)/* var←c18896 */ ))+36) );
reset←v4236 = (word) ( *( (fPt) ((* (ptr) pd42 ))))((word) (&var←c069), pd42);
};
};
SOURCE(1677, 81)
{
word var←c19088;
{
word var←c19120;
word var←c19152;
var←c19120 = XR←NewObject(8, (* (( (ptr) gf←c19856)+16) ));
var←c19152 = var←c19120;
(* (ptr) var←c19152 ) = toggle←v4180;
(* (( (ptr) var←c19152)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c19856)+16) ));
var←c19152 = (* (( (ptr) var←c19152)+1) );
(* (ptr) var←c19152 ) = more←v4208;
(* (( (ptr) var←c19152)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c19856)+16) ));
var←c19152 = (* (( (ptr) var←c19152)+1) );
(* (ptr) var←c19152 ) = reset←v4236;
(* (( (ptr) var←c19152)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c19856)+16) ));
var←c19152 = (* (( (ptr) var←c19152)+1) );
(* (ptr) var←c19152 ) = bitmap←v4152;
var←c19088 = var←c19120;
};
{
word pd43;
pd43 = (* (( (ptr) (* (( (ptr) gf←c19856)+99)/* var←c18896 */ ))+28) );
contents←v4264 = (word) ( *( (fPt) ((* (ptr) pd43 ))))((* (W9Pt) (( (ptr) gf←c19856)+83)/* var←c18672 */ ), var←c19088, (word) -1, pd43)
;
};
};
SOURCE(1760, 41)
{
word pd44;
pd44 = (* (( (ptr) (* (( (ptr) gf←c19856)+99)/* var←c18896 */ ))+12) );
(void) ( *( (fPt) ((* (ptr) pd44 ))))(shell←v4124, contents←v4264, pd44);
};
SOURCE(1803, 30)
{
word pd45;
pd45 = (* (( (ptr) (* (( (ptr) gf←c19856)+99)/* var←c18896 */ ))+13) );
(void) ( *( (fPt) ((* (ptr) pd45 ))))(shell←v4124, (* (W5Pt) (( (ptr) gf←c19856)+92)/* var←c18736 */ ), 0, 1, pd45);
};
/* removed tail goto */
(* (ptr) formal←c074 ) = result←v7064;
(* (( (ptr) formal←c074)+1) ) = msg←v7092;
return;
}
static word InitFonts←P300()
{
register ptr gf←c19888 = (ptr) &globalframe;
word f←v3744;
word font←v4308;
/* InitFonts: */
SOURCE(1927, 288)
SOURCE(1927, 288)
f←v3744 = 0;
SOURCE(1969, 69)
{
word pd46;
pd46 = (* (( (ptr) (* (( (ptr) gf←c19888)+101)/* var←c19184 */ ))+10) );
font←v4308 = (word) ( *( (fPt) ((* (ptr) pd46 ))))((* (( (ptr) gf←c19888)+33) ), (* (ptr) &fc47 ), pd46);
};
SOURCE(2040, 42)
f←v3744 = XR←NewObject(772, (* (( (ptr) gf←c19888)+11) ));
SOURCE(2084, 131)
{
register word i←v4388 = 0;
if (( (int)i←v4388 > (int)192)) {
goto lab←L100001;
};
lab←L100004: ;
{
word angle←v4432;
SOURCE(2114, 33)
{
word x49;
word x51;
*(float*)&angle←v4432 = ((
x49 = (* (ptr) &fc48 ), *(float*)&x49
) / (
x51 = (* (ptr) &fc50 ), *(float*)&x51
)) * (float)(int)i←v4388;
};
SOURCE(2149, 66)
{
word var←c19248;
{
word var←c19280;
{
word pd52;
pd52 = (* (( (ptr) (* (( (ptr) gf←c19888)+102)/* var←c19312 */ ))+9) );
var←c19280 = (word) ( *( (fPt) ((* (ptr) pd52 ))))(angle←v4432, pd52);
};
{
word pd53;
pd53 = (* (( (ptr) (* (( (ptr) gf←c19888)+101)/* var←c19184 */ ))+8) );
var←c19248 = (word) ( *( (fPt) ((* (ptr) pd53 ))))(font←v4308, var←c19280, pd53);
};
};
(* (( (ptr) f←v3744)+BCK(i←v4388, 193)) ) = var←c19248;
};
};
if (( (int)i←v4388 >= (int)192)) {
goto lab←L100001;
};
i←v4388 = (i←v4388 + 1);
goto lab←L100004;
lab←L100001: ;
};
SOURCE(1927, 288)
return(f←v3744);
}
static void RunOneText←P420(i←v3936)
word i←v3936;
{
register ptr gf←c19920 = (ptr) &globalframe;
word key←v4476;
word rope←v4504;
word bitmap←v4532;
word ct←v4560;
word font←v4588;
word dx←v4616;
word dy←v4644;
word a←v4672 = 0;
word da←v4700;
word oldx←v4728;
word oldy←v4756;
/* RunOneText: */
SOURCE(2329, 1445)
SOURCE(2364, 16)
key←v4476 = (* (( (ptr) i←v3936)+1) );
SOURCE(2382, 24)
rope←v4504 = (* (( (ptr) gf←c19920)+35) );
SOURCE(2408, 25)
bitmap←v4532 = (* (( (ptr) i←v3936)+3) );
SOURCE(2435, 59)
{
word pd54;
pd54 = (* (( (ptr) (* (( (ptr) gf←c19920)+100)/* var←c18928 */ ))+9) );
ct←v4560 = (word) ( *( (fPt) ((* (ptr) pd54 ))))(bitmap←v4532, 1, pd54);
};
SOURCE(2496, 69)
{
word pd55;
pd55 = (* (( (ptr) (* (( (ptr) gf←c19920)+101)/* var←c19184 */ ))+10) );
font←v4588 = (word) ( *( (fPt) ((* (ptr) pd55 ))))((* (( (ptr) gf←c19920)+33) ), (* (ptr) &fc56 ), pd55);
};
SOURCE(2567, 48)
{
word pd57;
float tf58;
pd57 = (* (( (ptr) (* (( (ptr) gf←c19920)+103)/* var←c19344 */ ))+6) );
dx←v4616 = (
tf58 = (float)(int)(word) ( *( (fPt) ((* (ptr) pd57 ))))(0, (word) -100, 100, pd57), *(word*)&tf58
);
};
SOURCE(2617, 48)
{
word pd59;
float tf60;
pd59 = (* (( (ptr) (* (( (ptr) gf←c19920)+103)/* var←c19344 */ ))+6) );
dy←v4644 = (
tf60 = (float)(int)(word) ( *( (fPt) ((* (ptr) pd59 ))))(0, (word) -100, 100, pd59), *(word*)&tf60
);
};
SOURCE(2679, 46)
{
word pd61;
pd61 = (* (( (ptr) (* (( (ptr) gf←c19920)+103)/* var←c19344 */ ))+6) );
da←v4700 = ((word) ( *( (fPt) ((* (ptr) pd61 ))))(0, 0, 2, pd61) + 1);
};
SOURCE(2727, 20)
oldx←v4728 = (* (ptr) &fc62 );
oldy←v4756 = (* (ptr) &fc62 );
SOURCE(2750, 12)
{
word x63;
word x64;
*(float*)&dx←v4616 = (
x63 = dx←v4616, *(float*)&x63
) / (
x64 = (* (ptr) &fc56 ), *(float*)&x64
);
};
SOURCE(2764, 12)
{
word x65;
word x66;
*(float*)&dy←v4644 = (
x65 = dy←v4644, *(float*)&x65
) / (
x66 = (* (ptr) &fc56 ), *(float*)&x66
);
};
SOURCE(2778, 37)
if (((* (( (ptr) gf←c19920)+9)/* fonts←v3336 */ ) == 0)) {
SOURCE(2796, 19)
(* (( (ptr) gf←c19920)+9)/* fonts←v3336 */ ) = (word) InitFonts←P300();
};
SOURCE(2817, 957)
if ((ct←v4560 != 0)) {
SOURCE(2832, 952)
{
W4 r←v4812;
word x←v4840;
word y←v4868;
word var←c19408;
word c←v18080;
SOURCE(2834, 50)
{
word pd67;
pd67 = (* (( (ptr) (* (( (ptr) gf←c19920)+104)/* var←c19376 */ ))+15) );
(void) ( *( (fPt) ((* (ptr) pd67 ))))((word) &r←v4812, ct←v4560, pd67);
};
SOURCE(2886, 15)
{
word x68;
word x70;
*(float*)&x←v4840 = (
x68 = r←v4812.f2, *(float*)&x68
) / (
x70 = (* (ptr) &fc69 ), *(float*)&x70
);
};
SOURCE(2903, 15)
{
word x71;
word x72;
*(float*)&y←v4868 = (
x71 = r←v4812.f3, *(float*)&x71
) / (
x72 = (* (ptr) &fc69 ), *(float*)&x72
);
};
SOURCE(2920, 47)
{
word pd73;
pd73 = (* (( (ptr) (* (( (ptr) gf←c19920)+98)/* var←c18832 */ ))+13) );
(void) ( *( (fPt) ((* (ptr) pd73 ))))(1, pd73);
};
SOURCE(2969, 805)
lab←L100007: ;
{
word tc74;
word tc75;
if ((key←v4476 == (* (( (ptr) i←v3936)+1) ))) {
c←v18080 = (* (( (ptr) bitmap←v4532)+34) );
if ((c←v18080 != 0)) {
var←c19408 = (0 != (* (( (ptr) c←v18080)+15) ));
}
else {
var←c19408 = 0;
};
tc75 = (word) (0 != var←c19408);
}
else {
tc75 = (word) 0;
};
if (tc75) {
tc74 = (word) ((* (( (ptr) bitmap←v4532)+37) ) == 0);
}
else {
tc74 = (word) 0;
};
if (tc74) {
}
else {
goto lab←L100005;
};
};
SOURCE(3052, 10)
{
word x76;
word x77;
*(float*)&x←v4840 = (
x76 = x←v4840, *(float*)&x76
) + (
x77 = dx←v4616, *(float*)&x77
);
};
SOURCE(3064, 87)
{
word x78;
word x79;
if (((
x78 = dx←v4616, *(float*)&x78
) > (
x79 = (* (ptr) &fc62 ), *(float*)&x79
))) {
SOURCE(3078, 33)
{
word x80;
word x81;
if (((
x80 = x←v4840, *(float*)&x80
) > (
x81 = r←v4812.f2, *(float*)&x81
))) {
SOURCE(3093, 6)
{
word x82;
*(float*)&dx←v4616 = - (
x82 = dx←v4616, *(float*)&x82
);
};
SOURCE(3101, 10)
{
word x83;
word x84;
word x85;
*(float*)&x←v4840 = (
x83 = x←v4840, *(float*)&x83
) + ((
x84 = (* (ptr) &fc69 ), *(float*)&x84
) * (
x85 = dx←v4616, *(float*)&x85
));
};
};
};
}
else {
SOURCE(3120, 31)
{
word x86;
word x87;
if (((
x86 = x←v4840, *(float*)&x86
) < (
x87 = (* (ptr) &fc62 ), *(float*)&x87
))) {
SOURCE(3133, 6)
{
word x88;
*(float*)&dx←v4616 = - (
x88 = dx←v4616, *(float*)&x88
);
};
SOURCE(3141, 10)
{
word x89;
word x90;
word x91;
*(float*)&x←v4840 = (
x89 = x←v4840, *(float*)&x89
) + ((
x90 = (* (ptr) &fc69 ), *(float*)&x90
) * (
x91 = dx←v4616, *(float*)&x91
));
};
};
};
};
};
SOURCE(3155, 8)
{
word x92;
word x93;
*(float*)&y←v4868 = (
x92 = y←v4868, *(float*)&x92
) + (
x93 = dy←v4644, *(float*)&x93
);
};
SOURCE(3165, 87)
{
word x94;
word x95;
if (((
x94 = dy←v4644, *(float*)&x94
) > (
x95 = (* (ptr) &fc62 ), *(float*)&x95
))) {
SOURCE(3179, 33)
{
word x96;
word x97;
if (((
x96 = y←v4868, *(float*)&x96
) > (
x97 = r←v4812.f3, *(float*)&x97
))) {
SOURCE(3194, 6)
{
word x98;
*(float*)&dy←v4644 = - (
x98 = dy←v4644, *(float*)&x98
);
};
SOURCE(3202, 10)
{
word x99;
word x100;
word x101;
*(float*)&y←v4868 = (
x99 = y←v4868, *(float*)&x99
) + ((
x100 = (* (ptr) &fc69 ), *(float*)&x100
) * (
x101 = dy←v4644, *(float*)&x101
));
};
};
};
}
else {
SOURCE(3221, 31)
{
word x102;
word x103;
if (((
x102 = y←v4868, *(float*)&x102
) < (
x103 = (* (ptr) &fc62 ), *(float*)&x103
))) {
SOURCE(3234, 6)
{
word x104;
*(float*)&dy←v4644 = - (
x104 = dy←v4644, *(float*)&x104
);
};
SOURCE(3242, 10)
{
word x105;
word x106;
word x107;
*(float*)&y←v4868 = (
x105 = y←v4868, *(float*)&x105
) + ((
x106 = (* (ptr) &fc69 ), *(float*)&x106
) * (
x107 = dy←v4644, *(float*)&x107
));
};
};
};
};
};
SOURCE(3262, 33)
{
word pd108;
pd108 = (* (( (ptr) (* (( (ptr) gf←c19920)+105)/* var←c19440 */ ))+52) );
(void) ( *( (fPt) ((* (ptr) pd108 ))))(ct←v4560, (* (ptr) (* (( (ptr) (* (( (ptr) gf←c19920)+105)/* var←c19440 */ ))+55)
) ), pd108);
};
SOURCE(3297, 30)
{
W2 var←c19472;
var←c19472.f0 = oldx←v4728;
var←c19472.f1 = oldy←v4756;
{
word pd109;
pd109 = (* (( (ptr) (* (( (ptr) gf←c19920)+105)/* var←c19440 */ ))+21) );
(void) ( *( (fPt) ((* (ptr) pd109 ))))(ct←v4560, var←c19472, pd109);
};
};
SOURCE(3330, 40)
{
word pd110;
word idx111;
pd110 = (* (( (ptr) (* (( (ptr) gf←c19920)+105)/* var←c19440 */ ))+30) );
(void) ( *( (fPt) ((* (ptr) pd110 ))))(ct←v4560, (* (( (ptr) (* (( (ptr) gf←c19920)+9)/* fonts←v3336 */ ))+(
idx111 = (word) IOP2( % , (int)a←v4672, (int)193),
BCK(idx111, 193)
)) ), pd110);
};
SOURCE(3372, 25)
{
word pd112;
pd112 = (* (( (ptr) (* (( (ptr) gf←c19920)+105)/* var←c19440 */ ))+38) );
(void) ( *( (fPt) ((* (ptr) pd112 ))))(ct←v4560, rope←v4504, 0, 2147483647, 0, pd112);
};
SOURCE(3399, 24)
a←v4672 = IOP2( % , (int)(a←v4672 + da←v4700), (int)193);
SOURCE(3425, 33)
{
word pd113;
pd113 = (* (( (ptr) (* (( (ptr) gf←c19920)+105)/* var←c19440 */ ))+52) );
(void) ( *( (fPt) ((* (ptr) pd113 ))))(ct←v4560, (* (ptr) (* (( (ptr) (* (( (ptr) gf←c19920)+105)/* var←c19440 */ ))+54)
) ), pd113);
};
SOURCE(3460, 24)
{
W2 var←c19504;
var←c19504.f0 = x←v4840;
var←c19504.f1 = y←v4868;
{
word pd114;
pd114 = (* (( (ptr) (* (( (ptr) gf←c19920)+105)/* var←c19440 */ ))+21) );
(void) ( *( (fPt) ((* (ptr) pd114 ))))(ct←v4560, var←c19504, pd114);
};
};
SOURCE(3486, 8)
oldx←v4728 = x←v4840;
SOURCE(3496, 8)
oldy←v4756 = y←v4868;
SOURCE(3506, 40)
{
word pd115;
word idx116;
pd115 = (* (( (ptr) (* (( (ptr) gf←c19920)+105)/* var←c19440 */ ))+30) );
(void) ( *( (fPt) ((* (ptr) pd115 ))))(ct←v4560, (* (( (ptr) (* (( (ptr) gf←c19920)+9)/* fonts←v3336 */ ))+(
idx116 = (word) IOP2( % , (int)a←v4672, (int)193),
BCK(idx116, 193)
)) ), pd115);
};
SOURCE(3548, 25)
{
word pd117;
pd117 = (* (( (ptr) (* (( (ptr) gf←c19920)+105)/* var←c19440 */ ))+38) );
(void) ( *( (fPt) ((* (ptr) pd117 ))))(ct←v4560, rope←v4504, 0, 2147483647, 0, pd117);
};
SOURCE(3580, 194)
{
word var←c19536;
var←c19536 = (* (ptr) i←v3936 );
if ((var←c19536 == (* (( (ptr) gf←c19920)+34) ))) {
SOURCE(3611, 15)
{
word pd119;
pd119 = (* (( (ptr) (* (( (ptr) gf←c19920)+98)/* var←c18832 */ ))+23) );
(void) ( *( (fPt) ((* (ptr) pd119 ))))(pd119);
};
goto endif0118;
};
if ((var←c19536 == (* (( (ptr) gf←c19920)+27) ))) {
SOURCE(3639, 36)
{
word pd120;
pd120 = (* (( (ptr) (* (( (ptr) gf←c19920)+100)/* var←c18928 */ ))+8) );
(void) ( *( (fPt) ((* (ptr) pd120 ))))(bitmap←v4532, 0, pd120);
};
goto endif0118;
};
if ((var←c19536 == (* (( (ptr) gf←c19920)+24) ))) {
SOURCE(3689, 35)
{
word pd121;
pd121 = (* (( (ptr) (* (( (ptr) gf←c19920)+100)/* var←c18928 */ ))+8) );
(void) ( *( (fPt) ((* (ptr) pd121 ))))(bitmap←v4532, 1, pd121);
};
goto endif0118;
};
SOURCE(3738, 36)
{
word pd122;
pd122 = (* (( (ptr) (* (( (ptr) gf←c19920)+100)/* var←c18928 */ ))+8) );
(void) ( *( (fPt) ((* (ptr) pd122 ))))(bitmap←v4532, 0, pd122);
};
goto endif0118;
endif0118: ;
};
goto lab←L100007;
lab←L100005: ;
};
};
}
static void BitmapChanged←P480(widget←v7152, reason←v7180, data←v7208)
word widget←v7152;
word reason←v7180;
word data←v7208;
{
register ptr gf←c19952 = (ptr) &globalframe;
word i←v4912;
/* BitmapChanged: */
SOURCE(3791, 355)
SOURCE(3843, 26)
i←v4912 = XR←Narrow(data←v7208, (* (( (ptr) gf←c19952)+18) ));
SOURCE(3871, 16)
(* (( (ptr) i←v4912)+1) ) = XR←NewObject(4, (* (( (ptr) gf←c19952)+19) ));
SOURCE(3889, 257)
switch (reason←v7180) {
case 0: case 1: case 2:
SOURCE(3950, 120)
{
W2 var←c19568;
W2 var←c19600;
var←c19568.f0 = (* (( (ptr) widget←v7152)+42) );
var←c19568.f1 = (* (( (ptr) widget←v7152)+41) );
var←c19600.f0 = 0;
var←c19600.f1 = 0;
{
word pd123;
pd123 = (* (( (ptr) (* (( (ptr) gf←c19952)+100)/* var←c18928 */ ))+10) );
(void) ( *( (fPt) ((* (ptr) pd123 ))))(widget←v7152, var←c19568, 1, var←c19600, pd123);
};
};
SOURCE(4073, 73)
{
register word n←v4956 = 0;
register word noName←c19632;
noName←c19632 = (* (( (ptr) i←v4912)+2) );
if (( (int)n←v4956 >= (int)noName←c19632)) {
goto lab←L100009;
};
lab←L100012: ;
SOURCE(4111, 35)
SOURCE(4112, 34)
{
W2 var←c19664;
{
W2 var←c0112;
word var←c0111;
var←c0111 = XR←ExtensionAlloc(5);
{
word tmpAddr124;
tmpAddr124 = (word) var←c0111;
(* (ptr) tmpAddr124 ) = ( ((word) (fPt) NoName←Q960) );
(* (( (ptr) tmpAddr124) + 1) ) = 0;
(* (( (ptr) tmpAddr124) + 2) ) = (word) (( (bPt) gf←c19952)+152)/* var←c18160 */ ;
(* (( (ptr) tmpAddr124) + 3) ) = 0;
(* (( (ptr) tmpAddr124) + 4) ) = i←v4912;
};
(void) XR←Fork((word) &var←c0112, var←c0111);
var←c19664 = var←c0112;
};
{
word pd125;
pd125 = (* (( (ptr) (* (( (ptr) gf←c19952)+98)/* var←c18832 */ ))+11) );
(void) ( *( (fPt) ((* (ptr) pd125 ))))(var←c19664, pd125);
};
};
n←v4956 = (n←v4956 + 1);
if (( (int)n←v4956 < (int)noName←c19632)) {
goto lab←L100012;
};
lab←L100009: ;
};
break;
};
}
static word NoName←Q900(formal←c040)
word formal←c040;
{
word var←c042;
word var←c041;
/* intermediary proc for a FORK, nArgs: 1, nRets: 0 */
var←c042 = (* (( (ptr) formal←c040)+4) );
var←c041 = (* (( (ptr) formal←c040)+2) );
formal←c040 = XR←ExtensionFree(formal←c040);
(void) ( *( (fPt) ((* (ptr) var←c041 ))))(var←c042, var←c041);
return(0);
}
static word NoName←Q960(formal←c0113)
word formal←c0113;
{
word var←c0115;
word var←c0114;
/* intermediary proc for a FORK, nArgs: 1, nRets: 0 */
var←c0115 = (* (( (ptr) formal←c0113)+4) );
var←c0114 = (* (( (ptr) formal←c0113)+2) );
formal←c0113 = XR←ExtensionFree(formal←c0113);
(void) ( *( (fPt) ((* (ptr) var←c0114 ))))(var←c0115, var←c0114);
return(0);
}
/* file: X11TextDemo, module: X11TextDemo, compiled at: December 16, 1992 11:12:52 am PST */
extern void XR←install←X11TextDemo() {
NoName←Q840();
}
extern void XR←run←X11TextDemo() { XR←Start(&globalframe); }