/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1993 by Xerox Corporation. All rights reserved. */
/* time: October 28, 1993 2:18:28 am PDT */
/* C2C version: April 20, 1993 (sun4) */
/* ref-counting: off */
/* file: Type1FontImpl, module: Type1FontImpl */
/* switches: bcfhklnouw */
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
#define XRM←BITXOR(x, y) (((word)(x)) ↑ ((word)(y)))
static char versionStamp[] = "@(#)mob←version [291378479,2651788963] Type1FontImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef word (*fPt)();
typedef struct {word f0, f1, f2;} W3;
typedef W3 *W3Pt;
typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8;
typedef struct {W8 f; word r;} W9;
typedef struct {word f0, f1, f2, f3;} W4;
typedef struct {word f0, f1, f2, f3, f4, f5;} W6;
typedef W4 *W4Pt;
typedef struct {W8 f; W6 r;} W14;
typedef struct {word f0, f1, f2, f3, f4, f5, f6;} W7;
typedef struct {word f0, f1;} W2;
typedef W2 *W2Pt;
typedef struct {W8 f; W3 r;} W11;
typedef struct {word f0, f1, f2, f3, f4;} W5;
typedef struct {W8 f; W8 r;} W16;
typedef struct {W16 f; W16 r;} W32;
typedef struct {W32 f; W32 r;} W64;
typedef struct {W8 f; W2 r;} W10;
typedef struct {W64 f; W10 r;} W74;
typedef W5 *W5Pt;
typedef struct {W16 f; W2 r;} W18;
typedef struct {W32 f; W18 r;} W50;
typedef struct {W32 f; W16 r;} W48;
typedef W48 *W48Pt;
#define SOURCE(p, l) /* source p, l */
#define BCK(idx, lim) ( ((unsigned) idx) >= ((unsigned) lim) ? (XR←RaiseBoundsFault()) : (idx) )
#define SGNCK(i) ((int) (word) (i) < 0 ? XR←RaiseArithmeticFault(): i )
#define INEG(x) ( (word) ( - ((int) (word) (x)) ) )
#define IOP2(op, x, y) ( (word) ((x) op (y)) )
static float fc268 = 0.0;
static float fc310 = 0.039625;
static float fc311 = 7.0;
static float fc312 = 1.0;
static float fc418 = 100.0;
static void NoName←Q7968();
static void Type1FontImpl←P0();
static word InitClassArray←P60();
static word InitDigitArray←P120();
static word InitEscapeArray←P180();
static word Transition←P240();
static word InitTransitionTable←P300();
static word RClassInit←P360();
static word RTransition←P420();
static word RTransitionInit←P480();
static word GetHexDigit←P540();
static word GetChar←P600();
static void PutBack←P660();
static void GetToken←P720();
static word CardFromText←P780();
static word IntFromText←P840();
static word RadixFromText←P900();
static word RealFromText←P960();
static word NoName←Q8028();
static word GetKeyword←P1020();
static void SkipToKeyword←P1080();
static word GetIntBeforeKeyword←P1140();
static word GetIntAfterKeyword←P1200();
static word GetString←P1260();
static word GetName←P1320();
static word IntFromToken←P1380();
static word GetInt←P1440();
static word RealFromToken←P1500();
static word GetReal←P1560();
static word GetBool←P1620();
static word Decrypt1←P1680();
static void BeginEExec←P1740();
static word GetUZone←P1800();
static void GetBlockFromString←P1860();
static void CharStringFromString←P1920();
static word SpecialFromToken←P1980();
static word OpenFromToken←P2040();
static void CloseFromToken←P2100();
static word GetOpenDelim←P2160();
static void GetCloseDelim←P2220();
static word GetMatrix←P2280();
static void GetBBox←P2340();
static word GetStdW←P2400();
static word GetArray←P2460();
static word ReadEncoding←P2520();
static word ReadCharString←P2580();
static word ReadSubrsInner←P2640();
static word ReadSubrs←P2700();
static void ReadFontInfo←P2760();
static word ReadCharStringsInner←P2820();
static word ReadCharStrings←P2880();
static word ReadMetrics2←P2940();
static word ReadMetrics2Entry←P3000();
static word CharStringsLength←P3060();
static void CharStringsForAll←P3120();
static word pairAction←P5628();
static word CharStringsKnown←P3180();
static void CharStringsGet←P3240();
static void SubrsGet←P3300();
static word ParseFont←P3360();
static void DecodeCharString←P3420();
static word Get←P5736();
static word EncodingGet←P3480();
static word StdEncodingGet←P3540();
static void ExecuteChar←P3600();
static word Get←P5892();
static void Begin←P5952();
static word I←P6012();
static word R←P6072();
static void PutI←P6132();
static void PutR←P6192();
static void Blend←P6492();
static void NoName←Q8088();
static struct {unsigned f; char r[8];} string1 = {262152, "\205\243\216\251\000\000\000"};
static struct {unsigned f; char r[8];} string2 = {393222, "\010\000\004A\000\001\000"};
static struct {unsigned f; char r[4];} string3 = {131076, "\216\251\000"};
static struct {unsigned f; char r[4];} string4 = {65537, "\001\000\000"};
static struct {unsigned f; char r[4];} string5 = {65540, "\251\000\000"};
static struct {unsigned f; char r[16];} string6 = {851984, "\257\300\165\060\311\160\300\377\002\144\023\101\304\000\000"};
static struct {unsigned f; char r[52];} string7 = {3211313, "\006\022\000\001\030\001\034\001\040\001\044\001\050\001\054\001\100\100\001\100\104\001\100\130\001\100\154\001\100\160\001\100\164\001\100\170\001\100\174\001\100\224\001\100\230\001\100\260\001\000\000"};
static struct {unsigned f; char r[16];} string8 = {851984, "\257\300\165\060\311\160\300\377\002\144\023\100\230\000\000"};
static struct {unsigned f; char r[4];} string9 = {131074, "\004\013\000"};
static struct {unsigned f; char r[16];} string10 = {851984, "\257\300\021\136\025\057\300\236\017\026\243\105\000\000\000"};
static struct {unsigned f; char r[4];} string11 = {131074, "\004\007\000"};
static struct {unsigned f; char r[16];} string12 = {851984, "\257\300\165\060\311\160\300\377\002\144\023\101\270\000\000"};
static struct {unsigned f; char r[16];} string13 = {851984, "\257\300\021\136\025\057\300\236\017\026\243\103\134\000\000"};
static struct {unsigned f; char r[12];} string14 = {524296, "\011\000\004\000\040\000\004\001\000\000\000"};
static struct {unsigned f; char r[16];} string15 = {851984, "\257\300\165\060\311\160\300\377\002\144\023\101\254\000\000"};
static struct {unsigned f; char r[16];} string16 = {851984, "\257\300\021\136\025\057\300\236\017\026\243\103\040\000\000"};
static struct {unsigned f; char r[16];} string17 = {851984, "\257\300\165\060\311\160\300\377\002\144\023\100\164\000\000"};
static struct {unsigned f; char r[32];} string18 = {1835040, "\254\205\257\300\021\136\025\057\300\236\017\026\243\100\260\257\300\021\136\025\057\300\236\017\026\243\100\274\000\000\000"};
static struct {unsigned f; char r[44];} string19 = {2818092, "\205\257\300\021\136\025\057\300\236\017\026\243\100\274\216\254\205\257\300\021\136\025\057\300\236\017\026\243\100\260\257\300\021\136\025\057\300\236\017\026\243\100\274"};
static struct {unsigned f; char r[4];} string20 = {196611, "\004C\377"};
static struct {unsigned f; char r[20];} string21 = {1048596, "\254\205\243\257\300\021\136\025\057\300\236\017\026\243\100\260\000\000\000"};
static struct {unsigned f; char r[32];} string22 = {1835040, "\254\205\257\300\021\136\025\057\300\236\017\026\243\100\200\257\300\021\136\025\057\300\236\017\026\243\100\244\000\000\000"};
static struct {unsigned f; char r[44];} string23 = {2818092, "\205\257\300\021\136\025\057\300\236\017\026\243\100\214\216\254\205\257\300\021\136\025\057\300\236\017\026\243\100\200\257\300\021\136\025\057\300\236\017\026\243\100\244"};
static struct {unsigned f; char r[8];} string24 = {327685, "\010\000\004\026\001\000\000"};
static struct {unsigned f; char r[8];} string25 = {262152, "\254\205\243\243\000\000\000"};
static struct {unsigned f; char r[8];} string26 = {458760, "\254\205\243\210\242\000#"};
static struct {unsigned f; char r[20];} string27 = {1048596, "\254\205\243\257\300\021\136\025\057\300\236\017\026\243\100\200\000\000\000"};
static struct {unsigned f; char r[16];} string28 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"};
static struct {unsigned f; char r[8];} string29 = {458760, "greater"};
static struct {unsigned f; char r[12];} string30 = {524300, "question\000\000\000"};
static struct {unsigned f; char r[4];} string31 = {131076, "at\000"};
static struct {unsigned f; char r[4];} string32 = {65540, "A\000\000"};
static struct {unsigned f; char r[4];} string33 = {65540, "B\000\000"};
static struct {unsigned f; char r[4];} string34 = {65540, "C\000\000"};
static struct {unsigned f; char r[4];} string35 = {65540, "D\000\000"};
static struct {unsigned f; char r[4];} string36 = {65540, "E\000\000"};
static struct {unsigned f; char r[4];} string37 = {65540, "F\000\000"};
static struct {unsigned f; char r[4];} string38 = {65540, "G\000\000"};
static struct {unsigned f; char r[4];} string39 = {65540, "H\000\000"};
static struct {unsigned f; char r[4];} string40 = {65540, "I\000\000"};
static struct {unsigned f; char r[4];} string41 = {65540, "J\000\000"};
static struct {unsigned f; char r[4];} string42 = {65540, "K\000\000"};
static struct {unsigned f; char r[4];} string43 = {65540, "L\000\000"};
static struct {unsigned f; char r[4];} string44 = {65540, "M\000\000"};
static struct {unsigned f; char r[4];} string45 = {65540, "N\000\000"};
static struct {unsigned f; char r[4];} string46 = {65540, "O\000\000"};
static struct {unsigned f; char r[4];} string47 = {65540, "P\000\000"};
static struct {unsigned f; char r[4];} string48 = {65540, "Q\000\000"};
static struct {unsigned f; char r[4];} string49 = {65540, "R\000\000"};
static struct {unsigned f; char r[4];} string50 = {65540, "S\000\000"};
static struct {unsigned f; char r[4];} string51 = {65540, "T\000\000"};
static struct {unsigned f; char r[4];} string52 = {65540, "U\000\000"};
static struct {unsigned f; char r[4];} string53 = {65540, "V\000\000"};
static struct {unsigned f; char r[4];} string54 = {65540, "W\000\000"};
static struct {unsigned f; char r[4];} string55 = {65540, "X\000\000"};
static struct {unsigned f; char r[4];} string56 = {65540, "Y\000\000"};
static struct {unsigned f; char r[4];} string57 = {65540, "Z\000\000"};
static struct {unsigned f; char r[12];} string58 = {720908, "bracketleft"};
static struct {unsigned f; char r[12];} string59 = {589836, "backslash\000\000"};
static struct {unsigned f; char r[16];} string60 = {786448, "bracketright\000\000\000"};
static struct {unsigned f; char r[12];} string61 = {720908, "asciicircum"};
static struct {unsigned f; char r[12];} string62 = {655372, "underscore\000"};
static struct {unsigned f; char r[12];} string63 = {589836, "quoteleft\000\000"};
static struct {unsigned f; char r[4];} string64 = {65540, "a\000\000"};
static struct {unsigned f; char r[4];} string65 = {65540, "b\000\000"};
static struct {unsigned f; char r[4];} string66 = {65540, "c\000\000"};
static struct {unsigned f; char r[4];} string67 = {65540, "d\000\000"};
static struct {unsigned f; char r[4];} string68 = {65540, "e\000\000"};
static struct {unsigned f; char r[4];} string69 = {65540, "f\000\000"};
static struct {unsigned f; char r[4];} string70 = {65540, "g\000\000"};
static struct {unsigned f; char r[4];} string71 = {65540, "h\000\000"};
static struct {unsigned f; char r[4];} string72 = {65540, "i\000\000"};
static struct {unsigned f; char r[4];} string73 = {65540, "j\000\000"};
static struct {unsigned f; char r[4];} string74 = {65540, "k\000\000"};
static struct {unsigned f; char r[4];} string75 = {65540, "l\000\000"};
static struct {unsigned f; char r[4];} string76 = {65540, "m\000\000"};
static struct {unsigned f; char r[4];} string77 = {65540, "n\000\000"};
static struct {unsigned f; char r[4];} string78 = {65540, "o\000\000"};
static struct {unsigned f; char r[4];} string79 = {65540, "p\000\000"};
static struct {unsigned f; char r[4];} string80 = {65540, "q\000\000"};
static struct {unsigned f; char r[4];} string81 = {65540, "r\000\000"};
static struct {unsigned f; char r[4];} string82 = {65540, "s\000\000"};
static struct {unsigned f; char r[4];} string83 = {65540, "t\000\000"};
static struct {unsigned f; char r[4];} string84 = {65540, "u\000\000"};
static struct {unsigned f; char r[4];} string85 = {65540, "v\000\000"};
static struct {unsigned f; char r[4];} string86 = {65540, "w\000\000"};
static struct {unsigned f; char r[4];} string87 = {65540, "x\000\000"};
static struct {unsigned f; char r[4];} string88 = {65540, "y\000\000"};
static struct {unsigned f; char r[4];} string89 = {65540, "z\000\000"};
static struct {unsigned f; char r[12];} string90 = {589836, "braceleft\000\000"};
static struct {unsigned f; char r[4];} string91 = {196612, "bar"};
static struct {unsigned f; char r[12];} string92 = {655372, "braceright\000"};
static struct {unsigned f; char r[12];} string93 = {655372, "asciitilde\000"};
static struct {unsigned f; char r[12];} string94 = {655372, "exclamdown\000"};
static struct {unsigned f; char r[8];} string95 = {262152, "cent\000\000\000"};
static struct {unsigned f; char r[12];} string96 = {524300, "sterling\000\000\000"};
static struct {unsigned f; char r[12];} string97 = {524300, "fraction\000\000\000"};
static struct {unsigned f; char r[4];} string98 = {196612, "yen"};
static struct {unsigned f; char r[8];} string99 = {393224, "florin\000"};
static struct {unsigned f; char r[8];} string100 = {458760, "section"};
static struct {unsigned f; char r[12];} string101 = {524300, "currency\000\000\000"};
static struct {unsigned f; char r[12];} string102 = {720908, "quotesingle"};
static struct {unsigned f; char r[16];} string103 = {786448, "quotedblleft\000\000\000"};
static struct {unsigned f; char r[16];} string104 = {851984, "guillemotleft\000\000"};
static struct {unsigned f; char r[16];} string105 = {851984, "guilsinglleft\000\000"};
static struct {unsigned f; char r[16];} string106 = {917520, "guilsinglright\000"};
static struct {unsigned f; char r[4];} string107 = {131076, "fi\000"};
static struct {unsigned f; char r[4];} string108 = {131076, "fl\000"};
static struct {unsigned f; char r[8];} string109 = {393224, "endash\000"};
static struct {unsigned f; char r[8];} string110 = {393224, "dagger\000"};
static struct {unsigned f; char r[12];} string111 = {589836, "daggerdbl\000\000"};
static struct {unsigned f; char r[16];} string112 = {917520, "periodcentered\000"};
static struct {unsigned f; char r[12];} string113 = {589836, "paragraph\000\000"};
static struct {unsigned f; char r[8];} string114 = {393224, "bullet\000"};
static struct {unsigned f; char r[16];} string115 = {917520, "quotesinglbase\000"};
static struct {unsigned f; char r[16];} string116 = {786448, "quotedblbase\000\000\000"};
static struct {unsigned f; char r[16];} string117 = {851984, "quotedblright\000\000"};
static struct {unsigned f; char r[16];} string118 = {917520, "guillemotright\000"};
static struct {unsigned f; char r[12];} string119 = {524300, "ellipsis\000\000\000"};
static struct {unsigned f; char r[12];} string120 = {720908, "perthousand"};
static struct {unsigned f; char r[16];} string121 = {786448, "questiondown\000\000\000"};
static struct {unsigned f; char r[8];} string122 = {327688, "grave\000\000"};
static struct {unsigned f; char r[8];} string123 = {327688, "acute\000\000"};
static struct {unsigned f; char r[12];} string124 = {655372, "circumflex\000"};
static struct {unsigned f; char r[8];} string125 = {327688, "tilde\000\000"};
static struct {unsigned f; char r[8];} string126 = {393224, "macron\000"};
static struct {unsigned f; char r[8];} string127 = {327688, "breve\000\000"};
static struct {unsigned f; char r[12];} string128 = {589836, "dotaccent\000\000"};
static struct {unsigned f; char r[12];} string129 = {524300, "dieresis\000\000\000"};
static struct {unsigned f; char r[8];} string130 = {262152, "ring\000\000\000"};
static struct {unsigned f; char r[8];} string131 = {458760, "cedilla"};
static struct {unsigned f; char r[16];} string132 = {786448, "hungarumlaut\000\000\000"};
static struct {unsigned f; char r[8];} string133 = {393224, "ogonek\000"};
static struct {unsigned f; char r[8];} string134 = {327688, "caron\000\000"};
static struct {unsigned f; char r[8];} string135 = {393224, "emdash\000"};
static struct {unsigned f; char r[4];} string136 = {131076, "AE\000"};
static struct {unsigned f; char r[12];} string137 = {720908, "ordfeminine"};
static struct {unsigned f; char r[8];} string138 = {393224, "Lslash\000"};
static struct {unsigned f; char r[8];} string139 = {393224, "Oslash\000"};
static struct {unsigned f; char r[4];} string140 = {131076, "OE\000"};
static struct {unsigned f; char r[16];} string141 = {786448, "ordmasculine\000\000\000"};
static struct {unsigned f; char r[4];} string142 = {131076, "ae\000"};
static struct {unsigned f; char r[12];} string143 = {524300, "dotlessi\000\000\000"};
static struct {unsigned f; char r[8];} string144 = {393224, "lslash\000"};
static struct {unsigned f; char r[8];} string145 = {393224, "oslash\000"};
static struct {unsigned f; char r[4];} string146 = {131076, "oe\000"};
static struct {unsigned f; char r[12];} string147 = {655372, "germandbls\000"};
static struct {unsigned f; char r[8];} string148 = {327688, "equal\000\000"};
static struct {unsigned f; char r[8];} string149 = {262152, "less\000\000\000"};
static struct {unsigned f; char r[8];} string150 = {458760, ".notdef"};
static struct {unsigned f; char r[12];} string151 = {589836, "semicolon\000\000"};
static struct {unsigned f; char r[8];} string152 = {327688, "colon\000\000"};
static struct {unsigned f; char r[8];} string153 = {262152, "nine\000\000\000"};
static struct {unsigned f; char r[8];} string154 = {327688, "eight\000\000"};
static struct {unsigned f; char r[8];} string155 = {327688, "seven\000\000"};
static struct {unsigned f; char r[4];} string156 = {196612, "six"};
static struct {unsigned f; char r[8];} string157 = {262152, "five\000\000\000"};
static struct {unsigned f; char r[8];} string158 = {262152, "four\000\000\000"};
static struct {unsigned f; char r[8];} string159 = {327688, "three\000\000"};
static struct {unsigned f; char r[4];} string160 = {196612, "two"};
static struct {unsigned f; char r[4];} string161 = {196612, "one"};
static struct {unsigned f; char r[8];} string162 = {262152, "zero\000\000\000"};
static struct {unsigned f; char r[8];} string163 = {262152, "true\000\000\000"};
static struct {unsigned f; char r[8];} string164 = {327688, "false\000\000"};
static struct {unsigned f; char r[8];} string165 = {327688, "slash\000\000"};
static struct {unsigned f; char r[8];} string166 = {393224, "period\000"};
static struct {unsigned f; char r[8];} string167 = {393224, "hyphen\000"};
static struct {unsigned f; char r[20];} string168 = {1048596, "StandardEncoding\000\000\000"};
static struct {unsigned f; char r[4];} string169 = {196612, "dup"};
static struct {unsigned f; char r[12];} string170 = {524300, "readonly\000\000\000"};
static struct {unsigned f; char r[4];} string171 = {196612, "def"};
static struct {unsigned f; char r[8];} string172 = {327688, "array\000\000"};
static struct {unsigned f; char r[8];} string173 = {327688, "comma\000\000"};
static struct {unsigned f; char r[8];} string174 = {458760, "version"};
static struct {unsigned f; char r[8];} string175 = {393224, "Notice\000"};
static struct {unsigned f; char r[12];} string176 = {524300, "FullName\000\000\000"};
static struct {unsigned f; char r[12];} string177 = {655372, "FamilyName\000"};
static struct {unsigned f; char r[8];} string178 = {393224, "Weight\000"};
static struct {unsigned f; char r[12];} string179 = {720908, "ItalicAngle"};
static struct {unsigned f; char r[16];} string180 = {786448, "isFixedPitch\000\000\000"};
static struct {unsigned f; char r[20];} string181 = {1114132, "UnderlinePosition\000\000"};
static struct {unsigned f; char r[20];} string182 = {1179668, "UnderlineThickness\000"};
static struct {unsigned f; char r[4];} string183 = {196612, "end"};
static struct {unsigned f; char r[8];} string184 = {262152, "dict\000\000\000"};
static struct {unsigned f; char r[8];} string185 = {327688, "begin\000\000"};
static struct {unsigned f; char r[8];} string186 = {262152, "plus\000\000\000"};
static struct {unsigned f; char r[12];} string187 = {524300, "asterisk\000\000\000"};
static struct {unsigned f; char r[12];} string188 = {655372, "parenright\000"};
static struct {unsigned f; char r[12];} string189 = {589836, "parenleft\000\000"};
static struct {unsigned f; char r[12];} string190 = {655372, "quoteright\000"};
static struct {unsigned f; char r[12];} string191 = {589836, "ampersand\000\000"};
static struct {unsigned f; char r[8];} string192 = {458760, "percent"};
static struct {unsigned f; char r[8];} string193 = {393224, "dollar\000"};
static struct {unsigned f; char r[12];} string194 = {655372, "numbersign\000"};
static struct {unsigned f; char r[12];} string195 = {524300, "quotedbl\000\000\000"};
static struct {unsigned f; char r[8];} string196 = {393224, "exclam\000"};
static struct {unsigned f; char r[8];} string197 = {327688, "space\000\000"};
static struct {unsigned f; char r[12];} string198 = {524300, "FontInfo\000\000\000"};
static struct {unsigned f; char r[12];} string199 = {524300, "FontName\000\000\000"};
static struct {unsigned f; char r[12];} string200 = {524300, "Encoding\000\000\000"};
static struct {unsigned f; char r[12];} string201 = {589836, "PaintType\000\000"};
static struct {unsigned f; char r[12];} string202 = {524300, "FontType\000\000\000"};
static struct {unsigned f; char r[12];} string203 = {655372, "FontMatrix\000"};
static struct {unsigned f; char r[12];} string204 = {524300, "FontBBox\000\000\000"};
static struct {unsigned f; char r[12];} string205 = {524300, "UniqueID\000\000\000"};
static struct {unsigned f; char r[12];} string206 = {720908, "StrokeWidth"};
static struct {unsigned f; char r[12];} string207 = {524300, "Metrics2\000\000\000"};
static struct {unsigned f; char r[8];} string208 = {327688, "eexec\000\000"};
static struct {unsigned f; char r[8];} string209 = {458760, "Private"};
static struct {unsigned f; char r[8];} string210 = {327688, "hires\000\000"};
static struct {unsigned f; char r[8];} string211 = {327688, "Subrs\000\000"};
static struct {unsigned f; char r[12];} string212 = {589836, "ForceBold\000\000"};
static struct {unsigned f; char r[16];} string213 = {851984, "LanguageGroup\000\000"};
static struct {unsigned f; char r[8];} string214 = {327688, "lenIV\000\000"};
static struct {unsigned f; char r[12];} string215 = {589836, "RndStemUp\000\000"};
static struct {unsigned f; char r[12];} string216 = {524300, "password\000\000\000"};
static struct {unsigned f; char r[12];} string217 = {655372, "BlueValues\000"};
static struct {unsigned f; char r[12];} string218 = {655372, "OtherBlues\000"};
static struct {unsigned f; char r[12];} string219 = {720908, "FamilyBlues"};
static struct {unsigned f; char r[20];} string220 = {1048596, "FamilyOtherBlues\000\000\000"};
static struct {unsigned f; char r[12];} string221 = {589836, "BlueScale\000\000"};
static struct {unsigned f; char r[12];} string222 = {589836, "BlueShift\000\000"};
static struct {unsigned f; char r[12];} string223 = {524300, "BlueFuzz\000\000\000"};
static struct {unsigned f; char r[8];} string224 = {327688, "StdHW\000\000"};
static struct {unsigned f; char r[8];} string225 = {327688, "StdVW\000\000"};
static struct {unsigned f; char r[12];} string226 = {589836, "StemSnapH\000\000"};
static struct {unsigned f; char r[12];} string227 = {589836, "StemSnapV\000\000"};
static struct {unsigned f; char r[12];} string228 = {720908, "CharStrings"};
static struct {unsigned f; char r[16];} string229 = {851984, "\257\300\021\136\025\057\300\236\017\026\243\100\164\000\000"};
static struct {unsigned f; char r[32];} string230 = {1835036, "\006\012\020\001\024\001\030\001\034\001\040\001\044\001\050\001\054\001\060\001\100\270\010\000\004\100\310\001\000\000\000"};
static struct {unsigned f; char r[16];} string231 = {851984, "\257\300\055\153\222\376\300\327\164\352\142\100\150\000\000"};
static struct {unsigned f; char r[16];} string232 = {851984, "\257\300\121\117\377\026\300\315\013\026\004\100\150\000\000"};
static struct {unsigned f; char r[16];} string233 = {851984, "\257\300\015\277\004\146\300\034\367\146\045\100\164\000\000"};
static struct {unsigned f; char r[16];} string234 = {851984, "\257\300\246\205\220\035\300\344\000\142\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string235 = {851984, "\257\300\242\221\264\046\300\105\142\142\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string236 = {851984, "\257\300\332\223\177\020\300\304\076\102\260\100\164\000\000"};
static struct {unsigned f; char r[16];} string237 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\100\150\000\000"};
static struct {unsigned f; char r[16];} string238 = {851984, "\257\300\277\374\326\303\300\302\136\022\175\100\150\000\000"};
static struct {unsigned f; char r[16];} string239 = {851984, "\257\300\165\060\311\160\300\377\002\144\023\100\150\000\000"};
static struct {
word f0[247]; word f247; word f248; word f249;
word f250; word f251; word f252; word f253;
word f254; word f255; word f256; word f257;
word f258; word f259; word f260; word f261;
word f262; word f263; word f264; word f265;
word f266; word f267; word f268; word f269;
word f270; word f271; word f272; word f273;
word f274; word f275; word f276; word f277;
word f278; word f279; word f280; word f281;
word f282; word f283; word f284; word f285;
word f286; word f287; word f288; word f289;
word f290; word f291; word f292; word f293;
word f294; word f295; word f296; word f297;
word f298; word f299; word f300; word f301;
word f302; word f303; word f304; word f305;
word f306; word f307; word f308; word f309;
word f310; word f311; word f312; word f313;
word f314; word f315; word f316; word f317;
word f318; word f319; word f320; word f321;
word f322; word f323; word f324; word f325;
word f326; word f327; word f328; word f329;
word f330; word f331; word f332; word f333;
word f334; word f335; word f336; word f337;
word f338; word f339; word f340; word f341;
word f342; word f343; word f344; word f345;
word f346; word f347; word f348; word f349;
word f350; word f351; word f352; word f353;
word f354; word f355; word f356; word f357;
word f358; word f359; word f360; word f361;
word f362; word f363; word f364; word f365;
word f366; word f367; word f368[10];
} globalframe = {
{0}, (word) ExecuteChar←P3600, 0, (word) StdEncodingGet←P3540,
0, (word) EncodingGet←P3480, 0, (word) DecodeCharString←P3420,
0, (word) ParseFont←P3360, 0, (word) SubrsGet←P3300,
0, (word) CharStringsGet←P3240, 0, (word) CharStringsKnown←P3180,
0, (word) CharStringsForAll←P3120, 0, (word) CharStringsLength←P3060,
0, (word) ReadMetrics2Entry←P3000, 0, (word) ReadMetrics2←P2940,
0, (word) ReadCharStrings←P2880, 0, (word) ReadCharStringsInner←P2820,
0, (word) ReadFontInfo←P2760, 0, (word) ReadSubrs←P2700,
0, (word) ReadSubrsInner←P2640, 0, (word) ReadCharString←P2580,
0, (word) ReadEncoding←P2520, 0, (word) GetArray←P2460,
0, (word) GetStdW←P2400, 0, (word) GetBBox←P2340,
0, (word) GetMatrix←P2280, 0, (word) GetCloseDelim←P2220,
0, (word) GetOpenDelim←P2160, 0, (word) CloseFromToken←P2100,
0, (word) OpenFromToken←P2040, 0, (word) SpecialFromToken←P1980,
0, (word) CharStringFromString←P1920, 0, (word) GetBlockFromString←P1860,
0, (word) GetUZone←P1800, 0, (word) BeginEExec←P1740,
0, (word) Decrypt1←P1680, 0, (word) GetBool←P1620,
0, (word) GetReal←P1560, 0, (word) RealFromToken←P1500,
0, (word) GetInt←P1440, 0, (word) IntFromToken←P1380,
0, (word) GetName←P1320, 0, (word) GetString←P1260,
0, (word) GetIntAfterKeyword←P1200, 0, (word) GetIntBeforeKeyword←P1140,
0, (word) SkipToKeyword←P1080, 0, (word) GetKeyword←P1020,
0, (word) RealFromText←P960, 0, (word) RadixFromText←P900,
0, (word) IntFromText←P840, 0, (word) CardFromText←P780,
0, (word) GetToken←P720, 0, (word) PutBack←P660,
0, (word) GetChar←P600, 0, (word) GetHexDigit←P540,
0, (word) RTransitionInit←P480, 0, (word) RTransition←P420,
0, (word) RClassInit←P360, 0, (word) InitTransitionTable←P300,
0, (word) Transition←P240, 0, (word) InitEscapeArray←P180,
0, (word) InitDigitArray←P120, 0, (word) InitClassArray←P60,
0, (word) Type1FontImpl←P0, {0}
};
static void NoName←Q7968()
{
register ptr gf←c0622 = (ptr) &globalframe;
word var←c50868;
(* (( (ptr) gf←c0622)+13) ) = (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2);
(* (( (ptr) gf←c0622)+14) ) = (word) XR←GetTypeIndex((word) &string3, 0, (word) &string4);
(* (( (ptr) gf←c0622)+16) ) = (word) XR←GetTypeIndexS((word) (&string5));
(* (( (ptr) gf←c0622)+22) ) = (word) XR←GetTypeIndex((word) &string6, 0, (word) &string7);
(* (( (ptr) gf←c0622)+25) ) = (word) XR←GetTypeIndex((word) &string8, 0, (word) &string9);
(* (( (ptr) gf←c0622)+26) ) = (word) XR←GetTypeIndex((word) &string10, 0, (word) &string11);
(* (( (ptr) gf←c0622)+27) ) = (word) XR←GetTypeIndexS((word) (&string12));
(* (( (ptr) gf←c0622)+28) ) = (word) XR←GetTypeIndex((word) &string13, 0, (word) &string14);
(* (( (ptr) gf←c0622)+29) ) = (word) XR←GetTypeIndexS((word) (&string15));
(* (( (ptr) gf←c0622)+30) ) = (word) XR←GetTypeIndexS((word) (&string16));
(* (( (ptr) gf←c0622)+31) ) = (word) XR←GetTypeIndexS((word) (&string17));
(* (( (ptr) gf←c0622)+32) ) = (word) XR←GetTypeIndexS((word) (&string18));
(* (( (ptr) gf←c0622)+33) ) = (word) XR←GetTypeIndex((word) &string19, 0, (word) &string20);
(* (( (ptr) gf←c0622)+34) ) = (word) XR←GetTypeIndexS((word) (&string21));
(* (( (ptr) gf←c0622)+35) ) = (word) XR←GetTypeIndexS((word) (&string22));
(* (( (ptr) gf←c0622)+36) ) = (word) XR←GetTypeIndex((word) &string23, 0, (word) &string24);
(* (( (ptr) gf←c0622)+37) ) = (word) XR←GetTypeIndexS((word) (&string25));
(* (( (ptr) gf←c0622)+38) ) = (word) XR←GetTypeIndexS((word) (&string26));
(* (( (ptr) gf←c0622)+39) ) = (word) XR←GetTypeIndexS((word) (&string27));
(* (( (ptr) gf←c0622)+44) ) = (word) XR←GetTypeIndex((word) &string28, 0, (word) &string4);
(* (ptr) (( (bPt) gf←c0622)+184) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string29);
(* (ptr) (( (bPt) gf←c0622)+188) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string30);
(* (ptr) (( (bPt) gf←c0622)+192) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string31);
(* (ptr) (( (bPt) gf←c0622)+196) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string32);
(* (ptr) (( (bPt) gf←c0622)+200) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string33);
(* (ptr) (( (bPt) gf←c0622)+204) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string34);
(* (ptr) (( (bPt) gf←c0622)+208) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string35);
(* (ptr) (( (bPt) gf←c0622)+212) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string36);
(* (ptr) (( (bPt) gf←c0622)+216) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string37);
(* (ptr) (( (bPt) gf←c0622)+220) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string38);
(* (ptr) (( (bPt) gf←c0622)+224) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string39);
(* (ptr) (( (bPt) gf←c0622)+228) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string40);
(* (ptr) (( (bPt) gf←c0622)+232) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string41);
(* (ptr) (( (bPt) gf←c0622)+236) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string42);
(* (ptr) (( (bPt) gf←c0622)+240) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string43);
(* (ptr) (( (bPt) gf←c0622)+244) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string44);
(* (ptr) (( (bPt) gf←c0622)+248) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string45);
(* (ptr) (( (bPt) gf←c0622)+252) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string46);
(* (ptr) (( (bPt) gf←c0622)+256) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string47);
(* (ptr) (( (bPt) gf←c0622)+260) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string48);
(* (ptr) (( (bPt) gf←c0622)+264) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string49);
(* (ptr) (( (bPt) gf←c0622)+268) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string50);
(* (ptr) (( (bPt) gf←c0622)+272) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string51);
(* (ptr) (( (bPt) gf←c0622)+276) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string52);
(* (ptr) (( (bPt) gf←c0622)+280) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string53);
(* (ptr) (( (bPt) gf←c0622)+284) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string54);
(* (ptr) (( (bPt) gf←c0622)+288) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string55);
(* (ptr) (( (bPt) gf←c0622)+292) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string56);
(* (ptr) (( (bPt) gf←c0622)+296) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string57);
(* (ptr) (( (bPt) gf←c0622)+300) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string58);
(* (ptr) (( (bPt) gf←c0622)+304) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string59);
(* (ptr) (( (bPt) gf←c0622)+308) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string60);
(* (ptr) (( (bPt) gf←c0622)+312) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string61);
(* (ptr) (( (bPt) gf←c0622)+316) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string62);
(* (ptr) (( (bPt) gf←c0622)+320) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string63);
(* (ptr) (( (bPt) gf←c0622)+324) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string64);
(* (ptr) (( (bPt) gf←c0622)+328) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string65);
(* (ptr) (( (bPt) gf←c0622)+332) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string66);
(* (ptr) (( (bPt) gf←c0622)+336) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string67);
(* (ptr) (( (bPt) gf←c0622)+340) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string68);
(* (ptr) (( (bPt) gf←c0622)+344) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string69);
(* (ptr) (( (bPt) gf←c0622)+348) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string70);
(* (ptr) (( (bPt) gf←c0622)+352) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string71);
(* (ptr) (( (bPt) gf←c0622)+356) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string72);
(* (ptr) (( (bPt) gf←c0622)+360) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string73);
(* (ptr) (( (bPt) gf←c0622)+364) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string74);
(* (ptr) (( (bPt) gf←c0622)+368) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string75);
(* (ptr) (( (bPt) gf←c0622)+372) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string76);
(* (ptr) (( (bPt) gf←c0622)+376) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string77);
(* (ptr) (( (bPt) gf←c0622)+380) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string78);
(* (ptr) (( (bPt) gf←c0622)+384) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string79);
(* (ptr) (( (bPt) gf←c0622)+388) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string80);
(* (ptr) (( (bPt) gf←c0622)+392) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string81);
(* (ptr) (( (bPt) gf←c0622)+396) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string82);
(* (ptr) (( (bPt) gf←c0622)+400) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string83);
(* (ptr) (( (bPt) gf←c0622)+404) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string84);
(* (ptr) (( (bPt) gf←c0622)+408) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string85);
(* (ptr) (( (bPt) gf←c0622)+412) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string86);
(* (ptr) (( (bPt) gf←c0622)+416) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string87);
(* (ptr) (( (bPt) gf←c0622)+420) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string88);
(* (ptr) (( (bPt) gf←c0622)+424) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string89);
(* (ptr) (( (bPt) gf←c0622)+428) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string90);
(* (ptr) (( (bPt) gf←c0622)+432) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string91);
(* (ptr) (( (bPt) gf←c0622)+436) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string92);
(* (ptr) (( (bPt) gf←c0622)+440) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string93);
(* (ptr) (( (bPt) gf←c0622)+444) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string94);
(* (ptr) (( (bPt) gf←c0622)+448) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string95);
(* (ptr) (( (bPt) gf←c0622)+452) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string96);
(* (ptr) (( (bPt) gf←c0622)+456) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string97);
(* (ptr) (( (bPt) gf←c0622)+460) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string98);
(* (ptr) (( (bPt) gf←c0622)+464) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string99);
(* (ptr) (( (bPt) gf←c0622)+468) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string100);
(* (ptr) (( (bPt) gf←c0622)+472) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string101);
(* (ptr) (( (bPt) gf←c0622)+476) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string102);
(* (ptr) (( (bPt) gf←c0622)+480) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string103);
(* (ptr) (( (bPt) gf←c0622)+484) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string104);
(* (ptr) (( (bPt) gf←c0622)+488) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string105);
(* (ptr) (( (bPt) gf←c0622)+492) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string106);
(* (ptr) (( (bPt) gf←c0622)+496) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string107);
(* (ptr) (( (bPt) gf←c0622)+500) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string108);
(* (ptr) (( (bPt) gf←c0622)+504) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string109);
(* (ptr) (( (bPt) gf←c0622)+508) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string110);
(* (ptr) (( (bPt) gf←c0622)+512) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string111);
(* (ptr) (( (bPt) gf←c0622)+516) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string112);
(* (ptr) (( (bPt) gf←c0622)+520) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string113);
(* (ptr) (( (bPt) gf←c0622)+524) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string114);
(* (ptr) (( (bPt) gf←c0622)+528) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string115);
(* (ptr) (( (bPt) gf←c0622)+532) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string116);
(* (ptr) (( (bPt) gf←c0622)+536) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string117);
(* (ptr) (( (bPt) gf←c0622)+540) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string118);
(* (ptr) (( (bPt) gf←c0622)+544) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string119);
(* (ptr) (( (bPt) gf←c0622)+548) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string120);
(* (ptr) (( (bPt) gf←c0622)+552) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string121);
(* (ptr) (( (bPt) gf←c0622)+556) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string122);
(* (ptr) (( (bPt) gf←c0622)+560) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string123);
(* (ptr) (( (bPt) gf←c0622)+564) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string124);
(* (ptr) (( (bPt) gf←c0622)+568) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string125);
(* (ptr) (( (bPt) gf←c0622)+572) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string126);
(* (ptr) (( (bPt) gf←c0622)+576) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string127);
(* (ptr) (( (bPt) gf←c0622)+580) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string128);
(* (ptr) (( (bPt) gf←c0622)+584) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string129);
(* (ptr) (( (bPt) gf←c0622)+588) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string130);
(* (ptr) (( (bPt) gf←c0622)+592) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string131);
(* (ptr) (( (bPt) gf←c0622)+596) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string132);
(* (ptr) (( (bPt) gf←c0622)+600) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string133);
(* (ptr) (( (bPt) gf←c0622)+604) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string134);
(* (ptr) (( (bPt) gf←c0622)+608) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string135);
(* (ptr) (( (bPt) gf←c0622)+612) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string136);
(* (ptr) (( (bPt) gf←c0622)+616) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string137);
(* (ptr) (( (bPt) gf←c0622)+620) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string138);
(* (ptr) (( (bPt) gf←c0622)+624) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string139);
(* (ptr) (( (bPt) gf←c0622)+628) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string140);
(* (ptr) (( (bPt) gf←c0622)+632) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string141);
(* (ptr) (( (bPt) gf←c0622)+636) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string142);
(* (ptr) (( (bPt) gf←c0622)+640) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string143);
(* (ptr) (( (bPt) gf←c0622)+644) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string144);
(* (ptr) (( (bPt) gf←c0622)+648) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string145);
(* (ptr) (( (bPt) gf←c0622)+652) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string146);
(* (ptr) (( (bPt) gf←c0622)+656) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string147);
(* (ptr) (( (bPt) gf←c0622)+660) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string148);
(* (ptr) (( (bPt) gf←c0622)+664) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string149);
(* (ptr) (( (bPt) gf←c0622)+668) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+44) ), (word) &string150);
(* (ptr) (( (bPt) gf←c0622)+672) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string151);
(* (ptr) (( (bPt) gf←c0622)+676) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string152);
(* (ptr) (( (bPt) gf←c0622)+680) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string153);
(* (ptr) (( (bPt) gf←c0622)+684) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string154);
(* (ptr) (( (bPt) gf←c0622)+688) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string155);
(* (ptr) (( (bPt) gf←c0622)+692) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string156);
(* (ptr) (( (bPt) gf←c0622)+696) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string157);
(* (ptr) (( (bPt) gf←c0622)+700) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string158);
(* (ptr) (( (bPt) gf←c0622)+704) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string159);
(* (ptr) (( (bPt) gf←c0622)+708) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string160);
(* (ptr) (( (bPt) gf←c0622)+712) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string161);
(* (ptr) (( (bPt) gf←c0622)+716) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string162);
(* (ptr) (( (bPt) gf←c0622)+720) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string163);
(* (ptr) (( (bPt) gf←c0622)+724) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string164);
(* (ptr) (( (bPt) gf←c0622)+728) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string165);
(* (ptr) (( (bPt) gf←c0622)+732) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string166);
(* (ptr) (( (bPt) gf←c0622)+736) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string167);
(* (ptr) (( (bPt) gf←c0622)+740) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string168);
(* (ptr) (( (bPt) gf←c0622)+744) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string169);
(* (ptr) (( (bPt) gf←c0622)+748) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string170);
(* (ptr) (( (bPt) gf←c0622)+752) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string171);
(* (ptr) (( (bPt) gf←c0622)+756) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string172);
(* (ptr) (( (bPt) gf←c0622)+760) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string173);
(* (ptr) (( (bPt) gf←c0622)+764) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string174);
(* (ptr) (( (bPt) gf←c0622)+768) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string175);
(* (ptr) (( (bPt) gf←c0622)+772) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string176);
(* (ptr) (( (bPt) gf←c0622)+776) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string177);
(* (ptr) (( (bPt) gf←c0622)+780) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string178);
(* (ptr) (( (bPt) gf←c0622)+784) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string179);
(* (ptr) (( (bPt) gf←c0622)+788) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string180);
(* (ptr) (( (bPt) gf←c0622)+792) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string181);
(* (ptr) (( (bPt) gf←c0622)+796) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string182);
(* (ptr) (( (bPt) gf←c0622)+800) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string183);
(* (ptr) (( (bPt) gf←c0622)+804) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string184);
(* (ptr) (( (bPt) gf←c0622)+808) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string185);
(* (ptr) (( (bPt) gf←c0622)+812) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string186);
(* (ptr) (( (bPt) gf←c0622)+816) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string187);
(* (ptr) (( (bPt) gf←c0622)+820) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string188);
(* (ptr) (( (bPt) gf←c0622)+824) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string189);
(* (ptr) (( (bPt) gf←c0622)+828) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string190);
(* (ptr) (( (bPt) gf←c0622)+832) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string191);
(* (ptr) (( (bPt) gf←c0622)+836) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string192);
(* (ptr) (( (bPt) gf←c0622)+840) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string193);
(* (ptr) (( (bPt) gf←c0622)+844) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string194);
(* (ptr) (( (bPt) gf←c0622)+848) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string195);
(* (ptr) (( (bPt) gf←c0622)+852) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string196);
(* (ptr) (( (bPt) gf←c0622)+856) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string197);
(* (ptr) (( (bPt) gf←c0622)+860) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string198);
(* (ptr) (( (bPt) gf←c0622)+864) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string199);
(* (ptr) (( (bPt) gf←c0622)+868) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string200);
(* (ptr) (( (bPt) gf←c0622)+872) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string201);
(* (ptr) (( (bPt) gf←c0622)+876) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string202);
(* (ptr) (( (bPt) gf←c0622)+880) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string203);
(* (ptr) (( (bPt) gf←c0622)+884) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string204);
(* (ptr) (( (bPt) gf←c0622)+888) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string205);
(* (ptr) (( (bPt) gf←c0622)+892) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string206);
(* (ptr) (( (bPt) gf←c0622)+896) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string207);
(* (ptr) (( (bPt) gf←c0622)+900) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string208);
(* (ptr) (( (bPt) gf←c0622)+904) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string209);
(* (ptr) (( (bPt) gf←c0622)+908) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string210);
(* (ptr) (( (bPt) gf←c0622)+912) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string211);
(* (ptr) (( (bPt) gf←c0622)+916) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string212);
(* (ptr) (( (bPt) gf←c0622)+920) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string213);
(* (ptr) (( (bPt) gf←c0622)+924) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string214);
(* (ptr) (( (bPt) gf←c0622)+928) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string215);
(* (ptr) (( (bPt) gf←c0622)+932) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string216);
(* (ptr) (( (bPt) gf←c0622)+936) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string217);
(* (ptr) (( (bPt) gf←c0622)+940) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string218);
(* (ptr) (( (bPt) gf←c0622)+944) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string219);
(* (ptr) (( (bPt) gf←c0622)+948) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string220);
(* (ptr) (( (bPt) gf←c0622)+952) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string221);
(* (ptr) (( (bPt) gf←c0622)+956) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string222);
(* (ptr) (( (bPt) gf←c0622)+960) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string223);
(* (ptr) (( (bPt) gf←c0622)+964) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string224);
(* (ptr) (( (bPt) gf←c0622)+968) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string225);
(* (ptr) (( (bPt) gf←c0622)+972) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string226);
(* (ptr) (( (bPt) gf←c0622)+976) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string227);
(* (ptr) (( (bPt) gf←c0622)+980) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0622)+14) ), (word) &string228);
(void) XR←DeclareGlobalFrame((word) "Type1FontImpl", &globalframe, (word) XR←GetTypeIndex((word) &string229, 0, (word) &string230)
, (word) (( (bPt) gf←c0622)+1468)/* var←c43124 */ );
var←c50868 = (word) XR←ImportInterface((word) "Atom", (word) XR←GetTypeIndexS((word) (&string231)), 16);
(* (( (ptr) gf←c0622)+369)/* var←c43188 */ ) = var←c50868;
(void) XR←ImportProcS(var←c50868, 67372033);
(void) XR←ImportProcS(var←c50868, 67895555);
var←c50868 = (word) XR←ImportInterface((word) "ImagerTransformation", (word) XR←GetTypeIndexS((word) (&string232)), 55);
(* (( (ptr) gf←c0622)+375)/* var←c46900 */ ) = var←c50868;
(void) XR←ImportProcS(var←c50868, 68681734);
var←c50868 = (word) XR←ImportInterface((word) "IO", (word) XR←GetTypeIndexS((word) (&string233)), 103);
(* (( (ptr) gf←c0622)+370)/* var←c44564 */ ) = var←c50868;
(void) XR←ImportProcS(var←c50868, 67372801);
var←c50868 = (word) XR←ImportInterface((word) "Real", (word) XR←GetTypeIndexS((word) (&string234)), 11);
(* (( (ptr) gf←c0622)+372)/* var←c45524 */ ) = var←c50868;
(void) XR←ImportProcS(var←c50868, 67634434);
var←c50868 = (word) XR←ImportInterface((word) "RefTab", (word) XR←GetTypeIndexS((word) (&string235)), 16);
(* (( (ptr) gf←c0622)+376)/* var←c47572 */ ) = var←c50868;
(void) XR←ImportProcS(var←c50868, 134742786);
(void) XR←ImportProcS(var←c50868, 67635458);
(void) XR←ImportProcS(var←c50868, 67371521);
(void) XR←ImportProcS(var←c50868, 67896579);
(void) XR←ImportProcS(var←c50868, 67895555);
var←c50868 = (word) XR←ImportInterface((word) "RefText", (word) XR←GetTypeIndexS((word) (&string236)), 26);
(* (( (ptr) gf←c0622)+371)/* var←c44852 */ ) = var←c50868;
(void) XR←ImportProcS(var←c50868, 262913);
(void) XR←ImportProcS(var←c50868, 67371521);
(void) XR←ImportProcS(var←c50868, 67635458);
var←c50868 = (word) XR←ImportInterface((word) "Rope", (word) XR←GetTypeIndexS((word) (&string237)), 43);
(* (( (ptr) gf←c0622)+373)/* var←c45812 */ ) = var←c50868;
(void) XR←ImportProcS(var←c50868, 67903235);
var←c50868 = (word) XR←ImportInterface((word) "SafeStorage", (word) XR←GetTypeIndexS((word) (&string238)), 27);
(* (( (ptr) gf←c0622)+374)/* var←c46516 */ ) = var←c50868;
(void) XR←ImportProcS(var←c50868, 67109376);
var←c50868 = (word) XR←ExportInterface((word) "Type1Font", (word) XR←GetTypeIndexS((word) (&string239)), 12);
(* (( (ptr) gf←c0622)+377)/* var←c50900 */ ) = var←c50868;
(void) XR←ExportProcS(var←c50868, (word) (( (bPt) gf←c0622)+1244)/* var←c42228 */ , 67633154, (word) "Decrypt1");
(void) XR←ExportProcS(var←c50868, (word) (( (bPt) gf←c0622)+1388)/* var←c42804 */ , 67371265, (word) "GetChar");
(void) XR←ExportProcS(var←c50868, (word) (( (bPt) gf←c0622)+1380)/* var←c42772 */ , 524802, (word) "PutBack");
(void) XR←ExportProcS(var←c50868, (word) (( (bPt) gf←c0622)+1372)/* var←c42740 */ , 201589505, (word) "GetToken");
(void) XR←ExportProcS(var←c50868, (word) (( (bPt) gf←c0622)+1332)/* var←c42580 */ , 67372033, (word) "GetKeyword");
(void) XR←ExportProcS(var←c50868, (word) (( (bPt) gf←c0622)+1236)/* var←c42196 */ , 263425, (word) "BeginEExec");
(void) XR←ExportProcS(var←c50868, (word) (( (bPt) gf←c0622)+1012)/* var←c41300 */ , 1836805, (word) "DecodeCharString");
(void) XR←ExportVar(var←c50868, 8, (word) (( (bPt) gf←c0622)+44)/* theStandardEncoding←v5380 */ );
(void) XR←ExportVar(var←c50868, 9, (word) (( (bPt) gf←c0622)+984)/* var←c41172 */ );
(void) XR←ExportProcS(var←c50868, (word) (( (bPt) gf←c0622)+1020)/* var←c41332 */ , 67373569, (word) "ParseFont");
(void) XR←ExportProcS(var←c50868, (word) (( (bPt) gf←c0622)+988)/* var←c41204 */ , 272108301, (word) "ExecuteChar");
}
static void Type1FontImpl←P0(formal←c089, formal←c087)
word formal←c089;
word formal←c087;
{
register ptr gf←c50932 = (ptr) &globalframe;
/* Type1FontImpl: */
SOURCE(617, 37020)
SOURCE(4230, 48)
(* (( (ptr) gf←c50932)+4)/* classFromChar←v3700 */ ) = (word) InitClassArray←P60();
SOURCE(4280, 40)
(* (( (ptr) gf←c50932)+5)/* digit←v3728 */ ) = (word) InitDigitArray←P120();
SOURCE(4322, 43)
(* (( (ptr) gf←c50932)+6)/* escape←v3756 */ ) = (word) InitEscapeArray←P180();
SOURCE(4367, 55)
(* (( (ptr) gf←c50932)+7)/* transition←v3784 */ ) = (word) InitTransitionTable←P300();
SOURCE(4424, 46)
(* (( (ptr) gf←c50932)+8)/* rclassFromChar←v3812 */ ) = (word) RClassInit←P360();
SOURCE(4472, 53)
(* (( (ptr) gf←c50932)+9)/* rtransition←v3840 */ ) = (word) RTransitionInit←P480();
SOURCE(19272, 31)
(* (( (ptr) gf←c50932)+10)/* untracedZone←v4820 */ ) = (word) GetUZone←P1800();
SOURCE(21883, 1844)
{
word var←c43156;
var←c43156 = XR←NewObject(1024, (* (( (ptr) gf←c50932)+13) ));
(* (( (ptr) var←c43156)+32) ) = (* (( (ptr) gf←c50932)+214) );
(* (( (ptr) var←c43156)+33) ) = (* (( (ptr) gf←c50932)+213) );
(* (( (ptr) var←c43156)+34) ) = (* (( (ptr) gf←c50932)+212) );
(* (( (ptr) var←c43156)+35) ) = (* (( (ptr) gf←c50932)+211) );
(* (( (ptr) var←c43156)+36) ) = (* (( (ptr) gf←c50932)+210) );
(* (( (ptr) var←c43156)+37) ) = (* (( (ptr) gf←c50932)+209) );
(* (( (ptr) var←c43156)+38) ) = (* (( (ptr) gf←c50932)+208) );
(* (( (ptr) var←c43156)+39) ) = (* (( (ptr) gf←c50932)+207) );
(* (( (ptr) var←c43156)+40) ) = (* (( (ptr) gf←c50932)+206) );
(* (( (ptr) var←c43156)+41) ) = (* (( (ptr) gf←c50932)+205) );
(* (( (ptr) var←c43156)+42) ) = (* (( (ptr) gf←c50932)+204) );
(* (( (ptr) var←c43156)+43) ) = (* (( (ptr) gf←c50932)+203) );
(* (( (ptr) var←c43156)+44) ) = (* (( (ptr) gf←c50932)+190) );
(* (( (ptr) var←c43156)+45) ) = (* (( (ptr) gf←c50932)+184) );
(* (( (ptr) var←c43156)+46) ) = (* (( (ptr) gf←c50932)+183) );
(* (( (ptr) var←c43156)+47) ) = (* (( (ptr) gf←c50932)+182) );
(* (( (ptr) var←c43156)+48) ) = (* (( (ptr) gf←c50932)+179) );
(* (( (ptr) var←c43156)+49) ) = (* (( (ptr) gf←c50932)+178) );
(* (( (ptr) var←c43156)+50) ) = (* (( (ptr) gf←c50932)+177) );
(* (( (ptr) var←c43156)+51) ) = (* (( (ptr) gf←c50932)+176) );
(* (( (ptr) var←c43156)+52) ) = (* (( (ptr) gf←c50932)+175) );
(* (( (ptr) var←c43156)+53) ) = (* (( (ptr) gf←c50932)+174) );
(* (( (ptr) var←c43156)+54) ) = (* (( (ptr) gf←c50932)+173) );
(* (( (ptr) var←c43156)+55) ) = (* (( (ptr) gf←c50932)+172) );
(* (( (ptr) var←c43156)+56) ) = (* (( (ptr) gf←c50932)+171) );
(* (( (ptr) var←c43156)+57) ) = (* (( (ptr) gf←c50932)+170) );
(* (( (ptr) var←c43156)+58) ) = (* (( (ptr) gf←c50932)+169) );
(* (( (ptr) var←c43156)+59) ) = (* (( (ptr) gf←c50932)+168) );
(* (( (ptr) var←c43156)+60) ) = (* (( (ptr) gf←c50932)+166) );
(* (( (ptr) var←c43156)+61) ) = (* (( (ptr) gf←c50932)+165) );
(* (( (ptr) var←c43156)+62) ) = (* (( (ptr) gf←c50932)+46) );
(* (( (ptr) var←c43156)+63) ) = (* (( (ptr) gf←c50932)+47) );
(* (( (ptr) var←c43156)+64) ) = (* (( (ptr) gf←c50932)+48) );
(* (( (ptr) var←c43156)+65) ) = (* (( (ptr) gf←c50932)+49) );
(* (( (ptr) var←c43156)+66) ) = (* (( (ptr) gf←c50932)+50) );
(* (( (ptr) var←c43156)+67) ) = (* (( (ptr) gf←c50932)+51) );
(* (( (ptr) var←c43156)+68) ) = (* (( (ptr) gf←c50932)+52) );
(* (( (ptr) var←c43156)+69) ) = (* (( (ptr) gf←c50932)+53) );
(* (( (ptr) var←c43156)+70) ) = (* (( (ptr) gf←c50932)+54) );
(* (( (ptr) var←c43156)+71) ) = (* (( (ptr) gf←c50932)+55) );
(* (( (ptr) var←c43156)+72) ) = (* (( (ptr) gf←c50932)+56) );
(* (( (ptr) var←c43156)+73) ) = (* (( (ptr) gf←c50932)+57) );
(* (( (ptr) var←c43156)+74) ) = (* (( (ptr) gf←c50932)+58) );
(* (( (ptr) var←c43156)+75) ) = (* (( (ptr) gf←c50932)+59) );
(* (( (ptr) var←c43156)+76) ) = (* (( (ptr) gf←c50932)+60) );
(* (( (ptr) var←c43156)+77) ) = (* (( (ptr) gf←c50932)+61) );
(* (( (ptr) var←c43156)+78) ) = (* (( (ptr) gf←c50932)+62) );
(* (( (ptr) var←c43156)+79) ) = (* (( (ptr) gf←c50932)+63) );
(* (( (ptr) var←c43156)+80) ) = (* (( (ptr) gf←c50932)+64) );
(* (( (ptr) var←c43156)+81) ) = (* (( (ptr) gf←c50932)+65) );
(* (( (ptr) var←c43156)+82) ) = (* (( (ptr) gf←c50932)+66) );
(* (( (ptr) var←c43156)+83) ) = (* (( (ptr) gf←c50932)+67) );
(* (( (ptr) var←c43156)+84) ) = (* (( (ptr) gf←c50932)+68) );
(* (( (ptr) var←c43156)+85) ) = (* (( (ptr) gf←c50932)+69) );
(* (( (ptr) var←c43156)+86) ) = (* (( (ptr) gf←c50932)+70) );
(* (( (ptr) var←c43156)+87) ) = (* (( (ptr) gf←c50932)+71) );
(* (( (ptr) var←c43156)+88) ) = (* (( (ptr) gf←c50932)+72) );
(* (( (ptr) var←c43156)+89) ) = (* (( (ptr) gf←c50932)+73) );
(* (( (ptr) var←c43156)+90) ) = (* (( (ptr) gf←c50932)+74) );
(* (( (ptr) var←c43156)+91) ) = (* (( (ptr) gf←c50932)+75) );
(* (( (ptr) var←c43156)+92) ) = (* (( (ptr) gf←c50932)+76) );
(* (( (ptr) var←c43156)+93) ) = (* (( (ptr) gf←c50932)+77) );
(* (( (ptr) var←c43156)+94) ) = (* (( (ptr) gf←c50932)+78) );
(* (( (ptr) var←c43156)+95) ) = (* (( (ptr) gf←c50932)+79) );
(* (( (ptr) var←c43156)+96) ) = (* (( (ptr) gf←c50932)+80) );
(* (( (ptr) var←c43156)+97) ) = (* (( (ptr) gf←c50932)+81) );
(* (( (ptr) var←c43156)+98) ) = (* (( (ptr) gf←c50932)+82) );
(* (( (ptr) var←c43156)+99) ) = (* (( (ptr) gf←c50932)+83) );
(* (( (ptr) var←c43156)+100) ) = (* (( (ptr) gf←c50932)+84) );
(* (( (ptr) var←c43156)+101) ) = (* (( (ptr) gf←c50932)+85) );
(* (( (ptr) var←c43156)+102) ) = (* (( (ptr) gf←c50932)+86) );
(* (( (ptr) var←c43156)+103) ) = (* (( (ptr) gf←c50932)+87) );
(* (( (ptr) var←c43156)+104) ) = (* (( (ptr) gf←c50932)+88) );
(* (( (ptr) var←c43156)+105) ) = (* (( (ptr) gf←c50932)+89) );
(* (( (ptr) var←c43156)+106) ) = (* (( (ptr) gf←c50932)+90) );
(* (( (ptr) var←c43156)+107) ) = (* (( (ptr) gf←c50932)+91) );
(* (( (ptr) var←c43156)+108) ) = (* (( (ptr) gf←c50932)+92) );
(* (( (ptr) var←c43156)+109) ) = (* (( (ptr) gf←c50932)+93) );
(* (( (ptr) var←c43156)+110) ) = (* (( (ptr) gf←c50932)+94) );
(* (( (ptr) var←c43156)+111) ) = (* (( (ptr) gf←c50932)+95) );
(* (( (ptr) var←c43156)+112) ) = (* (( (ptr) gf←c50932)+96) );
(* (( (ptr) var←c43156)+113) ) = (* (( (ptr) gf←c50932)+97) );
(* (( (ptr) var←c43156)+114) ) = (* (( (ptr) gf←c50932)+98) );
(* (( (ptr) var←c43156)+115) ) = (* (( (ptr) gf←c50932)+99) );
(* (( (ptr) var←c43156)+116) ) = (* (( (ptr) gf←c50932)+100) );
(* (( (ptr) var←c43156)+117) ) = (* (( (ptr) gf←c50932)+101) );
(* (( (ptr) var←c43156)+118) ) = (* (( (ptr) gf←c50932)+102) );
(* (( (ptr) var←c43156)+119) ) = (* (( (ptr) gf←c50932)+103) );
(* (( (ptr) var←c43156)+120) ) = (* (( (ptr) gf←c50932)+104) );
(* (( (ptr) var←c43156)+121) ) = (* (( (ptr) gf←c50932)+105) );
(* (( (ptr) var←c43156)+122) ) = (* (( (ptr) gf←c50932)+106) );
(* (( (ptr) var←c43156)+123) ) = (* (( (ptr) gf←c50932)+107) );
(* (( (ptr) var←c43156)+124) ) = (* (( (ptr) gf←c50932)+108) );
(* (( (ptr) var←c43156)+125) ) = (* (( (ptr) gf←c50932)+109) );
(* (( (ptr) var←c43156)+126) ) = (* (( (ptr) gf←c50932)+110) );
(* (( (ptr) var←c43156)+161) ) = (* (( (ptr) gf←c50932)+111) );
(* (( (ptr) var←c43156)+162) ) = (* (( (ptr) gf←c50932)+112) );
(* (( (ptr) var←c43156)+163) ) = (* (( (ptr) gf←c50932)+113) );
(* (( (ptr) var←c43156)+164) ) = (* (( (ptr) gf←c50932)+114) );
(* (( (ptr) var←c43156)+165) ) = (* (( (ptr) gf←c50932)+115) );
(* (( (ptr) var←c43156)+166) ) = (* (( (ptr) gf←c50932)+116) );
(* (( (ptr) var←c43156)+167) ) = (* (( (ptr) gf←c50932)+117) );
(* (( (ptr) var←c43156)+168) ) = (* (( (ptr) gf←c50932)+118) );
(* (( (ptr) var←c43156)+169) ) = (* (( (ptr) gf←c50932)+119) );
(* (( (ptr) var←c43156)+170) ) = (* (( (ptr) gf←c50932)+120) );
(* (( (ptr) var←c43156)+171) ) = (* (( (ptr) gf←c50932)+121) );
(* (( (ptr) var←c43156)+172) ) = (* (( (ptr) gf←c50932)+122) );
(* (( (ptr) var←c43156)+173) ) = (* (( (ptr) gf←c50932)+123) );
(* (( (ptr) var←c43156)+174) ) = (* (( (ptr) gf←c50932)+124) );
(* (( (ptr) var←c43156)+175) ) = (* (( (ptr) gf←c50932)+125) );
(* (( (ptr) var←c43156)+177) ) = (* (( (ptr) gf←c50932)+126) );
(* (( (ptr) var←c43156)+178) ) = (* (( (ptr) gf←c50932)+127) );
(* (( (ptr) var←c43156)+179) ) = (* (( (ptr) gf←c50932)+128) );
(* (( (ptr) var←c43156)+180) ) = (* (( (ptr) gf←c50932)+129) );
(* (( (ptr) var←c43156)+182) ) = (* (( (ptr) gf←c50932)+130) );
(* (( (ptr) var←c43156)+183) ) = (* (( (ptr) gf←c50932)+131) );
(* (( (ptr) var←c43156)+184) ) = (* (( (ptr) gf←c50932)+132) );
(* (( (ptr) var←c43156)+185) ) = (* (( (ptr) gf←c50932)+133) );
(* (( (ptr) var←c43156)+186) ) = (* (( (ptr) gf←c50932)+134) );
(* (( (ptr) var←c43156)+187) ) = (* (( (ptr) gf←c50932)+135) );
(* (( (ptr) var←c43156)+188) ) = (* (( (ptr) gf←c50932)+136) );
(* (( (ptr) var←c43156)+189) ) = (* (( (ptr) gf←c50932)+137) );
(* (( (ptr) var←c43156)+191) ) = (* (( (ptr) gf←c50932)+138) );
(* (( (ptr) var←c43156)+193) ) = (* (( (ptr) gf←c50932)+139) );
(* (( (ptr) var←c43156)+194) ) = (* (( (ptr) gf←c50932)+140) );
(* (( (ptr) var←c43156)+195) ) = (* (( (ptr) gf←c50932)+141) );
(* (( (ptr) var←c43156)+196) ) = (* (( (ptr) gf←c50932)+142) );
(* (( (ptr) var←c43156)+197) ) = (* (( (ptr) gf←c50932)+143) );
(* (( (ptr) var←c43156)+198) ) = (* (( (ptr) gf←c50932)+144) );
(* (( (ptr) var←c43156)+199) ) = (* (( (ptr) gf←c50932)+145) );
(* (( (ptr) var←c43156)+200) ) = (* (( (ptr) gf←c50932)+146) );
(* (( (ptr) var←c43156)+202) ) = (* (( (ptr) gf←c50932)+147) );
(* (( (ptr) var←c43156)+203) ) = (* (( (ptr) gf←c50932)+148) );
(* (( (ptr) var←c43156)+205) ) = (* (( (ptr) gf←c50932)+149) );
(* (( (ptr) var←c43156)+206) ) = (* (( (ptr) gf←c50932)+150) );
(* (( (ptr) var←c43156)+207) ) = (* (( (ptr) gf←c50932)+151) );
(* (( (ptr) var←c43156)+208) ) = (* (( (ptr) gf←c50932)+152) );
(* (( (ptr) var←c43156)+225) ) = (* (( (ptr) gf←c50932)+153) );
(* (( (ptr) var←c43156)+227) ) = (* (( (ptr) gf←c50932)+154) );
(* (( (ptr) var←c43156)+232) ) = (* (( (ptr) gf←c50932)+155) );
(* (( (ptr) var←c43156)+233) ) = (* (( (ptr) gf←c50932)+156) );
(* (( (ptr) var←c43156)+234) ) = (* (( (ptr) gf←c50932)+157) );
(* (( (ptr) var←c43156)+235) ) = (* (( (ptr) gf←c50932)+158) );
(* (( (ptr) var←c43156)+241) ) = (* (( (ptr) gf←c50932)+159) );
(* (( (ptr) var←c43156)+245) ) = (* (( (ptr) gf←c50932)+160) );
(* (( (ptr) var←c43156)+248) ) = (* (( (ptr) gf←c50932)+161) );
(* (( (ptr) var←c43156)+249) ) = (* (( (ptr) gf←c50932)+162) );
(* (( (ptr) var←c43156)+250) ) = (* (( (ptr) gf←c50932)+163) );
(* (( (ptr) var←c43156)+251) ) = (* (( (ptr) gf←c50932)+164) );
(* (( (ptr) gf←c50932)+11)/* theStandardEncoding←v5380 */ ) = var←c43156;
};
SOURCE(26614, 39)
{
word pd240;
pd240 = (* (( (ptr) (* (( (ptr) gf←c50932)+369)/* var←c43188 */ ))+5) );
(* (( (ptr) gf←c50932)+12)/* notdef←v5716 */ ) = (word) ( *( (fPt) ((* (ptr) pd240 ))))((* (( (ptr) gf←c50932)+167) ), 0, 2147483647, pd240)
;
};
}
static word InitClassArray←P60()
{
register ptr gf←c50964 = (ptr) &globalframe;
word array←v8624;
/* InitClassArray: */
SOURCE(4562, 614)
SOURCE(4562, 614)
array←v8624 = 0;
SOURCE(4625, 23)
array←v8624 = XR←NewObject(256, (* (( (ptr) gf←c50964)+39) ));
SOURCE(4650, 526)
{
register word char←v16472 = 0;
word var←c43220;
word var←c43252;
word var←c43284;
lab←L100003: ;
SOURCE(4676, 500)
{
word tc241;
var←c43220 = char←v16472;
if (((var←c43220 == 13) || (var←c43220 == 10)) || (var←c43220 == 12)) {
tc241 = (word) 0;
goto endif0242;
};
if ((var←c43220 == 32) || (var←c43220 == 9)) {
tc241 = (word) 1;
goto endif0242;
};
if ((var←c43220 == 40)) {
tc241 = (word) 2;
goto endif0242;
};
if ((var←c43220 == 41)) {
tc241 = (word) 3;
goto endif0242;
};
if ((var←c43220 == 91)) {
tc241 = (word) 4;
goto endif0242;
};
if ((var←c43220 == 93)) {
tc241 = (word) 5;
goto endif0242;
};
if ((var←c43220 == 60)) {
tc241 = (word) 6;
goto endif0242;
};
if ((var←c43220 == 62)) {
tc241 = (word) 7;
goto endif0242;
};
if ((var←c43220 == 123)) {
tc241 = (word) 8;
goto endif0242;
};
if ((var←c43220 == 125)) {
tc241 = (word) 9;
goto endif0242;
};
if ((var←c43220 == 47)) {
tc241 = (word) 10;
goto endif0242;
};
if ((var←c43220 == 37)) {
tc241 = (word) 11;
goto endif0242;
};
if ((var←c43220 == 46)) {
tc241 = (word) 12;
goto endif0242;
};
if ((var←c43220 == 35)) {
tc241 = (word) 13;
goto endif0242;
};
if ((var←c43220 == 43) || (var←c43220 == 45)) {
tc241 = (word) 14;
goto endif0242;
};
if (((
var←c43252 = (var←c43220 - 48)
) <= 7)) {
tc241 = (word) 15;
goto endif0242;
};
if ((var←c43252 <= 9)) {
tc241 = (word) 16;
goto endif0242;
};
if ((var←c43220 == 69) || (var←c43220 == 101)) {
tc241 = (word) 17;
goto endif0242;
};
if (((
var←c43284 = (var←c43220 - 65)
) <= 5) || ((var←c43220 - 97) <= 5)) {
tc241 = (word) 18;
goto endif0242;
};
if ((var←c43284 <= 25) || ((var←c43220 - 97) <= 25)) {
tc241 = (word) 19;
goto endif0242;
};
if ((var←c43220 == 92)) {
tc241 = (word) 20;
goto endif0242;
};
tc241 = (word) 21;
goto endif0242;
endif0242: ;
(* (( (bPt) array←v8624)+char←v16472) ) = tc241;
};
if ((char←v16472 >= 255)) {
goto lab←L100000;
};
char←v16472 = (char←v16472 + 1);
goto lab←L100003;
lab←L100000: ;
};
SOURCE(4562, 614)
return(array←v8624);
}
static word InitDigitArray←P120()
{
register ptr gf←c50996 = (ptr) &globalframe;
word array←v8696;
/* InitDigitArray: */
SOURCE(5191, 249)
SOURCE(5191, 249)
array←v8696 = 0;
SOURCE(5254, 23)
array←v8696 = XR←NewObject(256, (* (( (ptr) gf←c50996)+38) ));
SOURCE(5279, 161)
{
register word char←v16516 = 0;
word var←c43316;
lab←L100007: ;
SOURCE(5305, 135)
{
word idx243;
var←c43316 = char←v16516;
(* (( (bPt) array←v8696)+char←v16516) ) = (
idx243 = (word) ( ((var←c43316 - 48) <= 9) ? (char←v16516 - 48) : ( ((var←c43316 - 65) <= 25) ? ((char←v16516 - 65) + 10) : ( ((var←c43316 - 97) <= 25) ? ((char←v16516 - 97) +
10) : 0 ) ) ) ,
BCK(idx243, 36)
);
};
if ((char←v16516 >= 255)) {
goto lab←L100004;
};
char←v16516 = (char←v16516 + 1);
goto lab←L100007;
lab←L100004: ;
};
SOURCE(5191, 249)
return(array←v8696);
}
static word InitEscapeArray←P180()
{
register ptr gf←c51028 = (ptr) &globalframe;
word array←v8768;
/* InitEscapeArray: */
SOURCE(5455, 277)
SOURCE(5455, 277)
array←v8768 = 0;
SOURCE(5520, 24)
array←v8768 = XR←NewObject(256, (* (( (ptr) gf←c51028)+37) ));
SOURCE(5546, 186)
{
register word char←v16560 = 0;
word var←c43348;
lab←L100011: ;
SOURCE(5572, 160)
{
word tc244;
var←c43348 = char←v16560;
if ((var←c43348 == 110)) {
tc244 = (word) 10;
goto endif0245;
};
if ((var←c43348 == 114)) {
tc244 = (word) 13;
goto endif0245;
};
if ((var←c43348 == 116)) {
tc244 = (word) 9;
goto endif0245;
};
if ((var←c43348 == 98)) {
tc244 = (word) 8;
goto endif0245;
};
if ((var←c43348 == 102)) {
tc244 = (word) 12;
goto endif0245;
};
if (((var←c43348 - 48) <= 7)) {
tc244 = (word) (unsigned) (word) (* (( (bPt) (* (( (ptr) gf←c51028)+5)/* digit←v3728 */ ))+char←v16560) );
goto endif0245;
};
tc244 = (word) char←v16560;
goto endif0245;
endif0245: ;
(* (( (bPt) array←v8768)+char←v16560) ) = tc244;
};
if ((char←v16560 >= 255)) {
goto lab←L100008;
};
char←v16560 = (char←v16560 + 1);
goto lab←L100011;
lab←L100008: ;
};
SOURCE(5455, 277)
return(array←v8768);
}
static word Transition←P240(state←v8840, class←v8868)
word state←v8840;
word class←v8868;
{
word var←c8912;
/* Transition: */
SOURCE(5747, 4288)
SOURCE(5824, 676)
{
word var←c43380;
var←c43380 = state←v8840;
if ((var←c43380 == 0)) {
SOURCE(5853, 64)
if ((class←v8868 <= 1)) {
SOURCE(5881, 36)
return(0);
};
SOURCE(5919, 308)
if (((class←v8868 - 2) <= 9)) {
SOURCE(5944, 283)
{
word var←c43412;
var←c43412 = class←v8868;
switch (var←c43412) {
case 11:
SOURCE(5973, 38)
return(2550136832);
case 10:
SOURCE(6022, 38)
return(1610612736);
case 2:
SOURCE(6075, 37)
return(1744830464);
case 6:
SOURCE(6127, 35)
return(2281701376);
default:
SOURCE(6175, 52)
return(2692743169);
};
};
};
}
else {
if (((var←c43380 - 1) <= 11)) {
SOURCE(6256, 76)
if ((class←v8868 <= 1)) {
SOURCE(6284, 48)
return((((word) state←v8840 << 27) + 1));
};
SOURCE(6334, 76)
if (((class←v8868 - 2) <= 9)) {
SOURCE(6359, 51)
return((((word) state←v8840 << 27) + 16777217));
};
}
else {
if (((var←c43380 - 17) <= 1)) {
SOURCE(6436, 64)
if ((class←v8868 <= 1)) {
SOURCE(6464, 36)
return(((word) state←v8840 << 27));
};
};
};
};
};
SOURCE(6514, 3521)
{
word var←c43540;
var←c43540 = state←v8840;
switch (var←c43540) {
case 0:
SOURCE(6541, 218)
{
word var←c43572;
var←c43572 = class←v8868;
if ((var←c43572 == 14)) {
SOURCE(6567, 37)
return(142606336);
};
if ((var←c43572 == 12)) {
SOURCE(6613, 38)
return(545259520);
};
if (((var←c43572 - 15) <= 1)) {
SOURCE(6672, 37)
return(276824064);
};
SOURCE(6722, 37)
return(1484783616);
};
case 1:
SOURCE(6769, 171)
{
word var←c43604;
var←c43604 = class←v8868;
if ((var←c43604 == 12)) {
SOURCE(6794, 38)
return(545259520);
}
else {
if (((var←c43604 - 15) <= 1)) {
SOURCE(6853, 37)
return(411041792);
}
else {
SOURCE(6903, 37)
return(1484783616);
};
};
};
case 2:
SOURCE(6950, 271)
{
word var←c43636;
var←c43636 = class←v8868;
if ((var←c43636 == 12)) {
SOURCE(6975, 38)
return(679477248);
};
if ((var←c43636 == 17)) {
SOURCE(7026, 38)
return(813694976);
};
if ((var←c43636 == 13)) {
SOURCE(7074, 39)
return(1216348160);
};
if (((var←c43636 - 15) <= 1)) {
SOURCE(7134, 37)
return(276824064);
};
SOURCE(7184, 37)
return(1484783616);
};
case 3:
SOURCE(7231, 222)
{
word var←c43668;
var←c43668 = class←v8868;
if ((var←c43668 == 12)) {
SOURCE(7256, 38)
return(679477248);
};
if ((var←c43668 == 17)) {
SOURCE(7307, 38)
return(813694976);
};
if (((var←c43668 - 15) <= 1)) {
SOURCE(7366, 37)
return(411041792);
};
SOURCE(7416, 37)
return(1484783616);
};
case 4:
SOURCE(7464, 125)
{
word var←c43700;
var←c43700 = class←v8868;
if (((var←c43700 - 15) <= 1)) {
SOURCE(7501, 38)
return(679477248);
}
else {
SOURCE(7552, 37)
return(1484783616);
};
};
case 5:
SOURCE(7600, 176)
{
word var←c43732;
var←c43732 = class←v8868;
if ((var←c43732 == 17)) {
SOURCE(7629, 38)
return(813694976);
}
else {
if (((var←c43732 - 15) <= 1)) {
SOURCE(7688, 38)
return(679477248);
}
else {
SOURCE(7739, 37)
return(1484783616);
};
};
};
case 6:
SOURCE(7787, 173)
{
word var←c43764;
var←c43764 = class←v8868;
if ((var←c43764 == 14)) {
SOURCE(7813, 38)
return(947912704);
}
else {
if (((var←c43764 - 15) <= 1)) {
SOURCE(7872, 38)
return(1082130432);
}
else {
SOURCE(7923, 37)
return(1484783616);
};
};
};
case 7:
SOURCE(7971, 125)
{
word var←c43796;
var←c43796 = class←v8868;
if (((var←c43796 - 15) <= 1)) {
SOURCE(8008, 38)
return(1082130432);
}
else {
SOURCE(8059, 37)
return(1484783616);
};
};
case 8:
SOURCE(8107, 125)
{
word var←c43828;
var←c43828 = class←v8868;
if (((var←c43828 - 15) <= 1)) {
SOURCE(8144, 38)
return(1082130432);
}
else {
SOURCE(8195, 37)
return(1484783616);
};
};
case 9:
SOURCE(8244, 124)
{
word var←c43860;
var←c43860 = class←v8868;
if (((var←c43860 - 15) <= 4)) {
SOURCE(8279, 39)
return(1350565888);
}
else {
SOURCE(8331, 37)
return(1484783616);
};
};
case 10:
SOURCE(8380, 124)
{
word var←c43892;
var←c43892 = class←v8868;
if (((var←c43892 - 15) <= 4)) {
SOURCE(8415, 39)
return(1350565888);
}
else {
SOURCE(8467, 37)
return(1484783616);
};
};
case 11:
SOURCE(8514, 37)
return(1484783616);
case 12:
SOURCE(8564, 40)
return(1619001344);
case 13:
SOURCE(8616, 234)
{
word var←c43924;
var←c43924 = class←v8868;
switch (var←c43924) {
case 2:
SOURCE(8647, 42)
return(1769996288);
case 3:
SOURCE(8705, 43)
return(1778384896);
case 20:
SOURCE(8763, 35)
return(1879048192);
default:
SOURCE(8811, 39)
return(1753219072);
};
};
case 14:
SOURCE(8860, 179)
{
word var←c43956;
var←c43956 = class←v8868;
if ((var←c43956 == 0)) {
SOURCE(8889, 37)
return(1744830464);
}
else {
if ((var←c43956 == 15)) {
SOURCE(8942, 41)
return(2055208960);
}
else {
SOURCE(8996, 43)
return(1786773504);
};
};
};
case 15:
SOURCE(9049, 185)
{
word var←c43988;
var←c43988 = class←v8868;
if ((var←c43988 == 3)) {
SOURCE(9081, 43)
return(1778384896);
}
else {
if ((var←c43988 == 15)) {
SOURCE(9140, 42)
return(2197815296);
}
else {
SOURCE(9195, 39)
return(1753219072);
};
};
};
case 16:
SOURCE(9244, 187)
{
word var←c44020;
var←c44020 = class←v8868;
if ((var←c44020 == 3)) {
SOURCE(9276, 43)
return(1778384896);
}
else {
if ((var←c44020 == 15)) {
SOURCE(9335, 44)
return(1795162112);
}
else {
SOURCE(9392, 39)
return(1753219072);
};
};
};
case 17:
SOURCE(9441, 197)
{
word var←c44052;
var←c44052 = class←v8868;
if ((var←c44052 == 7)) {
SOURCE(9473, 47)
return(2281701377);
}
else {
if (((var←c44052 - 15) <= 3)) {
SOURCE(9537, 40)
return(2474639360);
}
else {
SOURCE(9590, 48)
return(2818572289);
};
};
};
case 18:
SOURCE(9648, 197)
{
word var←c44084;
var←c44084 = class←v8868;
if ((var←c44084 == 7)) {
SOURCE(9680, 47)
return(2415919105);
}
else {
if (((var←c44084 - 15) <= 3)) {
SOURCE(9744, 40)
return(2348810240);
}
else {
SOURCE(9797, 48)
return(2818572289);
};
};
};
case 19:
SOURCE(9858, 116)
{
word var←c44116;
var←c44116 = class←v8868;
if ((var←c44116 == 0)) {
SOURCE(9887, 36)
return(0);
}
else {
SOURCE(9936, 38)
return(2550136832);
};
};
default:
SOURCE(9987, 48)
return(2818572289);
};
};
}
static word InitTransitionTable←P300()
{
register ptr gf←c51060 = (ptr) &globalframe;
word table←v8972;
/* InitTransitionTable: */
SOURCE(10041, 282)
SOURCE(10041, 282)
table←v8972 = 0;
SOURCE(10114, 28)
table←v8972 = XR←NewObject(88, (* (( (ptr) gf←c51060)+36) ));
SOURCE(10144, 179)
{
register word state←v16604 = 0;
lab←L100015: ;
{
word array←v16648;
SOURCE(10173, 49)
array←v16648 = XR←NewObject(88, (* (( (ptr) gf←c51060)+35) ));
SOURCE(10224, 68)
{
register word class←v16704 = 0;
lab←L100019: ;
SOURCE(10253, 39)
(* (( (ptr) array←v16648)+class←v16704) ) = (word) Transition←P240(state←v16604, class←v16704);
if ((class←v16704 >= 21)) {
goto lab←L100016;
};
class←v16704 = (class←v16704 + 1);
goto lab←L100019;
lab←L100016: ;
};
SOURCE(10303, 20)
(* (( (ptr) table←v8972)+state←v16604) ) = array←v16648;
};
if ((state←v16604 >= 21)) {
goto lab←L100012;
};
state←v16604 = (state←v16604 + 1);
goto lab←L100015;
lab←L100012: ;
};
SOURCE(10041, 282)
return(table←v8972);
}
static word RClassInit←P360()
{
register ptr gf←c51092 = (ptr) &globalframe;
word array←v9044;
/* RClassInit: */
SOURCE(10338, 227)
SOURCE(10338, 227)
array←v9044 = 0;
SOURCE(10398, 24)
array←v9044 = XR←NewObject(128, (* (( (ptr) gf←c51092)+34) ));
SOURCE(10424, 141)
{
register word char←v16748 = 0;
word var←c44212;
lab←L100023: ;
SOURCE(10450, 115)
{
word x249;
word sh250;
var←c44212 = char←v16748;
x249 = (word) (( (ptr) array←v9044) + ((word) char←v16748 >> 3));
sh250 = 32 - (((word) (char←v16748 & 7) << 2)+4);
(* (ptr) x249 ) = ((* (ptr) x249 ) & ( ~ ((unsigned) 017 << sh250))) | ((( ( ((var←c44212 - 48) <= 9) ? 0 : ( ((var←c44212 == 43) || (var←c44212 == 45)) ? 1 : ( (var←c44212 == 46) ? 2 : ( ((var←c44212 == 69) || (var←c44212 == 101)) ? 3 : 4 ) ) ) ) & 017)) << sh250)
;
};
if ((char←v16748 >= 255)) {
goto lab←L100020;
};
char←v16748 = (char←v16748 + 1);
goto lab←L100023;
lab←L100020: ;
};
SOURCE(10338, 227)
return(array←v9044);
}
static word RTransition←P420(state←v9116, class←v9144)
word state←v9116;
word class←v9144;
{
word var←c9188;
/* RTransition: */
SOURCE(10580, 690)
SOURCE(10650, 620)
{
word var←c44244;
var←c44244 = state←v9116;
switch (var←c44244) {
case 0:
{
word var←c44276;
var←c44276 = class←v9144;
switch (var←c44276) {
case 0:
return(2);
case 1:
return(1);
case 2:
return(3);
default:
return(9);
};
};
case 1:
{
word var←c44308;
var←c44308 = class←v9144;
if ((var←c44308 == 0)) {
return(2);
}
else {
if ((var←c44308 == 2)) {
return(3);
}
else {
return(9);
};
};
};
case 2:
{
word var←c44340;
var←c44340 = class←v9144;
switch (var←c44340) {
case 0:
return(2);
case 2:
return(4);
case 3:
return(6);
default:
return(9);
};
};
case 3:
{
word var←c44372;
var←c44372 = class←v9144;
if ((var←c44372 == 0)) {
return(5);
}
else {
return(9);
};
};
case 4: case 5:
{
word var←c44404;
var←c44404 = class←v9144;
if ((var←c44404 == 0)) {
return(5);
}
else {
if ((var←c44404 == 3)) {
return(6);
}
else {
return(9);
};
};
};
case 6:
{
word var←c44436;
var←c44436 = class←v9144;
if ((var←c44436 == 0)) {
return(8);
}
else {
if ((var←c44436 == 1)) {
return(7);
}
else {
return(9);
};
};
};
case 7:
{
word var←c44468;
var←c44468 = class←v9144;
if ((var←c44468 == 0)) {
return(8);
}
else {
return(9);
};
};
case 8:
{
word var←c44500;
var←c44500 = class←v9144;
if ((var←c44500 == 0)) {
return(8);
}
else {
return(9);
};
};
default:
return(9);
};
};
}
static word RTransitionInit←P480()
{
register ptr gf←c51124 = (ptr) &globalframe;
word table←v9248;
/* RTransitionInit: */
SOURCE(11276, 287)
SOURCE(11276, 287)
table←v9248 = 0;
SOURCE(11346, 29)
table←v9248 = XR←NewObject(40, (* (( (ptr) gf←c51124)+33) ));
SOURCE(11377, 186)
{
register word state←v16792 = 0;
lab←L100027: ;
{
word array←v16836;
SOURCE(11408, 51)
array←v16836 = XR←NewObject(4, (* (( (ptr) gf←c51124)+32) ));
SOURCE(11461, 71)
{
register word class←v16892 = 0;
lab←L100031: ;
SOURCE(11492, 40)
XR←DepositField(array←v16836, 12 + ((word) class←v16892 << 2), 4, ((word) RTransition←P420(state←v16792, class←v16892) & 017))
;
if ((class←v16892 >= 4)) {
goto lab←L100028;
};
class←v16892 = (class←v16892 + 1);
goto lab←L100031;
lab←L100028: ;
};
SOURCE(11543, 20)
(* (( (ptr) table←v9248)+state←v16792) ) = array←v16836;
};
if ((state←v16792 >= 9)) {
goto lab←L100024;
};
state←v16792 = (state←v16792 + 1);
goto lab←L100027;
lab←L100024: ;
};
SOURCE(11276, 287)
return(table←v9248);
}
static word GetHexDigit←P540(stream←v9320)
word stream←v9320;
{
register ptr gf←c51156 = (ptr) &globalframe;
word var←c9364;
/* GetHexDigit: */
SOURCE(11578, 141)
SOURCE(11633, 86)
lab←L100034: ;
SOURCE(11633, 86)
{
word c←v16936;
SOURCE(11636, 28)
{
word pd251;
pd251 = (* (( (ptr) (* (( (ptr) gf←c51156)+370)/* var←c44564 */ ))+11) );
c←v16936 = (word) ( *( (fPt) ((* (ptr) pd251 ))))(stream←v9320, pd251);
};
SOURCE(11666, 53)
if ((((word) (* (( (bPt) (* (( (ptr) gf←c51156)+4)/* classFromChar←v3700 */ ))+c←v16936) ) - 15) <= 3)) {
SOURCE(11703, 16)
return( (unsigned) (word) (* (( (bPt) (* (( (ptr) gf←c51156)+5)/* digit←v3728 */ ))+c←v16936) ));
};
};
goto lab←L100034;
}
static word GetChar←P600(s←v9424)
word s←v9424;
{
register ptr gf←c51188 = (ptr) &globalframe;
word var←c9468;
/* GetChar: */
SOURCE(11734, 350)
SOURCE(11786, 61)
if ((0 != (* (( (ptr) s←v9424)+4) ))) {
SOURCE(11806, 17)
(* (( (ptr) s←v9424)+4) ) = 0;
SOURCE(11825, 22)
return((* (( (ptr) s←v9424)+5) ));
};
SOURCE(11850, 234)
{
word var←c44596;
var←c44596 = (* (( (ptr) s←v9424)+2) );
switch (var←c44596) {
case 0:
SOURCE(11880, 28)
{
word pd252;
pd252 = (* (( (ptr) (* (( (ptr) gf←c51188)+370)/* var←c44564 */ ))+11) );
return((word) ( *( (fPt) ((* (ptr) pd252 ))))((* (ptr) (s←v9424) ), pd252));
};
case 1:
SOURCE(11920, 45)
{
word var←c44692;
{
word pd253;
pd253 = (* (( (ptr) (* (( (ptr) gf←c51188)+370)/* var←c44564 */ ))+11) );
var←c44692 = (word) ( *( (fPt) ((* (ptr) pd253 ))))((* (ptr) (s←v9424) ), pd253);
};
return((word) Decrypt1←P1680((* (( (ptr) s←v9424)+3) ), var←c44692));
};
case 2:
SOURCE(11974, 112)
{
word d0←v16980;
word d1←v17008;
SOURCE(11976, 33)
d0←v16980 = (word) GetHexDigit←P540((* (ptr) (s←v9424) ));
SOURCE(12011, 33)
d1←v17008 = (word) GetHexDigit←P540((* (ptr) (s←v9424) ));
SOURCE(12046, 38)
{
word idx254;
return((word) Decrypt1←P1680((* (( (ptr) s←v9424)+3) ), (
idx254 = (word) (((word) d0←v16980 << 4) + d1←v17008),
BCK(idx254, 256)
)));
};
};
default:
SOURCE(12100, 5)
(void) XR←RaiseUnnamedError();
break;
};
};
}
static void PutBack←P660(s←v9528, c←v9556)
word s←v9528;
word c←v9556;
{
/* PutBack: */
SOURCE(12111, 106)
SOURCE(12157, 18)
if ((0 != (* (( (ptr) s←v9528)+4) ))) {
SOURCE(12175, 5)
(void) XR←RaiseUnnamedError();
};
SOURCE(12182, 16)
(* (( (ptr) s←v9528)+4) ) = 1;
SOURCE(12200, 17)
(* (( (ptr) s←v9528)+5) ) = c←v9556;
}
static void GetToken←P720(formal←c0174, s←v9616)
word formal←c0174;
word s←v9616;
{
register ptr gf←c51220 = (ptr) &globalframe;
W3 var←c9660;
word text←v17052;
word maxlength←v17080;
word length←v17108 = 0;
word state←v17136 = 0;
word parens←v17164 = 0;
/* GetToken: */
SOURCE(12224, 1548)
SOURCE(12278, 25)
text←v17052 = (* (( (ptr) s←v9616)+1) );
SOURCE(12305, 31)
maxlength←v17080 = (unsigned) (* (( (hPt) text←v17052)+1) );
SOURCE(12467, 893)
lab←L100038: ;
SOURCE(12467, 893)
{
word char←v17220;
word class←v17248;
word result←v17276;
word achar←v17304;
SOURCE(12493, 23)
char←v17220 = (word) GetChar←P600(s←v9616);
SOURCE(12518, 34)
class←v17248 = (unsigned) (word) (* (( (bPt) (* (( (ptr) gf←c51220)+4)/* classFromChar←v3700 */ ))+char←v17220) );
SOURCE(12554, 51)
result←v17276 = (* (( (ptr) (* (( (ptr) (* (( (ptr) gf←c51220)+7)/* transition←v3784 */ ))+state←v17136) ))+class←v17248)
);
SOURCE(12607, 18)
achar←v17304 = char←v17220;
SOURCE(12658, 20)
state←v17136 = (unsigned) ((unsigned)result←v17276 >> 27);
SOURCE(12680, 657)
SOURCE(12682, 443)
{
word var←c44756;
var←c44756 = (unsigned) (((unsigned)result←v17276 << 5) >> 28);
switch (var←c44756) {
case 0:
SOURCE(12716, 9)
goto lab←L100039;
case 1:
break;
case 2:
SOURCE(12756, 16)
(void) PutBack←P660(s←v9616, char←v17220);
SOURCE(12774, 10)
goto lab←L100039;
case 3:
SOURCE(12800, 17)
parens←v17164 = (parens←v17164 + 1);
break;
case 4:
SOURCE(12833, 40)
if ((parens←v17164 > 0)) {
SOURCE(12850, 23)
parens←v17164 = (parens←v17164 - 1);
}
else {
SOURCE(12873, 4)
goto lab←L100037;
};
break;
case 5:
SOURCE(12893, 20)
achar←v17304 = (unsigned) (word) (* (( (bPt) (* (( (ptr) gf←c51220)+6)/* escape←v3756 */ ))+char←v17220) );
break;
case 6:
SOURCE(12930, 55)
{
word var←c44788;
word var←c0679;
length←v17108 = SGNCK((length←v17108 - 1));
var←c44788 = length←v17108;
{
word limit255;
var←c0679 = ((word) (unsigned) (word) (* ((( (bPt) text←v17052)+4)+(
limit255 = (word) (unsigned) (* (( (hPt) text←v17052)+1) ),
BCK(var←c44788, limit255)
)) ) << 3);
};
{
word idx256;
achar←v17304 = (
idx256 = (word) (var←c0679 + (unsigned) (word) (* (( (bPt) (* (( (ptr) gf←c51220)+5)/* digit←v3728 */ ))+char←v17220) )),
BCK(idx256, 256)
);
};
};
break;
case 7:
SOURCE(13000, 27)
{
word idx257;
achar←v17304 = (
idx257 = (word) ((word) (unsigned) (word) (* (( (bPt) (* (( (ptr) gf←c51220)+5)/* digit←v3728 */ ))+char←v17220) ) << 4),
BCK(idx257, 256)
);
};
break;
case 8:
SOURCE(13042, 53)
{
word var←c44820;
word var←c0680;
length←v17108 = SGNCK((length←v17108 - 1));
var←c44820 = length←v17108;
{
word limit258;
var←c0680 = (unsigned) (word) (* ((( (bPt) text←v17052)+4)+(
limit258 = (word) (unsigned) (* (( (hPt) text←v17052)+1) ),
BCK(var←c44820, limit258)
)) );
};
{
word idx259;
achar←v17304 = (
idx259 = (word) (var←c0680 + (unsigned) (word) (* (( (bPt) (* (( (ptr) gf←c51220)+5)/* digit←v3728 */ ))+char←v17220) )),
BCK(idx259, 256)
);
};
};
break;
default:
SOURCE(13108, 17)
(void) XR←RaiseError((word) (( (bPt) gf←c51220)+984)/* var←c41172 */ , 0);
break;
};
};
SOURCE(13127, 129)
if ((length←v17108 >= maxlength←v17080)) {
SOURCE(13158, 20)
(* (hPt) text←v17052 ) = BCK(length←v17108, 32768);
SOURCE(13180, 48)
{
word pd260;
pd260 = (* (( (ptr) (* (( (ptr) gf←c51220)+371)/* var←c44852 */ ))+13) );
text←v17052 = (word) ( *( (fPt) ((* (ptr) pd260 ))))(text←v17052, 4, pd260);
};
SOURCE(13230, 26)
maxlength←v17080 = (unsigned) (* (( (hPt) text←v17052)+1) );
};
SOURCE(13261, 20)
{
word limit261;
(* ((( (bPt) text←v17052)+4)+(
limit261 = (word) (unsigned) (* (( (hPt) text←v17052)+1) ),
BCK(length←v17108, limit261)
)) ) = achar←v17304;
};
SOURCE(13283, 32)
length←v17108 = (length←v17108 + 1);
goto lab←L100040;
lab←L100039: ;
lab←L100040: ;
SOURCE(13340, 20)
if ((0 != ( (((unsigned)result←v17276 << 9) >> 9) ))) {
SOURCE(13360, 4)
goto lab←L100037;
};
};
goto lab←L100038;
lab←L100037: ;
SOURCE(13375, 20)
(* (hPt) text←v17052 ) = BCK(length←v17108, 32768);
SOURCE(13397, 375)
{
word var←c44884;
var←c44884 = state←v17136;
switch (var←c44884) {
case 0: case 19:
SOURCE(13433, 20)
var←c9660.f0 = 0;
var←c9660.f1 = 0;
var←c9660.f2 = 0;
/* removed tail goto */
break;
case 2: case 3:
SOURCE(13469, 26)
var←c9660.f0 = 1;
var←c9660.f1 = text←v17052;
var←c9660.f2 = 1;
/* removed tail goto */
break;
case 5: case 8:
SOURCE(13513, 27)
var←c9660.f0 = 3;
var←c9660.f1 = text←v17052;
var←c9660.f2 = 1;
/* removed tail goto */
break;
case 10:
SOURCE(13552, 28)
var←c9660.f0 = 2;
var←c9660.f1 = text←v17052;
var←c9660.f2 = 1;
/* removed tail goto */
break;
case 13: case 17: case 18:
SOURCE(13604, 29)
var←c9660.f0 = 4;
var←c9660.f1 = text←v17052;
var←c9660.f2 = 1;
/* removed tail goto */
break;
case 12:
SOURCE(13646, 27)
var←c9660.f0 = 5;
var←c9660.f1 = text←v17052;
var←c9660.f2 = 1;
/* removed tail goto */
break;
case 20:
SOURCE(13686, 24)
var←c9660.f0 = 6;
var←c9660.f1 = text←v17052;
var←c9660.f2 = 0;
/* removed tail goto */
break;
case 21:
SOURCE(13721, 17)
(void) XR←RaiseError((word) (( (bPt) gf←c51220)+984)/* var←c41172 */ , 0);
break;
default:
SOURCE(13751, 21)
var←c9660.f0 = 5;
var←c9660.f1 = text←v17052;
var←c9660.f2 = 0;
/* removed tail goto */
break;
};
};
(* (W3Pt) formal←c0174 ) = var←c9660;
return;
}
static word CardFromText←P780(text←v9720, start←v9748, radix←v9776)
word text←v9720;
word start←v9748;
word radix←v9776;
{
register ptr gf←c51252 = (ptr) &globalframe;
word var←c9832;
/* CardFromText: */
SOURCE(13778, 468)
SOURCE(13864, 382)
SOURCE(13866, 31)
{
word limit←v17348;
word val←v17376 = 0;
SOURCE(13866, 31)
limit←v17348 = ( (word) -1 / radix←v9776);
SOURCE(13914, 29)
if (((radix←v9776 - 2) > 34)) {
SOURCE(13943, 10)
goto lab←L100041;
};
SOURCE(13955, 232)
{
register word i←v17420;
register word noName←c45172;
i←v17420 = start←v9748;
noName←c45172 = (unsigned) (* (hPt) text←v9720 );
if ((i←v17420 >= noName←c45172)) {
goto lab←L100042;
};
lab←L100045: ;
{
word char←v17464;
word d←v17492;
SOURCE(13993, 20)
{
word limit262;
char←v17464 = (unsigned) (word) (* ((( (bPt) text←v9720)+4)+(
limit262 = (word) (unsigned) (* (( (hPt) text←v9720)+1) ),
BCK(i←v17420, limit262)
)) );
};
SOURCE(14015, 22)
d←v17492 = (unsigned) (word) (* (( (bPt) (* (( (ptr) gf←c51252)+5)/* digit←v3728 */ ))+char←v17464) );
SOURCE(14039, 22)
if ((d←v17492 >= radix←v9776)) {
SOURCE(14061, 10)
goto lab←L100041;
};
SOURCE(14073, 53)
if ((val←v17376 > limit←v17348)) {
SOURCE(14093, 16)
goto lab←L100041;
}
else {
SOURCE(14109, 17)
val←v17376 = (val←v17376 * radix←v9776);
};
SOURCE(14128, 59)
if ((d←v17492 > ( (word) -1 - val←v17376))) {
SOURCE(14158, 16)
goto lab←L100041;
}
else {
SOURCE(14174, 13)
val←v17376 = (val←v17376 + d←v17492);
};
};
i←v17420 = (i←v17420 + 1);
if ((i←v17420 < noName←c45172)) {
goto lab←L100045;
};
lab←L100042: ;
};
SOURCE(14198, 12)
return(val←v17376);
};
/* c2c skipped dead code */
lab←L100041: ;
SOURCE(14227, 17)
(void) XR←RaiseError((word) (( (bPt) gf←c51252)+984)/* var←c41172 */ , 0);
}
static word IntFromText←P840(text←v9892)
word text←v9892;
{
word var←c9948;
/* IntFromText: */
SOURCE(14250, 188)
SOURCE(14303, 135)
{
word var←c45204;
{
word limit263;
var←c45204 = (unsigned) (word) (* ((( (bPt) text←v9892)+4)+(
limit263 = (word) (unsigned) (* (( (hPt) text←v9892)+1) ),
BCK(0, limit263)
)) );
};
if ((var←c45204 == 43)) {
SOURCE(14329, 29)
{
word idx264;
return((
idx264 = (word) CardFromText←P780(text←v9892, 1, 10),
SGNCK(idx264)
));
};
}
else {
if ((var←c45204 == 45)) {
SOURCE(14366, 30)
return(INEG((word) CardFromText←P780(text←v9892, 1, 10)));
}
else {
SOURCE(14409, 29)
{
word idx265;
return((
idx265 = (word) CardFromText←P780(text←v9892, 0, 10),
SGNCK(idx265)
));
};
};
};
};
}
static word RadixFromText←P900(text←v10008)
word text←v10008;
{
register ptr gf←c51284 = (ptr) &globalframe;
word var←c10064;
word radix←v17536 = 0;
/* RadixFromText: */
SOURCE(14444, 342)
SOURCE(14515, 226)
{
register word i←v17580 = 0;
register word noName←c45332;
noName←c45332 = (unsigned) (* (hPt) text←v10008 );
if ((i←v17580 >= noName←c45332)) {
goto lab←L100047;
};
lab←L100050: ;
{
word char←v17624;
SOURCE(14548, 20)
{
word limit266;
char←v17624 = (unsigned) (word) (* ((( (bPt) text←v10008)+4)+(
limit266 = (word) (unsigned) (* (( (hPt) text←v10008)+1) ),
BCK(i←v17580, limit266)
)) );
};
SOURCE(14570, 171)
{
word var←c45364;
var←c45364 = char←v17624;
if (((var←c45364 - 48) <= 9)) {
SOURCE(14603, 32)
radix←v17536 = (((word) radix←v17536 * 10) + (unsigned) (word) (* (( (bPt) (* (( (ptr) gf←c51284)+5)/* digit←v3728 */ ))+char←v17624)
));
SOURCE(14637, 17)
if ((radix←v17536 > 36)) {
SOURCE(14654, 5)
goto lab←L100048;
};
}
else {
if ((var←c45364 == 35)) {
SOURCE(14668, 73)
return((word) CardFromText←P780(text←v10008, (i←v17580 + 1), radix←v17536));
}
else {
SOURCE(14754, 4)
goto lab←L100048;
};
};
};
};
i←v17580 = (i←v17580 + 1);
if ((i←v17580 < noName←c45332)) {
goto lab←L100050;
};
lab←L100047: ;
lab←L100048: ;
};
SOURCE(14769, 17)
(void) XR←RaiseError((word) (( (bPt) gf←c51284)+984)/* var←c41172 */ , 0);
}
static word RealFromText←P960(text←v10124)
word text←v10124;
{
W9 var←c51316;
register ptr gf←c51348 = (ptr) &globalframe;
word var←c10180;
/* RealFromText: */
SOURCE(14792, 1316)
SOURCE(14845, 1263)
SOURCE(14847, 21)
{
word state←v17668 = 0;
/* declaration of fr←v17696 skipped */
/* declaration of exp←v17724 skipped */
/* declaration of adj←v17752 skipped */
word mNeg←v17780 = 0;
word eNeg←v17808 = 0;
word mDigits←v17836 = 0;
word eDigits←v17864 = 0;
word real←v17892;
SOURCE(14870, 11)
(* (( (ptr) &var←c51316)+4)/* fr←v17696 */ ) = 0;
SOURCE(14896, 21)
(* (( (ptr) &var←c51316)+5)/* exp←v17724 */ ) = 0;
(* (( (ptr) &var←c51316)+6)/* adj←v17752 */ ) = 0;
SOURCE(15035, 625)
{
register word i←v17936 = 0;
register word noName←c45428;
noName←c45428 = (unsigned) (* (hPt) text←v10124 );
if ((i←v17936 >= noName←c45428)) {
goto lab←L100054;
};
lab←L100057: ;
{
word char←v17980;
SOURCE(15069, 20)
{
word limit267;
char←v17980 = (unsigned) (word) (* ((( (bPt) text←v10124)+4)+(
limit267 = (word) (unsigned) (* (( (hPt) text←v10124)+1) ),
BCK(i←v17936, limit267)
)) );
};
SOURCE(15091, 48)
state←v17668 = (unsigned) XR←ExtractField((* (( (ptr) (* (( (ptr) gf←c51348)+9)/* rtransition←v3840 */ ))+state←v17668)
), 12 + ((word) (((* (ptr) (( (ptr) (* (( (ptr) gf←c51348)+8)/* rclassFromChar←v3812 */ )) + ((word) char←v17980 >> 3)) ) >> (28 - (((word) (char←v17980 & 7) << 2))))
& 017) << 2), 4);
SOURCE(15141, 519)
{
word var←c45460;
var←c45460 = state←v17668;
switch (var←c45460) {
case 1:
SOURCE(15168, 18)
mNeg←v17780 = (unsigned) (char←v17980 == 45);
break;
case 2: case 5:
SOURCE(15201, 275)
{
word d←v18024;
SOURCE(15203, 22)
d←v18024 = BCK((char←v17980 - 48), 10);
SOURCE(15227, 34)
if ((state←v17668 == 5)) {
SOURCE(15248, 13)
(* (( (ptr) &var←c51316)+6)/* adj←v17752 */ ) = ((* (( (ptr) &var←c51316)+6)/* adj←v17752 */ ) - 1);
};
SOURCE(15263, 181)
if ( ( (mDigits←v17836 == 0) ? (d←v18024 == 0) : 0 ) ) {
}
else {
SOURCE(15320, 124)
if ((mDigits←v17836 < 9)) {
SOURCE(15341, 16)
/*1*/ (* (( (ptr) &var←c51316)+4)/* fr←v17696 */ ) = (IOP2( * , (int)(* (( (ptr) &var←c51316)+4)/* fr←v17696 */ ), (int)10)
/*1*/ + d←v18024);
SOURCE(15359, 21)
/*1*/ mDigits←v17836 = (mDigits←v17836 + 1);
/*1*/ }
else {
SOURCE(15388, 13)
/*1*/ (* (( (ptr) &var←c51316)+6)/* adj←v17752 */ ) = ((* (( (ptr) &var←c51316)+6)/* adj←v17752 */ ) + 1);
SOURCE(15403, 41)
/*1*/ if ( ( (mDigits←v17836 == 9) ? (d←v18024 > 5) : 0 ) ) {
SOURCE(15433, 11)
/*1*/ (* (( (ptr) &var←c51316)+4)/* fr←v17696 */ ) = ((* (( (ptr) &var←c51316)+4)/* fr←v17696 */ ) + 1);
/*1*/ };
/*1*/ };
};
};
break;
case 7:
SOURCE(15488, 18)
eNeg←v17808 = (unsigned) (char←v17980 == 45);
break;
case 8:
SOURCE(15515, 148)
{
word d←v18088;
SOURCE(15517, 22)
d←v18088 = BCK((char←v17980 - 48), 10);
SOURCE(15541, 119)
if ( ( (eDigits←v17864 == 0) ? (d←v18088 == 0) : 0 ) ) {
}
else {
SOURCE(15598, 62)
if ((eDigits←v17864 < 3)) {
SOURCE(15619, 18)
/*1*/ (* (( (ptr) &var←c51316)+5)/* exp←v17724 */ ) = (IOP2( * , (int)(* (( (ptr) &var←c51316)+5)/* exp←v17724 */ ), (int)10)
/*1*/ + d←v18088);
SOURCE(15639, 21)
/*1*/ eDigits←v17864 = (eDigits←v17864 + 1);
/*1*/ };
};
};
break;
case 9:
SOURCE(15675, 9)
goto lab←L100053;
};
};
};
i←v17936 = (i←v17936 + 1);
if ((i←v17936 < noName←c45428)) {
goto lab←L100057;
};
lab←L100054: ;
};
SOURCE(15704, 42)
{
word var←c45492;
var←c45492 = state←v17668;
switch (var←c45492) {
case 2: case 4: case 5: case 8:
break;
default:
SOURCE(15770, 9)
goto lab←L100053;
};
};
SOURCE(15781, 21)
if ((0 != mNeg←v17780)) {
SOURCE(15794, 8)
(* (( (ptr) &var←c51316)+4)/* fr←v17696 */ ) = INEG((* (( (ptr) &var←c51316)+4)/* fr←v17696 */ ));
};
SOURCE(15804, 23)
if ((0 != eNeg←v17808)) {
SOURCE(15817, 10)
(* (( (ptr) &var←c51316)+5)/* exp←v17724 */ ) = INEG((* (( (ptr) &var←c51316)+5)/* exp←v17724 */ ));
};
SOURCE(15829, 108)
{
/* declaration of var←c01 skipped */
(* (( (ptr) &var←c51316)+7)/* var←c01 */ ) = (* (( (ptr) (* (( (ptr) gf←c51348)+372)/* var←c45524 */ ))+9) );
{
/* declaration of var←c02 skipped */
{
word var←c03;
{
word var←c0681;
var←c0681 = (word) &var←c51316;
var←c03 = (word) XR←Enable(( ((word) (fPt) NoName←Q8028) ), ( ((word) (fPt) NoName←Q8088) ), var←c0681);
};
switch (var←c03) {
case 4:
goto lab←L100053;
case 3:
goto lab←L100052;
case 2:
goto lab←L100051;
};
};
real←v17892 = (* (( (ptr) &var←c51316)+8)/* var←c02 */ );
};
};
SOURCE(16004, 12)
return(real←v17892);
};
/* c2c skipped dead code */
lab←L100051: ;
SOURCE(16031, 25)
return(2139095040);
/* c2c skipped dead code */
lab←L100052: ;
SOURCE(16068, 11)
return((* (ptr) &fc268 ));
/* c2c skipped dead code */
lab←L100053: ;
SOURCE(16089, 17)
(void) XR←RaiseError((word) (( (bPt) gf←c51348)+984)/* var←c41172 */ , 0);
}
static word NoName←Q8028(formal←c0636)
word formal←c0636;
{
SOURCE(15829, 108)
{
word pd269;
pd269 = (* (( (ptr) formal←c0636)+7) );
(* (( (ptr) formal←c0636)+8) ) = (word) ( *( (fPt) ((* (ptr) pd269 ))))((* (( (ptr) formal←c0636)+4) ), ((* (( (ptr) formal←c0636)+5)
) + (* (( (ptr) formal←c0636)+6) )), pd269);
};
return(0);
}
static word GetKeyword←P1020(s←v10240)
word s←v10240;
{
register ptr gf←c51380 = (ptr) &globalframe;
word var←c10284;
word nest←v18152 = 0;
/* GetKeyword: */
SOURCE(16112, 362)
SOURCE(16182, 292)
lab←L100063: ;
SOURCE(16182, 292)
{
W3 token←v18196;
SOURCE(16185, 26)
(void) GetToken←P720((word) &token←v18196, s←v10240);
SOURCE(16213, 128)
if ((token←v18196.f0 == 6)) {
SOURCE(16240, 101)
{
word var←c45556;
{
word limit270;
var←c45556 = (unsigned) (word) (* ((( (bPt) token←v18196.f1)+4)+(
limit270 = (word) (unsigned) (* (( (hPt) token←v18196.f1)+1) ),
BCK(0, limit270)
)) );
};
switch (var←c45556) {
case 123: case 91:
SOURCE(16278, 13)
nest←v18152 = (nest←v18152 + 1);
SOURCE(16293, 5)
goto lab←L100063;
case 125: case 93:
SOURCE(16311, 30)
if ((nest←v18152 > 0)) {
SOURCE(16328, 13)
nest←v18152 = SGNCK((nest←v18152 - 1));
SOURCE(16343, 5)
goto lab←L100063;
};
break;
};
};
};
SOURCE(16360, 114)
if ((nest←v18152 == 0)) {
SOURCE(16375, 99)
{
word var←c45588;
var←c45588 = token←v18196.f0;
if ((var←c45588 == 5)) {
SOURCE(16406, 44)
{
word pd271;
pd271 = (* (( (ptr) (* (( (ptr) gf←c51380)+369)/* var←c43188 */ ))+8) );
return((word) ( *( (fPt) ((* (ptr) pd271 ))))(token←v18196.f1, pd271));
};
}
else {
SOURCE(16463, 11)
return(0);
};
};
};
};
goto lab←L100063;
}
static void SkipToKeyword←P1080(s←v10344, keyword←v10372)
word s←v10344;
word keyword←v10372;
{
/* SkipToKeyword: */
SOURCE(16489, 84)
SOURCE(16540, 33)
lab←L100066: ;
SOURCE(16543, 30)
if (((word) GetKeyword←P1020(s←v10344) == keyword←v10372)) {
SOURCE(16573, 12)
goto lab←L100065;
};
goto lab←L100066;
lab←L100065: ;
}
static word GetIntBeforeKeyword←P1140(s←v10432, key←v10460)
word s←v10432;
word key←v10460;
{
register ptr gf←c51412 = (ptr) &globalframe;
word val←v10504;
word nest←v18240 = 0;
/* GetIntBeforeKeyword: */
SOURCE(16591, 411)
SOURCE(16591, 411)
val←v10504 = 0;
SOURCE(16682, 320)
lab←L100069: ;
SOURCE(16682, 320)
{
W3 token←v18284;
SOURCE(16685, 26)
(void) GetToken←P720((word) &token←v18284, s←v10432);
SOURCE(16713, 128)
if ((token←v18284.f0 == 6)) {
SOURCE(16740, 101)
{
word var←c45652;
{
word limit272;
var←c45652 = (unsigned) (word) (* ((( (bPt) token←v18284.f1)+4)+(
limit272 = (word) (unsigned) (* (( (hPt) token←v18284.f1)+1) ),
BCK(0, limit272)
)) );
};
switch (var←c45652) {
case 123: case 91:
SOURCE(16778, 13)
nest←v18240 = (nest←v18240 + 1);
SOURCE(16793, 5)
goto lab←L100069;
case 125: case 93:
SOURCE(16811, 30)
if ((nest←v18240 > 0)) {
SOURCE(16828, 13)
nest←v18240 = SGNCK((nest←v18240 - 1));
SOURCE(16843, 5)
goto lab←L100069;
};
break;
};
};
};
SOURCE(16860, 142)
if ((nest←v18240 == 0)) {
SOURCE(16875, 127)
{
word var←c45684;
var←c45684 = token←v18284.f0;
switch (var←c45684) {
case 1: case 2:
SOURCE(16912, 25)
val←v10504 = (word) IntFromToken←P1380(token←v18284);
break;
case 5:
SOURCE(16947, 55)
{
word pd273;
pd273 = (* (( (ptr) (* (( (ptr) gf←c51412)+369)/* var←c43188 */ ))+8) );
if (((word) ( *( (fPt) ((* (ptr) pd273 ))))(token←v18284.f1, pd273) == key←v10460)) {
SOURCE(16996, 6)
return(val←v10504);
};
};
break;
};
};
};
};
goto lab←L100069;
}
static word GetIntAfterKeyword←P1200(s←v10564, key←v10592)
word s←v10564;
word key←v10592;
{
word var←c10636;
/* GetIntAfterKeyword: */
SOURCE(17026, 106)
SOURCE(17092, 21)
(void) SkipToKeyword←P1080(s←v10564, key←v10592);
SOURCE(17115, 17)
return((word) GetInt←P1440(s←v10564));
}
static word GetString←P1260(s←v10696)
word s←v10696;
{
register ptr gf←c51444 = (ptr) &globalframe;
word var←c10740;
W3 token←v18328;
/* GetString: */
SOURCE(17138, 174)
SOURCE(17185, 26)
(void) GetToken←P720((word) &token←v18328, s←v10696);
SOURCE(17213, 99)
{
word var←c45748;
var←c45748 = token←v18328.f0;
if ((var←c45748 == 4)) {
SOURCE(17246, 36)
{
word pd274;
pd274 = (* (( (ptr) (* (( (ptr) gf←c51444)+373)/* var←c45812 */ ))+35) );
return((word) ( *( (fPt) ((* (ptr) pd274 ))))(token←v18328.f1, 0, 32767, pd274));
};
}
else {
SOURCE(17295, 17)
(void) XR←RaiseError((word) (( (bPt) gf←c51444)+984)/* var←c41172 */ , 0);
};
};
}
static word GetName←P1320(s←v10800)
word s←v10800;
{
register ptr gf←c51476 = (ptr) &globalframe;
word var←c10844;
W3 token←v18372;
/* GetName: */
SOURCE(17318, 178)
SOURCE(17363, 26)
(void) GetToken←P720((word) &token←v18372, s←v10800);
SOURCE(17391, 105)
{
word var←c45844;
var←c45844 = token←v18372.f0;
if ((var←c45844 == 5)) {
SOURCE(17422, 44)
{
word pd275;
pd275 = (* (( (ptr) (* (( (ptr) gf←c51476)+369)/* var←c43188 */ ))+8) );
return((word) ( *( (fPt) ((* (ptr) pd275 ))))(token←v18372.f1, pd275));
};
}
else {
SOURCE(17479, 17)
(void) XR←RaiseError((word) (( (bPt) gf←c51476)+984)/* var←c41172 */ , 0);
};
};
}
static word IntFromToken←P1380(token←v10904)
W3 token←v10904;
{
register ptr gf←c51508 = (ptr) &globalframe;
word var←c10948;
/* IntFromToken: */
SOURCE(17502, 187)
SOURCE(17554, 135)
{
word var←c45908;
var←c45908 = token←v10904.f0;
if ((var←c45908 == 1)) {
SOURCE(17584, 31)
return((word) IntFromText←P840(token←v10904.f1));
}
else {
if ((var←c45908 == 2)) {
SOURCE(17626, 33)
return((word) RadixFromText←P900(token←v10904.f1));
}
else {
SOURCE(17672, 17)
(void) XR←RaiseError((word) (( (bPt) gf←c51508)+984)/* var←c41172 */ , 0);
};
};
};
}
static word GetInt←P1440(s←v11008)
word s←v11008;
{
word var←c11052;
/* GetInt: */
SOURCE(17695, 76)
SOURCE(17738, 33)
{
W3 var←c0249;
W3 var←c46036;
(void) GetToken←P720((word) &var←c0249, s←v11008);
var←c46036 = var←c0249;
return((word) IntFromToken←P1380(var←c46036));
};
}
static word RealFromToken←P1500(token←v11112)
W3 token←v11112;
{
register ptr gf←c51540 = (ptr) &globalframe;
word var←c11156;
/* RealFromToken: */
SOURCE(17777, 231)
SOURCE(17831, 177)
{
word var←c46068;
var←c46068 = token←v11112.f0;
switch (var←c46068) {
case 1:
SOURCE(17861, 31)
{
float tf276;
return((
tf276 = (float)(int)(word) IntFromText←P840(token←v11112.f1), *(word*)&tf276
));
};
case 2:
SOURCE(17903, 33)
{
float tf277;
return((
tf277 = (float)(int)(word) RadixFromText←P900(token←v11112.f1), *(word*)&tf277
));
};
case 3:
SOURCE(17946, 32)
return((word) RealFromText←P960(token←v11112.f1));
default:
SOURCE(17991, 17)
(void) XR←RaiseError((word) (( (bPt) gf←c51540)+984)/* var←c41172 */ , 0);
break;
};
};
}
static word GetReal←P1560(s←v11216)
word s←v11216;
{
word var←c11260;
/* GetReal: */
SOURCE(18014, 79)
SOURCE(18059, 34)
{
W3 var←c0256;
W3 var←c46228;
(void) GetToken←P720((word) &var←c0256, s←v11216);
var←c46228 = var←c0256;
return((word) RealFromToken←P1500(var←c46228));
};
}
static word GetBool←P1620(s←v11320)
word s←v11320;
{
register ptr gf←c51572 = (ptr) &globalframe;
word var←c11364;
/* GetBool: */
SOURCE(18099, 144)
SOURCE(18144, 99)
{
word var←c46260;
var←c46260 = (word) GetName←P1320(s←v11320);
if ((var←c46260 == (* (( (ptr) gf←c51572)+180) ))) {
SOURCE(18176, 12)
return(1);
}
else {
if ((var←c46260 == (* (( (ptr) gf←c51572)+181) ))) {
SOURCE(18200, 13)
return(0);
}
else {
SOURCE(18226, 17)
(void) XR←RaiseError((word) (( (bPt) gf←c51572)+984)/* var←c41172 */ , 0);
};
};
};
}
static word Decrypt1←P1680(key←v11424, char←v11452)
word key←v11424;
word char←v11452;
{
word var←c11496;
word cipher←v18416;
word plain←v18444;
/* Decrypt1: */
SOURCE(18333, 201)
SOURCE(18397, 24)
cipher←v18416 = char←v11452;
SOURCE(18423, 46)
{
word idx278;
plain←v18444 = (
idx278 = (word) XRM←BITXOR(cipher←v18416, ((* (ptr) key←v11424 ) >> 8)),
BCK(idx278, 256)
);
};
SOURCE(18471, 42)
(* (ptr) key←v11424 ) = ( (((unsigned)(((word) (cipher←v18416 + (* (ptr) key←v11424 )) * 52845) + 22719) << 16) >> 16) );
SOURCE(18515, 19)
return(plain←v18444);
}
static void BeginEExec←P1740(s←v11556)
word s←v11556;
{
register ptr gf←c51604 = (ptr) &globalframe;
word i←v18488 = 0;
W4 a←v18516;
word nonhex←v18544 = 0;
/* BeginEExec: */
SOURCE(18540, 703)
SOURCE(18639, 31)
{
word var←c46292;
var←c46292 = XR←NewObject(4, (* (( (ptr) gf←c51604)+31) ));
(* (ptr) var←c46292 ) = 55665;
(* (( (ptr) s←v11556)+3) ) = var←c46292;
};
SOURCE(18672, 183)
lab←L100072: ;
if ((i←v18488 < 4)) {
}
else {
goto lab←L100070;
};
{
word char←v18624;
word class←v18652;
SOURCE(18685, 23)
char←v18624 = (word) GetChar←P600(s←v11556);
SOURCE(18710, 34)
class←v18652 = (unsigned) (word) (* (( (bPt) (* (( (ptr) gf←c51604)+4)/* classFromChar←v3700 */ ))+char←v18624) );
SOURCE(18746, 109)
if ((i←v18488 != 0) || (class←v18652 > 1)) {
SOURCE(18790, 11)
(* (( (ptr) &a←v18516)+BCK(i←v18488, 4)) ) = char←v18624;
SOURCE(18803, 7)
i←v18488 = (i←v18488 + 1);
SOURCE(18812, 43)
if (((class←v18652 - 15) > 3)) {
SOURCE(18842, 13)
nonhex←v18544 = 1;
};
};
};
goto lab←L100072;
lab←L100070: ;
SOURCE(18869, 374)
if ((0 != nonhex←v18544)) {
SOURCE(18886, 57)
{
register word i←v18696 = 0;
lab←L100076: ;
SOURCE(18909, 34)
{
word var←c46324;
var←c46324 = (word) Decrypt1←P1680((* (( (ptr) s←v11556)+3) ), (* (( (ptr) &a←v18516)+BCK(i←v18696, 4)) ));
};
if ((i←v18696 >= 3)) {
goto lab←L100073;
};
i←v18696 = (i←v18696 + 1);
goto lab←L100076;
lab←L100073: ;
};
SOURCE(18965, 17)
(* (( (ptr) s←v11556)+2) ) = 1;
}
else {
SOURCE(18991, 274)
{
W4 d←v18740;
SOURCE(19019, 49)
{
register word i←v18820 = 0;
lab←L100080: ;
SOURCE(19042, 26)
(* (( (ptr) &d←v18740)+BCK(i←v18820, 4)) ) = (unsigned) (word) (* (( (bPt) (* (( (ptr) gf←c51604)+5)/* digit←v3728 */ ))+(* (
( (ptr) &a←v18516)+BCK(i←v18820, 4)) )) );
if ((i←v18820 >= 3)) {
goto lab←L100077;
};
i←v18820 = (i←v18820 + 1);
goto lab←L100080;
lab←L100077: ;
};
SOURCE(19070, 39)
{
word var←c46356;
word idx279;
var←c46356 = (word) Decrypt1←P1680((* (( (ptr) s←v11556)+3) ), (
idx279 = (word) (((word) d←v18740.f0 << 4) + d←v18740.f1),
BCK(idx279, 256)
));
};
SOURCE(19128, 39)
{
word var←c46388;
word idx280;
var←c46388 = (word) Decrypt1←P1680((* (( (ptr) s←v11556)+3) ), (
idx280 = (word) (((word) d←v18740.f2 << 4) + d←v18740.f3),
BCK(idx280, 256)
));
};
SOURCE(19186, 14)
(* (( (ptr) s←v11556)+2) ) = 2;
SOURCE(19202, 41)
{
register word noName←c46420 = 0;
if ((noName←c46420 > 1)) {
goto lab←L100081;
};
lab←L100084: ;
SOURCE(19220, 23)
{
word var←c46452;
var←c46452 = (word) GetChar←P600(s←v11556);
};
if ((noName←c46420 >= 1)) {
goto lab←L100081;
};
noName←c46420 = (noName←c46420 + 1);
goto lab←L100084;
lab←L100081: ;
};
};
};
}
static word GetUZone←P1800()
{
register ptr gf←c51636 = (ptr) &globalframe;
word var←c11624;
/* GetUZone: */
SOURCE(19305, 80)
SOURCE(19347, 38)
{
word pd281;
pd281 = (* (( (ptr) (* (( (ptr) gf←c51636)+374)/* var←c46516 */ ))+6) );
return((word) ( *( (fPt) ((* (ptr) pd281 ))))(pd281));
};
}
static void GetBlockFromString←P1860(formal←c0286, data←v11796)
word formal←c0286;
word data←v11796;
{
register ptr gf←c51668 = (ptr) &globalframe;
word var←c0702;
word var←c0703;
word string←v18864;
/* GetBlockFromString: */
SOURCE(19484, 190)
/* Return var split */
SOURCE(19554, 29)
string←v18864 = XR←Narrow(data←v11796, (* (( (ptr) gf←c51668)+30) ));
SOURCE(19585, 89)
var←c0702 = string←v18864;
/* eliminated constant return field */
var←c0703 = (* (ptr) string←v18864 );
/* removed tail goto */
(* (( (ptr) formal←c0286)+2) ) = var←c0703;
(* (( (ptr) formal←c0286)+1) ) = 4;
(* (ptr) formal←c0286 ) = var←c0702;
return;
}
static void CharStringFromString←P1920(formal←c0289, string←v11916)
word formal←c0289;
word string←v11916;
{
register ptr gf←c51700 = (ptr) &globalframe;
word var←c0704;
word var←c0705;
/* CharStringFromString: */
SOURCE(19679, 121)
/* Return var split */
SOURCE(19748, 52)
var←c0704 = string←v11916;
var←c0705 = (word) (( (bPt) gf←c51700)+1220)/* var←c42132 */ ;
/* removed tail goto */
(* (( (ptr) formal←c0289)+1) ) = var←c0705;
(* (ptr) formal←c0289 ) = var←c0704;
return;
}
static word SpecialFromToken←P1980(token←v12124)
W3 token←v12124;
{
register ptr gf←c51732 = (ptr) &globalframe;
word var←c12168;
/* SpecialFromToken: */
SOURCE(20033, 142)
SOURCE(20090, 85)
{
word var←c46644;
var←c46644 = token←v12124.f0;
if ((var←c46644 == 6)) {
SOURCE(20124, 21)
{
word limit282;
return( (unsigned) (word) (* ((( (bPt) token←v12124.f1)+4)+(
limit282 = (word) (unsigned) (* (( (hPt) token←v12124.f1)+1) ),
BCK(0, limit282)
)) ));
};
}
else {
SOURCE(20158, 17)
(void) XR←RaiseError((word) (( (bPt) gf←c51732)+984)/* var←c41172 */ , 0);
};
};
}
static word OpenFromToken←P2040(token←v12300)
W3 token←v12300;
{
register ptr gf←c51764 = (ptr) &globalframe;
word var←c12344;
word open←v18908;
/* OpenFromToken: */
SOURCE(20214, 175)
SOURCE(20269, 106)
{
word var←c46676;
var←c46676 = (word) SpecialFromToken←P1980(token←v12300);
if ((var←c46676 == 91)) {
open←v18908 = 0;
}
else {
if ((var←c46676 == 123)) {
open←v18908 = 1;
}
else {
open←v18908 = (unsigned) (
XR←RaiseError((word) (( (bPt) gf←c51764)+984)/* var←c41172 */ , 0), 0
);
};
};
};
SOURCE(20377, 12)
return(open←v18908);
}
static void CloseFromToken←P2100(token←v12404, open←v12432)
W3 token←v12404;
word open←v12432;
{
register ptr gf←c51796 = (ptr) &globalframe;
word close←v18952;
/* CloseFromToken: */
SOURCE(20395, 198)
SOURCE(20448, 107)
{
word var←c46708;
var←c46708 = (word) SpecialFromToken←P1980(token←v12404);
if ((var←c46708 == 93)) {
close←v18952 = 0;
}
else {
if ((var←c46708 == 125)) {
close←v18952 = 1;
}
else {
close←v18952 = (unsigned) (
XR←RaiseError((word) (( (bPt) gf←c51796)+984)/* var←c41172 */ , 0), 0
);
};
};
};
SOURCE(20557, 36)
if ((open←v12432 != close←v18952)) {
SOURCE(20576, 17)
(void) XR←RaiseError((word) (( (bPt) gf←c51796)+984)/* var←c41172 */ , 0);
};
}
static word GetOpenDelim←P2160(s←v12492)
word s←v12492;
{
word var←c12536;
/* GetOpenDelim: */
SOURCE(20599, 85)
SOURCE(20650, 34)
{
W3 var←c0304;
W3 var←c46772;
(void) GetToken←P720((word) &var←c0304, s←v12492);
var←c46772 = var←c0304;
return((word) OpenFromToken←P2040(var←c46772));
};
}
static void GetCloseDelim←P2220(s←v12596, open←v12624)
word s←v12596;
word open←v12624;
{
/* GetCloseDelim: */
SOURCE(20690, 82)
SOURCE(20739, 33)
{
W3 var←c46804;
(void) GetToken←P720((word) &var←c46804, s←v12596);
(void) CloseFromToken←P2100(var←c46804, open←v12624);
};
}
static word GetMatrix←P2280(s←v12684)
word s←v12684;
{
register ptr gf←c51828 = (ptr) &globalframe;
word var←c12728;
W6 v←v19024;
word open←v19052;
/* GetMatrix: */
SOURCE(20778, 302)
SOURCE(20902, 29)
open←v19052 = (word) GetOpenDelim←P2160(s←v12684);
SOURCE(20933, 50)
{
register word i←v19132 = 0;
lab←L100090: ;
SOURCE(20958, 25)
{
word var←c46836;
var←c46836 = (word) GetReal←P1560(s←v12684);
(* (( (ptr) &v←v19024)+i←v19132) ) = var←c46836;
};
if ((i←v19132 >= 5)) {
goto lab←L100087;
};
i←v19132 = (i←v19132 + 1);
goto lab←L100090;
lab←L100087: ;
};
SOURCE(20985, 22)
(void) GetCloseDelim←P2220(s←v12684, open←v19052);
SOURCE(21009, 71)
{
word pd283;
pd283 = (* (( (ptr) (* (( (ptr) gf←c51828)+375)/* var←c46900 */ ))+4) );
return((word) ( *( (fPt) ((* (ptr) pd283 ))))(v←v19024.f0, v←v19024.f2, v←v19024.f4, v←v19024.f1, v←v19024.f3, v←v19024.f5, pd283)
);
};
}
static void GetBBox←P2340(formal←c0321, s←v12788)
word formal←c0321;
word s←v12788;
{
W4 var←c12832;
W4 v←v19204;
word open←v19232;
/* GetBBox: */
SOURCE(21086, 263)
SOURCE(21186, 29)
open←v19232 = (word) GetOpenDelim←P2160(s←v12788);
SOURCE(21217, 50)
{
register word i←v19312 = 0;
lab←L100095: ;
SOURCE(21242, 25)
{
word var←c46932;
var←c46932 = (word) GetReal←P1560(s←v12788);
(* (( (ptr) &v←v19204)+i←v19312) ) = var←c46932;
};
if ((i←v19312 >= 3)) {
goto lab←L100092;
};
i←v19312 = (i←v19312 + 1);
goto lab←L100095;
lab←L100092: ;
};
SOURCE(21269, 22)
(void) GetCloseDelim←P2220(s←v12788, open←v19232);
SOURCE(21293, 56)
var←c12832.f0 = v←v19204.f0;
var←c12832.f1 = v←v19204.f1;
var←c12832.f2 = v←v19204.f2;
var←c12832.f3 = v←v19204.f3;
/* removed tail goto */
(* (W4Pt) formal←c0321 ) = var←c12832;
return;
}
static word GetStdW←P2400(s←v12892)
word s←v12892;
{
word var←c12936;
word open←v19356;
word v←v19384;
/* GetStdW: */
SOURCE(21355, 131)
SOURCE(21400, 29)
open←v19356 = (word) GetOpenDelim←P2160(s←v12892);
SOURCE(21431, 20)
v←v19384 = (word) GetReal←P1560(s←v12892);
SOURCE(21453, 22)
(void) GetCloseDelim←P2220(s←v12892, open←v19356);
SOURCE(21477, 9)
return(v←v19384);
}
static word GetArray←P2460(s←v12996)
word s←v12996;
{
register ptr gf←c51860 = (ptr) &globalframe;
word array←v13040;
W14 v←v19428;
word length←v19456 = 0;
word open←v19484;
/* GetArray: */
SOURCE(21492, 385)
SOURCE(21492, 385)
array←v13040 = 0;
SOURCE(21593, 29)
open←v19484 = (word) GetOpenDelim←P2160(s←v12996);
SOURCE(21624, 155)
lab←L100098: ;
SOURCE(21624, 155)
{
W3 token←v19564;
SOURCE(21627, 26)
(void) GetToken←P720((word) &token←v19564, s←v12996);
SOURCE(21655, 124)
if ((token←v19564.f0 == 6)) {
SOURCE(21684, 27)
(void) CloseFromToken←P2100(token←v19564, open←v19484);
SOURCE(21713, 5)
goto lab←L100097;
}
else {
SOURCE(21727, 32)
{
word var←c46996;
var←c46996 = (word) RealFromToken←P1500(token←v19564);
(* (( (ptr) &v←v19428)+BCK(length←v19456, 14)) ) = var←c46996;
};
SOURCE(21761, 18)
length←v19456 = (length←v19456 + 1);
};
};
goto lab←L100098;
lab←L100097: ;
SOURCE(21791, 33)
{
word var←c47028;
word var←c47060;
word var←c47092;
var←c47028 = BCK(length←v19456, 67108863);
var←c47060 = ((word) var←c47028 << 2);
var←c47092 = XR←NewObject((4 + var←c47060), (* (( (ptr) gf←c51860)+29) ));
(* (ptr) var←c47092 ) = var←c47028;
array←v13040 = var←c47092;
};
SOURCE(21826, 51)
{
register word i←v19608 = 0;
register word noName←c47124;
noName←c47124 = length←v19456;
if ((i←v19608 >= noName←c47124)) {
goto lab←L100099;
};
lab←L100102: ;
SOURCE(21854, 23)
{
word limit284;
(* ((( (ptr) array←v13040)+1)+(
limit284 = (* (ptr) array←v13040 ),
BCK(i←v19608, limit284)
)) ) = (* (( (ptr) &v←v19428)+BCK(i←v19608, 14)) );
};
i←v19608 = (i←v19608 + 1);
if ((i←v19608 < noName←c47124)) {
goto lab←L100102;
};
lab←L100099: ;
};
SOURCE(21492, 385)
return(array←v13040);
}
static word ReadEncoding←P2520(s←v13100)
word s←v13100;
{
register ptr gf←c51892 = (ptr) &globalframe;
word var←c13144;
/* ReadEncoding: */
SOURCE(23730, 354)
SOURCE(23789, 295)
if (((word) GetKeyword←P1020(s←v13100) == (* (( (ptr) gf←c51892)+185) ))) {
SOURCE(23829, 33)
return((* (( (ptr) gf←c51892)+11)/* theStandardEncoding←v5380 */ ));
}
else {
SOURCE(23862, 224)
{
word array←v19652;
SOURCE(23864, 44)
array←v19652 = XR←NewObject(1024, (* (( (ptr) gf←c51892)+13) ));
SOURCE(23910, 113)
lab←L100105: ;
SOURCE(23913, 110)
{
word var←c47188;
var←c47188 = (word) GetKeyword←P1020(s←v13100);
if ((var←c47188 == (* (( (ptr) gf←c51892)+186) ))) {
SOURCE(23947, 78)
{
word index←v19696;
word name←v19724;
SOURCE(23949, 23)
{
word idx285;
index←v19696 = (
idx285 = (word) GetInt←P1440(s←v13100),
BCK(idx285, 256)
);
};
SOURCE(23974, 23)
name←v19724 = (word) GetName←P1320(s←v13100);
SOURCE(23999, 24)
(* (( (ptr) array←v19652)+index←v19696) ) = name←v19724;
};
}
else {
if ((var←c47188 == (* (( (ptr) gf←c51892)+187) )) || (var←c47188 == (* (( (ptr) gf←c51892)+188) ))) {
SOURCE(24047, 4)
goto lab←L100104;
};
};
};
goto lab←L100105;
lab←L100104: ;
SOURCE(24071, 13)
return(array←v19652);
};
};
}
static word ReadCharString←P2580(s←v13204)
word s←v13204;
{
register ptr gf←c51924 = (ptr) &globalframe;
word string←v13248;
word n←v19768;
/* ReadCharString: */
SOURCE(24093, 211)
SOURCE(24093, 211)
string←v13248 = 0;
SOURCE(24155, 18)
{
word idx286;
n←v19768 = (
idx286 = (word) GetInt←P1440(s←v13204),
SGNCK(idx286)
);
};
SOURCE(24182, 15)
{
word var←c47220;
var←c47220 = (word) GetName←P1320(s←v13204);
};
SOURCE(24205, 39)
{
word var←c47252;
word var←c47284;
word var←c47316;
var←c47252 = BCK(n←v19768, 268435455);
var←c47284 = ((word) ((word) (var←c47252 + 3) >> 2) << 2);
{
word pd287;
pd287 = (* (ptr) (* (( (ptr) gf←c51924)+10)/* untracedZone←v4820 */ ) );
var←c47316 = (word) ( *( (fPt) ((* (ptr) pd287 ))))((* (( (ptr) gf←c51924)+10)/* untracedZone←v4820 */ ), (4 + var←c47284), (* (
( (ptr) gf←c51924)+30) ), pd287);
};
(* (ptr) var←c47316 ) = var←c47252;
string←v13248 = var←c47316;
};
SOURCE(24246, 58)
{
register word i←v19812 = 0;
if ((i←v19812 >= n←v19768)) {
goto lab←L100106;
};
lab←L100109: ;
SOURCE(24269, 35)
{
word var←c47348;
var←c47348 = (word) GetChar←P600(s←v13204);
{
word limit288;
(* ((( (bPt) string←v13248)+4)+(
limit288 = (* (ptr) string←v13248 ),
BCK(i←v19812, limit288)
)) ) = var←c47348;
};
};
i←v19812 = (i←v19812 + 1);
if ((i←v19812 < n←v19768)) {
goto lab←L100109;
};
lab←L100106: ;
};
SOURCE(24093, 211)
return(string←v13248);
}
static word ReadSubrsInner←P2640(s←v13308)
word s←v13308;
{
register ptr gf←c51956 = (ptr) &globalframe;
word var←c13352;
word length←v19856;
word array←v19884;
/* ReadSubrsInner: */
SOURCE(24311, 324)
SOURCE(24369, 44)
{
word idx289;
length←v19856 = (
idx289 = (word) GetIntBeforeKeyword←P1140(s←v13308, (* (( (ptr) gf←c51956)+189) )),
SGNCK(idx289)
);
};
SOURCE(24415, 46)
{
word var←c47380;
word var←c47412;
word var←c47444;
var←c47380 = BCK(length←v19856, 67108863);
var←c47412 = ((word) var←c47380 << 2);
var←c47444 = XR←NewObject((4 + var←c47412), (* (( (ptr) gf←c51956)+28) ));
(* (ptr) var←c47444 ) = var←c47380;
array←v19884 = var←c47444;
};
SOURCE(24463, 121)
{
register word i←v19928 = 0;
if ((i←v19928 >= length←v19856)) {
goto lab←L100110;
};
lab←L100113: ;
{
word index←v19972;
SOURCE(24491, 40)
{
word idx290;
index←v19972 = (
idx290 = (word) GetIntAfterKeyword←P1200(s←v13308, (* (( (ptr) gf←c51956)+186) )),
SGNCK(idx290)
);
};
SOURCE(24552, 32)
{
word var←c47476;
var←c47476 = (word) ReadCharString←P2580(s←v13308);
{
word limit291;
(* ((( (ptr) array←v19884)+1)+(
limit291 = (* (ptr) array←v19884 ),
BCK(index←v19972, limit291)
)) ) = var←c47476;
};
};
};
i←v19928 = (i←v19928 + 1);
if ((i←v19928 < length←v19856)) {
goto lab←L100113;
};
lab←L100110: ;
};
SOURCE(24622, 13)
return(array←v19884);
}
static word ReadSubrs←P2700(s←v13412, hybrid←v13440)
word s←v13412;
word hybrid←v13440;
{
word array←v13484;
/* ReadSubrs: */
SOURCE(24641, 138)
SOURCE(24641, 138)
array←v13484 = 0;
SOURCE(24715, 25)
array←v13484 = (word) ReadSubrsInner←P2640(s←v13412);
SOURCE(24742, 37)
if ((0 != hybrid←v13440)) {
SOURCE(24757, 22)
{
word var←c47508;
var←c47508 = (word) ReadSubrsInner←P2640(s←v13412);
};
};
SOURCE(24641, 138)
return(array←v13484);
}
static void ReadFontInfo←P2760(s←v13544, self←v13572)
word s←v13544;
word self←v13572;
{
register ptr gf←c51988 = (ptr) &globalframe;
/* ReadFontInfo: */
SOURCE(24785, 504)
SOURCE(24837, 452)
lab←L100116: ;
SOURCE(24840, 449)
{
word var←c47540;
var←c47540 = (word) GetKeyword←P1020(s←v13544);
if ((var←c47540 == (* (( (ptr) gf←c51988)+191) ))) {
SOURCE(24878, 27)
(* (( (ptr) self←v13572)+7) ) = (word) GetString←P1260(s←v13544);
goto endif0292;
};
if ((var←c47540 == (* (( (ptr) gf←c51988)+192) ))) {
SOURCE(24918, 26)
(* (( (ptr) self←v13572)+8) ) = (word) GetString←P1260(s←v13544);
goto endif0292;
};
if ((var←c47540 == (* (( (ptr) gf←c51988)+193) ))) {
SOURCE(24959, 28)
(* (( (ptr) self←v13572)+9) ) = (word) GetString←P1260(s←v13544);
goto endif0292;
};
if ((var←c47540 == (* (( (ptr) gf←c51988)+194) ))) {
SOURCE(25004, 30)
(* (( (ptr) self←v13572)+10) ) = (word) GetString←P1260(s←v13544);
goto endif0292;
};
if ((var←c47540 == (* (( (ptr) gf←c51988)+195) ))) {
SOURCE(25047, 26)
(* (( (ptr) self←v13572)+11) ) = (word) GetString←P1260(s←v13544);
goto endif0292;
};
if ((var←c47540 == (* (( (ptr) gf←c51988)+196) ))) {
SOURCE(25091, 29)
(* (( (ptr) self←v13572)+12) ) = (word) GetReal←P1560(s←v13544);
goto endif0292;
};
if ((var←c47540 == (* (( (ptr) gf←c51988)+197) ))) {
SOURCE(25139, 30)
(* (( (ptr) self←v13572)+13) ) = (word) GetBool←P1620(s←v13544);
goto endif0292;
};
if ((var←c47540 == (* (( (ptr) gf←c51988)+198) ))) {
SOURCE(25193, 35)
(* (( (ptr) self←v13572)+14) ) = (word) GetReal←P1560(s←v13544);
goto endif0292;
};
if ((var←c47540 == (* (( (ptr) gf←c51988)+199) ))) {
SOURCE(25253, 36)
(* (( (ptr) self←v13572)+15) ) = (word) GetReal←P1560(s←v13544);
goto endif0292;
};
if ((var←c47540 == (* (( (ptr) gf←c51988)+200) ))) {
SOURCE(25299, 4)
goto lab←L100115;
};
endif0292: ;
};
goto lab←L100116;
lab←L100115: ;
}
static word ReadCharStringsInner←P2820(s←v13632)
word s←v13632;
{
register ptr gf←c52020 = (ptr) &globalframe;
word dict←v13676;
word count←v20016;
/* ReadCharStringsInner: */
SOURCE(25328, 337)
SOURCE(25328, 337)
dict←v13676 = 0;
SOURCE(25403, 42)
{
word idx293;
count←v20016 = (
idx293 = (word) GetIntBeforeKeyword←P1140(s←v13632, (* (( (ptr) gf←c52020)+201) )),
SGNCK(idx293)
);
};
SOURCE(25447, 27)
{
word pd294;
pd294 = (* (( (ptr) (* (( (ptr) gf←c52020)+376)/* var←c47572 */ ))+5) );
dict←v13676 = (word) ( *( (fPt) ((* (ptr) pd294 ))))(count←v20016, 0, 0, pd294);
};
SOURCE(25476, 24)
(void) SkipToKeyword←P1080(s←v13632, (* (( (ptr) gf←c52020)+202) ));
SOURCE(25502, 163)
lab←L100119: ;
SOURCE(25502, 163)
{
word name←v20060;
SOURCE(25505, 23)
name←v20060 = (word) GetName←P1320(s←v13632);
SOURCE(25547, 118)
if ((name←v20060 == (* (( (ptr) gf←c52020)+200) ))) {
SOURCE(25565, 10)
goto lab←L100118;
}
else {
SOURCE(25577, 48)
{
word var←c47636;
{
word var←c47604;
var←c47604 = (word) ReadCharString←P2580(s←v13632);
{
word pd295;
pd295 = (* (( (ptr) (* (( (ptr) gf←c52020)+376)/* var←c47572 */ ))+9) );
var←c47636 = (word) ( *( (fPt) ((* (ptr) pd295 ))))(dict←v13676, name←v20060, var←c47604, pd295);
};
};
};
SOURCE(25650, 15)
{
word var←c47668;
var←c47668 = (word) GetName←P1320(s←v13632);
};
};
};
goto lab←L100119;
lab←L100118: ;
SOURCE(25328, 337)
return(dict←v13676);
}
static word ReadCharStrings←P2880(s←v13736, hybrid←v13764)
word s←v13736;
word hybrid←v13764;
{
word dict←v13808;
/* ReadCharStrings: */
SOURCE(25689, 159)
SOURCE(25689, 159)
dict←v13808 = 0;
SOURCE(25773, 30)
dict←v13808 = (word) ReadCharStringsInner←P2820(s←v13736);
SOURCE(25805, 43)
if ((0 != hybrid←v13764)) {
SOURCE(25820, 28)
{
word var←c47700;
var←c47700 = (word) ReadCharStringsInner←P2820(s←v13736);
};
};
SOURCE(25689, 159)
return(dict←v13808);
}
static word ReadMetrics2←P2940(s←v13868)
word s←v13868;
{
register ptr gf←c52052 = (ptr) &globalframe;
word dict←v13912;
word count←v20104;
/* ReadMetrics2: */
SOURCE(25854, 289)
SOURCE(25854, 289)
dict←v13912 = 0;
SOURCE(25918, 42)
{
word idx296;
count←v20104 = (
idx296 = (word) GetIntBeforeKeyword←P1140(s←v13868, (* (( (ptr) gf←c52052)+201) )),
SGNCK(idx296)
);
};
SOURCE(25962, 27)
{
word pd297;
pd297 = (* (( (ptr) (* (( (ptr) gf←c52052)+376)/* var←c47572 */ ))+5) );
dict←v13912 = (word) ( *( (fPt) ((* (ptr) pd297 ))))(count←v20104, 0, 0, pd297);
};
SOURCE(25991, 24)
(void) SkipToKeyword←P1080(s←v13868, (* (( (ptr) gf←c52052)+202) ));
SOURCE(26017, 126)
lab←L100122: ;
SOURCE(26017, 126)
{
word name←v20148;
SOURCE(26020, 23)
name←v20148 = (word) GetName←P1320(s←v13868);
SOURCE(26045, 98)
if ((name←v20148 == (* (( (ptr) gf←c52052)+200) ))) {
SOURCE(26063, 10)
goto lab←L100121;
}
else {
SOURCE(26075, 51)
{
word var←c47764;
{
word var←c47732;
var←c47732 = (word) ReadMetrics2Entry←P3000(s←v13868);
{
word pd298;
pd298 = (* (( (ptr) (* (( (ptr) gf←c52052)+376)/* var←c47572 */ ))+9) );
var←c47764 = (word) ( *( (fPt) ((* (ptr) pd298 ))))(dict←v13912, name←v20148, var←c47732, pd298);
};
};
};
SOURCE(26128, 15)
{
word var←c47796;
var←c47796 = (word) GetName←P1320(s←v13868);
};
};
};
goto lab←L100122;
lab←L100121: ;
SOURCE(25854, 289)
return(dict←v13912);
}
static word ReadMetrics2Entry←P3000(s←v13972)
word s←v13972;
{
register ptr gf←c52084 = (ptr) &globalframe;
word var←c14016;
W4 v←v20220;
word open←v20248;
/* ReadMetrics2Entry: */
SOURCE(26167, 296)
SOURCE(26277, 29)
open←v20248 = (word) GetOpenDelim←P2160(s←v13972);
SOURCE(26308, 50)
{
register word i←v20328 = 0;
lab←L100126: ;
SOURCE(26333, 25)
{
word var←c47828;
var←c47828 = (word) GetReal←P1560(s←v13972);
(* (( (ptr) &v←v20220)+i←v20328) ) = var←c47828;
};
if ((i←v20328 >= 3)) {
goto lab←L100123;
};
i←v20328 = (i←v20328 + 1);
goto lab←L100126;
lab←L100123: ;
};
SOURCE(26360, 22)
(void) GetCloseDelim←P2220(s←v13972, open←v20248);
SOURCE(26384, 79)
{
word var←c47892;
{
word pd299;
pd299 = (* (ptr) (* (( (ptr) gf←c52084)+10)/* untracedZone←v4820 */ ) );
var←c47892 = (word) ( *( (fPt) ((* (ptr) pd299 ))))((* (( (ptr) gf←c52084)+10)/* untracedZone←v4820 */ ), 16, (* (( (ptr) gf←c52084)+27)
), pd299);
};
(* (ptr) var←c47892 ) = v←v20220.f0;
(* (( (ptr) var←c47892)+1) ) = v←v20220.f1;
(* (( (ptr) var←c47892)+2) ) = v←v20220.f2;
(* (( (ptr) var←c47892)+3) ) = v←v20220.f3;
return(var←c47892);
};
}
static word CharStringsLength←P3060(self←v14188)
word self←v14188;
{
register ptr gf←c52116 = (ptr) &globalframe;
word var←c14232;
word data←v20372;
/* CharStringsLength: */
SOURCE(26656, 132)
SOURCE(26716, 30)
data←v20372 = XR←Narrow((* (ptr) self←v14188 ), (* (( (ptr) gf←c52116)+26) ));
SOURCE(26748, 40)
{
word pd300;
word idx301;
pd300 = (* (( (ptr) (* (( (ptr) gf←c52116)+376)/* var←c47572 */ ))+6) );
return((
idx301 = (word) ( *( (fPt) ((* (ptr) pd300 ))))((* ((( (ptr) data←v20372)+1)) ), pd300),
SGNCK(idx301)
));
};
}
static void CharStringsForAll←P3120(self←v14292, formal←c0701)
word self←v14292;
word formal←c0701;
{
W7 var←c52148;
/* declaration of action←v14320 skipped */
register ptr gf←c52180 = (ptr) &globalframe;
/* declaration of var←c47956 skipped */
word data←v20416;
var←c52148.f4/* action←v14320 */ = formal←c0701;
/* CharStringsForAll: */
SOURCE(26794, 299)
{
word tmpAddr302;
tmpAddr302 = (word) (( (ptr) &var←c52148)+5)/* var←c47956 */ ;
(* (ptr) tmpAddr302 ) = ( ((word) (fPt) pairAction←P5628) );
(* (( (ptr) tmpAddr302) + 1) ) = 1;
};
SOURCE(26873, 30)
data←v20416 = XR←Narrow((* (ptr) self←v14292 ), (* (( (ptr) gf←c52180)+26) ));
SOURCE(27046, 47)
{
word var←c47988;
word pd303;
pd303 = (* (( (ptr) (* (( (ptr) gf←c52180)+376)/* var←c47572 */ ))+13) );
var←c47988 = (word) ( *( (fPt) ((* (ptr) pd303 ))))((* (( (ptr) data←v20416)+1) ), (word) (( (bPt) &var←c52148)+20)/* var←c47956 */ , pd303)
;
};
}
static word pairAction←P5628(key←v36572, val←v36600, formal←c52244)
word key←v36572;
word val←v36600;
word formal←c52244;
{
register ptr gf←c52212 = (ptr) &globalframe;
word quit←v36644;
word name←v20488;
word string←v20516;
formal←c52244 = (formal←c52244 - 20);
/* pairAction: */
SOURCE(26905, 136)
SOURCE(26905, 136)
quit←v36644 = 0;
SOURCE(26943, 24)
name←v20488 = XR←Narrow(key←v36572, (* (( (ptr) gf←c52212)+16) ));
SOURCE(26969, 28)
string←v20516 = XR←Narrow(val←v36600, (* (( (ptr) gf←c52212)+30) ));
SOURCE(26999, 42)
{
W2 var←c48020;
(void) CharStringFromString←P1920((word) &var←c48020, string←v20516);
{
word pd304;
pd304 = (* (( (ptr) formal←c52244)+4) );
(void) ( *( (fPt) ((* (ptr) pd304 ))))(name←v20488, var←c48020, pd304);
};
};
SOURCE(26905, 136)
return(quit←v36644);
}
static word CharStringsKnown←P3180(self←v14468, name←v14496)
word self←v14468;
word name←v14496;
{
register ptr gf←c52276 = (ptr) &globalframe;
word var←c14540;
word data←v20560;
/* CharStringsKnown: */
SOURCE(27099, 156)
SOURCE(27171, 30)
data←v20560 = XR←Narrow((* (ptr) self←v14468 ), (* (( (ptr) gf←c52276)+26) ));
SOURCE(27203, 52)
{
word var←c0683;
{
W2 var←c0415;
word var←c0682;
{
word pd305;
pd305 = (* (( (ptr) (* (( (ptr) gf←c52276)+376)/* var←c47572 */ ))+7) );
(void) ( *( (fPt) ((* (ptr) pd305 ))))((word) &var←c0415, (* (( (ptr) data←v20560)+1) ), name←v14496, pd305);
};
var←c0682 = var←c0415.f1;
var←c0683 = (unsigned) (var←c0682 != 0);
};
return(var←c0683);
};
}
static void CharStringsGet←P3240(formal←c0427, self←v14600, name←v14628)
word formal←c0427;
word self←v14600;
word name←v14628;
{
register ptr gf←c52308 = (ptr) &globalframe;
W2 var←c14672;
word data←v20604;
word val←v20632;
W2 var←c0421;
W2 var←c0422;
/* CharStringsGet: */
SOURCE(27261, 332)
SOURCE(27337, 30)
data←v20604 = XR←Narrow((* (ptr) self←v14600 ), (* (( (ptr) gf←c52308)+26) ));
SOURCE(27369, 51)
{
word pd306;
pd306 = (* (( (ptr) (* (( (ptr) gf←c52308)+376)/* var←c47572 */ ))+7) );
(void) ( *( (fPt) ((* (ptr) pd306 ))))((word) &var←c0421, (* (( (ptr) data←v20604)+1) ), name←v14628, pd306);
};
val←v20632 = var←c0421.f1;
SOURCE(27422, 64)
if ((val←v20632 == 0)) {
SOURCE(27438, 48)
{
word pd307;
pd307 = (* (( (ptr) (* (( (ptr) gf←c52308)+376)/* var←c47572 */ ))+7) );
(void) ( *( (fPt) ((* (ptr) pd307 ))))((word) &var←c0422, (* (( (ptr) data←v20604)+1) ), (* (( (ptr) gf←c52308)+12)/* notdef←v5716 */ ), pd307)
;
};
val←v20632 = var←c0422.f1;
};
SOURCE(27488, 105)
{
word var←c48084;
var←c48084 = val←v20632;
if ((var←c48084 == 0)) {
goto lab←L100128;
};
if (((* (( (ptr) gf←c52308)+30) ) == XR←GetReferentType(var←c48084))) {
{
word string←v20688;
string←v20688 = var←c48084;
SOURCE(27527, 36)
{
W2 var←c48148;
(void) CharStringFromString←P1920((word) &var←c48148, string←v20688);
var←c14672 = var←c48148;
/* removed tail goto */
};
};
}
else {
lab←L100128: ;
SOURCE(27576, 17)
(void) XR←RaiseError((word) (( (bPt) gf←c52308)+984)/* var←c41172 */ , 0);
};
};
(* (W2Pt) formal←c0427 ) = var←c14672;
return;
}
static void SubrsGet←P3300(formal←c0435, self←v14732, n←v14760)
word formal←c0435;
word self←v14732;
word n←v14760;
{
register ptr gf←c52340 = (ptr) &globalframe;
W2 var←c14804;
word data←v20732;
/* SubrsGet: */
SOURCE(27599, 141)
SOURCE(27665, 30)
data←v20732 = XR←Narrow((* (ptr) self←v14732 ), (* (( (ptr) gf←c52340)+26) ));
SOURCE(27697, 43)
{
W2 var←c48244;
{
W2 var←c0434;
{
word var←c48212;
word var←c0684;
var←c48212 = (* (ptr) data←v20732 );
{
word limit308;
var←c0684 = (* ((( (ptr) var←c48212)+1)+(
limit308 = (* (ptr) var←c48212 ),
BCK(n←v14760, limit308)
)) );
};
(void) CharStringFromString←P1920((word) &var←c0434, var←c0684);
};
var←c48244 = var←c0434;
};
var←c14804 = var←c48244;
/* removed tail goto */
};
(* (W2Pt) formal←c0435 ) = var←c14804;
return;
}
static word ParseFont←P3360(stream←v14864)
word stream←v14864;
{
register ptr gf←c52372 = (ptr) &globalframe;
word self←v14908;
word buffer←v20776;
word s←v20804;
word hybrid←v20832 = 0;
word data←v20860;
/* ParseFont: */
SOURCE(27746, 1918)
SOURCE(27746, 1918)
self←v14908 = 0;
SOURCE(27816, 45)
{
word pd309;
pd309 = (* (( (ptr) (* (( (ptr) gf←c52372)+371)/* var←c44852 */ ))+6) );
buffer←v20776 = (word) ( *( (fPt) ((* (ptr) pd309 ))))(512, pd309);
};
SOURCE(27863, 61)
s←v20804 = XR←NewObject(24, (* (( (ptr) gf←c52372)+25) ));
(* (ptr) s←v20804 ) = stream←v14864;
(* (( (ptr) s←v20804)+1) ) = buffer←v20776;
SOURCE(27948, 30)
data←v20860 = XR←NewObject(12, (* (( (ptr) gf←c52372)+26) ));
SOURCE(27980, 204)
{
word var←c48340;
var←c48340 = XR←NewObject(180, (* (( (ptr) gf←c52372)+22) ));
(* (ptr) var←c48340 ) = data←v20860;
(* (( (ptr) var←c48340)+1) ) = (word) (( (bPt) gf←c52372)+1060)/* var←c41492 */ ;
(* (( (ptr) var←c48340)+2) ) = (word) (( (bPt) gf←c52372)+1052)/* var←c41460 */ ;
(* (( (ptr) var←c48340)+3) ) = (word) (( (bPt) gf←c52372)+1044)/* var←c41428 */ ;
(* (( (ptr) var←c48340)+4) ) = (word) (( (bPt) gf←c52372)+1036)/* var←c41396 */ ;
(* (( (ptr) var←c48340)+5) ) = (word) (( (bPt) gf←c52372)+1028)/* var←c41364 */ ;
(* (( (ptr) var←c48340)+12) ) = (* (ptr) &fc268 );
(* (( (ptr) var←c48340)+14) ) = (* (ptr) &fc268 );
(* (( (ptr) var←c48340)+15) ) = (* (ptr) &fc268 );
(* (( (ptr) var←c48340)+18) ) = (* (ptr) &fc268 );
(* (( (ptr) var←c48340)+19) ) = (* (ptr) &fc268 );
(* (( (ptr) var←c48340)+20) ) = (* (ptr) &fc268 );
(* (( (ptr) var←c48340)+21) ) = (* (ptr) &fc268 );
(* (( (ptr) var←c48340)+26) ) = (* (ptr) &fc268 );
(* (( (ptr) var←c48340)+32) ) = (* (ptr) &fc310 );
(* (( (ptr) var←c48340)+33) ) = (* (ptr) &fc311 );
(* (( (ptr) var←c48340)+34) ) = (* (ptr) &fc312 );
(* (( (ptr) var←c48340)+35) ) = (* (ptr) &fc268 );
(* (( (ptr) var←c48340)+36) ) = (* (ptr) &fc268 );
(* (( (ptr) var←c48340)+42) ) = 4;
self←v14908 = var←c48340;
};
SOURCE(28186, 495)
lab←L100132: ;
SOURCE(28189, 492)
{
word var←c48372;
var←c48372 = (word) GetKeyword←P1020(s←v20804);
if ((var←c48372 == (* (( (ptr) gf←c52372)+215) ))) {
SOURCE(28228, 21)
(void) ReadFontInfo←P2760(s←v20804, self←v14908);
goto endif0313;
};
if ((var←c48372 == (* (( (ptr) gf←c52372)+216) ))) {
SOURCE(28281, 26)
(* (( (ptr) self←v14908)+6) ) = (word) GetName←P1320(s←v20804);
goto endif0313;
};
if ((var←c48372 == (* (( (ptr) gf←c52372)+217) ))) {
SOURCE(28322, 31)
(* (( (ptr) self←v14908)+16) ) = (word) ReadEncoding←P2520(s←v20804);
goto endif0313;
};
if ((var←c48372 == (* (( (ptr) gf←c52372)+218) ))) {
SOURCE(28369, 26)
(* (( (ptr) self←v14908)+23) ) = (word) GetInt←P1440(s←v20804);
goto endif0313;
};
if ((var←c48372 == (* (( (ptr) gf←c52372)+219) ))) {
SOURCE(28410, 25)
(* (( (ptr) self←v14908)+24) ) = (word) GetInt←P1440(s←v20804);
goto endif0313;
};
if ((var←c48372 == (* (( (ptr) gf←c52372)+220) ))) {
SOURCE(28452, 30)
(* (( (ptr) self←v14908)+17) ) = (word) GetMatrix←P2280(s←v20804);
goto endif0313;
};
if ((var←c48372 == (* (( (ptr) gf←c52372)+221) ))) {
SOURCE(28497, 26)
(void) GetBBox←P2340((word) (( (bPt) self←v14908)+72), s←v20804);
goto endif0313;
};
if ((var←c48372 == (* (( (ptr) gf←c52372)+222) ))) {
SOURCE(28538, 25)
(* (( (ptr) self←v14908)+25) ) = (word) GetInt←P1440(s←v20804);
goto endif0313;
};
if ((var←c48372 == (* (( (ptr) gf←c52372)+223) ))) {
SOURCE(28581, 29)
(* (( (ptr) self←v14908)+26) ) = (word) GetReal←P1560(s←v20804);
goto endif0313;
};
if ((var←c48372 == (* (( (ptr) gf←c52372)+224) ))) {
SOURCE(28625, 31)
(* (( (ptr) self←v14908)+27) ) = (word) ReadMetrics2←P2940(s←v20804);
goto endif0313;
};
if ((var←c48372 == (* (( (ptr) gf←c52372)+225) ))) {
SOURCE(28668, 13)
(void) BeginEExec←P1740(s←v20804);
goto endif0313;
};
if ((var←c48372 == (* (( (ptr) gf←c52372)+226) ))) {
SOURCE(28695, 4)
goto lab←L100131;
};
endif0313: ;
};
goto lab←L100132;
lab←L100131: ;
SOURCE(28719, 806)
lab←L100135: ;
SOURCE(28738, 787)
{
word var←c48404;
var←c48404 = (word) GetKeyword←P1020(s←v20804);
if ((var←c48404 == (* (( (ptr) gf←c52372)+227) ))) {
SOURCE(28774, 13)
hybrid←v20832 = 1;
goto endif0314;
};
if ((var←c48404 == (* (( (ptr) gf←c52372)+228) ))) {
SOURCE(28799, 33)
(* (ptr) data←v20860 ) = (word) ReadSubrs←P2700(s←v20804, hybrid←v20832);
goto endif0314;
};
if ((var←c48404 == (* (( (ptr) gf←c52372)+229) ))) {
SOURCE(28848, 27)
(* (( (ptr) self←v14908)+39) ) = (word) GetBool←P1620(s←v20804);
goto endif0314;
};
if ((var←c48404 == (* (( (ptr) gf←c52372)+230) ))) {
SOURCE(28895, 30)
(* (( (ptr) self←v14908)+40) ) = (word) GetInt←P1440(s←v20804);
goto endif0314;
};
if ((var←c48404 == (* (( (ptr) gf←c52372)+231) ))) {
SOURCE(28937, 22)
(* (( (ptr) self←v14908)+42) ) = (word) GetInt←P1440(s←v20804);
goto endif0314;
};
if ((var←c48404 == (* (( (ptr) gf←c52372)+232) ))) {
SOURCE(28975, 27)
(* (( (ptr) self←v14908)+43) ) = (word) GetBool←P1620(s←v20804);
goto endif0314;
};
if ((var←c48404 == (* (( (ptr) gf←c52372)+233) ))) {
SOURCE(29017, 25)
(* (( (ptr) self←v14908)+41) ) = (word) GetInt←P1440(s←v20804);
goto endif0314;
};
if ((var←c48404 == (* (( (ptr) gf←c52372)+234) ))) {
SOURCE(29059, 29)
(* (( (ptr) self←v14908)+28) ) = (word) GetArray←P2460(s←v20804);
goto endif0314;
};
if ((var←c48404 == (* (( (ptr) gf←c52372)+235) ))) {
SOURCE(29105, 29)
(* (( (ptr) self←v14908)+29) ) = (word) GetArray←P2460(s←v20804);
goto endif0314;
};
if ((var←c48404 == (* (( (ptr) gf←c52372)+236) ))) {
SOURCE(29152, 30)
(* (( (ptr) self←v14908)+30) ) = (word) GetArray←P2460(s←v20804);
goto endif0314;
};
if ((var←c48404 == (* (( (ptr) gf←c52372)+237) ))) {
SOURCE(29205, 35)
(* (( (ptr) self←v14908)+31) ) = (word) GetArray←P2460(s←v20804);
goto endif0314;
};
if ((var←c48404 == (* (( (ptr) gf←c52372)+238) ))) {
SOURCE(29256, 27)
(* (( (ptr) self←v14908)+32) ) = (word) GetReal←P1560(s←v20804);
goto endif0314;
};
if ((var←c48404 == (* (( (ptr) gf←c52372)+239) ))) {
SOURCE(29299, 27)
(* (( (ptr) self←v14908)+33) ) = (word) GetReal←P1560(s←v20804);
goto endif0314;
};
if ((var←c48404 == (* (( (ptr) gf←c52372)+240) ))) {
SOURCE(29341, 26)
(* (( (ptr) self←v14908)+34) ) = (word) GetReal←P1560(s←v20804);
goto endif0314;
};
if ((var←c48404 == (* (( (ptr) gf←c52372)+241) ))) {
SOURCE(29379, 23)
(* (( (ptr) self←v14908)+35) ) = (word) GetStdW←P2400(s←v20804);
goto endif0314;
};
if ((var←c48404 == (* (( (ptr) gf←c52372)+242) ))) {
SOURCE(29414, 23)
(* (( (ptr) self←v14908)+36) ) = (word) GetStdW←P2400(s←v20804);
goto endif0314;
};
if ((var←c48404 == (* (( (ptr) gf←c52372)+243) ))) {
SOURCE(29453, 28)
(* (( (ptr) self←v14908)+37) ) = (word) GetArray←P2460(s←v20804);
goto endif0314;
};
if ((var←c48404 == (* (( (ptr) gf←c52372)+244) ))) {
SOURCE(29497, 28)
(* (( (ptr) self←v14908)+38) ) = (word) GetArray←P2460(s←v20804);
goto endif0314;
};
if ((var←c48404 == (* (( (ptr) gf←c52372)+245) ))) {
SOURCE(29543, 4)
goto lab←L100134;
};
endif0314: ;
};
goto lab←L100135;
lab←L100134: ;
SOURCE(29567, 45)
(* (( (ptr) data←v20860)+1) ) = (word) ReadCharStrings←P2880(s←v20804, hybrid←v20832);
SOURCE(29634, 30)
{
word pd315;
pd315 = (* (( (ptr) (* (( (ptr) gf←c52372)+371)/* var←c44852 */ ))+7) );
(void) ( *( (fPt) ((* (ptr) pd315 ))))(buffer←v20776, pd315);
};
SOURCE(27746, 1918)
return(self←v14908);
}
static void DecodeCharString←P3420(block←v15448, lenIV←v15476, int←v15504, cmd1←v15532, cmd2←v15560)
W3 block←v15448;
word lenIV←v15476;
word int←v15504;
word cmd1←v15532;
word cmd2←v15560;
{
W11 var←c52404;
/* declaration of var←c48436 skipped */
/* declaration of cstr←v20916 skipped */
/* DecodeCharString: */
SOURCE(29846, 927)
{
word tmpAddr316;
tmpAddr316 = (word) (( (ptr) &var←c52404)+4)/* var←c48436 */ ;
(* (ptr) tmpAddr316 ) = ( ((word) (fPt) Get←P5736) );
(* (( (ptr) tmpAddr316) + 1) ) = 1;
};
SOURCE(29976, 91)
(* (( (ptr) &var←c52404)+6) ) = block←v15448.f0;
{
word idx317;
(* (( (ptr) &var←c52404)+7) ) = (
idx317 = (word) block←v15448.f1,
SGNCK(idx317)
);
};
{
word idx318;
(* (( (ptr) &var←c52404)+8) ) = (
idx318 = (word) block←v15448.f2,
SGNCK(idx318)
);
};
(* (( (ptr) &var←c52404)+9) ) = 0;
(* (( (ptr) &var←c52404)+10) ) = 4330;
SOURCE(30322, 40)
{
register word noName←c48500 = 0;
register word noName←c48532;
noName←c48532 = lenIV←v15476;
if ((noName←c48500 >= noName←c48532)) {
goto lab←L100136;
};
lab←L100139: ;
SOURCE(30344, 18)
{
word var←c48564;
var←c48564 = (word) Get←P5736((word) ((( (bPt) &var←c52404)+16)/* var←c48436 */ ));
};
noName←c48500 = (noName←c48500 + 1);
if ((noName←c48500 < noName←c48532)) {
goto lab←L100139;
};
lab←L100136: ;
};
SOURCE(30364, 409)
lab←L100142: ;
if (((* (( (ptr) &var←c52404)+9) ) < (* (( (ptr) &var←c52404)+8) ))) {
}
else {
goto lab←L100140;
};
{
word v←v21048;
SOURCE(30389, 15)
v←v21048 = (word) Get←P5736((word) ((( (bPt) &var←c52404)+16)/* var←c48436 */ ));
SOURCE(30406, 367)
{
word var←c48596;
var←c48596 = v←v21048;
if ((var←c48596 == 12)) {
SOURCE(30426, 16)
{
word var←c48628;
var←c48628 = (word) Get←P5736((word) ((( (bPt) &var←c52404)+16)/* var←c48436 */ ));
(void) ( *( (fPt) ((* (ptr) cmd2←v15560 ))))(var←c48628, cmd2←v15560);
};
goto endif0319;
};
if ((var←c48596 < 32)) {
SOURCE(30451, 12)
(void) ( *( (fPt) ((* (ptr) cmd1←v15532 ))))(BCK(v←v21048, 32), cmd1←v15532);
goto endif0319;
};
if ((var←c48596 < 247)) {
SOURCE(30473, 10)
(void) ( *( (fPt) ((* (ptr) int←v15504 ))))((v←v21048 - 139), int←v15504);
goto endif0319;
};
if ((var←c48596 < 251)) {
SOURCE(30517, 26)
{
word var←c48660;
var←c48660 = ((IOP2( * , (int)(v←v21048 - 247), (int)256) + (word) Get←P5736((word) ((( (bPt) &var←c52404)+16)/* var←c48436 */ ))
) + 108);
(void) ( *( (fPt) ((* (ptr) int←v15504 ))))(var←c48660, int←v15504);
};
goto endif0319;
};
if ((var←c48596 < 255)) {
SOURCE(30578, 29)
{
word var←c48692;
var←c48692 = INEG(((IOP2( * , (int)(v←v21048 - 251), (int)256) + (word) Get←P5736((word) ((( (bPt) &var←c52404)+16)/* var←c48436 */ ))
) + 108));
(void) ( *( (fPt) ((* (ptr) int←v15504 ))))(var←c48692, int←v15504);
};
goto endif0319;
};
SOURCE(30647, 126)
{
word n←v21092;
SOURCE(30706, 12)
n←v21092 = (n←v21092 & 16777215) | (((word) ((word) Get←P5736((word) ((( (bPt) &var←c52404)+16)/* var←c48436 */ )) & 0377))
<< 24);
SOURCE(30720, 12)
n←v21092 = (n←v21092 & 4278255615) | (((word) ((word) Get←P5736((word) ((( (bPt) &var←c52404)+16)/* var←c48436 */ )) & 0377))
<< 16);
SOURCE(30734, 12)
n←v21092 = (n←v21092 & 4294902015) | (((word) ((word) Get←P5736((word) ((( (bPt) &var←c52404)+16)/* var←c48436 */ )) & 0377))
<< 8);
SOURCE(30748, 12)
n←v21092 = (n←v21092 & 4294967040) | ((word) ((word) Get←P5736((word) ((( (bPt) &var←c52404)+16)/* var←c48436 */ )) & 0377))
;
SOURCE(30762, 11)
(void) ( *( (fPt) ((* (ptr) int←v15504 ))))(n←v21092, int←v15504);
};
goto endif0319;
endif0319: ;
};
};
goto lab←L100142;
lab←L100140: ;
}
static word Get←P5736(formal←c52436)
word formal←c52436;
{
word b←v21020;
word c←v21136;
formal←c52436 = (formal←c52436 - 16);
/* Get: */
SOURCE(30069, 248)
SOURCE(30151, 65)
SOURCE(30153, 63)
{
word var←c0685;
word var←c48724;
word arg←v41096;
word limit←v41124;
arg←v41096 = (* (( (ptr) formal←c52436)+9) );
limit←v41124 = (* (( (ptr) formal←c52436)+8) );
if ((arg←v41096 >= limit←v41124)) {
(void) XR←RaiseBoundsFault();
};
var←c48724 = arg←v41096;
var←c0685 = (var←c0685 & 4294967040) | ((word) (word) (* (( (bPt) (* (( (ptr) formal←c52436)+6) ))+(((* (( (ptr) formal←c52436)+7)
) + var←c48724)
)) ));
c←v21136 = (unsigned) (var←c0685 & 0377);
};
SOURCE(30219, 17)
(* (( (ptr) formal←c52436)+9) ) = ((* (( (ptr) formal←c52436)+9) ) + 1);
SOURCE(30238, 34)
{
word idx320;
b←v21020 = (
idx320 = (word) XRM←BITXOR(c←v21136, ((* (( (ptr) formal←c52436)+10) ) >> 8)),
BCK(idx320, 256)
);
};
SOURCE(30274, 43)
(* (( (ptr) formal←c52436)+10) ) = ( (((unsigned)(((word) ((* (( (ptr) formal←c52436)+10) ) + c←v21136) * 52845) + 22719) << 16) >> 16) );
SOURCE(30069, 248)
return(b←v21020);
}
static word EncodingGet←P3480(self←v15800, code←v15828)
word self←v15800;
word code←v15828;
{
register ptr gf←c52468 = (ptr) &globalframe;
word var←c15872;
word name←v21180;
/* EncodingGet: */
SOURCE(30789, 148)
SOURCE(30856, 37)
name←v21180 = (* (( (ptr) (* (( (ptr) self←v15800)+16) ))+code←v15828) );
SOURCE(30895, 42)
if ((name←v21180 != 0)) {
return(name←v21180);
}
else {
return((* (( (ptr) gf←c52468)+12)/* notdef←v5716 */ ));
};
}
static word StdEncodingGet←P3540(self←v15932, code←v15960)
word self←v15932;
word code←v15960;
{
register ptr gf←c52500 = (ptr) &globalframe;
word var←c16004;
word name←v21224;
/* StdEncodingGet: */
SOURCE(30942, 157)
SOURCE(31012, 43)
name←v21224 = (* (( (ptr) (* (( (ptr) gf←c52500)+11)/* theStandardEncoding←v5380 */ ))+code←v15960) );
SOURCE(31057, 42)
if ((name←v21224 != 0)) {
return(name←v21224);
}
else {
return((* (( (ptr) gf←c52500)+12)/* notdef←v5716 */ ));
};
}
static void ExecuteChar←P3600(formal←c0578, self←v16064, name←v16092, moveTo←v16120, lineTo←v16148, curveTo←v16176, flex←v16204, close←v16232, hstem←v16260, hstem3←v16288, vstem←v16316, vstem3←v16344, discard←v16372, origin←v16400)
word formal←c0578;
word self←v16064;
word name←v16092;
word moveTo←v16120;
word lineTo←v16148;
word curveTo←v16176;
word flex←v16204;
word close←v16232;
word hstem←v16260;
word hstem3←v16288;
word vstem←v16316;
word vstem3←v16344;
word discard←v16372;
W2 origin←v16400;
{
W74 var←c52532;
W4 info←v16444;
/* declaration of var←c48756 skipped */
/* declaration of var←c48788 skipped */
/* declaration of var←c48820 skipped */
/* declaration of var←c48852 skipped */
/* declaration of var←c48884 skipped */
/* declaration of var←c48916 skipped */
/* declaration of var←c48948 skipped */
/* declaration of lenIV←v21268 skipped */
/* declaration of cstr←v21296 skipped */
W50 callers←v21324;
word ci←v21352 = 0;
/* declaration of stack←v21436 skipped */
/* declaration of si←v21464 skipped */
/* declaration of weight←v21716 skipped */
word flexing←v21772 = 0;
W14 f←v21800;
word fi←v21828 = 0;
W2 cp←v21884;
/* ExecuteChar: */
SOURCE(31104, 6533)
{
word tmpAddr321;
tmpAddr321 = (word) (( (ptr) &var←c52532)+4)/* var←c48756 */ ;
(* (ptr) tmpAddr321 ) = ( ((word) (fPt) Blend←P6492) );
(* (( (ptr) tmpAddr321) + 1) ) = 1;
};
{
word tmpAddr322;
tmpAddr322 = (word) (( (ptr) &var←c52532)+6)/* var←c48788 */ ;
(* (ptr) tmpAddr322 ) = ( ((word) (fPt) PutR←P6192) );
(* (( (ptr) tmpAddr322) + 1) ) = 1;
};
{
word tmpAddr323;
tmpAddr323 = (word) (( (ptr) &var←c52532)+8)/* var←c48820 */ ;
(* (ptr) tmpAddr323 ) = ( ((word) (fPt) PutI←P6132) );
(* (( (ptr) tmpAddr323) + 1) ) = 1;
};
{
word tmpAddr324;
tmpAddr324 = (word) (( (ptr) &var←c52532)+10)/* var←c48852 */ ;
(* (ptr) tmpAddr324 ) = ( ((word) (fPt) R←P6072) );
(* (( (ptr) tmpAddr324) + 1) ) = 1;
};
{
word tmpAddr325;
tmpAddr325 = (word) (( (ptr) &var←c52532)+12)/* var←c48884 */ ;
(* (ptr) tmpAddr325 ) = ( ((word) (fPt) I←P6012) );
(* (( (ptr) tmpAddr325) + 1) ) = 1;
};
{
word tmpAddr326;
tmpAddr326 = (word) (( (ptr) &var←c52532)+14)/* var←c48916 */ ;
(* (ptr) tmpAddr326 ) = ( ((word) (fPt) Begin←P5952) );
(* (( (ptr) tmpAddr326) + 1) ) = 1;
};
{
word tmpAddr327;
tmpAddr327 = (word) (( (ptr) &var←c52532)+16)/* var←c48948 */ ;
(* (ptr) tmpAddr327 ) = ( ((word) (fPt) Get←P5892) );
(* (( (ptr) tmpAddr327) + 1) ) = 1;
};
SOURCE(31104, 6533)
info←v16444.f0 = (* (ptr) &fc268 );
info←v16444.f1 = (* (ptr) &fc268 );
info←v16444.f2 = (* (ptr) &fc268 );
info←v16444.f3 = (* (ptr) &fc268 );
SOURCE(31422, 23)
{
word idx328;
(* (( (ptr) &var←c52532)+18)/* lenIV←v21268 */ ) = (
idx328 = (* (( (ptr) self←v16064)+42) ),
SGNCK(idx328)
);
};
SOURCE(31447, 30)
XR←FillWords(&(* (W5Pt) ((( (ptr) &var←c52532)+19)/* cstr←v21296 */ )), 5, 0);
SOURCE(32163, 43)
{
W2 var←c49044;
var←c49044.f0 = 0;
var←c49044.f1 = 0;
XR←FillLongWords(&(* (W48Pt) ((( (ptr) &var←c52532)+24)/* stack←v21436 */ )), &var←c49044, 2, 24);
};
SOURCE(32235, 11)
(* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) = 0;
SOURCE(32869, 37)
(* (( (ptr) &var←c52532)+73)/* weight←v21716 */ ) = (* (( (ptr) self←v16064)+22) );
SOURCE(33235, 25)
{
W2 var←c49108;
var←c49108.f0 = (* (ptr) &fc268 );
var←c49108.f1 = (* (ptr) &fc268 );
XR←FillLongWords(&f←v21800, &var←c49108, 2, 7);
};
SOURCE(33360, 16)
cp←v21884 = origin←v16400;
SOURCE(33395, 38)
{
W2 var←c49140;
{
word pd329;
pd329 = (* (( (ptr) self←v16064)+4) );
(void) ( *( (fPt) ((* (ptr) pd329 ))))((word) &var←c49140, self←v16064, name←v16092, pd329);
};
(void) Begin←P5952(var←c49140, (word) (( (bPt) &var←c52532)+56)/* var←c48916 */ );
};
SOURCE(33435, 4202)
lab←L100147: ;
SOURCE(33435, 4202)
{
word v←v22892;
SOURCE(33438, 15)
v←v22892 = (word) Get←P5892((word) ((( (bPt) &var←c52532)+64)/* var←c48948 */ ));
SOURCE(33455, 4182)
{
word var←c49172;
var←c49172 = v←v22892;
if ((var←c49172 < 32)) {
SOURCE(33476, 3842)
{
word clear←v22936 = 1;
SOURCE(33555, 3661)
{
word var←c49204;
var←c49204 = BCK(v←v22892, 32);
switch (var←c49204) {
case 13:
SOURCE(33588, 59)
{
word x331;
word x332;
*(float*)&cp←v21884.f0 = (
/*1*/ x331 = origin←v16400.f0, *(float*)&x331
/*1*/ ) + (
/*1*/ x332 = (word) R←P6072(0, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x332
/*1*/ );
};
cp←v21884.f1 = origin←v16400.f1;
(* (W2Pt) &info←v16444 ) = cp←v21884;
info←v16444.f2 = (word) R←P6072(1, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ );
info←v16444.f3 = (* (ptr) &fc268 );
break;
case 21:
SOURCE(33660, 56)
{
W2 p1←v22980;
SOURCE(33662, 34)
{
/*1*/ word x333;
/*1*/ word x334;
/*1*/ *(float*)&p1←v22980.f0 = (
/*1*/ x333 = cp←v21884.f0, *(float*)&x333
/*1*/ ) + (
/*1*/ x334 = (word) R←P6072(0, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x334
/*1*/ );
/*1*/ };
{
/*1*/ word x335;
/*1*/ word x336;
/*1*/ *(float*)&p1←v22980.f1 = (
/*1*/ x335 = cp←v21884.f1, *(float*)&x335
/*1*/ ) + (
/*1*/ x336 = (word) R←P6072(1, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x336
/*1*/ );
/*1*/ };
SOURCE(33698, 16)
{
/*1*/ W2 p←v40972;
/*1*/ cp←v21884 = p1←v22980;
/*1*/ p←v40972 = p1←v22980;
SOURCE(33321, 36)
/*1*/ if ((0 != flexing←v21772)) {
/*1*/ }
/*1*/ else {
SOURCE(33347, 10)
/*1*/ (void) ( *( (fPt) ((* (ptr) moveTo←v16120 ))))(p←v40972, moveTo←v16120);
/*1*/ };
/*1*/ };
};
break;
case 22:
SOURCE(33730, 51)
{
W2 p1←v23024;
SOURCE(33732, 29)
{
/*1*/ word x337;
/*1*/ word x338;
/*1*/ *(float*)&p1←v23024.f0 = (
/*1*/ x337 = cp←v21884.f0, *(float*)&x337
/*1*/ ) + (
/*1*/ x338 = (word) R←P6072(0, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x338
/*1*/ );
/*1*/ };
p1←v23024.f1 = cp←v21884.f1;
SOURCE(33763, 16)
{
/*1*/ W2 p←v40924;
/*1*/ cp←v21884 = p1←v23024;
/*1*/ p←v40924 = p1←v23024;
SOURCE(33321, 36)
/*1*/ if ((0 != flexing←v21772)) {
/*1*/ }
/*1*/ else {
SOURCE(33347, 10)
/*1*/ (void) ( *( (fPt) ((* (ptr) moveTo←v16120 ))))(p←v40924, moveTo←v16120);
/*1*/ };
/*1*/ };
};
break;
case 4:
SOURCE(33795, 51)
{
W2 p1←v23068;
SOURCE(33797, 29)
p1←v23068.f0 = cp←v21884.f0;
{
/*1*/ word x339;
/*1*/ word x340;
/*1*/ *(float*)&p1←v23068.f1 = (
/*1*/ x339 = cp←v21884.f1, *(float*)&x339
/*1*/ ) + (
/*1*/ x340 = (word) R←P6072(0, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x340
/*1*/ );
/*1*/ };
SOURCE(33828, 16)
{
/*1*/ W2 p←v40876;
/*1*/ cp←v21884 = p1←v23068;
/*1*/ p←v40876 = p1←v23068;
SOURCE(33321, 36)
/*1*/ if ((0 != flexing←v21772)) {
/*1*/ }
/*1*/ else {
SOURCE(33347, 10)
/*1*/ (void) ( *( (fPt) ((* (ptr) moveTo←v16120 ))))(p←v40876, moveTo←v16120);
/*1*/ };
/*1*/ };
};
break;
case 5:
SOURCE(33860, 55)
{
W2 p1←v23112;
SOURCE(33862, 34)
{
/*1*/ word x341;
/*1*/ word x342;
/*1*/ *(float*)&p1←v23112.f0 = (
/*1*/ x341 = cp←v21884.f0, *(float*)&x341
/*1*/ ) + (
/*1*/ x342 = (word) R←P6072(0, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x342
/*1*/ );
/*1*/ };
{
/*1*/ word x343;
/*1*/ word x344;
/*1*/ *(float*)&p1←v23112.f1 = (
/*1*/ x343 = cp←v21884.f1, *(float*)&x343
/*1*/ ) + (
/*1*/ x344 = (word) R←P6072(1, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x344
/*1*/ );
/*1*/ };
SOURCE(33898, 15)
cp←v21884 = p1←v23112;
(void) ( *( (fPt) ((* (ptr) lineTo←v16148 ))))(p1←v23112, lineTo←v16148);
};
break;
case 6:
SOURCE(33929, 50)
{
W2 p1←v23156;
SOURCE(33931, 29)
{
/*1*/ word x345;
/*1*/ word x346;
/*1*/ *(float*)&p1←v23156.f0 = (
/*1*/ x345 = cp←v21884.f0, *(float*)&x345
/*1*/ ) + (
/*1*/ x346 = (word) R←P6072(0, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x346
/*1*/ );
/*1*/ };
p1←v23156.f1 = cp←v21884.f1;
SOURCE(33962, 15)
cp←v21884 = p1←v23156;
(void) ( *( (fPt) ((* (ptr) lineTo←v16148 ))))(p1←v23156, lineTo←v16148);
};
break;
case 7:
SOURCE(33993, 50)
{
W2 p1←v23200;
SOURCE(33995, 29)
p1←v23200.f0 = cp←v21884.f0;
{
/*1*/ word x347;
/*1*/ word x348;
/*1*/ *(float*)&p1←v23200.f1 = (
/*1*/ x347 = cp←v21884.f1, *(float*)&x347
/*1*/ ) + (
/*1*/ x348 = (word) R←P6072(0, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x348
/*1*/ );
/*1*/ };
SOURCE(34026, 15)
cp←v21884 = p1←v23200;
(void) ( *( (fPt) ((* (ptr) lineTo←v16148 ))))(p1←v23200, lineTo←v16148);
};
break;
case 8:
SOURCE(34059, 136)
{
W2 p1←v23244;
W2 p2←v23272;
W2 p3←v23300;
SOURCE(34061, 34)
{
/*1*/ word x349;
/*1*/ word x350;
/*1*/ *(float*)&p1←v23244.f0 = (
/*1*/ x349 = cp←v21884.f0, *(float*)&x349
/*1*/ ) + (
/*1*/ x350 = (word) R←P6072(0, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x350
/*1*/ );
/*1*/ };
{
/*1*/ word x351;
/*1*/ word x352;
/*1*/ *(float*)&p1←v23244.f1 = (
/*1*/ x351 = cp←v21884.f1, *(float*)&x351
/*1*/ ) + (
/*1*/ x352 = (word) R←P6072(1, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x352
/*1*/ );
/*1*/ };
SOURCE(34097, 34)
{
/*1*/ word x353;
/*1*/ word x354;
/*1*/ *(float*)&p2←v23272.f0 = (
/*1*/ x353 = p1←v23244.f0, *(float*)&x353
/*1*/ ) + (
/*1*/ x354 = (word) R←P6072(2, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x354
/*1*/ );
/*1*/ };
{
/*1*/ word x355;
/*1*/ word x356;
/*1*/ *(float*)&p2←v23272.f1 = (
/*1*/ x355 = p1←v23244.f1, *(float*)&x355
/*1*/ ) + (
/*1*/ x356 = (word) R←P6072(3, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x356
/*1*/ );
/*1*/ };
SOURCE(34133, 34)
{
/*1*/ word x357;
/*1*/ word x358;
/*1*/ *(float*)&p3←v23300.f0 = (
/*1*/ x357 = p2←v23272.f0, *(float*)&x357
/*1*/ ) + (
/*1*/ x358 = (word) R←P6072(4, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x358
/*1*/ );
/*1*/ };
{
/*1*/ word x359;
/*1*/ word x360;
/*1*/ *(float*)&p3←v23300.f1 = (
/*1*/ x359 = p2←v23272.f1, *(float*)&x359
/*1*/ ) + (
/*1*/ x360 = (word) R←P6072(5, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x360
/*1*/ );
/*1*/ };
SOURCE(34169, 24)
{
/*1*/ W2 var←c0686;
/*1*/ cp←v21884 = p3←v23300;
/*1*/ var←c0686 = p3←v23300;
/*1*/ (void) ( *( (fPt) ((* (ptr) curveTo←v16176 ))))(p1←v23244, p2←v23272, var←c0686, curveTo←v16176);
/*1*/ };
};
break;
case 31:
SOURCE(34211, 126)
{
W2 p1←v23344;
W2 p2←v23372;
W2 p3←v23400;
SOURCE(34213, 29)
{
/*1*/ word x361;
/*1*/ word x362;
/*1*/ *(float*)&p1←v23344.f0 = (
/*1*/ x361 = cp←v21884.f0, *(float*)&x361
/*1*/ ) + (
/*1*/ x362 = (word) R←P6072(0, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x362
/*1*/ );
/*1*/ };
p1←v23344.f1 = cp←v21884.f1;
SOURCE(34244, 34)
{
/*1*/ word x363;
/*1*/ word x364;
/*1*/ *(float*)&p2←v23372.f0 = (
/*1*/ x363 = p1←v23344.f0, *(float*)&x363
/*1*/ ) + (
/*1*/ x364 = (word) R←P6072(1, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x364
/*1*/ );
/*1*/ };
{
/*1*/ word x365;
/*1*/ word x366;
/*1*/ *(float*)&p2←v23372.f1 = (
/*1*/ x365 = p1←v23344.f1, *(float*)&x365
/*1*/ ) + (
/*1*/ x366 = (word) R←P6072(2, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x366
/*1*/ );
/*1*/ };
SOURCE(34280, 29)
p3←v23400.f0 = p2←v23372.f0;
{
/*1*/ word x367;
/*1*/ word x368;
/*1*/ *(float*)&p3←v23400.f1 = (
/*1*/ x367 = p2←v23372.f1, *(float*)&x367
/*1*/ ) + (
/*1*/ x368 = (word) R←P6072(3, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x368
/*1*/ );
/*1*/ };
SOURCE(34311, 24)
{
/*1*/ W2 var←c0687;
/*1*/ cp←v21884 = p3←v23400;
/*1*/ var←c0687 = p3←v23400;
/*1*/ (void) ( *( (fPt) ((* (ptr) curveTo←v16176 ))))(p1←v23344, p2←v23372, var←c0687, curveTo←v16176);
/*1*/ };
};
break;
case 30:
SOURCE(34353, 126)
{
W2 p1←v23444;
W2 p2←v23472;
W2 p3←v23500;
SOURCE(34355, 29)
p1←v23444.f0 = cp←v21884.f0;
{
/*1*/ word x369;
/*1*/ word x370;
/*1*/ *(float*)&p1←v23444.f1 = (
/*1*/ x369 = cp←v21884.f1, *(float*)&x369
/*1*/ ) + (
/*1*/ x370 = (word) R←P6072(0, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x370
/*1*/ );
/*1*/ };
SOURCE(34386, 34)
{
/*1*/ word x371;
/*1*/ word x372;
/*1*/ *(float*)&p2←v23472.f0 = (
/*1*/ x371 = p1←v23444.f0, *(float*)&x371
/*1*/ ) + (
/*1*/ x372 = (word) R←P6072(1, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x372
/*1*/ );
/*1*/ };
{
/*1*/ word x373;
/*1*/ word x374;
/*1*/ *(float*)&p2←v23472.f1 = (
/*1*/ x373 = p1←v23444.f1, *(float*)&x373
/*1*/ ) + (
/*1*/ x374 = (word) R←P6072(2, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x374
/*1*/ );
/*1*/ };
SOURCE(34422, 29)
{
/*1*/ word x375;
/*1*/ word x376;
/*1*/ *(float*)&p3←v23500.f0 = (
/*1*/ x375 = p2←v23472.f0, *(float*)&x375
/*1*/ ) + (
/*1*/ x376 = (word) R←P6072(3, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x376
/*1*/ );
/*1*/ };
p3←v23500.f1 = p2←v23472.f1;
SOURCE(34453, 24)
{
/*1*/ W2 var←c0688;
/*1*/ cp←v21884 = p3←v23500;
/*1*/ var←c0688 = p3←v23500;
/*1*/ (void) ( *( (fPt) ((* (ptr) curveTo←v16176 ))))(p1←v23444, p2←v23472, var←c0688, curveTo←v16176);
/*1*/ };
};
break;
case 9:
SOURCE(34495, 25)
if ((close←v16232 != 0)) {
SOURCE(34513, 7)
(void) ( *( (fPt) ((* (ptr) close←v16232 ))))(close←v16232);
};
break;
case 1:
SOURCE(34531, 52)
if ((hstem←v16260 != 0)) {
SOURCE(34549, 34)
{
/*1*/ word var←c49716;
/*1*/ word var←c49748;
/*1*/ {
/*1*/ word x377;
/*1*/ word x378;
/*1*/ *(float*)&var←c49716 = (
/*1*/ x377 = info←v16444.f1, *(float*)&x377
/*1*/ ) + (
/*1*/ x378 = (word) R←P6072(0, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x378
/*1*/ );
/*1*/ };
/*1*/ var←c49748 = (word) R←P6072(1, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ );
/*1*/ (void) ( *( (fPt) ((* (ptr) hstem←v16260 ))))(var←c49716, var←c49748, hstem←v16260);
/*1*/ };
};
break;
case 3:
SOURCE(34594, 52)
if ((vstem←v16316 != 0)) {
SOURCE(34612, 34)
{
/*1*/ word var←c49780;
/*1*/ word var←c49812;
/*1*/ {
/*1*/ word x379;
/*1*/ word x380;
/*1*/ *(float*)&var←c49780 = (
/*1*/ x379 = info←v16444.f0, *(float*)&x379
/*1*/ ) + (
/*1*/ x380 = (word) R←P6072(0, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x380
/*1*/ );
/*1*/ };
/*1*/ var←c49812 = (word) R←P6072(1, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ );
/*1*/ (void) ( *( (fPt) ((* (ptr) vstem←v16316 ))))(var←c49780, var←c49812, vstem←v16316);
/*1*/ };
};
break;
case 10:
SOURCE(34660, 102)
{
word subr←v23544;
SOURCE(34662, 18)
{
/*1*/ word var←c0689;
/*1*/ {
/*1*/ word idx381;
/*1*/ (* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) = (
/*1*/ idx381 = (word) ((* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) - 1),
/*1*/ SGNCK(idx381)
/*1*/ );
/*1*/ };
/*1*/ var←c0689 = (* (( (ptr) &var←c52532)+72)/* si←v21464 */ );
/*1*/ {
/*1*/ word idx382;
/*1*/ subr←v23544 = (
/*1*/ idx382 = (word) I←P6012(var←c0689, (word) (( (bPt) &var←c52532)+48)/* var←c48884 */ ),
/*1*/ SGNCK(idx382)
/*1*/ );
/*1*/ };
/*1*/ };
SOURCE(34682, 18)
(* (( (W5Pt) &callers←v21324)+BCK(ci←v21352, 10)) ) = (* (W5Pt) (( (ptr) &var←c52532)+19)/* cstr←v21296 */ );
SOURCE(34702, 9)
ci←v21352 = (ci←v21352 + 1);
SOURCE(34714, 32)
{
/*1*/ W2 var←c49844;
/*1*/ {
/*1*/ word pd383;
/*1*/ pd383 = (* (( (ptr) self←v16064)+5) );
/*1*/ (void) ( *( (fPt) ((* (ptr) pd383 ))))((word) &var←c49844, self←v16064, subr←v23544, pd383);
/*1*/ };
/*1*/ (void) Begin←P5952(var←c49844, (word) (( (bPt) &var←c52532)+56)/* var←c48916 */ );
/*1*/ };
SOURCE(34748, 14)
clear←v22936 = 0;
};
break;
case 11:
SOURCE(34777, 25)
ci←v21352 = SGNCK((ci←v21352 - 1));
(* (W5Pt) (( (ptr) &var←c52532)+19)/* cstr←v21296 */ ) = (* (( (W5Pt) &callers←v21324)+BCK(ci←v21352, 10)) );
SOURCE(34804, 14)
clear←v22936 = 0;
break;
case 14:
SOURCE(34832, 6)
goto lab←L100144;
case 15:
break;
case 12:
SOURCE(34923, 2293)
{
word var←c49876;
var←c49876 = (word) Get←P5892((word) ((( (bPt) &var←c52532)+64)/* var←c48948 */ ));
switch (var←c49876) {
/*1*/ case 6:
SOURCE(34960, 632)
/*1*/ {
/*1*/ word asb←v23588;
/*1*/ word adx←v23616;
/*1*/ word ady←v23644;
/*1*/ word bnameStd←v23672;
/*1*/ word anameStd←v23700;
/*1*/ word bname←v23728;
/*1*/ word aname←v23756;
/*1*/ W4 binfo←v23784;
/*1*/ W2 aorigin←v23812;
SOURCE(34962, 16)
/*1*/ asb←v23588 = (word) R←P6072(0, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ );
SOURCE(34980, 16)
/*1*/ adx←v23616 = (word) R←P6072(1, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ );
SOURCE(34998, 16)
/*1*/ ady←v23644 = (word) R←P6072(2, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ );
SOURCE(35016, 48)
/*1*/ {
/*1*/ word var←c49908;
/*1*/ {
/*1*/ word idx384;
/*1*/ var←c49908 = (
/*1*/ idx384 = (word) I←P6012(3, (word) (( (bPt) &var←c52532)+48)/* var←c48884 */ ),
/*1*/ BCK(idx384, 256)
/*1*/ );
/*1*/ };
/*1*/ bnameStd←v23672 = (word) StdEncodingGet←P3540(self←v16064, var←c49908);
/*1*/ };
SOURCE(35066, 48)
/*1*/ {
/*1*/ word var←c49940;
/*1*/ {
/*1*/ word idx385;
/*1*/ var←c49940 = (
/*1*/ idx385 = (word) I←P6012(4, (word) (( (bPt) &var←c52532)+48)/* var←c48884 */ ),
/*1*/ BCK(idx385, 256)
/*1*/ );
/*1*/ };
/*1*/ anameStd←v23700 = (word) StdEncodingGet←P3540(self←v16064, var←c49940);
/*1*/ };
SOURCE(35116, 42)
/*1*/ {
/*1*/ word var←c49972;
/*1*/ {
/*1*/ word idx386;
/*1*/ var←c49972 = (
/*1*/ idx386 = (word) I←P6012(3, (word) (( (bPt) &var←c52532)+48)/* var←c48884 */ ),
/*1*/ BCK(idx386, 256)
/*1*/ );
/*1*/ };
/*1*/ bname←v23728 = (word) EncodingGet←P3480(self←v16064, var←c49972);
/*1*/ };
SOURCE(35160, 42)
/*1*/ {
/*1*/ word var←c50004;
/*1*/ {
/*1*/ word idx387;
/*1*/ var←c50004 = (
/*1*/ idx387 = (word) I←P6012(4, (word) (( (bPt) &var←c52532)+48)/* var←c48884 */ ),
/*1*/ BCK(idx387, 256)
/*1*/ );
/*1*/ };
/*1*/ aname←v23756 = (word) EncodingGet←P3480(self←v16064, var←c50004);
/*1*/ };
SOURCE(35204, 131)
/*1*/ (void) ExecuteChar←P3600((word) &binfo←v23784, self←v16064, bnameStd←v23672, moveTo←v16120, lineTo←v16148, curveTo←v16176
/*1*/ , flex←v16204, close←v16232, hstem←v16260, hstem3←v16288, vstem←v16316, vstem3←v16344
/*1*/ , discard←v16372, origin←v16400);
SOURCE(35337, 58)
/*1*/ {
/*1*/ word x388;
/*1*/ word x389;
/*1*/ word x390;
/*1*/ word x391;
/*1*/ *(float*)&aorigin←v23812.f0 = (((
/*1*/ x388 = origin←v16400.f0, *(float*)&x388
/*1*/ ) + (
/*1*/ x389 = binfo←v23784.f0, *(float*)&x389
/*1*/ )) - (
/*1*/ x390 = asb←v23588, *(float*)&x390
/*1*/ )) + (
/*1*/ x391 = adx←v23616, *(float*)&x391
/*1*/ );
/*1*/ };
/*1*/ {
/*1*/ word x392;
/*1*/ word x393;
/*1*/ *(float*)&aorigin←v23812.f1 = (
/*1*/ x392 = origin←v16400.f1, *(float*)&x392
/*1*/ ) + (
/*1*/ x393 = ady←v23644, *(float*)&x393
/*1*/ );
/*1*/ };
SOURCE(35397, 29)
/*1*/ if ((discard←v16372 != 0)) {
SOURCE(35417, 9)
/*1*/ (void) ( *( (fPt) ((* (ptr) discard←v16372 ))))(discard←v16372);
/*1*/ };
SOURCE(35456, 119)
/*1*/ {
/*1*/ W4 var←c50068;
/*1*/ (void) ExecuteChar←P3600((word) &var←c50068, self←v16064, anameStd←v23700, moveTo←v16120, lineTo←v16148, curveTo←v16176
/*1*/ , flex←v16204, close←v16232, hstem←v16260, hstem3←v16288, vstem←v16316, vstem3←v16344
/*1*/ , discard←v16372, aorigin←v23812);
/*1*/ };
SOURCE(35577, 13)
/*1*/ info←v16444 = binfo←v23784;
/*1*/ goto lab←L100144;
/*1*/ };
/*1*/ case 7:
SOURCE(36143, 65)
/*1*/ {
/*1*/ word x394;
/*1*/ word x395;
/*1*/ *(float*)&cp←v21884.f0 = (
/*1*/ x394 = origin←v16400.f0, *(float*)&x394
/*1*/ ) + (
/*1*/ x395 = (word) R←P6072(0, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x395
/*1*/ );
/*1*/ };
/*1*/ {
/*1*/ word x396;
/*1*/ word x397;
/*1*/ *(float*)&cp←v21884.f1 = (
/*1*/ x396 = origin←v16400.f1, *(float*)&x396
/*1*/ ) + (
/*1*/ x397 = (word) R←P6072(1, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x397
/*1*/ );
/*1*/ };
/*1*/ (* (W2Pt) &info←v16444 ) = cp←v21884;
/*1*/ info←v16444.f2 = (word) R←P6072(2, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ );
/*1*/ info←v16444.f3 = (word) R←P6072(3, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ );
/*1*/ break;
/*1*/ case 12:
SOURCE(36219, 9)
/*1*/ {
/*1*/ word idx398;
/*1*/ (* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) = (
/*1*/ idx398 = (word) ((* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) - 2),
/*1*/ SGNCK(idx398)
/*1*/ );
/*1*/ };
SOURCE(36230, 20)
/*1*/ {
/*1*/ word x←v40828;
/*1*/ {
/*1*/ word x399;
/*1*/ word x400;
/*1*/ *(float*)&x←v40828 = (
/*1*/ x399 = (word) R←P6072((* (( (ptr) &var←c52532)+72)/* si←v21464 */ ), (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x399
/*1*/ ) / (
/*1*/ x400 = (word) R←P6072(((* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) + 1), (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ )
/*1*/ , *(float*)&x400
/*1*/ );
/*1*/ };
SOURCE(32724, 11)
/*1*/ (void) PutR←P6192((* (( (ptr) &var←c52532)+72)/* si←v21464 */ ), x←v40828, (word) (( (bPt) &var←c52532)+24)/* var←c48788 */ )
/*1*/ ;
SOURCE(32737, 10)
/*1*/ (* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) = ((* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) + 1);
/*1*/ };
SOURCE(36252, 14)
/*1*/ clear←v22936 = 0;
/*1*/ break;
/*1*/ case 0:
/*1*/ break;
/*1*/ case 2:
SOURCE(36310, 119)
/*1*/ if ((hstem3←v16288 != 0)) {
SOURCE(36329, 100)
/*1*/ {
/*1*/ word var←c50100;
/*1*/ word var←c50132;
/*1*/ word var←c50164;
/*1*/ word var←c50196;
/*1*/ word var←c50228;
/*1*/ word var←c50260;
/*1*/ {
/*1*/ word x401;
/*1*/ word x402;
/*1*/ *(float*)&var←c50100 = (
/*1*/ x401 = info←v16444.f1, *(float*)&x401
/*1*/ ) + (
/*1*/ x402 = (word) R←P6072(0, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x402
/*1*/ );
/*1*/ };
/*1*/ var←c50132 = (word) R←P6072(1, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ );
/*1*/ {
/*1*/ word x403;
/*1*/ word x404;
/*1*/ *(float*)&var←c50164 = (
/*1*/ x403 = info←v16444.f1, *(float*)&x403
/*1*/ ) + (
/*1*/ x404 = (word) R←P6072(2, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x404
/*1*/ );
/*1*/ };
/*1*/ var←c50196 = (word) R←P6072(3, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ );
/*1*/ {
/*1*/ word x405;
/*1*/ word x406;
/*1*/ *(float*)&var←c50228 = (
/*1*/ x405 = info←v16444.f1, *(float*)&x405
/*1*/ ) + (
/*1*/ x406 = (word) R←P6072(4, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x406
/*1*/ );
/*1*/ };
/*1*/ var←c50260 = (word) R←P6072(5, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ );
/*1*/ (void) ( *( (fPt) ((* (ptr) hstem3←v16288 ))))(var←c50100, var←c50132, var←c50164, var←c50196, var←c50228, var←c50260, hstem3←v16288)
/*1*/ ;
/*1*/ };
/*1*/ };
/*1*/ break;
/*1*/ case 1:
SOURCE(36441, 119)
/*1*/ if ((vstem3←v16344 != 0)) {
SOURCE(36460, 100)
/*1*/ {
/*1*/ word var←c50292;
/*1*/ word var←c50324;
/*1*/ word var←c50356;
/*1*/ word var←c50388;
/*1*/ word var←c50420;
/*1*/ word var←c50452;
/*1*/ {
/*1*/ word x407;
/*1*/ word x408;
/*1*/ *(float*)&var←c50292 = (
/*1*/ x407 = info←v16444.f0, *(float*)&x407
/*1*/ ) + (
/*1*/ x408 = (word) R←P6072(0, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x408
/*1*/ );
/*1*/ };
/*1*/ var←c50324 = (word) R←P6072(1, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ );
/*1*/ {
/*1*/ word x409;
/*1*/ word x410;
/*1*/ *(float*)&var←c50356 = (
/*1*/ x409 = info←v16444.f0, *(float*)&x409
/*1*/ ) + (
/*1*/ x410 = (word) R←P6072(2, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x410
/*1*/ );
/*1*/ };
/*1*/ var←c50388 = (word) R←P6072(3, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ );
/*1*/ {
/*1*/ word x411;
/*1*/ word x412;
/*1*/ *(float*)&var←c50420 = (
/*1*/ x411 = info←v16444.f0, *(float*)&x411
/*1*/ ) + (
/*1*/ x412 = (word) R←P6072(4, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x412
/*1*/ );
/*1*/ };
/*1*/ var←c50452 = (word) R←P6072(5, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ );
/*1*/ (void) ( *( (fPt) ((* (ptr) vstem3←v16344 ))))(var←c50292, var←c50324, var←c50356, var←c50388, var←c50420, var←c50452, vstem3←v16344)
/*1*/ ;
/*1*/ };
/*1*/ };
/*1*/ break;
/*1*/ case 16:
SOURCE(36579, 561)
/*1*/ {
/*1*/ word subr←v23856;
/*1*/ word n←v23884;
SOURCE(36581, 18)
/*1*/ {
/*1*/ word var←c0690;
/*1*/ {
/*1*/ word idx413;
/*1*/ (* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) = (
/*1*/ idx413 = (word) ((* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) - 1),
/*1*/ SGNCK(idx413)
/*1*/ );
/*1*/ };
/*1*/ var←c0690 = (* (( (ptr) &var←c52532)+72)/* si←v21464 */ );
/*1*/ {
/*1*/ word idx414;
/*1*/ subr←v23856 = (
/*1*/ idx414 = (word) I←P6012(var←c0690, (word) (( (bPt) &var←c52532)+48)/* var←c48884 */ ),
/*1*/ SGNCK(idx414)
/*1*/ );
/*1*/ };
/*1*/ };
SOURCE(36601, 15)
/*1*/ {
/*1*/ word var←c0691;
/*1*/ {
/*1*/ word idx415;
/*1*/ (* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) = (
/*1*/ idx415 = (word) ((* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) - 1),
/*1*/ SGNCK(idx415)
/*1*/ );
/*1*/ };
/*1*/ var←c0691 = (* (( (ptr) &var←c52532)+72)/* si←v21464 */ );
/*1*/ {
/*1*/ word idx416;
/*1*/ n←v23884 = (
/*1*/ idx416 = (word) I←P6012(var←c0691, (word) (( (bPt) &var←c52532)+48)/* var←c48884 */ ),
/*1*/ SGNCK(idx416)
/*1*/ );
/*1*/ };
/*1*/ };
SOURCE(36618, 9)
/*1*/ (* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) = ((* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) - n←v23884);
SOURCE(36648, 466)
/*1*/ {
/*1*/ word var←c50484;
/*1*/ var←c50484 = subr←v23856;
/*1*/ switch (var←c50484) {
/*1*/ case 0:
SOURCE(36684, 104)
/*1*/ if ((flex←v16204 != 0)) {
SOURCE(36701, 32)
/*1*/ {
/*1*/ word var←c50516;
/*1*/ {
/*1*/ word x417;
/*1*/ word x419;
/*1*/ *(float*)&var←c50516 = (
/*1*/ x417 = (word) R←P6072((* (( (ptr) &var←c52532)+72)/* si←v21464 */ ), (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ ), *(float*)&x417
/*1*/ ) / (
/*1*/ x419 = (* (ptr) &fc418 ), *(float*)&x419
/*1*/ );
/*1*/ };
/*1*/ (void) ( *( (fPt) ((* (ptr) flex←v16204 ))))(f←v21800, var←c50516, flex←v16204);
/*1*/ };
/*1*/ }
/*1*/ else {
SOURCE(36735, 25)
/*1*/ (void) ( *( (fPt) ((* (ptr) curveTo←v16176 ))))((* (W2Pt) (( (ptr) &f←v21800)+2) ), (* (W2Pt) (( (ptr) &f←v21800)+4) ), (* (W2Pt) (
/*1*/ ( (ptr) &f←v21800)+6) ), curveTo←v16176);
SOURCE(36762, 26)
/*1*/ (void) ( *( (fPt) ((* (ptr) curveTo←v16176 ))))((* (W2Pt) (( (ptr) &f←v21800)+8) ), (* (W2Pt) (( (ptr) &f←v21800)+10) ), (* (W2Pt) (
/*1*/ ( (ptr) &f←v21800)+12) ), curveTo←v16176);
/*1*/ };
SOURCE(36791, 14)
/*1*/ (void) PutR←P6192((* (( (ptr) &var←c52532)+72)/* si←v21464 */ ), cp←v21884.f0, (word) (( (bPt) &var←c52532)+24)/* var←c48788 */ )
/*1*/ ;
SOURCE(36807, 16)
/*1*/ (void) PutR←P6192(((* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) + 1), cp←v21884.f1, (word) (( (bPt) &var←c52532)+24)/* var←c48788 */ )
/*1*/ ;
SOURCE(36825, 15)
/*1*/ flexing←v21772 = 0;
/*1*/ break;
/*1*/ case 1:
SOURCE(36852, 6)
/*1*/ fi←v21828 = 0;
SOURCE(36860, 15)
/*1*/ flexing←v21772 = 1;
/*1*/ break;
/*1*/ case 2:
SOURCE(36899, 10)
/*1*/ (* (( (W2Pt) &f←v21800)+BCK(fi←v21828, 7)) ) = cp←v21884;
SOURCE(36911, 10)
/*1*/ fi←v21828 = (fi←v21828 + 1);
/*1*/ break;
/*1*/ case 3:
SOURCE(36953, 46)
/*1*/ if ((discard←v16372 != 0)) {
SOURCE(36973, 15)
/*1*/ (void) ( *( (fPt) ((* (ptr) discard←v16372 ))))(discard←v16372);
/*1*/ }
/*1*/ else {
SOURCE(36988, 11)
/*1*/ (void) PutI←P6132((* (( (ptr) &var←c52532)+72)/* si←v21464 */ ), 3, (word) (( (bPt) &var←c52532)+32)/* var←c48820 */ );
/*1*/ };
/*1*/ break;
/*1*/ case 14:
SOURCE(37027, 11)
/*1*/ (void) Blend←P6492(n←v23884, 1, (word) (( (bPt) &var←c52532)+16)/* var←c48756 */ );
/*1*/ break;
/*1*/ case 15:
SOURCE(37046, 11)
/*1*/ (void) Blend←P6492(n←v23884, 2, (word) (( (bPt) &var←c52532)+16)/* var←c48756 */ );
/*1*/ break;
/*1*/ case 16:
SOURCE(37065, 11)
/*1*/ (void) Blend←P6492(n←v23884, 3, (word) (( (bPt) &var←c52532)+16)/* var←c48756 */ );
/*1*/ break;
/*1*/ case 17:
SOURCE(37084, 11)
/*1*/ (void) Blend←P6492(n←v23884, 4, (word) (( (bPt) &var←c52532)+16)/* var←c48756 */ );
/*1*/ break;
/*1*/ case 18:
SOURCE(37103, 11)
/*1*/ (void) Blend←P6492(n←v23884, 6, (word) (( (bPt) &var←c52532)+16)/* var←c48756 */ );
/*1*/ break;
/*1*/ };
/*1*/ };
SOURCE(37125, 13)
/*1*/ clear←v22936 = 0;
/*1*/ };
/*1*/ break;
/*1*/ case 17:
SOURCE(37152, 9)
/*1*/ (* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) = ((* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) + 1);
SOURCE(37163, 14)
/*1*/ clear←v22936 = 0;
/*1*/ break;
/*1*/ case 33:
SOURCE(37199, 17)
/*1*/ cp←v21884.f0 = (word) R←P6072(0, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ );
/*1*/ cp←v21884.f1 = (word) R←P6072(1, (word) (( (bPt) &var←c52532)+40)/* var←c48852 */ );
/*1*/ break;
/*1*/ default:
SOURCE(37229, 5)
/*1*/ (void) XR←RaiseUnnamedError();
/*1*/ break;
/*1*/ };
};
break;
default:
SOURCE(37268, 5)
(void) XR←RaiseUnnamedError();
break;
};
};
SOURCE(37296, 20)
if ((0 != clear←v22936)) {
SOURCE(37310, 6)
(* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) = 0;
};
};
goto endif0330;
};
if ((var←c49172 < 247)) {
SOURCE(37329, 12)
{
word x←v40780;
x←v40780 = (v←v22892 - 139);
SOURCE(32665, 11)
(void) PutI←P6132((* (( (ptr) &var←c52532)+72)/* si←v21464 */ ), x←v40780, (word) (( (bPt) &var←c52532)+32)/* var←c48820 */ )
;
SOURCE(32678, 10)
(* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) = ((* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) + 1);
};
goto endif0330;
};
if ((var←c49172 < 251)) {
SOURCE(37375, 28)
{
word x←v40732;
x←v40732 = ((IOP2( * , (int)(v←v22892 - 247), (int)256) + (word) Get←P5892((word) ((( (bPt) &var←c52532)+64)/* var←c48948 */ ))
) + 108);
SOURCE(32665, 11)
(void) PutI←P6132((* (( (ptr) &var←c52532)+72)/* si←v21464 */ ), x←v40732, (word) (( (bPt) &var←c52532)+32)/* var←c48820 */ )
;
SOURCE(32678, 10)
(* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) = ((* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) + 1);
};
goto endif0330;
};
if ((var←c49172 < 255)) {
SOURCE(37438, 31)
{
word x←v40684;
x←v40684 = INEG(((IOP2( * , (int)(v←v22892 - 251), (int)256) + (word) Get←P5892((word) ((( (bPt) &var←c52532)+64)/* var←c48948 */ ))
) + 108));
SOURCE(32665, 11)
(void) PutI←P6132((* (( (ptr) &var←c52532)+72)/* si←v21464 */ ), x←v40684, (word) (( (bPt) &var←c52532)+32)/* var←c48820 */ )
;
SOURCE(32678, 10)
(* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) = ((* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) + 1);
};
goto endif0330;
};
SOURCE(37509, 128)
{
word x←v23928;
SOURCE(37568, 12)
x←v23928 = (x←v23928 & 16777215) | (((word) ((word) Get←P5892((word) ((( (bPt) &var←c52532)+64)/* var←c48948 */ )) & 0377))
<< 24);
SOURCE(37582, 12)
x←v23928 = (x←v23928 & 4278255615) | (((word) ((word) Get←P5892((word) ((( (bPt) &var←c52532)+64)/* var←c48948 */ )) & 0377))
<< 16);
SOURCE(37596, 12)
x←v23928 = (x←v23928 & 4294902015) | (((word) ((word) Get←P5892((word) ((( (bPt) &var←c52532)+64)/* var←c48948 */ )) & 0377))
<< 8);
SOURCE(37610, 12)
x←v23928 = (x←v23928 & 4294967040) | ((word) ((word) Get←P5892((word) ((( (bPt) &var←c52532)+64)/* var←c48948 */ )) & 0377))
;
SOURCE(37624, 13)
SOURCE(32665, 11)
(void) PutI←P6132((* (( (ptr) &var←c52532)+72)/* si←v21464 */ ), x←v23928, (word) (( (bPt) &var←c52532)+32)/* var←c48820 */ )
;
SOURCE(32678, 10)
(* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) = ((* (( (ptr) &var←c52532)+72)/* si←v21464 */ ) + 1);
};
goto endif0330;
endif0330: ;
};
};
goto lab←L100147;
lab←L100144: ;
(* (W4Pt) formal←c0578 ) = info←v16444;
return;
}
static word Get←P5892(formal←c52564)
word formal←c52564;
{
word b←v21996;
word c←v23972;
formal←c52564 = (formal←c52564 - 64);
/* Get: */
SOURCE(31606, 248)
SOURCE(31688, 65)
SOURCE(31690, 63)
{
word var←c0692;
word var←c50548;
word arg←v41020;
word limit←v41048;
arg←v41020 = (* (( (ptr) formal←c52564)+22) );
limit←v41048 = (* (( (ptr) formal←c52564)+21) );
if ((arg←v41020 >= limit←v41048)) {
(void) XR←RaiseBoundsFault();
};
var←c50548 = arg←v41020;
var←c0692 = (var←c0692 & 4294967040) | ((word) (word) (* (( (bPt) (* (( (ptr) formal←c52564)+19) ))+(((* (( (ptr) formal←c52564)+20)
) + var←c50548)
)) ));
c←v23972 = (unsigned) (var←c0692 & 0377);
};
SOURCE(31756, 17)
(* (( (ptr) formal←c52564)+22) ) = ((* (( (ptr) formal←c52564)+22) ) + 1);
SOURCE(31775, 34)
{
word idx420;
b←v21996 = (
idx420 = (word) XRM←BITXOR(c←v23972, ((* (( (ptr) formal←c52564)+23) ) >> 8)),
BCK(idx420, 256)
);
};
SOURCE(31811, 43)
(* (( (ptr) formal←c52564)+23) ) = ( (((unsigned)(((word) ((* (( (ptr) formal←c52564)+23) ) + c←v23972) * 52845) + 22719) << 16) >> 16) );
SOURCE(31606, 248)
return(b←v21996);
}
static void Begin←P5952(cs←v22056, formal←c52596)
W2 cs←v22056;
word formal←c52596;
{
W3 block←v24016;
word start←v24044;
word len←v24072;
formal←c52596 = (formal←c52596 - 56);
/* Begin: */
SOURCE(31859, 299)
SOURCE(31924, 48)
{
word pd421;
pd421 = (word) (cs←v22056.f1);
(void) ( *( (fPt) ((* (ptr) pd421 ))))((word) &block←v24016, cs←v22056.f0, pd421);
};
SOURCE(31974, 30)
{
word idx422;
start←v24044 = (
idx422 = (word) block←v24016.f1,
SGNCK(idx422)
);
};
SOURCE(32006, 23)
{
word idx423;
len←v24072 = (
idx423 = (word) block←v24016.f2,
SGNCK(idx423)
);
};
SOURCE(32031, 85)
(* (( (ptr) formal←c52596)+19) ) = block←v24016.f0;
{
word idx424;
(* (( (ptr) formal←c52596)+20) ) = (
idx424 = (word) block←v24016.f1,
SGNCK(idx424)
);
};
{
word idx425;
(* (( (ptr) formal←c52596)+21) ) = (
idx425 = (word) block←v24016.f2,
SGNCK(idx425)
);
};
(* (( (ptr) formal←c52596)+22) ) = 0;
(* (( (ptr) formal←c52596)+23) ) = 4330;
SOURCE(32118, 40)
{
register word noName←c50580 = 0;
if ((noName←c50580 >= (* (( (ptr) formal←c52596)+18) ))) {
goto lab←L100149;
};
lab←L100152: ;
SOURCE(32140, 18)
{
word var←c50612;
var←c50612 = (word) Get←P5892((word) ((( (bPt) formal←c52596)+64)));
};
noName←c50580 = (noName←c50580 + 1);
if ((noName←c50580 < (* (( (ptr) formal←c52596)+18) ))) {
goto lab←L100152;
};
lab←L100149: ;
};
}
static word I←P6012(k←v22152, formal←c52628)
word k←v22152;
word formal←c52628;
{
word var←c22196;
W2 n←v24116;
formal←c52628 = (formal←c52628 - 48);
/* I: */
SOURCE(32271, 112)
SOURCE(32306, 17)
n←v24116 = (* (( (W2Pt) (( (ptr) formal←c52628)+24))+BCK(k←v22152, 24)) );
SOURCE(32325, 58)
{
word var←c50676;
var←c50676 = n←v24116.f0;
if ((var←c50676 == 0)) {
return(n←v24116.f1);
}
else {
return((
XR←RaiseUnnamedError(), 0
));
};
};
}
static word R←P6072(k←v22256, formal←c52660)
word k←v22256;
word formal←c52660;
{
word var←c22300;
W2 n←v24160;
formal←c52660 = (formal←c52660 - 40);
/* R: */
SOURCE(32388, 126)
SOURCE(32424, 17)
n←v24160 = (* (( (W2Pt) (( (ptr) formal←c52660)+24))+BCK(k←v22256, 24)) );
SOURCE(32443, 71)
{
word var←c50740;
var←c50740 = n←v24160.f0;
{
float tf426;
if ((var←c50740 == 0)) {
return((
tf426 = (float)(int)n←v24160.f1, *(word*)&tf426
));
}
else {
if ((var←c50740 == 1)) {
return(n←v24160.f1);
}
else {
return((
XR←RaiseUnnamedError(), 0
));
};
};
};
};
}
static void PutI←P6132(k←v22360, x←v22388, formal←c52692)
word k←v22360;
word x←v22388;
word formal←c52692;
{
formal←c52692 = (formal←c52692 - 32);
/* PutI: */
SOURCE(32519, 51)
SOURCE(32551, 19)
{
word var←c50772;
var←c50772 = (word) (( (W2Pt) (( (bPt) formal←c52692)+96))+BCK(k←v22360, 24));
(* (ptr) var←c50772 ) = 0;
(* (( (ptr) var←c50772)+1) ) = x←v22388;
};
}
static void PutR←P6192(k←v22448, x←v22476, formal←c52724)
word k←v22448;
word x←v22476;
word formal←c52724;
{
formal←c52724 = (formal←c52724 - 24);
/* PutR: */
SOURCE(32575, 53)
SOURCE(32608, 20)
{
word var←c50804;
var←c50804 = (word) (( (W2Pt) (( (bPt) formal←c52724)+96))+BCK(k←v22448, 24));
(* (ptr) var←c50804 ) = 1;
(* (( (ptr) var←c50804)+1) ) = x←v22476;
};
}
static void Blend←P6492(n←v22776, m←v22804, formal←c52756)
word n←v22776;
word m←v22804;
word formal←c52756;
{
word k←v24204;
formal←c52756 = (formal←c52756 - 16);
/* Blend: */
SOURCE(32908, 290)
SOURCE(32941, 12)
k←v24204 = (n←v22776 / m←v22804);
SOURCE(32981, 217)
{
register word i←v24248 = 0;
register word noName←c50836;
noName←c50836 = m←v22804;
if ((i←v24248 >= noName←c50836)) {
goto lab←L100153;
};
lab←L100156: ;
{
word si0←v24292;
word si1←v24320;
word val←v24348;
SOURCE(33004, 15)
{
word idx427;
si0←v24292 = (
idx427 = (word) ((* (( (ptr) formal←c52756)+72) ) + i←v24248),
SGNCK(idx427)
);
};
SOURCE(33046, 23)
{
word idx428;
si1←v24320 = (
idx428 = (word) (((* (( (ptr) formal←c52756)+72) ) + m←v22804) + IOP2( * , (int)(k←v24204 - 1), (int)i←v24248)),
SGNCK(idx428)
);
};
SOURCE(33101, 18)
val←v24348 = (word) R←P6072(si0←v24292, (word) (( (bPt) formal←c52756)+40));
SOURCE(33121, 61)
{
register word j←v24392 = 1;
if ((j←v24392 >= k←v24204)) {
goto lab←L100157;
};
lab←L100160: ;
SOURCE(33144, 38)
{
word x429;
word limit430;
word x431;
word idx432;
word x433;
*(float*)&val←v24348 = (
x429 = val←v24348, *(float*)&x429
) + ((
x431 = (* ((( (ptr) (* (( (ptr) formal←c52756)+73) ))+1)+(
limit430 = (* (ptr) (* (( (ptr) formal←c52756)+73) ) ),
BCK(j←v24392, limit430)
)) ), *(float*)&x431
) * (
x433 = (word) R←P6072((
idx432 = (word) ((si1←v24320 + j←v24392) - 1),
SGNCK(idx432)
), (word) (( (bPt) formal←c52756)+40)), *(float*)&x433
));
};
j←v24392 = (j←v24392 + 1);
if ((j←v24392 < k←v24204)) {
goto lab←L100160;
};
lab←L100157: ;
};
SOURCE(33184, 14)
(void) PutR←P6192(si0←v24292, val←v24348, (word) (( (bPt) formal←c52756)+24));
};
i←v24248 = (i←v24248 + 1);
if ((i←v24248 < noName←c50836)) {
goto lab←L100156;
};
lab←L100153: ;
};
}
static void NoName←Q8088(formal←c0621, formal←c200000, formal←c200001, formal←c200002, formal←c200003)
word formal←c0621;
word formal←c200000;
word formal←c200001;
word formal←c200002;
word formal←c200003;
{
register ptr gf←c0678 = (ptr) &globalframe;
if ((formal←c200001 == (* (( (ptr) (* (( (ptr) gf←c0678)+372)/* var←c45524 */ ))+11) ))) {
{
word flags←v35400;
word vp←v35428;
word clientFixup←v35472;
flags←v35400 = (* (ptr) formal←c200003 );
vp←v35428 = (* (( (ptr) formal←c200003)+1) );
clientFixup←v35472 = 0;
if (flags←v35400 & 02) {
SOURCE(15937, 8)
(* (ptr) formal←c0621 ) = 2;
(* (( (ptr) formal←c0621)+1) ) = 2;
return;
}
else {
if (flags←v35400 & 1) {
SOURCE(15967, 11)
(* (ptr) formal←c0621 ) = 2;
(* (( (ptr) formal←c0621)+1) ) = 3;
return;
}
else {
SOURCE(15991, 11)
(* (ptr) formal←c0621 ) = 2;
(* (( (ptr) formal←c0621)+1) ) = 4;
return;
};
};
};
};
(* (ptr) formal←c0621 ) = 0;
(* (( (ptr) formal←c0621)+1) ) = 0;
return;
}
/* file: Type1FontImpl, module: Type1FontImpl, compiled at: October 28, 1993 2:18:25 am PDT */
extern void XR←install←Type1FontImpl() {
NoName←Q7968();
}
extern void XR←run←Type1FontImpl() { XR←Start(&globalframe); }