/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1993 by Xerox Corporation. All rights reserved. */
/* time: July 22, 1993 6:29:27 pm PDT */
/* C2C version: April 20, 1993 (sun4) */
/* ref-counting: off */
/* file: GGFontImpl, module: GGFontImpl */
/* switches: bcfhklnouw */
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob←version [3030878612,3021812523] GGFontImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef word (*fPt)();
typedef struct {word f0, f1;} W2;
typedef struct {word f0, f1, f2, f3, f4, f5;} W6;
typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8;
typedef struct {word f0, f1, f2, f3, f4, f5, f6;} W7;
typedef struct {W8 f; W8 r;} W16;
typedef W16 *W16Pt;
typedef struct {W16 f; W2 r;} W18;
typedef struct {W8 f; word r;} W9;
typedef W2 *W2Pt;
typedef struct {word f0, f1, f2, f3, f4;} W5;
typedef struct {word f0, f1, f2;} W3;
typedef struct {W8 f; W3 r;} W11;
#define SOURCE(p, l) /* source p, l */
#define BCK(idx, lim) ( ((unsigned) idx) >= ((unsigned) lim) ? (XR←RaiseBoundsFault()) : (idx) )
#define FABS(f, t) ( ((t=(f)) >= (float) 0.0) ? (t) : (- (t)) )
static float fc112 = 0.01;
static float fc122 = 1.0;
#define SGNCK(i) ((int) (word) (i) < 0 ? XR←RaiseArithmeticFault(): i )
static float fc184 = 1.5;
static float fc245 = 0.0;
static void NoName←Q2784();
static void GGFontImpl←P0();
static void FlushFontCache←P60();
static void GGFontCache←P120();
static word AlternateFont←P180();
static word FindScaledFont←P240();
static word NoName←Q2844();
static word NoName←Q2904();
static word NearestTiogaFont←P300();
static word TryName←P1692();
static word CreateFontData←P360();
static word CopyFontData←P420();
static word InitFontData←P480();
static word ParseFontData←P540();
static word NoName←Q2964();
static word Inner←P1800();
static word NoName←Q3024();
static word FontDataFromFont←P600();
static word FontDataFromNamelessFont←P660();
static word DigitProc←P720();
static word NonDigitProc←P780();
static void LiteralDataFromFontData←P840();
static word NoName←Q3084();
static void Inner←P2052();
static word HasEndDigits←P2112();
static word NoName←Q3144();
static void UserDataFromFontData←P900();
static word NoName←Q3204();
static void Inner←P2268();
static word NoName←Q3264();
static word NoName←Q3324();
static word HasMultiple←P960();
static word Before←P1020();
static word After←P1080();
static word FontAsDetailedRope←P1140();
static void FontPutDetailedStream←P1200();
static word FontAsLiteralRope←P1260();
static void FontPutLiteralStream←P1320();
static void OldParseFontData←P1380();
static word NoName←Q3384();
static word ReadWord←P2664();
static word NoName←Q3444();
static word WordBreakProc←P2724();
static void Init←P1440();
static void NoName←Q3504();
static void NoName←Q3564();
static void NoName←Q3624();
static void NoName←Q3684();
static void NoName←Q3744();
static void NoName←Q3804();
static void NoName←Q3864();
static void NoName←Q3924();
static void NoName←Q3984();
static void NoName←Q4044();
static void NoName←Q4104();
static struct {unsigned f; char r[48];} string1 = {2883632, "\260\006\005\146\151\162\163\164\216\257\300\363\223\326\161\300\017\164\046\072\104\350\005\004\162\145\163\164\214\216\257\300\363\223\326\161\300\017\164\046\072\104\350\261\000\000\000"};
static struct {unsigned f; char r[4];} string2 = {131074, "\004\003\000"};
static struct {unsigned f; char r[16];} string3 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"};
static struct {unsigned f; char r[4];} string4 = {65537, "\001\000\000"};
static struct {unsigned f; char r[16];} string5 = {851984, "\257\300\046\300\267\143\300\022\215\240\122\100\244\000\000"};
static struct {unsigned f; char r[16];} string6 = {851984, "\257\300\247\365\203\234\300\047\265\225\046\100\260\000\000"};
static struct {unsigned f; char r[8];} string7 = {262148, "\004\200\200?\000\000\000"};
static struct {unsigned f; char r[44];} string8 = {2752556, "\260\006\005\146\151\162\163\164\257\300\015\277\004\146\300\034\367\146\045\112\114\005\004\162\145\163\164\214\257\300\015\277\004\146\300\034\367\146\045\112\114\261\000"};
static struct {unsigned f; char r[28];} string9 = {1572888, "\006\002\000\007\000\040\016\000\003\001\000\000\000\000\014\014\000\014\014\014\014\000\010\001\000\000\000"};
static struct {unsigned f; char r[16];} string10 = {851984, "\257\300\264\247\211\224\300\264\035\063\053\100\370\000\000"};
static struct {unsigned f; char r[4];} string11 = {131074, "\003\001\000"};
static struct {unsigned f; char r[44];} string12 = {2752556, "\260\006\005\146\151\162\163\164\257\300\264\247\211\224\300\264\035\063\053\100\370\005\004\162\145\163\164\214\257\300\264\247\211\224\300\264\035\063\053\100\370\261\000"};
static struct {unsigned f; char r[4];} string13 = {131074, "\004\006\000"};
static struct {unsigned f; char r[16];} string14 = {851984, "\257\300\264\247\211\224\300\264\035\063\053\100\310\000\000"};
static struct {unsigned f; char r[4];} string15 = {131076, "\216\251\000"};
static struct {unsigned f; char r[4];} string16 = {196612, "off"};
static struct {unsigned f; char r[76];} string17 = {4718668, "usage: GGFontCache <on | off> enables or disables Gargoyle's font cache\012\000\000\000"};
static struct {unsigned f; char r[4];} string18 = {131076, "on\000"};
static struct {unsigned f; char r[8];} string19 = {458760, "visible"};
static struct {unsigned f; char r[20];} string20 = {1179668, "GGFontCache is %g\012\000"};
static struct {unsigned f; char r[12];} string21 = {589836, "pressfont\000\000"};
static struct {unsigned f; char r[4];} string22 = {131076, "xc\000"};
static struct {unsigned f; char r[20];} string23 = {1114132, "AlternateFontHard\000\000"};
static struct {unsigned f; char r[12];} string24 = {524300, "Gargoyle\000\000\000"};
static struct {unsigned f; char r[4];} string25 = {196612, "mrr"};
static struct {unsigned f; char r[4];} string26 = {196612, "mir"};
static struct {unsigned f; char r[4];} string27 = {196612, "brr"};
static struct {unsigned f; char r[12];} string28 = {589836, "Helvetica\000\000"};
static struct {unsigned f; char r[8];} string29 = {327688, "Error\000\000"};
static struct {unsigned f; char r[48];} string30 = {3014704, "Couldn't find alternate font for %g at size %g\000"};
static struct {unsigned f; char r[4];} string31 = {196612, "bir"};
static struct {unsigned f; char r[4];} string32 = {196612, "mor"};
static struct {unsigned f; char r[4];} string33 = {196612, "bor"};
static struct {unsigned f; char r[8];} string34 = {262152, "bold\000\000\000"};
static struct {unsigned f; char r[4];} string35 = {65540, "-\000\000"};
static struct {unsigned f; char r[20];} string36 = {1114132, "xerox/tiogafonts/\000\000"};
static struct {unsigned f; char r[8];} string37 = {393224, "italic\000"};
static struct {unsigned f; char r[4];} string38 = {131076, "-I\000"};
static struct {unsigned f; char r[20];} string39 = {1114132, "FontName IO Error\000\000"};
static struct {unsigned f; char r[24];} string40 = {1310744, "FontName EndOfStream\000\000\000"};
static struct {unsigned f; char r[24];} string41 = {1441816, "FontName Convert Error\000"};
static struct {unsigned f; char r[24];} string42 = {1310744, "FontName SyntaxError\000\000\000"};
static struct {unsigned f; char r[40];} string43 = {2359336, ": See GGFontSampler.tioga for syntax\000\000\000"};
static struct {unsigned f; char r[40];} string44 = {2359336, "FontName SyntaxError: no font family\000\000\000"};
static struct {unsigned f; char r[4];} string45 = {131076, "-B\000"};
static struct {unsigned f; char r[32];} string46 = {1966112, "NIL Font Data cannot be parsed\000"};
static struct {unsigned f; char r[48];} string47 = {2949168, ": (example: Helvetica-BI 18 for SetPressFont)\000\000"};
static struct {unsigned f; char r[20];} string48 = {1114132, "xerox/pressfonts/\000\000"};
static struct {unsigned f; char r[20];} string49 = {1179668, "xerox/xc1-3-3/fis/\000"};
static struct {unsigned f; char r[16];} string50 = {917520, "xerox/xc1-2-2/\000"};
static struct {unsigned f; char r[8];} string51 = {262152, "-bir\000\000\000"};
static struct {unsigned f; char r[8];} string52 = {262152, "-brr\000\000\000"};
static struct {unsigned f; char r[8];} string53 = {262152, "-mir\000\000\000"};
static struct {unsigned f; char r[4];} string54 = {4, "\000\000\000"};
static struct {unsigned f; char r[8];} string55 = {262152, "-mrr\000\000\000"};
static struct {unsigned f; char r[16];} string56 = {786448, "-bold-italic\000\000\000"};
static struct {unsigned f; char r[8];} string57 = {327688, "-bold\000\000"};
static struct {unsigned f; char r[8];} string58 = {458760, "-italic"};
static struct {unsigned f; char r[48];} string59 = {3014704, "StoredSize must be an integer for screen fonts\000"};
static struct {unsigned f; char r[4];} string60 = {131076, "BI\000"};
static struct {unsigned f; char r[4];} string61 = {65540, "B\000\000"};
static struct {unsigned f; char r[4];} string62 = {65540, "I\000\000"};
static struct {unsigned f; char r[28];} string63 = {1703964, "IO.Error during font parse\000"};
static struct {unsigned f; char r[36];} string64 = {2097188, "IO.EndOfStream during font parse\000\000\000"};
static struct {unsigned f; char r[32];} string65 = {2031648, "Convert.Error during font parse"};
static struct {unsigned f; char r[40];} string66 = {2555944, "GGParseIn.SyntaxError during font parse"};
static struct {unsigned f; char r[4];} string67 = {196612, "CMR"};
static struct {unsigned f; char r[16];} string68 = {917520, "%g %g %g %g %g\000"};
static struct {unsigned f; char r[12];} string69 = {720908, "SUBSTITUTED"};
static struct {unsigned f; char r[4];} string70 = {196612, "-BI"};
static struct {unsigned f; char r[12];} string71 = {720908, "GGFontCache"};
static struct {unsigned f; char r[68];} string72 = {4194372, "GGFontCache <on | off> enables or disables Gargoyle's font cache\000\000\000"};
static struct {unsigned f; char r[16];} string73 = {851984, "\257\300\264\247\211\224\300\264\035\063\053\100\164\000\000"};
static struct {unsigned f; char r[20];} string74 = {1245203, "\006\006\020\001\024\001\030\001\034\001\040\001\100\154\010\000\004\071\001"};
static struct {unsigned f; char r[16];} string75 = {851984, "\257\300\006<7[\300;CV\364@h\000\000"};
static struct {unsigned f; char r[16];} string76 = {851984, "\257\300\373\225\000\071\300\362\156\307\320\100\150\000\000"};
static struct {unsigned f; char r[16];} string77 = {851984, "\257\300\311\235\133\064\300\165\175\234\175\100\150\000\000"};
static struct {unsigned f; char r[16];} string78 = {851984, "\257\300\255\053\300\023\300\142\135\315\105\100\150\000\000"};
static struct {unsigned f; char r[16];} string79 = {851984, "\257\300\103\154\257\030\300\165\276\076\350\100\150\000\000"};
static struct {unsigned f; char r[16];} string80 = {851984, "\257\300\236\155\220\261\300\040\017\026\014\100\150\000\000"};
static struct {unsigned f; char r[16];} string81 = {851984, "\257\300\045\215\147\016\300\153\043\150\276\100\150\000\000"};
static struct {unsigned f; char r[16];} string82 = {851984, "\257\300\074\177\166\242\300\203\113\217\044\100\150\000\000"};
static struct {unsigned f; char r[16];} string83 = {851984, "\257\300\046\300\267\143\300\022\215\240\122\100\150\000\000"};
static struct {unsigned f; char r[16];} string84 = {851984, "\257\300\041\257\203\366\300\322\161\356\007\100\150\000\000"};
static struct {unsigned f; char r[16];} string85 = {851984, "\257\300\121\117\377\026\300\315\013\026\004\100\150\000\000"};
static struct {unsigned f; char r[16];} string86 = {851984, "\257\300\015\277\004\146\300\034\367\146\045\100\164\000\000"};
static struct {unsigned f; char r[16];} string87 = {851984, "\257\300\141\260\110\353\300\162\250\066\353\100\150\000\000"};
static struct {unsigned f; char r[16];} string88 = {851984, "\257\300\246\205\220\035\300\344\000\142\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string89 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\100\150\000\000"};
static struct {unsigned f; char r[16];} string90 = {851984, "\257\300\353\035\365\325\300\132\075\117\337\100\150\000\000"};
static struct {unsigned f; char r[16];} string91 = {851984, "\257\300\072\337\114\355\300\232\070\352\142\100\150\000\000"};
static struct {unsigned f; char r[16];} string92 = {851984, "\257\300\374\260\327\235\300\333\341\342\010\100\150\000\000"};
static struct {
word f0[85]; word f85; word f86; word f87;
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[19];
} globalframe = {
{0}, (word) Init←P1440, 0, (word) OldParseFontData←P1380,
0, (word) FontPutLiteralStream←P1320, 0, (word) FontAsLiteralRope←P1260,
0, (word) FontPutDetailedStream←P1200, 0, (word) FontAsDetailedRope←P1140,
0, (word) After←P1080, 0, (word) Before←P1020,
0, (word) HasMultiple←P960, 0, (word) UserDataFromFontData←P900,
0, (word) LiteralDataFromFontData←P840, 0, (word) NonDigitProc←P780,
0, (word) DigitProc←P720, 0, (word) FontDataFromNamelessFont←P660,
0, (word) FontDataFromFont←P600, 0, (word) ParseFontData←P540,
0, (word) InitFontData←P480, 0, (word) CopyFontData←P420,
0, (word) CreateFontData←P360, 0, (word) NearestTiogaFont←P300,
0, (word) FindScaledFont←P240, 0, (word) AlternateFont←P180,
0, (word) GGFontCache←P120, 0, (word) FlushFontCache←P60,
0, (word) GGFontImpl←P0, {0}
};
static void NoName←Q2784()
{
register ptr gf←c0418 = (ptr) &globalframe;
word var←c32684;
(* (( (ptr) gf←c0418)+10) ) = (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2);
(* (( (ptr) gf←c0418)+12) ) = (word) XR←GetTypeIndex((word) &string3, 0, (word) &string4);
(* (( (ptr) gf←c0418)+14) ) = (word) XR←GetTypeIndex((word) &string5, 0, (word) &string2);
(* (( (ptr) gf←c0418)+16) ) = (word) XR←GetTypeIndex((word) &string6, 0, (word) &string7);
(* (( (ptr) gf←c0418)+20) ) = (word) XR←GetTypeIndex((word) &string8, 0, (word) &string9);
(* (( (ptr) gf←c0418)+21) ) = (word) XR←GetTypeIndex((word) &string10, 0, (word) &string11);
(* (( (ptr) gf←c0418)+22) ) = (word) XR←GetTypeIndex((word) &string12, 0, (word) &string13);
(* (( (ptr) gf←c0418)+23) ) = (word) XR←GetTypeIndex((word) &string14, 0, (word) &string2);
(* (( (ptr) gf←c0418)+26) ) = (word) XR←GetTypeIndex((word) &string15, 0, (word) &string4);
(* (ptr) (( (bPt) gf←c0418)+108) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string16);
(* (ptr) (( (bPt) gf←c0418)+112) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string17);
(* (ptr) (( (bPt) gf←c0418)+116) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string18);
(* (ptr) (( (bPt) gf←c0418)+120) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+26) ), (word) &string19);
(* (ptr) (( (bPt) gf←c0418)+124) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string20);
(* (ptr) (( (bPt) gf←c0418)+128) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string21);
(* (ptr) (( (bPt) gf←c0418)+132) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string22);
(* (ptr) (( (bPt) gf←c0418)+136) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+26) ), (word) &string23);
(* (ptr) (( (bPt) gf←c0418)+140) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+26) ), (word) &string24);
(* (ptr) (( (bPt) gf←c0418)+144) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string25);
(* (ptr) (( (bPt) gf←c0418)+148) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string26);
(* (ptr) (( (bPt) gf←c0418)+152) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string27);
(* (ptr) (( (bPt) gf←c0418)+156) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string28);
(* (ptr) (( (bPt) gf←c0418)+160) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+26) ), (word) &string29);
(* (ptr) (( (bPt) gf←c0418)+164) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string30);
(* (ptr) (( (bPt) gf←c0418)+168) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string31);
(* (ptr) (( (bPt) gf←c0418)+172) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string32);
(* (ptr) (( (bPt) gf←c0418)+176) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string33);
(* (ptr) (( (bPt) gf←c0418)+180) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string34);
(* (ptr) (( (bPt) gf←c0418)+184) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string35);
(* (ptr) (( (bPt) gf←c0418)+188) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string36);
(* (ptr) (( (bPt) gf←c0418)+192) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string37);
(* (ptr) (( (bPt) gf←c0418)+196) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string38);
(* (ptr) (( (bPt) gf←c0418)+200) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string39);
(* (ptr) (( (bPt) gf←c0418)+204) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string40);
(* (ptr) (( (bPt) gf←c0418)+208) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string41);
(* (ptr) (( (bPt) gf←c0418)+212) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string42);
(* (ptr) (( (bPt) gf←c0418)+216) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string43);
(* (ptr) (( (bPt) gf←c0418)+220) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string44);
(* (ptr) (( (bPt) gf←c0418)+224) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string45);
(* (ptr) (( (bPt) gf←c0418)+228) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string46);
(* (ptr) (( (bPt) gf←c0418)+232) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string47);
(* (ptr) (( (bPt) gf←c0418)+236) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string48);
(* (ptr) (( (bPt) gf←c0418)+240) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string49);
(* (ptr) (( (bPt) gf←c0418)+244) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string50);
(* (ptr) (( (bPt) gf←c0418)+248) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string51);
(* (ptr) (( (bPt) gf←c0418)+252) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string52);
(* (ptr) (( (bPt) gf←c0418)+256) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string53);
(* (ptr) (( (bPt) gf←c0418)+260) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string54);
(* (ptr) (( (bPt) gf←c0418)+264) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string55);
(* (ptr) (( (bPt) gf←c0418)+268) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string56);
(* (ptr) (( (bPt) gf←c0418)+272) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string57);
(* (ptr) (( (bPt) gf←c0418)+276) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string58);
(* (ptr) (( (bPt) gf←c0418)+280) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string59);
(* (ptr) (( (bPt) gf←c0418)+284) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string60);
(* (ptr) (( (bPt) gf←c0418)+288) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string61);
(* (ptr) (( (bPt) gf←c0418)+292) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string62);
(* (ptr) (( (bPt) gf←c0418)+296) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string63);
(* (ptr) (( (bPt) gf←c0418)+300) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string64);
(* (ptr) (( (bPt) gf←c0418)+304) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string65);
(* (ptr) (( (bPt) gf←c0418)+308) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string66);
(* (ptr) (( (bPt) gf←c0418)+312) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string67);
(* (ptr) (( (bPt) gf←c0418)+316) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string68);
(* (ptr) (( (bPt) gf←c0418)+320) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string69);
(* (ptr) (( (bPt) gf←c0418)+324) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string70);
(* (ptr) (( (bPt) gf←c0418)+328) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string71);
(* (ptr) (( (bPt) gf←c0418)+332) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0418)+12) ), (word) &string72);
(void) XR←DeclareGlobalFrame((word) "GGFontImpl", &globalframe, (word) XR←GetTypeIndex((word) &string73, 0, (word) &string74)
, (word) (( (bPt) gf←c0418)+532)/* var←c29644 */ );
var←c32684 = (word) XR←ImportInterface((word) "CodeTimer", (word) XR←GetTypeIndexS((word) (&string75)), 21);
(* (( (ptr) gf←c0418)+139)/* var←c30028 */ ) = var←c32684;
(void) XR←ImportProcS(var←c32684, 526850);
(void) XR←ImportProcS(var←c32684, 526338);
var←c32684 = (word) XR←ImportInterface((word) "Commander", (word) XR←GetTypeIndexS((word) (&string76)), 3);
(* (( (ptr) gf←c0418)+151)/* var←c32652 */ ) = var←c32684;
(void) XR←ImportProcS(var←c32684, 1310725);
var←c32684 = (word) XR←ImportInterface((word) "CommanderOps", (word) XR←GetTypeIndexS((word) (&string77)), 14);
(* (( (ptr) gf←c0418)+136)/* var←c29900 */ ) = var←c32684;
(void) XR←ImportProcS(var←c32684, 67633666);
var←c32684 = (word) XR←ImportInterface((word) "Convert", (word) XR←GetTypeIndexS((word) (&string78)), 73);
(* (( (ptr) gf←c0418)+146)/* var←c30444 */ ) = var←c32684;
(void) XR←ImportProcS(var←c32684, 67634690);
(void) XR←ImportProcS(var←c32684, 67373057);
(void) XR←ImportProcS(var←c32684, 67901443);
var←c32684 = (word) XR←ImportInterface((word) "FileNames", (word) XR←GetTypeIndexS((word) (&string79)), 17);
(* (( (ptr) gf←c0418)+149)/* var←c30956 */ ) = var←c32684;
(void) XR←ImportProcS(var←c32684, 67635202);
(void) XR←ImportProcS(var←c32684, 67374593);
var←c32684 = (word) XR←ImportInterface((word) "GGParseIn", (word) XR←GetTypeIndexS((word) (&string80)), 26);
(* (( (ptr) gf←c0418)+148)/* var←c30828 */ ) = var←c32684;
(void) XR←ImportProcS(var←c32684, 67375361);
(void) XR←ImportProcS(var←c32684, 67372033);
(void) XR←ImportProcS(var←c32684, 67375617);
var←c32684 = (word) XR←ImportInterface((word) "GGParseOut", (word) XR←GetTypeIndexS((word) (&string81)), 15);
(* (( (ptr) gf←c0418)+150)/* var←c32332 */ ) = var←c32684;
(void) XR←ImportProcS(var←c32684, 526338);
var←c32684 = (word) XR←ImportInterface((word) "Imager", (word) XR←GetTypeIndexS((word) (&string82)), 84);
(* (( (ptr) gf←c0418)+143)/* var←c30188 */ ) = var←c32684;
var←c32684 = (word) XR←ImportInterface((word) "ImagerFont", (word) XR←GetTypeIndexS((word) (&string83)), 26);
(* (( (ptr) gf←c0418)+141)/* var←c30124 */ ) = var←c32684;
(void) XR←ImportProcS(var←c32684, 67374849);
(void) XR←ImportProcS(var←c32684, 67634434);
(void) XR←ImportProcS(var←c32684, 67633922);
var←c32684 = (word) XR←ImportInterface((word) "ImagerSys", (word) XR←GetTypeIndexS((word) (&string84)), 15);
(* (( (ptr) gf←c0418)+144)/* var←c30220 */ ) = var←c32684;
var←c32684 = (word) XR←ImportInterface((word) "ImagerTransformation", (word) XR←GetTypeIndexS((word) (&string85)), 55);
(* (( (ptr) gf←c0418)+140)/* var←c30060 */ ) = var←c32684;
(void) XR←ImportProcS(var←c32684, 67371777);
(void) XR←ImportProcS(var←c32684, 67371521);
(void) XR←ImportProcS(var←c32684, 402927105);
var←c32684 = (word) XR←ImportInterface((word) "IO", (word) XR←GetTypeIndexS((word) (&string86)), 103);
(* (( (ptr) gf←c0418)+137)/* var←c29964 */ ) = var←c32684;
(void) XR←ImportProcS(var←c32684, 801795);
(void) XR←ImportProcS(var←c32684, 67641090);
(void) XR←ImportProcS(var←c32684, 67378689);
(void) XR←ImportProcS(var←c32684, 67640578);
(void) XR←ImportProcS(var←c32684, 67392513);
(void) XR←ImportProcS(var←c32684, 67392257);
(void) XR←ImportProcS(var←c32684, 134763778);
(void) XR←ImportProcS(var←c32684, 1071364);
(void) XR←ImportProcS(var←c32684, 1063171);
var←c32684 = (word) XR←ImportInterface((word) "PFS", (word) XR←GetTypeIndexS((word) (&string87)), 40);
(* (( (ptr) gf←c0418)+142)/* var←c30156 */ ) = var←c32684;
var←c32684 = (word) XR←ImportInterface((word) "Real", (word) XR←GetTypeIndexS((word) (&string88)), 11);
(* (( (ptr) gf←c0418)+145)/* var←c30380 */ ) = var←c32684;
(void) XR←ImportProcS(var←c32684, 67371265);
(void) XR←ImportProcS(var←c32684, 67371521);
var←c32684 = (word) XR←ImportInterface((word) "Rope", (word) XR←GetTypeIndexS((word) (&string89)), 43);
(* (( (ptr) gf←c0418)+138)/* var←c29996 */ ) = var←c32684;
(void) XR←ImportProcS(var←c32684, 67898627);
(void) XR←ImportProcS(var←c32684, 67634434);
(void) XR←ImportProcS(var←c32684, 67373569);
(void) XR←ImportProcS(var←c32684, 68160516);
(void) XR←ImportProcS(var←c32684, 68419845);
(void) XR←ImportProcS(var←c32684, 67633666);
(void) XR←ImportProcS(var←c32684, 68159236);
(void) XR←ImportProcS(var←c32684, 67896323);
var←c32684 = (word) XR←ImportInterface((word) "SimpleFeedback", (word) XR←GetTypeIndexS((word) (&string90)), 7);
(* (( (ptr) gf←c0418)+147)/* var←c30700 */ ) = var←c32684;
(void) XR←ImportProcS(var←c32684, 1310981);
var←c32684 = (word) XR←ImportInterface((word) "SymTab", (word) XR←GetTypeIndexS((word) (&string91)), 13);
(* (( (ptr) gf←c0418)+135)/* var←c29868 */ ) = var←c32684;
(void) XR←ImportProcS(var←c32684, 67633410);
(void) XR←ImportProcS(var←c32684, 67896835);
(void) XR←ImportProcS(var←c32684, 134742786);
(void) XR←ImportProcS(var←c32684, 264449);
var←c32684 = (word) XR←ExportInterface((word) "GGFont", (word) XR←GetTypeIndexS((word) (&string92)), 16);
(* (( (ptr) gf←c0418)+152)/* var←c32716 */ ) = var←c32684;
(void) XR←ExportVar(var←c32684, 0, (word) (( (bPt) gf←c0418)+336)/* var←c28844 */ );
(void) XR←ExportProcS(var←c32684, (word) (( (bPt) gf←c0418)+524)/* var←c29612 */ , 256, (word) "FlushFontCache");
(void) XR←ExportProcS(var←c32684, (word) (( (bPt) gf←c0418)+484)/* var←c29452 */ , 67109376, (word) "CreateFontData");
(void) XR←ExportProcS(var←c32684, (word) (( (bPt) gf←c0418)+476)/* var←c29420 */ , 67633922, (word) "CopyFontData");
(void) XR←ExportProcS(var←c32684, (word) (( (bPt) gf←c0418)+468)/* var←c29388 */ , 67372033, (word) "InitFontData");
(void) XR←ExportProcS(var←c32684, (word) (( (bPt) gf←c0418)+460)/* var←c29356 */ , 69731594, (word) "ParseFontData");
(void) XR←ExportProcS(var←c32684, (word) (( (bPt) gf←c0418)+444)/* var←c29292 */ , 67372545, (word) "FontDataFromNamelessFont")
;
(void) XR←ExportProcS(var←c32684, (word) (( (bPt) gf←c0418)+452)/* var←c29324 */ , 67372801, (word) "FontDataFromFont");
(void) XR←ExportProcS(var←c32684, (word) (( (bPt) gf←c0418)+508)/* var←c29548 */ , 67897347, (word) "AlternateFont");
(void) XR←ExportProcS(var←c32684, (word) (( (bPt) gf←c0418)+420)/* var←c29196 */ , 264449, (word) "LiteralDataFromFontData")
;
(void) XR←ExportProcS(var←c32684, (word) (( (bPt) gf←c0418)+412)/* var←c29164 */ , 264705, (word) "UserDataFromFontData")
;
(void) XR←ExportProcS(var←c32684, (word) (( (bPt) gf←c0418)+380)/* var←c29036 */ , 67373825, (word) "FontAsDetailedRope")
;
(void) XR←ExportProcS(var←c32684, (word) (( (bPt) gf←c0418)+372)/* var←c29004 */ , 527362, (word) "FontPutDetailedStream")
;
(void) XR←ExportProcS(var←c32684, (word) (( (bPt) gf←c0418)+364)/* var←c28972 */ , 67374337, (word) "FontAsLiteralRope");
(void) XR←ExportProcS(var←c32684, (word) (( (bPt) gf←c0418)+356)/* var←c28940 */ , 527874, (word) "FontPutLiteralStream")
;
(void) XR←ExportProcS(var←c32684, (word) (( (bPt) gf←c0418)+348)/* var←c28908 */ , 404229894, (word) "OldParseFontData");
}
static void GGFontImpl←P0(formal←c086, formal←c079)
word formal←c086;
word formal←c079;
{
register ptr gf←c32748 = (ptr) &globalframe;
/* GGFontImpl: */
SOURCE(211, 20369)
SOURCE(639, 10)
{
word var←c29676;
word var←c29708;
var←c29676 = XR←NewObject(8, (* (( (ptr) gf←c32748)+10) ));
var←c29708 = var←c29676;
(* (ptr) var←c29708 ) = (* (( (ptr) gf←c32748)+56) );
(* (( (ptr) var←c29708)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c32748)+10) ));
var←c29708 = (* (( (ptr) var←c29708)+1) );
(* (ptr) var←c29708 ) = (* (( (ptr) gf←c32748)+81) );
(* (( (ptr) gf←c32748)+4)/* boldList←v3532 */ ) = var←c29676;
};
SOURCE(683, 12)
{
word var←c29740;
word var←c29772;
var←c29740 = XR←NewObject(8, (* (( (ptr) gf←c32748)+10) ));
var←c29772 = var←c29740;
(* (ptr) var←c29772 ) = (* (( (ptr) gf←c32748)+49) );
(* (( (ptr) var←c29772)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c32748)+10) ));
var←c29772 = (* (( (ptr) var←c29772)+1) );
(* (ptr) var←c29772 ) = (* (( (ptr) gf←c32748)+81) );
(* (( (ptr) gf←c32748)+5)/* italicList←v3560 */ ) = var←c29740;
};
SOURCE(729, 9)
{
word var←c29804;
word var←c29836;
var←c29804 = XR←NewObject(8, (* (( (ptr) gf←c32748)+10) ));
var←c29836 = var←c29804;
(* (ptr) var←c29836 ) = (* (( (ptr) gf←c32748)+36) );
(* (( (ptr) var←c29836)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c32748)+10) ));
var←c29836 = (* (( (ptr) var←c29836)+1) );
(* (ptr) var←c29836 ) = (* (( (ptr) gf←c32748)+37) );
(* (( (ptr) var←c29836)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c32748)+10) ));
var←c29836 = (* (( (ptr) var←c29836)+1) );
(* (ptr) var←c29836 ) = (* (( (ptr) gf←c32748)+38) );
(* (( (ptr) var←c29836)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c32748)+10) ));
var←c29836 = (* (( (ptr) var←c29836)+1) );
(* (ptr) var←c29836 ) = (* (( (ptr) gf←c32748)+42) );
(* (( (ptr) var←c29836)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c32748)+10) ));
var←c29836 = (* (( (ptr) var←c29836)+1) );
(* (ptr) var←c29836 ) = (* (( (ptr) gf←c32748)+43) );
(* (( (ptr) var←c29836)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c32748)+10) ));
var←c29836 = (* (( (ptr) var←c29836)+1) );
(* (ptr) var←c29836 ) = (* (( (ptr) gf←c32748)+44) );
(* (( (ptr) var←c29836)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c32748)+10) ));
var←c29836 = (* (( (ptr) var←c29836)+1) );
(* (ptr) var←c29836 ) = (* (( (ptr) gf←c32748)+45) );
(* (( (ptr) var←c29836)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c32748)+10) ));
var←c29836 = (* (( (ptr) var←c29836)+1) );
(* (ptr) var←c29836 ) = (* (( (ptr) gf←c32748)+48) );
(* (( (ptr) gf←c32748)+6)/* endList←v3588 */ ) = var←c29804;
};
SOURCE(2247, 24)
(* (( (ptr) gf←c32748)+9)/* fontCacheOn←v3812 */ ) = 1;
SOURCE(20574, 6)
(void) Init←P1440();
}
static void FlushFontCache←P60()
{
register ptr gf←c32780 = (ptr) &globalframe;
/* FlushFontCache: */
SOURCE(882, 89)
SOURCE(914, 23)
{
word pd93;
pd93 = (* (( (ptr) (* (( (ptr) gf←c32780)+135)/* var←c29868 */ ))+13) );
(void) ( *( (fPt) ((* (ptr) pd93 ))))((* ((( (ptr) gf←c32780)+7)/* fontTable←v3616 */ ) ), pd93);
};
SOURCE(939, 32)
{
word pd94;
pd94 = (* (( (ptr) (* (( (ptr) gf←c32780)+135)/* var←c29868 */ ))+13) );
(void) ( *( (fPt) ((* (ptr) pd94 ))))((* ((( (ptr) gf←c32780)+8)/* alternateFontTable←v3644 */ ) ), pd94);
};
}
static void GGFontCache←P120(formal←c092, cmd←v15204)
word formal←c092;
word cmd←v15204;
{
register ptr gf←c32812 = (ptr) &globalframe;
word result←v15248;
word msg←v15276;
/* GGFontCache: */
SOURCE(977, 471)
SOURCE(977, 471)
result←v15248 = 0;
SOURCE(977, 471)
msg←v15276 = 0;
SOURCE(1014, 434)
SOURCE(1016, 59)
{
word argv←v7696;
SOURCE(1016, 59)
{
word pd95;
pd95 = (* (( (ptr) (* (( (ptr) gf←c32812)+136)/* var←c29900 */ ))+6) );
argv←v7696 = (word) ( *( (fPt) ((* (ptr) pd95 ))))(cmd←v15204, 0, pd95);
};
SOURCE(1077, 245)
if (((* (ptr) argv←v7696 ) <= 1)) {
SOURCE(1100, 88)
{
W2 var←c29932;
var←c29932.f0 = 11;
if ((0 != (* (( (ptr) gf←c32812)+9)/* fontCacheOn←v3812 */ ))) {
var←c29932.f1 = (* (( (ptr) gf←c32812)+29) );
}
else {
var←c29932.f1 = (* (( (ptr) gf←c32812)+27) );
};
{
word pd96;
pd96 = (* (( (ptr) (* (( (ptr) gf←c32812)+137)/* var←c29964 */ ))+61) );
(void) ( *( (fPt) ((* (ptr) pd96 ))))((* (( (ptr) cmd←v15204)+1) ), (* (( (ptr) gf←c32812)+31) ), var←c29932, pd96);
};
};
}
else {
SOURCE(1190, 132)
{
word pd97;
word limit98;
pd97 = (* (( (ptr) (* (( (ptr) gf←c32812)+138)/* var←c29996 */ ))+8) );
if ((0 != (word) ( *( (fPt) ((* (ptr) pd97 ))))((* ((( (ptr) argv←v7696)+1)+(
limit98 = (* (ptr) argv←v7696 ),
BCK(1, limit98)
)) ), (* (( (ptr) gf←c32812)+29) ), 0, pd97))) {
SOURCE(1231, 24)
(* (( (ptr) gf←c32812)+9)/* fontCacheOn←v3812 */ ) = 1;
}
else {
SOURCE(1255, 67)
{
word pd99;
word limit100;
pd99 = (* (( (ptr) (* (( (ptr) gf←c32812)+138)/* var←c29996 */ ))+8) );
if ((0 != (word) ( *( (fPt) ((* (ptr) pd99 ))))((* ((( (ptr) argv←v7696)+1)+(
limit100 = (* (ptr) argv←v7696 ),
BCK(1, limit100)
)) ), (* (( (ptr) gf←c32812)+27) ), 0, pd99))) {
SOURCE(1297, 25)
(* (( (ptr) gf←c32812)+9)/* fontCacheOn←v3812 */ ) = 0;
}
else {
SOURCE(1322, 11)
goto lab←L100001;
};
};
};
};
};
};
goto lab←L100002;
lab←L100001: ;
SOURCE(1354, 92)
{
word pd101;
pd101 = (* (( (ptr) (* (( (ptr) gf←c32812)+137)/* var←c29964 */ ))+93) );
(void) ( *( (fPt) ((* (ptr) pd101 ))))((* (( (ptr) cmd←v15204)+2) ), (* (( (ptr) gf←c32812)+28) ), 0, 2147483647, pd101)
;
};
lab←L100002: ;
/* removed tail goto */
(* (ptr) formal←c092 ) = result←v15248;
(* (( (ptr) formal←c092)+1) ) = msg←v15276;
return;
}
static word AlternateFont←P180(data←v4864, font←v4892, op←v4920)
word data←v4864;
word font←v4892;
word op←v4920;
{
register ptr gf←c32844 = (ptr) &globalframe;
word alternate←v4964;
/* AlternateFont: */
SOURCE(1452, 670)
SOURCE(1452, 670)
alternate←v4964 = 0;
SOURCE(1570, 28)
if ((font←v4892 == 0)) {
SOURCE(1587, 11)
return(0);
};
SOURCE(1600, 32)
if ((op←v4920 != (* (( (ptr) gf←c32844)+30) ))) {
SOURCE(1620, 12)
return(font←v4892);
};
SOURCE(1634, 488)
{
word pd102;
word pd104;
pd102 = (* (( (ptr) (* (( (ptr) gf←c32844)+138)/* var←c29996 */ ))+11) );
if (( (int)(word) ( *( (fPt) ((* (ptr) pd102 ))))((* (( (ptr) data←v4864)+1) ), (* (( (ptr) gf←c32844)+32) ), 0, 0, pd102)
!= (int) (word) -1)) { goto then0103;};
pd104 = (* (( (ptr) (* (( (ptr) gf←c32844)+138)/* var←c29996 */ ))+11) );
if (( (int)(word) ( *( (fPt) ((* (ptr) pd104 ))))((* (( (ptr) data←v4864)+1) ), (* (( (ptr) gf←c32844)+33) ), 0, 0, pd104)
!= (int) (word) -1)) {
then0103: ;
SOURCE(1736, 363)
{
W6 ft←v7768;
SOURCE(1809, 49)
{
word pd105;
pd105 = (* (( (ptr) (* (( (ptr) gf←c32844)+139)/* var←c30028 */ ))+12) );
(void) ( *( (fPt) ((* (ptr) pd105 ))))((* (( (ptr) gf←c32844)+34) ), (* (( (ptr) gf←c32844)+35) ), pd105);
};
SOURCE(1860, 48)
{
word pd106;
pd106 = (* (( (ptr) (* (( (ptr) gf←c32844)+140)/* var←c30060 */ ))+50) );
(void) ( *( (fPt) ((* (ptr) pd106 ))))((word) &ft←v7768, (* (( (ptr) data←v4864)+5) ), pd106);
};
SOURCE(1910, 137)
{
float tf107;
float tf108;
word x109;
float tf110;
word x111;
word x113;
if ((FABS((FABS((
x109 = ft←v7768.f1, *(float*)&x109
), tf108) - FABS((
x111 = ft←v7768.f2, *(float*)&x111
), tf110)), tf107) < (
x113 = (* (ptr) &fc112 ), *(float*)&x113
))) {
SOURCE(1961, 61)
{
float tf114;
word x115;
float tf116;
alternate←v4964 = (word) NearestTiogaFont←P300((* (( (ptr) data←v4864)+3) ), (
tf116 = FABS((
/*1*/ x115 = ft←v7768.f1, *(float*)&x115
/*1*/ ), tf114), *(word*)&tf116
), font←v4892);
};
}
else {
SOURCE(2031, 16)
alternate←v4964 = font←v4892;
};
};
SOURCE(2049, 48)
{
word pd117;
pd117 = (* (( (ptr) (* (( (ptr) gf←c32844)+139)/* var←c30028 */ ))+14) );
(void) ( *( (fPt) ((* (ptr) pd117 ))))((* (( (ptr) gf←c32844)+34) ), (* (( (ptr) gf←c32844)+35) ), pd117);
};
};
}
else {
SOURCE(2106, 16)
alternate←v4964 = font←v4892;
};
};
SOURCE(1452, 670)
return(alternate←v4964);
}
static word FindScaledFont←P240(formal←c0508, scale←v5220)
word formal←c0508;
word scale←v5220;
{
W8 var←c32876;
/* declaration of name←v5192 skipped */
register ptr gf←c32908 = (ptr) &globalframe;
word scaledFont←v5264;
word found←v7812 = 0;
word val←v7840 = 0;
word s←v7868;
/* declaration of font←v7896 skipped */
var←c32876.f4/* name←v5192 */ = formal←c0508;
/* FindScaledFont: */
SOURCE(2273, 1048)
SOURCE(2273, 1048)
scaledFont←v5264 = 0;
SOURCE(2397, 10)
var←c32876.f5/* font←v7896 */ = 0;
SOURCE(2410, 27)
if ((scale←v5220 == 0)) {
SOURCE(2428, 9)
scale←v5220 = 1;
};
SOURCE(2439, 9)
{
float tf118;
s←v7868 = (
tf118 = (float)(unsigned)scale←v5220, *(word*)&tf118
);
};
SOURCE(2451, 870)
if ((0 != (* (( (ptr) gf←c32908)+9)/* fontCacheOn←v3812 */ ))) {
SOURCE(2471, 634)
{
word fE←v7956 = 0;
SOURCE(2488, 44)
{
W2 var←c30092;
{
word pd119;
pd119 = (* (( (ptr) (* (( (ptr) gf←c32908)+135)/* var←c29868 */ ))+7) );
(void) ( *( (fPt) ((* (ptr) pd119 ))))((word) &var←c30092, (* (( (ptr) gf←c32908)+7)/* fontTable←v3616 */ ), var←c32876.f4/* name←v5192 */ , pd119)
;
};
val←v7840 = var←c30092.f1;
found←v7812 = var←c30092.f0;
};
SOURCE(2534, 265)
if ((0 != found←v7812)) {
SOURCE(2548, 22)
fE←v7956 = XR←Narrow(val←v7840, (* (( (ptr) gf←c32908)+23) ));
}
else {
SOURCE(2572, 119)
SOURCE(2572, 119)
{
/* declaration of var←c01 skipped */
var←c32876.f6/* var←c01 */ = (* (( (ptr) (* (( (ptr) gf←c32908)+141)/* var←c30124 */ ))+7) );
{
/* declaration of var←c02 skipped */
{
word var←c03;
{
word var←c0475;
var←c0475 = (word) &var←c32876;
var←c03 = (word) XR←Enable(( ((word) (fPt) NoName←Q2904) ), ( ((word) (fPt) NoName←Q4104) ), var←c0475);
};
if ((var←c03 == 2)) {
goto lab←L100004;
};
};
var←c32876.f5/* font←v7896 */ = var←c32876.f7/* var←c02 */ ;
};
};
lab←L100004: ;
SOURCE(2705, 54)
{
word var←c30252;
var←c30252 = XR←NewObject(8, (* (( (ptr) gf←c32908)+23) ));
(* (ptr) var←c30252 ) = var←c32876.f5/* font←v7896 */ ;
fE←v7956 = var←c30252;
};
SOURCE(2761, 38)
{
word var←c30284;
word pd120;
pd120 = (* (( (ptr) (* (( (ptr) gf←c32908)+135)/* var←c29868 */ ))+10) );
var←c30284 = (word) ( *( (fPt) ((* (ptr) pd120 ))))((* (( (ptr) gf←c32908)+7)/* fontTable←v3616 */ ), var←c32876.f4/* name←v5192 */ , fE←v7956, pd120)
;
};
};
SOURCE(2804, 33)
if (((* (ptr) fE←v7956 ) == 0)) {
SOURCE(2826, 11)
return(0);
};
SOURCE(2839, 137)
{
register word list←v8000;
list←v8000 = (* (( (ptr) fE←v7956)+1) );
lab←L100010: ;
if ((list←v8000 != 0)) {
}
else {
goto lab←L100007;
};
SOURCE(2920, 56)
if ((scale←v5220 == (* (ptr) list←v8000 ))) {
SOURCE(2953, 23)
return((* (( (ptr) list←v8000)+1) ));
};
list←v8000 = (* (( (ptr) list←v8000)+2) );
goto lab←L100010;
lab←L100007: ;
};
SOURCE(2987, 45)
{
word pd121;
word x123;
word x124;
float tf125;
pd121 = (* (( (ptr) (* (( (ptr) gf←c32908)+141)/* var←c30124 */ ))+9) );
scaledFont←v5264 = (word) ( *( (fPt) ((* (ptr) pd121 ))))((* (ptr) fE←v7956 ), (
tf125 = (
x123 = (* (ptr) &fc122 ), *(float*)&x123
) / (
x124 = s←v7868, *(float*)&x124
), *(word*)&tf125
), pd121);
};
SOURCE(3034, 69)
{
word var←c30316;
var←c30316 = XR←NewObject(12, (* (( (ptr) gf←c32908)+22) ));
(* (ptr) var←c30316 ) = scale←v5220;
(* (( (ptr) var←c30316)+1) ) = scaledFont←v5264;
(* (( (ptr) var←c30316)+2) ) = (* (( (ptr) fE←v7956)+1) );
(* (( (ptr) fE←v7956)+1) ) = var←c30316;
};
};
}
else {
SOURCE(3114, 119)
SOURCE(3114, 119)
{
/* declaration of var←c04 skipped */
var←c32876.f6/* var←c04 */ = (* (( (ptr) (* (( (ptr) gf←c32908)+141)/* var←c30124 */ ))+7) );
{
/* declaration of var←c05 skipped */
{
word var←c06;
{
word var←c0476;
var←c0476 = (word) &var←c32876;
var←c06 = (word) XR←Enable(( ((word) (fPt) NoName←Q2844) ), ( ((word) (fPt) NoName←Q4044) ), var←c0476);
};
if ((var←c06 == 3)) {
goto lab←L100012;
};
};
var←c32876.f5/* font←v7896 */ = var←c32876.f7/* var←c05 */ ;
};
};
lab←L100012: ;
SOURCE(3247, 30)
if ((var←c32876.f5/* font←v7896 */ == 0)) {
SOURCE(3266, 11)
return(0);
};
SOURCE(3279, 42)
{
word pd126;
word x127;
word x128;
float tf129;
pd126 = (* (( (ptr) (* (( (ptr) gf←c32908)+141)/* var←c30124 */ ))+9) );
scaledFont←v5264 = (word) ( *( (fPt) ((* (ptr) pd126 ))))(var←c32876.f5/* font←v7896 */ , (
tf129 = (
x127 = (* (ptr) &fc122 ), *(float*)&x127
) / (
x128 = s←v7868, *(float*)&x128
), *(word*)&tf129
), pd126);
};
};
SOURCE(2273, 1048)
return(scaledFont←v5264);
}
static word NoName←Q2844(formal←c0424)
word formal←c0424;
{
SOURCE(3114, 119)
{
word pd130;
pd130 = (* (( (ptr) formal←c0424)+6) );
(* (( (ptr) formal←c0424)+7) ) = (word) ( *( (fPt) ((* (ptr) pd130 ))))((* (( (ptr) formal←c0424)+4) ), 0, pd130);
};
return(0);
}
static word NoName←Q2904(formal←c0425)
word formal←c0425;
{
SOURCE(2572, 119)
{
word pd131;
pd131 = (* (( (ptr) formal←c0425)+6) );
(* (( (ptr) formal←c0425)+7) ) = (word) ( *( (fPt) ((* (ptr) pd131 ))))((* (( (ptr) formal←c0425)+4) ), 0, pd131);
};
return(0);
}
static word NearestTiogaFont←P300(userFSF←v5408, scaleReal←v5436, default←v5464)
word userFSF←v5408;
word scaleReal←v5436;
word default←v5464;
{
W7 var←c32940;
register ptr gf←c32972 = (ptr) &globalframe;
word alternate←v5508;
/* declaration of var←c30348 skipped */
word fE←v8128 = 0;
word scale←v8184;
/* declaration of altName←v8212 skipped */
/* NearestTiogaFont: */
SOURCE(3434, 2337)
{
word tmpAddr132;
tmpAddr132 = (word) (( (ptr) &var←c32940)+4)/* var←c30348 */ ;
(* (ptr) tmpAddr132 ) = ( ((word) (fPt) TryName←P1692) );
(* (( (ptr) tmpAddr132) + 1) ) = 1;
};
SOURCE(3434, 2337)
alternate←v5508 = 0;
SOURCE(4041, 13)
var←c32940.f6/* altName←v8212 */ = 0;
SOURCE(4056, 29)
{
word pd133;
word idx134;
pd133 = (* (( (ptr) (* (( (ptr) gf←c32972)+145)/* var←c30380 */ ))+6) );
scale←v8184 = (
idx134 = (word) ( *( (fPt) ((* (ptr) pd133 ))))(scaleReal←v5436, pd133),
SGNCK(idx134)
);
};
SOURCE(4088, 407)
if ((0 != (* (( (ptr) gf←c32972)+9)/* fontCacheOn←v3812 */ ))) {
SOURCE(4108, 392)
{
word found←v8388 = 0;
word val←v8416 = 0;
word fontName←v8444;
SOURCE(4141, 66)
{
word var←c30412;
{
word pd135;
pd135 = (* (( (ptr) (* (( (ptr) gf←c32972)+146)/* var←c30444 */ ))+28) );
var←c30412 = (word) ( *( (fPt) ((* (ptr) pd135 ))))(scale←v8184, 8, 1, pd135);
};
{
word pd136;
pd136 = (* (( (ptr) (* (( (ptr) gf←c32972)+138)/* var←c29996 */ ))+6) );
fontName←v8444 = (word) ( *( (fPt) ((* (ptr) pd136 ))))(userFSF←v5408, var←c30412, pd136);
};
};
SOURCE(4209, 57)
{
W2 var←c30476;
{
word pd137;
pd137 = (* (( (ptr) (* (( (ptr) gf←c32972)+135)/* var←c29868 */ ))+7) );
(void) ( *( (fPt) ((* (ptr) pd137 ))))((word) &var←c30476, (* (( (ptr) gf←c32972)+8)/* alternateFontTable←v3644 */ ), fontName←v8444, pd137)
;
};
val←v8416 = var←c30476.f1;
found←v8388 = var←c30476.f0;
};
SOURCE(4268, 227)
if ((0 != found←v8388)) {
SOURCE(4284, 16)
fE←v8128 = XR←Narrow(val←v8416, (* (( (ptr) gf←c32972)+21) ));
SOURCE(4302, 15)
return((* (( (ptr) fE←v8128)+1) ));
}
else {
SOURCE(4353, 53)
{
word var←c30508;
var←c30508 = XR←NewObject(8, (* (( (ptr) gf←c32972)+21) ));
(* (ptr) var←c30508 ) = scale←v8184;
fE←v8128 = var←c30508;
};
SOURCE(4444, 51)
{
word var←c30540;
word pd138;
pd138 = (* (( (ptr) (* (( (ptr) gf←c32972)+135)/* var←c29868 */ ))+10) );
var←c30540 = (word) ( *( (fPt) ((* (ptr) pd138 ))))((* (( (ptr) gf←c32972)+8)/* alternateFontTable←v3644 */ ), fontName←v8444, fE←v8128, pd138)
;
};
};
};
};
SOURCE(4503, 1268)
SOURCE(4509, 35)
alternate←v5508 = (word) TryName←P1692(userFSF←v5408, scale←v8184, (word) (( (bPt) &var←c32940)+16)/* var←c30348 */ );
SOURCE(4546, 24)
if ((alternate←v5508 != 0)) {
SOURCE(4570, 10)
goto lab←L100015;
};
SOURCE(4582, 37)
alternate←v5508 = (word) TryName←P1692(userFSF←v5408, (scale←v8184 + 1), (word) (( (bPt) &var←c32940)+16)/* var←c30348 */ )
;
SOURCE(4621, 24)
if ((alternate←v5508 != 0)) {
SOURCE(4645, 10)
goto lab←L100015;
};
SOURCE(4657, 83)
if ((scale←v8184 > 0)) {
SOURCE(4677, 37)
alternate←v5508 = (word) TryName←P1692(userFSF←v5408, (scale←v8184 - 1), (word) (( (bPt) &var←c32940)+16)/* var←c30348 */ )
;
SOURCE(4716, 24)
if ((alternate←v5508 != 0)) {
SOURCE(4740, 10)
goto lab←L100015;
};
};
SOURCE(4755, 240)
{
word var←c30572;
var←c30572 = scale←v8184;
if (((var←c30572 - 4) <= 4)) {
SOURCE(4786, 32)
alternate←v5508 = (word) TryName←P1692(userFSF←v5408, 10, (word) (( (bPt) &var←c32940)+16)/* var←c30348 */ );
goto endif0139;
};
if (((var←c30572 - 9) <= 1)) {
SOURCE(4834, 32)
alternate←v5508 = (word) TryName←P1692(userFSF←v5408, 12, (word) (( (bPt) &var←c32940)+16)/* var←c30348 */ );
goto endif0139;
};
if (((var←c30572 - 14) <= 1)) {
SOURCE(4883, 32)
alternate←v5508 = (word) TryName←P1692(userFSF←v5408, 12, (word) (( (bPt) &var←c32940)+16)/* var←c30348 */ );
goto endif0139;
};
if ((var←c30572 == 16)) {
SOURCE(4923, 32)
alternate←v5508 = (word) TryName←P1692(userFSF←v5408, 18, (word) (( (bPt) &var←c32940)+16)/* var←c30348 */ );
goto endif0139;
};
if ((var←c30572 == 20)) {
SOURCE(4963, 32)
alternate←v5508 = (word) TryName←P1692(userFSF←v5408, 18, (word) (( (bPt) &var←c32940)+16)/* var←c30348 */ );
goto endif0139;
};
endif0139: ;
};
SOURCE(5006, 24)
if ((alternate←v5508 != 0)) {
SOURCE(5030, 10)
goto lab←L100015;
};
SOURCE(5042, 41)
if ((scale←v8184 >= 18)) {
SOURCE(5064, 19)
alternate←v5508 = default←v5464;
SOURCE(5085, 10)
goto lab←L100015;
};
SOURCE(5100, 39)
alternate←v5508 = (word) TryName←P1692((* (( (ptr) gf←c32972)+39) ), scale←v8184, (word) (( (bPt) &var←c32940)+16)/* var←c30348 */ )
;
SOURCE(5141, 24)
if ((alternate←v5508 != 0)) {
SOURCE(5165, 10)
goto lab←L100015;
};
SOURCE(5177, 41)
alternate←v5508 = (word) TryName←P1692((* (( (ptr) gf←c32972)+39) ), (scale←v8184 + 1), (word) (( (bPt) &var←c32940)+16)/* var←c30348 */ )
;
SOURCE(5220, 24)
if ((alternate←v5508 != 0)) {
SOURCE(5244, 10)
goto lab←L100015;
};
SOURCE(5256, 87)
if ((scale←v8184 > 0)) {
SOURCE(5276, 41)
alternate←v5508 = (word) TryName←P1692((* (( (ptr) gf←c32972)+39) ), (scale←v8184 - 1), (word) (( (bPt) &var←c32940)+16)/* var←c30348 */ )
;
SOURCE(5319, 24)
if ((alternate←v5508 != 0)) {
SOURCE(5343, 10)
goto lab←L100015;
};
};
SOURCE(5358, 114)
if ((scale←v8184 == 4)) {
SOURCE(5376, 41)
alternate←v5508 = (word) TryName←P1692((* (( (ptr) gf←c32972)+39) ), 6, (word) (( (bPt) &var←c32940)+16)/* var←c30348 */ )
;
}
else {
SOURCE(5417, 55)
if ((scale←v8184 == 20)) {
SOURCE(5436, 36)
alternate←v5508 = (word) TryName←P1692((* (( (ptr) gf←c32972)+39) ), 18, (word) (( (bPt) &var←c32940)+16)/* var←c30348 */ )
;
};
};
SOURCE(5474, 24)
if ((alternate←v5508 != 0)) {
SOURCE(5498, 10)
goto lab←L100015;
};
SOURCE(5510, 167)
if (((scale←v8184 - 2) <= 15)) {
SOURCE(5537, 140)
{
word var←c30604;
{
word var←c30636;
word var←c30668;
var←c30636 = XR←NewObject(12, (* (( (ptr) gf←c32972)+20) ));
var←c30668 = var←c30636;
(* (ptr) var←c30668 ) = 11;
(* (( (ptr) var←c30668)+1) ) = userFSF←v5408;
(* (( (ptr) var←c30668)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c32972)+20) ));
var←c30668 = (* (( (ptr) var←c30668)+2) );
(* (ptr) var←c30668 ) = 5;
(* (( (ptr) var←c30668)+1) ) = SGNCK(scale←v8184);
var←c30604 = var←c30636;
};
{
word pd140;
pd140 = (* (( (ptr) (* (( (ptr) gf←c32972)+147)/* var←c30700 */ ))+5) );
(void) ( *( (fPt) ((* (ptr) pd140 ))))((* (( (ptr) gf←c32972)+35) ), 0, (* (( (ptr) gf←c32972)+40) ), (* (( (ptr) gf←c32972)+41)
), var←c30604, pd140);
};
};
};
SOURCE(5682, 19)
alternate←v5508 = default←v5464;
SOURCE(5703, 10)
goto lab←L100015;
/* c2c skipped dead code */
lab←L100015: ;
SOURCE(5730, 39)
if ((0 != (* (( (ptr) gf←c32972)+9)/* fontCacheOn←v3812 */ ))) {
SOURCE(5750, 19)
(* (( (ptr) fE←v8128)+1) ) = alternate←v5508;
};
SOURCE(3434, 2337)
return(alternate←v5508);
}
static word TryName←P1692(name←v8288, scale←v8316, formal←c33036)
word name←v8288;
word scale←v8316;
word formal←c33036;
{
register ptr gf←c33004 = (ptr) &globalframe;
word alt←v8360;
word scaleRope←v8500 = 0;
word dashIndex←v8528;
formal←c33036 = (formal←c33036 - 16);
/* TryName: */
SOURCE(3576, 447)
SOURCE(3576, 447)
alt←v8360 = 0;
SOURCE(3674, 37)
{
word pd141;
pd141 = (* (( (ptr) (* (( (ptr) gf←c33004)+138)/* var←c29996 */ ))+11) );
dashIndex←v8528 = (word) ( *( (fPt) ((* (ptr) pd141 ))))(name←v8288, (* (( (ptr) gf←c33004)+46) ), 0, 1, pd141);
};
SOURCE(3714, 24)
if ((scale←v8316 == 0)) {
SOURCE(3732, 6)
return(alt←v8360);
};
SOURCE(3740, 73)
{
word pd142;
pd142 = (* (( (ptr) (* (( (ptr) gf←c33004)+146)/* var←c30444 */ ))+28) );
scaleRope←v8500 = (word) ( *( (fPt) ((* (ptr) pd142 ))))(scale←v8316, 8, 0, pd142);
};
SOURCE(3815, 170)
{
word pd143;
if (( (int)dashIndex←v8528 == (int) (word) -1)) {
pd143 = (* (( (ptr) (* (( (ptr) gf←c33004)+138)/* var←c29996 */ ))+5) );
(* (( (ptr) formal←c33036)+6) ) = (word) ( *( (fPt) ((* (ptr) pd143 ))))((* (( (ptr) gf←c33004)+47) ), name←v8288, scaleRope←v8500, 0, 0, pd143)
;
}
else {
{
word var←c30732;
{
word pd144;
pd144 = (* (( (ptr) (* (( (ptr) gf←c33004)+138)/* var←c29996 */ ))+16) );
var←c30732 = (word) ( *( (fPt) ((* (ptr) pd144 ))))(name←v8288, dashIndex←v8528, 2147483647, scaleRope←v8500, pd144);
};
{
word pd145;
pd145 = (* (( (ptr) (* (( (ptr) gf←c33004)+138)/* var←c29996 */ ))+6) );
(* (( (ptr) formal←c33036)+6) ) = (word) ( *( (fPt) ((* (ptr) pd145 ))))((* (( (ptr) gf←c33004)+47) ), var←c30732, pd145)
;
};
};
};
};
SOURCE(3987, 36)
alt←v8360 = (word) FindScaledFont←P240((* (( (ptr) formal←c33036)+6) ), scale←v8316);
SOURCE(3576, 447)
return(alt←v8360);
}
static word CreateFontData←P360()
{
register ptr gf←c33068 = (ptr) &globalframe;
word data←v5568;
/* CreateFontData: */
SOURCE(5781, 111)
SOURCE(5781, 111)
data←v5568 = 0;
SOURCE(5838, 28)
{
word var←c30764;
var←c30764 = XR←NewObject(64, (* (( (ptr) gf←c33068)+16) ));
(* (( (ptr) var←c30764)+6) ) = (* (ptr) &fc122 );
(* (( (ptr) var←c30764)+7) ) = (* (ptr) &fc122 );
(* (( (ptr) var←c30764)+8) ) = (* (ptr) &fc122 );
data←v5568 = var←c30764;
};
SOURCE(5868, 24)
(* (( (ptr) data←v5568)+13) ) = 1;
SOURCE(5781, 111)
return(data←v5568);
}
static word CopyFontData←P420(data←v5628, oldCopy←v5656)
word data←v5628;
word oldCopy←v5656;
{
register ptr gf←c33100 = (ptr) &globalframe;
word newCopy←v5700;
/* CopyFontData: */
SOURCE(5936, 290)
SOURCE(5936, 290)
newCopy←v5700 = 0;
SOURCE(6036, 59)
if ((oldCopy←v5656 != 0)) {
newCopy←v5700 = oldCopy←v5656;
}
else {
newCopy←v5700 = (word) CreateFontData←P360();
};
SOURCE(6097, 33)
if ((data←v5628 != 0)) {
SOURCE(6114, 16)
(* (W16Pt) newCopy←v5700 ) = (* (W16Pt) data←v5628 );
};
SOURCE(6132, 94)
if (((* (( (ptr) newCopy←v5700)+5) ) != 0)) {
SOURCE(6162, 64)
{
word pd146;
pd146 = (* (( (ptr) (* (( (ptr) gf←c33100)+140)/* var←c30060 */ ))+6) );
(* (( (ptr) newCopy←v5700)+5) ) = (word) ( *( (fPt) ((* (ptr) pd146 ))))((* ((( (ptr) newCopy←v5700)+5)) ), pd146);
};
};
SOURCE(5936, 290)
return(newCopy←v5700);
}
static word InitFontData←P480(data←v5760)
word data←v5760;
{
word newData←v5804;
/* InitFontData: */
SOURCE(6231, 124)
SOURCE(6231, 124)
newData←v5804 = 0;
SOURCE(6306, 14)
newData←v5804 = data←v5760;
SOURCE(6322, 33)
if ((newData←v5804 != 0)) {
SOURCE(6342, 13)
XR←FillWords(&(* (W16Pt) (newData←v5804)), 16, 0);
(* (( (ptr) newData←v5804)+6) ) = (* (ptr) &fc122 );
(* (( (ptr) newData←v5804)+7) ) = (* (ptr) &fc122 );
(* (( (ptr) newData←v5804)+8) ) = (* (ptr) &fc122 );
};
SOURCE(6231, 124)
return(newData←v5804);
}
static word ParseFontData←P540(data←v5864, formal←c0509, formal←c0510, formal←c0511, formal←c0512, formal←c0513, formal←c0514, formal←c0515, formal←c0516, formal←c0517)
word data←v5864;
word formal←c0509;
word formal←c0510;
word formal←c0511;
word formal←c0512;
word formal←c0513;
word formal←c0514;
word formal←c0515;
word formal←c0516;
word formal←c0517;
{
W18 var←c33132;
/* declaration of inStream←v5892 skipped */
/* declaration of literalP←v5920 skipped */
/* declaration of prefixP←v5948 skipped */
/* declaration of familyP←v5976 skipped */
/* declaration of faceP←v6004 skipped */
/* declaration of transformP←v6032 skipped */
/* declaration of scaleP←v6060 skipped */
/* declaration of storedSizeP←v6088 skipped */
/* declaration of designSizeP←v6116 skipped */
register ptr gf←c33164 = (ptr) &globalframe;
word newData←v6160;
/* declaration of var←c30796 skipped */
/* declaration of scratchData←v8600 skipped */
/* declaration of errorRope←v8628 skipped */
(* (( (ptr) &var←c33132)+4)/* inStream←v5892 */ ) = formal←c0509;
(* (( (ptr) &var←c33132)+5)/* literalP←v5920 */ ) = formal←c0510;
(* (( (ptr) &var←c33132)+6)/* prefixP←v5948 */ ) = formal←c0511;
(* (( (ptr) &var←c33132)+7)/* familyP←v5976 */ ) = formal←c0512;
(* (( (ptr) &var←c33132)+8)/* faceP←v6004 */ ) = formal←c0513;
(* (( (ptr) &var←c33132)+9)/* transformP←v6032 */ ) = formal←c0514;
(* (( (ptr) &var←c33132)+10)/* scaleP←v6060 */ ) = formal←c0515;
(* (( (ptr) &var←c33132)+11)/* storedSizeP←v6088 */ ) = formal←c0516;
(* (( (ptr) &var←c33132)+12)/* designSizeP←v6116 */ ) = formal←c0517;
/* ParseFontData: */
SOURCE(6398, 2971)
{
word tmpAddr147;
tmpAddr147 = (word) (( (ptr) &var←c33132)+13)/* var←c30796 */ ;
(* (ptr) tmpAddr147 ) = ( ((word) (fPt) Inner←P1800) );
(* (( (ptr) tmpAddr147) + 1) ) = 1;
};
SOURCE(6398, 2971)
newData←v6160 = 0;
SOURCE(8586, 40)
(* (( (ptr) &var←c33132)+15)/* scratchData←v8600 */ ) = (word) CreateFontData←P360();
SOURCE(8628, 26)
(* (( (ptr) &var←c33132)+16)/* errorRope←v8628 */ ) = 0;
SOURCE(8656, 713)
SOURCE(8662, 53)
if ((data←v5864 == 0)) {
newData←v6160 = (word) CreateFontData←P360();
}
else {
newData←v6160 = data←v5864;
};
SOURCE(8736, 23)
(* (W16Pt) (* (( (ptr) &var←c33132)+15)/* scratchData←v8600 */ ) ) = (* (W16Pt) newData←v6160 );
SOURCE(8827, 278)
{
/* declaration of var←c07 skipped */
{
word var←c08;
{
word var←c0477;
var←c0477 = (word) &var←c33132;
var←c08 = (word) XR←Enable(( ((word) (fPt) NoName←Q2964) ), ( ((word) (fPt) NoName←Q3984) ), var←c0477);
};
if ((var←c08 == 4)) {
goto lab←L100017;
};
};
(* (( (ptr) &var←c33132)+16)/* errorRope←v8628 */ ) = (* (( (ptr) &var←c33132)+17)/* var←c07 */ );
};
SOURCE(9124, 22)
if (((* (( (ptr) &var←c33132)+16)/* errorRope←v8628 */ ) != 0)) {
SOURCE(9146, 10)
goto lab←L100017;
};
SOURCE(9158, 92)
if ((0 != (* (( (ptr) &var←c33132)+5)/* literalP←v5920 */ ))) {
SOURCE(9175, 39)
(void) UserDataFromFontData←P900((* ((( (ptr) &var←c33132)+15)/* scratchData←v8600 */ ) ));
}
else {
SOURCE(9214, 36)
(void) LiteralDataFromFontData←P840((* ((( (ptr) &var←c33132)+15)/* scratchData←v8600 */ ) ));
};
SOURCE(9253, 23)
(* (W16Pt) newData←v6160 ) = (* (W16Pt) (* (( (ptr) &var←c33132)+15)/* scratchData←v8600 */ ) );
goto lab←L100020;
lab←L100017: ;
SOURCE(9293, 74)
{
word var←c30860;
{
word pd148;
pd148 = (* (( (ptr) (* (( (ptr) gf←c33164)+138)/* var←c29996 */ ))+6) );
var←c30860 = (word) ( *( (fPt) ((* (ptr) pd148 ))))((* (( (ptr) &var←c33132)+16)/* errorRope←v8628 */ ), (* (( (ptr) gf←c33164)+54)
), pd148);
};
{
word var←c0161;
var←c0161 = var←c30860;
(void) XR←RaiseError((word) (( (bPt) gf←c33164)+336)/* var←c28844 */ , (word) &var←c0161);
};
};
lab←L100020: ;
SOURCE(6398, 2971)
return(newData←v6160);
}
static word NoName←Q2964(formal←c0432)
word formal←c0432;
{
SOURCE(8827, 278)
(* (( (ptr) formal←c0432)+17) ) = (word) Inner←P1800((word) ((( (bPt) formal←c0432)+52)));
return(0);
}
static word Inner←P1800(formal←c33260)
word formal←c33260;
{
W9 var←c33196;
register ptr gf←c33228 = (ptr) &globalframe;
word error←v8704;
formal←c33260 = (formal←c33260 - 52);
(* (ptr) &var←c33196 ) = formal←c33260;
/* Inner: */
SOURCE(6596, 1950)
SOURCE(6596, 1950)
error←v8704 = 0;
SOURCE(6639, 1437)
if ((0 != (* (( (ptr) formal←c33260)+5) ))) {
SOURCE(6658, 64)
{
word var←c30892;
W2 var←c0164;
{
word pd149;
pd149 = (* (( (ptr) (* (( (ptr) gf←c33228)+137)/* var←c29964 */ ))+89) );
(void) ( *( (fPt) ((* (ptr) pd149 ))))((word) &var←c0164, (* (( (ptr) formal←c33260)+4) ), (* (( (ptr) (* (( (ptr) gf←c33228)+137)
/* var←c29964 */ ))+88) ), pd149);
};
var←c30892 = var←c0164.f0;
(* (ptr) (* (( (ptr) formal←c33260)+15) ) ) = var←c30892;
};
SOURCE(6754, 61)
{
word var←c30924;
{
word pd150;
pd150 = (* (( (ptr) (* (( (ptr) gf←c33228)+149)/* var←c30956 */ ))+18) );
var←c30924 = (word) ( *( (fPt) ((* (ptr) pd150 ))))((* (ptr) ((* (( (ptr) formal←c33260)+15) )) ), pd150);
};
(* (( (ptr) (* (( (ptr) formal←c33260)+15) ))+1) ) = var←c30924;
};
SOURCE(6837, 64)
{
word var←c30988;
{
word pd151;
pd151 = (* (( (ptr) (* (( (ptr) gf←c33228)+149)/* var←c30956 */ ))+12) );
var←c30988 = (word) ( *( (fPt) ((* (ptr) pd151 ))))((* (ptr) (* (( (ptr) formal←c33260)+15) ) ), 47, pd151);
};
(* (( (ptr) (* (( (ptr) formal←c33260)+15) ))+2) ) = var←c30988;
};
}
else {
SOURCE(6926, 1152)
{
word lit←v8732;
W2 var←c0168;
SOURCE(6928, 54)
{
word pd152;
pd152 = (* (( (ptr) (* (( (ptr) gf←c33228)+137)/* var←c29964 */ ))+89) );
(void) ( *( (fPt) ((* (ptr) pd152 ))))((word) &var←c0168, (* (( (ptr) formal←c33260)+4) ), (* (( (ptr) (* (( (ptr) gf←c33228)+137)
/* var←c29964 */ ))+88) ), pd152);
};
lit←v8732 = var←c0168.f0;
SOURCE(7013, 114)
if ((0 != (* (( (ptr) formal←c33260)+6) ))) {
SOURCE(7031, 45)
{
word var←c31020;
{
word pd153;
pd153 = (* (( (ptr) (* (( (ptr) gf←c33228)+149)/* var←c30956 */ ))+18) );
var←c31020 = (word) ( *( (fPt) ((* (ptr) pd153 ))))(lit←v8732, pd153);
};
(* (( (ptr) (* (( (ptr) formal←c33260)+15) ))+1) ) = var←c31020;
};
SOURCE(7098, 29)
{
word pd154;
pd154 = (* (( (ptr) (* (( (ptr) gf←c33228)+149)/* var←c30956 */ ))+12) );
lit←v8732 = (word) ( *( (fPt) ((* (ptr) pd154 ))))(lit←v8732, 47, pd154);
};
};
SOURCE(7147, 219)
if ((0 != (* (( (ptr) formal←c33260)+7) ))) {
SOURCE(7165, 25)
(* (( (ptr) (* (( (ptr) formal←c33260)+15) ))+3) ) = lit←v8732;
SOURCE(7207, 36)
{
word var←c31052;
var←c31052 = (word) Before←P1020(lit←v8732, 45);
(* (( (ptr) (* (( (ptr) formal←c33260)+15) ))+4) ) = var←c31052;
};
SOURCE(7256, 110)
{
word pd156;
if (((* (( (ptr) (* (( (ptr) formal←c33260)+15) ))+4) ) == 0)) { goto then0155;};
pd156 = (* (( (ptr) (* (( (ptr) gf←c33228)+138)/* var←c29996 */ ))+14) );
if (( (int)(word) ( *( (fPt) ((* (ptr) pd156 ))))((* ((( (ptr) (* (( (ptr) formal←c33260)+15) ))+4)) ), pd156) == (int)0)) {
then0155: ;
SOURCE(7320, 46)
return((* (( (ptr) gf←c33228)+55) ));
};
};
};
SOURCE(7372, 669)
if ((0 != (* (( (ptr) formal←c33260)+8) ))) {
SOURCE(7386, 657)
{
word faceRope←v8776 = 0;
/* declaration of faceS←v8804 skipped */
SOURCE(7451, 58)
{
word var←c31084;
var←c31084 = (word) After←P1080((* (( (ptr) (* (( (ptr) formal←c33260)+15) ))+3) ), 45);
{
word pd157;
pd157 = (* (( (ptr) (* (( (ptr) gf←c33228)+137)/* var←c29964 */ ))+33) );
(* (( (ptr) &var←c33196)+4)/* faceS←v8804 */ ) = (word) ( *( (fPt) ((* (ptr) pd157 ))))(var←c31084, 0, pd157);
};
};
SOURCE(7520, 65)
{
/* declaration of var←c09 skipped */
/* declaration of var←c010 skipped */
/* declaration of var←c011 skipped */
SOURCE(7520, 65)
(* (( (ptr) &var←c33196)+5)/* var←c09 */ ) = (* (( (ptr) (* (( (ptr) gf←c33228)+137)/* var←c29964 */ ))+88) );
(* (( (ptr) &var←c33196)+6)/* var←c010 */ ) = (* (( (ptr) (* (( (ptr) gf←c33228)+137)/* var←c29964 */ ))+89) );
{
word var←c012;
{
word var←c0478;
var←c0478 = (word) &var←c33196;
var←c012 = (word) XR←Enable(( ((word) (fPt) NoName←Q3024) ), ( ((word) (fPt) NoName←Q3924) ), var←c0478);
};
if ((var←c012 == 5)) {
goto lab←L100022;
};
};
faceRope←v8776 = (* (W2Pt) (( (ptr) &var←c33196)+7)/* var←c011 */ ).f0;
lab←L100022: ;
};
SOURCE(7631, 173)
{
register word boldRope←v8848;
boldRope←v8848 = (* (( (ptr) gf←c33228)+4)/* boldList←v3532 */ );
lab←L100028: ;
if ((boldRope←v8848 != 0)) {
}
else {
goto lab←L100025;
};
SOURCE(7706, 25)
if ((0 != (* (( (ptr) (* (( (ptr) formal←c33260)+15) ))+10) ))) {
SOURCE(7731, 4)
goto lab←L100026;
};
SOURCE(7737, 67)
{
word var←c31116;
{
word pd158;
pd158 = (* (( (ptr) (* (( (ptr) gf←c33228)+138)/* var←c29996 */ ))+11) );
var←c31116 = (unsigned) ( (int)(word) ( *( (fPt) ((* (ptr) pd158 ))))(faceRope←v8776, (* (ptr) boldRope←v8848 ), 0, 0, pd158)
!= (int) (word) -1);
};
(* (( (ptr) (* (( (ptr) formal←c33260)+15) ))+10) ) = var←c31116;
};
boldRope←v8848 = (* (( (ptr) boldRope←v8848)+1) );
goto lab←L100028;
lab←L100025: ;
lab←L100026: ;
};
SOURCE(7815, 187)
{
register word italicRope←v8976;
italicRope←v8976 = (* (( (ptr) gf←c33228)+5)/* italicList←v3560 */ );
lab←L100032: ;
if ((italicRope←v8976 != 0)) {
}
else {
goto lab←L100029;
};
SOURCE(7898, 27)
if ((0 != (* (( (ptr) (* (( (ptr) formal←c33260)+15) ))+11) ))) {
SOURCE(7925, 4)
goto lab←L100030;
};
SOURCE(7931, 71)
{
word var←c31148;
{
word pd159;
pd159 = (* (( (ptr) (* (( (ptr) gf←c33228)+138)/* var←c29996 */ ))+11) );
var←c31148 = (unsigned) ( (int)(word) ( *( (fPt) ((* (ptr) pd159 ))))(faceRope←v8776, (* (ptr) italicRope←v8976 ), 0, 0, pd159)
!= (int) (word) -1);
};
(* (( (ptr) (* (( (ptr) formal←c33260)+15) ))+11) ) = var←c31148;
};
italicRope←v8976 = (* (( (ptr) italicRope←v8976)+1) );
goto lab←L100032;
lab←L100029: ;
lab←L100030: ;
};
SOURCE(8013, 28)
(* (( (ptr) (* (( (ptr) formal←c33260)+15) ))+12) ) = 1;
};
};
SOURCE(8046, 30)
(* (( (ptr) (* (( (ptr) formal←c33260)+15) ))+9) ) = 1;
};
};
SOURCE(8081, 92)
if ((0 != (* (( (ptr) formal←c33260)+9) ))) {
SOURCE(8100, 73)
{
word var←c31180;
{
word pd160;
pd160 = (* (( (ptr) (* (( (ptr) gf←c33228)+148)/* var←c30828 */ ))+22) );
var←c31180 = (word) ( *( (fPt) ((* (ptr) pd160 ))))((* ((( (ptr) formal←c33260)+4)) ), pd160);
};
(* (( (ptr) (* (( (ptr) formal←c33260)+15) ))+5) ) = var←c31180;
};
};
SOURCE(8175, 99)
if ((0 != (* (( (ptr) formal←c33260)+10) ))) {
SOURCE(8190, 84)
{
word var←c31212;
{
W2 var←c0181;
word var←c31244;
{
word pd161;
pd161 = (* (( (ptr) (* (( (ptr) gf←c33228)+137)/* var←c29964 */ ))+89) );
(void) ( *( (fPt) ((* (ptr) pd161 ))))((word) &var←c0181, (* (( (ptr) formal←c33260)+4) ), (* (( (ptr) (* (( (ptr) gf←c33228)+137)
/* var←c29964 */ ))+88) ), pd161);
};
var←c31244 = var←c0181.f0;
{
word pd162;
pd162 = (* (( (ptr) (* (( (ptr) gf←c33228)+146)/* var←c30444 */ ))+12) );
var←c31212 = (word) ( *( (fPt) ((* (ptr) pd162 ))))(var←c31244, pd162);
};
};
(* (( (ptr) (* (( (ptr) formal←c33260)+15) ))+6) ) = var←c31212;
};
};
SOURCE(8301, 109)
if ((0 != (* (( (ptr) formal←c33260)+11) ))) {
SOURCE(8321, 89)
{
word var←c31276;
{
W2 var←c0184;
word var←c31308;
{
word pd163;
pd163 = (* (( (ptr) (* (( (ptr) gf←c33228)+137)/* var←c29964 */ ))+89) );
(void) ( *( (fPt) ((* (ptr) pd163 ))))((word) &var←c0184, (* (( (ptr) formal←c33260)+4) ), (* (( (ptr) (* (( (ptr) gf←c33228)+137)
/* var←c29964 */ ))+88) ), pd163);
};
var←c31308 = var←c0184.f0;
{
word pd164;
pd164 = (* (( (ptr) (* (( (ptr) gf←c33228)+146)/* var←c30444 */ ))+12) );
var←c31276 = (word) ( *( (fPt) ((* (ptr) pd164 ))))(var←c31308, pd164);
};
};
(* (( (ptr) (* (( (ptr) formal←c33260)+15) ))+7) ) = var←c31276;
};
};
SOURCE(8437, 109)
if ((0 != (* (( (ptr) formal←c33260)+12) ))) {
SOURCE(8457, 89)
{
word var←c31340;
{
W2 var←c0187;
word var←c31372;
{
word pd165;
pd165 = (* (( (ptr) (* (( (ptr) gf←c33228)+137)/* var←c29964 */ ))+89) );
(void) ( *( (fPt) ((* (ptr) pd165 ))))((word) &var←c0187, (* (( (ptr) formal←c33260)+4) ), (* (( (ptr) (* (( (ptr) gf←c33228)+137)
/* var←c29964 */ ))+88) ), pd165);
};
var←c31372 = var←c0187.f0;
{
word pd166;
pd166 = (* (( (ptr) (* (( (ptr) gf←c33228)+146)/* var←c30444 */ ))+12) );
var←c31340 = (word) ( *( (fPt) ((* (ptr) pd166 ))))(var←c31372, pd166);
};
};
(* (( (ptr) (* (( (ptr) formal←c33260)+15) ))+8) ) = var←c31340;
};
};
SOURCE(6596, 1950)
return(error←v8704);
}
static word NoName←Q3024(formal←c0435)
word formal←c0435;
{
SOURCE(7520, 65)
{
word pd167;
pd167 = (* (( (ptr) formal←c0435)+6) );
(void) ( *( (fPt) ((* (ptr) pd167 ))))((word) (( (bPt) formal←c0435)+28), (* (( (ptr) formal←c0435)+4) ), (* (( (ptr) formal←c0435)+5)
), pd167);
};
return(0);
}
static word FontDataFromFont←P600(font←v6220)
word font←v6220;
{
register ptr gf←c33292 = (ptr) &globalframe;
word newData←v6264;
/* FontDataFromFont: */
SOURCE(9378, 455)
SOURCE(9378, 455)
newData←v6264 = 0;
SOURCE(9464, 26)
newData←v6264 = (word) CreateFontData←P360();
SOURCE(9492, 39)
{
word pd168;
pd168 = (* (( (ptr) (* (( (ptr) gf←c33292)+141)/* var←c30124 */ ))+19) );
(* (ptr) newData←v6264 ) = (word) ( *( (fPt) ((* (ptr) pd168 ))))(font←v6220, pd168);
};
SOURCE(9563, 53)
{
word pd169;
pd169 = (* (( (ptr) (* (( (ptr) gf←c33292)+149)/* var←c30956 */ ))+18) );
(* (( (ptr) newData←v6264)+1) ) = (word) ( *( (fPt) ((* (ptr) pd169 ))))((* (ptr) (newData←v6264) ), pd169);
};
SOURCE(9638, 56)
{
word pd170;
pd170 = (* (( (ptr) (* (( (ptr) gf←c33292)+149)/* var←c30956 */ ))+12) );
(* (( (ptr) newData←v6264)+2) ) = (word) ( *( (fPt) ((* (ptr) pd170 ))))((* (ptr) newData←v6264 ), 47, pd170);
};
SOURCE(9713, 37)
(* (( (ptr) newData←v6264)+5) ) = (* (ptr) font←v6220 );
SOURCE(9752, 24)
(* (( (ptr) newData←v6264)+7) ) = (* (ptr) &fc122 );
SOURCE(9778, 24)
(* (( (ptr) newData←v6264)+8) ) = (* (ptr) &fc122 );
SOURCE(9804, 29)
(void) UserDataFromFontData←P900(newData←v6264);
SOURCE(9378, 455)
return(newData←v6264);
}
static word FontDataFromNamelessFont←P660(font←v6324)
word font←v6324;
{
register ptr gf←c33324 = (ptr) &globalframe;
word newData←v6368;
word newFont←v9104;
/* FontDataFromNamelessFont: */
SOURCE(9839, 306)
SOURCE(9839, 306)
newData←v6368 = 0;
SOURCE(9933, 126)
{
word var←c31404;
word var←c31436;
{
word pd171;
pd171 = (* (( (ptr) (* (( (ptr) gf←c33324)+140)/* var←c30060 */ ))+7) );
var←c31404 = (word) ( *( (fPt) ((* (ptr) pd171 ))))((* (ptr) (&fc122) ), pd171);
};
var←c31436 = XR←NewObject(8, (* (( (ptr) gf←c33324)+14) ));
(* (ptr) var←c31436 ) = var←c31404;
(* (( (ptr) var←c31436)+1) ) = (* (( (ptr) font←v6324)+1) );
newFont←v9104 = var←c31436;
};
SOURCE(10061, 26)
newData←v6368 = (word) CreateFontData←P360();
SOURCE(10089, 24)
(* (( (ptr) newData←v6368)+7) ) = (* (ptr) &fc122 );
SOURCE(10115, 30)
(* (( (ptr) newData←v6368)+15) ) = newFont←v9104;
SOURCE(9839, 306)
return(newData←v6368);
}
static word DigitProc←P720(char←v15336)
word char←v15336;
{
word var←c15380;
/* DigitProc: */
SOURCE(10152, 175)
SOURCE(10180, 147)
{
word var←c31468;
var←c31468 = char←v15336;
switch (var←c31468) {
case 10: case 13: case 9: case 32:
SOURCE(10228, 14)
return(0);
case 48: case 49: case 50: case 51: case 52: case 53: case 54: case 55: case 56: case 57:
SOURCE(10286, 14)
return(0);
default:
SOURCE(10313, 14)
return(2);
};
};
}
static word NonDigitProc←P780(char←v15440)
word char←v15440;
{
word var←c15484;
/* NonDigitProc: */
SOURCE(10333, 131)
SOURCE(10364, 100)
{
word var←c31500;
var←c31500 = char←v15440;
switch (var←c31500) {
case 48: case 49: case 50: case 51: case 52: case 53: case 54: case 55: case 56: case 57:
SOURCE(10423, 14)
return(2);
default:
SOURCE(10450, 14)
return(0);
};
};
}
static void LiteralDataFromFontData←P840(data←v6428)
word data←v6428;
{
W8 var←c33356;
register ptr gf←c33388 = (ptr) &globalframe;
/* declaration of var←c31532 skipped */
/* declaration of scratchData←v9176 skipped */
/* declaration of errorRope←v9204 skipped */
/* LiteralDataFromFontData: */
SOURCE(10471, 2887)
{
word tmpAddr172;
tmpAddr172 = (word) (( (ptr) &var←c33356)+4)/* var←c31532 */ ;
(* (ptr) tmpAddr172 ) = ( ((word) (fPt) Inner←P2052) );
(* (( (ptr) tmpAddr172) + 1) ) = 1;
};
SOURCE(12731, 40)
var←c33356.f6/* scratchData←v9176 */ = (word) CreateFontData←P360();
SOURCE(12773, 20)
var←c33356.f7/* errorRope←v9204 */ = 0;
SOURCE(12795, 563)
SOURCE(12801, 61)
if ((data←v6428 == 0)) {
SOURCE(12818, 44)
{
word var←c0206;
var←c0206 = (* (( (ptr) gf←c33388)+57) );
(void) XR←RaiseError((word) (( (bPt) gf←c33388)+336)/* var←c28844 */ , (word) &var←c0206);
};
};
SOURCE(12864, 20)
(* (W16Pt) var←c33356.f6/* scratchData←v9176 */ ) = (* (W16Pt) data←v6428 );
SOURCE(12952, 266)
{
word var←c013;
{
word var←c0479;
var←c0479 = (word) &var←c33356;
var←c013 = (word) XR←Enable(( ((word) (fPt) NoName←Q3084) ), ( ((word) (fPt) NoName←Q3864) ), var←c0479);
};
if ((var←c013 == 6)) {
goto lab←L100033;
};
};
SOURCE(13236, 20)
(* (W16Pt) data←v6428 ) = (* (W16Pt) var←c33356.f6/* scratchData←v9176 */ );
goto lab←L100036;
lab←L100033: ;
SOURCE(13273, 83)
{
word var←c31564;
{
word pd173;
pd173 = (* (( (ptr) (* (( (ptr) gf←c33388)+138)/* var←c29996 */ ))+6) );
var←c31564 = (word) ( *( (fPt) ((* (ptr) pd173 ))))(var←c33356.f7/* errorRope←v9204 */ , (* (( (ptr) gf←c33388)+58) ), pd173)
;
};
{
word var←c0208;
var←c0208 = var←c31564;
(void) XR←RaiseError((word) (( (bPt) gf←c33388)+336)/* var←c28844 */ , (word) &var←c0208);
};
};
lab←L100036: ;
}
static word NoName←Q3084(formal←c0439)
word formal←c0439;
{
SOURCE(12952, 266)
(void) Inner←P2052((word) ((( (bPt) formal←c0439)+16)));
return(0);
}
static void Inner←P2052(formal←c33484)
word formal←c33484;
{
W6 var←c33420;
register ptr gf←c33452 = (ptr) &globalframe;
/* declaration of var←c31596 skipped */
word pressPrefix←v9292;
word fisPrefix←v9320;
word printPrefix←v9348;
word screenPrefix←v9376;
word faceRope←v9404 = 0;
formal←c33484 = (formal←c33484 - 16);
var←c33420.f0 = formal←c33484;
/* Inner: */
SOURCE(10529, 2196)
{
word tmpAddr174;
tmpAddr174 = (word) (( (ptr) &var←c33420)+4)/* var←c31596 */ ;
(* (ptr) tmpAddr174 ) = ( ((word) (fPt) HasEndDigits←P2112) );
(* (( (ptr) tmpAddr174) + 1) ) = 1;
};
SOURCE(10987, 44)
pressPrefix←v9292 = (* (( (ptr) gf←c33452)+59) );
SOURCE(11033, 43)
fisPrefix←v9320 = (* (( (ptr) gf←c33452)+60) );
SOURCE(11078, 41)
printPrefix←v9348 = (* (( (ptr) gf←c33452)+61) );
SOURCE(11121, 45)
screenPrefix←v9376 = (* (( (ptr) gf←c33452)+47) );
{
word tc175;
word pd176;
word pd178;
pd176 = (* (( (ptr) (* (( (ptr) gf←c33452)+138)/* var←c29996 */ ))+8) );
if ((0 != (word) ( *( (fPt) ((* (ptr) pd176 ))))((* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+1) ), pressPrefix←v9292, 0, pd176)
)) { goto then0177;};
pd178 = (* (( (ptr) (* (( (ptr) gf←c33452)+138)/* var←c29996 */ ))+8) );
if ((0 != (word) ( *( (fPt) ((* (ptr) pd178 ))))((* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+1) ), fisPrefix←v9320, 0, pd178)
)) {
then0177: ;
tc175 = (word) (0 != (* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+12) ));
}
else {
tc175 = (word) 0;
};
if (tc175) {
SOURCE(11342, 186)
if ( ( (0 != (* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+10) )) ? (0 != (* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+11)
)) : 0 ) ) {
faceRope←v9404 = (* (( (ptr) gf←c33452)+62) );
goto endif0179;
};
if ((0 != (* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+10) ))) {
faceRope←v9404 = (* (( (ptr) gf←c33452)+63) );
goto endif0179;
};
if ((0 != (* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+11) ))) {
faceRope←v9404 = (* (( (ptr) gf←c33452)+64) );
goto endif0179;
};
if ((0 != (word) HasEndDigits←P2112((word) ((( (bPt) &var←c33420)+16)/* var←c31596 */ )))) {
faceRope←v9404 = (* (( (ptr) gf←c33452)+65) );
goto endif0179;
};
faceRope←v9404 = (* (( (ptr) gf←c33452)+66) );
goto endif0179;
endif0179: ;
}
else {
{
word tc180;
word pd181;
pd181 = (* (( (ptr) (* (( (ptr) gf←c33452)+138)/* var←c29996 */ ))+8) );
if ((0 != (word) ( *( (fPt) ((* (ptr) pd181 ))))((* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+1) ), printPrefix←v9348, 0, pd181)
)) {
tc180 = (word) (0 != (* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+12) ));
}
else {
tc180 = (word) 0;
};
if (tc180) {
SOURCE(11615, 163)
if ( ( (0 != (* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+10) )) ? (0 != (* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+11)
)) : 0 ) ) {
faceRope←v9404 = (* (( (ptr) gf←c33452)+67) );
goto endif0182;
};
if ((0 != (* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+10) ))) {
faceRope←v9404 = (* (( (ptr) gf←c33452)+68) );
goto endif0182;
};
if ((0 != (* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+11) ))) {
faceRope←v9404 = (* (( (ptr) gf←c33452)+69) );
goto endif0182;
};
faceRope←v9404 = (* (( (ptr) gf←c33452)+65) );
goto endif0182;
endif0182: ;
}
else {
{
word pd183;
pd183 = (* (( (ptr) (* (( (ptr) gf←c33452)+138)/* var←c29996 */ ))+8) );
if ((0 != (word) ( *( (fPt) ((* (ptr) pd183 ))))((* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+1) ), screenPrefix←v9376, 0, pd183)
)) {
SOURCE(11839, 667)
{
word storedSize←v9508;
word nameStream←v9536;
SOURCE(11881, 22)
storedSize←v9508 = (* (ptr) &fc184 );
SOURCE(11905, 51)
{
word pd185;
pd185 = (* (( (ptr) (* (( (ptr) gf←c33452)+137)/* var←c29964 */ ))+33) );
nameStream←v9536 = (word) ( *( (fPt) ((* (ptr) pd185 ))))((* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+3) ), 0, pd185);
};
SOURCE(11984, 43)
{
W2 var←c31628;
{
/*1*/ word pd186;
/*1*/ pd186 = (* (( (ptr) (* (( (ptr) gf←c33452)+137)/* var←c29964 */ ))+89) );
/*1*/ (void) ( *( (fPt) ((* (ptr) pd186 ))))((word) &var←c31628, nameStream←v9536, (word) (( (bPt) gf←c33452)+436)/* var←c29260 */ , pd186)
/*1*/ ;
/*1*/ };
};
SOURCE(12065, 82)
{
W2 var←c0220;
word var←c31660;
{
/*1*/ word pd187;
/*1*/ pd187 = (* (( (ptr) (* (( (ptr) gf←c33452)+137)/* var←c29964 */ ))+89) );
/*1*/ (void) ( *( (fPt) ((* (ptr) pd187 ))))((word) &var←c0220, nameStream←v9536, (word) (( (bPt) gf←c33452)+428)/* var←c29228 */ , pd187)
/*1*/ ;
/*1*/ };
var←c31660 = var←c0220.f0;
{
/*1*/ word pd188;
/*1*/ pd188 = (* (( (ptr) (* (( (ptr) gf←c33452)+146)/* var←c30444 */ ))+12) );
/*1*/ storedSize←v9508 = (word) ( *( (fPt) ((* (ptr) pd188 ))))(var←c31660, pd188);
/*1*/ };
};
SOURCE(12177, 108)
{
word pd189;
word x190;
pd189 = (* (( (ptr) (* (( (ptr) gf←c33452)+145)/* var←c30380 */ ))+5) );
if (((float)(int)(word) ( *( (fPt) ((* (ptr) pd189 ))))(storedSize←v9508, pd189) != (
/*1*/ x190 = storedSize←v9508, *(float*)&x190
/*1*/ ))) {
SOURCE(12225, 60)
/*1*/ {
/*1*/ word var←c0221;
/*1*/ var←c0221 = (* (( (ptr) gf←c33452)+70) );
/*1*/ (void) XR←RaiseError((word) (( (bPt) gf←c33452)+336)/* var←c28844 */ , (word) &var←c0221);
/*1*/ };
/*1*/ };
};
SOURCE(12287, 35)
(* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+7) ) = storedSize←v9508;
SOURCE(12362, 142)
if ( ( (0 != (* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+10) )) ? (0 != (* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+11)
)) : 0 ) ) {
faceRope←v9404 = (* (( (ptr) gf←c33452)+71) );
goto endif0191;
};
if ((0 != (* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+10) ))) {
faceRope←v9404 = (* (( (ptr) gf←c33452)+72) );
goto endif0191;
};
if ((0 != (* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+11) ))) {
faceRope←v9404 = (* (( (ptr) gf←c33452)+73) );
goto endif0191;
};
faceRope←v9404 = (* (( (ptr) gf←c33452)+65) );
goto endif0191;
endif0191: ;
};
};
};
};
};
};
};
SOURCE(12527, 119)
{
word var←c31692;
{
word var←c31724;
if ((0 != (word) HasMultiple←P960((* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+4) ), 45))) {
var←c31724 = 0;
}
else {
var←c31724 = faceRope←v9404;
};
{
word pd192;
pd192 = (* (( (ptr) (* (( (ptr) gf←c33452)+138)/* var←c29996 */ ))+6) );
var←c31692 = (word) ( *( (fPt) ((* (ptr) pd192 ))))((* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+4) ), var←c31724, pd192)
;
};
};
(* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+2) ) = var←c31692;
};
SOURCE(12648, 77)
{
word var←c31756;
{
word pd193;
pd193 = (* (( (ptr) (* (( (ptr) gf←c33452)+138)/* var←c29996 */ ))+6) );
var←c31756 = (word) ( *( (fPt) ((* (ptr) pd193 ))))((* (( (ptr) (* (( (ptr) formal←c33484)+6) ))+1) ), (* (( (ptr) (* (( (ptr) formal←c33484)+6)
))+2) ), pd193);
};
(* (ptr) (* (( (ptr) formal←c33484)+6) ) ) = var←c31756;
};
}
static word HasEndDigits←P2112(formal←c33548)
word formal←c33548;
{
W5 var←c33516;
/* declaration of yep←v9480 skipped */
formal←c33548 = (formal←c33548 - 16);
var←c33516.f0 = formal←c33548;
/* HasEndDigits: */
SOURCE(10545, 364)
SOURCE(10545, 364)
var←c33516.f4/* yep←v9480 */ = 0;
SOURCE(10596, 313)
SOURCE(10596, 313)
{
word var←c014;
{
word var←c0480;
var←c0480 = (word) &var←c33516;
var←c014 = (word) XR←Enable(( ((word) (fPt) NoName←Q3144) ), ( ((word) (fPt) NoName←Q3804) ), var←c0480);
};
/* removed trivial cond node */
};
SOURCE(10545, 364)
return(var←c33516.f4/* yep←v9480 */ );
}
static word NoName←Q3144(formal←c0444)
word formal←c0444;
{
register ptr gf←c0443 = (ptr) &globalframe;
SOURCE(10675, 50)
{
word nameStream←v9580;
SOURCE(10675, 50)
{
word pd194;
pd194 = (* (( (ptr) (* (( (ptr) gf←c0443)+137)/* var←c29964 */ ))+33) );
nameStream←v9580 = (word) ( *( (fPt) ((* (ptr) pd194 ))))((* (( (ptr) (* (( (ptr) (* (ptr) (* (ptr) formal←c0444 ) ))+6)
))+4) ), 0, pd194);
};
SOURCE(10751, 43)
{
W2 var←c31788;
{
word pd195;
pd195 = (* (( (ptr) (* (( (ptr) gf←c0443)+137)/* var←c29964 */ ))+89) );
(void) ( *( (fPt) ((* (ptr) pd195 ))))((word) &var←c31788, nameStream←v9580, (word) (( (bPt) gf←c0443)+436)/* var←c29260 */ , pd195)
;
};
};
SOURCE(10833, 76)
{
W2 var←c0230;
word var←c31820;
{
word pd196;
pd196 = (* (( (ptr) (* (( (ptr) gf←c0443)+137)/* var←c29964 */ ))+89) );
(void) ( *( (fPt) ((* (ptr) pd196 ))))((word) &var←c0230, nameStream←v9580, (word) (( (bPt) gf←c0443)+428)/* var←c29228 */ , pd196)
;
};
var←c31820 = var←c0230.f0;
{
word pd197;
pd197 = (* (( (ptr) (* (( (ptr) gf←c0443)+146)/* var←c30444 */ ))+10) );
(* (( (ptr) formal←c0444)+4) ) = (unsigned) ( (int)(word) ( *( (fPt) ((* (ptr) pd197 ))))(var←c31820, 8, pd197) > (int)0);
};
};
};
return(0);
}
static void UserDataFromFontData←P900(formal←c0518)
word formal←c0518;
{
W8 var←c33580;
/* declaration of data←v6488 skipped */
register ptr gf←c33612 = (ptr) &globalframe;
/* declaration of var←c31852 skipped */
/* declaration of errorRope←v9652 skipped */
var←c33580.f4/* data←v6488 */ = formal←c0518;
/* UserDataFromFontData: */
SOURCE(13367, 3744)
{
word tmpAddr198;
tmpAddr198 = (word) (( (ptr) &var←c33580)+5)/* var←c31852 */ ;
(* (ptr) tmpAddr198 ) = ( ((word) (fPt) Inner←P2268) );
(* (( (ptr) tmpAddr198) + 1) ) = 1;
};
SOURCE(16712, 20)
var←c33580.f7/* errorRope←v9652 */ = 0;
SOURCE(16734, 377)
SOURCE(16740, 315)
{
word var←c015;
{
word var←c0481;
var←c0481 = (word) &var←c33580;
var←c015 = (word) XR←Enable(( ((word) (fPt) NoName←Q3204) ), ( ((word) (fPt) NoName←Q3744) ), var←c0481);
};
if ((var←c015 == 8)) {
goto lab←L100041;
};
};
goto lab←L100044;
lab←L100041: ;
SOURCE(17088, 21)
{
word var←c0234;
var←c0234 = var←c33580.f7/* errorRope←v9652 */ ;
(void) XR←RaiseError((word) (( (bPt) gf←c33612)+336)/* var←c28844 */ , (word) &var←c0234);
};
lab←L100044: ;
}
static word NoName←Q3204(formal←c0446)
word formal←c0446;
{
SOURCE(16740, 315)
(void) Inner←P2268((word) ((( (bPt) formal←c0446)+20)));
return(0);
}
static void Inner←P2268(formal←c33708)
word formal←c33708;
{
W9 var←c33644;
register ptr gf←c33676 = (ptr) &globalframe;
word userFace←v9712 = 0;
word literalFace←v9740 = 0;
word pressPrefix←v9768;
word printPrefix←v9796;
word screenPrefix←v9824;
word cmrFamily←v9852;
word dashBold←v9880;
word dashItalic←v9908;
formal←c33708 = (formal←c33708 - 20);
(* (ptr) &var←c33644 ) = formal←c33708;
/* Inner: */
SOURCE(13422, 3255)
SOURCE(13472, 44)
pressPrefix←v9768 = (* (( (ptr) gf←c33676)+59) );
SOURCE(13518, 41)
printPrefix←v9796 = (* (( (ptr) gf←c33676)+61) );
SOURCE(13561, 45)
screenPrefix←v9824 = (* (( (ptr) gf←c33676)+47) );
SOURCE(13608, 28)
cmrFamily←v9852 = (* (( (ptr) gf←c33676)+78) );
SOURCE(13638, 29)
dashBold←v9880 = (* (( (ptr) gf←c33676)+68) );
SOURCE(13669, 33)
dashItalic←v9908 = (* (( (ptr) gf←c33676)+69) );
SOURCE(13705, 48)
if (((* (ptr) (* (( (ptr) formal←c33708)+4) ) ) == 0) || ((* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+2) ) == 0)) {
SOURCE(13753, 5)
(void) XR←RaiseUnnamedError();
};
SOURCE(13760, 48)
{
word var←c31884;
{
word pd199;
pd199 = (* (( (ptr) (* (( (ptr) gf←c33676)+149)/* var←c30956 */ ))+18) );
var←c31884 = (word) ( *( (fPt) ((* (ptr) pd199 ))))((* (ptr) ((* (( (ptr) formal←c33708)+4) )) ), pd199);
};
(* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+1) ) = var←c31884;
};
{
word pd200;
pd200 = (* (( (ptr) (* (( (ptr) gf←c33676)+138)/* var←c29996 */ ))+8) );
if ((0 != (word) ( *( (fPt) ((* (ptr) pd200 ))))((* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+1) ), pressPrefix←v9768, 0, pd200)
)) {
SOURCE(13889, 41)
{
word var←c31916;
var←c31916 = (word) Before←P1020((* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+2) ), 45);
(* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+4) ) = var←c31916;
};
SOURCE(13952, 49)
{
word pd201;
pd201 = (* (( (ptr) (* (( (ptr) gf←c33676)+149)/* var←c30956 */ ))+12) );
literalFace←v9740 = (word) ( *( (fPt) ((* (ptr) pd201 ))))((* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+2) ), 45, pd201)
;
};
SOURCE(14017, 90)
{
word var←c31948;
{
word pd202;
word pd203;
pd202 = (* (( (ptr) (* (( (ptr) gf←c33676)+138)/* var←c29996 */ ))+8) );
if ((0 != (word) ( *( (fPt) ((* (ptr) pd202 ))))(literalFace←v9740, (* (( (ptr) gf←c33676)+42) ), 0, pd202))) {
var←c31948 = (unsigned) 1;
}
else {
pd203 = (* (( (ptr) (* (( (ptr) gf←c33676)+138)/* var←c29996 */ ))+8) );
var←c31948 = (unsigned) (0 != (word) ( *( (fPt) ((* (ptr) pd203 ))))(literalFace←v9740, (* (( (ptr) gf←c33676)+38) ), 0, pd203)
);
};
};
(* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+10) ) = var←c31948;
};
SOURCE(14109, 92)
{
word var←c31980;
{
word pd204;
word pd205;
pd204 = (* (( (ptr) (* (( (ptr) gf←c33676)+138)/* var←c29996 */ ))+8) );
if ((0 != (word) ( *( (fPt) ((* (ptr) pd204 ))))(literalFace←v9740, (* (( (ptr) gf←c33676)+42) ), 0, pd204))) {
var←c31980 = (unsigned) 1;
}
else {
pd205 = (* (( (ptr) (* (( (ptr) gf←c33676)+138)/* var←c29996 */ ))+8) );
var←c31980 = (unsigned) (0 != (word) ( *( (fPt) ((* (ptr) pd205 ))))(literalFace←v9740, (* (( (ptr) gf←c33676)+37) ), 0, pd205)
);
};
};
(* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+11) ) = var←c31980;
};
SOURCE(14203, 21)
(* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+12) ) = 1;
SOURCE(14226, 23)
(* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+9) ) = 1;
SOURCE(14251, 228)
{
word pd207;
word pd208;
word pd209;
word pd210;
pd207 = (* (( (ptr) (* (( (ptr) gf←c33676)+138)/* var←c29996 */ ))+8) );
if ((0 != (word) ( *( (fPt) ((* (ptr) pd207 ))))(literalFace←v9740, (* (( (ptr) gf←c33676)+42) ), 0, pd207))) {
userFace←v9712 = (* (( (ptr) gf←c33676)+81) );
goto endif0206;
};
pd208 = (* (( (ptr) (* (( (ptr) gf←c33676)+138)/* var←c29996 */ ))+8) );
if ((0 != (word) ( *( (fPt) ((* (ptr) pd208 ))))(literalFace←v9740, (* (( (ptr) gf←c33676)+38) ), 0, pd208))) {
userFace←v9712 = (* (( (ptr) gf←c33676)+56) );
goto endif0206;
};
pd209 = (* (( (ptr) (* (( (ptr) gf←c33676)+138)/* var←c29996 */ ))+8) );
if ((0 != (word) ( *( (fPt) ((* (ptr) pd209 ))))(literalFace←v9740, (* (( (ptr) gf←c33676)+37) ), 0, pd209))) {
userFace←v9712 = (* (( (ptr) gf←c33676)+49) );
goto endif0206;
};
pd210 = (* (( (ptr) (* (( (ptr) gf←c33676)+138)/* var←c29996 */ ))+8) );
if ((0 != (word) ( *( (fPt) ((* (ptr) pd210 ))))(literalFace←v9740, (* (( (ptr) gf←c33676)+36) ), 0, pd210))) {
userFace←v9712 = (* (( (ptr) gf←c33676)+65) );
goto endif0206;
};
userFace←v9712 = (* (( (ptr) gf←c33676)+65) );
goto endif0206;
endif0206: ;
};
SOURCE(14481, 49)
{
word var←c32012;
{
word pd211;
pd211 = (* (( (ptr) (* (( (ptr) gf←c33676)+138)/* var←c29996 */ ))+6) );
var←c32012 = (word) ( *( (fPt) ((* (ptr) pd211 ))))((* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+4) ), userFace←v9712, pd211)
;
};
(* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+3) ) = var←c32012;
};
}
else {
{
word pd212;
pd212 = (* (( (ptr) (* (( (ptr) gf←c33676)+138)/* var←c29996 */ ))+8) );
if ((0 != (word) ( *( (fPt) ((* (ptr) pd212 ))))((* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+1) ), printPrefix←v9796, 0, pd212)
)) {
SOURCE(14584, 41)
{
word var←c32044;
var←c32044 = (word) Before←P1020((* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+2) ), 45);
(* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+4) ) = var←c32044;
};
SOURCE(14665, 61)
{
word var←c32076;
{
word pd213;
pd213 = (* (( (ptr) (* (( (ptr) gf←c33676)+138)/* var←c29996 */ ))+11) );
var←c32076 = (unsigned) ( (int)(word) ( *( (fPt) ((* (ptr) pd213 ))))((* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+2) ), dashBold←v9880, 0, 0, pd213)
!= (int) (word) -1);
};
(* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+10) ) = var←c32076;
};
SOURCE(14741, 65)
{
word var←c32108;
{
word pd214;
pd214 = (* (( (ptr) (* (( (ptr) gf←c33676)+138)/* var←c29996 */ ))+11) );
var←c32108 = (unsigned) ( (int)(word) ( *( (fPt) ((* (ptr) pd214 ))))((* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+2) ), dashItalic←v9908, 0, 0, pd214)
!= (int) (word) -1);
};
(* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+11) ) = var←c32108;
};
SOURCE(14823, 21)
(* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+12) ) = 1;
SOURCE(14846, 23)
(* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+9) ) = 1;
SOURCE(14871, 117)
if ( ( (0 != (* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+10) )) ? (0 != (* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+11)
)) : 0 ) ) {
userFace←v9712 = (* (( (ptr) gf←c33676)+81) );
goto endif0215;
};
if ((0 != (* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+10) ))) {
userFace←v9712 = (* (( (ptr) gf←c33676)+56) );
goto endif0215;
};
if ((0 != (* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+11) ))) {
userFace←v9712 = (* (( (ptr) gf←c33676)+49) );
goto endif0215;
};
userFace←v9712 = (* (( (ptr) gf←c33676)+65) );
goto endif0215;
endif0215: ;
SOURCE(14990, 49)
{
word var←c32140;
{
word pd216;
pd216 = (* (( (ptr) (* (( (ptr) gf←c33676)+138)/* var←c29996 */ ))+6) );
var←c32140 = (word) ( *( (fPt) ((* (ptr) pd216 ))))((* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+4) ), userFace←v9712, pd216)
;
};
(* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+3) ) = var←c32140;
};
}
else {
{
word pd217;
pd217 = (* (( (ptr) (* (( (ptr) gf←c33676)+138)/* var←c29996 */ ))+8) );
if ((0 != (word) ( *( (fPt) ((* (ptr) pd217 ))))((* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+1) ), screenPrefix←v9824, 0, pd217)
)) {
SOURCE(15092, 1596)
{
word alphaRope←v9952 = 0;
word faceRope←v9980 = 0;
/* declaration of storedSizeRope←v10008 skipped */
word storedSize←v10036;
/* declaration of nameStream←v10064 skipped */
W2 var←c0257;
SOURCE(15118, 46)
(* (( (ptr) &var←c33644)+4)/* storedSizeRope←v10008 */ ) = 0;
SOURCE(15166, 22)
storedSize←v10036 = (* (ptr) &fc184 );
SOURCE(15225, 47)
{
word pd218;
pd218 = (* (( (ptr) (* (( (ptr) gf←c33676)+137)/* var←c29964 */ ))+33) );
(* (( (ptr) &var←c33644)+5)/* nameStream←v10064 */ ) = (word) ( *( (fPt) ((* (ptr) pd218 ))))((* (( (ptr) (* (( (ptr) formal←c33708)+4)
/*1*/ ))+2) ), 0, pd218);
};
SOURCE(15299, 56)
{
word pd219;
pd219 = (* (( (ptr) (* (( (ptr) gf←c33676)+137)/* var←c29964 */ ))+89) );
(void) ( *( (fPt) ((* (ptr) pd219 ))))((word) &var←c0257, (* (( (ptr) &var←c33644)+5)/* nameStream←v10064 */ ), (word) (
/*1*/ ( (bPt) gf←c33676)+436)/* var←c29260 */ , pd219);
};
alphaRope←v9952 = var←c0257.f0;
SOURCE(15393, 88)
{
/* declaration of var←c016 skipped */
/* declaration of var←c017 skipped */
SOURCE(15393, 88)
(* (( (ptr) &var←c33644)+6)/* var←c016 */ ) = (* (( (ptr) (* (( (ptr) gf←c33676)+137)/* var←c29964 */ ))+89) );
{
/*1*/ word var←c018;
/*1*/ {
/*1*/ word var←c0482;
/*1*/ var←c0482 = (word) &var←c33644;
/*1*/ var←c018 = (word) XR←Enable(( ((word) (fPt) NoName←Q3324) ), ( ((word) (fPt) NoName←Q3684) ), var←c0482);
/*1*/ };
/*1*/ if ((var←c018 == 9)) {
/*1*/ goto lab←L100046;
/*1*/ };
/*1*/ };
(* (( (ptr) &var←c33644)+4)/* storedSizeRope←v10008 */ ) = (* (W2Pt) (( (ptr) &var←c33644)+7)/* var←c017 */ ).f0;
lab←L100046: ;
};
SOURCE(15527, 41)
{
word pd220;
pd220 = (* (( (ptr) (* (( (ptr) gf←c33676)+148)/* var←c30828 */ ))+8) );
faceRope←v9980 = (word) ( *( (fPt) ((* (ptr) pd220 ))))((* ((( (ptr) &var←c33644)+5)/* nameStream←v10064 */ ) ), pd220);
};
SOURCE(15588, 68)
SOURCE(15588, 68)
{
/* declaration of var←c019 skipped */
(* (( (ptr) &var←c33644)+6)/* var←c019 */ ) = (* (( (ptr) (* (( (ptr) gf←c33676)+146)/* var←c30444 */ ))+12) );
{
/*1*/ /* declaration of var←c020 skipped */
/*1*/ {
/*1*/ word var←c021;
/*1*/ {
/*1*/ word var←c0483;
/*1*/ var←c0483 = (word) &var←c33644;
/*1*/ var←c021 = (word) XR←Enable(( ((word) (fPt) NoName←Q3264) ), ( ((word) (fPt) NoName←Q3624) ), var←c0483);
/*1*/ };
/*1*/ if ((var←c021 == 10)) {
/*1*/ goto lab←L100050;
/*1*/ };
/*1*/ };
/*1*/ storedSize←v10036 = (* (( (ptr) &var←c33644)+7)/* var←c020 */ );
/*1*/ };
};
lab←L100050: ;
SOURCE(15696, 108)
{
word pd221;
word x222;
pd221 = (* (( (ptr) (* (( (ptr) gf←c33676)+145)/* var←c30380 */ ))+5) );
if (((float)(int)(word) ( *( (fPt) ((* (ptr) pd221 ))))(storedSize←v10036, pd221) != (
/*1*/ x222 = storedSize←v10036, *(float*)&x222
/*1*/ ))) {
SOURCE(15744, 60)
/*1*/ {
/*1*/ word var←c0258;
/*1*/ var←c0258 = (* (( (ptr) gf←c33676)+70) );
/*1*/ (void) XR←RaiseError((word) (( (bPt) gf←c33676)+336)/* var←c28844 */ , (word) &var←c0258);
/*1*/ };
/*1*/ };
};
SOURCE(15806, 52)
{
word var←c32172;
{
/*1*/ word pd223;
/*1*/ pd223 = (* (( (ptr) (* (( (ptr) gf←c33676)+138)/* var←c29996 */ ))+6) );
/*1*/ var←c32172 = (word) ( *( (fPt) ((* (ptr) pd223 ))))(alphaRope←v9952, (* (( (ptr) &var←c33644)+4)/* storedSizeRope←v10008 */ ), pd223)
/*1*/ ;
/*1*/ };
(* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+4) ) = var←c32172;
};
SOURCE(15894, 41)
{
word var←c32204;
var←c32204 = storedSize←v10036;
(* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+7) ) = storedSize←v10036;
(* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+6) ) = var←c32204;
};
SOURCE(16175, 58)
if ((faceRope←v9980 != 0)) {
SOURCE(16196, 37)
{
/*1*/ word pd224;
/*1*/ pd224 = (* (( (ptr) (* (( (ptr) gf←c33676)+138)/* var←c29996 */ ))+6) );
/*1*/ faceRope←v9980 = (word) ( *( (fPt) ((* (ptr) pd224 ))))((* (( (ptr) gf←c33676)+46) ), faceRope←v9980, pd224);
/*1*/ };
};
SOURCE(16235, 49)
{
word var←c32236;
{
/*1*/ word pd225;
/*1*/ pd225 = (* (( (ptr) (* (( (ptr) gf←c33676)+138)/* var←c29996 */ ))+6) );
/*1*/ var←c32236 = (word) ( *( (fPt) ((* (ptr) pd225 ))))((* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+4) ), faceRope←v9980, pd225)
/*1*/ ;
/*1*/ };
(* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+3) ) = var←c32236;
};
SOURCE(16286, 21)
(* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+12) ) = 1;
SOURCE(16309, 23)
(* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+9) ) = 1;
SOURCE(16334, 159)
{
register word boldRope←v10108;
boldRope←v10108 = (* (( (ptr) gf←c33676)+4)/* boldList←v3532 */ );
lab←L100056: ;
if ((boldRope←v10108 != 0)) {
/*1*/ }
else {
/*1*/ goto lab←L100053;
/*1*/ };
SOURCE(16409, 18)
if ((0 != (* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+10) ))) {
SOURCE(16427, 4)
/*1*/ goto lab←L100054;
/*1*/ };
SOURCE(16433, 60)
{
/*1*/ word var←c32268;
/*1*/ {
/*1*/ word pd226;
/*1*/ pd226 = (* (( (ptr) (* (( (ptr) gf←c33676)+138)/* var←c29996 */ ))+11) );
/*1*/ var←c32268 = (unsigned) ( (int)(word) ( *( (fPt) ((* (ptr) pd226 ))))(faceRope←v9980, (* (ptr) boldRope←v10108 ), 0, 0, pd226)
/*1*/ != (int) (word) -1);
/*1*/ };
/*1*/ (* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+10) ) = var←c32268;
/*1*/ };
boldRope←v10108 = (* (( (ptr) boldRope←v10108)+1) );
goto lab←L100056;
lab←L100053: ;
lab←L100054: ;
};
SOURCE(16504, 173)
{
register word italicRope←v10236;
italicRope←v10236 = (* (( (ptr) gf←c33676)+5)/* italicList←v3560 */ );
lab←L100060: ;
if ((italicRope←v10236 != 0)) {
/*1*/ }
else {
/*1*/ goto lab←L100057;
/*1*/ };
SOURCE(16587, 20)
if ((0 != (* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+11) ))) {
SOURCE(16607, 4)
/*1*/ goto lab←L100058;
/*1*/ };
SOURCE(16613, 64)
{
/*1*/ word var←c32300;
/*1*/ {
/*1*/ word pd227;
/*1*/ pd227 = (* (( (ptr) (* (( (ptr) gf←c33676)+138)/* var←c29996 */ ))+11) );
/*1*/ var←c32300 = (unsigned) ( (int)(word) ( *( (fPt) ((* (ptr) pd227 ))))(faceRope←v9980, (* (ptr) italicRope←v10236 ), 0, 0, pd227)
/*1*/ != (int) (word) -1);
/*1*/ };
/*1*/ (* (( (ptr) (* (( (ptr) formal←c33708)+4) ))+11) ) = var←c32300;
/*1*/ };
italicRope←v10236 = (* (( (ptr) italicRope←v10236)+1) );
goto lab←L100060;
lab←L100057: ;
lab←L100058: ;
};
};
};
};
};
};
};
};
}
static word NoName←Q3264(formal←c0449)
word formal←c0449;
{
SOURCE(15588, 68)
{
word pd228;
pd228 = (* (( (ptr) formal←c0449)+6) );
(* (( (ptr) formal←c0449)+7) ) = (word) ( *( (fPt) ((* (ptr) pd228 ))))((* ((( (ptr) formal←c0449)+4)) ), pd228);
};
return(0);
}
static word NoName←Q3324(formal←c0451)
word formal←c0451;
{
register ptr gf←c0450 = (ptr) &globalframe;
SOURCE(15393, 88)
{
word pd229;
pd229 = (* (( (ptr) formal←c0451)+6) );
(void) ( *( (fPt) ((* (ptr) pd229 ))))((word) (( (bPt) formal←c0451)+28), (* (( (ptr) formal←c0451)+5) ), (word) (( (bPt) gf←c0450)+428)
/* var←c29228 */ , pd229);
};
return(0);
}
static word HasMultiple←P960(s←v6548, char←v6576)
word s←v6548;
word char←v6576;
{
register ptr gf←c33740 = (ptr) &globalframe;
word var←c6620;
/* HasMultiple: */
SOURCE(17120, 326)
SOURCE(17184, 262)
if ((s←v6548 == 0)) {
SOURCE(17198, 19)
return(0);
}
else {
SOURCE(17217, 240)
{
word found←v10364 = 0;
word count←v10392 = 0;
word pos←v10420 = 0;
word len←v10448;
SOURCE(17270, 21)
{
word pd230;
pd230 = (* (( (ptr) (* (( (ptr) gf←c33740)+138)/* var←c29996 */ ))+14) );
len←v10448 = (word) ( *( (fPt) ((* (ptr) pd230 ))))(s←v6548, pd230);
};
SOURCE(17293, 27)
if (( (int)len←v10448 < (int)2)) {
SOURCE(17307, 13)
return(0);
};
SOURCE(17322, 124)
lab←L100063: ;
SOURCE(17325, 72)
{
word pd231;
pd231 = (* (( (ptr) (* (( (ptr) gf←c33740)+138)/* var←c29996 */ ))+9) );
if (((word) ( *( (fPt) ((* (ptr) pd231 ))))(s←v6548, pos←v10420, pd231) == char←v6576)) {
SOURCE(17353, 44)
if ((0 != found←v10364)) {
SOURCE(17367, 18)
return(1);
}
else {
SOURCE(17385, 12)
found←v10364 = 1;
};
};
};
SOURCE(17399, 13)
pos←v10420 = (pos←v10420 + 1);
SOURCE(17414, 32)
if (( (int)pos←v10420 >= (int)len←v10448)) {
SOURCE(17433, 13)
return(0);
};
goto lab←L100063;
};
};
}
static word Before←P1020(s←v6680, char←v6708)
word s←v6680;
word char←v6708;
{
register ptr gf←c33772 = (ptr) &globalframe;
word r←v6752;
/* Before: */
SOURCE(17464, 361)
SOURCE(17464, 361)
r←v6752 = 0;
SOURCE(17531, 294)
if ((s←v6680 == 0)) {
SOURCE(17545, 17)
return(0);
}
else {
SOURCE(17562, 274)
{
word pos←v10492 = 0;
word len←v10520;
word found←v10548 = 0;
SOURCE(17578, 21)
{
word pd232;
pd232 = (* (( (ptr) (* (( (ptr) gf←c33772)+138)/* var←c29996 */ ))+14) );
len←v10520 = (word) ( *( (fPt) ((* (ptr) pd232 ))))(s←v6680, pd232);
};
SOURCE(17622, 203)
lab←L100066: ;
SOURCE(17625, 129)
{
word pd233;
pd233 = (* (( (ptr) (* (( (ptr) gf←c33772)+138)/* var←c29996 */ ))+9) );
if (((word) ( *( (fPt) ((* (ptr) pd233 ))))(s←v6680, pos←v10492, pd233) == char←v6708)) {
SOURCE(17689, 65)
if ((0 != found←v10548)) {
SOURCE(17703, 15)
return(s←v6680);
}
else {
SOURCE(17720, 12)
found←v10548 = 1;
SOURCE(17734, 20)
{
word pd234;
pd234 = (* (( (ptr) (* (( (ptr) gf←c33772)+138)/* var←c29996 */ ))+17) );
r←v6752 = (word) ( *( (fPt) ((* (ptr) pd234 ))))(s←v6680, 0, pos←v10492, pd234);
};
};
};
};
SOURCE(17762, 13)
pos←v10492 = (pos←v10492 + 1);
SOURCE(17777, 48)
if (( (int)pos←v10492 == (int)len←v10520)) {
SOURCE(17795, 30)
if ((0 != found←v10548)) {
return(r←v6752);
}
else {
return(s←v6680);
};
};
goto lab←L100066;
};
};
}
static word After←P1080(s←v6812, char←v6840)
word s←v6812;
word char←v6840;
{
register ptr gf←c33804 = (ptr) &globalframe;
word r←v6884;
/* After: */
SOURCE(17843, 382)
SOURCE(17843, 382)
r←v6884 = 0;
SOURCE(17909, 316)
if ((s←v6812 == 0)) {
SOURCE(17923, 17)
return(0);
}
else {
SOURCE(17940, 296)
{
word pos←v10592 = 0;
word len←v10620;
word found←v10648 = 0;
SOURCE(17956, 21)
{
word pd235;
pd235 = (* (( (ptr) (* (( (ptr) gf←c33804)+138)/* var←c29996 */ ))+14) );
len←v10620 = (word) ( *( (fPt) ((* (ptr) pd235 ))))(s←v6812, pd235);
};
SOURCE(18000, 225)
lab←L100069: ;
SOURCE(18003, 151)
{
word pd236;
pd236 = (* (( (ptr) (* (( (ptr) gf←c33804)+138)/* var←c29996 */ ))+9) );
if (((word) ( *( (fPt) ((* (ptr) pd236 ))))(s←v6812, pos←v10592, pd236) == char←v6840)) {
SOURCE(18067, 87)
if ((0 != found←v10648)) {
SOURCE(18081, 15)
return(s←v6812);
}
else {
SOURCE(18098, 12)
found←v10648 = 1;
SOURCE(18112, 42)
{
word pd237;
pd237 = (* (( (ptr) (* (( (ptr) gf←c33804)+138)/* var←c29996 */ ))+17) );
r←v6884 = (word) ( *( (fPt) ((* (ptr) pd237 ))))(s←v6812, pos←v10592, 2147483647, pd237);
};
};
};
};
SOURCE(18162, 13)
pos←v10592 = (pos←v10592 + 1);
SOURCE(18177, 48)
if (( (int)pos←v10592 == (int)len←v10620)) {
SOURCE(18195, 30)
if ((0 != found←v10648)) {
return(r←v6884);
}
else {
return(s←v6812);
};
};
goto lab←L100069;
};
};
}
static word FontAsDetailedRope←P1140(font←v6944)
word font←v6944;
{
word detailed←v6988;
/* FontAsDetailedRope: */
SOURCE(18243, 33)
SOURCE(18243, 33)
detailed←v6988 = 0;
SOURCE(18243, 33)
return(detailed←v6988);
}
static void FontPutDetailedStream←P1200(font←v7048, stream←v7076)
word font←v7048;
word stream←v7076;
{
/* FontPutDetailedStream: */
}
static word FontAsLiteralRope←P1260(font←v7136)
word font←v7136;
{
register ptr gf←c33836 = (ptr) &globalframe;
word literal←v7180;
word stream←v10692 = 0;
/* FontAsLiteralRope: */
SOURCE(18409, 187)
SOURCE(18409, 187)
literal←v7180 = 0;
SOURCE(18509, 17)
{
word pd238;
pd238 = (* (( (ptr) (* (( (ptr) gf←c33836)+137)/* var←c29964 */ ))+34) );
stream←v10692 = (word) ( *( (fPt) ((* (ptr) pd238 ))))(0, pd238);
};
SOURCE(18528, 34)
(void) FontPutLiteralStream←P1320(font←v7136, stream←v10692);
SOURCE(18564, 32)
{
word pd239;
pd239 = (* (( (ptr) (* (( (ptr) gf←c33836)+137)/* var←c29964 */ ))+35) );
literal←v7180 = (word) ( *( (fPt) ((* (ptr) pd239 ))))(stream←v10692, 1, pd239);
};
SOURCE(18409, 187)
return(literal←v7180);
}
static void FontPutLiteralStream←P1320(font←v7240, stream←v7268)
word font←v7240;
word stream←v7268;
{
register ptr gf←c33868 = (ptr) &globalframe;
word transformStream←v10736;
word transformRope←v10764 = 0;
/* FontPutLiteralStream: */
SOURCE(18602, 456)
SOURCE(18676, 37)
{
word pd240;
pd240 = (* (( (ptr) (* (( (ptr) gf←c33868)+137)/* var←c29964 */ ))+34) );
transformStream←v10736 = (word) ( *( (fPt) ((* (ptr) pd240 ))))(0, pd240);
};
SOURCE(18741, 74)
{
word pd241;
pd241 = (* (( (ptr) (* (( (ptr) gf←c33868)+150)/* var←c32332 */ ))+12) );
(void) ( *( (fPt) ((* (ptr) pd241 ))))(transformStream←v10736, (* (( (ptr) font←v7240)+5) ), pd241);
};
SOURCE(18817, 47)
{
word pd242;
pd242 = (* (( (ptr) (* (( (ptr) gf←c33868)+137)/* var←c29964 */ ))+35) );
transformRope←v10764 = (word) ( *( (fPt) ((* (ptr) pd242 ))))(transformStream←v10736, 1, pd242);
};
SOURCE(18866, 192)
{
word var←c32364;
{
word var←c32396;
word var←c32428;
var←c32396 = XR←NewObject(12, (* (( (ptr) gf←c33868)+20) ));
var←c32428 = var←c32396;
(* (ptr) var←c32428 ) = 11;
(* (( (ptr) var←c32428)+1) ) = (* (ptr) font←v7240 );
(* (( (ptr) var←c32428)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c33868)+20) ));
var←c32428 = (* (( (ptr) var←c32428)+2) );
(* (ptr) var←c32428 ) = 11;
(* (( (ptr) var←c32428)+1) ) = transformRope←v10764;
(* (( (ptr) var←c32428)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c33868)+20) ));
var←c32428 = (* (( (ptr) var←c32428)+2) );
(* (ptr) var←c32428 ) = 8;
(* (( (ptr) var←c32428)+1) ) = (* (( (ptr) font←v7240)+7) );
(* (( (ptr) var←c32428)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c33868)+20) ));
var←c32428 = (* (( (ptr) var←c32428)+2) );
(* (ptr) var←c32428 ) = 8;
(* (( (ptr) var←c32428)+1) ) = (* (( (ptr) font←v7240)+8) );
(* (( (ptr) var←c32428)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c33868)+20) ));
var←c32428 = (* (( (ptr) var←c32428)+2) );
(* (ptr) var←c32428 ) = 11;
if ((0 != (* (( (ptr) font←v7240)+14) ))) {
(* (( (ptr) var←c32428)+1) ) = (* (( (ptr) gf←c33868)+80) );
}
else {
(* (( (ptr) var←c32428)+1) ) = (* (( (ptr) gf←c33868)+65) );
};
var←c32364 = var←c32396;
};
{
word pd243;
pd243 = (* (( (ptr) (* (( (ptr) gf←c33868)+137)/* var←c29964 */ ))+64) );
(void) ( *( (fPt) ((* (ptr) pd243 ))))(stream←v7268, (* (( (ptr) gf←c33868)+79) ), var←c32364, pd243);
};
};
}
static void OldParseFontData←P1380(formal←c0313, formal←c0519, formal←c0520, formal←c0521, formal←c0522, formal←c0523, formal←c0524)
word formal←c0313;
word formal←c0519;
word formal←c0520;
word formal←c0521;
word formal←c0522;
word formal←c0523;
word formal←c0524;
{
W18 var←c33900;
/* declaration of inStream←v7328 skipped */
/* declaration of prefixP←v7356 skipped */
/* declaration of familyP←v7384 skipped */
/* declaration of faceP←v7412 skipped */
/* declaration of transformP←v7440 skipped */
/* declaration of sizeP←v7468 skipped */
/* declaration of fail←v7512 skipped */
/* declaration of prefix←v7540 skipped */
/* declaration of family←v7568 skipped */
/* declaration of face←v7596 skipped */
/* declaration of transform←v7624 skipped */
/* declaration of size←v7652 skipped */
/* declaration of var←c32460 skipped */
(* (( (ptr) &var←c33900)+4)/* inStream←v7328 */ ) = formal←c0519;
(* (( (ptr) &var←c33900)+5)/* prefixP←v7356 */ ) = formal←c0520;
(* (( (ptr) &var←c33900)+6)/* familyP←v7384 */ ) = formal←c0521;
(* (( (ptr) &var←c33900)+7)/* faceP←v7412 */ ) = formal←c0522;
(* (( (ptr) &var←c33900)+8)/* transformP←v7440 */ ) = formal←c0523;
(* (( (ptr) &var←c33900)+9)/* sizeP←v7468 */ ) = formal←c0524;
/* OldParseFontData: */
SOURCE(19064, 1189)
{
word tmpAddr244;
tmpAddr244 = (word) (( (ptr) &var←c33900)+16)/* var←c32460 */ ;
(* (ptr) tmpAddr244 ) = ( ((word) (fPt) ReadWord←P2664) );
(* (( (ptr) tmpAddr244) + 1) ) = 1;
};
SOURCE(19064, 1189)
(* (( (ptr) &var←c33900)+11)/* prefix←v7540 */ ) = 0;
SOURCE(19064, 1189)
(* (( (ptr) &var←c33900)+12)/* family←v7568 */ ) = 0;
SOURCE(19064, 1189)
(* (( (ptr) &var←c33900)+13)/* face←v7596 */ ) = 0;
SOURCE(19064, 1189)
(* (( (ptr) &var←c33900)+14)/* transform←v7624 */ ) = 0;
SOURCE(19064, 1189)
(* (( (ptr) &var←c33900)+15)/* size←v7652 */ ) = (* (ptr) &fc245 );
SOURCE(19298, 955)
SOURCE(19298, 955)
{
word var←c022;
{
word var←c0484;
var←c0484 = (word) &var←c33900;
var←c022 = (word) XR←Enable(( ((word) (fPt) NoName←Q3384) ), ( ((word) (fPt) NoName←Q3564) ), var←c0484);
};
/* removed trivial cond node */
};
/* removed tail goto */
(* (ptr) formal←c0313 ) = (* (( (ptr) &var←c33900)+10)/* fail←v7512 */ );
(* (( (ptr) formal←c0313)+1) ) = (* (( (ptr) &var←c33900)+11)/* prefix←v7540 */ );
(* (( (ptr) formal←c0313)+2) ) = (* (( (ptr) &var←c33900)+12)/* family←v7568 */ );
(* (( (ptr) formal←c0313)+3) ) = (* (( (ptr) &var←c33900)+13)/* face←v7596 */ );
(* (( (ptr) formal←c0313)+4) ) = (* (( (ptr) &var←c33900)+14)/* transform←v7624 */ );
(* (( (ptr) formal←c0313)+5) ) = (* (( (ptr) &var←c33900)+15)/* size←v7652 */ );
return;
}
static word NoName←Q3384(formal←c0458)
word formal←c0458;
{
register ptr gf←c0457 = (ptr) &globalframe;
SOURCE(19400, 16)
{
word nameStream←v10836 = 0;
W2 var←c0315;
W2 var←c0318;
SOURCE(19758, 12)
(* (( (ptr) formal←c0458)+10) ) = 0;
SOURCE(19772, 67)
if ((0 != (* (( (ptr) formal←c0458)+5) ))) {
SOURCE(19788, 51)
{
word pd246;
pd246 = (* (( (ptr) (* (( (ptr) gf←c0457)+137)/* var←c29964 */ ))+89) );
(void) ( *( (fPt) ((* (ptr) pd246 ))))((word) &var←c0315, (* (( (ptr) formal←c0458)+4) ), (* (( (ptr) (* (( (ptr) gf←c0457)+137)
/* var←c29964 */ ))+88) ), pd246);
};
(* (( (ptr) formal←c0458)+11) ) = var←c0315.f0;
};
SOURCE(19861, 63)
{
W2 var←c0317;
word var←c32492;
{
word pd247;
pd247 = (* (( (ptr) (* (( (ptr) gf←c0457)+137)/* var←c29964 */ ))+89) );
(void) ( *( (fPt) ((* (ptr) pd247 ))))((word) &var←c0317, (* (( (ptr) formal←c0458)+4) ), (* (( (ptr) (* (( (ptr) gf←c0457)+137)
/* var←c29964 */ ))+88) ), pd247);
};
var←c32492 = var←c0317.f0;
{
word pd248;
pd248 = (* (( (ptr) (* (( (ptr) gf←c0457)+137)/* var←c29964 */ ))+33) );
nameStream←v10836 = (word) ( *( (fPt) ((* (ptr) pd248 ))))(var←c32492, 0, pd248);
};
};
SOURCE(19942, 72)
if ((0 != (* (( (ptr) formal←c0458)+6) ))) {
SOURCE(19958, 56)
{
word pd249;
pd249 = (* (( (ptr) (* (( (ptr) gf←c0457)+137)/* var←c29964 */ ))+89) );
(void) ( *( (fPt) ((* (ptr) pd249 ))))((word) &var←c0318, nameStream←v10836, (* (( (ptr) (* (( (ptr) gf←c0457)+137)/* var←c29964 */ ))+87)
), pd249);
};
(* (( (ptr) formal←c0458)+12) ) = var←c0318.f0;
};
SOURCE(20029, 41)
if ((0 != (* (( (ptr) formal←c0458)+7) ))) {
SOURCE(20043, 27)
(* (( (ptr) formal←c0458)+13) ) = (word) ReadWord←P2664(nameStream←v10836, (word) (( (bPt) formal←c0458)+64));
};
SOURCE(20089, 77)
if ((0 != (* (( (ptr) formal←c0458)+8) ))) {
SOURCE(20108, 58)
{
word pd250;
pd250 = (* (( (ptr) (* (( (ptr) gf←c0457)+148)/* var←c30828 */ ))+21) );
(* (( (ptr) formal←c0458)+14) ) = (word) ( *( (fPt) ((* (ptr) pd250 ))))((* ((( (ptr) formal←c0458)+4)) ), pd250);
};
};
SOURCE(20168, 85)
if ((0 != (* (( (ptr) formal←c0458)+9) ))) {
SOURCE(20182, 71)
{
W2 var←c0320;
word var←c32524;
{
word pd251;
pd251 = (* (( (ptr) (* (( (ptr) gf←c0457)+137)/* var←c29964 */ ))+89) );
(void) ( *( (fPt) ((* (ptr) pd251 ))))((word) &var←c0320, (* (( (ptr) formal←c0458)+4) ), (* (( (ptr) (* (( (ptr) gf←c0457)+137)
/* var←c29964 */ ))+88) ), pd251);
};
var←c32524 = var←c0320.f0;
{
word pd252;
pd252 = (* (( (ptr) (* (( (ptr) gf←c0457)+146)/* var←c30444 */ ))+12) );
(* (( (ptr) formal←c0458)+15) ) = (word) ( *( (fPt) ((* (ptr) pd252 ))))(var←c32524, pd252);
};
};
};
};
return(0);
}
static word ReadWord←P2664(formal←c0525, formal←c33996)
word formal←c0525;
word formal←c33996;
{
W11 var←c33932;
/* declaration of f←v10912 skipped */
register ptr gf←c33964 = (ptr) &globalframe;
/* declaration of word←v10956 skipped */
/* declaration of var←c32556 skipped */
formal←c33996 = (formal←c33996 - 64);
(* (( (ptr) &var←c33932)+4)/* f←v10912 */ ) = formal←c0525;
(* (ptr) &var←c33932 ) = formal←c33996;
/* ReadWord: */
SOURCE(19400, 16)
{
word tmpAddr253;
tmpAddr253 = (word) (( (ptr) &var←c33932)+6)/* var←c32556 */ ;
(* (ptr) tmpAddr253 ) = ( ((word) (fPt) WordBreakProc←P2724) );
(* (( (ptr) tmpAddr253) + 1) ) = 1;
};
SOURCE(19400, 16)
(* (( (ptr) &var←c33932)+5)/* word←v10956 */ ) = 0;
SOURCE(19639, 78)
SOURCE(19639, 78)
{
W2 var←c32588;
{
/* declaration of var←c023 skipped */
(* (( (ptr) &var←c33932)+8)/* var←c023 */ ) = (* (( (ptr) (* (( (ptr) gf←c33964)+137)/* var←c29964 */ ))+89) );
{
/* declaration of var←c024 skipped */
{
word var←c025;
{
word var←c0485;
var←c0485 = (word) &var←c33932;
var←c025 = (word) XR←Enable(( ((word) (fPt) NoName←Q3444) ), ( ((word) (fPt) NoName←Q3504) ), var←c0485);
};
if ((var←c025 == 12)) {
goto lab←L100076;
};
};
var←c32588 = (* (W2Pt) (( (ptr) &var←c33932)+9)/* var←c024 */ );
};
};
(* (( (ptr) &var←c33932)+5)/* word←v10956 */ ) = var←c32588.f0;
};
lab←L100076: ;
SOURCE(19400, 16)
return((* (( (ptr) &var←c33932)+5)/* word←v10956 */ ));
}
static word NoName←Q3444(formal←c0461)
word formal←c0461;
{
SOURCE(19639, 78)
{
word pd254;
pd254 = (* (( (ptr) formal←c0461)+8) );
(void) ( *( (fPt) ((* (ptr) pd254 ))))((word) (( (bPt) formal←c0461)+36), (* (( (ptr) formal←c0461)+4) ), (word) (( (bPt) formal←c0461)+24)
, pd254);
};
return(0);
}
static word WordBreakProc←P2724(char←v11060, formal←c34028)
word char←v11060;
word formal←c34028;
{
word var←c11104;
formal←c34028 = (formal←c34028 - 24);
/* WordBreakProc: */
SOURCE(19460, 26)
SOURCE(19533, 101)
{
word var←c32620;
var←c32620 = char←v11060;
switch (var←c32620) {
case 10: case 13: case 9: case 32: case 44: case 93: case 41:
SOURCE(19593, 14)
return(0);
default:
SOURCE(19620, 14)
return(2);
};
};
}
static void Init←P1440()
{
register ptr gf←c34060 = (ptr) &globalframe;
/* Init: */
SOURCE(20267, 301)
SOURCE(20282, 38)
{
word pd255;
pd255 = (* (( (ptr) (* (( (ptr) gf←c34060)+135)/* var←c29868 */ ))+5) );
(* (( (ptr) gf←c34060)+7)/* fontTable←v3616 */ ) = (word) ( *( (fPt) ((* (ptr) pd255 ))))(17, 0, pd255);
};
SOURCE(20358, 47)
{
word pd256;
pd256 = (* (( (ptr) (* (( (ptr) gf←c34060)+135)/* var←c29868 */ ))+5) );
(* (( (ptr) gf←c34060)+8)/* alternateFontTable←v3644 */ ) = (word) ( *( (fPt) ((* (ptr) pd256 ))))(17, 0, pd256);
};
SOURCE(20454, 114)
{
word pd257;
pd257 = (* (( (ptr) (* (( (ptr) gf←c34060)+151)/* var←c32652 */ ))+4) );
(void) ( *( (fPt) ((* (ptr) pd257 ))))((* (( (ptr) gf←c34060)+82) ), (word) (( (bPt) gf←c34060)+516)/* var←c29580 */ , (* (
( (ptr) gf←c34060)+83) ), 0, 1, pd257);
};
}
static void NoName←Q3504(formal←c0334, formal←c200040, formal←c200041, formal←c200042, formal←c200043)
word formal←c0334;
word formal←c200040;
word formal←c200041;
word formal←c200042;
word formal←c200043;
{
register ptr gf←c0464 = (ptr) &globalframe;
if ((formal←c200041 == (* (( (ptr) (* (( (ptr) gf←c0464)+137)/* var←c29964 */ ))+4) ))) {
{
word stream←v28280;
stream←v28280 = (* (ptr) formal←c200043 );
SOURCE(19707, 10)
(* (( (ptr) formal←c200040)+5) ) = 0;
SOURCE(19719, 8)
(* (ptr) formal←c0334 ) = 2;
(* (( (ptr) formal←c0334)+1) ) = 12;
return;
};
};
(* (ptr) formal←c0334 ) = 0;
(* (( (ptr) formal←c0334)+1) ) = 0;
return;
}
static void NoName←Q3564(formal←c0339, formal←c200036, formal←c200037, formal←c200038, formal←c200039)
word formal←c0339;
word formal←c200036;
word formal←c200037;
word formal←c200038;
word formal←c200039;
{
register ptr gf←c0465 = (ptr) &globalframe;
if ((((formal←c200037 == (* (( (ptr) (* (( (ptr) gf←c0465)+137)/* var←c29964 */ ))+5) )) || (formal←c200037 == (* (( (ptr) (* (
( (ptr) gf←c0465)+137)/* var←c29964 */ ))+4) ))) || (formal←c200037 == (* (( (ptr) (* (( (ptr) gf←c0465)+146)/* var←c30444 */ ))+7)
))) || (formal←c200037 == (* (( (ptr) (* (( (ptr) gf←c0465)+148)/* var←c30828 */ ))+4) ))) {
SOURCE(19373, 11)
(* (( (ptr) formal←c200036)+10) ) = 1;
SOURCE(19386, 8)
(* (ptr) formal←c0339 ) = 2;
(* (( (ptr) formal←c0339)+1) ) = 11;
return;
};
(* (ptr) formal←c0339 ) = 0;
(* (( (ptr) formal←c0339)+1) ) = 0;
return;
}
static void NoName←Q3624(formal←c0346, formal←c200032, formal←c200033, formal←c200034, formal←c200035)
word formal←c0346;
word formal←c200032;
word formal←c200033;
word formal←c200034;
word formal←c200035;
{
register ptr gf←c0466 = (ptr) &globalframe;
if ((formal←c200033 == (* (( (ptr) (* (( (ptr) gf←c0466)+146)/* var←c30444 */ ))+7) ))) {
{
word reason←v27008;
word index←v27036;
reason←v27008 = (* (ptr) formal←c200035 );
index←v27036 = (* (( (ptr) formal←c200035)+1) );
SOURCE(15656, 8)
(* (ptr) formal←c0346 ) = 2;
(* (( (ptr) formal←c0346)+1) ) = 10;
return;
};
};
(* (ptr) formal←c0346 ) = 0;
(* (( (ptr) formal←c0346)+1) ) = 0;
return;
}
static void NoName←Q3684(formal←c0351, formal←c200028, formal←c200029, formal←c200030, formal←c200031)
word formal←c0351;
word formal←c200028;
word formal←c200029;
word formal←c200030;
word formal←c200031;
{
register ptr gf←c0467 = (ptr) &globalframe;
if ((formal←c200029 == (* (( (ptr) (* (( (ptr) gf←c0467)+137)/* var←c29964 */ ))+4) )) || (formal←c200029 == (* (( (ptr) (* (
( (ptr) gf←c0467)+137)/* var←c29964 */ ))+5) ))) {
SOURCE(15481, 8)
(* (ptr) formal←c0351 ) = 2;
(* (( (ptr) formal←c0351)+1) ) = 9;
return;
};
(* (ptr) formal←c0351 ) = 0;
(* (( (ptr) formal←c0351)+1) ) = 0;
return;
}
static void NoName←Q3744(formal←c0366, formal←c200024, formal←c200025, formal←c200026, formal←c200027)
word formal←c0366;
word formal←c200024;
word formal←c200025;
word formal←c200026;
word formal←c200027;
{
register ptr gf←c0468 = (ptr) &globalframe;
if ((formal←c200025 == (* (( (ptr) (* (( (ptr) gf←c0468)+137)/* var←c29964 */ ))+5) ))) {
{
word ec←v26464;
word stream←v26492;
word details←v26520;
word msg←v26548;
ec←v26464 = (* (ptr) formal←c200027 );
stream←v26492 = (* (( (ptr) formal←c200027)+1) );
details←v26520 = (* (( (ptr) formal←c200027)+2) );
msg←v26548 = (* (( (ptr) formal←c200027)+3) );
SOURCE(16762, 40)
(* (( (ptr) formal←c200024)+7) ) = (* (( (ptr) gf←c0468)+74) );
SOURCE(16804, 10)
(* (ptr) formal←c0366 ) = 2;
(* (( (ptr) formal←c0366)+1) ) = 8;
return;
};
};
if ((formal←c200025 == (* (( (ptr) (* (( (ptr) gf←c0468)+137)/* var←c29964 */ ))+4) ))) {
{
word stream←v26608;
stream←v26608 = (* (ptr) formal←c200027 );
SOURCE(16836, 46)
(* (( (ptr) formal←c200024)+7) ) = (* (( (ptr) gf←c0468)+75) );
SOURCE(16884, 10)
(* (ptr) formal←c0366 ) = 2;
(* (( (ptr) formal←c0366)+1) ) = 8;
return;
};
};
if ((formal←c200025 == (* (( (ptr) (* (( (ptr) gf←c0468)+146)/* var←c30444 */ ))+7) ))) {
{
word reason←v26668;
word index←v26696;
reason←v26668 = (* (ptr) formal←c200027 );
index←v26696 = (* (( (ptr) formal←c200027)+1) );
SOURCE(16916, 45)
(* (( (ptr) formal←c200024)+7) ) = (* (( (ptr) gf←c0468)+76) );
SOURCE(16963, 10)
(* (ptr) formal←c0366 ) = 2;
(* (( (ptr) formal←c0366)+1) ) = 8;
return;
};
};
if ((formal←c200025 == (* (( (ptr) (* (( (ptr) gf←c0468)+148)/* var←c30828 */ ))+4) ))) {
{
word position←v26756;
word wasThere←v26784;
word notThere←v26812;
position←v26756 = (* (ptr) formal←c200027 );
wasThere←v26784 = (* (( (ptr) formal←c200027)+1) );
notThere←v26812 = (* (( (ptr) formal←c200027)+2) );
SOURCE(17002, 53)
(* (( (ptr) formal←c200024)+7) ) = (* (( (ptr) gf←c0468)+77) );
SOURCE(17057, 10)
(* (ptr) formal←c0366 ) = 2;
(* (( (ptr) formal←c0366)+1) ) = 8;
return;
};
};
(* (ptr) formal←c0366 ) = 0;
(* (( (ptr) formal←c0366)+1) ) = 0;
return;
}
static void NoName←Q3804(formal←c0371, formal←c200020, formal←c200021, formal←c200022, formal←c200023)
word formal←c0371;
word formal←c200020;
word formal←c200021;
word formal←c200022;
word formal←c200023;
{
register ptr gf←c0469 = (ptr) &globalframe;
if (((formal←c200021 == (* (( (ptr) (* (( (ptr) gf←c0469)+137)/* var←c29964 */ ))+5) )) || (formal←c200021 == (* (( (ptr) (* (
( (ptr) gf←c0469)+137)/* var←c29964 */ ))+4) ))) || (formal←c200021 == (* (( (ptr) (* (( (ptr) gf←c0469)+146)/* var←c30444 */ ))+7)
))) {
SOURCE(10649, 11)
(* (( (ptr) formal←c200020)+4) ) = 0;
SOURCE(10662, 8)
(* (ptr) formal←c0371 ) = 2;
(* (( (ptr) formal←c0371)+1) ) = 7;
return;
};
(* (ptr) formal←c0371 ) = 0;
(* (( (ptr) formal←c0371)+1) ) = 0;
return;
}
static void NoName←Q3864(formal←c0386, formal←c200016, formal←c200017, formal←c200018, formal←c200019)
word formal←c0386;
word formal←c200016;
word formal←c200017;
word formal←c200018;
word formal←c200019;
{
register ptr gf←c0470 = (ptr) &globalframe;
if ((formal←c200017 == (* (( (ptr) (* (( (ptr) gf←c0470)+137)/* var←c29964 */ ))+5) ))) {
{
word ec←v25756;
word stream←v25784;
word details←v25812;
word msg←v25840;
ec←v25756 = (* (ptr) formal←c200019 );
stream←v25784 = (* (( (ptr) formal←c200019)+1) );
details←v25812 = (* (( (ptr) formal←c200019)+2) );
msg←v25840 = (* (( (ptr) formal←c200019)+3) );
SOURCE(12974, 31)
(* (( (ptr) formal←c200016)+7) ) = (* (( (ptr) gf←c0470)+50) );
SOURCE(13007, 10)
(* (ptr) formal←c0386 ) = 2;
(* (( (ptr) formal←c0386)+1) ) = 6;
return;
};
};
if ((formal←c200017 == (* (( (ptr) (* (( (ptr) gf←c0470)+137)/* var←c29964 */ ))+4) ))) {
{
word stream←v25900;
stream←v25900 = (* (ptr) formal←c200019 );
SOURCE(13039, 34)
(* (( (ptr) formal←c200016)+7) ) = (* (( (ptr) gf←c0470)+51) );
SOURCE(13075, 10)
(* (ptr) formal←c0386 ) = 2;
(* (( (ptr) formal←c0386)+1) ) = 6;
return;
};
};
if ((formal←c200017 == (* (( (ptr) (* (( (ptr) gf←c0470)+146)/* var←c30444 */ ))+7) ))) {
{
word reason←v25960;
word index←v25988;
reason←v25960 = (* (ptr) formal←c200019 );
index←v25988 = (* (( (ptr) formal←c200019)+1) );
SOURCE(13107, 36)
(* (( (ptr) formal←c200016)+7) ) = (* (( (ptr) gf←c0470)+52) );
SOURCE(13145, 10)
(* (ptr) formal←c0386 ) = 2;
(* (( (ptr) formal←c0386)+1) ) = 6;
return;
};
};
if ((formal←c200017 == (* (( (ptr) (* (( (ptr) gf←c0470)+148)/* var←c30828 */ ))+4) ))) {
{
word position←v26048;
word wasThere←v26076;
word notThere←v26104;
position←v26048 = (* (ptr) formal←c200019 );
wasThere←v26076 = (* (( (ptr) formal←c200019)+1) );
notThere←v26104 = (* (( (ptr) formal←c200019)+2) );
SOURCE(13184, 34)
(* (( (ptr) formal←c200016)+7) ) = (* (( (ptr) gf←c0470)+53) );
SOURCE(13220, 10)
(* (ptr) formal←c0386 ) = 2;
(* (( (ptr) formal←c0386)+1) ) = 6;
return;
};
};
(* (ptr) formal←c0386 ) = 0;
(* (( (ptr) formal←c0386)+1) ) = 0;
return;
}
static void NoName←Q3924(formal←c0392, formal←c200012, formal←c200013, formal←c200014, formal←c200015)
word formal←c0392;
word formal←c200012;
word formal←c200013;
word formal←c200014;
word formal←c200015;
{
register ptr gf←c0471 = (ptr) &globalframe;
if ((formal←c200013 == (* (( (ptr) (* (( (ptr) gf←c0471)+137)/* var←c29964 */ ))+4) ))) {
{
word stream←v24708;
stream←v24708 = (* (ptr) formal←c200015 );
SOURCE(7585, 8)
(* (ptr) formal←c0392 ) = 2;
(* (( (ptr) formal←c0392)+1) ) = 5;
return;
};
};
(* (ptr) formal←c0392 ) = 0;
(* (( (ptr) formal←c0392)+1) ) = 0;
return;
}
static void NoName←Q3984(formal←c0407, formal←c200008, formal←c200009, formal←c200010, formal←c200011)
word formal←c0407;
word formal←c200008;
word formal←c200009;
word formal←c200010;
word formal←c200011;
{
register ptr gf←c0472 = (ptr) &globalframe;
if ((formal←c200009 == (* (( (ptr) (* (( (ptr) gf←c0472)+137)/* var←c29964 */ ))+5) ))) {
{
word ec←v22960;
word stream←v22988;
word details←v23016;
word msg←v23044;
ec←v22960 = (* (ptr) formal←c200011 );
stream←v22988 = (* (( (ptr) formal←c200011)+1) );
details←v23016 = (* (( (ptr) formal←c200011)+2) );
msg←v23044 = (* (( (ptr) formal←c200011)+3) );
SOURCE(8861, 31)
(* (( (ptr) formal←c200008)+16) ) = (* (( (ptr) gf←c0472)+50) );
SOURCE(8894, 10)
(* (ptr) formal←c0407 ) = 2;
(* (( (ptr) formal←c0407)+1) ) = 4;
return;
};
};
if ((formal←c200009 == (* (( (ptr) (* (( (ptr) gf←c0472)+137)/* var←c29964 */ ))+4) ))) {
{
word stream←v23196;
stream←v23196 = (* (ptr) formal←c200011 );
SOURCE(8926, 34)
(* (( (ptr) formal←c200008)+16) ) = (* (( (ptr) gf←c0472)+51) );
SOURCE(8962, 10)
(* (ptr) formal←c0407 ) = 2;
(* (( (ptr) formal←c0407)+1) ) = 4;
return;
};
};
if ((formal←c200009 == (* (( (ptr) (* (( (ptr) gf←c0472)+146)/* var←c30444 */ ))+7) ))) {
{
word reason←v23424;
word index←v23452;
reason←v23424 = (* (ptr) formal←c200011 );
index←v23452 = (* (( (ptr) formal←c200011)+1) );
SOURCE(8994, 36)
(* (( (ptr) formal←c200008)+16) ) = (* (( (ptr) gf←c0472)+52) );
SOURCE(9032, 10)
(* (ptr) formal←c0407 ) = 2;
(* (( (ptr) formal←c0407)+1) ) = 4;
return;
};
};
if ((formal←c200009 == (* (( (ptr) (* (( (ptr) gf←c0472)+148)/* var←c30828 */ ))+4) ))) {
{
word position←v23660;
word wasThere←v23688;
word notThere←v23716;
position←v23660 = (* (ptr) formal←c200011 );
wasThere←v23688 = (* (( (ptr) formal←c200011)+1) );
notThere←v23716 = (* (( (ptr) formal←c200011)+2) );
SOURCE(9071, 34)
(* (( (ptr) formal←c200008)+16) ) = (* (( (ptr) gf←c0472)+53) );
SOURCE(9107, 10)
(* (ptr) formal←c0407 ) = 2;
(* (( (ptr) formal←c0407)+1) ) = 4;
return;
};
};
(* (ptr) formal←c0407 ) = 0;
(* (( (ptr) formal←c0407)+1) ) = 0;
return;
}
static void NoName←Q4044(formal←c0412, formal←c200004, formal←c200005, formal←c200006, formal←c200007)
word formal←c0412;
word formal←c200004;
word formal←c200005;
word formal←c200006;
word formal←c200007;
{
register ptr gf←c0473 = (ptr) &globalframe;
if ((((formal←c200005 == (* (( (ptr) (* (( (ptr) gf←c0473)+142)/* var←c30156 */ ))+9) )) || (formal←c200005 == (* (ptr) (* (
( (ptr) (* (( (ptr) gf←c0473)+143)/* var←c30188 */ ))+6) ) ))) || (formal←c200005 == (* (ptr) (* (( (ptr) (* (( (ptr) gf←c0473)+143)
/* var←c30188 */ ))+7) ) ))) || (formal←c200005 == (* (( (ptr) (* (( (ptr) gf←c0473)+144)/* var←c30220 */ ))+12) ))) {
SOURCE(3223, 10)
(* (( (ptr) formal←c200004)+5) ) = 0;
SOURCE(3235, 8)
(* (ptr) formal←c0412 ) = 2;
(* (( (ptr) formal←c0412)+1) ) = 3;
return;
};
(* (ptr) formal←c0412 ) = 0;
(* (( (ptr) formal←c0412)+1) ) = 0;
return;
}
static void NoName←Q4104(formal←c0417, formal←c200000, formal←c200001, formal←c200002, formal←c200003)
word formal←c0417;
word formal←c200000;
word formal←c200001;
word formal←c200002;
word formal←c200003;
{
register ptr gf←c0474 = (ptr) &globalframe;
if ((((formal←c200001 == (* (( (ptr) (* (( (ptr) gf←c0474)+142)/* var←c30156 */ ))+9) )) || (formal←c200001 == (* (ptr) (* (
( (ptr) (* (( (ptr) gf←c0474)+143)/* var←c30188 */ ))+6) ) ))) || (formal←c200001 == (* (ptr) (* (( (ptr) (* (( (ptr) gf←c0474)+143)
/* var←c30188 */ ))+7) ) ))) || (formal←c200001 == (* (( (ptr) (* (( (ptr) gf←c0474)+144)/* var←c30220 */ ))+12) ))) {
SOURCE(2681, 10)
(* (( (ptr) formal←c200000)+5) ) = 0;
SOURCE(2693, 8)
(* (ptr) formal←c0417 ) = 2;
(* (( (ptr) formal←c0417)+1) ) = 2;
return;
};
(* (ptr) formal←c0417 ) = 0;
(* (( (ptr) formal←c0417)+1) ) = 0;
return;
}
/* file: GGFontImpl, module: GGFontImpl, compiled at: July 22, 1993 6:29:25 pm PDT */
extern void XR←install←GGFontImpl() {
NoName←Q2784();
}
extern void XR←run←GGFontImpl() { XR←Start(&globalframe); }