/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1993 by Xerox Corporation. All rights reserved. */
/* time: October 19, 1993 1:45:11 pm PDT */
/* C2C version: April 20, 1993 (sun4) */
/* ref-counting: off */
/* file: XTSetterPrintImpl, module: XTSetterPrintImpl */
/* switches: bcfhklnouw */
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob←version [3956909876,2549223888] XTSetterPrintImpl";
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 {word f0, f1, f2, f3;} W4;
typedef struct {W8 f; W4 r;} W12;
typedef struct {word f0, f1, f2, f3, f4, f5;} W6;
typedef struct {W8 f; W6 r;} W14;
typedef W12 *W12Pt;
typedef struct {word f0, f1, f2, f3, f4, f5, f6;} W7;
typedef struct {W8 f; word r;} W9;
typedef W4 *W4Pt;
typedef struct {word f0, f1;} W2;
typedef struct {W8 f; W2 r;} W10;
typedef W2 *W2Pt;
typedef struct {word f0, f1, f2, f3, f4;} W5;
typedef W5 *W5Pt;
typedef struct {W8 f; W8 r;} W16;
typedef struct {W8 f; W5 r;} W13;
typedef struct {W16 f; W13 r;} W29;
typedef struct {W16 f; W2 r;} W18;
typedef struct {word f0, f1, f2;} W3;
typedef struct {W8 f; W7 r;} W15;
typedef struct {W16 f; W3 r;} W19;
typedef W14 *W14Pt;
#define SOURCE(p, l) /* source p, l */
#define SGNCK(i) ((int) (word) (i) < 0 ? XR←RaiseArithmeticFault(): i )
static float fc172 = 100.0;
static float fc178 = 0.00;
#define BCK(idx, lim) ( ((unsigned) idx) >= ((unsigned) lim) ? (XR←RaiseBoundsFault()) : (idx) )
static float fc289 = 1.0;
static float fc299 = 0.0;
static float fc307 = 0.0254;
static float fc309 = 72.27;
static float fc314 = 90.0;
#define INEG(x) ( (word) ( - ((int) (word) (x)) ) )
#define IOP2(op, x, y) ( (word) ((x) op (y)) )
#define MIN(cast, x, y) ( ( cast x) < ( cast y) ? (x) : (y) )
static float fc387 = 0.8;
#define FMIN(x, y, tx, ty) ( (tx=((float) x)) <= (ty=((float) y)) ? tx : ty )
static float fc432 = 2.0;
static float fc463 = 0.001;
static void NoName←Q5232();
static void XTSetterPrintImpl←P0();
static word Extension←P60();
static void PrintFile←P120();
static word NoName←Q5292();
static void PrintViewer←P180();
static word NoName←Q5352();
static void PrintScreen←P240();
static word NoName←Q5412();
static void ExecutePrintRequest←P300();
static void NewTmpMaster←P360();
static word NoName←Q5472();
static void MakeIPMaster←P420();
static word NoName←Q5532();
static word IPStatusUpdate←P1932();
static void Compress←P1992();
static word BeginPage←P2148();
static word EndPage←P2208();
static void CopyWithSuffix←P480();
static word NoName←Q5592();
static word ConstructFName←P540();
static void RaiseError←P600();
static void Wrap←P660();
static word NoName←Q5652();
static void ExpandName←P720();
static void GetPath←P2316();
static void EachComponent←P2376();
static void EachSeparator←P2436();
static void DoWithStatus←P780();
static word NoName←Q5712();
static void PrintRequestProcess←P840();
static word WithStatus←P2544();
static word NoName←Q5772();
static word NoName←Q5832();
static word GetGenerator←P900();
static word FromTiogaViewer←P960();
static word FromTiogaFile←P1020();
static word FromTiogaNode←P1080();
static void SetDevice←P2700();
static void LandscapeStyle←P2760();
static word NoName←Q5892();
static void Paint←P2868();
static void DoWhileViewerHidden←P1140();
static void HideViewer←P2928();
static word ListColumn←P3108();
static word CompareYPos←P3168();
static void CallClientUnderLock←P2988();
static word NoName←Q5952();
static void UnHideViewer←P3048();
static void RecursivelyPaintViewers←P1200();
static void PaintWindow←P3324();
static void PaintClient←P3384();
static void PaintChild←P3588();
static void SetViewerPosition←P1260();
static word DefaultViewerIPProducer←P1320();
static void Paint←P3936();
static void Inner←P3996();
static word FromScreen←P1380();
static word FitInPage←P1440();
static void PaperSize←P1500();
static void PaperSizeMeters←P1560();
static word MakeIPFileName←P1620();
static word NoName←Q6012();
static word Install←P1680();
static void DoInstall←P4104();
static void NoName←Q6072();
static void NoName←Q6132();
static void NoName←Q6192();
static void NoName←Q6252();
static void NoName←Q6312();
static void NoName←Q6372();
static void NoName←Q6432();
static void NoName←Q6492();
static void NoName←Q6552();
static void NoName←Q6612();
static void NoName←Q6672();
static void NoName←Q6732();
static void NoName←Q6792();
static word NoName←Q6852();
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[48];} string3 = {2883632, "\260\006\005\146\151\162\163\164\216\257\300\113\175\243\331\300\252\247\212\133\100\164\005\004\162\145\163\164\214\216\257\300\113\175\243\331\300\252\247\212\133\100\164\261\000\000\000"};
static struct {unsigned f; char r[4];} string4 = {131074, "\004\003\000"};
static struct {unsigned f; char r[4];} string5 = {65540, "\251\000\000"};
static struct {unsigned f; char r[144];} string6 = {9240720, "\262\260\007\006\163\157\165\162\143\145\217\010\007\157\160\164\151\157\156\163\216\257\300\250\170\135\274\300\073\343\245\166\100\200\005\004\151\156\146\157\216\257\300\250\170\135\274\300\073\343\245\166\101\224\007\006\155\141\163\164\145\162\216\211\004\003\122\145\160\300\124\360\214\337\300\200\347\202\313\004\003\145\162\162\216\257\300\015\277\004\146\300\034\367\146\045\112\064\011\010\160\162\157\147\162\145\163\163\262\260\010\007\160\145\162\143\145\156\164\256\261\260\005\004\163\164\157\160\232\261\261\260\006\005\160\141\147\145\163\242\261\000\000"};
static struct {unsigned f; char r[16];} string7 = {851984, "\257\300\113\175\243\331\300\252\247\212\133\100\164\000\000"};
static struct {unsigned f; char r[36];} string8 = {2162721, "\006\014\000\001\060\001\064\001\070\001\074\001\100\100\001\100\124\001\100\130\001\100\134\001\100\140\001\100\144\001\100\150\001\000\000"};
static struct {unsigned f; char r[16];} string9 = {851984, "\257\300\250\170\135\274\300\073\343\245\166\101\224\000\000"};
static struct {unsigned f; char r[4];} string10 = {131074, "\004\006\000"};
static struct {unsigned f; char r[16];} string11 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\104\304\000\000"};
static struct {unsigned f; char r[24];} string12 = {1376277, "\007\000\001\002\007\020\001\002\000\007\036\002\004\003\002\004\014\016\015\003\001\000\000"};
static struct {unsigned f; char r[16];} string13 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"};
static struct {unsigned f; char r[16];} string14 = {851984, "\257\300\250\170\135\274\300\073\343\245\166\100\200\000\000"};
static struct {unsigned f; char r[4];} string15 = {196611, "\004FH"};
static struct {unsigned f; char r[16];} string16 = {851984, "\257\300\250\170\135\274\300\073\343\245\166\101\174\000\000"};
static struct {unsigned f; char r[12];} string17 = {655372, "interpress\000"};
static struct {unsigned f; char r[4];} string18 = {131076, "pd\000"};
static struct {unsigned f; char r[44];} string19 = {2621484, "Error: XTSetter does not print pd files\012\000\000\000"};
static struct {unsigned f; char r[12];} string20 = {720908, " [New File]"};
static struct {unsigned f; char r[12];} string21 = {589836, " [Edited]\000\000"};
static struct {unsigned f; char r[8];} string22 = {458760, "Viewer "};
static struct {unsigned f; char r[20];} string23 = {1179668, "Unnamed viewer on \000"};
static struct {unsigned f; char r[16];} string24 = {917520, "Unnamed viewer\000"};
static struct {unsigned f; char r[16];} string25 = {851984, "UnnamedViewer\000\000"};
static struct {unsigned f; char r[12];} string26 = {655372, "B&W screen\000"};
static struct {unsigned f; char r[12];} string27 = {720908, "Left column"};
static struct {unsigned f; char r[16];} string28 = {786448, "Right column\000\000\000"};
static struct {unsigned f; char r[16];} string29 = {786448, "Color screen\000\000\000"};
static struct {unsigned f; char r[12];} string30 = {524300, "BWScreen\000\000\000"};
static struct {unsigned f; char r[12];} string31 = {655372, "LeftColumn\000"};
static struct {unsigned f; char r[12];} string32 = {720908, "RightColumn"};
static struct {unsigned f; char r[12];} string33 = {720908, "ColorScreen"};
static struct {unsigned f; char r[8];} string34 = {393224, "4050ip\000"};
static struct {unsigned f; char r[4];} string35 = {131076, "ip\000"};
static struct {unsigned f; char r[24];} string36 = {1507352, "Interpress/Xerox/%g.%g "};
static struct {unsigned f; char r[16];} string37 = {917520, "/tmp/IP%x%g.%g\000"};
static struct {unsigned f; char r[12];} string38 = {655372, "Typescript\000"};
static struct {unsigned f; char r[8];} string39 = {262152, "/tmp\000\000\000"};
static struct {unsigned f; char r[4];} string40 = {65540, "!\000\000"};
static struct {unsigned f; char r[4];} string41 = {65540, "L\000\000"};
static struct {unsigned f; char r[4];} string42 = {65540, "H\000\000"};
static struct {unsigned f; char r[4];} string43 = {65540, "*\000\000"};
static struct {unsigned f; char r[4];} string44 = {65540, "<\000\000"};
static struct {unsigned f; char r[4];} string45 = {65540, "[\000\000"};
static struct {unsigned f; char r[4];} string46 = {65540, "]\000\000"};
static struct {unsigned f; char r[4];} string47 = {65540, ">\000\000"};
static struct {unsigned f; char r[32];} string48 = {2031648, "Print request for %g cancelled\012"};
static struct {unsigned f; char r[12];} string49 = {655372, "Connection\000"};
static struct {unsigned f; char r[8];} string50 = {262152, "File\000\000\000"};
static struct {unsigned f; char r[8];} string51 = {262152, "Name\000\000\000"};
static struct {unsigned f; char r[12];} string52 = {524300, "Protocol\000\000\000"};
static struct {unsigned f; char r[8];} string53 = {458760, "Service"};
static struct {unsigned f; char r[16];} string54 = {786448, "ServiceRetry\000\000\000"};
static struct {unsigned f; char r[8];} string55 = {393224, "Stream\000"};
static struct {unsigned f; char r[8];} string56 = {458760, "Unknown"};
static struct {unsigned f; char r[36];} string57 = {2228260, "Failed to keep master for %g : %g\012\000"};
static struct {unsigned f; char r[32];} string58 = {1835040, "IP master for %g kept as %g\012\000\000\000"};
static struct {unsigned f; char r[20];} string59 = {1245204, "Spooling Queue Full"};
static struct {unsigned f; char r[24];} string60 = {1376280, "communication failure\000\000"};
static struct {unsigned f; char r[16];} string61 = {917520, " ... %lRETRY%l\000"};
static struct {unsigned f; char r[4];} string62 = {65540, "k\000\000"};
static struct {unsigned f; char r[4];} string63 = {65540, "K\000\000"};
static struct {unsigned f; char r[36];} string64 = {2097188, "%g error trying to print %g: %g\012\000\000\000"};
static struct {unsigned f; char r[36];} string65 = {2228260, "Failed to create IP master for %g\012\000"};
static struct {unsigned f; char r[8];} string66 = {262152, "Text\000\000\000"};
static struct {unsigned f; char r[8];} string67 = {393224, "Prefix\000"};
static struct {unsigned f; char r[4];} string68 = {131076, " (\000"};
static struct {unsigned f; char r[12];} string69 = {524300, ") device\000\000\000"};
static struct {unsigned f; char r[16];} string70 = {786448, "pageRotation\000\000\000"};
static struct {unsigned f; char r[12];} string71 = {655372, "IPProducer\000"};
static struct {unsigned f; char r[4];} string72 = {65540, ")\000\000"};
static struct {unsigned f; char r[16];} string73 = {786448, " [Saving...]\000\000\000"};
static struct {unsigned f; char r[12];} string74 = {524300, " [Split]\000\000\000"};
static struct {unsigned f; char r[12];} string75 = {524300, "usLetter\000\000\000"};
static struct {unsigned f; char r[4];} string76 = {131076, " \011\000"};
static struct {unsigned f; char r[4];} string77 = {196612, "tmp"};
static struct {unsigned f; char r[4];} string78 = {4, "\000\000\000"};
static struct {unsigned f; char r[16];} string79 = {917520, "/tmp/IP%x%g.ip\000"};
static struct {unsigned f; char r[24];} string80 = {1507352, "/tmp/StrangeFile%g%g.ip"};
static struct {unsigned f; char r[8];} string81 = {458760, "Failure"};
static struct {unsigned f; char r[28];} string82 = {1638428, "%lUnable to install %g%l\012\000\000"};
static struct {unsigned f; char r[4];} string83 = {65540, "b\000\000"};
static struct {unsigned f; char r[4];} string84 = {65540, "B\000\000"};
static struct {unsigned f; char r[8];} string85 = {458760, "Install"};
static struct {unsigned f; char r[16];} string86 = {851984, "\257\300\353\331\247\064\300\227\362\021\320\100\200\000\000"};
static struct {unsigned f; char r[16];} string87 = {786444, "\006\002\020\001\100\110\010\000\004\100\105\001\000\000\000"};
static struct {unsigned f; char r[16];} string88 = {851984, "\257\300\055\153\222\376\300\327\164\352\142\100\150\000\000"};
static struct {unsigned f; char r[16];} string89 = {851984, "\257\300\212\174\364\337\300\361\376\000\156\100\150\000\000"};
static struct {unsigned f; char r[16];} string90 = {851984, "\257\300\311\235\133\064\300\165\175\234\175\100\150\000\000"};
static struct {unsigned f; char r[16];} string91 = {851984, "\257\300\255\053\300\023\300\142\135\315\105\100\150\000\000"};
static struct {unsigned f; char r[16];} string92 = {851984, "\257\300\074\177\166\242\300\203\113\217\044\100\150\000\000"};
static struct {unsigned f; char r[16];} string93 = {851984, "\257\300\124\360\214\337\300\200\347\202\313\100\150\000\000"};
static struct {unsigned f; char r[16];} string94 = {851984, "\257\300\121\117\377\026\300\315\013\026\004\100\150\000\000"};
static struct {unsigned f; char r[16];} string95 = {851984, "\257\300\373\007\371\350\300\001\036\142\104\100\150\000\000"};
static struct {unsigned f; char r[16];} string96 = {851984, "\257\300\201\175\024\060\300\372\310\203\221\100\150\000\000"};
static struct {unsigned f; char r[16];} string97 = {851984, "\257\300\015\277\004\146\300\034\367\146\045\100\164\000\000"};
static struct {unsigned f; char r[16];} string98 = {851984, "\257\300\144\364\322\150\300\206\136\277\046\100\150\000\000"};
static struct {unsigned f; char r[16];} string99 = {851984, "\257\300\234\060\361\073\300\103\025\207\123\100\150\000\000"};
static struct {unsigned f; char r[16];} string100 = {851984, "\257\300\167\317\044\003\300\277\140\004\026\100\150\000\000"};
static struct {unsigned f; char r[16];} string101 = {851984, "\257\300\375\366\273\111\300\156\046\321\053\100\150\000\000"};
static struct {unsigned f; char r[16];} string102 = {851984, "\257\300\262\273\312\107\300\263\011\337\010\100\150\000\000"};
static struct {unsigned f; char r[16];} string103 = {851984, "\257\300\141\260\110\353\300\162\250\066\353\100\150\000\000"};
static struct {unsigned f; char r[16];} string104 = {851984, "\257\300\263\221\075\070\300\264\022\010\174\100\164\000\000"};
static struct {unsigned f; char r[16];} string105 = {851984, "\257\300\240\236\274\315\300\111\163\325\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string106 = {851984, "\257\300\246\205\220\035\300\344\000\142\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string107 = {851984, "\257\300\332\223\177\020\300\304\076\102\260\100\164\000\000"};
static struct {unsigned f; char r[16];} string108 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\100\150\000\000"};
static struct {unsigned f; char r[16];} string109 = {851984, "\257\300\243\162\130\311\300\344\000\142\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string110 = {851984, "\257\300\261\010\310\246\300\337\340\027\051\100\150\000\000"};
static struct {unsigned f; char r[16];} string111 = {851984, "\257\300\042\224\360\026\300\243\254\175\360\100\150\000\000"};
static struct {unsigned f; char r[16];} string112 = {851984, "\257\300\056\236\052\251\300\206\175\213\250\100\150\000\000"};
static struct {unsigned f; char r[16];} string113 = {851984, "\257\300\160\267\337\115\300\374\200\221\327\100\150\000\000"};
static struct {unsigned f; char r[16];} string114 = {851984, "\257\300\237\240\030\300\300\003\120\067\262\100\150\000\000"};
static struct {unsigned f; char r[16];} string115 = {851984, "\257\300\243\004\305\073\300\011\303\367\103\100\150\000\000"};
static struct {unsigned f; char r[16];} string116 = {851984, "\257\300\332\340\311\370\300\226\134\357\055\100\150\000\000"};
static struct {unsigned f; char r[16];} string117 = {851984, "\257\300\254\253\350\355\300\233\126\335\104\100\150\000\000"};
static struct {unsigned f; char r[16];} string118 = {851984, "\257\300\354\332\367\333\300\361\203\205\173\100\150\000\000"};
static struct {unsigned f; char r[16];} string119 = {851984, "\257\300\234\330\257\310\300\272\273\374\141\100\150\000\000"};
static struct {unsigned f; char r[16];} string120 = {851984, "\257\300\177\015\147\234\300\177\160\240\356\100\150\000\000"};
static struct {unsigned f; char r[16];} string121 = {851984, "\257\300\267\042\202\002\300\227\171\261\041\100\150\000\000"};
static struct {unsigned f; char r[16];} string122 = {851984, "\257\300\307\354\363\163\300\374\037\154\341\100\150\000\000"};
static struct {unsigned f; char r[16];} string123 = {851984, "\257\300\250\170\135\274\300\073\343\245\166\100\164\000\000"};
static struct {unsigned f; char r[24];} string124 = {1310744, "\211\010\007\124\157\157\154\122\145\160\300\250\170\135\274\300\073\343\245\166\000\000\000"};
static struct {unsigned f; char r[16];} string125 = {851984, "\257\300\307\354\363\163\300\374\037\154\341\100\200\000\000"};
static struct {unsigned f; char r[68];} string126 = {4390979, "\006\031\020\001\024\001\030\001\044\001\050\001\054\001\060\001\064\001\070\001\074\001\100\100\001\100\104\001\100\110\001\100\114\001\100\120\001\100\124\001\100\130\001\100\134\001\100\140\001\100\144\001\100\150\001\100\154\001\100\160\001\100\214\001\100\220\001"};
static struct {
word f0[88]; word f88; word f89; word f90;
word f91; word f92; word f93; word f94;
word f95; word f96; word f97; word f98;
word f99; word f100; word f101; word f102;
word f103; word f104; word f105; word f106;
word f107; word f108; word f109; word f110;
word f111; word f112; word f113; word f114;
word f115; word f116; word f117; word f118;
word f119; word f120; word f121; word f122;
word f123; word f124; word f125; word f126;
word f127; word f128; word f129; word f130;
word f131; word f132; word f133; word f134;
word f135; word f136; word f137; word f138;
word f139; word f140; word f141; word f142;
word f143; word f144; word f145; word f146;
word f147[44];
} globalframe = {
{0}, (word) Install←P1680, 0, (word) MakeIPFileName←P1620,
0, (word) PaperSizeMeters←P1560, 0, (word) PaperSize←P1500,
0, (word) FitInPage←P1440, 0, (word) FromScreen←P1380,
0, (word) DefaultViewerIPProducer←P1320, 0, (word) SetViewerPosition←P1260,
0, (word) RecursivelyPaintViewers←P1200, 0, (word) DoWhileViewerHidden←P1140,
0, (word) FromTiogaNode←P1080, 0, (word) FromTiogaFile←P1020,
0, (word) FromTiogaViewer←P960, 0, (word) GetGenerator←P900,
0, (word) PrintRequestProcess←P840, 0, (word) DoWithStatus←P780,
0, (word) ExpandName←P720, 0, (word) Wrap←P660,
0, (word) RaiseError←P600, 0, (word) ConstructFName←P540,
0, (word) CopyWithSuffix←P480, 0, (word) MakeIPMaster←P420,
0, (word) NewTmpMaster←P360, 0, (word) ExecutePrintRequest←P300,
0, (word) PrintScreen←P240, 0, (word) PrintViewer←P180,
0, (word) PrintFile←P120, 0, (word) Extension←P60,
0, (word) XTSetterPrintImpl←P0, 0, (word) 2147483647,
{0}
};
static void NoName←Q5232()
{
register ptr gf←c0605 = (ptr) &globalframe;
word var←c66416;
(* (( (ptr) gf←c0605)+6) ) = (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2);
(* (( (ptr) gf←c0605)+7) ) = (word) XR←GetTypeIndex((word) &string3, 0, (word) &string4);
(* (( (ptr) gf←c0605)+8) ) = (word) XR←GetTypeIndexS((word) (&string5));
(* (( (ptr) gf←c0605)+10) ) = (word) XR←GetTypeIndexS((word) (&string6));
(* (( (ptr) gf←c0605)+11) ) = (word) XR←GetTypeIndex((word) &string7, 0, (word) &string8);
(* (( (ptr) gf←c0605)+13) ) = (word) XR←GetTypeIndex((word) &string9, 0, (word) &string10);
(* (( (ptr) gf←c0605)+14) ) = (word) XR←GetTypeIndex((word) &string11, 0, (word) &string12);
(* (( (ptr) gf←c0605)+15) ) = (word) XR←GetTypeIndex((word) &string13, 0, (word) &string2);
(* (( (ptr) gf←c0605)+16) ) = (word) XR←GetTypeIndex((word) &string14, 0, (word) &string15);
(* (( (ptr) gf←c0605)+17) ) = (word) XR←GetTypeIndexS((word) (&string16));
(* (ptr) (( (bPt) gf←c0605)+72) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string17);
(* (ptr) (( (bPt) gf←c0605)+76) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string18);
(* (ptr) (( (bPt) gf←c0605)+80) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string19);
(* (ptr) (( (bPt) gf←c0605)+84) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string20);
(* (ptr) (( (bPt) gf←c0605)+88) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string21);
(* (ptr) (( (bPt) gf←c0605)+92) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string22);
(* (ptr) (( (bPt) gf←c0605)+96) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string23);
(* (ptr) (( (bPt) gf←c0605)+100) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string24);
(* (ptr) (( (bPt) gf←c0605)+104) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string25);
(* (ptr) (( (bPt) gf←c0605)+108) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string26);
(* (ptr) (( (bPt) gf←c0605)+112) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string27);
(* (ptr) (( (bPt) gf←c0605)+116) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string28);
(* (ptr) (( (bPt) gf←c0605)+120) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string29);
(* (ptr) (( (bPt) gf←c0605)+124) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string30);
(* (ptr) (( (bPt) gf←c0605)+128) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string31);
(* (ptr) (( (bPt) gf←c0605)+132) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string32);
(* (ptr) (( (bPt) gf←c0605)+136) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string33);
(* (ptr) (( (bPt) gf←c0605)+140) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string34);
(* (ptr) (( (bPt) gf←c0605)+144) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string35);
(* (ptr) (( (bPt) gf←c0605)+148) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string36);
(* (ptr) (( (bPt) gf←c0605)+152) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string37);
(* (ptr) (( (bPt) gf←c0605)+156) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+6) ), (word) &string38);
(* (ptr) (( (bPt) gf←c0605)+160) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string39);
(* (ptr) (( (bPt) gf←c0605)+164) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string40);
(* (ptr) (( (bPt) gf←c0605)+168) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string41);
(* (ptr) (( (bPt) gf←c0605)+172) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string42);
(* (ptr) (( (bPt) gf←c0605)+176) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string43);
(* (ptr) (( (bPt) gf←c0605)+180) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string44);
(* (ptr) (( (bPt) gf←c0605)+184) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string45);
(* (ptr) (( (bPt) gf←c0605)+188) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string46);
(* (ptr) (( (bPt) gf←c0605)+192) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string47);
(* (ptr) (( (bPt) gf←c0605)+196) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string48);
(* (ptr) (( (bPt) gf←c0605)+200) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string49);
(* (ptr) (( (bPt) gf←c0605)+204) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string50);
(* (ptr) (( (bPt) gf←c0605)+208) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string51);
(* (ptr) (( (bPt) gf←c0605)+212) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string52);
(* (ptr) (( (bPt) gf←c0605)+216) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string53);
(* (ptr) (( (bPt) gf←c0605)+220) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string54);
(* (ptr) (( (bPt) gf←c0605)+224) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string55);
(* (ptr) (( (bPt) gf←c0605)+228) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string56);
(* (ptr) (( (bPt) gf←c0605)+232) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string57);
(* (ptr) (( (bPt) gf←c0605)+236) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string58);
(* (ptr) (( (bPt) gf←c0605)+240) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string59);
(* (ptr) (( (bPt) gf←c0605)+244) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string60);
(* (ptr) (( (bPt) gf←c0605)+248) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string61);
(* (ptr) (( (bPt) gf←c0605)+252) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string62);
(* (ptr) (( (bPt) gf←c0605)+256) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string63);
(* (ptr) (( (bPt) gf←c0605)+260) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string64);
(* (ptr) (( (bPt) gf←c0605)+264) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string65);
(* (ptr) (( (bPt) gf←c0605)+268) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+6) ), (word) &string66);
(* (ptr) (( (bPt) gf←c0605)+272) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+6) ), (word) &string67);
(* (ptr) (( (bPt) gf←c0605)+276) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string68);
(* (ptr) (( (bPt) gf←c0605)+280) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string69);
(* (ptr) (( (bPt) gf←c0605)+284) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+6) ), (word) &string70);
(* (ptr) (( (bPt) gf←c0605)+288) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+6) ), (word) &string71);
(* (ptr) (( (bPt) gf←c0605)+292) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string72);
(* (ptr) (( (bPt) gf←c0605)+296) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string73);
(* (ptr) (( (bPt) gf←c0605)+300) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string74);
(* (ptr) (( (bPt) gf←c0605)+304) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string75);
(* (ptr) (( (bPt) gf←c0605)+308) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string76);
(* (ptr) (( (bPt) gf←c0605)+312) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string77);
(* (ptr) (( (bPt) gf←c0605)+316) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string78);
(* (ptr) (( (bPt) gf←c0605)+320) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string79);
(* (ptr) (( (bPt) gf←c0605)+324) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string80);
(* (ptr) (( (bPt) gf←c0605)+328) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+6) ), (word) &string81);
(* (ptr) (( (bPt) gf←c0605)+332) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string82);
(* (ptr) (( (bPt) gf←c0605)+336) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string83);
(* (ptr) (( (bPt) gf←c0605)+340) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string84);
(* (ptr) (( (bPt) gf←c0605)+344) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0605)+15) ), (word) &string85);
(void) XR←DeclareGlobalFrame((word) "XTSetterPrintImpl", &globalframe, (word) XR←GetTypeIndex((word) &string86, 0, (word) &string87)
, (word) (( (bPt) gf←c0605)+576)/* var←c59504 */ );
var←c66416 = (word) XR←ImportInterface((word) "Atom", (word) XR←GetTypeIndexS((word) (&string88)), 16);
(* (( (ptr) gf←c0605)+157)/* var←c59792 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 67635202);
(void) XR←ImportProcS(var←c66416, 67897859);
var←c66416 = (word) XR←ImportInterface((word) "BasicTime", (word) XR←GetTypeIndexS((word) (&string89)), 24);
(* (( (ptr) gf←c0605)+160)/* var←c60176 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 67111424);
var←c66416 = (word) XR←ImportInterface((word) "CommanderOps", (word) XR←GetTypeIndexS((word) (&string90)), 14);
(* (( (ptr) gf←c0605)+189)/* var←c66384 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 67634946);
var←c66416 = (word) XR←ImportInterface((word) "Convert", (word) XR←GetTypeIndexS((word) (&string91)), 73);
(* (( (ptr) gf←c0605)+168)/* var←c62416 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 68166916);
var←c66416 = (word) XR←ImportInterface((word) "Imager", (word) XR←GetTypeIndexS((word) (&string92)), 84);
(* (( (ptr) gf←c0605)+179)/* var←c64656 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 1319685);
(void) XR←ImportProcS(var←c66416, 530946);
(void) XR←ImportProcS(var←c66416, 266241);
(void) XR←ImportProcS(var←c66416, 791043);
(void) XR←ImportProcS(var←c66416, 1326597);
(void) XR←ImportProcS(var←c66416, 536578);
(void) XR←ImportProcS(var←c66416, 1593350);
(void) XR←ImportProcS(var←c66416, 526594);
(void) XR←ImportProcS(var←c66416, 527618);
(void) XR←ImportProcS(var←c66416, 790018);
(void) XR←ImportProcS(var←c66416, 527106);
var←c66416 = (word) XR←ImportInterface((word) "ImagerInterpress", (word) XR←GetTypeIndexS((word) (&string93)), 10);
(* (( (ptr) gf←c0605)+163)/* var←c61136 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 788227);
(void) XR←ImportProcS(var←c66416, 264193);
(void) XR←ImportProcS(var←c66416, 67633666);
var←c66416 = (word) XR←ImportInterface((word) "ImagerTransformation", (word) XR←GetTypeIndexS((word) (&string94)), 55);
(* (( (ptr) gf←c0605)+188)/* var←c65712 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 67636482);
(void) XR←ImportProcS(var←c66416, 67898882);
(void) XR←ImportProcS(var←c66416, 67371777);
var←c66416 = (word) XR←ImportInterface((word) "ImagerXCMap", (word) XR←GetTypeIndexS((word) (&string95)), 11);
(* (( (ptr) gf←c0605)+186)/* var←c65552 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 68160004);
var←c66416 = (word) XR←ImportInterface((word) "IPConverters", (word) XR←GetTypeIndexS((word) (&string96)), 14);
(* (( (ptr) gf←c0605)+165)/* var←c61712 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 69206280);
var←c66416 = (word) XR←ImportInterface((word) "IO", (word) XR←GetTypeIndexS((word) (&string97)), 103);
(* (( (ptr) gf←c0605)+159)/* var←c60112 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 2111493);
(void) XR←ImportProcS(var←c66416, 1063171);
(void) XR←ImportProcS(var←c66416, 68958724);
(void) XR←ImportProcS(var←c66416, 1071364);
var←c66416 = (word) XR←ImportInterface((word) "List", (word) XR←GetTypeIndexS((word) (&string98)), 28);
(* (( (ptr) gf←c0605)+180)/* var←c64912 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 67639810);
(void) XR←ImportProcS(var←c66416, 67639042);
var←c66416 = (word) XR←ImportInterface((word) "NodeProps", (word) XR←GetTypeIndexS((word) (&string99)), 28);
(* (( (ptr) gf←c0605)+175)/* var←c64496 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 67638530);
(void) XR←ImportProcS(var←c66416, 786435);
(void) XR←ImportProcS(var←c66416, 67633410);
(void) XR←ImportProcS(var←c66416, 67638786);
var←c66416 = (word) XR←ImportInterface((word) "NodeStyle", (word) XR←GetTypeIndexS((word) (&string100)), 41);
(* (( (ptr) gf←c0605)+178)/* var←c64624 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 67635202);
var←c66416 = (word) XR←ImportInterface((word) "NodeStyleOps", (word) XR←GetTypeIndexS((word) (&string101)), 23);
(* (( (ptr) gf←c0605)+176)/* var←c64560 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 68162308);
(void) XR←ImportProcS(var←c66416, 789251);
(void) XR←ImportProcS(var←c66416, 67109376);
var←c66416 = (word) XR←ImportInterface((word) "PieViewers", (word) XR←GetTypeIndexS((word) (&string102)), 2);
(* (( (ptr) gf←c0605)+164)/* var←c61488 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 524546);
var←c66416 = (word) XR←ImportInterface((word) "PFS", (word) XR←GetTypeIndexS((word) (&string103)), 40);
(* (( (ptr) gf←c0605)+155)/* var←c59664 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 67634178);
(void) XR←ImportProcS(var←c66416, 524802);
(void) XR←ImportProcS(var←c66416, 3150853);
(void) XR←ImportProcS(var←c66416, 1577475);
(void) XR←ImportProcS(var←c66416, 67380737);
(void) XR←ImportProcS(var←c66416, 134485505);
(void) XR←ImportProcS(var←c66416, 67633154);
(void) XR←ImportProcS(var←c66416, 71312136);
(void) XR←ImportProcS(var←c66416, 67371265);
(void) XR←ImportProcS(var←c66416, 605292546);
(void) XR←ImportProcS(var←c66416, 67109632);
var←c66416 = (word) XR←ImportInterface((word) "PFSNames", (word) XR←GetTypeIndexS((word) (&string104)), 39);
(* (( (ptr) gf←c0605)+167)/* var←c62352 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 1056516);
var←c66416 = (word) XR←ImportInterface((word) "Process", (word) XR←GetTypeIndexS((word) (&string105)), 22);
(* (( (ptr) gf←c0605)+162)/* var←c60592 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 67371777);
(void) XR←ImportProcS(var←c66416, 266497);
(void) XR←ImportProcS(var←c66416, 3584);
(void) XR←ImportProcS(var←c66416, 526081);
var←c66416 = (word) XR←ImportInterface((word) "Real", (word) XR←GetTypeIndexS((word) (&string106)), 11);
(* (( (ptr) gf←c0605)+185)/* var←c65456 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 67371521);
var←c66416 = (word) XR←ImportInterface((word) "RefText", (word) XR←GetTypeIndexS((word) (&string107)), 26);
(* (( (ptr) gf←c0605)+166)/* var←c62096 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 67371009);
(void) XR←ImportProcS(var←c66416, 262913);
(void) XR←ImportProcS(var←c66416, 68158980);
(void) XR←ImportProcS(var←c66416, 67634946);
(void) XR←ImportProcS(var←c66416, 67371521);
var←c66416 = (word) XR←ImportInterface((word) "Rope", (word) XR←GetTypeIndexS((word) (&string108)), 43);
(* (( (ptr) gf←c0605)+158)/* var←c59920 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 67900419);
(void) XR←ImportProcS(var←c66416, 68686086);
(void) XR←ImportProcS(var←c66416, 68419845);
(void) XR←ImportProcS(var←c66416, 67903235);
(void) XR←ImportProcS(var←c66416, 67633666);
(void) XR←ImportProcS(var←c66416, 68159236);
(void) XR←ImportProcS(var←c66416, 67373569);
(void) XR←ImportProcS(var←c66416, 67898627);
(void) XR←ImportProcS(var←c66416, 67896323);
(void) XR←ImportProcS(var←c66416, 67373313);
var←c66416 = (word) XR←ImportInterface((word) "SF", (word) XR←GetTypeIndexS((word) (&string109)), 19);
(* (( (ptr) gf←c0605)+187)/* var←c65648 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 68161025);
(void) XR←ImportProcS(var←c66416, 68160769);
var←c66416 = (word) XR←ImportInterface((word) "TextEdit", (word) XR←GetTypeIndexS((word) (&string110)), 39);
(* (( (ptr) gf←c0605)+172)/* var←c64176 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 793091);
var←c66416 = (word) XR←ImportInterface((word) "TextNode", (word) XR←GetTypeIndexS((word) (&string111)), 34);
(* (( (ptr) gf←c0605)+173)/* var←c64208 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 134485761);
(void) XR←ImportProcS(var←c66416, 68162307);
(void) XR←ImportProcS(var←c66416, 67373569);
var←c66416 = (word) XR←ImportInterface((word) "TiogaAccess", (word) XR←GetTypeIndexS((word) (&string112)), 32);
(* (( (ptr) gf←c0605)+171)/* var←c63984 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 267265);
(void) XR←ImportProcS(var←c66416, 67375617);
(void) XR←ImportProcS(var←c66416, 67901187);
(void) XR←ImportProcS(var←c66416, 67372801);
(void) XR←ImportProcS(var←c66416, 67111936);
(void) XR←ImportProcS(var←c66416, 67372289);
var←c66416 = (word) XR←ImportInterface((word) "TiogaAccessViewers", (word) XR←GetTypeIndexS((word) (&string113)), 4);
(* (( (ptr) gf←c0605)+170)/* var←c63888 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 67371265);
var←c66416 = (word) XR←ImportInterface((word) "TiogaImager", (word) XR←GetTypeIndexS((word) (&string114)), 19);
(* (( (ptr) gf←c0605)+174)/* var←c64368 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 1051651);
(void) XR←ImportProcS(var←c66416, 265985);
(void) XR←ImportProcS(var←c66416, 337117701);
var←c66416 = (word) XR←ImportInterface((word) "TJaM", (word) XR←GetTypeIndexS((word) (&string115)), 101);
(* (( (ptr) gf←c0605)+177)/* var←c64592 */ ) = var←c66416;
var←c66416 = (word) XR←ImportInterface((word) "VFonts", (word) XR←GetTypeIndexS((word) (&string116)), 8);
(* (( (ptr) gf←c0605)+183)/* var←c65200 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 67634178);
var←c66416 = (word) XR←ImportInterface((word) "ViewerLocks", (word) XR←GetTypeIndexS((word) (&string117)), 9);
(* (( (ptr) gf←c0605)+181)/* var←c65008 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 524290);
var←c66416 = (word) XR←ImportInterface((word) "ViewerOps", (word) XR←GetTypeIndexS((word) (&string118)), 43);
(* (( (ptr) gf←c0605)+156)/* var←c59696 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 1049348);
(void) XR←ImportProcS(var←c66416, 529410);
(void) XR←ImportProcS(var←c66416, 532994);
(void) XR←ImportProcS(var←c66416, 525314);
(void) XR←ImportProcS(var←c66416, 267521);
(void) XR←ImportProcS(var←c66416, 67639554);
(void) XR←ImportProcS(var←c66416, 527106);
(void) XR←ImportProcS(var←c66416, 67371265);
var←c66416 = (word) XR←ImportInterface((word) "ViewerPrivate", (word) XR←GetTypeIndexS((word) (&string119)), 68);
(* (( (ptr) gf←c0605)+184)/* var←c65296 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 1313797);
var←c66416 = (word) XR←ImportInterface((word) "ViewerSpecs", (word) XR←GetTypeIndexS((word) (&string120)), 24);
(* (( (ptr) gf←c0605)+182)/* var←c65136 */ ) = var←c66416;
var←c66416 = (word) XR←ImportInterface((word) "XNSPrint", (word) XR←GetTypeIndexS((word) (&string121)), 29);
(* (( (ptr) gf←c0605)+169)/* var←c62960 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 134480385);
(void) XR←ImportProcS(var←c66416, 68159748);
(void) XR←ImportProcS(var←c66416, 67373057);
var←c66416 = (word) XR←ImportInterface((word) "XTSetterPrivate", (word) XR←GetTypeIndexS((word) (&string122)), 5);
(* (( (ptr) gf←c0605)+161)/* var←c60496 */ ) = var←c66416;
(void) XR←ImportProcS(var←c66416, 525314);
(void) XR←ImportProcS(var←c66416, 262913);
(void) XR←ImportProcS(var←c66416, 67633410);
(void) XR←ImportProcS(var←c66416, 262657);
(void) XR←ImportProcS(var←c66416, 67633154);
var←c66416 = (word) XR←ExportInterface((word) "XTSetter", (word) XR←GetTypeIndexS((word) (&string123)), 20);
(* (( (ptr) gf←c0605)+190)/* var←c66448 */ ) = var←c66416;
(void) XR←ExportType((word) "ToolRep", (word) XR←GetTypeIndexS((word) (&string124)), (word) XR←GetTypeIndex((word) &string125, 0, (word) &string126)
);
(void) XR←ExportProcS(var←c66416, (word) (( (bPt) gf←c0605)+480)/* var←c59120 */ , 940049922, (word) "ExpandName");
(void) XR←ExportProcS(var←c66416, (word) (( (bPt) gf←c0605)+560)/* var←c59440 */ , 789763, (word) "PrintFile");
(void) XR←ExportProcS(var←c66416, (word) (( (bPt) gf←c0605)+552)/* var←c59408 */ , 790019, (word) "PrintViewer");
(void) XR←ExportProcS(var←c66416, (word) (( (bPt) gf←c0605)+544)/* var←c59376 */ , 790275, (word) "PrintScreen");
(void) XR←ExportProcS(var←c66416, (word) (( (bPt) gf←c0605)+456)/* var←c59024 */ , 67375617, (word) "GetGenerator");
(void) XR←ExportProcS(var←c66416, (word) (( (bPt) gf←c0605)+376)/* var←c58704 */ , 134484737, (word) "PaperSize");
}
static void XTSetterPrintImpl←P0(formal←c096, formal←c089)
word formal←c096;
word formal←c089;
{
register ptr gf←c66480 = (ptr) &globalframe;
/* XTSetterPrintImpl: */
SOURCE(2327, 32108)
/* moved to installation proc */
SOURCE(2921, 58)
{
word pd127;
pd127 = (* (( (ptr) (* (( (ptr) gf←c66480)+155)/* var←c59664 */ ))+7) );
(* (( (ptr) gf←c66480)+4)/* initialWorkingDirectory←v4540 */ ) = (word) ( *( (fPt) ((* (ptr) pd127 ))))(pd127);
};
SOURCE(34271, 78)
{
word class←v57856;
{
word pd128;
pd128 = (* (( (ptr) (* (( (ptr) gf←c66480)+156)/* var←c59696 */ ))+5) );
class←v57856 = (word) ( *( (fPt) ((* (ptr) pd128 ))))((* ((( (ptr) gf←c66480)+67)) ), pd128);
};
{
word var←c59728;
{
word var←c59760;
var←c59760 = XR←NewObject(4, (* (( (ptr) gf←c66480)+10) ));
(* (ptr) var←c59760 ) = XR←CheckProc((word) (( (bPt) gf←c66480)+448)/* var←c58992 */ );
var←c59728 = var←c59760;
};
{
word pd129;
pd129 = (* (( (ptr) (* (( (ptr) gf←c66480)+157)/* var←c59792 */ ))+14) );
(* (( (ptr) class←v57856)+19) ) = (word) ( *( (fPt) ((* (ptr) pd129 ))))((* (( (ptr) class←v57856)+19) ), (* (( (ptr) gf←c66480)+72)
), var←c59728, pd129);
};
};
};
SOURCE(34351, 84)
{
word class←v57808;
{
word pd130;
pd130 = (* (( (ptr) (* (( (ptr) gf←c66480)+156)/* var←c59696 */ ))+5) );
class←v57808 = (word) ( *( (fPt) ((* (ptr) pd130 ))))((* ((( (ptr) gf←c66480)+39)) ), pd130);
};
{
word var←c59824;
{
word var←c59856;
var←c59856 = XR←NewObject(4, (* (( (ptr) gf←c66480)+10) ));
(* (ptr) var←c59856 ) = XR←CheckProc((word) (( (bPt) gf←c66480)+448)/* var←c58992 */ );
var←c59824 = var←c59856;
};
{
word pd131;
pd131 = (* (( (ptr) (* (( (ptr) gf←c66480)+157)/* var←c59792 */ ))+14) );
(* (( (ptr) class←v57808)+19) ) = (word) ( *( (fPt) ((* (ptr) pd131 ))))((* (( (ptr) class←v57808)+19) ), (* (( (ptr) gf←c66480)+72)
), var←c59824, pd131);
};
};
};
}
static word Extension←P60(file←v5544, ext←v5572)
word file←v5544;
word ext←v5572;
{
register ptr gf←c66512 = (ptr) &globalframe;
word var←c5616;
W12 cp←v9300;
W14 var←c0101;
/* Extension: */
SOURCE(3012, 236)
SOURCE(3065, 44)
(void) ExpandName←P720((word) &var←c0101, file←v5544, 0);
cp←v9300 = (* (W12Pt) (( (ptr) &var←c0101)+1) );
SOURCE(3111, 137)
if (((* (( (ptr) &cp←v9300)+9) ) == 0)) {
SOURCE(3137, 32)
{
word pd132;
pd132 = (* (( (ptr) (* (( (ptr) gf←c66512)+158)/* var←c59920 */ ))+13) );
return((word) ( *( (fPt) ((* (ptr) pd132 ))))(ext←v5572, pd132));
};
}
else {
SOURCE(3169, 79)
{
word var←c59984;
{
word pd133;
word idx134;
word idx135;
pd133 = (* (( (ptr) (* (( (ptr) gf←c66512)+158)/* var←c59920 */ ))+17) );
var←c59984 = (word) ( *( (fPt) ((* (ptr) pd133 ))))(file←v5544, (
idx134 = (* (( (ptr) &cp←v9300)+8) ),
SGNCK(idx134)
), (
idx135 = (* (( (ptr) &cp←v9300)+9) ),
SGNCK(idx135)
), pd133);
};
{
word pd136;
pd136 = (* (( (ptr) (* (( (ptr) gf←c66512)+158)/* var←c59920 */ ))+8) );
return((word) ( *( (fPt) ((* (ptr) pd136 ))))(var←c59984, ext←v5572, 0, pd136));
};
};
};
}
static void PrintFile←P120(formal←c0762, formal←c0763, formal←c0764)
word formal←c0762;
word formal←c0763;
word formal←c0764;
{
W7 var←c66544;
/* declaration of tool←v5676 skipped */
/* declaration of file←v5704 skipped */
/* declaration of options←v5732 skipped */
var←c66544.f4/* tool←v5676 */ = formal←c0762;
var←c66544.f5/* file←v5704 */ = formal←c0763;
var←c66544.f6/* options←v5732 */ = formal←c0764;
/* PrintFile: */
SOURCE(3254, 652)
(void) (XR←MonitorEntry(var←c66544.f4/* tool←v5676 */ ));
SOURCE(3336, 570)
{
word var←c0699;
var←c0699 = (word) &var←c66544;
(void) (word) XR←Enable(( ((word) (fPt) NoName←Q5292) ), ( ((word) (fPt) NoName←Q6792) ), var←c0699);
};
SOURCE(3254, 652)
(void) (XR←MonitorExit(var←c66544.f4/* tool←v5676 */ ));
return;
}
static word NoName←Q5292(formal←c0609)
word formal←c0609;
{
register ptr gf←c0608 = (ptr) &globalframe;
SOURCE(3359, 26)
{
word info←v9344;
W14 var←c0107;
SOURCE(3359, 26)
info←v9344 = XR←NewObject(12, (* (( (ptr) gf←c0608)+13) ));
SOURCE(3387, 33)
(void) ExpandName←P720((word) &var←c0107, (* (( (ptr) formal←c0609)+5) ), 0);
(* (( (ptr) formal←c0609)+5) ) = (* (ptr) &var←c0107 );
SOURCE(3422, 66)
{
word var←c60048;
word var←c60080;
W9 var←c0110;
{
word pd137;
pd137 = (* (( (ptr) (* (( (ptr) gf←c0608)+155)/* var←c59664 */ ))+5) );
var←c60080 = (word) ( *( (fPt) ((* (ptr) pd137 ))))((* ((( (ptr) formal←c0609)+5)) ), pd137);
};
{
word pd138;
pd138 = (* (( (ptr) (* (( (ptr) gf←c0608)+155)/* var←c59664 */ ))+12) );
(void) ( *( (fPt) ((* (ptr) pd138 ))))((word) &var←c0110, var←c60080, (* (W4Pt) (( (ptr) gf←c0608)+146)/* var←c59568 */ ), pd138)
;
};
var←c60048 = (* (( (ptr) &var←c0110)+2) );
(* (ptr) info←v9344 ) = var←c60048;
};
SOURCE(3490, 17)
(* (( (ptr) info←v9344)+1) ) = (* (( (ptr) formal←c0609)+5) );
SOURCE(3509, 42)
(* (( (ptr) info←v9344)+2) ) = (word) MakeIPFileName←P1620((* (( (ptr) formal←c0609)+4) ), (* (( (ptr) formal←c0609)+5) ))
;
if (((0 != (word) Extension←P60((* (( (ptr) formal←c0609)+5) ), (* (( (ptr) gf←c0608)+36) ))) || (0 != (word) Extension←P60(
(* (( (ptr) formal←c0609)+5) ), (* (( (ptr) gf←c0608)+35) )))) || (0 != (word) Extension←P60((* (( (ptr) formal←c0609)+5)
), (* (( (ptr) gf←c0608)+18) )))) {
SOURCE(3688, 51)
(void) ExecutePrintRequest←P300((* (( (ptr) formal←c0609)+4) ), (* (( (ptr) formal←c0609)+6) ), info←v9344, 0, (* (( (ptr) formal←c0609)+5)
));
}
else {
if ((0 != (word) Extension←P60((* (( (ptr) formal←c0609)+5) ), (* (( (ptr) gf←c0608)+19) )))) {
SOURCE(3766, 66)
{
word pd139;
pd139 = (* (( (ptr) (* (( (ptr) gf←c0608)+159)/* var←c60112 */ ))+93) );
(void) ( *( (fPt) ((* (ptr) pd139 ))))((* (( (ptr) (* (( (ptr) formal←c0609)+4) ))+9) ), (* (( (ptr) gf←c0608)+20) ), 0, 2147483647, pd139)
;
};
}
else {
SOURCE(3845, 61)
(void) ExecutePrintRequest←P300((* (( (ptr) formal←c0609)+4) ), (* (( (ptr) formal←c0609)+6) ), info←v9344, (word) (( (bPt) gf←c0608)+440)
/* var←c58960 */ , (* (( (ptr) formal←c0609)+5) ));
};
};
};
return(0);
}
static void PrintViewer←P180(formal←c0765, formal←c0766, formal←c0767)
word formal←c0765;
word formal←c0766;
word formal←c0767;
{
W7 var←c66576;
/* declaration of tool←v5792 skipped */
/* declaration of v←v5820 skipped */
/* declaration of options←v5848 skipped */
var←c66576.f4/* tool←v5792 */ = formal←c0765;
var←c66576.f5/* v←v5820 */ = formal←c0766;
var←c66576.f6/* options←v5848 */ = formal←c0767;
/* PrintViewer: */
SOURCE(3912, 1435)
(void) (XR←MonitorEntry(var←c66576.f4/* tool←v5792 */ ));
SOURCE(3995, 1352)
{
word var←c01;
{
word var←c0700;
var←c0700 = (word) &var←c66576;
var←c01 = (word) XR←Enable(( ((word) (fPt) NoName←Q5352) ), ( ((word) (fPt) NoName←Q6732) ), var←c0700);
};
if ((var←c01 == 1)) {
goto lab←L03;
};
};
SOURCE(3912, 1435)
(void) (XR←MonitorExit(var←c66576.f4/* tool←v5792 */ ));
return;
lab←L03: ;
return;
}
static word NoName←Q5352(formal←c0611)
word formal←c0611;
{
register ptr gf←c0610 = (ptr) &globalframe;
SOURCE(4018, 26)
{
word info←v9388;
word hasName←v9416;
word hasFile←v9444;
SOURCE(4018, 26)
info←v9388 = XR←NewObject(12, (* (( (ptr) gf←c0610)+13) ));
SOURCE(4070, 42)
lab←L100006: ;
if (((* (( (ptr) (* (( (ptr) formal←c0611)+5) ))+22) ) != 0)) {
}
else {
goto lab←L100004;
};
SOURCE(4092, 20)
(* (( (ptr) formal←c0611)+5) ) = (* (( (ptr) (* (( (ptr) formal←c0611)+5) ))+22) );
goto lab←L100006;
lab←L100004: ;
SOURCE(4132, 26)
if ((* (( (bPt) (* (( (ptr) formal←c0611)+5) ))+77) ) & 0100) {
SOURCE(4152, 6)
(void) (XR←MonitorExit(* (( (ptr) formal←c0611)+4) ));
return(1);
};
SOURCE(4178, 33)
{
word pd140;
pd140 = (* (( (ptr) (* (( (ptr) gf←c0610)+158)/* var←c59920 */ ))+14) );
hasName←v9416 = (unsigned) ( (int)(word) ( *( (fPt) ((* (ptr) pd140 ))))((* ((( (ptr) (* (( (ptr) formal←c0611)+5) ))+13)
) ), pd140) != (int)0);
};
SOURCE(4213, 33)
{
word pd141;
pd141 = (* (( (ptr) (* (( (ptr) gf←c0610)+158)/* var←c59920 */ ))+14) );
hasFile←v9444 = (unsigned) ( (int)(word) ( *( (fPt) ((* (ptr) pd141 ))))((* ((( (ptr) (* (( (ptr) formal←c0611)+5) ))+14)
) ), pd141) != (int)0);
};
SOURCE(4248, 27)
{
word pd142;
pd142 = (* (( (ptr) (* (( (ptr) gf←c0610)+160)/* var←c60176 */ ))+14) );
(* (ptr) info←v9388 ) = (word) ( *( (fPt) ((* (ptr) pd142 ))))(pd142);
};
{
word tc143;
word pd144;
if (((0 != hasName←v9416) && (0 != hasFile←v9444))) {
pd144 = (* (( (ptr) (* (( (ptr) gf←c0610)+158)/* var←c59920 */ ))+11) );
tc143 = (word) ( (int)(word) ( *( (fPt) ((* (ptr) pd144 ))))((* (( (ptr) (* (( (ptr) formal←c0611)+5) ))+14) ), (* (( (ptr) (* (
( (ptr) formal←c0611)+5) ))+13) ), 0, 0, pd144) == (int)0);
}
else {
tc143 = (word) 0;
};
if (tc143) {
SOURCE(4432, 41)
{
word var←c60208;
W14 var←c0118;
(void) ExpandName←P720((word) &var←c0118, (* (( (ptr) (* (( (ptr) formal←c0611)+5) ))+14) ), 0);
var←c60208 = (* (ptr) &var←c0118 );
(* (( (ptr) info←v9388)+1) ) = var←c60208;
};
SOURCE(4501, 26)
(* (( (ptr) info←v9388)+2) ) = (* (( (ptr) info←v9388)+1) );
if ((* (( (bPt) (* (( (ptr) formal←c0611)+5) ))+76) ) & 02) {
SOURCE(4609, 51)
{
word pd145;
pd145 = (* (( (ptr) (* (( (ptr) gf←c0610)+158)/* var←c59920 */ ))+6) );
(* (( (ptr) info←v9388)+1) ) = (word) ( *( (fPt) ((* (ptr) pd145 ))))((* (( (ptr) info←v9388)+1) ), (* (( (ptr) gf←c0610)+21)
), pd145);
};
}
else {
if ((* (( (bPt) (* (( (ptr) formal←c0611)+5) ))+76) ) & 04) {
SOURCE(4678, 49)
{
word pd146;
pd146 = (* (( (ptr) (* (( (ptr) gf←c0610)+158)/* var←c59920 */ ))+6) );
(* (( (ptr) info←v9388)+1) ) = (word) ( *( (fPt) ((* (ptr) pd146 ))))((* (( (ptr) info←v9388)+1) ), (* (( (ptr) gf←c0610)+22)
), pd146);
};
}
else {
SOURCE(4740, 68)
{
word var←c60240;
word var←c60272;
W9 var←c0121;
{
word pd147;
pd147 = (* (( (ptr) (* (( (ptr) gf←c0610)+155)/* var←c59664 */ ))+5) );
var←c60272 = (word) ( *( (fPt) ((* (ptr) pd147 ))))((* ((( (ptr) (* (( (ptr) formal←c0611)+5) ))+14)) ), pd147);
};
{
word pd148;
pd148 = (* (( (ptr) (* (( (ptr) gf←c0610)+155)/* var←c59664 */ ))+12) );
(void) ( *( (fPt) ((* (ptr) pd148 ))))((word) &var←c0121, var←c60272, (* (W4Pt) (( (ptr) gf←c0610)+146)/* var←c59568 */ ), pd148)
;
};
var←c60240 = (* (( (ptr) &var←c0121)+2) );
(* (ptr) info←v9388 ) = var←c60240;
};
};
};
}
else {
if (((0 != hasName←v9416) && (0 != hasFile←v9444))) {
SOURCE(4838, 43)
{
word pd149;
pd149 = (* (( (ptr) (* (( (ptr) gf←c0610)+158)/* var←c59920 */ ))+6) );
(* (( (ptr) info←v9388)+1) ) = (word) ( *( (fPt) ((* (ptr) pd149 ))))((* (( (ptr) gf←c0610)+23) ), (* (( (ptr) (* (( (ptr) formal←c0611)+5)
))+13) ), pd149);
};
SOURCE(4883, 22)
(* (( (ptr) info←v9388)+2) ) = (* (( (ptr) (* (( (ptr) formal←c0611)+5) ))+14) );
}
else {
if ( ( (0 != hasName←v9416) ? (0 == hasFile←v9444) : 0 ) ) {
SOURCE(4936, 43)
{
word pd150;
pd150 = (* (( (ptr) (* (( (ptr) gf←c0610)+158)/* var←c59920 */ ))+6) );
(* (( (ptr) info←v9388)+1) ) = (word) ( *( (fPt) ((* (ptr) pd150 ))))((* (( (ptr) gf←c0610)+23) ), (* (( (ptr) (* (( (ptr) formal←c0611)+5)
))+13) ), pd150);
};
SOURCE(4981, 22)
(* (( (ptr) info←v9388)+2) ) = (* (( (ptr) (* (( (ptr) formal←c0611)+5) ))+13) );
}
else {
if ( ( (0 != hasFile←v9444) ? (0 == hasName←v9416) : 0 ) ) {
SOURCE(5034, 54)
{
word pd151;
pd151 = (* (( (ptr) (* (( (ptr) gf←c0610)+158)/* var←c59920 */ ))+6) );
(* (( (ptr) info←v9388)+1) ) = (word) ( *( (fPt) ((* (ptr) pd151 ))))((* (( (ptr) gf←c0610)+24) ), (* (( (ptr) (* (( (ptr) formal←c0611)+5)
/*1*/ ))+14) ), pd151);
};
SOURCE(5090, 22)
(* (( (ptr) info←v9388)+2) ) = (* (( (ptr) (* (( (ptr) formal←c0611)+5) ))+14) );
}
else {
SOURCE(5130, 29)
(* (( (ptr) info←v9388)+1) ) = (* (( (ptr) gf←c0610)+25) );
SOURCE(5161, 31)
(* (( (ptr) info←v9388)+2) ) = (* (( (ptr) gf←c0610)+26) );
};
};
};
};
};
SOURCE(5197, 51)
(* (( (ptr) info←v9388)+2) ) = (word) MakeIPFileName←P1620((* (( (ptr) formal←c0611)+4) ), (* (( (ptr) info←v9388)+2) ));
SOURCE(5287, 60)
{
word var←c60304;
var←c60304 = (word) GetGenerator←P900((* ((( (ptr) formal←c0611)+5)) ));
(void) ExecutePrintRequest←P300((* (( (ptr) formal←c0611)+4) ), (* (( (ptr) formal←c0611)+6) ), info←v9388, var←c60304, (* (
( (ptr) formal←c0611)+5) ));
};
};
return(0);
}
static void PrintScreen←P240(formal←c0768, formal←c0769, formal←c0770)
word formal←c0768;
word formal←c0769;
word formal←c0770;
{
W7 var←c66608;
/* declaration of tool←v5908 skipped */
/* declaration of screen←v5936 skipped */
/* declaration of options←v5964 skipped */
var←c66608.f4/* tool←v5908 */ = formal←c0768;
var←c66608.f5/* screen←v5936 */ = formal←c0769;
var←c66608.f6/* options←v5964 */ = formal←c0770;
/* PrintScreen: */
SOURCE(5353, 527)
(void) (XR←MonitorEntry(var←c66608.f4/* tool←v5908 */ ));
SOURCE(5441, 439)
{
word var←c0701;
var←c0701 = (word) &var←c66608;
(void) (word) XR←Enable(( ((word) (fPt) NoName←Q5412) ), ( ((word) (fPt) NoName←Q6672) ), var←c0701);
};
SOURCE(5353, 527)
(void) (XR←MonitorExit(var←c66608.f4/* tool←v5908 */ ));
return;
}
static word NoName←Q5412(formal←c0613)
word formal←c0613;
{
register ptr gf←c0612 = (ptr) &globalframe;
SOURCE(5464, 26)
{
word info←v9488;
W4 screenTitle←v9516;
W4 screenFile←v9544;
SOURCE(5464, 26)
info←v9488 = XR←NewObject(12, (* (( (ptr) gf←c0612)+13) ));
SOURCE(5492, 97)
screenTitle←v9516.f0 = (* (( (ptr) gf←c0612)+27) );
screenTitle←v9516.f1 = (* (( (ptr) gf←c0612)+28) );
screenTitle←v9516.f2 = (* (( (ptr) gf←c0612)+29) );
screenTitle←v9516.f3 = (* (( (ptr) gf←c0612)+30) );
SOURCE(5591, 91)
screenFile←v9544.f0 = (* (( (ptr) gf←c0612)+31) );
screenFile←v9544.f1 = (* (( (ptr) gf←c0612)+32) );
screenFile←v9544.f2 = (* (( (ptr) gf←c0612)+33) );
screenFile←v9544.f3 = (* (( (ptr) gf←c0612)+34) );
SOURCE(5684, 27)
{
word pd152;
pd152 = (* (( (ptr) (* (( (ptr) gf←c0612)+160)/* var←c60176 */ ))+14) );
(* (ptr) info←v9488 ) = (word) ( *( (fPt) ((* (ptr) pd152 ))))(pd152);
};
SOURCE(5713, 32)
(* (( (ptr) info←v9488)+1) ) = (* (( (ptr) &screenTitle←v9516)+(* (( (ptr) formal←c0613)+5) )) );
SOURCE(5747, 56)
(* (( (ptr) info←v9488)+2) ) = (word) MakeIPFileName←P1620((* (( (ptr) formal←c0613)+4) ), (* (( (ptr) &screenFile←v9544)+(* (
( (ptr) formal←c0613)+5) )) ));
SOURCE(5805, 75)
{
word var←c60432;
{
word var←c60464;
var←c60464 = XR←NewObject(4, (* (( (ptr) gf←c0612)+17) ));
(* (ptr) var←c60464 ) = (* (( (ptr) formal←c0613)+5) );
var←c60432 = var←c60464;
};
(void) ExecutePrintRequest←P300((* (( (ptr) formal←c0613)+4) ), (* (( (ptr) formal←c0613)+6) ), info←v9488, (word) (( (bPt) gf←c0612)+392)
/* var←c58768 */ , var←c60432);
};
};
return(0);
}
static void ExecutePrintRequest←P300(tool←v6024, options←v6052, info←v6080, producer←v6108, source←v6136)
word tool←v6024;
word options←v6052;
word info←v6080;
word producer←v6108;
word source←v6136;
{
register ptr gf←c66640 = (ptr) &globalframe;
word optionsCopy←v9620 = 0;
/* ExecutePrintRequest: */
SOURCE(5886, 349)
SOURCE(6025, 111)
if ((options←v6052 == 0)) {
SOURCE(6045, 50)
{
word pd153;
pd153 = (* (( (ptr) (* (( (ptr) gf←c66640)+161)/* var←c60496 */ ))+4) );
optionsCopy←v9620 = (word) ( *( (fPt) ((* (ptr) pd153 ))))(tool←v6024, 1, pd153);
};
}
else {
SOURCE(6095, 41)
{
word var←c60528;
var←c60528 = XR←NewObject(48, (* (( (ptr) gf←c66640)+16) ));
(* (W12Pt) var←c60528 ) = (* (W12Pt) options←v6052 );
optionsCopy←v9620 = var←c60528;
};
};
SOURCE(6146, 89)
SOURCE(6148, 85)
{
W2 var←c60560;
{
W2 var←c0140;
word var←c0139;
var←c0139 = XR←ExtensionAlloc(9);
{
word tmpAddr154;
tmpAddr154 = (word) var←c0139;
(* (ptr) tmpAddr154 ) = ( ((word) (fPt) NoName←Q6852) );
(* (( (ptr) tmpAddr154) + 1) ) = 0;
(* (( (ptr) tmpAddr154) + 2) ) = (word) (( (bPt) gf←c66640)+464)/* var←c59056 */ ;
(* (( (ptr) tmpAddr154) + 3) ) = 0;
(* (( (ptr) tmpAddr154) + 4) ) = tool←v6024;
(* (( (ptr) tmpAddr154) + 5) ) = optionsCopy←v9620;
(* (( (ptr) tmpAddr154) + 6) ) = info←v6080;
(* (( (ptr) tmpAddr154) + 7) ) = producer←v6108;
(* (( (ptr) tmpAddr154) + 8) ) = source←v6136;
};
(void) XR←Fork((word) &var←c0140, var←c0139);
var←c60560 = var←c0140;
};
{
word pd155;
pd155 = (* (( (ptr) (* (( (ptr) gf←c66640)+162)/* var←c60592 */ ))+11) );
(void) ( *( (fPt) ((* (ptr) pd155 ))))(var←c60560, pd155);
};
};
}
static void NewTmpMaster←P360(formal←c0149, formal←c0771, formal←c0772, formal←c0773)
word formal←c0149;
word formal←c0771;
W2 formal←c0772;
word formal←c0773;
{
W10 var←c66672;
/* declaration of tool←v6212 skipped */
/* declaration of version←v6240 skipped */
/* declaration of compressed←v6268 skipped */
/* declaration of master←v6312 skipped */
/* declaration of fileName←v6340 skipped */
(* (( (ptr) &var←c66672)+4)/* tool←v6212 */ ) = formal←c0771;
(* (W2Pt) (( (ptr) &var←c66672)+5)/* version←v6240 */ ) = formal←c0772;
(* (( (ptr) &var←c66672)+7)/* compressed←v6268 */ ) = formal←c0773;
/* NewTmpMaster: */
SOURCE(6242, 809)
(void) (XR←MonitorEntry(* (( (ptr) &var←c66672)+4)/* tool←v6212 */ ));
SOURCE(6242, 809)
(* (( (ptr) &var←c66672)+8)/* master←v6312 */ ) = 0;
SOURCE(6242, 809)
(* (( (ptr) &var←c66672)+9)/* fileName←v6340 */ ) = 0;
SOURCE(6384, 667)
{
word var←c0702;
var←c0702 = (word) &var←c66672;
(void) (word) XR←Enable(( ((word) (fPt) NoName←Q5472) ), ( ((word) (fPt) NoName←Q6612) ), var←c0702);
};
/* removed tail goto */
(void) (XR←MonitorExit(* (( (ptr) &var←c66672)+4)/* tool←v6212 */ ));
(* (ptr) formal←c0149 ) = (* (( (ptr) &var←c66672)+8)/* master←v6312 */ );
(* (( (ptr) formal←c0149)+1) ) = (* (( (ptr) &var←c66672)+9)/* fileName←v6340 */ );
return;
}
static word NoName←Q5472(formal←c0616)
word formal←c0616;
{
register ptr gf←c0615 = (ptr) &globalframe;
SOURCE(6407, 20)
{
word outStream←v9664 = 0;
word id←v9692;
word suffix←v9720 = 0;
word header←v9748 = 0;
SOURCE(6429, 35)
id←v9692 = (* (( (ptr) formal←c0616)+4) );
if ((0 != (* (( (ptr) formal←c0616)+7) ))) {
SOURCE(6520, 17)
suffix←v9720 = (* (( (ptr) gf←c0615)+35) );
SOURCE(6539, 16)
(* (( (ptr) formal←c0616)+5) ) = 2;
(* (( (ptr) formal←c0616)+6) ) = 0;
}
else {
if (((* (( (ptr) formal←c0616)+5) ) < 3)) {
SOURCE(6577, 13)
suffix←v9720 = (* (( (ptr) gf←c0615)+36) );
}
else {
SOURCE(6603, 21)
suffix←v9720 = (* (( (ptr) gf←c0615)+18) );
};
};
SOURCE(6626, 90)
{
W2 var←c60624;
W2 var←c60720;
{
word v←v58528;
{
word idx156;
v←v58528 = (
idx156 = (* (( (ptr) formal←c0616)+5) ),
SGNCK(idx156)
);
};
var←c60624.f0 = 5;
var←c60624.f1 = v←v58528;
};
{
word v←v58480;
{
word idx157;
v←v58480 = (
idx157 = (* (( (ptr) formal←c0616)+6) ),
SGNCK(idx157)
);
};
var←c60720.f0 = 5;
var←c60720.f1 = v←v58480;
};
{
W2 var←c0703;
(* (ptr) (word) &var←c0703 ) = 0;
(* (( (ptr) (word) &var←c0703) + 1) ) = 0;
{
word pd158;
pd158 = (* (( (ptr) (* (( (ptr) gf←c0615)+159)/* var←c60112 */ ))+62) );
header←v9748 = (word) ( *( (fPt) ((* (ptr) pd158 ))))((* (( (ptr) gf←c0615)+37) ), var←c60624, var←c60720, var←c0703, pd158)
;
};
};
};
SOURCE(6718, 88)
{
W2 var←c60848;
{
W2 var←c60880;
word v←v58432;
v←v58432 = (* (( (ptr) (* (( (ptr) formal←c0616)+4) ))+37) );
var←c60880.f0 = 5;
var←c60880.f1 = v←v58432;
var←c60848 = var←c60880;
};
{
W2 var←c60944;
W2 var←c60976;
var←c60944.f0 = 4;
var←c60944.f1 = id←v9692;
var←c60976.f0 = 11;
var←c60976.f1 = suffix←v9720;
{
word pd159;
pd159 = (* (( (ptr) (* (( (ptr) gf←c0615)+159)/* var←c60112 */ ))+62) );
(* (( (ptr) formal←c0616)+9) ) = (word) ( *( (fPt) ((* (ptr) pd159 ))))((* (( (ptr) gf←c0615)+38) ), var←c60944, var←c60848, var←c60976, pd159)
;
};
};
};
SOURCE(6808, 29)
(* (( (ptr) (* (( (ptr) formal←c0616)+4) ))+37) ) = ((* (( (ptr) (* (( (ptr) formal←c0616)+4) ))+37) ) + 1);
SOURCE(6839, 62)
{
word var←c61008;
{
word pd160;
pd160 = (* (( (ptr) (* (( (ptr) gf←c0615)+155)/* var←c59664 */ ))+5) );
var←c61008 = (word) ( *( (fPt) ((* (ptr) pd160 ))))((* ((( (ptr) formal←c0616)+9)) ), pd160);
};
{
W2 var←c61040;
var←c61040.f0 = 4096;
var←c61040.f1 = 2;
{
word pd161;
pd161 = (* (( (ptr) (* (( (ptr) gf←c0615)+155)/* var←c59664 */ ))+39) );
outStream←v9664 = (word) ( *( (fPt) ((* (ptr) pd161 ))))(var←c61008, 2, (* (W4Pt) (( (ptr) gf←c0615)+146)/* var←c59568 */ ), 0, 0, (* (W5Pt) (
( (ptr) gf←c0615)+150)/* var←c59632 */ )
, 1, var←c61040, pd161);
};
};
};
SOURCE(6903, 85)
{
word var←c61104;
W2 var←c0167;
word var←c61072;
{
word pd162;
pd162 = (* (( (ptr) (* (( (ptr) gf←c0615)+155)/* var←c59664 */ ))+42) );
var←c61104 = (word) ( *( (fPt) ((* (ptr) pd162 ))))(outStream←v9664, pd162);
};
{
word pd163;
pd163 = (* (( (ptr) (* (( (ptr) gf←c0615)+155)/* var←c59664 */ ))+26) );
(void) ( *( (fPt) ((* (ptr) pd163 ))))((word) &var←c0167, var←c61104, pd163);
};
var←c61072 = var←c0167.f0;
{
word pd164;
pd164 = (* (( (ptr) (* (( (ptr) gf←c0615)+155)/* var←c59664 */ ))+4) );
(* (( (ptr) formal←c0616)+9) ) = (word) ( *( (fPt) ((* (ptr) pd164 ))))(var←c61072, 0, pd164);
};
};
SOURCE(6990, 61)
{
word pd165;
pd165 = (* (( (ptr) (* (( (ptr) gf←c0615)+163)/* var←c61136 */ ))+6) );
(* (( (ptr) formal←c0616)+8) ) = (word) ( *( (fPt) ((* (ptr) pd165 ))))(outStream←v9664, header←v9748, pd165);
};
};
return(0);
}
static void MakeIPMaster←P420(formal←c0191, formal←c0774, formal←c0775, formal←c0776, info←v6484, producer←v6512, source←v6540)
word formal←c0191;
word formal←c0774;
word formal←c0775;
word formal←c0776;
word info←v6484;
word producer←v6512;
word source←v6540;
{
W16 var←c66704;
/* declaration of tool←v6400 skipped */
/* declaration of status←v6428 skipped */
/* declaration of options←v6456 skipped */
register ptr gf←c66736 = (ptr) &globalframe;
/* declaration of ipName←v6596 skipped */
/* declaration of temp←v6624 skipped */
/* declaration of pages←v6652 skipped */
/* declaration of var←c61168 skipped */
/* declaration of var←c61200 skipped */
(* (( (ptr) &var←c66704)+4)/* tool←v6400 */ ) = formal←c0774;
(* (( (ptr) &var←c66704)+5)/* status←v6428 */ ) = formal←c0775;
(* (( (ptr) &var←c66704)+6)/* options←v6456 */ ) = formal←c0776;
/* MakeIPMaster: */
SOURCE(7057, 1973)
{
word tmpAddr166;
tmpAddr166 = (word) (( (ptr) &var←c66704)+10)/* var←c61168 */ ;
(* (ptr) tmpAddr166 ) = ( ((word) (fPt) Compress←P1992) );
(* (( (ptr) tmpAddr166) + 1) ) = 1;
};
{
word tmpAddr167;
tmpAddr167 = (word) (( (ptr) &var←c66704)+12)/* var←c61200 */ ;
(* (ptr) tmpAddr167 ) = ( ((word) (fPt) IPStatusUpdate←P1932) );
(* (( (ptr) tmpAddr167) + 1) ) = 1;
};
SOURCE(7057, 1973)
(* (( (ptr) &var←c66704)+7)/* ipName←v6596 */ ) = 0;
{
word var←c61328;
SOURCE(8237, 12)
(* (( (ptr) &var←c66704)+8)/* temp←v6624 */ ) = 0;
if ((producer←v6512 != 0)) {
SOURCE(8312, 578)
{
word master←v9924 = 0;
W2 version←v9952;
SOURCE(8368, 102)
if ((0 != (* (( (ptr) (* (( (ptr) &var←c66704)+6)/* options←v6456 */ ))+1) ))) {
version←v9952.f0 = 3;
version←v9952.f1 = 0;
}
else {
version←v9952 = (* (W2Pt) (* (( (ptr) (* (( (ptr) &var←c66704)+4)/* tool←v6400 */ ))+5) ) );
};
SOURCE(8472, 53)
{
W2 var←c61264;
(void) NewTmpMaster←P360((word) &var←c61264, (* (( (ptr) &var←c66704)+4)/* tool←v6400 */ ), version←v9952, 0);
(* (( (ptr) &var←c66704)+7)/* ipName←v6596 */ ) = var←c61264.f1;
master←v9924 = var←c61264.f0;
};
SOURCE(8527, 11)
(* (( (ptr) &var←c66704)+8)/* temp←v6624 */ ) = 1;
SOURCE(8540, 78)
(* (( (ptr) &var←c66704)+9)/* pages←v6652 */ ) = (word) ( *( (fPt) ((* (ptr) producer←v6512 ))))(source←v6540, (* (( (ptr) &var←c66704)+6)
/* options←v6456 */ ), info←v6484, master←v9924, (* (( (ptr) (* (( (ptr) &var←c66704)+4)/* tool←v6400 */ ))+9) ), (word) (
( (bPt) &var←c66704)+48)/* var←c61200 */ , producer←v6512);
SOURCE(8620, 46)
if ((0 != (* (( (ptr) (* (( (ptr) &var←c66704)+5)/* status←v6428 */ ))+6) )) || ( (int)(* (( (ptr) &var←c66704)+9)/* pages←v6652 */ ) <= (int)0)) {
SOURCE(8660, 6)
goto lab←L100016;
};
SOURCE(8701, 143)
if ((0 != (* (( (ptr) (* (( (ptr) &var←c66704)+6)/* options←v6456 */ ))+1) ))) {
SOURCE(8726, 161)
{
word intermediateIP←v9996;
SOURCE(8728, 29)
intermediateIP←v9996 = (* (( (ptr) &var←c66704)+7)/* ipName←v6596 */ );
SOURCE(8759, 24)
(void) Compress←P1992(intermediateIP←v9996, (word) (( (bPt) &var←c66704)+40)/* var←c61168 */ );
SOURCE(8785, 59)
SOURCE(8785, 59)
{
/* declaration of var←c61296 skipped */
{
word pd168;
pd168 = (* (( (ptr) (* (( (ptr) gf←c66736)+155)/* var←c59664 */ ))+5) );
(* (( (ptr) &var←c66704)+14)/* var←c61296 */ ) = (word) ( *( (fPt) ((* (ptr) pd168 ))))(intermediateIP←v9996, pd168);
};
{
/* declaration of var←c02 skipped */
(* (( (ptr) &var←c66704)+15)/* var←c02 */ ) = (* (( (ptr) (* (( (ptr) gf←c66736)+155)/* var←c59664 */ ))+22) );
{
word var←c03;
{
/*1*/ word var←c0704;
/*1*/ var←c0704 = (word) &var←c66704;
/*1*/ var←c03 = (word) XR←Enable(( ((word) (fPt) NoName←Q5532) ), ( ((word) (fPt) NoName←Q6552) ), var←c0704);
/*1*/ };
/* removed trivial cond node */
};
};
};
};
};
};
}
else {
{
word tc169;
if ((0 != (* (( (ptr) (* (( (ptr) &var←c66704)+6)/* options←v6456 */ ))+1) ))) {
{
word var←c61360;
var←c61360 = XR←Narrow(source←v6540, (* (( (ptr) gf←c66736)+14) ));
if ((var←c61360 == 0)) {
goto lab←L100021;
};
if (( (unsigned) (*(int*)var←c61360<0) == 0)) {
goto lab←L100021;
};
(void) XR←RaiseError(XR←NarrowFault, 0);
lab←L100021: ;
var←c61328 = var←c61360;
};
tc169 = (word) (0 == (word) Extension←P60(var←c61328, (* (( (ptr) gf←c66736)+35) )));
}
else {
tc169 = (word) 0;
};
if (tc169) {
SOURCE(8957, 24)
{
word var←c61392;
{
word var←c61424;
var←c61424 = XR←Narrow(source←v6540, (* (( (ptr) gf←c66736)+14) ));
if ((var←c61424 == 0)) {
goto lab←L100022;
};
if (( (unsigned) (*(int*)var←c61424<0) == 0)) {
goto lab←L100022;
};
(void) XR←RaiseError(XR←NarrowFault, 0);
lab←L100022: ;
var←c61392 = var←c61424;
};
(void) Compress←P1992(var←c61392, (word) (( (bPt) &var←c66704)+40)/* var←c61168 */ );
};
}
else {
SOURCE(8995, 24)
{
word var←c61456;
var←c61456 = XR←Narrow(source←v6540, (* (( (ptr) gf←c66736)+14) ));
if ((var←c61456 == 0)) {
goto lab←L100023;
};
if (( (unsigned) (*(int*)var←c61456<0) == 0)) {
goto lab←L100023;
};
(void) XR←RaiseError(XR←NarrowFault, 0);
lab←L100023: ;
(* (( (ptr) &var←c66704)+7)/* ipName←v6596 */ ) = var←c61456;
};
SOURCE(9021, 9)
(* (( (ptr) &var←c66704)+9)/* pages←v6652 */ ) = 1;
};
};
};
};
/* removed tail goto */
lab←L100016: ;
(* (ptr) formal←c0191 ) = (* (( (ptr) &var←c66704)+7)/* ipName←v6596 */ );
(* (( (ptr) formal←c0191)+1) ) = (* (( (ptr) &var←c66704)+8)/* temp←v6624 */ );
(* (( (ptr) formal←c0191)+2) ) = (* (( (ptr) &var←c66704)+9)/* pages←v6652 */ );
return;
}
static word NoName←Q5532(formal←c0619)
word formal←c0619;
{
register ptr gf←c0618 = (ptr) &globalframe;
SOURCE(8785, 59)
{
word pd170;
pd170 = (* (( (ptr) formal←c0619)+15) );
(void) ( *( (fPt) ((* (ptr) pd170 ))))((* (( (ptr) formal←c0619)+14) ), (* (W4Pt) (( (ptr) gf←c0618)+146)/* var←c59568 */ ), 0, pd170)
;
};
return(0);
}
static word IPStatusUpdate←P1932(percent←v49852, formal←c66800)
word percent←v49852;
word formal←c66800;
{
register ptr gf←c66768 = (ptr) &globalframe;
word stop←v49896;
formal←c66800 = (formal←c66800 - 48);
/* IPStatusUpdate: */
SOURCE(7227, 217)
SOURCE(7270, 61)
if (((* (( (ptr) (* (( (ptr) formal←c66800)+5) ))+2) ) == 0) || (* (( (bPt) (* (( (ptr) (* (( (ptr) formal←c66800)+5) ))+2)
))+77) ) & 0100) {
SOURCE(7317, 14)
return(0);
};
SOURCE(7373, 41)
{
word pd171;
word x173;
word x174;
float tf175;
pd171 = (* (( (ptr) (* (( (ptr) gf←c66768)+164)/* var←c61488 */ ))+5) );
(void) ( *( (fPt) ((* (ptr) pd171 ))))((* (( (ptr) (* (( (ptr) formal←c66800)+5) ))+2) ), (
tf175 = (
x173 = (* (ptr) &fc172 ), *(float*)&x173
) - (
x174 = percent←v49852, *(float*)&x174
), *(word*)&tf175
), pd171);
};
SOURCE(7416, 28)
return((* (( (ptr) (* (( (ptr) formal←c66800)+5) ))+6) ));
}
static void Compress←P1992(from←v9896, formal←c66896)
word from←v9896;
word formal←c66896;
{
W8 var←c66832;
register ptr gf←c66864 = (ptr) &globalframe;
/* declaration of var←c61520 skipped */
/* declaration of var←c61552 skipped */
word master←v10096 = 0;
word failed←v10124;
word pageWidth←v10152;
word pageHeight←v10180;
formal←c66896 = (formal←c66896 - 40);
var←c66832.f0 = formal←c66896;
/* Compress: */
SOURCE(7449, 753)
{
word tmpAddr176;
tmpAddr176 = (word) (( (ptr) &var←c66832)+4)/* var←c61520 */ ;
(* (ptr) tmpAddr176 ) = ( ((word) (fPt) EndPage←P2208) );
(* (( (ptr) tmpAddr176) + 1) ) = 1;
};
{
word tmpAddr177;
tmpAddr177 = (word) (( (ptr) &var←c66832)+6)/* var←c61552 */ ;
(* (ptr) tmpAddr177 ) = ( ((word) (fPt) BeginPage←P2148) );
(* (( (ptr) tmpAddr177) + 1) ) = 1;
};
SOURCE(7822, 76)
{
W2 var←c61584;
(void) PaperSizeMeters←P1560((word) &var←c61584, (* (( (ptr) (* (( (ptr) formal←c66896)+6) ))+6) ));
pageWidth←v10152 = var←c61584.f1;
pageHeight←v10180 = var←c61584.f0;
};
SOURCE(7900, 51)
{
W2 var←c61648;
{
W2 var←c0205;
{
W2 var←c61616;
var←c61616.f0 = 2;
var←c61616.f1 = 0;
(void) NewTmpMaster←P360((word) &var←c0205, (* (( (ptr) formal←c66896)+4) ), var←c61616, 1);
};
var←c61648 = var←c0205;
};
(* (( (ptr) formal←c66896)+7) ) = var←c61648.f1;
master←v10096 = var←c61648.f0;
};
SOURCE(7953, 11)
(* (( (ptr) formal←c66896)+8) ) = 1;
SOURCE(7966, 25)
{
word var←c61680;
var←c61680 = (word) IPStatusUpdate←P1932((* (ptr) &fc178 ), (word) (( (bPt) formal←c66896)+48));
};
SOURCE(8025, 118)
{
word pd179;
pd179 = (* (( (ptr) (* (( (ptr) gf←c66864)+165)/* var←c61712 */ ))+5) );
failed←v10124 = (word) ( *( (fPt) ((* (ptr) pd179 ))))(from←v9896, master←v10096, (word) (( (bPt) &var←c66832)+24)/* var←c61552 */ , (word) (
( (bPt) &var←c66832)+16)/* var←c61520 */ , (* (( (ptr) (* (( (ptr) formal←c66896)+4) ))+9) ), pageWidth←v10152
, pageHeight←v10180, 0, pd179);
};
SOURCE(8145, 30)
{
word pd180;
pd180 = (* (( (ptr) (* (( (ptr) gf←c66864)+163)/* var←c61136 */ ))+12) );
(void) ( *( (fPt) ((* (ptr) pd180 ))))(master←v10096, pd180);
};
SOURCE(8177, 25)
if ((0 != failed←v10124)) {
SOURCE(8192, 10)
(* (( (ptr) formal←c66896)+9) ) = (word) -1;
};
}
static word BeginPage←P2148(pageNumber←v50516, totalPages←v50544, formal←c66928)
word pageNumber←v50516;
word totalPages←v50544;
word formal←c66928;
{
word stop←v50588;
formal←c66928 = (formal←c66928 - 24);
/* BeginPage: */
SOURCE(7481, 39)
SOURCE(7481, 39)
stop←v50588 = 0;
SOURCE(7481, 39)
return(stop←v50588);
}
static word EndPage←P2208(pageNumber←v50648, totalPages←v50676, formal←c66960)
word pageNumber←v50648;
word totalPages←v50676;
word formal←c66960;
{
word stop←v50720;
formal←c66960 = (formal←c66960 - 16);
/* EndPage: */
SOURCE(7548, 196)
SOURCE(7548, 196)
stop←v50720 = 0;
SOURCE(7587, 70)
if ((( (int)totalPages←v50676 <= (int)0) || ( (int)pageNumber←v50648 <= (int)0)) || ( (int)pageNumber←v50648 > (int)totalPages←v50676)) {
SOURCE(7651, 6)
return(stop←v50720);
};
SOURCE(7659, 18)
(* (( (ptr) (* (ptr) formal←c66960 ))+9) ) = pageNumber←v50648;
SOURCE(7679, 65)
{
word x181;
float tf182;
if ((0 != (word) IPStatusUpdate←P1932((
tf182 = ((
x181 = (* (ptr) &fc172 ), *(float*)&x181
) * (float)(int)pageNumber←v50648) / (float)(int)totalPages←v50676, *(word*)&tf182
), (word) (( (bPt) (* (ptr) formal←c66960 ))+48)))) {
SOURCE(7733, 11)
stop←v50720 = 1;
};
};
SOURCE(7548, 196)
return(stop←v50720);
}
static void CopyWithSuffix←P480(formal←c0217, formal←c0777, formal←c0778)
word formal←c0217;
word formal←c0777;
word formal←c0778;
{
W8 var←c66992;
/* declaration of from←v6712 skipped */
/* declaration of to←v6740 skipped */
/* declaration of msg←v6784 skipped */
/* declaration of failed←v6812 skipped */
var←c66992.f4/* from←v6712 */ = formal←c0777;
var←c66992.f5/* to←v6740 */ = formal←c0778;
/* CopyWithSuffix: */
SOURCE(9158, 790)
SOURCE(9158, 790)
var←c66992.f6/* msg←v6784 */ = 0;
SOURCE(9232, 716)
SOURCE(9234, 680)
{
word var←c04;
{
word var←c0705;
var←c0705 = (word) &var←c66992;
var←c04 = (word) XR←Enable(( ((word) (fPt) NoName←Q5592) ), ( ((word) (fPt) NoName←Q6492) ), var←c0705);
};
if ((var←c04 == 3)) {
goto lab←L100025;
};
};
goto lab←L100028;
lab←L100025: ;
SOURCE(9933, 13)
var←c66992.f7/* failed←v6812 */ = 1;
lab←L100028: ;
/* removed tail goto */
(* (ptr) formal←c0217 ) = var←c66992.f6/* msg←v6784 */ ;
(* (( (ptr) formal←c0217)+1) ) = var←c66992.f7/* failed←v6812 */ ;
return;
}
static word NoName←Q5592(formal←c0627)
word formal←c0627;
{
register ptr gf←c0626 = (ptr) &globalframe;
SOURCE(9304, 32)
{
W12 fromCP←v10224;
W12 toCP←v10252;
word toFName←v10280 = 0;
SOURCE(9358, 41)
{
W14 var←c61744;
(void) ExpandName←P720((word) &var←c61744, (* (( (ptr) formal←c0627)+4) ), (* (( (ptr) gf←c0626)+40) ));
fromCP←v10224 = (* (W12Pt) (( (ptr) &var←c61744)+1) );
(* (( (ptr) formal←c0627)+4) ) = (* (ptr) &var←c61744 );
};
SOURCE(9401, 35)
{
W14 var←c61776;
(void) ExpandName←P720((word) &var←c61776, (* (( (ptr) formal←c0627)+5) ), (* (( (ptr) gf←c0626)+40) ));
toCP←v10252 = (* (W12Pt) (( (ptr) &var←c61776)+1) );
(* (( (ptr) formal←c0627)+5) ) = (* (ptr) &var←c61776 );
};
SOURCE(9438, 319)
{
word var←c61808;
word var←c61840;
word var←c61872;
word var←c61904;
word var←c61936;
{
word pd183;
word idx184;
word idx185;
pd183 = (* (( (ptr) (* (( (ptr) gf←c0626)+158)/* var←c59920 */ ))+17) );
var←c61808 = (word) ( *( (fPt) ((* (ptr) pd183 ))))((* (( (ptr) formal←c0627)+5) ), (
idx184 = (* (ptr) &toCP←v10252 ),
SGNCK(idx184)
), (
idx185 = (* (( (ptr) &toCP←v10252)+1) ),
SGNCK(idx185)
), pd183);
};
{
word pd186;
word idx187;
word idx188;
pd186 = (* (( (ptr) (* (( (ptr) gf←c0626)+158)/* var←c59920 */ ))+17) );
var←c61840 = (word) ( *( (fPt) ((* (ptr) pd186 ))))((* (( (ptr) formal←c0627)+5) ), (
idx187 = (* (( (ptr) &toCP←v10252)+2) ),
SGNCK(idx187)
), (
idx188 = (* (( (ptr) &toCP←v10252)+3) ),
SGNCK(idx188)
), pd186);
};
{
word pd189;
word idx190;
word idx191;
pd189 = (* (( (ptr) (* (( (ptr) gf←c0626)+158)/* var←c59920 */ ))+17) );
var←c61872 = (word) ( *( (fPt) ((* (ptr) pd189 ))))((* (( (ptr) formal←c0627)+5) ), (
idx190 = (* (( (ptr) &toCP←v10252)+4) ),
SGNCK(idx190)
), (
idx191 = (* (( (ptr) &toCP←v10252)+5) ),
SGNCK(idx191)
), pd189);
};
{
word pd192;
word idx193;
word idx194;
pd192 = (* (( (ptr) (* (( (ptr) gf←c0626)+158)/* var←c59920 */ ))+17) );
var←c61904 = (word) ( *( (fPt) ((* (ptr) pd192 ))))((* (( (ptr) formal←c0627)+5) ), (
idx193 = (* (( (ptr) &toCP←v10252)+6) ),
SGNCK(idx193)
), (
idx194 = (* (( (ptr) &toCP←v10252)+7) ),
SGNCK(idx194)
), pd192);
};
{
word pd195;
word idx196;
word idx197;
pd195 = (* (( (ptr) (* (( (ptr) gf←c0626)+158)/* var←c59920 */ ))+17) );
var←c61936 = (word) ( *( (fPt) ((* (ptr) pd195 ))))((* (( (ptr) formal←c0627)+4) ), (
idx196 = (* (( (ptr) &fromCP←v10224)+8) ),
SGNCK(idx196)
), (
idx197 = (* (( (ptr) &fromCP←v10224)+9) ),
SGNCK(idx197)
), pd195);
};
{
W6 var←c61968;
var←c61968.f0 = var←c61808;
var←c61968.f1 = var←c61840;
var←c61968.f2 = var←c61872;
var←c61968.f3 = var←c61904;
var←c61968.f4 = var←c61936;
var←c61968.f5 = 0;
toFName←v10280 = (word) ConstructFName←P540(var←c61968, 0);
};
};
SOURCE(9759, 49)
{
word var←c62000;
{
word pd198;
pd198 = (* (( (ptr) (* (( (ptr) gf←c0626)+155)/* var←c59664 */ ))+5) );
var←c62000 = (word) ( *( (fPt) ((* (ptr) pd198 ))))(toFName←v10280, pd198);
};
{
word pd199;
pd199 = (* (( (ptr) (* (( (ptr) gf←c0626)+155)/* var←c59664 */ ))+4) );
(* (( (ptr) formal←c0627)+6) ) = (word) ( *( (fPt) ((* (ptr) pd199 ))))(var←c62000, 0, pd199);
};
};
SOURCE(9810, 88)
{
word var←c62032;
word var←c62064;
{
word pd200;
pd200 = (* (( (ptr) (* (( (ptr) gf←c0626)+155)/* var←c59664 */ ))+5) );
var←c62032 = (word) ( *( (fPt) ((* (ptr) pd200 ))))((* ((( (ptr) formal←c0627)+4)) ), pd200);
};
{
word pd201;
pd201 = (* (( (ptr) (* (( (ptr) gf←c0626)+155)/* var←c59664 */ ))+5) );
var←c62064 = (word) ( *( (fPt) ((* (ptr) pd201 ))))(toFName←v10280, pd201);
};
{
word pd202;
pd202 = (* (( (ptr) (* (( (ptr) gf←c0626)+155)/* var←c59664 */ ))+24) );
(void) ( *( (fPt) ((* (ptr) pd202 ))))(var←c62032, var←c62064, (* (W4Pt) (( (ptr) gf←c0626)+146)/* var←c59568 */ ), (* (W5Pt) (
( (ptr) gf←c0626)+150)/* var←c59632 */ ), 0, pd202);
};
};
SOURCE(9900, 14)
(* (( (ptr) formal←c0627)+7) ) = 0;
};
return(0);
}
static word ConstructFName←P540(cr←v7056, omitDir←v7084)
W6 cr←v7056;
word omitDir←v7084;
{
register ptr gf←c67024 = (ptr) &globalframe;
word fName←v7128;
word scratch←v10324;
word text←v10352;
/* ConstructFName: */
SOURCE(10034, 920)
SOURCE(10034, 920)
fName←v7128 = 0;
SOURCE(10122, 46)
{
word pd203;
pd203 = (* (( (ptr) (* (( (ptr) gf←c67024)+166)/* var←c62096 */ ))+6) );
scratch←v10324 = (word) ( *( (fPt) ((* (ptr) pd203 ))))(100, pd203);
};
SOURCE(10170, 24)
text←v10352 = scratch←v10324;
SOURCE(10196, 36)
{
word pd204;
pd204 = (* (( (ptr) (* (( (ptr) gf←c67024)+166)/* var←c62096 */ ))+11) );
text←v10352 = (word) ( *( (fPt) ((* (ptr) pd204 ))))(text←v10352, 47, pd204);
};
SOURCE(10234, 118)
{
word pd205;
pd205 = (* (( (ptr) (* (( (ptr) gf←c67024)+158)/* var←c59920 */ ))+13) );
if ((0 == (word) ( *( (fPt) ((* (ptr) pd205 ))))(cr←v7056.f0, pd205))) {
SOURCE(10272, 42)
{
word pd206;
pd206 = (* (( (ptr) (* (( (ptr) gf←c67024)+166)/* var←c62096 */ ))+10) );
text←v10352 = (word) ( *( (fPt) ((* (ptr) pd206 ))))(text←v10352, cr←v7056.f0, 0, 32767, pd206);
};
SOURCE(10316, 36)
{
word pd207;
pd207 = (* (( (ptr) (* (( (ptr) gf←c67024)+166)/* var←c62096 */ ))+11) );
text←v10352 = (word) ( *( (fPt) ((* (ptr) pd207 ))))(text←v10352, 47, pd207);
};
};
};
SOURCE(10357, 128)
{
word tc208;
word pd209;
if ((0 == omitDir←v7084)) {
pd209 = (* (( (ptr) (* (( (ptr) gf←c67024)+158)/* var←c59920 */ ))+13) );
tc208 = (word) (0 == (word) ( *( (fPt) ((* (ptr) pd209 ))))(cr←v7056.f1, pd209));
}
else {
tc208 = (word) 0;
};
if (tc208) {
SOURCE(10408, 39)
{
word pd210;
pd210 = (* (( (ptr) (* (( (ptr) gf←c67024)+166)/* var←c62096 */ ))+10) );
text←v10352 = (word) ( *( (fPt) ((* (ptr) pd210 ))))(text←v10352, cr←v7056.f1, 0, 32767, pd210);
};
SOURCE(10449, 36)
{
word pd211;
pd211 = (* (( (ptr) (* (( (ptr) gf←c67024)+166)/* var←c62096 */ ))+11) );
text←v10352 = (word) ( *( (fPt) ((* (ptr) pd211 ))))(text←v10352, 47, pd211);
};
};
};
SOURCE(10490, 120)
{
word pd212;
pd212 = (* (( (ptr) (* (( (ptr) gf←c67024)+158)/* var←c59920 */ ))+13) );
if ((0 == (word) ( *( (fPt) ((* (ptr) pd212 ))))(cr←v7056.f2, pd212))) {
SOURCE(10529, 43)
{
word pd213;
pd213 = (* (( (ptr) (* (( (ptr) gf←c67024)+166)/* var←c62096 */ ))+10) );
text←v10352 = (word) ( *( (fPt) ((* (ptr) pd213 ))))(text←v10352, cr←v7056.f2, 0, 32767, pd213);
};
SOURCE(10574, 36)
{
word pd214;
pd214 = (* (( (ptr) (* (( (ptr) gf←c67024)+166)/* var←c62096 */ ))+11) );
text←v10352 = (word) ( *( (fPt) ((* (ptr) pd214 ))))(text←v10352, 47, pd214);
};
};
};
SOURCE(10615, 40)
{
word pd215;
pd215 = (* (( (ptr) (* (( (ptr) gf←c67024)+166)/* var←c62096 */ ))+10) );
text←v10352 = (word) ( *( (fPt) ((* (ptr) pd215 ))))(text←v10352, cr←v7056.f3, 0, 32767, pd215);
};
SOURCE(10657, 112)
{
word pd216;
pd216 = (* (( (ptr) (* (( (ptr) gf←c67024)+158)/* var←c59920 */ ))+13) );
if ((0 == (word) ( *( (fPt) ((* (ptr) pd216 ))))(cr←v7056.f4, pd216))) {
SOURCE(10692, 36)
{
word pd217;
pd217 = (* (( (ptr) (* (( (ptr) gf←c67024)+166)/* var←c62096 */ ))+11) );
text←v10352 = (word) ( *( (fPt) ((* (ptr) pd217 ))))(text←v10352, 46, pd217);
};
SOURCE(10730, 39)
{
word pd218;
pd218 = (* (( (ptr) (* (( (ptr) gf←c67024)+166)/* var←c62096 */ ))+10) );
text←v10352 = (word) ( *( (fPt) ((* (ptr) pd218 ))))(text←v10352, cr←v7056.f4, 0, 32767, pd218);
};
};
};
SOURCE(10774, 112)
{
word pd219;
pd219 = (* (( (ptr) (* (( (ptr) gf←c67024)+158)/* var←c59920 */ ))+13) );
if ((0 == (word) ( *( (fPt) ((* (ptr) pd219 ))))(cr←v7056.f5, pd219))) {
SOURCE(10809, 36)
{
word pd220;
pd220 = (* (( (ptr) (* (( (ptr) gf←c67024)+166)/* var←c62096 */ ))+11) );
text←v10352 = (word) ( *( (fPt) ((* (ptr) pd220 ))))(text←v10352, 33, pd220);
};
SOURCE(10847, 39)
{
word pd221;
pd221 = (* (( (ptr) (* (( (ptr) gf←c67024)+166)/* var←c62096 */ ))+10) );
text←v10352 = (word) ( *( (fPt) ((* (ptr) pd221 ))))(text←v10352, cr←v7056.f5, 0, 32767, pd221);
};
};
};
SOURCE(10891, 30)
{
word pd222;
pd222 = (* (( (ptr) (* (( (ptr) gf←c67024)+158)/* var←c59920 */ ))+35) );
fName←v7128 = (word) ( *( (fPt) ((* (ptr) pd222 ))))(text←v10352, 0, 32767, pd222);
};
SOURCE(10923, 31)
{
word pd223;
pd223 = (* (( (ptr) (* (( (ptr) gf←c67024)+166)/* var←c62096 */ ))+7) );
(void) ( *( (fPt) ((* (ptr) pd223 ))))(scratch←v10324, pd223);
};
SOURCE(10034, 920)
return(fName←v7128);
}
static void RaiseError←P600(pfs←v7248)
W4 pfs←v7248;
{
register ptr gf←c67056 = (ptr) &globalframe;
/* RaiseError: */
SOURCE(11007, 232)
SOURCE(11049, 190)
{
W4 var←c0242;
{
word var←c62160;
var←c62160 = pfs←v7248.f0;
switch (var←c62160) {
case 0:
var←c0242.f0 = 0;
break;
case 1:
var←c0242.f0 = 1;
break;
case 2:
var←c0242.f0 = 2;
break;
case 3:
var←c0242.f0 = 3;
break;
case 4:
var←c0242.f0 = 4;
break;
default:
var←c0242.f0 = 1;
break;
};
};
var←c0242.f1 = pfs←v7248.f1;
var←c0242.f2 = pfs←v7248.f2;
var←c0242.f3 = 0;
(void) XR←RaiseError((word) (( (bPt) gf←c67056)+348)/* var←c58576 */ , (word) &var←c0242);
};
}
static void Wrap←P660(formal←c0779, formal←c0780)
word formal←c0779;
word formal←c0780;
{
W6 var←c67088;
/* declaration of inner←v7308 skipped */
/* declaration of wDir←v7336 skipped */
var←c67088.f4/* inner←v7308 */ = formal←c0779;
var←c67088.f5/* wDir←v7336 */ = formal←c0780;
/* Wrap: */
SOURCE(11245, 159)
SOURCE(11286, 118)
{
word var←c0706;
var←c0706 = (word) &var←c67088;
(void) (word) XR←Enable(( ((word) (fPt) NoName←Q5652) ), ( ((word) (fPt) NoName←Q6432) ), var←c0706);
};
}
static word NoName←Q5652(formal←c0631)
word formal←c0631;
{
register ptr gf←c0630 = (ptr) &globalframe;
SOURCE(11329, 75)
if (((* (( (ptr) formal←c0631)+5) ) == 0)) {
SOURCE(11348, 13)
{
word pd224;
pd224 = (* (( (ptr) formal←c0631)+4) );
(void) ( *( (fPt) ((* (ptr) pd224 ))))(pd224);
};
}
else {
SOURCE(11361, 43)
{
word var←c62192;
{
word pd225;
pd225 = (* (( (ptr) (* (( (ptr) gf←c0630)+155)/* var←c59664 */ ))+5) );
var←c62192 = (word) ( *( (fPt) ((* (ptr) pd225 ))))((* ((( (ptr) formal←c0631)+5)) ), pd225);
};
{
word pd226;
pd226 = (* (( (ptr) (* (( (ptr) gf←c0630)+155)/* var←c59664 */ ))+6) );
(void) ( *( (fPt) ((* (ptr) pd226 ))))(var←c62192, (* (( (ptr) formal←c0631)+4) ), pd226);
};
};
};
return(0);
}
static void ExpandName←P720(formal←c0268, formal←c0781, wDir←v7440)
word formal←c0268;
word formal←c0781;
word wDir←v7440;
{
W29 var←c67120;
/* declaration of name←v7412 skipped */
register ptr gf←c67152 = (ptr) &globalframe;
word fullFName←v7484;
/* declaration of cp←v7512 skipped */
word dirOmitted←v7540;
/* declaration of var←c62224 skipped */
/* declaration of var←c62256 skipped */
/* declaration of var←c62288 skipped */
/* declaration of path←v10420 skipped */
word scratch←v10448;
/* declaration of text←v10476 skipped */
/* declaration of serverComponent←v10588 skipped */
/* declaration of state←v10616 skipped */
/* declaration of lastVersion←v10644 skipped */
(* (( (ptr) &var←c67120)+4)/* name←v7412 */ ) = formal←c0781;
/* ExpandName: */
SOURCE(11410, 3294)
{
word tmpAddr227;
tmpAddr227 = (word) (( (ptr) &var←c67120)+17)/* var←c62224 */ ;
(* (ptr) tmpAddr227 ) = ( ((word) (fPt) EachSeparator←P2436) );
(* (( (ptr) tmpAddr227) + 1) ) = 1;
};
{
word tmpAddr228;
tmpAddr228 = (word) (( (ptr) &var←c67120)+19)/* var←c62256 */ ;
(* (ptr) tmpAddr228 ) = ( ((word) (fPt) EachComponent←P2376) );
(* (( (ptr) tmpAddr228) + 1) ) = 1;
};
{
word tmpAddr229;
tmpAddr229 = (word) (( (ptr) &var←c67120)+21)/* var←c62288 */ ;
(* (ptr) tmpAddr229 ) = ( ((word) (fPt) GetPath←P2316) );
(* (( (ptr) tmpAddr229) + 1) ) = 1;
};
SOURCE(11410, 3294)
fullFName←v7484 = 0;
SOURCE(11543, 14)
(* (( (ptr) &var←c67120)+23)/* path←v10420 */ ) = 0;
SOURCE(11559, 46)
{
word pd230;
pd230 = (* (( (ptr) (* (( (ptr) gf←c67152)+166)/* var←c62096 */ ))+6) );
scratch←v10448 = (word) ( *( (fPt) ((* (ptr) pd230 ))))(100, pd230);
};
SOURCE(11607, 24)
(* (( (ptr) &var←c67120)+24)/* text←v10476 */ ) = scratch←v10448;
SOURCE(11869, 28)
(* (( (ptr) &var←c67120)+25)/* serverComponent←v10588 */ ) = 1;
SOURCE(11899, 7)
(* (( (ptr) &var←c67120)+26)/* state←v10616 */ ) = 0;
SOURCE(11961, 38)
(* (( (ptr) &var←c67120)+27) ) = 1;
(* (( (ptr) &var←c67120)+28) ) = 0;
{
W2 var←c62480;
W2 var←c62512;
W2 var←c62544;
W2 var←c62576;
W2 var←c62608;
SOURCE(13194, 19)
(void) Wrap←P660((word) (( (bPt) &var←c67120)+84)/* var←c62288 */ , wDir←v7440);
SOURCE(13215, 18)
dirOmitted←v7540 = 0;
SOURCE(13235, 11)
XR←FillWords(&(* (W12Pt) ((( (ptr) &var←c67120)+5)/* cp←v7512 */ )), 12, 0);
SOURCE(13248, 48)
{
word pd231;
pd231 = (* (( (ptr) (* (( (ptr) gf←c67152)+167)/* var←c62352 */ ))+35) );
(void) ( *( (fPt) ((* (ptr) pd231 ))))((* (( (ptr) &var←c67120)+23)/* path←v10420 */ ), (word) (( (bPt) &var←c67120)+76)
/* var←c62256 */ , (word) (( (bPt) &var←c67120)+68)/* var←c62224 */ , 0, pd231);
};
SOURCE(13298, 387)
if (((* (( (ptr) &var←c67120)+27) ) != 1)) {
SOURCE(13340, 36)
{
word pd232;
pd232 = (* (( (ptr) (* (( (ptr) gf←c67152)+166)/* var←c62096 */ ))+10) );
(* (( (ptr) &var←c67120)+24)/* text←v10476 */ ) = (word) ( *( (fPt) ((* (ptr) pd232 ))))((* (( (ptr) &var←c67120)+24)/* text←v10476 */ ), (* (
( (ptr) gf←c67152)+41) ), 0, 32767, pd232);
};
SOURCE(13378, 26)
(* (( (ptr) &var←c67120)+15) ) = (unsigned) (* (hPt) (* (( (ptr) &var←c67120)+24)/* text←v10476 */ ) );
SOURCE(13406, 237)
{
word var←c62384;
var←c62384 = (* (( (ptr) &var←c67120)+27) );
{
word pd233;
word pd234;
word pd235;
word pd236;
switch (var←c62384) {
case 2:
pd233 = (* (( (ptr) (* (( (ptr) gf←c67152)+166)/* var←c62096 */ ))+10) );
(* (( (ptr) &var←c67120)+24)/* text←v10476 */ ) = (word) ( *( (fPt) ((* (ptr) pd233 ))))((* (( (ptr) &var←c67120)+24)/* text←v10476 */ ), (* (
( (ptr) gf←c67152)+42) ), 0, 32767, pd233);
break;
case 3:
pd234 = (* (( (ptr) (* (( (ptr) gf←c67152)+166)/* var←c62096 */ ))+10) );
(* (( (ptr) &var←c67120)+24)/* text←v10476 */ ) = (word) ( *( (fPt) ((* (ptr) pd234 ))))((* (( (ptr) &var←c67120)+24)/* text←v10476 */ ), (* (
( (ptr) gf←c67152)+43) ), 0, 32767, pd234);
break;
case 5:
pd235 = (* (( (ptr) (* (( (ptr) gf←c67152)+166)/* var←c62096 */ ))+10) );
(* (( (ptr) &var←c67120)+24)/* text←v10476 */ ) = (word) ( *( (fPt) ((* (ptr) pd235 ))))((* (( (ptr) &var←c67120)+24)/* text←v10476 */ ), (* (
( (ptr) gf←c67152)+44) ), 0, 32767, pd235);
break;
case 0:
pd236 = (* (( (ptr) (* (( (ptr) gf←c67152)+168)/* var←c62416 */ ))+41) );
(* (( (ptr) &var←c67120)+24)/* text←v10476 */ ) = (word) ( *( (fPt) ((* (ptr) pd236 ))))((* (( (ptr) &var←c67120)+24)/* text←v10476 */ ), (* (
( (ptr) &var←c67120)+28) ), 8, 1, pd236);
break;
default:
/* removed bogus assignment */
break;
};
};
};
SOURCE(13645, 40)
(* (( (ptr) &var←c67120)+16) ) = ( (unsigned) (* (hPt) (* (( (ptr) &var←c67120)+24)/* text←v10476 */ ) ) - (* (( (ptr) &var←c67120)+15)
));
};
SOURCE(13690, 201)
{
register word noName←c62448;
register word i←v10912;
noName←c62448 = (* (( (ptr) &var←c67120)+11) );
i←v10912 = ((* (( (ptr) &var←c67120)+11) ) + (* (( (ptr) &var←c67120)+12) ));
if ((noName←c62448 >= i←v10912)) {
goto lab←L100032;
};
i←v10912 = (i←v10912 - 1);
lab←L100035: ;
SOURCE(13764, 127)
{
word limit237;
if (( (unsigned) (word) (* ((( (bPt) (* (( (ptr) &var←c67120)+24)/* text←v10476 */ ))+4)+(
limit237 = (word) (unsigned) (* (( (hPt) (* (( (ptr) &var←c67120)+24)/* text←v10476 */ ))+1) ),
BCK(i←v10912, limit237)
)) ) == 46)) {
SOURCE(13787, 18)
(* (( (ptr) &var←c67120)+13) ) = (i←v10912 + 1);
SOURCE(13807, 50)
(* (( (ptr) &var←c67120)+14) ) = (((* (( (ptr) &var←c67120)+11) ) + (* (( (ptr) &var←c67120)+12) )) - (i←v10912 + 1));
SOURCE(13859, 32)
(* (( (ptr) &var←c67120)+12) ) = (i←v10912 - (* (( (ptr) &var←c67120)+11) ));
SOURCE(13893, 4)
goto lab←L100033;
};
};
if ((noName←c62448 >= i←v10912)) {
goto lab←L100032;
};
i←v10912 = (i←v10912 - 1);
goto lab←L100035;
lab←L100032: ;
lab←L100033: ;
};
SOURCE(13911, 141)
var←c62480.f0 = 0;
var←c62480.f1 = 0;
if (XR←EqualWords((( (ptr) &var←c67120)+7), &var←c62480, 2)) {
SOURCE(13938, 47)
(* (( (ptr) &var←c67120)+7) ) = ((* (( (ptr) &var←c67120)+5) ) + (* (( (ptr) &var←c67120)+6) ));
SOURCE(13987, 65)
if (((* (( (ptr) &var←c67120)+7) ) == (unsigned) (* (hPt) (* (( (ptr) &var←c67120)+24)/* text←v10476 */ ) ))) {
SOURCE(14022, 30)
(* (( (ptr) &var←c67120)+7) ) = ((* (( (ptr) &var←c67120)+7) ) + 1);
};
};
SOURCE(14055, 155)
var←c62512.f0 = 0;
var←c62512.f1 = 0;
if (XR←EqualWords((( (ptr) &var←c67120)+9), &var←c62512, 2)) {
SOURCE(14086, 45)
(* (( (ptr) &var←c67120)+9) ) = ((* (( (ptr) &var←c67120)+7) ) + (* (( (ptr) &var←c67120)+8) ));
SOURCE(14133, 77)
if (((* (( (ptr) &var←c67120)+9) ) == (unsigned) (* (hPt) (* (( (ptr) &var←c67120)+24)/* text←v10476 */ ) ))) {
SOURCE(14172, 38)
(* (( (ptr) &var←c67120)+9) ) = ((* (( (ptr) &var←c67120)+9) ) + 1);
};
};
SOURCE(14213, 147)
var←c62544.f0 = 0;
var←c62544.f1 = 0;
if (XR←EqualWords((( (ptr) &var←c67120)+11), &var←c62544, 2)) {
SOURCE(14241, 50)
(* (( (ptr) &var←c67120)+11) ) = ((* (( (ptr) &var←c67120)+9) ) + (* (( (ptr) &var←c67120)+10) ));
SOURCE(14293, 67)
if (((* (( (ptr) &var←c67120)+11) ) == (unsigned) (* (hPt) (* (( (ptr) &var←c67120)+24)/* text←v10476 */ ) ))) {
SOURCE(14329, 31)
(* (( (ptr) &var←c67120)+11) ) = ((* (( (ptr) &var←c67120)+11) ) + 1);
};
};
SOURCE(14363, 135)
var←c62576.f0 = 0;
var←c62576.f1 = 0;
if (XR←EqualWords((( (ptr) &var←c67120)+13), &var←c62576, 2)) {
SOURCE(14389, 43)
(* (( (ptr) &var←c67120)+13) ) = ((* (( (ptr) &var←c67120)+11) ) + (* (( (ptr) &var←c67120)+12) ));
SOURCE(14434, 64)
if (((* (( (ptr) &var←c67120)+13) ) == (unsigned) (* (hPt) (* (( (ptr) &var←c67120)+24)/* text←v10476 */ ) ))) {
SOURCE(14469, 29)
(* (( (ptr) &var←c67120)+13) ) = ((* (( (ptr) &var←c67120)+13) ) + 1);
};
};
SOURCE(14501, 133)
var←c62608.f0 = 0;
var←c62608.f1 = 0;
if (XR←EqualWords((( (ptr) &var←c67120)+15), &var←c62608, 2)) {
SOURCE(14527, 41)
(* (( (ptr) &var←c67120)+15) ) = ((* (( (ptr) &var←c67120)+13) ) + (* (( (ptr) &var←c67120)+14) ));
SOURCE(14570, 64)
if (((* (( (ptr) &var←c67120)+15) ) == (unsigned) (* (hPt) (* (( (ptr) &var←c67120)+24)/* text←v10476 */ ) ))) {
SOURCE(14605, 29)
(* (( (ptr) &var←c67120)+15) ) = ((* (( (ptr) &var←c67120)+15) ) + 1);
};
};
SOURCE(14637, 34)
{
word pd238;
pd238 = (* (( (ptr) (* (( (ptr) gf←c67152)+158)/* var←c59920 */ ))+35) );
fullFName←v7484 = (word) ( *( (fPt) ((* (ptr) pd238 ))))((* (( (ptr) &var←c67120)+24)/* text←v10476 */ ), 0, 32767, pd238)
;
};
SOURCE(14673, 31)
{
word pd239;
pd239 = (* (( (ptr) (* (( (ptr) gf←c67152)+166)/* var←c62096 */ ))+7) );
(void) ( *( (fPt) ((* (ptr) pd239 ))))(scratch←v10448, pd239);
};
};
/* removed tail goto */
(* (ptr) formal←c0268 ) = fullFName←v7484;
(* (W12Pt) (( (ptr) formal←c0268)+1) ) = (* (W12Pt) (( (ptr) &var←c67120)+5)/* cp←v7512 */ );
(* (( (ptr) formal←c0268)+13) ) = dirOmitted←v7540;
return;
}
static void GetPath←P2316(formal←c67216)
word formal←c67216;
{
register ptr gf←c67184 = (ptr) &globalframe;
formal←c67216 = (formal←c67216 - 84);
/* GetPath: */
SOURCE(11799, 65)
SOURCE(11817, 47)
{
word var←c62640;
{
word pd240;
pd240 = (* (( (ptr) (* (( (ptr) gf←c67184)+155)/* var←c59664 */ ))+5) );
var←c62640 = (word) ( *( (fPt) ((* (ptr) pd240 ))))((* ((( (ptr) formal←c67216)+4)) ), pd240);
};
{
word pd241;
pd241 = (* (( (ptr) (* (( (ptr) gf←c67184)+155)/* var←c59664 */ ))+8) );
(* (( (ptr) formal←c67216)+23) ) = (word) ( *( (fPt) ((* (ptr) pd241 ))))(var←c62640, 0, pd241);
};
};
}
static void EachComponent←P2376(comp←v52036, ref←v52064, formal←c67280)
W5 comp←v52036;
word ref←v52064;
word formal←c67280;
{
register ptr gf←c67248 = (ptr) &globalframe;
formal←c67280 = (formal←c67280 - 76);
/* EachComponent: */
SOURCE(12001, 472)
SOURCE(12043, 56)
if ((0 != (* (( (ptr) formal←c67280)+25) ))) {
SOURCE(12068, 23)
(* (( (ptr) formal←c67280)+25) ) = 0;
SOURCE(12093, 6)
return;
};
SOURCE(12102, 156)
{
word var←c62672;
var←c62672 = (* (( (ptr) formal←c67280)+26) );
switch (var←c62672) {
case 0:
break;
case 1:
break;
case 2:
SOURCE(12179, 36)
{
word pd242;
pd242 = (* (( (ptr) (* (( (ptr) gf←c67248)+166)/* var←c62096 */ ))+10) );
(* (( (ptr) formal←c67280)+24) ) = (word) ( *( (fPt) ((* (ptr) pd242 ))))((* (( (ptr) formal←c67280)+24) ), (* (( (ptr) gf←c67248)+45)
), 0, 32767, pd242);
};
SOURCE(12217, 26)
(* (( (ptr) formal←c67280)+7) ) = (unsigned) (* (hPt) (* (( (ptr) formal←c67280)+24) ) );
SOURCE(12245, 13)
(* (( (ptr) formal←c67280)+26) ) = 3;
break;
case 3:
break;
default:
SOURCE(12286, 5)
(void) XR←RaiseUnnamedError();
break;
};
};
SOURCE(12293, 27)
(* (( (ptr) formal←c67280)+11) ) = (unsigned) (* (hPt) (* (( (ptr) formal←c67280)+24) ) );
SOURCE(12322, 79)
{
word pd243;
word idx244;
pd243 = (* (( (ptr) (* (( (ptr) gf←c67248)+166)/* var←c62096 */ ))+10) );
(* (( (ptr) formal←c67280)+24) ) = (word) ( *( (fPt) ((* (ptr) pd243 ))))((* (( (ptr) formal←c67280)+24) ), comp←v52036.f0, comp←v52036.f1, (
idx244 = (word) comp←v52036.f2,
BCK(idx244, 32768)
), pd243);
};
SOURCE(12403, 42)
(* (( (ptr) formal←c67280)+12) ) = ( (unsigned) (* (hPt) (* (( (ptr) formal←c67280)+24) ) ) - (* (( (ptr) formal←c67280)+11)
));
SOURCE(12447, 26)
(* (W2Pt) (( (ptr) formal←c67280)+27) ) = (* (W2Pt) (( (ptr) &comp←v52036)+3) );
}
static void EachSeparator←P2436(separatorPresent←v52124, ref←v52152, formal←c67344)
word separatorPresent←v52124;
word ref←v52152;
word formal←c67344;
{
register ptr gf←c67312 = (ptr) &globalframe;
formal←c67344 = (formal←c67344 - 68);
/* EachSeparator: */
SOURCE(12478, 690)
SOURCE(12520, 86)
if ((0 != (* (( (ptr) formal←c67344)+25) ))) {
SOURCE(12546, 60)
if ((0 != separatorPresent←v52124)) {
SOURCE(12571, 12)
return;
}
else {
SOURCE(12583, 23)
(* (( (ptr) formal←c67344)+25) ) = 0;
};
};
SOURCE(12611, 557)
{
word var←c62704;
var←c62704 = (* (( (ptr) formal←c67344)+26) );
switch (var←c62704) {
case 0:
SOURCE(12641, 138)
if ((0 != separatorPresent←v52124)) {
SOURCE(12668, 36)
{
word pd245;
pd245 = (* (( (ptr) (* (( (ptr) gf←c67312)+166)/* var←c62096 */ ))+10) );
(* (( (ptr) formal←c67344)+24) ) = (word) ( *( (fPt) ((* (ptr) pd245 ))))((* (( (ptr) formal←c67344)+24) ), (* (( (ptr) gf←c67312)+46)
), 0, 32767, pd245);
};
SOURCE(12706, 29)
(* (( (ptr) formal←c67344)+5) ) = (unsigned) (* (hPt) (* (( (ptr) formal←c67344)+24) ) );
SOURCE(12737, 23)
(* (( (ptr) formal←c67344)+26) ) = 1;
}
else {
SOURCE(12767, 12)
(* (( (ptr) formal←c67344)+26) ) = 3;
};
break;
case 1:
SOURCE(12804, 46)
(* (( (ptr) formal←c67344)+6) ) = ( (unsigned) (* (hPt) (* (( (ptr) formal←c67344)+24) ) ) - (* (( (ptr) formal←c67344)+5)
));
SOURCE(12852, 36)
{
word pd246;
pd246 = (* (( (ptr) (* (( (ptr) gf←c67312)+166)/* var←c62096 */ ))+10) );
(* (( (ptr) formal←c67344)+24) ) = (word) ( *( (fPt) ((* (ptr) pd246 ))))((* (( (ptr) formal←c67344)+24) ), (* (( (ptr) gf←c67312)+47)
), 0, 32767, pd246);
};
SOURCE(12890, 23)
(* (( (ptr) formal←c67344)+26) ) = 2;
break;
case 3:
SOURCE(12924, 244)
if ((0 != separatorPresent←v52124)) {
{
W2 var←c62736;
SOURCE(12951, 160)
var←c62736.f0 = 0;
var←c62736.f1 = 0;
if (XR←EqualWords((( (ptr) formal←c67344)+9), &var←c62736, 2)) {
SOURCE(12981, 40)
(* (( (ptr) formal←c67344)+8) ) = ( (unsigned) (* (hPt) (* (( (ptr) formal←c67344)+24) ) ) - (* (( (ptr) formal←c67344)+7)
));
SOURCE(13023, 33)
(* (( (ptr) formal←c67344)+9) ) = ( (unsigned) (* (hPt) (* (( (ptr) formal←c67344)+24) ) ) + 1);
}
else {
SOURCE(13063, 48)
(* (( (ptr) formal←c67344)+10) ) = ( (unsigned) (* (hPt) (* (( (ptr) formal←c67344)+24) ) ) - (* (( (ptr) formal←c67344)+9)
));
};
SOURCE(13113, 36)
{
word pd247;
pd247 = (* (( (ptr) (* (( (ptr) gf←c67312)+166)/* var←c62096 */ ))+10) );
(* (( (ptr) formal←c67344)+24) ) = (word) ( *( (fPt) ((* (ptr) pd247 ))))((* (( (ptr) formal←c67344)+24) ), (* (( (ptr) gf←c67312)+48)
), 0, 32767, pd247);
};
SOURCE(13151, 17)
(* (( (ptr) formal←c67344)+11) ) = 0;
(* (( (ptr) formal←c67344)+12) ) = 0;
};
};
break;
default:
SOURCE(13184, 5)
(void) XR←RaiseUnnamedError();
break;
};
};
}
static void DoWithStatus←P780(formal←c0782, formal←c0783, formal←c0784)
word formal←c0782;
word formal←c0783;
word formal←c0784;
{
W7 var←c67376;
/* declaration of tool←v7600 skipped */
/* declaration of status←v7628 skipped */
/* declaration of inner←v7656 skipped */
var←c67376.f4/* tool←v7600 */ = formal←c0782;
var←c67376.f5/* status←v7628 */ = formal←c0783;
var←c67376.f6/* inner←v7656 */ = formal←c0784;
/* DoWithStatus: */
SOURCE(14709, 399)
SOURCE(14798, 310)
{
word var←c0707;
var←c0707 = (word) &var←c67376;
(void) (word) XR←Enable(( ((word) (fPt) NoName←Q5712) ), ( ((word) (fPt) NoName←Q6372) ), var←c0707);
};
}
static word NoName←Q5712(formal←c0640)
word formal←c0640;
{
register ptr gf←c0639 = (ptr) &globalframe;
SOURCE(14953, 27)
{
word pd248;
pd248 = (* (( (ptr) (* (( (ptr) gf←c0639)+161)/* var←c60496 */ ))+6) );
(void) ( *( (fPt) ((* (ptr) pd248 ))))((* ((( (ptr) formal←c0640)+4)) ), pd248);
};
SOURCE(14982, 126)
{
word pd249;
pd249 = (* (( (ptr) formal←c0640)+6) );
if ((0 != (word) ( *( (fPt) ((* (ptr) pd249 ))))(pd249))) {
SOURCE(15000, 60)
{
word pd250;
pd250 = (* (( (ptr) (* (( (ptr) gf←c0639)+156)/* var←c59696 */ ))+15) );
(void) ( *( (fPt) ((* (ptr) pd250 ))))((* (( (ptr) (* (( (ptr) formal←c0640)+5) ))+1) ), 0, pd250);
};
SOURCE(15062, 27)
{
word pd251;
pd251 = (* (( (ptr) (* (( (ptr) gf←c0639)+161)/* var←c60496 */ ))+6) );
(void) ( *( (fPt) ((* (ptr) pd251 ))))((* ((( (ptr) formal←c0640)+4)) ), pd251);
};
SOURCE(15091, 17)
(* (ptr) (* (( (ptr) formal←c0640)+5) ) ) = 0;
};
};
return(0);
}
static void PrintRequestProcess←P840(formal←c0785, formal←c0786, formal←c0787, formal←c0788, formal←c0789)
word formal←c0785;
word formal←c0786;
word formal←c0787;
word formal←c0788;
word formal←c0789;
{
W12 var←c67408;
/* declaration of tool←v7776 skipped */
/* declaration of options←v7804 skipped */
/* declaration of info←v7832 skipped */
/* declaration of producer←v7860 skipped */
/* declaration of source←v7888 skipped */
register ptr gf←c67440 = (ptr) &globalframe;
/* declaration of var←c62768 skipped */
/* declaration of status←v10984 skipped */
(* (( (ptr) &var←c67408)+4)/* tool←v7776 */ ) = formal←c0785;
(* (( (ptr) &var←c67408)+5)/* options←v7804 */ ) = formal←c0786;
(* (( (ptr) &var←c67408)+6)/* info←v7832 */ ) = formal←c0787;
(* (( (ptr) &var←c67408)+7)/* producer←v7860 */ ) = formal←c0788;
(* (( (ptr) &var←c67408)+8)/* source←v7888 */ ) = formal←c0789;
/* PrintRequestProcess: */
SOURCE(15140, 2520)
{
word tmpAddr252;
tmpAddr252 = (word) (( (ptr) &var←c67408)+9)/* var←c62768 */ ;
(* (ptr) tmpAddr252 ) = ( ((word) (fPt) WithStatus←P2544) );
(* (( (ptr) tmpAddr252) + 1) ) = 1;
};
SOURCE(17561, 59)
{
word pd253;
pd253 = (* (( (ptr) (* (( (ptr) gf←c67440)+161)/* var←c60496 */ ))+5) );
(* (( (ptr) &var←c67408)+11)/* status←v10984 */ ) = (word) ( *( (fPt) ((* (ptr) pd253 ))))((* (( (ptr) &var←c67408)+4)/* tool←v7776 */ ), (* (
( (ptr) (* (( (ptr) &var←c67408)+6)/* info←v7832 */ ))+1) ), pd253);
};
SOURCE(17622, 38)
(void) DoWithStatus←P780((* (( (ptr) &var←c67408)+4)/* tool←v7776 */ ), (* (( (ptr) &var←c67408)+11)/* status←v10984 */ ), (word) (
( (bPt) &var←c67408)+36)/* var←c62768 */ );
}
static word WithStatus←P2544(formal←c67536)
word formal←c67536;
{
W18 var←c67472;
register ptr gf←c67504 = (ptr) &globalframe;
/* declaration of destroyStatus←v11060 skipped */
word pages←v11088;
word temp←v11116;
/* declaration of ipName←v11144 skipped */
formal←c67536 = (formal←c67536 - 36);
(* (ptr) &var←c67472 ) = formal←c67536;
/* WithStatus: */
SOURCE(15248, 2267)
SOURCE(15326, 12)
(* (( (ptr) &var←c67472)+5)/* ipName←v11144 */ ) = 0;
SOURCE(15340, 21)
(* (( (ptr) &var←c67472)+4)/* destroyStatus←v11060 */ ) = 0;
SOURCE(15363, 83)
{
W3 var←c62800;
(void) MakeIPMaster←P420((word) &var←c62800, (* (( (ptr) formal←c67536)+4) ), (* (( (ptr) formal←c67536)+11) ), (* (( (ptr) formal←c67536)+5)
), (* (( (ptr) formal←c67536)+6) ), (* (( (ptr) formal←c67536)+7) )
, (* (( (ptr) formal←c67536)+8) ));
pages←v11088 = var←c62800.f2;
temp←v11116 = var←c62800.f1;
(* (( (ptr) &var←c67472)+5)/* ipName←v11144 */ ) = var←c62800.f0;
};
if ((0 != (* (( (ptr) (* (( (ptr) formal←c67536)+11) ))+6) ))) {
SOURCE(15528, 76)
{
W2 var←c62832;
{
W2 var←c62864;
word v←v58288;
v←v58288 = (* (( (ptr) (* (( (ptr) formal←c67536)+6) ))+1) );
var←c62864.f0 = 11;
var←c62864.f1 = v←v58288;
var←c62832 = var←c62864;
};
{
word pd254;
pd254 = (* (( (ptr) (* (( (ptr) gf←c67504)+159)/* var←c60112 */ ))+61) );
(void) ( *( (fPt) ((* (ptr) pd254 ))))((* (( (ptr) (* (( (ptr) formal←c67536)+4) ))+9) ), (* (( (ptr) gf←c67504)+49) ), var←c62832, pd254)
;
};
};
SOURCE(15606, 20)
(* (( (ptr) &var←c67472)+4)/* destroyStatus←v11060 */ ) = 1;
}
else {
if (( (int)pages←v11088 > (int)0)) {
SOURCE(15642, 1652)
{
/* declaration of problemRope←v11188 skipped */
/* declaration of context←v11216 skipped */
SOURCE(15694, 136)
(* (( (ptr) &var←c67472)+6) ) = (* (( (ptr) gf←c67504)+50) );
(* (( (ptr) &var←c67472)+7) ) = (* (( (ptr) gf←c67504)+51) );
(* (( (ptr) &var←c67472)+8) ) = (* (( (ptr) gf←c67504)+52) );
(* (( (ptr) &var←c67472)+9) ) = (* (( (ptr) gf←c67504)+53) );
(* (( (ptr) &var←c67472)+10) ) = (* (( (ptr) gf←c67504)+54) );
(* (( (ptr) &var←c67472)+11) ) = (* (( (ptr) gf←c67504)+55) );
(* (( (ptr) &var←c67472)+12) ) = (* (( (ptr) gf←c67504)+56) );
(* (( (ptr) &var←c67472)+13) ) = (* (( (ptr) gf←c67504)+57) );
SOURCE(15832, 50)
{
word pd255;
pd255 = (* (( (ptr) (* (( (ptr) gf←c67504)+169)/* var←c62960 */ ))+12) );
(* (( (ptr) &var←c67472)+14)/* context←v11216 */ ) = (word) ( *( (fPt) ((* (ptr) pd255 ))))(0, pd255);
};
SOURCE(15884, 37)
(* (ptr) (* (( (ptr) &var←c67472)+14)/* context←v11216 */ ) ) = (* (( (ptr) (* (( (ptr) formal←c67536)+5) ))+2) );
SOURCE(15923, 39)
(* (( (ptr) (* (( (ptr) &var←c67472)+14)/* context←v11216 */ ))+1) ) = (* (( (ptr) (* (( (ptr) formal←c67536)+5) ))+6) );
SOURCE(15964, 37)
(* (( (ptr) (* (( (ptr) &var←c67472)+14)/* context←v11216 */ ))+3) ) = (* (( (ptr) (* (( (ptr) formal←c67536)+5) ))+4) );
SOURCE(16003, 35)
(* (( (ptr) (* (( (ptr) &var←c67472)+14)/* context←v11216 */ ))+4) ) = (* (( (ptr) (* (( (ptr) formal←c67536)+5) ))+5) );
SOURCE(16040, 38)
(* (( (ptr) (* (( (ptr) &var←c67472)+14)/* context←v11216 */ ))+5) ) = (* (( (ptr) (* (( (ptr) formal←c67536)+4) ))+4) );
SOURCE(16080, 41)
(* (( (ptr) (* (( (ptr) &var←c67472)+14)/* context←v11216 */ ))+6) ) = (* (ptr) (* (( (ptr) formal←c67536)+6) ) );
SOURCE(16123, 36)
(* (( (ptr) (* (( (ptr) &var←c67472)+14)/* context←v11216 */ ))+7) ) = (* (( (ptr) (* (( (ptr) formal←c67536)+6) ))+1) );
SOURCE(16161, 33)
(* (( (ptr) (* (( (ptr) &var←c67472)+14)/* context←v11216 */ ))+13) ) = (* (( (ptr) (* (( (ptr) formal←c67536)+5) ))+7) );
SOURCE(16196, 37)
(* (( (ptr) (* (( (ptr) &var←c67472)+14)/* context←v11216 */ ))+14) ) = (* (( (ptr) (* (( (ptr) formal←c67536)+5) ))+9) );
SOURCE(16235, 35)
(* (( (ptr) (* (( (ptr) &var←c67472)+14)/* context←v11216 */ ))+15) ) = (* (( (ptr) (* (( (ptr) formal←c67536)+5) ))+8) );
SOURCE(16272, 24)
{
word pd256;
pd256 = (* (( (ptr) (* (( (ptr) gf←c67504)+161)/* var←c60496 */ ))+7) );
(void) ( *( (fPt) ((* (ptr) pd256 ))))((* ((( (ptr) formal←c67536)+11)) ), pd256);
};
SOURCE(16298, 385)
{
word tc257;
word pd258;
if ( ( (0 != temp←v11116) ? (0 != (* (ptr) (* (( (ptr) formal←c67536)+5) ) )) : 0 ) ) {
pd258 = (* (( (ptr) (* (( (ptr) gf←c67504)+158)/* var←c59920 */ ))+13) );
tc257 = (word) (0 == (word) ( *( (fPt) ((* (ptr) pd258 ))))((* ((( (ptr) (* (( (ptr) formal←c67536)+6) ))+2)) ), pd258)
);
}
else {
tc257 = (word) 0;
};
if (tc257) {
SOURCE(16366, 319)
{
word finalName←v11276 = 0;
word copyFailed←v11304;
SOURCE(16403, 63)
{
W2 var←c62992;
(void) CopyWithSuffix←P480((word) &var←c62992, (* (( (ptr) &var←c67472)+5)/* ipName←v11144 */ ), (* (( (ptr) (* (( (ptr) formal←c67536)+6)
/*1*/ ))+2) ));
copyFailed←v11304 = var←c62992.f1;
finalName←v11276 = var←c62992.f0;
};
SOURCE(16468, 215)
if ((0 != copyFailed←v11304)) {
SOURCE(16487, 104)
{
W2 var←c63024;
{
/*1*/ W2 var←c63056;
/*1*/ word v←v58240;
/*1*/ v←v58240 = (* (( (ptr) (* (( (ptr) formal←c67536)+6) ))+1) );
/*1*/ var←c63056.f0 = 11;
/*1*/ var←c63056.f1 = v←v58240;
/*1*/ var←c63024 = var←c63056;
/*1*/ };
{
/*1*/ W2 var←c63120;
/*1*/ W2 var←c0708;
/*1*/ var←c63120.f0 = 11;
/*1*/ var←c63120.f1 = finalName←v11276;
/*1*/ (* (ptr) (word) &var←c0708 ) = 0;
/*1*/ (* (( (ptr) (word) &var←c0708) + 1) ) = 0;
/*1*/ {
/*1*/ word pd259;
/*1*/ pd259 = (* (( (ptr) (* (( (ptr) gf←c67504)+159)/* var←c60112 */ ))+60) );
/*1*/ (void) ( *( (fPt) ((* (ptr) pd259 ))))((* (( (ptr) (* (( (ptr) formal←c67536)+4) ))+9) ), (* (( (ptr) gf←c67504)+58) ), var←c63024, var←c63120, var←c0708, pd259)
/*1*/ ;
/*1*/ };
/*1*/ };
};
}
else {
SOURCE(16591, 92)
{
W2 var←c63184;
{
/*1*/ W2 var←c63216;
/*1*/ word v←v58192;
/*1*/ v←v58192 = (* (( (ptr) (* (( (ptr) formal←c67536)+6) ))+1) );
/*1*/ var←c63216.f0 = 11;
/*1*/ var←c63216.f1 = v←v58192;
/*1*/ var←c63184 = var←c63216;
/*1*/ };
{
/*1*/ W2 var←c63280;
/*1*/ W2 var←c0709;
/*1*/ var←c63280.f0 = 11;
/*1*/ var←c63280.f1 = finalName←v11276;
/*1*/ (* (ptr) (word) &var←c0709 ) = 0;
/*1*/ (* (( (ptr) (word) &var←c0709) + 1) ) = 0;
/*1*/ {
/*1*/ word pd260;
/*1*/ pd260 = (* (( (ptr) (* (( (ptr) gf←c67504)+159)/* var←c60112 */ ))+60) );
/*1*/ (void) ( *( (fPt) ((* (ptr) pd260 ))))((* (( (ptr) (* (( (ptr) formal←c67536)+4) ))+9) ), (* (( (ptr) gf←c67504)+59) ), var←c63184, var←c63280, var←c0709, pd260)
/*1*/ ;
/*1*/ };
/*1*/ };
};
};
};
};
};
SOURCE(16688, 587)
lab←L100041: ;
SOURCE(16688, 587)
{
word var←c63696;
{
/* declaration of var←c05 skipped */
/* declaration of var←c06 skipped */
(* (( (ptr) &var←c67472)+15)/* var←c05 */ ) = (* (( (ptr) (* (( (ptr) gf←c67504)+161)/* var←c60496 */ ))+8) );
(* (( (ptr) &var←c67472)+16)/* var←c06 */ ) = (* (( (ptr) (* (( (ptr) gf←c67504)+169)/* var←c62960 */ ))+13) );
{
/* declaration of var←c07 skipped */
{
word var←c08;
{
word var←c0710;
var←c0710 = (word) &var←c67472;
var←c08 = (word) XR←Enable(( ((word) (fPt) NoName←Q5832) ), ( ((word) (fPt) NoName←Q6312) ), var←c0710);
};
if ((var←c08 == 5)) {
goto lab←L100042;
}
else {
if ((var←c08 == 4)) {
/*1*/ goto lab←L100041;
/*1*/ };
};
};
var←c63696 = (* (( (ptr) &var←c67472)+17)/* var←c07 */ );
};
};
};
lab←L100042: ;
};
}
else {
SOURCE(17345, 79)
{
W2 var←c63728;
{
W2 var←c63760;
word v←v58048;
v←v58048 = (* (( (ptr) (* (( (ptr) formal←c67536)+6) ))+1) );
var←c63760.f0 = 11;
var←c63760.f1 = v←v58048;
var←c63728 = var←c63760;
};
{
word pd261;
pd261 = (* (( (ptr) (* (( (ptr) gf←c67504)+159)/* var←c60112 */ ))+61) );
(void) ( *( (fPt) ((* (ptr) pd261 ))))((* (( (ptr) (* (( (ptr) formal←c67536)+4) ))+9) ), (* (( (ptr) gf←c67504)+66) ), var←c63728, pd261)
;
};
};
SOURCE(17426, 20)
(* (( (ptr) &var←c67472)+4)/* destroyStatus←v11060 */ ) = 1;
};
};
SOURCE(17451, 64)
if ((0 != temp←v11116)) {
SOURCE(17464, 51)
SOURCE(17464, 51)
{
/* declaration of var←c63824 skipped */
{
word pd262;
pd262 = (* (( (ptr) (* (( (ptr) gf←c67504)+155)/* var←c59664 */ ))+5) );
(* (( (ptr) &var←c67472)+6)/* var←c63824 */ ) = (word) ( *( (fPt) ((* (ptr) pd262 ))))((* ((( (ptr) &var←c67472)+5)/* ipName←v11144 */ ) ), pd262)
;
};
{
/* declaration of var←c09 skipped */
(* (( (ptr) &var←c67472)+7)/* var←c09 */ ) = (* (( (ptr) (* (( (ptr) gf←c67504)+155)/* var←c59664 */ ))+22) );
{
word var←c010;
{
word var←c0711;
var←c0711 = (word) &var←c67472;
var←c010 = (word) XR←Enable(( ((word) (fPt) NoName←Q5772) ), ( ((word) (fPt) NoName←Q6252) ), var←c0711);
};
/* removed trivial cond node */
};
};
};
};
SOURCE(15248, 2267)
return((* (( (ptr) &var←c67472)+4)/* destroyStatus←v11060 */ ));
}
static word NoName←Q5772(formal←c0645)
word formal←c0645;
{
register ptr gf←c0644 = (ptr) &globalframe;
SOURCE(17464, 51)
{
word pd263;
pd263 = (* (( (ptr) formal←c0645)+7) );
(void) ( *( (fPt) ((* (ptr) pd263 ))))((* (( (ptr) formal←c0645)+6) ), (* (W4Pt) (( (ptr) gf←c0644)+146)/* var←c59568 */ ), 0, pd263)
;
};
return(0);
}
static word NoName←Q5832(formal←c0646)
word formal←c0646;
{
SOURCE(16688, 587)
{
word pd264;
pd264 = (* (( (ptr) formal←c0646)+16) );
(* (( (ptr) formal←c0646)+17) ) = (word) ( *( (fPt) ((* (ptr) pd264 ))))((* (( (ptr) formal←c0646)+5) ), (* (( (ptr) formal←c0646)+14)
), (* (( (ptr) formal←c0646)+15) ), (* (( (ptr) (* (ptr) formal←c0646 ))+11) ), pd264);
};
return(0);
}
static word GetGenerator←P900(v←v7960)
word v←v7960;
{
register ptr gf←c67568 = (ptr) &globalframe;
word producer←v8004;
word rp←v11348;
/* GetGenerator: */
SOURCE(17702, 302)
SOURCE(17702, 302)
producer←v8004 = 0;
SOURCE(17775, 68)
{
word pd265;
pd265 = (* (( (ptr) (* (( (ptr) gf←c67568)+156)/* var←c59696 */ ))+29) );
rp←v11348 = XR←Narrow((word) ( *( (fPt) ((* (ptr) pd265 ))))(v←v7960, (* (( (ptr) gf←c67568)+72) ), pd265), (* (( (ptr) gf←c67568)+10)
));
};
SOURCE(17845, 80)
if ((rp←v11348 == 0)) {
SOURCE(17860, 65)
{
word pd266;
pd266 = (* (( (ptr) (* (( (ptr) gf←c67568)+157)/* var←c59792 */ ))+12) );
rp←v11348 = XR←Narrow((word) ( *( (fPt) ((* (ptr) pd266 ))))((* (( (ptr) (* (ptr) v←v7960 ))+19) ), (* (( (ptr) gf←c67568)+72)
), pd266), (* (( (ptr) gf←c67568)+10) ));
};
};
SOURCE(17927, 77)
if ( ( (rp←v11348 != 0) ? ((* (ptr) rp←v11348 ) != 0) : 0 ) ) {
SOURCE(17954, 18)
return(XR←CheckProc(* (ptr) rp←v11348 ));
}
else {
SOURCE(17972, 32)
return((word) (( (bPt) gf←c67568)+400)/* var←c58800 */ );
};
}
static word FromTiogaViewer←P960(source←v41988, options←v42016, info←v42044, master←v42072, err←v42100, progress←v42128)
word source←v41988;
word options←v42016;
word info←v42044;
word master←v42072;
word err←v42100;
word progress←v42128;
{
register ptr gf←c67600 = (ptr) &globalframe;
word pages←v42172;
word v←v11404;
/* FromTiogaViewer: */
SOURCE(18009, 154)
SOURCE(18009, 154)
pages←v42172 = 0;
SOURCE(18041, 27)
v←v11404 = XR←Narrow(source←v41988, (* (( (ptr) gf←c67600)+11) ));
SOURCE(18070, 93)
{
word var←c63856;
{
word pd267;
pd267 = (* (( (ptr) (* (( (ptr) gf←c67600)+170)/* var←c63888 */ ))+5) );
var←c63856 = (word) ( *( (fPt) ((* (ptr) pd267 ))))(v←v11404, pd267);
};
pages←v42172 = (word) FromTiogaNode←P1080(var←c63856, options←v42016, info←v42044, master←v42072, err←v42100, progress←v42128)
;
};
SOURCE(18009, 154)
return(pages←v42172);
}
static word FromTiogaFile←P1020(source←v42232, options←v42260, info←v42288, master←v42316, err←v42344, progress←v42372)
word source←v42232;
word options←v42260;
word info←v42288;
word master←v42316;
word err←v42344;
word progress←v42372;
{
register ptr gf←c67632 = (ptr) &globalframe;
word pages←v42416;
word file←v11448;
/* FromTiogaFile: */
SOURCE(18169, 147)
SOURCE(18169, 147)
pages←v42416 = 0;
SOURCE(18199, 28)
file←v11448 = XR←Narrow(source←v42232, (* (( (ptr) gf←c67632)+14) ));
if ((file←v11448 == 0)) {
goto lab←L100052;
};
if (( (unsigned) (*(int*)file←v11448<0) == 0)) {
goto lab←L100052;
};
(void) XR←RaiseError(XR←NarrowFault, 0);
lab←L100052: ;
SOURCE(18229, 87)
{
word var←c63952;
{
word pd268;
pd268 = (* (( (ptr) (* (( (ptr) gf←c67632)+171)/* var←c63984 */ ))+9) );
var←c63952 = (word) ( *( (fPt) ((* (ptr) pd268 ))))(file←v11448, pd268);
};
pages←v42416 = (word) FromTiogaNode←P1080(var←c63952, options←v42260, info←v42288, master←v42316, err←v42344, progress←v42372)
;
};
SOURCE(18169, 147)
return(pages←v42416);
}
static word FromTiogaNode←P1080(source←v8064, formal←c0790, info←v8120, master←v8148, err←v8176, progress←v8204)
word source←v8064;
word formal←c0790;
word info←v8120;
word master←v8148;
word err←v8176;
word progress←v8204;
{
W18 var←c67664;
/* declaration of options←v8092 skipped */
register ptr gf←c67696 = (ptr) &globalframe;
word pages←v8248;
/* declaration of var←c64016 skipped */
/* declaration of var←c64048 skipped */
/* declaration of var←c64080 skipped */
word root←v11548 = 0;
word writer←v11576;
/* declaration of rotate←v11604 skipped */
/* declaration of xTranslate←v11632 skipped */
word marks←v11660 = 0;
W2 loc←v11688;
word totalSize←v11716;
word pageCount←v11744 = 0;
(* (( (ptr) &var←c67664)+4)/* options←v8092 */ ) = formal←c0790;
/* FromTiogaNode: */
SOURCE(18322, 2579)
{
word tmpAddr269;
tmpAddr269 = (word) (( (ptr) &var←c67664)+5)/* var←c64016 */ ;
(* (ptr) tmpAddr269 ) = ( ((word) (fPt) Paint←P2868) );
(* (( (ptr) tmpAddr269) + 1) ) = 1;
};
{
word tmpAddr270;
tmpAddr270 = (word) (( (ptr) &var←c67664)+7)/* var←c64048 */ ;
(* (ptr) tmpAddr270 ) = ( ((word) (fPt) LandscapeStyle←P2760) );
(* (( (ptr) tmpAddr270) + 1) ) = 1;
};
{
word tmpAddr271;
tmpAddr271 = (word) (( (ptr) &var←c67664)+9)/* var←c64080 */ ;
(* (ptr) tmpAddr271 ) = ( ((word) (fPt) SetDevice←P2700) );
(* (( (ptr) tmpAddr271) + 1) ) = 1;
};
SOURCE(18322, 2579)
pages←v8248 = 0;
SOURCE(19313, 49)
{
word pd272;
pd272 = (* (( (ptr) (* (( (ptr) gf←c67696)+171)/* var←c63984 */ ))+16) );
writer←v11576 = (word) ( *( (fPt) ((* (ptr) pd272 ))))(pd272);
};
SOURCE(19427, 22)
loc←v11688.f0 = 0;
loc←v11688.f1 = 0;
SOURCE(19487, 76)
lab←L100055: ;
{
word pd273;
pd273 = (* (( (ptr) (* (( (ptr) gf←c67696)+171)/* var←c63984 */ ))+11) );
if ((0 == (word) ( *( (fPt) ((* (ptr) pd273 ))))(source←v8064, pd273))) {
}
else {
goto lab←L100053;
};
};
SOURCE(19522, 41)
{
word var←c64144;
word pd274;
pd274 = (* (( (ptr) (* (( (ptr) gf←c67696)+171)/* var←c63984 */ ))+27) );
var←c64144 = (word) ( *( (fPt) ((* (ptr) pd274 ))))(writer←v11576, source←v8064, 2147483647, pd274);
};
goto lab←L100055;
lab←L100053: ;
SOURCE(19574, 36)
{
word pd275;
pd275 = (* (( (ptr) (* (( (ptr) gf←c67696)+171)/* var←c63984 */ ))+22) );
root←v11548 = (word) ( *( (fPt) ((* (ptr) pd275 ))))(writer←v11576, pd275);
};
SOURCE(19612, 100)
{
word pd276;
pd276 = (* (( (ptr) (* (( (ptr) gf←c67696)+158)/* var←c59920 */ ))+14) );
if (( (int)(word) ( *( (fPt) ((* (ptr) pd276 ))))((* ((( (ptr) (* (( (ptr) &var←c67664)+4)/* options←v8092 */ ))+10)) ), pd276)
!= (int)0)) {
SOURCE(19654, 58)
{
word pd277;
pd277 = (* (( (ptr) (* (( (ptr) gf←c67696)+172)/* var←c64176 */ ))+30) );
(void) ( *( (fPt) ((* (ptr) pd277 ))))(root←v11548, (* (( (ptr) (* (( (ptr) &var←c67664)+4)/* options←v8092 */ ))+10) ), 0, pd277)
;
};
};
};
SOURCE(19714, 96)
{
word tc278;
word pd279;
if (((* (( (ptr) (* (( (ptr) &var←c67664)+4)/* options←v8092 */ ))+3) ) != 0)) {
pd279 = (* (( (ptr) (* (( (ptr) gf←c67696)+158)/* var←c59920 */ ))+14) );
tc278 = (word) ( (int)(word) ( *( (fPt) ((* (ptr) pd279 ))))((* ((( (ptr) (* (( (ptr) &var←c67664)+4)/* options←v8092 */ ))+3)
) ), pd279) > (int)0);
}
else {
tc278 = (word) 0;
};
if (tc278) {
SOURCE(19779, 31)
(void) SetDevice←P2700(root←v11548, (* (( (ptr) (* (( (ptr) &var←c67664)+4)/* options←v8092 */ ))+3) ), (word) (( (bPt) &var←c67664)+36)
/* var←c64080 */ );
};
};
SOURCE(19813, 50)
{
word pd280;
pd280 = (* (( (ptr) (* (( (ptr) gf←c67696)+173)/* var←c64208 */ ))+14) );
loc←v11688.f0 = (word) ( *( (fPt) ((* (ptr) pd280 ))))(root←v11548, pd280);
};
loc←v11688.f1 = 0;
SOURCE(19865, 60)
{
W2 var←c64240;
{
word pd281;
pd281 = (* (( (ptr) (* (( (ptr) gf←c67696)+173)/* var←c64208 */ ))+27) );
(void) ( *( (fPt) ((* (ptr) pd281 ))))((word) &var←c64240, root←v11548, pd281);
};
{
word pd282;
pd282 = (* (( (ptr) (* (( (ptr) gf←c67696)+173)/* var←c64208 */ ))+23) );
totalSize←v11716 = (word) ( *( (fPt) ((* (ptr) pd282 ))))(var←c64240, 1, 0, pd282);
};
};
SOURCE(19927, 43)
{
W2 var←c64272;
(void) LandscapeStyle←P2760((word) &var←c64272, root←v11548, (word) (( (bPt) &var←c67664)+28)/* var←c64048 */ );
(* (( (ptr) &var←c67664)+12)/* xTranslate←v11632 */ ) = var←c64272.f1;
(* (( (ptr) &var←c67664)+11)/* rotate←v11604 */ ) = var←c64272.f0;
};
SOURCE(19972, 783)
lab←L100058: ;
if ((loc←v11688.f0 != 0)) {
}
else {
goto lab←L100056;
};
{
/* declaration of page←v12036 skipped */
word var←c64336;
word var←c64400;
SOURCE(20334, 31)
XR←FillWords(&(* (W5Pt) ((( (ptr) &var←c67664)+13)/* page←v12036 */ )), 5, 0);
SOURCE(20367, 60)
{
word x283;
word pd284;
pd284 = (* (( (ptr) (* (( (ptr) gf←c67696)+173)/* var←c64208 */ ))+23) );
*(float*)&var←c64336 = ((
x283 = (* (ptr) &fc172 ), *(float*)&x283
) * (float)(int)(word) ( *( (fPt) ((* (ptr) pd284 ))))(loc←v11688, 1, 0, pd284)) / (float)(int)totalSize←v11716;
};
if ((0 != (word) ( *( (fPt) ((* (ptr) progress←v8204 ))))(var←c64336, progress←v8204))) {
SOURCE(20427, 4)
goto lab←L100057;
};
SOURCE(20451, 82)
{
word pd285;
pd285 = (* (( (ptr) (* (( (ptr) gf←c67696)+174)/* var←c64368 */ ))+6) );
(void) ( *( (fPt) ((* (ptr) pd285 ))))((word) (( (bPt) &var←c67664)+52)/* page←v12036 */ , pageCount←v11744, loc←v11688, 0, marks←v11660, 1, pd285)
;
};
SOURCE(20535, 60)
{
word x286;
word pd287;
pd287 = (* (( (ptr) (* (( (ptr) gf←c67696)+173)/* var←c64208 */ ))+23) );
*(float*)&var←c64400 = ((
x286 = (* (ptr) &fc172 ), *(float*)&x286
) * (float)(int)(word) ( *( (fPt) ((* (ptr) pd287 ))))(loc←v11688, 1, 0, pd287)) / (float)(int)totalSize←v11716;
};
if ((0 != (word) ( *( (fPt) ((* (ptr) progress←v8204 ))))(var←c64400, progress←v8204))) {
SOURCE(20595, 4)
goto lab←L100057;
};
SOURCE(20619, 38)
{
word pd288;
pd288 = (* (( (ptr) (* (( (ptr) gf←c67696)+163)/* var←c61136 */ ))+11) );
(void) ( *( (fPt) ((* (ptr) pd288 ))))(master←v8148, (word) (( (bPt) &var←c67664)+20)/* var←c64016 */ , (* (ptr) &fc289 ), pd288)
;
};
SOURCE(20659, 29)
{
word pd290;
pd290 = (* (( (ptr) (* (( (ptr) gf←c67696)+174)/* var←c64368 */ ))+19) );
(void) ( *( (fPt) ((* (ptr) pd290 ))))((* ((( (ptr) &var←c67664)+13)) ), pd290);
};
SOURCE(20690, 25)
pageCount←v11744 = (pageCount←v11744 + 1);
SOURCE(20717, 18)
marks←v11660 = (* (( (ptr) &var←c67664)+16) );
SOURCE(20737, 18)
loc←v11688 = (* (W2Pt) (( (ptr) &var←c67664)+14) );
};
goto lab←L100058;
lab←L100056: ;
lab←L100057: ;
SOURCE(20766, 30)
{
word pd291;
pd291 = (* (( (ptr) (* (( (ptr) gf←c67696)+163)/* var←c61136 */ ))+12) );
(void) ( *( (fPt) ((* (ptr) pd291 ))))(master←v8148, pd291);
};
SOURCE(20798, 28)
{
word pd292;
pd292 = (* (( (ptr) (* (( (ptr) gf←c67696)+171)/* var←c63984 */ ))+24) );
(void) ( *( (fPt) ((* (ptr) pd292 ))))(source←v8064, pd292);
};
SOURCE(20828, 20)
{
word var←c64432;
var←c64432 = (word) ( *( (fPt) ((* (ptr) progress←v8204 ))))((* (ptr) (&fc172) ), progress←v8204);
};
SOURCE(20876, 25)
return(pageCount←v11744);
}
static void SetDevice←P2700(node←v11820, device←v11848, formal←c67760)
word node←v11820;
word device←v11848;
word formal←c67760;
{
register ptr gf←c67728 = (ptr) &globalframe;
word old←v12168;
word new←v12196;
formal←c67760 = (formal←c67760 - 36);
/* SetDevice: */
SOURCE(18510, 309)
SOURCE(18587, 89)
{
word var←c64464;
{
word pd293;
pd293 = (* (( (ptr) (* (( (ptr) gf←c67728)+175)/* var←c64496 */ ))+5) );
var←c64464 = (word) ( *( (fPt) ((* (ptr) pd293 ))))(node←v11820, (* (( (ptr) gf←c67728)+68) ), pd293);
};
{
word pd294;
pd294 = (* (( (ptr) (* (( (ptr) gf←c67728)+175)/* var←c64496 */ ))+26) );
old←v12168 = (word) ( *( (fPt) ((* (ptr) pd294 ))))((* (( (ptr) gf←c67728)+68) ), var←c64464, pd294);
};
};
SOURCE(18678, 51)
{
word pd295;
pd295 = (* (( (ptr) (* (( (ptr) gf←c67728)+158)/* var←c59920 */ ))+5) );
new←v12196 = (word) ( *( (fPt) ((* (ptr) pd295 ))))(old←v12168, (* (( (ptr) gf←c67728)+69) ), device←v11848, (* (( (ptr) gf←c67728)+70)
), 0, pd295);
};
SOURCE(18731, 88)
{
word var←c64528;
{
word pd296;
pd296 = (* (( (ptr) (* (( (ptr) gf←c67728)+175)/* var←c64496 */ ))+25) );
var←c64528 = (word) ( *( (fPt) ((* (ptr) pd296 ))))((* (( (ptr) gf←c67728)+68) ), new←v12196, pd296);
};
{
word pd297;
pd297 = (* (( (ptr) (* (( (ptr) gf←c67728)+175)/* var←c64496 */ ))+4) );
(void) ( *( (fPt) ((* (ptr) pd297 ))))(node←v11820, (* (( (ptr) gf←c67728)+68) ), var←c64528, pd297);
};
};
}
static void LandscapeStyle←P2760(formal←c0375, root←v11908, formal←c67856)
word formal←c0375;
word root←v11908;
word formal←c67856;
{
W8 var←c67792;
register ptr gf←c67824 = (ptr) &globalframe;
word rotate←v11952;
word xTranslate←v11980;
/* declaration of nodeStyle←v12240 skipped */
word pageRotation←v12268;
formal←c67856 = (formal←c67856 - 28);
var←c67792.f0 = formal←c67856;
/* LandscapeStyle: */
SOURCE(18824, 464)
SOURCE(18911, 47)
{
word pd298;
pd298 = (* (( (ptr) (* (( (ptr) gf←c67824)+176)/* var←c64560 */ ))+6) );
var←c67792.f4/* nodeStyle←v12240 */ = (word) ( *( (fPt) ((* (ptr) pd298 ))))(pd298);
};
SOURCE(18960, 24)
pageRotation←v12268 = (* (ptr) &fc299 );
SOURCE(18986, 45)
{
word pd300;
pd300 = (* (( (ptr) (* (( (ptr) gf←c67824)+176)/* var←c64560 */ ))+15) );
(void) ( *( (fPt) ((* (ptr) pd300 ))))(var←c67792.f4/* nodeStyle←v12240 */ , root←v11908, 1, pd300);
};
SOURCE(19033, 164)
SOURCE(19033, 164)
{
/* declaration of var←c011 skipped */
/* declaration of var←c012 skipped */
var←c67792.f5/* var←c011 */ = (* (( (ptr) var←c67792.f4/* nodeStyle←v12240 */ )+5) );
var←c67792.f6/* var←c012 */ = (* (( (ptr) (* (( (ptr) gf←c67824)+176)/* var←c64560 */ ))+23) );
{
/* declaration of var←c013 skipped */
{
word var←c014;
{
word var←c0712;
var←c0712 = (word) &var←c67792;
var←c014 = (word) XR←Enable(( ((word) (fPt) NoName←Q5892) ), ( ((word) (fPt) NoName←Q6192) ), var←c0712);
};
if ((var←c014 == 7)) {
goto lab←L100061;
};
};
pageRotation←v12268 = var←c67792.f7/* var←c013 */ ;
};
};
lab←L100061: ;
SOURCE(19208, 25)
{
word x301;
word x302;
rotate←v11952 = (unsigned) ((
x301 = pageRotation←v12268, *(float*)&x301
) != (
x302 = (* (ptr) &fc299 ), *(float*)&x302
));
};
SOURCE(19235, 53)
{
word pd303;
pd303 = (* (( (ptr) (* (( (ptr) gf←c67824)+178)/* var←c64624 */ ))+12) );
xTranslate←v11980 = (word) ( *( (fPt) ((* (ptr) pd303 ))))(var←c67792.f4/* nodeStyle←v12240 */ , 39, pd303);
};
/* removed tail goto */
(* (ptr) formal←c0375 ) = rotate←v11952;
(* (( (ptr) formal←c0375)+1) ) = xTranslate←v11980;
return;
}
static word NoName←Q5892(formal←c0656)
word formal←c0656;
{
register ptr gf←c0655 = (ptr) &globalframe;
SOURCE(19033, 164)
{
word pd304;
pd304 = (* (( (ptr) formal←c0656)+6) );
(* (( (ptr) formal←c0656)+7) ) = (word) ( *( (fPt) ((* (ptr) pd304 ))))((* (( (ptr) formal←c0656)+4) ), (* (( (ptr) gf←c0655)+71)
), (* (( (ptr) formal←c0656)+5) ), 1, pd304);
};
return(0);
}
static void Paint←P2868(context←v12112, formal←c67920)
word context←v12112;
word formal←c67920;
{
register ptr gf←c67888 = (ptr) &globalframe;
formal←c67920 = (formal←c67920 - 20);
/* Paint: */
SOURCE(19994, 13)
SOURCE(20036, 88)
{
word pd305;
word x306;
word x308;
word x310;
float tf311;
pd305 = (* (( (ptr) (* (( (ptr) gf←c67888)+179)/* var←c64656 */ ))+15) );
(void) ( *( (fPt) ((* (ptr) pd305 ))))(context←v12112, (
tf311 = (
x306 = (* (( (ptr) (* (( (ptr) formal←c67920)+4) ))+11) ), *(float*)&x306
) * ((
x308 = (* (ptr) &fc307 ), *(float*)&x308
) / (
x310 = (* (ptr) &fc309 ), *(float*)&x310
)), *(word*)&tf311
), pd305);
};
SOURCE(20126, 153)
if ((0 != (* (( (ptr) formal←c67920)+11) ))) {
SOURCE(20203, 45)
{
W2 var←c64688;
var←c64688.f0 = (* (( (ptr) formal←c67920)+12) );
var←c64688.f1 = (* (ptr) &fc299 );
{
word pd312;
pd312 = (* (( (ptr) (* (( (ptr) gf←c67888)+179)/* var←c64656 */ ))+18) );
(void) ( *( (fPt) ((* (ptr) pd312 ))))(context←v12112, var←c64688, pd312);
};
};
SOURCE(20250, 29)
{
word pd313;
pd313 = (* (( (ptr) (* (( (ptr) gf←c67888)+179)/* var←c64656 */ ))+17) );
(void) ( *( (fPt) ((* (ptr) pd313 ))))(context←v12112, (* (ptr) &fc314 ), pd313);
};
};
SOURCE(20284, 45)
{
W2 var←c64720;
var←c64720.f0 = (* (ptr) &fc299 );
var←c64720.f1 = (* (ptr) &fc299 );
{
word pd315;
pd315 = (* (( (ptr) (* (( (ptr) gf←c67888)+174)/* var←c64368 */ ))+16) );
(void) ( *( (fPt) ((* (ptr) pd315 ))))((* (( (ptr) formal←c67920)+13) ), context←v12112, var←c64720, pd315);
};
};
}
static void DoWhileViewerHidden←P1140(formal←c0791, formal←c0792)
word formal←c0791;
word formal←c0792;
{
W15 var←c67952;
/* declaration of viewer←v8308 skipped */
/* declaration of action←v8336 skipped */
/* declaration of var←c64752 skipped */
/* declaration of var←c64784 skipped */
/* declaration of var←c64816 skipped */
/* declaration of wasIconic←v12396 skipped */
/* declaration of wasColumn←v12424 skipped */
/* declaration of state←v12452 skipped */
(* (( (ptr) &var←c67952)+4)/* viewer←v8308 */ ) = formal←c0791;
(* (( (ptr) &var←c67952)+5)/* action←v8336 */ ) = formal←c0792;
/* DoWhileViewerHidden: */
SOURCE(22334, 1746)
{
word tmpAddr316;
tmpAddr316 = (word) (( (ptr) &var←c67952)+6)/* var←c64752 */ ;
(* (ptr) tmpAddr316 ) = ( ((word) (fPt) UnHideViewer←P3048) );
(* (( (ptr) tmpAddr316) + 1) ) = 1;
};
{
word tmpAddr317;
tmpAddr317 = (word) (( (ptr) &var←c67952)+8)/* var←c64784 */ ;
(* (ptr) tmpAddr317 ) = ( ((word) (fPt) CallClientUnderLock←P2988) );
(* (( (ptr) tmpAddr317) + 1) ) = 1;
};
{
word tmpAddr318;
tmpAddr318 = (word) (( (ptr) &var←c67952)+10)/* var←c64816 */ ;
(* (ptr) tmpAddr318 ) = ( ((word) (fPt) HideViewer←P2928) );
(* (( (ptr) tmpAddr318) + 1) ) = 1;
};
SOURCE(23809, 31)
(* (( (ptr) &var←c67952)+12)/* wasIconic←v12396 */ ) = (unsigned) (((unsigned)(* (( (bPt) (* (( (ptr) &var←c67952)+4)/* viewer←v8308 */ ))+76)
) << 27) >> 31);
SOURCE(23842, 47)
(* (( (ptr) &var←c67952)+13)/* wasColumn←v12424 */ ) = (* (( (ptr) (* (( (ptr) &var←c67952)+4)/* viewer←v8308 */ ))+18)
);
SOURCE(23891, 7)
(* (( (ptr) &var←c67952)+14)/* state←v12452 */ ) = 0;
SOURCE(23968, 12)
(void) HideViewer←P2928((word) ((( (bPt) &var←c67952)+40)/* var←c64816 */ ));
SOURCE(23982, 21)
(void) CallClientUnderLock←P2988((word) ((( (bPt) &var←c67952)+32)/* var←c64784 */ ));
SOURCE(24066, 14)
(void) UnHideViewer←P3048((word) ((( (bPt) &var←c67952)+24)/* var←c64752 */ ));
}
static void HideViewer←P2928(formal←c68048)
word formal←c68048;
{
W8 var←c67984;
register ptr gf←c68016 = (ptr) &globalframe;
/* declaration of var←c64848 skipped */
/* declaration of var←c64880 skipped */
formal←c68048 = (formal←c68048 - 40);
var←c67984.f0 = formal←c68048;
/* HideViewer: */
SOURCE(22395, 558)
{
word tmpAddr319;
tmpAddr319 = (word) (( (ptr) &var←c67984)+4)/* var←c64848 */ ;
(* (ptr) tmpAddr319 ) = ( ((word) (fPt) CompareYPos←P3168) );
(* (( (ptr) tmpAddr319) + 1) ) = 1;
};
{
word tmpAddr320;
tmpAddr320 = (word) (( (ptr) &var←c67984)+6)/* var←c64880 */ ;
(* (ptr) tmpAddr320 ) = ( ((word) (fPt) ListColumn←P3108) );
(* (( (ptr) tmpAddr320) + 1) ) = 1;
};
SOURCE(22650, 260)
if ( ! ((* (( (bPt) (* (( (ptr) formal←c68048)+4) ))+76) ) & 020)) {
SOURCE(22725, 38)
{
word pd321;
pd321 = (* (( (ptr) (* (( (ptr) gf←c68016)+156)/* var←c59696 */ ))+25) );
(void) ( *( (fPt) ((* (ptr) pd321 ))))((word) ((( (bPt) &var←c67984)+24)/* var←c64880 */ ), pd321);
};
SOURCE(22773, 58)
SOURCE(22774, 57)
{
word pd322;
pd322 = (* (( (ptr) (* (( (ptr) gf←c68016)+180)/* var←c64912 */ ))+27) );
(* (( (ptr) formal←c68048)+14) ) = (word) ( *( (fPt) ((* (ptr) pd322 ))))((* (( (ptr) formal←c68048)+14) ), (word) (( (bPt) &var←c67984)+16)
/* var←c64848 */ , pd322);
};
SOURCE(22834, 36)
{
word pd323;
pd323 = (* (( (ptr) (* (( (ptr) gf←c68016)+156)/* var←c59696 */ ))+8) );
(void) ( *( (fPt) ((* (ptr) pd323 ))))((* (( (ptr) formal←c68048)+4) ), 0, pd323);
};
SOURCE(22872, 38)
{
word pd324;
pd324 = (* (( (ptr) (* (( (ptr) gf←c68016)+156)/* var←c59696 */ ))+38) );
(void) ( *( (fPt) ((* (ptr) pd324 ))))((* (( (ptr) (* (( (ptr) formal←c68048)+4) ))+18) ), 1, pd324);
};
};
SOURCE(22915, 38)
{
word pd325;
pd325 = (* (( (ptr) (* (( (ptr) gf←c68016)+156)/* var←c59696 */ ))+24) );
(void) ( *( (fPt) ((* (ptr) pd325 ))))((* (( (ptr) formal←c68048)+4) ), 0, pd325);
};
}
static word ListColumn←P3108(v←v56244, formal←c68112)
word v←v56244;
word formal←c68112;
{
register ptr gf←c68080 = (ptr) &globalframe;
word var←c56288;
formal←c68112 = (formal←c68112 - 24);
/* ListColumn: */
SOURCE(22419, 106)
SOURCE(22419, 106)
var←c56288 = 1;
SOURCE(22454, 71)
if ( ( ((* (( (ptr) v←v56244)+18) ) == (* (( (ptr) (* (( (ptr) (* (ptr) formal←c68112 ))+4) ))+18) )) ? ! ((* (( (bPt) v←v56244)+76)
) & 020) : 0 ) ) {
SOURCE(22502, 23)
{
word var←c64944;
var←c64944 = XR←NewObject(8, (* (( (ptr) gf←c68080)+7) ));
(* (ptr) var←c64944 ) = v←v56244;
(* (( (ptr) var←c64944)+1) ) = (* (( (ptr) (* (ptr) formal←c68112 ))+14) );
(* (( (ptr) (* (ptr) formal←c68112 ))+14) ) = var←c64944;
};
};
SOURCE(22419, 106)
return(var←c56288);
}
static word CompareYPos←P3168(ref1←v56348, ref2←v56376, formal←c68176)
word ref1←v56348;
word ref2←v56376;
word formal←c68176;
{
register ptr gf←c68144 = (ptr) &globalframe;
word var←c56420;
formal←c68176 = (formal←c68176 - 16);
/* CompareYPos: */
SOURCE(22530, 117)
SOURCE(22563, 84)
{
word idx326;
return((
idx326 = (word) ( ( (int)(* (( (ptr) XR←Narrow(ref1←v56348, (* (( (ptr) gf←c68144)+11) )))+2) ) > (int)(* (( (ptr) XR←Narrow(
ref2←v56376, (* (( (ptr) gf←c68144)+11) )))+2) )) ? 0 : 2 ) ,
BCK(idx326, 3)
));
};
}
static void CallClientUnderLock←P2988(formal←c68240)
word formal←c68240;
{
W4 var←c68208;
formal←c68240 = (formal←c68240 - 32);
var←c68208.f0 = formal←c68240;
/* CallClientUnderLock: */
SOURCE(22994, 112)
SOURCE(23027, 79)
{
word var←c0713;
var←c0713 = (word) &var←c68208;
(void) (word) XR←Enable(( ((word) (fPt) NoName←Q5952) ), ( ((word) (fPt) NoName←Q6132) ), var←c0713);
};
}
static word NoName←Q5952(formal←c0667)
word formal←c0667;
{
register ptr gf←c0666 = (ptr) &globalframe;
SOURCE(23060, 46)
{
word pd327;
pd327 = (* (( (ptr) (* (( (ptr) gf←c0666)+181)/* var←c65008 */ ))+4) );
(void) ( *( (fPt) ((* (ptr) pd327 ))))((* (( (ptr) (* (ptr) formal←c0667 ))+5) ), (* (( (ptr) (* (ptr) formal←c0667 ))+4)
), pd327);
};
return(0);
}
static void UnHideViewer←P3048(formal←c68304)
word formal←c68304;
{
register ptr gf←c68272 = (ptr) &globalframe;
formal←c68304 = (formal←c68304 - 24);
/* UnHideViewer: */
SOURCE(23131, 642)
SOURCE(23157, 41)
{
word pd328;
pd328 = (* (( (ptr) (* (( (ptr) gf←c68272)+156)/* var←c59696 */ ))+24) );
(void) ( *( (fPt) ((* (ptr) pd328 ))))((* (( (ptr) formal←c68304)+4) ), (* (( (ptr) formal←c68304)+13) ), pd328);
};
SOURCE(23200, 573)
if ((0 == (* (( (ptr) formal←c68304)+12) ))) {
SOURCE(23256, 469)
{
register word vl←v12700;
vl←v12700 = (* (( (ptr) formal←c68304)+14) );
lab←L100069: ;
if ((vl←v12700 != 0)) {
}
else {
goto lab←L100066;
};
{
word v←v12828;
SOURCE(23312, 20)
v←v12828 = (* (ptr) vl←v12700 );
if ((* (( (bPt) v←v12828)+77) ) & 0100) {
}
else {
if ((v←v12828 == (* (( (ptr) formal←c68304)+4) ))) {
SOURCE(23412, 60)
{
word pd329;
pd329 = (* (( (ptr) (* (( (ptr) gf←c68272)+156)/* var←c59696 */ ))+7) );
(void) ( *( (fPt) ((* (ptr) pd329 ))))((* (( (ptr) formal←c68304)+4) ), 0, 1, 0, pd329);
};
}
else {
if ((* (( (bPt) v←v12828)+76) ) & 020) {
}
else {
if (((* (( (ptr) v←v12828)+18) ) != (* (( (ptr) formal←c68304)+13) ))) {
}
else {
SOURCE(23637, 31)
{
word pd330;
pd330 = (* (( (ptr) (* (( (ptr) gf←c68272)+156)/* var←c59696 */ ))+8) );
(void) ( *( (fPt) ((* (ptr) pd330 ))))(v←v12828, 0, pd330);
};
SOURCE(23670, 55)
{
word pd331;
pd331 = (* (( (ptr) (* (( (ptr) gf←c68272)+156)/* var←c59696 */ ))+7) );
(void) ( *( (fPt) ((* (ptr) pd331 ))))(v←v12828, 0, 1, 0, pd331);
};
};
};
};
};
};
vl←v12700 = (* (( (ptr) vl←v12700)+1) );
goto lab←L100069;
lab←L100066: ;
};
SOURCE(23739, 34)
{
word pd332;
pd332 = (* (( (ptr) (* (( (ptr) gf←c68272)+156)/* var←c59696 */ ))+38) );
(void) ( *( (fPt) ((* (ptr) pd332 ))))((* (( (ptr) formal←c68304)+13) ), 1, pd332);
};
};
}
static void RecursivelyPaintViewers←P1200(formal←c0793, formal←c0794)
word formal←c0793;
word formal←c0794;
{
W15 var←c68336;
/* declaration of viewer←v8412 skipped */
/* declaration of context←v8440 skipped */
register ptr gf←c68368 = (ptr) &globalframe;
/* declaration of var←c65040 skipped */
/* declaration of var←c65072 skipped */
/* declaration of var←c65104 skipped */
/* declaration of wbs←v12956 skipped */
/* declaration of quit←v12984 skipped */
(* (( (ptr) &var←c68336)+4)/* viewer←v8412 */ ) = formal←c0793;
(* (( (ptr) &var←c68336)+5)/* context←v8440 */ ) = formal←c0794;
/* RecursivelyPaintViewers: */
SOURCE(24086, 3748)
{
word tmpAddr333;
tmpAddr333 = (word) (( (ptr) &var←c68336)+6)/* var←c65040 */ ;
(* (ptr) tmpAddr333 ) = ( ((word) (fPt) PaintChild←P3588) );
(* (( (ptr) tmpAddr333) + 1) ) = 1;
};
{
word tmpAddr334;
tmpAddr334 = (word) (( (ptr) &var←c68336)+8)/* var←c65072 */ ;
(* (ptr) tmpAddr334 ) = ( ((word) (fPt) PaintClient←P3384) );
(* (( (ptr) tmpAddr334) + 1) ) = 1;
};
{
word tmpAddr335;
tmpAddr335 = (word) (( (ptr) &var←c68336)+10)/* var←c65104 */ ;
(* (ptr) tmpAddr335 ) = ( ((word) (fPt) PaintWindow←P3324) );
(* (( (ptr) tmpAddr335) + 1) ) = 1;
};
SOURCE(26802, 72)
(* (( (ptr) &var←c68336)+12)/* wbs←v12956 */ ) = ( ((* (( (bPt) (* (( (ptr) &var←c68336)+4)/* viewer←v8412 */ ))+76) ) & 010) ? (* (ptr) (* (
( (ptr) (* (( (ptr) gf←c68368)+182)/* var←c65136 */ ))+9) ) ) : 0 ) ;
SOURCE(26876, 18)
(* (( (ptr) &var←c68336)+13)/* quit←v12984 */ ) = 0;
SOURCE(26896, 200)
{
register word v←v13060;
v←v13060 = (* (( (ptr) &var←c68336)+4)/* viewer←v8412 */ );
lab←L100073: ;
if ((v←v13060 != 0)) {
}
else {
goto lab←L100070;
};
SOURCE(26963, 133)
if (((* (( (ptr) v←v13060)+22) ) != 0)) {
SOURCE(26986, 54)
if (( (int)((* (( (ptr) v←v13060)+2) ) + (* (( (ptr) v←v13060)+4) )) < (int)0) || ( (int)(* (( (ptr) v←v13060)+2) ) > (int)(* (
( (ptr) (* (( (ptr) v←v13060)+22) ))+8) ))) {
SOURCE(27034, 6)
return;
};
SOURCE(27042, 54)
if (( (int)((* (( (ptr) v←v13060)+3) ) + (* (( (ptr) v←v13060)+3) )) < (int)0) || ( (int)(* (( (ptr) v←v13060)+1) ) > (int)(* (
( (ptr) (* (( (ptr) v←v13060)+22) ))+7) ))) {
SOURCE(27090, 6)
return;
};
};
v←v13060 = (* (( (ptr) v←v13060)+22) );
goto lab←L100073;
lab←L100070: ;
};
SOURCE(27109, 38)
{
word pd336;
pd336 = (* (( (ptr) (* (( (ptr) gf←c68368)+179)/* var←c64656 */ ))+13) );
(void) ( *( (fPt) ((* (ptr) pd336 ))))((* (( (ptr) &var←c68336)+5)/* context←v8440 */ ), (word) (( (bPt) &var←c68336)+40)
/* var←c65104 */ , pd336);
};
SOURCE(27170, 50)
{
W2 var←c65168;
{
float tf337;
var←c65168.f0 = (
tf337 = (float)(int)(* (( (ptr) (* (( (ptr) &var←c68336)+4)/* viewer←v8412 */ ))+5) ), *(word*)&tf337
);
};
{
float tf338;
var←c65168.f1 = (
tf338 = (float)(int)(* (( (ptr) (* (( (ptr) &var←c68336)+4)/* viewer←v8412 */ ))+6) ), *(word*)&tf338
);
};
{
word pd339;
pd339 = (* (( (ptr) (* (( (ptr) gf←c68368)+179)/* var←c64656 */ ))+18) );
(void) ( *( (fPt) ((* (ptr) pd339 ))))((* (( (ptr) &var←c68336)+5)/* context←v8440 */ ), var←c65168, pd339);
};
};
SOURCE(27247, 58)
{
word pd340;
pd340 = (* (( (ptr) (* (( (ptr) gf←c68368)+179)/* var←c64656 */ ))+84) );
(void) ( *( (fPt) ((* (ptr) pd340 ))))((* (( (ptr) &var←c68336)+5)/* context←v8440 */ ), 0, 0, (* (( (ptr) (* (( (ptr) &var←c68336)+4)
/* viewer←v8412 */ ))+7) ), (* (( (ptr) (* (( (ptr) &var←c68336)+4)/* viewer←v8412 */ ))+8) ), 0, pd340);
};
SOURCE(27330, 69)
if (((* (( (ptr) (* (ptr) (* (( (ptr) &var←c68336)+4)/* viewer←v8412 */ ) ))+2) ) != 0)) {
SOURCE(27361, 38)
{
word pd341;
pd341 = (* (( (ptr) (* (( (ptr) gf←c68368)+179)/* var←c64656 */ ))+13) );
(void) ( *( (fPt) ((* (ptr) pd341 ))))((* (( (ptr) &var←c68336)+5)/* context←v8440 */ ), (word) (( (bPt) &var←c68336)+32)
/* var←c65072 */ , pd341);
};
};
SOURCE(27438, 19)
if ((0 != (* (( (ptr) &var←c68336)+13)/* quit←v12984 */ ))) {
SOURCE(27451, 6)
return;
};
SOURCE(27508, 326)
{
/* declaration of v←v13104 skipped */
(* (( (ptr) &var←c68336)+14)/* v←v13104 */ ) = (* (( (ptr) (* (( (ptr) &var←c68336)+4)/* viewer←v8412 */ ))+24) );
lab←L100077: ;
if (((* (( (ptr) &var←c68336)+14)/* v←v13104 */ ) != 0)) {
}
else {
goto lab←L100074;
};
SOURCE(27797, 37)
{
word pd342;
pd342 = (* (( (ptr) (* (( (ptr) gf←c68368)+179)/* var←c64656 */ ))+13) );
(void) ( *( (fPt) ((* (ptr) pd342 ))))((* (( (ptr) &var←c68336)+5)/* context←v8440 */ ), (word) (( (bPt) &var←c68336)+24)
/* var←c65040 */ , pd342);
};
(* (( (ptr) &var←c68336)+14)/* v←v13104 */ ) = (* (( (ptr) (* (( (ptr) &var←c68336)+14)/* v←v13104 */ ))+23) );
goto lab←L100077;
lab←L100074: ;
};
}
static void PaintWindow←P3324(formal←c68432)
word formal←c68432;
{
register ptr gf←c68400 = (ptr) &globalframe;
formal←c68432 = (formal←c68432 - 40);
/* PaintWindow: */
SOURCE(24162, 2477)
SOURCE(24187, 312)
if ((* (( (bPt) (* (( (ptr) formal←c68432)+4) ))+76) ) & 010) {
SOURCE(24209, 292)
{
word w←v13208;
word h←v13236;
SOURCE(24227, 22)
w←v13208 = (* (( (ptr) (* (( (ptr) formal←c68432)+4) ))+3) );
SOURCE(24251, 22)
h←v13236 = (* (( (ptr) (* (( (ptr) formal←c68432)+4) ))+4) );
SOURCE(24275, 38)
{
word pd343;
pd343 = (* (( (ptr) (* (( (ptr) gf←c68400)+179)/* var←c64656 */ ))+52) );
(void) ( *( (fPt) ((* (ptr) pd343 ))))((* (( (ptr) formal←c68432)+5) ), (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68400)+179)
/* var←c64656 */ ))+54) ) ), pd343);
};
SOURCE(24315, 44)
{
word pd344;
pd344 = (* (( (ptr) (* (( (ptr) gf←c68400)+179)/* var←c64656 */ ))+66) );
(void) ( *( (fPt) ((* (ptr) pd344 ))))((* (( (ptr) formal←c68432)+5) ), 0, 0, (* (( (ptr) formal←c68432)+12) ), h←v13236, pd344)
;
};
SOURCE(24361, 45)
{
word pd345;
pd345 = (* (( (ptr) (* (( (ptr) gf←c68400)+179)/* var←c64656 */ ))+66) );
(void) ( *( (fPt) ((* (ptr) pd345 ))))((* (( (ptr) formal←c68432)+5) ), w←v13208, 0, INEG((* (( (ptr) formal←c68432)+12)
)), h←v13236, pd345);
};
SOURCE(24408, 44)
{
word pd346;
pd346 = (* (( (ptr) (* (( (ptr) gf←c68400)+179)/* var←c64656 */ ))+66) );
(void) ( *( (fPt) ((* (ptr) pd346 ))))((* (( (ptr) formal←c68432)+5) ), 0, 0, w←v13208, (* (( (ptr) formal←c68432)+12) ), pd346)
;
};
SOURCE(24454, 45)
{
word pd347;
pd347 = (* (( (ptr) (* (( (ptr) gf←c68400)+179)/* var←c64656 */ ))+66) );
(void) ( *( (fPt) ((* (ptr) pd347 ))))((* (( (ptr) formal←c68432)+5) ), 0, h←v13236, w←v13208, INEG((* (( (ptr) formal←c68432)+12)
)), pd347);
};
};
};
SOURCE(24504, 32)
if (((* (( (ptr) (* (( (ptr) formal←c68432)+4) ))+22) ) != 0)) {
SOURCE(24530, 6)
return;
};
SOURCE(24577, 1692)
if (((* (( (ptr) (* (ptr) (* (( (ptr) formal←c68432)+4) ) ))+12) ) != 0)) {
SOURCE(24610, 326)
{
word x←v13280;
word y←v13308;
word w←v13336;
word h←v13364;
SOURCE(24658, 16)
x←v13280 = (* (( (ptr) formal←c68432)+12) );
SOURCE(24676, 48)
y←v13308 = ((* (( (ptr) (* (( (ptr) formal←c68432)+4) ))+4) ) - (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68400)+182)/* var←c65136 */ ))+10)
) ));
SOURCE(24726, 28)
w←v13336 = ((* (( (ptr) (* (( (ptr) formal←c68432)+4) ))+3) ) - IOP2( * , (int)(* (( (ptr) formal←c68432)+12) ), (int)2)
);
SOURCE(24756, 42)
h←v13364 = ((* (ptr) (* (( (ptr) (* (( (ptr) gf←c68400)+182)/* var←c65136 */ ))+10) ) ) - (* (( (ptr) formal←c68432)+12)
));
SOURCE(24800, 28)
{
word pd348;
pd348 = (* (( (ptr) (* (( (ptr) gf←c68400)+179)/* var←c64656 */ ))+22) );
(void) ( *( (fPt) ((* (ptr) pd348 ))))((* (( (ptr) formal←c68432)+5) ), x←v13280, y←v13308, pd348);
};
SOURCE(24830, 21)
{
word pd349;
pd349 = (* (( (ptr) (* (( (ptr) gf←c68400)+179)/* var←c64656 */ ))+20) );
(void) ( *( (fPt) ((* (ptr) pd349 ))))((* ((( (ptr) formal←c68432)+5)) ), pd349);
};
SOURCE(24853, 42)
{
word pd350;
pd350 = (* (( (ptr) (* (( (ptr) gf←c68400)+179)/* var←c64656 */ ))+84) );
(void) ( *( (fPt) ((* (ptr) pd350 ))))((* (( (ptr) formal←c68432)+5) ), 0, 0, w←v13336, h←v13364, 0, pd350);
};
SOURCE(24897, 37)
{
word pd351;
pd351 = (* (( (ptr) (* (ptr) (* (( (ptr) formal←c68432)+4) ) ))+12) );
(void) ( *( (fPt) ((* (ptr) pd351 ))))((* (( (ptr) formal←c68432)+4) ), (* (( (ptr) formal←c68432)+5) ), pd351);
};
};
}
else {
SOURCE(24943, 1328)
{
word name←v13408;
word nameLen←v13436;
word file←v13464;
word fileLen←v13492;
word font←v13520;
word headerW←v13548 = 0;
word header←v13576;
SOURCE(24972, 24)
name←v13408 = (* (( (ptr) (* (( (ptr) formal←c68432)+4) ))+13) );
SOURCE(24998, 32)
{
word pd352;
pd352 = (* (( (ptr) (* (( (ptr) gf←c68400)+158)/* var←c59920 */ ))+14) );
nameLen←v13436 = (word) ( *( (fPt) ((* (ptr) pd352 ))))(name←v13408, pd352);
};
SOURCE(25032, 24)
file←v13464 = (* (( (ptr) (* (( (ptr) formal←c68432)+4) ))+14) );
SOURCE(25058, 32)
{
word pd353;
pd353 = (* (( (ptr) (* (( (ptr) gf←c68400)+158)/* var←c59920 */ ))+14) );
fileLen←v13492 = (word) ( *( (fPt) ((* (ptr) pd353 ))))(file←v13464, pd353);
};
SOURCE(25092, 38)
font←v13520 = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68400)+183)/* var←c65200 */ ))+4) ) );
SOURCE(25154, 35)
{
word pd354;
pd354 = (* (( (ptr) (* (( (ptr) gf←c68400)+166)/* var←c62096 */ ))+4) );
header←v13576 = (word) ( *( (fPt) ((* (ptr) pd354 ))))(100, pd354);
};
SOURCE(25191, 51)
{
word pd355;
pd355 = (* (( (ptr) (* (( (ptr) gf←c68400)+166)/* var←c62096 */ ))+10) );
header←v13576 = (word) ( *( (fPt) ((* (ptr) pd355 ))))(header←v13576, name←v13408, 0, 32767, pd355);
};
SOURCE(25244, 252)
{
word tc356;
word pd357;
if (( (int)fileLen←v13492 > (int)nameLen←v13436)) {
pd357 = (* (( (ptr) (* (( (ptr) gf←c68400)+158)/* var←c59920 */ ))+21) );
tc356 = (word) ( (int)(word) ( *( (fPt) ((* (ptr) pd357 ))))(name←v13408, 0, file←v13464, 0, 0, 2147483647, pd357) == (int)nameLen←v13436);
}
else {
tc356 = (word) 0;
};
if (tc356) {
SOURCE(25324, 51)
{
word pd358;
pd358 = (* (( (ptr) (* (( (ptr) gf←c68400)+166)/* var←c62096 */ ))+10) );
header←v13576 = (word) ( *( (fPt) ((* (ptr) pd358 ))))(header←v13576, (* (( (ptr) gf←c68400)+69) ), 0, 32767, pd358);
};
SOURCE(25377, 67)
{
word pd359;
pd359 = (* (( (ptr) (* (( (ptr) gf←c68400)+166)/* var←c62096 */ ))+10) );
header←v13576 = (word) ( *( (fPt) ((* (ptr) pd359 ))))(header←v13576, file←v13464, nameLen←v13436, 32767, pd359);
};
SOURCE(25446, 50)
{
word pd360;
pd360 = (* (( (ptr) (* (( (ptr) gf←c68400)+166)/* var←c62096 */ ))+10) );
header←v13576 = (word) ( *( (fPt) ((* (ptr) pd360 ))))(header←v13576, (* (( (ptr) gf←c68400)+73) ), 0, 32767, pd360);
};
};
};
if ((* (( (bPt) (* (( (ptr) formal←c68432)+4) ))+77) ) & 020) {
SOURCE(25543, 61)
{
word pd361;
pd361 = (* (( (ptr) (* (( (ptr) gf←c68400)+166)/* var←c62096 */ ))+10) );
header←v13576 = (word) ( *( (fPt) ((* (ptr) pd361 ))))(header←v13576, (* (( (ptr) gf←c68400)+74) ), 0, 32767, pd361);
};
}
else {
if ((* (( (bPt) (* (( (ptr) formal←c68432)+4) ))+76) ) & 02) {
SOURCE(25624, 60)
{
word pd362;
pd362 = (* (( (ptr) (* (( (ptr) gf←c68400)+166)/* var←c62096 */ ))+10) );
header←v13576 = (word) ( *( (fPt) ((* (ptr) pd362 ))))(header←v13576, (* (( (ptr) gf←c68400)+21) ), 0, 32767, pd362);
};
}
else {
if ((* (( (bPt) (* (( (ptr) formal←c68432)+4) ))+76) ) & 04) {
SOURCE(25707, 58)
{
word pd363;
pd363 = (* (( (ptr) (* (( (ptr) gf←c68400)+166)/* var←c62096 */ ))+10) );
header←v13576 = (word) ( *( (fPt) ((* (ptr) pd363 ))))(header←v13576, (* (( (ptr) gf←c68400)+22) ), 0, 32767, pd363);
};
};
};
};
SOURCE(25776, 81)
if (((* (( (ptr) (* (( (ptr) formal←c68432)+4) ))+21) ) != 0)) {
SOURCE(25800, 57)
{
word pd364;
pd364 = (* (( (ptr) (* (( (ptr) gf←c68400)+166)/* var←c62096 */ ))+10) );
header←v13576 = (word) ( *( (fPt) ((* (ptr) pd364 ))))(header←v13576, (* (( (ptr) gf←c68400)+75) ), 0, 32767, pd364);
};
};
SOURCE(25859, 67)
{
word var←c65232;
{
word text←v57904;
text←v57904 = header←v13576;
var←c65232 = text←v57904;
};
{
word pd365;
pd365 = (* (( (ptr) (* (( (ptr) gf←c68400)+183)/* var←c65200 */ ))+8) );
headerW←v13548 = (word) ( *( (fPt) ((* (ptr) pd365 ))))(var←c65232, font←v13520, pd365);
};
};
SOURCE(25928, 39)
{
word x366;
headerW←v13548 = (x366 = ((* (( (ptr) (* (( (ptr) formal←c68432)+4) ))+3) ) - IOP2( * , (int)(* (( (ptr) formal←c68432)+12)
), (int)2)),
MIN((int)(word), headerW←v13548, x366));
};
SOURCE(25969, 38)
{
word pd367;
pd367 = (* (( (ptr) (* (( (ptr) gf←c68400)+179)/* var←c64656 */ ))+52) );
(void) ( *( (fPt) ((* (ptr) pd367 ))))((* (( (ptr) formal←c68432)+5) ), (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68400)+179)
/* var←c64656 */ ))+54) ) ), pd367);
};
SOURCE(26009, 83)
{
word pd368;
pd368 = (* (( (ptr) (* (( (ptr) gf←c68400)+179)/* var←c64656 */ ))+66) );
(void) ( *( (fPt) ((* (ptr) pd368 ))))((* (( (ptr) formal←c68432)+5) ), 0, (* (( (ptr) (* (( (ptr) formal←c68432)+4) ))+4)
), (* (( (ptr) (* (( (ptr) formal←c68432)+4) ))+3) ), INEG((* (ptr) (* (( (ptr) (* (( (ptr) gf←c68400)+182)/* var←c65136 */ ))+10)
) )), pd368);
};
SOURCE(26094, 38)
{
word pd369;
pd369 = (* (( (ptr) (* (( (ptr) gf←c68400)+179)/* var←c64656 */ ))+52) );
(void) ( *( (fPt) ((* (ptr) pd369 ))))((* (( (ptr) formal←c68432)+5) ), (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68400)+179)
/* var←c64656 */ ))+55) ) ), pd369);
};
SOURCE(26134, 70)
{
word pd370;
pd370 = (* (( (ptr) (* (( (ptr) gf←c68400)+179)/* var←c64656 */ ))+22) );
(void) ( *( (fPt) ((* (ptr) pd370 ))))((* (( (ptr) formal←c68432)+5) ), IOP2( / , (int)((* (( (ptr) (* (( (ptr) formal←c68432)+4)
))+3) ) - headerW←v13548), (int)2), ((* (( (ptr) (* (( (ptr) formal←c68432)+4) ))+4) ) - 9), pd370);
};
SOURCE(26206, 29)
{
word pd371;
pd371 = (* (( (ptr) (* (( (ptr) gf←c68400)+179)/* var←c64656 */ ))+30) );
(void) ( *( (fPt) ((* (ptr) pd371 ))))((* (( (ptr) formal←c68432)+5) ), font←v13520, pd371);
};
SOURCE(26237, 32)
{
word pd372;
pd372 = (* (( (ptr) (* (( (ptr) gf←c68400)+179)/* var←c64656 */ ))+39) );
(void) ( *( (fPt) ((* (ptr) pd372 ))))((* (( (ptr) formal←c68432)+5) ), header←v13576, 0, 2147483647, 0, pd372);
};
};
};
SOURCE(26274, 365)
if (((* (( (ptr) (* (( (ptr) formal←c68432)+4) ))+16) ) != 0)) {
SOURCE(26298, 343)
{
word x←v13632;
word w←v13660;
word h←v13688;
word y←v13716;
SOURCE(26314, 16)
x←v13632 = (* (( (ptr) formal←c68432)+12) );
SOURCE(26332, 28)
w←v13660 = ((* (( (ptr) (* (( (ptr) formal←c68432)+4) ))+3) ) - IOP2( * , (int)(* (( (ptr) formal←c68432)+12) ), (int)2)
);
SOURCE(26362, 57)
{
word idx373;
h←v13688 = (
idx373 = (word) ((* (( (ptr) (* (( (ptr) (* (( (ptr) formal←c68432)+4) ))+16) ))+7) ) * (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68400)+182)
/* var←c65136 */ ))+11) ) )),
SGNCK(idx373)
);
};
SOURCE(26421, 50)
y←v13716 = (((* (( (ptr) (* (( (ptr) formal←c68432)+4) ))+4) ) - (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68400)+182)/* var←c65136 */ ))+10)
) )) - h←v13688);
SOURCE(26473, 38)
{
word pd374;
pd374 = (* (( (ptr) (* (( (ptr) gf←c68400)+179)/* var←c64656 */ ))+52) );
(void) ( *( (fPt) ((* (ptr) pd374 ))))((* (( (ptr) formal←c68432)+5) ), (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68400)+179)
/* var←c64656 */ ))+54) ) ), pd374);
};
SOURCE(26513, 67)
{
word pd375;
pd375 = (* (( (ptr) (* (( (ptr) gf←c68400)+179)/* var←c64656 */ ))+66) );
(void) ( *( (fPt) ((* (ptr) pd375 ))))((* (( (ptr) formal←c68432)+5) ), x←v13632, y←v13716, w←v13660, INEG((* (ptr) (* (
( (ptr) (* (( (ptr) gf←c68400)+182)/* var←c65136 */ ))+12) ) )), pd375);
};
SOURCE(26582, 57)
{
word pd376;
pd376 = (* (( (ptr) (* (( (ptr) gf←c68400)+184)/* var←c65296 */ ))+16) );
(void) ( *( (fPt) ((* (ptr) pd376 ))))((* (( (ptr) (* (( (ptr) formal←c68432)+4) ))+16) ), (* (( (ptr) formal←c68432)+5)
), x←v13632, (y←v13716 + h←v13688), 0, pd376);
};
};
};
}
static void PaintClient←P3384(formal←c68464)
word formal←c68464;
{
formal←c68464 = (formal←c68464 - 32);
/* PaintClient: */
SOURCE(26647, 78)
SOURCE(26672, 53)
{
word pd377;
pd377 = (* (( (ptr) (* (ptr) (* (( (ptr) formal←c68464)+4) ) ))+2) );
(* (( (ptr) formal←c68464)+13) ) = (word) ( *( (fPt) ((* (ptr) pd377 ))))((* (( (ptr) formal←c68464)+4) ), (* (( (ptr) formal←c68464)+5)
), 0, 1, pd377);
};
}
static void PaintChild←P3588(formal←c68528)
word formal←c68528;
{
register ptr gf←c68496 = (ptr) &globalframe;
formal←c68528 = (formal←c68528 - 24);
/* PaintChild: */
SOURCE(27563, 22)
SOURCE(27587, 108)
{
W2 var←c65328;
{
float tf378;
var←c65328.f0 = (
tf378 = (float)(int)(* (( (ptr) (* (( (ptr) formal←c68528)+14) ))+1) ), *(word*)&tf378
);
};
{
float tf379;
float tf380;
if (*((int*)(* (ptr) (* (( (ptr) (* (( (ptr) formal←c68528)+14) ))+22) ) ) + 16)<0) {
var←c65328.f1 = (
tf379 = (float)(int)((* (( (ptr) (* (( (ptr) (* (( (ptr) formal←c68528)+14) ))+22) ))+8) ) - ((* (( (ptr) (* (( (ptr) formal←c68528)+14)
))+2) ) + (* (( (ptr) (* (( (ptr) formal←c68528)+14) ))+4) ))), *(word*)&tf379
);
}
else {
var←c65328.f1 = (
tf380 = (float)(int)(* (( (ptr) (* (( (ptr) formal←c68528)+14) ))+2) ), *(word*)&tf380
);
};
};
{
word pd381;
pd381 = (* (( (ptr) (* (( (ptr) gf←c68496)+179)/* var←c64656 */ ))+18) );
(void) ( *( (fPt) ((* (ptr) pd381 ))))((* (( (ptr) formal←c68528)+5) ), var←c65328, pd381);
};
};
SOURCE(27697, 58)
{
word pd382;
pd382 = (* (( (ptr) (* (( (ptr) gf←c68496)+179)/* var←c64656 */ ))+84) );
(void) ( *( (fPt) ((* (ptr) pd382 ))))((* (( (ptr) formal←c68528)+5) ), 0, 0, (* (( (ptr) (* (( (ptr) formal←c68528)+4) ))+3)
), (* (( (ptr) (* (( (ptr) formal←c68528)+4) ))+4) ), 0, pd382);
};
SOURCE(27757, 35)
(void) RecursivelyPaintViewers←P1200((* (( (ptr) formal←c68528)+14) ), (* (( (ptr) formal←c68528)+5) ));
}
static void SetViewerPosition←P1260(viewer←v8500, x←v8528, y←v8556, w←v8584, h←v8612)
word viewer←v8500;
word x←v8528;
word y←v8556;
word w←v8584;
word h←v8612;
{
register ptr gf←c68560 = (ptr) &globalframe;
word oldcw←v13760;
word oldch←v13788;
word xmin←v13816;
word xmax←v13844;
word ymin←v13872;
word ymax←v13900;
/* SetViewerPosition: */
SOURCE(27849, 1025)
SOURCE(27915, 26)
oldcw←v13760 = (* (( (ptr) viewer←v8500)+7) );
SOURCE(27943, 26)
oldch←v13788 = (* (( (ptr) viewer←v8500)+8) );
SOURCE(28004, 17)
if (( (int)w←v8584 < (int)0)) {
SOURCE(28016, 5)
w←v8584 = 0;
};
SOURCE(28023, 17)
if (( (int)h←v8612 < (int)0)) {
SOURCE(28035, 5)
h←v8612 = 0;
};
SOURCE(28042, 13)
(* (( (ptr) viewer←v8500)+1) ) = x←v8528;
SOURCE(28057, 13)
(* (( (ptr) viewer←v8500)+2) ) = y←v8556;
SOURCE(28072, 13)
(* (( (ptr) viewer←v8500)+3) ) = w←v8584;
SOURCE(28087, 13)
(* (( (ptr) viewer←v8500)+4) ) = h←v8612;
SOURCE(28102, 8)
xmin←v13816 = 0;
SOURCE(28112, 8)
xmax←v13844 = w←v8584;
SOURCE(28122, 8)
ymin←v13872 = 0;
SOURCE(28132, 8)
ymax←v13900 = h←v8612;
SOURCE(28142, 140)
if ((* (( (bPt) viewer←v8500)+76) ) & 010) {
SOURCE(28164, 120)
{
word size←v13944;
SOURCE(28166, 44)
size←v13944 = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68560)+182)/* var←c65136 */ ))+9) ) );
SOURCE(28212, 16)
xmin←v13816 = (xmin←v13816 + size←v13944);
SOURCE(28230, 16)
xmax←v13844 = (xmax←v13844 - size←v13944);
SOURCE(28248, 16)
ymin←v13872 = (ymin←v13872 + size←v13944);
SOURCE(28266, 16)
ymax←v13900 = (ymax←v13900 - size←v13944);
};
};
SOURCE(28287, 57)
if (*((int*)viewer←v8500 + 19)<0) {
SOURCE(28310, 34)
ymax←v13900 = (h←v8612 - (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68560)+182)/* var←c65136 */ ))+10) ) ));
};
SOURCE(28346, 141)
if (((* (( (ptr) viewer←v8500)+16) ) != 0)) {
SOURCE(28370, 119)
{
word lines←v13988;
SOURCE(28372, 34)
lines←v13988 = (* (( (ptr) (* (( (ptr) viewer←v8500)+16) ))+7) );
SOURCE(28408, 40)
ymax←v13900 = (ymax←v13900 - (lines←v13988 * (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68560)+182)/* var←c65136 */ ))+11) ) )));
SOURCE(28450, 37)
ymax←v13900 = (ymax←v13900 - (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68560)+182)/* var←c65136 */ ))+12) ) ));
};
};
SOURCE(28492, 60)
if ((* (( (bPt) viewer←v8500)+76) ) & 0100) {
SOURCE(28518, 34)
xmin←v13816 = (xmin←v13816 + (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68560)+182)/* var←c65136 */ ))+13) ) ));
};
SOURCE(28554, 61)
if ((* (( (bPt) viewer←v8500)+76) ) & 040) {
SOURCE(28581, 34)
ymin←v13872 = (ymin←v13872 + (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68560)+182)/* var←c65136 */ ))+13) ) ));
};
SOURCE(28617, 33)
if (( (int)xmax←v13844 < (int)xmin←v13816)) {
SOURCE(28635, 15)
xmax←v13844 = 0;
xmin←v13816 = 0;
};
SOURCE(28652, 33)
if (( (int)ymax←v13900 < (int)ymin←v13872)) {
SOURCE(28670, 15)
ymax←v13900 = 0;
ymin←v13872 = 0;
};
SOURCE(28687, 16)
(* (( (ptr) viewer←v8500)+5) ) = xmin←v13816;
SOURCE(28705, 21)
(* (( (ptr) viewer←v8500)+7) ) = (xmax←v13844 - xmin←v13816);
SOURCE(28728, 16)
(* (( (ptr) viewer←v8500)+6) ) = ymin←v13872;
SOURCE(28746, 21)
(* (( (ptr) viewer←v8500)+8) ) = (ymax←v13900 - ymin←v13872);
SOURCE(28769, 105)
if ( ( ((* (( (ptr) (* (ptr) viewer←v8500 ))+13) ) != 0) ? ( ( (int)(* (( (ptr) viewer←v8500)+7) ) != (int)oldcw←v13760) ? 1 : ( (int)(* (
( (ptr) viewer←v8500)+8) ) != (int)oldch←v13788) ) : 0 ) ) {
SOURCE(28842, 32)
{
word var←c65360;
word pd383;
pd383 = (* (( (ptr) (* (ptr) viewer←v8500 ))+13) );
var←c65360 = (word) ( *( (fPt) ((* (ptr) pd383 ))))(viewer←v8500, pd383);
};
};
}
static word DefaultViewerIPProducer←P1320(source←v42476, options←v42504, info←v42532, master←v42560, formal←c0795, progress←v42616)
word source←v42476;
word options←v42504;
word info←v42532;
word master←v42560;
word formal←c0795;
word progress←v42616;
{
W10 var←c68592;
/* declaration of err←v42588 skipped */
register ptr gf←c68624 = (ptr) &globalframe;
word pages←v42660;
/* declaration of var←c65392 skipped */
/* declaration of pixelsXperPage←v14116 skipped */
/* declaration of pixelsYperPage←v14144 skipped */
/* declaration of viewer←v14172 skipped */
word length←v14200;
word width←v14228;
(* (( (ptr) &var←c68592)+4)/* err←v42588 */ ) = formal←c0795;
/* DefaultViewerIPProducer: */
SOURCE(28880, 988)
{
word tmpAddr384;
tmpAddr384 = (word) (( (ptr) &var←c68592)+5)/* var←c65392 */ ;
(* (ptr) tmpAddr384 ) = ( ((word) (fPt) Paint←P3936) );
(* (( (ptr) tmpAddr384) + 1) ) = 1;
};
SOURCE(28880, 988)
pages←v42660 = 0;
SOURCE(29470, 32)
(* (( (ptr) &var←c68592)+9)/* viewer←v14172 */ ) = XR←Narrow(source←v42476, (* (( (ptr) gf←c68624)+11) ));
SOURCE(29525, 53)
{
W2 var←c65424;
(void) PaperSizeMeters←P1560((word) &var←c65424, (* (( (ptr) options←v42504)+6) ));
width←v14228 = var←c65424.f1;
length←v14200 = var←c65424.f0;
};
SOURCE(29580, 53)
{
word pd385;
word x386;
word x388;
word x389;
word x390;
float tf391;
pd385 = (* (( (ptr) (* (( (ptr) gf←c68624)+185)/* var←c65456 */ ))+6) );
(* (( (ptr) &var←c68592)+7)/* pixelsXperPage←v14116 */ ) = (word) ( *( (fPt) ((* (ptr) pd385 ))))((
tf391 = ((
x386 = width←v14228, *(float*)&x386
) * (
x388 = (* (ptr) &fc387 ), *(float*)&x388
)) * ((
x389 = (* (ptr) &fc172 ), *(float*)&x389
) / (
x390 = (* (ptr) &fc307 ), *(float*)&x390
)), *(word*)&tf391
), pd385);
};
SOURCE(29666, 54)
{
word pd392;
word x393;
word x394;
word x395;
word x396;
float tf397;
pd392 = (* (( (ptr) (* (( (ptr) gf←c68624)+185)/* var←c65456 */ ))+6) );
(* (( (ptr) &var←c68592)+8)/* pixelsYperPage←v14144 */ ) = (word) ( *( (fPt) ((* (ptr) pd392 ))))((
tf397 = ((
x393 = length←v14200, *(float*)&x393
) * (
x394 = (* (ptr) &fc387 ), *(float*)&x394
)) * ((
x395 = (* (ptr) &fc172 ), *(float*)&x395
) / (
x396 = (* (ptr) &fc307 ), *(float*)&x396
)), *(word*)&tf397
), pd392);
};
SOURCE(29722, 95)
{
word pd398;
word x399;
word x400;
float tf401;
pd398 = (* (( (ptr) (* (( (ptr) gf←c68624)+163)/* var←c61136 */ ))+11) );
(void) ( *( (fPt) ((* (ptr) pd398 ))))(master←v42560, (word) (( (bPt) &var←c68592)+20)/* var←c65392 */ , (
tf401 = (
x399 = (* (ptr) &fc307 ), *(float*)&x399
) / (
x400 = (* (ptr) &fc172 ), *(float*)&x400
), *(word*)&tf401
), pd398);
};
SOURCE(29819, 30)
{
word pd402;
pd402 = (* (( (ptr) (* (( (ptr) gf←c68624)+163)/* var←c61136 */ ))+12) );
(void) ( *( (fPt) ((* (ptr) pd402 ))))(master←v42560, pd402);
};
SOURCE(29851, 17)
return(1);
}
static void Paint←P3936(formal←c0796, formal←c68688)
word formal←c0796;
word formal←c68688;
{
W7 var←c68656;
/* declaration of context←v14304 skipped */
/* declaration of var←c65488 skipped */
formal←c68688 = (formal←c68688 - 20);
var←c68656.f4/* context←v14304 */ = formal←c0796;
var←c68656.f0 = formal←c68688;
/* Paint: */
SOURCE(28920, 402)
{
word tmpAddr403;
tmpAddr403 = (word) (( (ptr) &var←c68656)+5)/* var←c65488 */ ;
(* (ptr) tmpAddr403 ) = ( ((word) (fPt) Inner←P3996) );
(* (( (ptr) tmpAddr403) + 1) ) = 1;
};
SOURCE(29288, 34)
(void) DoWhileViewerHidden←P1140((* (( (ptr) formal←c68688)+9) ), (word) (( (bPt) &var←c68656)+20)/* var←c65488 */ );
}
static void Inner←P3996(formal←c68752)
word formal←c68752;
{
register ptr gf←c68720 = (ptr) &globalframe;
formal←c68752 = (formal←c68752 - 20);
/* Inner: */
SOURCE(28962, 321)
SOURCE(28981, 89)
(void) SetViewerPosition←P1260((* (( (ptr) (* (ptr) formal←c68752 ))+9) ), 2000, 2000, (* (( (ptr) (* (ptr) formal←c68752 ))+7)
), (* (( (ptr) (* (ptr) formal←c68752 ))+8) ));
SOURCE(29072, 58)
{
W2 var←c65520;
var←c65520.f0 = (* (ptr) &fc172 );
var←c65520.f1 = (* (ptr) &fc172 );
{
word pd404;
pd404 = (* (( (ptr) (* (( (ptr) gf←c68720)+179)/* var←c64656 */ ))+18) );
(void) ( *( (fPt) ((* (ptr) pd404 ))))((* (( (ptr) formal←c68752)+4) ), var←c65520, pd404);
};
};
SOURCE(29156, 85)
{
word pd405;
pd405 = (* (( (ptr) (* (( (ptr) gf←c68720)+186)/* var←c65552 */ ))+14) );
(* (( (ptr) formal←c68752)+4) ) = (word) ( *( (fPt) ((* (ptr) pd405 ))))((* (( (ptr) formal←c68752)+4) ), (* (ptr) (* (
( (ptr) (* (( (ptr) gf←c68720)+186)/* var←c65552 */ ))+13) ) ), (* (( (ptr) (* (ptr) formal←c68752 ))+4) ), 0, pd405);
};
SOURCE(29243, 40)
(void) RecursivelyPaintViewers←P1200((* (( (ptr) (* (ptr) formal←c68752 ))+9) ), (* (( (ptr) formal←c68752)+4) ));
}
static word FromScreen←P1380(source←v42720, options←v42748, info←v42776, master←v42804, err←v42832, progress←v42860)
word source←v42720;
word options←v42748;
word info←v42776;
word master←v42804;
word err←v42832;
word progress←v42860;
{
register ptr gf←c68784 = (ptr) &globalframe;
word pages←v42904;
word screen←v14392;
W4 box←v14420;
/* FromScreen: */
SOURCE(29873, 1468)
SOURCE(29873, 1468)
pages←v42904 = 0;
SOURCE(30363, 36)
screen←v14392 = XR←Narrow(source←v42720, (* (( (ptr) gf←c68784)+17) ));
SOURCE(30401, 11)
box←v14420.f0 = 0;
box←v14420.f1 = 0;
box←v14420.f2 = 0;
box←v14420.f3 = 0;
SOURCE(30414, 683)
{
word var←c65616;
var←c65616 = (* (ptr) screen←v14392 );
switch (var←c65616) {
case 0:
SOURCE(30442, 94)
box←v14420.f0 = 0;
box←v14420.f1 = 0;
box←v14420.f2 = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68784)+182)/* var←c65136 */ ))+6) ) );
box←v14420.f3 = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68784)+182)/* var←c65136 */ ))+5) ) );
break;
case 1:
SOURCE(30585, 173)
box←v14420.f0 = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68784)+182)/* var←c65136 */ ))+14) ) );
box←v14420.f1 = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68784)+182)/* var←c65136 */ ))+15) ) );
box←v14420.f2 = ((* (ptr) (* (( (ptr) (* (( (ptr) gf←c68784)+182)/* var←c65136 */ ))+6) ) ) - (* (ptr) (* (( (ptr) (* (
( (ptr) gf←c68784)+182)/* var←c65136 */ ))+20) ) ));
box←v14420.f3 = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68784)+182)/* var←c65136 */ ))+17) ) );
break;
case 2:
SOURCE(30808, 173)
box←v14420.f0 = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68784)+182)/* var←c65136 */ ))+14) ) );
box←v14420.f1 = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68784)+182)/* var←c65136 */ ))+17) ) );
box←v14420.f2 = ((* (ptr) (* (( (ptr) (* (( (ptr) gf←c68784)+182)/* var←c65136 */ ))+6) ) ) - (* (ptr) (* (( (ptr) (* (
( (ptr) gf←c68784)+182)/* var←c65136 */ ))+20) ) ));
box←v14420.f3 = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68784)+182)/* var←c65136 */ ))+5) ) );
break;
case 3:
SOURCE(30997, 100)
box←v14420.f0 = 0;
box←v14420.f1 = 0;
box←v14420.f2 = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68784)+182)/* var←c65136 */ ))+7) ) );
box←v14420.f3 = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c68784)+182)/* var←c65136 */ ))+8) ) );
break;
default:
break;
};
};
SOURCE(31275, 10)
pages←v42904 = (word) -1;
SOURCE(31311, 30)
{
word pd406;
pd406 = (* (( (ptr) (* (( (ptr) gf←c68784)+163)/* var←c61136 */ ))+12) );
(void) ( *( (fPt) ((* (ptr) pd406 ))))(master←v42804, pd406);
};
SOURCE(29873, 1468)
return(pages←v42904);
}
static word FitInPage←P1440(paper←v8672, box←v8700)
word paper←v8672;
W4 box←v8700;
{
register ptr gf←c68816 = (ptr) &globalframe;
word m←v8744;
W2 boxSz←v14504;
W2 boxOrg←v14532;
W2 pageSz←v14560;
W2 pageSzAvl←v14588;
W2 offset←v14616;
word rotate←v14644;
word scale←v14672;
/* FitInPage: */
SOURCE(31347, 1018)
SOURCE(31347, 1018)
m←v8744 = 0;
SOURCE(31594, 37)
{
float tf407;
boxOrg←v14532.f0 = (
tf407 = (float)(int)box←v8700.f1, *(word*)&tf407
);
};
{
float tf408;
boxOrg←v14532.f1 = (
tf408 = (float)(int)box←v8700.f0, *(word*)&tf408
);
};
SOURCE(31633, 44)
{
word pd409;
float tf410;
pd409 = (* (( (ptr) (* (( (ptr) gf←c68816)+187)/* var←c65648 */ ))+17) );
boxSz←v14504.f0 = (
tf410 = (float)(unsigned)(word) ( *( (fPt) ((* (ptr) pd409 ))))(box←v8700, pd409), *(word*)&tf410
);
};
{
word pd411;
float tf412;
pd411 = (* (( (ptr) (* (( (ptr) gf←c68816)+187)/* var←c65648 */ ))+18) );
boxSz←v14504.f1 = (
tf412 = (float)(unsigned)(word) ( *( (fPt) ((* (ptr) pd411 ))))(box←v8700, pd411), *(word*)&tf412
);
};
SOURCE(31679, 60)
{
W2 var←c65680;
(void) PaperSizeMeters←P1560((word) &var←c65680, paper←v8672);
pageSz←v14560.f0 = var←c65680.f1;
pageSz←v14560.f1 = var←c65680.f0;
};
SOURCE(31741, 29)
{
word x413;
word x414;
*(float*)&pageSzAvl←v14588.f0 = (
x413 = (* (ptr) &fc387 ), *(float*)&x413
) * (
x414 = pageSz←v14560.f0, *(float*)&x414
);
};
SOURCE(31772, 29)
{
word x415;
word x416;
*(float*)&pageSzAvl←v14588.f1 = (
x415 = (* (ptr) &fc387 ), *(float*)&x415
) * (
x416 = pageSz←v14560.f1, *(float*)&x416
);
};
SOURCE(31803, 410)
{
word x417;
word x418;
word x419;
word x420;
word x421;
if ((((
x417 = pageSzAvl←v14588.f0, *(float*)&x417
) - (
x418 = pageSzAvl←v14588.f1, *(float*)&x418
)) * ((
x419 = boxSz←v14504.f0, *(float*)&x419
) - (
x420 = boxSz←v14504.f1, *(float*)&x420
)) >= (
x421 = (* (ptr) &fc299 ), *(float*)&x421
))) {
SOURCE(31881, 14)
rotate←v14644 = 0;
SOURCE(31897, 54)
{
word x422;
word x423;
float tf424;
float tf425;
word x426;
word x427;
float tf428;
scale←v14672 = (
tf428 = FMIN(((
x422 = pageSzAvl←v14588.f0, *(float*)&x422
) / (
x423 = boxSz←v14504.f0, *(float*)&x423
)), ((
x426 = pageSzAvl←v14588.f1, *(float*)&x426
) / (
x427 = boxSz←v14504.f1, *(float*)&x427
)), tf424, tf425), *(word*)&tf428
);
};
SOURCE(31953, 71)
{
word x429;
word x430;
word x431;
word x433;
*(float*)&offset←v14616.f0 = (((
x429 = pageSz←v14560.f0, *(float*)&x429
) / (
x430 = scale←v14672, *(float*)&x430
)) - (
x431 = boxSz←v14504.f0, *(float*)&x431
)) / (
x433 = (* (ptr) &fc432 ), *(float*)&x433
);
};
{
word x434;
word x435;
word x436;
word x437;
*(float*)&offset←v14616.f1 = (((
x434 = pageSz←v14560.f1, *(float*)&x434
) / (
x435 = scale←v14672, *(float*)&x435
)) - (
x436 = boxSz←v14504.f1, *(float*)&x436
)) / (
x437 = (* (ptr) &fc432 ), *(float*)&x437
);
};
}
else {
SOURCE(32071, 13)
rotate←v14644 = 1;
SOURCE(32086, 54)
{
word x438;
word x439;
float tf440;
float tf441;
word x442;
word x443;
float tf444;
scale←v14672 = (
tf444 = FMIN(((
x438 = pageSzAvl←v14588.f0, *(float*)&x438
) / (
x439 = boxSz←v14504.f1, *(float*)&x439
)), ((
x442 = pageSzAvl←v14588.f1, *(float*)&x442
) / (
x443 = boxSz←v14504.f0, *(float*)&x443
)), tf440, tf441), *(word*)&tf444
);
};
SOURCE(32142, 71)
{
word x445;
word x446;
word x447;
word x448;
*(float*)&offset←v14616.f0 = (((
x445 = pageSz←v14560.f0, *(float*)&x445
) / (
x446 = scale←v14672, *(float*)&x446
)) + (
x447 = boxSz←v14504.f1, *(float*)&x447
)) / (
x448 = (* (ptr) &fc432 ), *(float*)&x448
);
};
{
word x449;
word x450;
word x451;
word x452;
*(float*)&offset←v14616.f1 = (((
x449 = pageSz←v14560.f1, *(float*)&x449
) / (
x450 = scale←v14672, *(float*)&x450
)) - (
x451 = boxSz←v14504.f0, *(float*)&x451
)) / (
x452 = (* (ptr) &fc432 ), *(float*)&x452
);
};
};
};
SOURCE(32218, 37)
{
word pd453;
pd453 = (* (( (ptr) (* (( (ptr) gf←c68816)+188)/* var←c65712 */ ))+7) );
m←v8744 = (word) ( *( (fPt) ((* (ptr) pd453 ))))(scale←v14672, pd453);
};
SOURCE(32257, 48)
{
word pd454;
pd454 = (* (( (ptr) (* (( (ptr) gf←c68816)+188)/* var←c65712 */ ))+18) );
m←v8744 = (word) ( *( (fPt) ((* (ptr) pd454 ))))(m←v8744, offset←v14616, pd454);
};
SOURCE(32307, 58)
if ((0 != rotate←v14644)) {
SOURCE(32322, 43)
{
word pd455;
pd455 = (* (( (ptr) (* (( (ptr) gf←c68816)+188)/* var←c65712 */ ))+17) );
m←v8744 = (word) ( *( (fPt) ((* (ptr) pd455 ))))(m←v8744, (* (ptr) &fc314 ), pd455);
};
};
SOURCE(31347, 1018)
return(m←v8744);
}
static void PaperSize←P1500(formal←c0486, paper←v8804)
word formal←c0486;
word paper←v8804;
{
register ptr gf←c68848 = (ptr) &globalframe;
word length←v8848;
word width←v8876;
W2 size←v14716;
/* PaperSize: */
SOURCE(32370, 186)
SOURCE(32447, 67)
{
word pd456;
pd456 = (* (( (ptr) (* (( (ptr) gf←c68848)+169)/* var←c62960 */ ))+6) );
(void) ( *( (fPt) ((* (ptr) pd456 ))))((word) &size←v14716, paper←v8804, pd456);
};
SOURCE(32516, 20)
{
float tf457;
length←v8848 = (
tf457 = (float)(unsigned)size←v14716.f1, *(word*)&tf457
);
};
SOURCE(32538, 18)
{
float tf458;
width←v8876 = (
tf458 = (float)(unsigned)size←v14716.f0, *(word*)&tf458
);
};
/* removed tail goto */
(* (ptr) formal←c0486 ) = length←v8848;
(* (( (ptr) formal←c0486)+1) ) = width←v8876;
return;
}
static void PaperSizeMeters←P1560(formal←c0494, paper←v8936)
word formal←c0494;
word paper←v8936;
{
register ptr gf←c68880 = (ptr) &globalframe;
word length←v8980;
word width←v9008;
/* PaperSizeMeters: */
SOURCE(32562, 328)
SOURCE(32638, 34)
{
W2 var←c65744;
(void) PaperSize←P1500((word) &var←c65744, paper←v8936);
width←v9008 = var←c65744.f1;
length←v8980 = var←c65744.f0;
};
SOURCE(32674, 55)
{
word x459;
word x460;
if (((
x459 = width←v9008, *(float*)&x459
) == (
x460 = (* (ptr) &fc299 ), *(float*)&x460
))) {
SOURCE(32690, 39)
{
W2 var←c65776;
(void) PaperSize←P1500((word) &var←c65776, (* (( (ptr) gf←c68880)+76) ));
width←v9008 = var←c65776.f1;
length←v8980 = var←c65776.f0;
};
};
};
SOURCE(32745, 16)
{
word x461;
word x462;
if (((
x461 = width←v9008, *(float*)&x461
) == (
x462 = (* (ptr) &fc299 ), *(float*)&x462
))) {
SOURCE(32761, 5)
(void) XR←RaiseUnnamedError();
};
};
SOURCE(32815, 21)
{
word x464;
word x465;
*(float*)&length←v8980 = (
x464 = (* (ptr) &fc463 ), *(float*)&x464
) * (
x465 = length←v8980, *(float*)&x465
);
};
SOURCE(32838, 19)
{
word x466;
word x467;
*(float*)&width←v9008 = (
x466 = (* (ptr) &fc463 ), *(float*)&x466
) * (
x467 = width←v9008, *(float*)&x467
);
};
SOURCE(32859, 31)
{
word x468;
word x469;
if (((
x468 = length←v8980, *(float*)&x468
) == (
x469 = (* (ptr) &fc299 ), *(float*)&x469
))) {
SOURCE(32876, 14)
length←v8980 = width←v9008;
};
};
/* removed tail goto */
(* (ptr) formal←c0494 ) = length←v8980;
(* (( (ptr) formal←c0494)+1) ) = width←v9008;
return;
}
static word MakeIPFileName←P1620(tool←v9068, formal←c0797)
word tool←v9068;
word formal←c0797;
{
W19 var←c68912;
/* declaration of source←v9096 skipped */
register ptr gf←c68944 = (ptr) &globalframe;
word ip←v9140;
(* (( (ptr) &var←c68912)+4)/* source←v9096 */ ) = formal←c0797;
/* MakeIPFileName: */
SOURCE(32928, 951)
SOURCE(32928, 951)
ip←v9140 = 0;
SOURCE(32997, 882)
SOURCE(32999, 22)
{
W12 cp←v14760;
word server←v14788 = 0;
word dir←v14816 = 0;
word subDirs←v14844 = 0;
word base←v14872 = 0;
SOURCE(33057, 68)
{
word var←c65808;
{
word pd470;
pd470 = (* (( (ptr) (* (( (ptr) gf←c68944)+158)/* var←c59920 */ ))+24) );
var←c65808 = (word) ( *( (fPt) ((* (ptr) pd470 ))))((* (( (ptr) &var←c68912)+4)/* source←v9096 */ ), 0, (* (( (ptr) gf←c68944)+77)
), pd470);
};
{
word pd471;
pd471 = (* (( (ptr) (* (( (ptr) gf←c68944)+158)/* var←c59920 */ ))+17) );
(* (( (ptr) &var←c68912)+4)/* source←v9096 */ ) = (word) ( *( (fPt) ((* (ptr) pd471 ))))((* (( (ptr) &var←c68912)+4)/* source←v9096 */ ), 0, var←c65808, pd471)
;
};
};
SOURCE(33127, 37)
if (((* (( (ptr) &var←c68912)+4)/* source←v9096 */ ) == 0)) {
SOURCE(33146, 18)
(* (( (ptr) &var←c68912)+4)/* source←v9096 */ ) = (* (( (ptr) gf←c68944)+57) );
};
SOURCE(33166, 65)
{
W14 var←c65840;
{
/* declaration of var←c015 skipped */
{
word var←c016;
{
word var←c0714;
var←c0714 = (word) &var←c68912;
var←c016 = (word) XR←Enable(( ((word) (fPt) NoName←Q6012) ), ( ((word) (fPt) NoName←Q6072) ), var←c0714);
};
if ((var←c016 == 8)) {
goto lab←L100081;
};
};
var←c65840 = (* (W14Pt) (( (ptr) &var←c68912)+5)/* var←c015 */ );
};
cp←v14760 = (* (W12Pt) (( (ptr) &var←c65840)+1) );
(* (( (ptr) &var←c68912)+4)/* source←v9096 */ ) = (* (ptr) &var←c65840 );
};
SOURCE(33245, 57)
{
word pd472;
word idx473;
word idx474;
pd472 = (* (( (ptr) (* (( (ptr) gf←c68944)+158)/* var←c59920 */ ))+17) );
server←v14788 = (word) ( *( (fPt) ((* (ptr) pd472 ))))((* (( (ptr) &var←c68912)+4)/* source←v9096 */ ), (
idx473 = (* (ptr) &cp←v14760 ),
SGNCK(idx473)
), (
idx474 = (* (( (ptr) &cp←v14760)+1) ),
SGNCK(idx474)
), pd472);
};
SOURCE(33304, 48)
{
word pd475;
word idx476;
word idx477;
pd475 = (* (( (ptr) (* (( (ptr) gf←c68944)+158)/* var←c59920 */ ))+17) );
dir←v14816 = (word) ( *( (fPt) ((* (ptr) pd475 ))))((* (( (ptr) &var←c68912)+4)/* source←v9096 */ ), (
idx476 = (* (( (ptr) &cp←v14760)+2) ),
SGNCK(idx476)
), (
idx477 = (* (( (ptr) &cp←v14760)+3) ),
SGNCK(idx477)
), pd475);
};
SOURCE(33354, 60)
{
word pd478;
word idx479;
word idx480;
pd478 = (* (( (ptr) (* (( (ptr) gf←c68944)+158)/* var←c59920 */ ))+17) );
subDirs←v14844 = (word) ( *( (fPt) ((* (ptr) pd478 ))))((* (( (ptr) &var←c68912)+4)/* source←v9096 */ ), (
idx479 = (* (( (ptr) &cp←v14760)+4) ),
SGNCK(idx479)
), (
idx480 = (* (( (ptr) &cp←v14760)+5) ),
SGNCK(idx480)
), pd478);
};
SOURCE(33416, 104)
if (((* (( (ptr) &cp←v14760)+7) ) == 0)) {
SOURCE(33446, 12)
base←v14872 = (* (( (ptr) gf←c68944)+78) );
}
else {
SOURCE(33469, 51)
{
word pd481;
word idx482;
word idx483;
pd481 = (* (( (ptr) (* (( (ptr) gf←c68944)+158)/* var←c59920 */ ))+17) );
base←v14872 = (word) ( *( (fPt) ((* (ptr) pd481 ))))((* (( (ptr) &var←c68912)+4)/* source←v9096 */ ), (
idx482 = (* (( (ptr) &cp←v14760)+6) ),
SGNCK(idx482)
), (
idx483 = (* (( (ptr) &cp←v14760)+7) ),
SGNCK(idx483)
), pd481);
};
};
SOURCE(33525, 97)
{
word pd484;
pd484 = (* (( (ptr) (* (( (ptr) gf←c68944)+158)/* var←c59920 */ ))+14) );
if (( (int)(word) ( *( (fPt) ((* (ptr) pd484 ))))(server←v14788, pd484) != (int)0)) {
SOURCE(33582, 12)
server←v14788 = 0;
SOURCE(33596, 12)
dir←v14816 = (* (( (ptr) gf←c68944)+40) );
SOURCE(33610, 12)
subDirs←v14844 = (* (( (ptr) gf←c68944)+79) );
};
};
SOURCE(33627, 65)
{
W6 var←c65872;
var←c65872.f0 = server←v14788;
var←c65872.f1 = dir←v14816;
var←c65872.f2 = subDirs←v14844;
var←c65872.f3 = base←v14872;
var←c65872.f4 = (* (( (ptr) gf←c68944)+79) );
var←c65872.f5 = 0;
ip←v9140 = (word) ConstructFName←P540(var←c65872, 0);
};
SOURCE(33694, 78)
{
W2 var←c65904;
{
W2 var←c65936;
word v←v58384;
v←v58384 = (* (( (ptr) tool←v9068)+37) );
var←c65936.f0 = 5;
var←c65936.f1 = v←v58384;
var←c65904 = var←c65936;
};
{
W2 var←c66000;
W2 var←c0715;
var←c66000.f0 = 4;
var←c66000.f1 = tool←v9068;
(* (ptr) (word) &var←c0715 ) = 0;
(* (( (ptr) (word) &var←c0715) + 1) ) = 0;
{
word pd485;
pd485 = (* (( (ptr) (* (( (ptr) gf←c68944)+159)/* var←c60112 */ ))+62) );
ip←v9140 = (word) ( *( (fPt) ((* (ptr) pd485 ))))((* (( (ptr) gf←c68944)+80) ), var←c66000, var←c65904, var←c0715, pd485)
;
};
};
};
};
goto lab←L100085;
lab←L100081: ;
SOURCE(33790, 87)
{
W2 var←c66064;
{
W2 var←c66096;
word v←v58336;
v←v58336 = (* (( (ptr) tool←v9068)+37) );
var←c66096.f0 = 5;
var←c66096.f1 = v←v58336;
var←c66064 = var←c66096;
};
{
W2 var←c66160;
W2 var←c0716;
var←c66160.f0 = 4;
var←c66160.f1 = tool←v9068;
(* (ptr) (word) &var←c0716 ) = 0;
(* (( (ptr) (word) &var←c0716) + 1) ) = 0;
{
word pd486;
pd486 = (* (( (ptr) (* (( (ptr) gf←c68944)+159)/* var←c60112 */ ))+62) );
ip←v9140 = (word) ( *( (fPt) ((* (ptr) pd486 ))))((* (( (ptr) gf←c68944)+81) ), var←c66160, var←c66064, var←c0716, pd486)
;
};
};
};
lab←L100085: ;
SOURCE(32928, 951)
return(ip←v9140);
}
static word NoName←Q6012(formal←c0687)
word formal←c0687;
{
register ptr gf←c0686 = (ptr) &globalframe;
SOURCE(33166, 65)
(void) ExpandName←P720((word) (( (bPt) formal←c0687)+20), (* (( (ptr) formal←c0687)+4) ), (* (( (ptr) gf←c0686)+40) ));
return(0);
}
static word Install←P1680(formal←c0798, err←v9228)
word formal←c0798;
word err←v9228;
{
W8 var←c68976;
/* declaration of packageName←v9200 skipped */
register ptr gf←c69008 = (ptr) &globalframe;
word installed←v9272;
/* declaration of var←c66224 skipped */
/* declaration of res←v14944 skipped */
var←c68976.f4/* packageName←v9200 */ = formal←c0798;
/* Install: */
SOURCE(33883, 383)
{
word tmpAddr487;
tmpAddr487 = (word) (( (ptr) &var←c68976)+5)/* var←c66224 */ ;
(* (ptr) tmpAddr487 ) = ( ((word) (fPt) DoInstall←P4104) );
(* (( (ptr) tmpAddr487) + 1) ) = 1;
};
SOURCE(33883, 383)
installed←v9272 = 0;
SOURCE(34067, 14)
var←c68976.f7/* res←v14944 */ = 0;
SOURCE(34083, 48)
{
word pd488;
pd488 = (* (( (ptr) (* (( (ptr) gf←c69008)+155)/* var←c59664 */ ))+6) );
(void) ( *( (fPt) ((* (ptr) pd488 ))))((* (( (ptr) gf←c69008)+4)/* initialWorkingDirectory←v4540 */ ), (word) (( (bPt) &var←c68976)+20)
/* var←c66224 */ , pd488);
};
SOURCE(34133, 133)
if ((var←c68976.f7/* res←v14944 */ == (* (( (ptr) gf←c69008)+82) ))) {
SOURCE(34156, 94)
{
W2 var←c66256;
W2 var←c66288;
W2 var←c66320;
var←c66256.f0 = 11;
var←c66256.f1 = (* (( (ptr) gf←c69008)+84) );
var←c66288.f0 = 11;
var←c66288.f1 = var←c68976.f4/* packageName←v9200 */ ;
var←c66320.f0 = 11;
var←c66320.f1 = (* (( (ptr) gf←c69008)+85) );
{
word pd489;
pd489 = (* (( (ptr) (* (( (ptr) gf←c69008)+159)/* var←c60112 */ ))+60) );
(void) ( *( (fPt) ((* (ptr) pd489 ))))(err←v9228, (* (( (ptr) gf←c69008)+83) ), var←c66256, var←c66288, var←c66320, pd489)
;
};
};
}
else {
SOURCE(34250, 16)
installed←v9272 = 1;
};
SOURCE(33883, 383)
return(installed←v9272);
}
static void DoInstall←P4104(formal←c69072)
word formal←c69072;
{
register ptr gf←c69040 = (ptr) &globalframe;
formal←c69072 = (formal←c69072 - 20);
/* DoInstall: */
SOURCE(33971, 91)
SOURCE(33991, 71)
{
word var←c66352;
{
word pd490;
pd490 = (* (( (ptr) (* (( (ptr) gf←c69040)+158)/* var←c59920 */ ))+6) );
var←c66352 = (word) ( *( (fPt) ((* (ptr) pd490 ))))((* (( (ptr) gf←c69040)+86) ), (* (( (ptr) formal←c69072)+4) ), pd490)
;
};
{
word pd491;
pd491 = (* (( (ptr) (* (( (ptr) gf←c69040)+189)/* var←c66384 */ ))+11) );
(* (( (ptr) formal←c69072)+7) ) = (word) ( *( (fPt) ((* (ptr) pd491 ))))(var←c66352, 0, pd491);
};
};
}
static void NoName←Q6072(formal←c0529, formal←c200048, formal←c200049, formal←c200050, formal←c200051)
word formal←c0529;
word formal←c200048;
word formal←c200049;
word formal←c200050;
word formal←c200051;
{
register ptr gf←c0691 = (ptr) &globalframe;
if ((formal←c200049 == (* (( (ptr) (* (( (ptr) gf←c0691)+155)/* var←c59664 */ ))+9) )) || (formal←c200049 == (word) (( (bPt) gf←c0691)+348)
/* var←c58576 */ )) {
{
W4 error←v57628;
error←v57628 = (* (W4Pt) formal←c200051 );
SOURCE(33231, 12)
(* (ptr) formal←c0529 ) = 2;
(* (( (ptr) formal←c0529)+1) ) = 8;
return;
};
};
(* (ptr) formal←c0529 ) = 0;
(* (( (ptr) formal←c0529)+1) ) = 0;
return;
}
static void NoName←Q6132(formal←c0534, formal←c200044, formal←c200045, formal←c200046, formal←c200047)
word formal←c0534;
word formal←c200044;
word formal←c200045;
word formal←c200046;
word formal←c200047;
{
if ((formal←c200045 == XR←Unwind)) {
SOURCE(23044, 14)
(void) UnHideViewer←P3048((word) ((( (bPt) (* (ptr) formal←c200044 ))+24)));
};
(* (ptr) formal←c0534 ) = 0;
(* (( (ptr) formal←c0534)+1) ) = 0;
return;
}
static void NoName←Q6192(formal←c0539, formal←c200040, formal←c200041, formal←c200042, formal←c200043)
word formal←c0539;
word formal←c200040;
word formal←c200041;
word formal←c200042;
word formal←c200043;
{
register ptr gf←c0692 = (ptr) &globalframe;
if ((formal←c200041 == (* (( (ptr) (* (( (ptr) gf←c0692)+177)/* var←c64592 */ ))+94) )) || (formal←c200041 == (* (( (ptr) (* (
( (ptr) gf←c0692)+176)/* var←c64560 */ ))+22) ))) {
SOURCE(19197, 9)
(* (ptr) formal←c0539 ) = 2;
(* (( (ptr) formal←c0539)+1) ) = 7;
return;
};
(* (ptr) formal←c0539 ) = 0;
(* (( (ptr) formal←c0539)+1) ) = 0;
return;
}
static void NoName←Q6252(formal←c0545, formal←c200036, formal←c200037, formal←c200038, formal←c200039)
word formal←c0545;
word formal←c200036;
word formal←c200037;
word formal←c200038;
word formal←c200039;
{
register ptr gf←c0693 = (ptr) &globalframe;
if ((formal←c200037 == (* (( (ptr) (* (( (ptr) gf←c0693)+155)/* var←c59664 */ ))+9) ))) {
{
W4 error←v53896;
error←v53896 = (* (W4Pt) formal←c200039 );
SOURCE(17515, 9)
(* (ptr) formal←c0545 ) = 2;
(* (( (ptr) formal←c0545)+1) ) = 6;
return;
};
};
(* (ptr) formal←c0545 ) = 0;
(* (( (ptr) formal←c0545)+1) ) = 0;
return;
}
static void NoName←Q6312(formal←c0561, formal←c200032, formal←c200033, formal←c200034, formal←c200035)
word formal←c0561;
word formal←c200032;
word formal←c200033;
word formal←c200034;
word formal←c200035;
{
register ptr gf←c0694 = (ptr) &globalframe;
if ((formal←c200033 == (* (( (ptr) (* (( (ptr) gf←c0694)+169)/* var←c62960 */ ))+4) ))) {
{
word problem←v53712;
word explanation←v53740;
problem←v53712 = (* (ptr) formal←c200035 );
explanation←v53740 = (* (( (ptr) formal←c200035)+1) );
SOURCE(16781, 494)
{
word tc493;
word pd494;
word tc495;
word pd496;
if ((problem←v53712 == 5)) { goto then0492;};
if ((problem←v53712 == 4)) {
pd494 = (* (( (ptr) (* (( (ptr) gf←c0694)+158)/* var←c59920 */ ))+8) );
tc493 = (word) (0 != (word) ( *( (fPt) ((* (ptr) pd494 ))))(explanation←v53740, (* (( (ptr) gf←c0694)+60) ), 1, pd494));
}
else {
tc493 = (word) 0;
};
if (tc493) { goto then0492;};
if ((problem←v53712 == 0)) {
pd496 = (* (( (ptr) (* (( (ptr) gf←c0694)+158)/* var←c59920 */ ))+8) );
tc495 = (word) (0 != (word) ( *( (fPt) ((* (ptr) pd496 ))))(explanation←v53740, (* (( (ptr) gf←c0694)+61) ), 1, pd496));
}
else {
tc495 = (word) 0;
};
if (tc495) {
then0492: ;
SOURCE(16977, 23)
{
word pd497;
pd497 = (* (( (ptr) (* (( (ptr) gf←c0694)+162)/* var←c60592 */ ))+18) );
(void) ( *( (fPt) ((* (ptr) pd497 ))))(pd497);
};
SOURCE(17002, 40)
{
word var←c63344;
{
word pd498;
pd498 = (* (( (ptr) (* (( (ptr) gf←c0694)+162)/* var←c60592 */ ))+7) );
var←c63344 = (word) ( *( (fPt) ((* (ptr) pd498 ))))(5, pd498);
};
{
word pd499;
pd499 = (* (( (ptr) (* (( (ptr) gf←c0694)+162)/* var←c60592 */ ))+21) );
(void) ( *( (fPt) ((* (ptr) pd499 ))))(var←c63344, pd499);
};
};
SOURCE(17044, 62)
{
W2 var←c63376;
W2 var←c63408;
W2 var←c0717;
var←c63376.f0 = 11;
var←c63376.f1 = (* (( (ptr) gf←c0694)+63) );
var←c63408.f0 = 11;
var←c63408.f1 = (* (( (ptr) gf←c0694)+64) );
(* (ptr) (word) &var←c0717 ) = 0;
(* (( (ptr) (word) &var←c0717) + 1) ) = 0;
{
word pd500;
pd500 = (* (( (ptr) (* (( (ptr) gf←c0694)+159)/* var←c60112 */ ))+60) );
(void) ( *( (fPt) ((* (ptr) pd500 ))))((* (( (ptr) (* (( (ptr) (* (ptr) formal←c200032 ))+4) ))+9) ), (* (( (ptr) gf←c0694)+62)
), var←c63376, var←c63408, var←c0717, pd500);
};
};
SOURCE(17108, 5)
(* (ptr) formal←c0561 ) = 2;
(* (( (ptr) formal←c0561)+1) ) = 4;
return;
}
else {
SOURCE(17124, 129)
{
W2 var←c63472;
W2 var←c63568;
{
word v←v58144;
v←v58144 = (* ((( (ptr) formal←c200032)+6)+problem←v53712) );
var←c63472.f0 = 11;
var←c63472.f1 = v←v58144;
};
{
W2 var←c63600;
word v←v58096;
v←v58096 = (* (( (ptr) (* (( (ptr) (* (ptr) formal←c200032 ))+6) ))+1) );
var←c63600.f0 = 11;
var←c63600.f1 = v←v58096;
var←c63568 = var←c63600;
};
{
W2 var←c63664;
var←c63664.f0 = 11;
var←c63664.f1 = explanation←v53740;
{
word pd501;
pd501 = (* (( (ptr) (* (( (ptr) gf←c0694)+159)/* var←c60112 */ ))+60) );
(void) ( *( (fPt) ((* (ptr) pd501 ))))((* (( (ptr) (* (( (ptr) (* (ptr) formal←c200032 ))+4) ))+9) ), (* (( (ptr) gf←c0694)+65)
), var←c63472, var←c63568, var←c63664, pd501);
};
};
};
SOURCE(17255, 20)
(* (( (ptr) formal←c200032)+4) ) = 1;
SOURCE(17277, 8)
(* (ptr) formal←c0561 ) = 2;
(* (( (ptr) formal←c0561)+1) ) = 5;
return;
};
};
};
};
(* (ptr) formal←c0561 ) = 0;
(* (( (ptr) formal←c0561)+1) ) = 0;
return;
}
static void NoName←Q6372(formal←c0566, formal←c200028, formal←c200029, formal←c200030, formal←c200031)
word formal←c0566;
word formal←c200028;
word formal←c200029;
word formal←c200030;
word formal←c200031;
{
register ptr gf←c0695 = (ptr) &globalframe;
if ((formal←c200029 == XR←Unwind)) {
SOURCE(14817, 60)
{
word pd502;
pd502 = (* (( (ptr) (* (( (ptr) gf←c0695)+156)/* var←c59696 */ ))+15) );
(void) ( *( (fPt) ((* (ptr) pd502 ))))((* (( (ptr) (* (( (ptr) formal←c200028)+5) ))+1) ), 0, pd502);
};
SOURCE(14879, 27)
{
word pd503;
pd503 = (* (( (ptr) (* (( (ptr) gf←c0695)+161)/* var←c60496 */ ))+6) );
(void) ( *( (fPt) ((* (ptr) pd503 ))))((* ((( (ptr) formal←c200028)+4)) ), pd503);
};
SOURCE(14908, 17)
(* (ptr) (* (( (ptr) formal←c200028)+5) ) ) = 0;
};
(* (ptr) formal←c0566 ) = 0;
(* (( (ptr) formal←c0566)+1) ) = 0;
return;
}
static void NoName←Q6432(formal←c0572, formal←c200024, formal←c200025, formal←c200026, formal←c200027)
word formal←c0572;
word formal←c200024;
word formal←c200025;
word formal←c200026;
word formal←c200027;
{
register ptr gf←c0696 = (ptr) &globalframe;
if ((formal←c200025 == (* (( (ptr) (* (( (ptr) gf←c0696)+155)/* var←c59664 */ ))+9) ))) {
{
W4 error←v51300;
error←v51300 = (* (W4Pt) formal←c200027 );
SOURCE(11308, 18)
(void) RaiseError←P600(error←v51300);
};
};
(* (ptr) formal←c0572 ) = 0;
(* (( (ptr) formal←c0572)+1) ) = 0;
return;
}
static void NoName←Q6492(formal←c0578, formal←c200020, formal←c200021, formal←c200022, formal←c200023)
word formal←c0578;
word formal←c200020;
word formal←c200021;
word formal←c200022;
word formal←c200023;
{
register ptr gf←c0697 = (ptr) &globalframe;
if ((formal←c200021 == (* (( (ptr) (* (( (ptr) gf←c0697)+155)/* var←c59664 */ ))+9) )) || (formal←c200021 == (word) (( (bPt) gf←c0697)+348)
/* var←c58576 */ )) {
{
W4 error←v50780;
error←v50780 = (* (W4Pt) formal←c200023 );
SOURCE(9264, 23)
(* (( (ptr) formal←c200020)+6) ) = error←v50780.f2;
SOURCE(9289, 12)
(* (ptr) formal←c0578 ) = 2;
(* (( (ptr) formal←c0578)+1) ) = 3;
return;
};
};
(* (ptr) formal←c0578 ) = 0;
(* (( (ptr) formal←c0578)+1) ) = 0;
return;
}
static void NoName←Q6552(formal←c0584, formal←c200016, formal←c200017, formal←c200018, formal←c200019)
word formal←c0584;
word formal←c200016;
word formal←c200017;
word formal←c200018;
word formal←c200019;
{
register ptr gf←c0698 = (ptr) &globalframe;
if ((formal←c200017 == (* (( (ptr) (* (( (ptr) gf←c0698)+155)/* var←c59664 */ ))+9) ))) {
{
W4 error←v50424;
error←v50424 = (* (W4Pt) formal←c200019 );
SOURCE(8844, 9)
(* (ptr) formal←c0584 ) = 2;
(* (( (ptr) formal←c0584)+1) ) = 2;
return;
};
};
(* (ptr) formal←c0584 ) = 0;
(* (( (ptr) formal←c0584)+1) ) = 0;
return;
}
static void NoName←Q6612(formal←c0589, formal←c200012, formal←c200013, formal←c200014, formal←c200015)
word formal←c0589;
word formal←c200012;
word formal←c200013;
word formal←c200014;
word formal←c200015;
{
if ((formal←c200013 == XR←Unwind)) {
(void) (XR←MonitorExit(* (( (ptr) formal←c200012)+4) ));
};
(* (ptr) formal←c0589 ) = 0;
(* (( (ptr) formal←c0589)+1) ) = 0;
return;
}
static void NoName←Q6672(formal←c0594, formal←c200008, formal←c200009, formal←c200010, formal←c200011)
word formal←c0594;
word formal←c200008;
word formal←c200009;
word formal←c200010;
word formal←c200011;
{
if ((formal←c200009 == XR←Unwind)) {
(void) (XR←MonitorExit(* (( (ptr) formal←c200008)+4) ));
};
(* (ptr) formal←c0594 ) = 0;
(* (( (ptr) formal←c0594)+1) ) = 0;
return;
}
static void NoName←Q6732(formal←c0599, formal←c200004, formal←c200005, formal←c200006, formal←c200007)
word formal←c0599;
word formal←c200004;
word formal←c200005;
word formal←c200006;
word formal←c200007;
{
if ((formal←c200005 == XR←Unwind)) {
(void) (XR←MonitorExit(* (( (ptr) formal←c200004)+4) ));
};
(* (ptr) formal←c0599 ) = 0;
(* (( (ptr) formal←c0599)+1) ) = 0;
return;
}
static void NoName←Q6792(formal←c0604, formal←c200000, formal←c200001, formal←c200002, formal←c200003)
word formal←c0604;
word formal←c200000;
word formal←c200001;
word formal←c200002;
word formal←c200003;
{
if ((formal←c200001 == XR←Unwind)) {
(void) (XR←MonitorExit(* (( (ptr) formal←c200000)+4) ));
};
(* (ptr) formal←c0604 ) = 0;
(* (( (ptr) formal←c0604)+1) ) = 0;
return;
}
static word NoName←Q6852(formal←c0141)
word formal←c0141;
{
W5 var←c0143;
word var←c0142;
/* intermediary proc for a FORK, nArgs: 5, nRets: 0 */
var←c0143 = (* (W5Pt) (( (ptr) formal←c0141)+4) );
var←c0142 = (* (( (ptr) formal←c0141)+2) );
formal←c0141 = XR←ExtensionFree(formal←c0141);
(void) ( *( (fPt) ((* (ptr) var←c0142 ))))(var←c0143.f0, var←c0143.f1, var←c0143.f2, var←c0143.f3, var←c0143.f4, var←c0142)
;
return(0);
}
/* file: XTSetterPrintImpl, module: XTSetterPrintImpl, compiled at: October 19, 1993 1:45:09 pm PDT */
extern void XR←install←XTSetterPrintImpl() {
NoName←Q5232();
}
extern void XR←run←XTSetterPrintImpl() { XR←Start(&globalframe); }