/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1992 by Xerox Corporation. All rights reserved. */
/* time: May 11, 1992 10:23:46 am PDT */
/* C2C version: October 16, 1990 (native) */
/* ref-counting: off */
/* file: X11SimpleChat, module: X11SimpleChat */
/* switches: bcfhklnouw */
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob←version [3753453953,4232595888] X11SimpleChat";
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 {word f0, f1, f2;} W3;
typedef struct {W16 f; W3 r;} W19;
typedef struct {W16 f; word r;} W17;
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←Q420();
static void X11SimpleChat←P0();
static void Create←P60();
static void Send←P120();
static void Split←P180();
static void Last←P240();
static void Move←P300();
static void CreateConversationCommand←P360();
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[48];} string3 = {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];} string4 = {131074, "\004\003\000"};
static struct {unsigned f; char r[16];} string5 = {851984, "\257\300\337\271\051\201\300\374\110\111\260\100\200\000\000"};
static struct {unsigned f; char r[4];} string6 = {131074, "\004\037\000"};
static struct {unsigned f; char r[4];} string7 = {4, "\000\000\000"};
static struct {unsigned f; char r[8];} string8 = {262152, "send\000\000\000"};
static struct {unsigned f; char r[8];} string9 = {327688, "split\000\000"};
static struct {unsigned f; char r[8];} string10 = {262152, "last\000\000\000"};
static struct {unsigned f; char r[8];} string11 = {262152, "move\000\000\000"};
static struct {unsigned f; char r[8];} string12 = {262152, "id: \000\000\000"};
static struct {unsigned f; char r[28];} string13 = {1769500, "Create a simple chat widget"};
static struct {unsigned f; char r[16];} string14 = {786448, "simple chat \000\000\000"};
static struct {unsigned f; char r[4];} string15 = {65540, "\012\000\000"};
static struct {unsigned f; char r[4];} string16 = {65540, ">\000\000"};
static struct {unsigned f; char r[16];} string17 = {851984, "X11SimpleChat\000\000"};
static struct {unsigned f; char r[16];} string18 = {851984, "\257\300\337\271\051\201\300\374\110\111\260\100\164\000\000"};
static struct {unsigned f; char r[8];} string19 = {393222, "\006\001$\004G\377\000"};
static struct {unsigned f; char r[16];} string20 = {851984, "\257\300\373\225\000\071\300\362\156\307\320\100\150\000\000"};
static struct {unsigned f; char r[16];} string21 = {851984, "\257\300\311\235\133\064\300\165\175\234\175\100\150\000\000"};
static struct {unsigned f; char r[16];} string22 = {851984, "\257\300\015\277\004\146\300\034\367\146\045\100\164\000\000"};
static struct {unsigned f; char r[16];} string23 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\100\150\000\000"};
static struct {unsigned f; char r[16];} string24 = {851984, "\257\300\033\115\307\000\300\214\060\055\310\100\150\000\000"};
static struct {unsigned f; char r[16];} string25 = {851984, "\257\300\273`R#\300\206CBt@h\000\000"};
static struct {unsigned f; char r[16];} string26 = {851984, "\257\300\145\202\371\143\300\336\312\353\353\100\150\000\000"};
static struct {
word f0[20]; word f20; word f21; word f22;
word f23; word f24; word f25; word f26;
word f27; word f28; word f29; word f30;
word f31; word f32; word f33[2]; word f35;
word f36; word f37; word f38; word f39;
word f40; word f41[2]; word f43; word f44;
word f45[3]; word f48; word f49; word f50;
word f51; word f52; word f53; word f54[2];
word f56; word f57; word f58; word f59;
word f60; word f61[7];
} globalframe = {
{0}, (word) CreateConversationCommand←P360, 0, (word) Move←P300,
0, (word) Last←P240, 0, (word) Split←P180,
0, (word) Send←P120, 0, (word) Create←P60,
0, (word) X11SimpleChat←P0, {0}, 2147483648,
2147483648, 2147483648, 2147483648, 2147483648,
3, {0}, 4294967295, 4294967295,
{0}, 2147483648, 2147483648, 350,
200, 2147483648, 3, {0},
2147483648, 2147483648, 2147483648, 2147483648,
2147483648, {0}
};
static void NoName←Q420()
{
register ptr gf←c083 = (ptr) &globalframe;
word var←c16584;
(* (( (ptr) gf←c083)+5) ) = (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2);
(* (( (ptr) gf←c083)+7) ) = (word) XR←GetTypeIndex((word) &string3, 0, (word) &string4);
(* (( (ptr) gf←c083)+8) ) = (word) XR←GetTypeIndex((word) &string5, 0, (word) &string6);
(* (ptr) (( (bPt) gf←c083)+36) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c083)+5) ), (word) &string7);
(* (ptr) (( (bPt) gf←c083)+40) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c083)+5) ), (word) &string8);
(* (ptr) (( (bPt) gf←c083)+44) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c083)+5) ), (word) &string9);
(* (ptr) (( (bPt) gf←c083)+48) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c083)+5) ), (word) &string10);
(* (ptr) (( (bPt) gf←c083)+52) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c083)+5) ), (word) &string11);
(* (ptr) (( (bPt) gf←c083)+56) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c083)+5) ), (word) &string12);
(* (ptr) (( (bPt) gf←c083)+60) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c083)+5) ), (word) &string13);
(* (ptr) (( (bPt) gf←c083)+64) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c083)+5) ), (word) &string14);
(* (ptr) (( (bPt) gf←c083)+68) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c083)+5) ), (word) &string15);
(* (ptr) (( (bPt) gf←c083)+72) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c083)+5) ), (word) &string16);
(* (ptr) (( (bPt) gf←c083)+76) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c083)+5) ), (word) &string17);
(void) XR←DeclareGlobalFrame((word) "X11SimpleChat", &globalframe, (word) XR←GetTypeIndex((word) &string18, 0, (word) &string19)
, (word) (( (bPt) gf←c083)+128)/* var←c15528 */ );
var←c16584 = (word) XR←ImportInterface((word) "Commander", (word) XR←GetTypeIndexS((word) (&string20)), 3);
(* (( (ptr) gf←c083)+61)/* var←c15816 */ ) = var←c16584;
(void) XR←ImportProcS(var←c16584, 1310725);
var←c16584 = (word) XR←ImportInterface((word) "CommanderOps", (word) XR←GetTypeIndexS((word) (&string21)), 14);
(* (( (ptr) gf←c083)+67)/* var←c16552 */ ) = var←c16584;
(void) XR←ImportProcS(var←c16584, 67634178);
var←c16584 = (word) XR←ImportInterface((word) "IO", (word) XR←GetTypeIndexS((word) (&string22)), 103);
(* (( (ptr) gf←c083)+64)/* var←c16424 */ ) = var←c16584;
(void) XR←ImportProcS(var←c16584, 1071364);
var←c16584 = (word) XR←ImportInterface((word) "Rope", (word) XR←GetTypeIndexS((word) (&string23)), 43);
(* (( (ptr) gf←c083)+63)/* var←c16392 */ ) = var←c16584;
(void) XR←ImportProcS(var←c16584, 68419845);
(void) XR←ImportProcS(var←c16584, 67634434);
(void) XR←ImportProcS(var←c16584, 67373569);
(void) XR←ImportProcS(var←c16584, 67633666);
var←c16584 = (word) XR←ImportInterface((word) "XTk", (word) XR←GetTypeIndexS((word) (&string24)), 50);
(* (( (ptr) gf←c083)+65)/* var←c16488 */ ) = var←c16584;
(void) XR←ImportProcS(var←c16584, 67378433);
var←c16584 = (word) XR←ImportInterface((word) "XTkMigration", (word) XR←GetTypeIndexS((word) (&string25)), 3);
(* (( (ptr) gf←c083)+66)/* var←c16520 */ ) = var←c16584;
(void) XR←ImportProcS(var←c16584, 67633154);
var←c16584 = (word) XR←ImportInterface((word) "XTkWidgets", (word) XR←GetTypeIndexS((word) (&string26)), 52);
(* (( (ptr) gf←c083)+62)/* var←c15880 */ ) = var←c16584;
(void) XR←ImportProcS(var←c16584, 67383809);
(void) XR←ImportProcS(var←c16584, 795651);
(void) XR←ImportProcS(var←c16584, 67379969);
(void) XR←ImportProcS(var←c16584, 2099460);
(void) XR←ImportProcS(var←c16584, 787203);
(void) XR←ImportProcS(var←c16584, 72352268);
(void) XR←ImportProcS(var←c16584, 67382273);
(void) XR←ImportProcS(var←c16584, 69998595);
(void) XR←ImportProcS(var←c16584, 69742850);
(void) XR←ImportProcS(var←c16584, 67382529);
(void) XR←ImportProcS(var←c16584, 69998851);
(void) XR←ImportProcS(var←c16584, 71574022);
(void) XR←ImportProcS(var←c16584, 72097800);
(void) XR←ImportProcS(var←c16584, 70787331);
}
static void X11SimpleChat←P0(formal←c023, formal←c022)
word formal←c023;
word formal←c022;
{
register ptr gf←c16616 = (ptr) &globalframe;
/* X11SimpleChat: */
SOURCE(82, 2873)
/* 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(2862, 93)
{
word pd27;
pd27 = (* (( (ptr) (* (( (ptr) gf←c16616)+61)/* var←c15816 */ ))+4) );
(void) ( *( (fPt) ((* (ptr) pd27 ))))((* (( (ptr) gf←c16616)+19) ), (word) (( (bPt) gf←c16616)+80)/* var←c15336 */ , (* (
( (ptr) gf←c16616)+15) ), 0, 1, pd27);
};
}
static void Create←P60(conversation←v3236, widgetStream←v3264, connection←v3292)
word conversation←v3236;
word widgetStream←v3264;
word connection←v3292;
{
register ptr gf←c16648 = (ptr) &globalframe;
word i←v3336;
word in←v3364;
word send←v3392;
word split←v3420;
word last←v3448;
word move←v3476;
word id←v3504;
word menus←v3532;
word out←v3560;
word container←v3588;
word shell←v3616;
/* Create: */
SOURCE(554, 1249)
SOURCE(639, 76)
i←v3336 = XR←NewObject(20, (* (( (ptr) gf←c16648)+8) ));
(* (ptr) i←v3336 ) = widgetStream←v3264;
(* (( (ptr) i←v3336)+1) ) = conversation←v3236;
SOURCE(717, 52)
{
word pd28;
pd28 = (* (( (ptr) (* (( (ptr) gf←c16648)+62)/* var←c15880 */ ))+37) );
in←v3364 = (word) ( *( (fPt) ((* (ptr) pd28 ))))((* (W9Pt) (( (ptr) gf←c16648)+34)/* var←c15592 */ ), (* (( (ptr) gf←c16648)+9)
), (* (W4Pt) (( (ptr) gf←c16648)+43)/* var←c15656 */ ), pd28);
};
(* (( (ptr) i←v3336)+4) ) = in←v3364;
SOURCE(771, 84)
{
W19 var←c030;
(* (W9Pt) (word) &var←c030 ) = (* (W9Pt) (( (ptr) gf←c16648)+34)/* var←c15592 */ );
(* (( (ptr) (word) &var←c030) + 9) ) = (* (( (ptr) gf←c16648)+10) );
(* (W4Pt) (( (ptr) (word) &var←c030) + 10) ) = (* (W4Pt) (( (ptr) gf←c16648)+43)/* var←c15656 */ );
(* (( (ptr) (word) &var←c030) + 14) ) = (word) (( (bPt) gf←c16648)+112)/* var←c15464 */ ;
(* (( (ptr) (word) &var←c030) + 15) ) = i←v3336;
(* (( (ptr) (word) &var←c030) + 16) ) = 0;
(* (( (ptr) (word) &var←c030) + 17) ) = 0;
(* (( (ptr) (word) &var←c030) + 18) ) = 0;
{
word pd29;
pd29 = (* (( (ptr) (* (( (ptr) gf←c16648)+62)/* var←c15880 */ ))+36) );
send←v3392 = (word) ( *( (fPt) ((* (ptr) pd29 ))))((word) (&var←c030), pd29);
};
};
SOURCE(857, 87)
{
W19 var←c032;
(* (W9Pt) (word) &var←c032 ) = (* (W9Pt) (( (ptr) gf←c16648)+34)/* var←c15592 */ );
(* (( (ptr) (word) &var←c032) + 9) ) = (* (( (ptr) gf←c16648)+11) );
(* (W4Pt) (( (ptr) (word) &var←c032) + 10) ) = (* (W4Pt) (( (ptr) gf←c16648)+43)/* var←c15656 */ );
(* (( (ptr) (word) &var←c032) + 14) ) = (word) (( (bPt) gf←c16648)+104)/* var←c15432 */ ;
(* (( (ptr) (word) &var←c032) + 15) ) = i←v3336;
(* (( (ptr) (word) &var←c032) + 16) ) = 0;
(* (( (ptr) (word) &var←c032) + 17) ) = 0;
(* (( (ptr) (word) &var←c032) + 18) ) = 0;
{
word pd30;
pd30 = (* (( (ptr) (* (( (ptr) gf←c16648)+62)/* var←c15880 */ ))+36) );
split←v3420 = (word) ( *( (fPt) ((* (ptr) pd30 ))))((word) (&var←c032), pd30);
};
};
SOURCE(946, 84)
{
W19 var←c034;
(* (W9Pt) (word) &var←c034 ) = (* (W9Pt) (( (ptr) gf←c16648)+34)/* var←c15592 */ );
(* (( (ptr) (word) &var←c034) + 9) ) = (* (( (ptr) gf←c16648)+12) );
(* (W4Pt) (( (ptr) (word) &var←c034) + 10) ) = (* (W4Pt) (( (ptr) gf←c16648)+43)/* var←c15656 */ );
(* (( (ptr) (word) &var←c034) + 14) ) = (word) (( (bPt) gf←c16648)+96)/* var←c15400 */ ;
(* (( (ptr) (word) &var←c034) + 15) ) = i←v3336;
(* (( (ptr) (word) &var←c034) + 16) ) = 0;
(* (( (ptr) (word) &var←c034) + 17) ) = 0;
(* (( (ptr) (word) &var←c034) + 18) ) = 0;
{
word pd31;
pd31 = (* (( (ptr) (* (( (ptr) gf←c16648)+62)/* var←c15880 */ ))+36) );
last←v3448 = (word) ( *( (fPt) ((* (ptr) pd31 ))))((word) (&var←c034), pd31);
};
};
SOURCE(1032, 84)
{
W19 var←c036;
(* (W9Pt) (word) &var←c036 ) = (* (W9Pt) (( (ptr) gf←c16648)+34)/* var←c15592 */ );
(* (( (ptr) (word) &var←c036) + 9) ) = (* (( (ptr) gf←c16648)+13) );
(* (W4Pt) (( (ptr) (word) &var←c036) + 10) ) = (* (W4Pt) (( (ptr) gf←c16648)+43)/* var←c15656 */ );
(* (( (ptr) (word) &var←c036) + 14) ) = (word) (( (bPt) gf←c16648)+88)/* var←c15368 */ ;
(* (( (ptr) (word) &var←c036) + 15) ) = i←v3336;
(* (( (ptr) (word) &var←c036) + 16) ) = 0;
(* (( (ptr) (word) &var←c036) + 17) ) = 0;
(* (( (ptr) (word) &var←c036) + 18) ) = 0;
{
word pd32;
pd32 = (* (( (ptr) (* (( (ptr) gf←c16648)+62)/* var←c15880 */ ))+36) );
move←v3476 = (word) ( *( (fPt) ((* (ptr) pd32 ))))((word) (&var←c036), pd32);
};
};
SOURCE(1118, 74)
{
W17 var←c038;
(* (W9Pt) (word) &var←c038 ) = (* (W9Pt) (( (ptr) gf←c16648)+34)/* var←c15592 */ );
(* (( (ptr) (word) &var←c038) + 9) ) = (* (( (ptr) gf←c16648)+14) );
(* (( (ptr) (word) &var←c038) + 10) ) = (* (( (ptr) gf←c16648)+9) );
(* (W4Pt) (( (ptr) (word) &var←c038) + 11) ) = (* (W4Pt) (( (ptr) gf←c16648)+43)/* var←c15656 */ );
(* (( (ptr) (word) &var←c038) + 15) ) = 0;
(* (( (ptr) (word) &var←c038) + 16) ) = 0;
{
word pd33;
pd33 = (* (( (ptr) (* (( (ptr) gf←c16648)+62)/* var←c15880 */ ))+38) );
id←v3504 = (word) ( *( (fPt) ((* (ptr) pd33 ))))((word) (&var←c038), pd33);
};
};
(* (( (ptr) i←v3336)+3) ) = id←v3504;
SOURCE(1194, 161)
{
word var←c15976;
{
word var←c16008;
word var←c16040;
var←c16008 = XR←NewObject(8, (* (( (ptr) gf←c16648)+7) ));
var←c16040 = var←c16008;
(* (ptr) var←c16040 ) = send←v3392;
(* (( (ptr) var←c16040)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c16648)+7) ));
var←c16040 = (* (( (ptr) var←c16040)+1) );
{
word pd34;
pd34 = (* (( (ptr) (* (( (ptr) gf←c16648)+62)/* var←c15880 */ ))+49) );
(* (ptr) var←c16040 ) = (word) ( *( (fPt) ((* (ptr) pd34 ))))(1, pd34);
};
(* (( (ptr) var←c16040)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c16648)+7) ));
var←c16040 = (* (( (ptr) var←c16040)+1) );
(* (ptr) var←c16040 ) = last←v3448;
(* (( (ptr) var←c16040)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c16648)+7) ));
var←c16040 = (* (( (ptr) var←c16040)+1) );
{
word pd35;
pd35 = (* (( (ptr) (* (( (ptr) gf←c16648)+62)/* var←c15880 */ ))+49) );
(* (ptr) var←c16040 ) = (word) ( *( (fPt) ((* (ptr) pd35 ))))(1, pd35);
};
(* (( (ptr) var←c16040)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c16648)+7) ));
var←c16040 = (* (( (ptr) var←c16040)+1) );
(* (ptr) var←c16040 ) = split←v3420;
(* (( (ptr) var←c16040)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c16648)+7) ));
var←c16040 = (* (( (ptr) var←c16040)+1) );
{
word pd36;
pd36 = (* (( (ptr) (* (( (ptr) gf←c16648)+62)/* var←c15880 */ ))+49) );
(* (ptr) var←c16040 ) = (word) ( *( (fPt) ((* (ptr) pd36 ))))(1, pd36);
};
(* (( (ptr) var←c16040)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c16648)+7) ));
var←c16040 = (* (( (ptr) var←c16040)+1) );
(* (ptr) var←c16040 ) = move←v3476;
(* (( (ptr) var←c16040)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c16648)+7) ));
var←c16040 = (* (( (ptr) var←c16040)+1) );
{
word pd37;
pd37 = (* (( (ptr) (* (( (ptr) gf←c16648)+62)/* var←c15880 */ ))+49) );
(* (ptr) var←c16040 ) = (word) ( *( (fPt) ((* (ptr) pd37 ))))(1, pd37);
};
(* (( (ptr) var←c16040)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c16648)+7) ));
var←c16040 = (* (( (ptr) var←c16040)+1) );
(* (ptr) var←c16040 ) = id←v3504;
var←c15976 = var←c16008;
};
{
word pd38;
pd38 = (* (( (ptr) (* (( (ptr) gf←c16648)+62)/* var←c15880 */ ))+29) );
menus←v3532 = (word) ( *( (fPt) ((* (ptr) pd38 ))))((* (W9Pt) (( (ptr) gf←c16648)+34)/* var←c15592 */ ), var←c15976, (word) -1, pd38)
;
};
};
SOURCE(1357, 115)
{
word pd39;
pd39 = (* (( (ptr) (* (( (ptr) gf←c16648)+62)/* var←c15880 */ ))+53) );
out←v3560 = (word) ( *( (fPt) ((* (ptr) pd39 ))))((* (W9Pt) (( (ptr) gf←c16648)+47)/* var←c15720 */ ), widgetStream←v3264, pd39)
;
};
SOURCE(1474, 112)
{
word var←c16200;
{
word var←c16232;
word var←c16264;
var←c16232 = XR←NewObject(8, (* (( (ptr) gf←c16648)+7) ));
var←c16264 = var←c16232;
(* (ptr) var←c16264 ) = menus←v3532;
(* (( (ptr) var←c16264)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c16648)+7) ));
var←c16264 = (* (( (ptr) var←c16264)+1) );
{
word pd40;
pd40 = (* (( (ptr) (* (( (ptr) gf←c16648)+62)/* var←c15880 */ ))+48) );
(* (ptr) var←c16264 ) = (word) ( *( (fPt) ((* (ptr) pd40 ))))(1, pd40);
};
(* (( (ptr) var←c16264)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c16648)+7) ));
var←c16264 = (* (( (ptr) var←c16264)+1) );
(* (ptr) var←c16264 ) = in←v3364;
(* (( (ptr) var←c16264)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c16648)+7) ));
var←c16264 = (* (( (ptr) var←c16264)+1) );
{
word pd41;
pd41 = (* (( (ptr) (* (( (ptr) gf←c16648)+62)/* var←c15880 */ ))+48) );
(* (ptr) var←c16264 ) = (word) ( *( (fPt) ((* (ptr) pd41 ))))(1, pd41);
};
(* (( (ptr) var←c16264)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c16648)+7) ));
var←c16264 = (* (( (ptr) var←c16264)+1) );
(* (ptr) var←c16264 ) = out←v3560;
var←c16200 = var←c16232;
};
{
word pd42;
pd42 = (* (( (ptr) (* (( (ptr) gf←c16648)+62)/* var←c15880 */ ))+28) );
container←v3588 = (word) ( *( (fPt) ((* (ptr) pd42 ))))((* (W9Pt) (( (ptr) gf←c16648)+34)/* var←c15592 */ ), var←c16200, (word) -1, pd42)
;
};
};
SOURCE(1588, 113)
{
word var←c16360;
{
word pd43;
pd43 = (* (( (ptr) (* (( (ptr) gf←c16648)+63)/* var←c16392 */ ))+6) );
var←c16360 = (word) ( *( (fPt) ((* (ptr) pd43 ))))((* (( (ptr) gf←c16648)+16) ), conversation←v3236, pd43);
};
{
W20 var←c050;
(* (W9Pt) (word) &var←c050 ) = (* (W9Pt) (( (ptr) gf←c16648)+34)/* var←c15592 */ );
(* (( (ptr) (word) &var←c050) + 9) ) = container←v3588;
(* (( (ptr) (word) &var←c050) + 10) ) = var←c16360;
(* (( (ptr) (word) &var←c050) + 11) ) = 0;
(* (( (ptr) (word) &var←c050) + 12) ) = 0;
(* (( (ptr) (word) &var←c050) + 13) ) = 0;
(* (( (ptr) (word) &var←c050) + 14) ) = 0;
(* (( (ptr) (word) &var←c050) + 15) ) = 0;
(* (( (ptr) (word) &var←c050) + 16) ) = 0;
(* (( (ptr) (word) &var←c050) + 17) ) = 1;
(* (( (ptr) (word) &var←c050) + 18) ) = 1;
(* (( (ptr) (word) &var←c050) + 19) ) = 1;
{
word pd44;
pd44 = (* (( (ptr) (* (( (ptr) gf←c16648)+62)/* var←c15880 */ ))+6) );
shell←v3616 = (word) ( *( (fPt) ((* (ptr) pd44 ))))((word) (&var←c050), pd44);
};
};
};
SOURCE(1703, 68)
if ((connection←v3292 != 0)) {
SOURCE(1726, 45)
{
word pd45;
pd45 = (* (( (ptr) (* (( (ptr) gf←c16648)+62)/* var←c15880 */ ))+7) );
(void) ( *( (fPt) ((* (ptr) pd45 ))))(shell←v3616, connection←v3292, 0, pd45);
};
};
SOURCE(1773, 30)
{
word pd46;
pd46 = (* (( (ptr) (* (( (ptr) gf←c16648)+62)/* var←c15880 */ ))+13) );
(void) ( *( (fPt) ((* (ptr) pd46 ))))(shell←v3616, (* (W5Pt) (( (ptr) gf←c16648)+56)/* var←c15784 */ ), 0, 1, pd46);
};
}
static void Send←P120(widget←v5260, registerData←v5288, callData←v5316, event←v5344)
word widget←v5260;
word registerData←v5288;
word callData←v5316;
word event←v5344;
{
register ptr gf←c16680 = (ptr) &globalframe;
word i←v3672;
word text←v3700;
word id←v3728;
word leng←v3756;
/* Send: */
SOURCE(1809, 373)
SOURCE(1840, 34)
i←v3672 = XR←Narrow(registerData←v5288, (* (( (ptr) gf←c16680)+8) ));
SOURCE(1876, 42)
{
word pd47;
pd47 = (* (( (ptr) (* (( (ptr) gf←c16680)+62)/* var←c15880 */ ))+39) );
text←v3700 = (word) ( *( (fPt) ((* (ptr) pd47 ))))((* ((( (ptr) i←v3672)+4)) ), pd47);
};
SOURCE(1920, 40)
{
word pd48;
pd48 = (* (( (ptr) (* (( (ptr) gf←c16680)+62)/* var←c15880 */ ))+39) );
id←v3728 = (word) ( *( (fPt) ((* (ptr) pd48 ))))((* ((( (ptr) i←v3672)+3)) ), pd48);
};
SOURCE(1962, 29)
{
word pd49;
pd49 = (* (( (ptr) (* (( (ptr) gf←c16680)+63)/* var←c16392 */ ))+14) );
leng←v3756 = (word) ( *( (fPt) ((* (ptr) pd49 ))))(text←v3700, pd49);
};
SOURCE(1993, 189)
if (( (int)leng←v3756 > (int)0)) {
SOURCE(2010, 13)
(* (( (ptr) i←v3672)+2) ) = text←v3700;
SOURCE(2025, 67)
{
word pd50;
pd50 = (* (( (ptr) (* (( (ptr) gf←c16680)+63)/* var←c16392 */ ))+9) );
if (((word) ( *( (fPt) ((* (ptr) pd50 ))))(text←v3700, (leng←v3756 - 1), pd50) != 10)) {
SOURCE(2062, 30)
{
word pd51;
pd51 = (* (( (ptr) (* (( (ptr) gf←c16680)+63)/* var←c16392 */ ))+6) );
text←v3700 = (word) ( *( (fPt) ((* (ptr) pd51 ))))(text←v3700, (* (( (ptr) gf←c16680)+17) ), pd51);
};
};
};
SOURCE(2094, 30)
{
word pd52;
pd52 = (* (( (ptr) (* (( (ptr) gf←c16680)+63)/* var←c16392 */ ))+5) );
text←v3700 = (word) ( *( (fPt) ((* (ptr) pd52 ))))(id←v3728, (* (( (ptr) gf←c16680)+18) ), text←v3700, 0, 0, pd52);
};
SOURCE(2126, 26)
{
word pd53;
pd53 = (* (( (ptr) (* (( (ptr) gf←c16680)+64)/* var←c16424 */ ))+93) );
(void) ( *( (fPt) ((* (ptr) pd53 ))))((* (ptr) i←v3672 ), text←v3700, 0, 2147483647, pd53);
};
SOURCE(2154, 28)
{
word pd54;
pd54 = (* (( (ptr) (* (( (ptr) gf←c16680)+62)/* var←c15880 */ ))+40) );
(void) ( *( (fPt) ((* (ptr) pd54 ))))((* (( (ptr) i←v3672)+4) ), (* (( (ptr) gf←c16680)+9) ), 2, pd54);
};
};
}
static void Split←P180(widget←v5404, registerData←v5432, callData←v5460, event←v5488)
word widget←v5404;
word registerData←v5432;
word callData←v5460;
word event←v5488;
{
register ptr gf←c16712 = (ptr) &globalframe;
word i←v3812;
/* Split: */
SOURCE(2191, 119)
SOURCE(2223, 34)
i←v3812 = XR←Narrow(registerData←v5432, (* (( (ptr) gf←c16712)+8) ));
SOURCE(2259, 51)
(void) Create←P60((* (( (ptr) i←v3812)+1) ), (* (ptr) i←v3812 ), (* (( (ptr) widget←v5404)+34) ));
}
static void Last←P240(widget←v5548, registerData←v5576, callData←v5604, event←v5632)
word widget←v5548;
word registerData←v5576;
word callData←v5604;
word event←v5632;
{
register ptr gf←c16744 = (ptr) &globalframe;
word i←v3868;
/* Last: */
SOURCE(2316, 99)
SOURCE(2347, 34)
i←v3868 = XR←Narrow(registerData←v5576, (* (( (ptr) gf←c16744)+8) ));
SOURCE(2383, 32)
{
word pd55;
pd55 = (* (( (ptr) (* (( (ptr) gf←c16744)+62)/* var←c15880 */ ))+40) );
(void) ( *( (fPt) ((* (ptr) pd55 ))))((* (( (ptr) i←v3868)+4) ), (* (( (ptr) i←v3868)+2) ), 2, pd55);
};
}
static void Move←P300(widget←v5692, registerData←v5720, callData←v5748, event←v5776)
word widget←v5692;
word registerData←v5720;
word callData←v5748;
word event←v5776;
{
register ptr gf←c16776 = (ptr) &globalframe;
word i←v3924;
word dest←v3952;
word msg←v3980;
/* Move: */
SOURCE(2421, 225)
SOURCE(2452, 34)
i←v3924 = XR←Narrow(registerData←v5720, (* (( (ptr) gf←c16776)+8) ));
SOURCE(2488, 42)
{
word pd56;
pd56 = (* (( (ptr) (* (( (ptr) gf←c16776)+62)/* var←c15880 */ ))+39) );
dest←v3952 = (word) ( *( (fPt) ((* (ptr) pd56 ))))((* ((( (ptr) i←v3924)+3)) ), pd56);
};
SOURCE(2532, 67)
{
word var←c16456;
{
word pd57;
pd57 = (* (( (ptr) (* (( (ptr) gf←c16776)+65)/* var←c16488 */ ))+33) );
var←c16456 = (word) ( *( (fPt) ((* (ptr) pd57 ))))(widget←v5692, pd57);
};
{
word pd58;
pd58 = (* (( (ptr) (* (( (ptr) gf←c16776)+66)/* var←c16520 */ ))+4) );
msg←v3980 = (word) ( *( (fPt) ((* (ptr) pd58 ))))(var←c16456, dest←v3952, pd58);
};
};
SOURCE(2601, 45)
if ((msg←v3980 != 0)) {
SOURCE(2617, 29)
{
word pd59;
pd59 = (* (( (ptr) (* (( (ptr) gf←c16776)+62)/* var←c15880 */ ))+40) );
(void) ( *( (fPt) ((* (ptr) pd59 ))))((* (( (ptr) i←v3924)+4) ), msg←v3980, 2, pd59);
};
};
}
static void CreateConversationCommand←P360(formal←c082, cmd←v5836)
word formal←c082;
word cmd←v5836;
{
register ptr gf←c16808 = (ptr) &globalframe;
word result←v5880;
word msg←v5908;
word conversation←v4036;
word widgetStream←v4064;
/* CreateConversationCommand: */
SOURCE(2653, 203)
SOURCE(2653, 203)
result←v5880 = 0;
SOURCE(2653, 203)
msg←v5908 = 0;
SOURCE(2706, 56)
{
word pd60;
pd60 = (* (( (ptr) (* (( (ptr) gf←c16808)+67)/* var←c16552 */ ))+8) );
conversation←v4036 = (word) ( *( (fPt) ((* (ptr) pd60 ))))(cmd←v5836, 0, pd60);
};
SOURCE(2764, 51)
{
word pd61;
pd61 = (* (( (ptr) (* (( (ptr) gf←c16808)+62)/* var←c15880 */ ))+54) );
widgetStream←v4064 = (word) ( *( (fPt) ((* (ptr) pd61 ))))(0, pd61);
};
SOURCE(2817, 39)
(void) Create←P60(conversation←v4036, widgetStream←v4064, 0);
/* removed tail goto */
(* (ptr) formal←c082 ) = result←v5880;
(* (( (ptr) formal←c082)+1) ) = msg←v5908;
return;
}
/* file: X11SimpleChat, module: X11SimpleChat, compiled at: May 11, 1992 10:23:45 am PDT */
extern void XR←install←X11SimpleChat() {
NoName←Q420();
}
extern void XR←run←X11SimpleChat() { XR←Start(&globalframe); }