/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1992 by Xerox Corporation. All rights reserved. */
/* time: April 6, 1992 12:58:45 pm PDT */
/* C2C version: October 16, 1990 (native) */
/* ref-counting: off */
/* file: ImagerXCFontMapImpl, module: ImagerXCFontMapImpl */
/* switches: bcfhklnouw */
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob←version [3224372416,3318573333] ImagerXCFontMapImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef word (*fPt)();
typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8;
typedef struct {W8 f; W8 r;} W16;
typedef struct {W16 f; W16 r;} W32;
typedef struct {W32 f; W32 r;} W64;
typedef struct {word f0, f1, f2, f3, f4, f5;} W6;
typedef struct {W64 f; W6 r;} W70;
typedef W70 *W70Pt;
typedef struct {word f0, f1, f2, f3, f4;} W5;
typedef struct {W8 f; W5 r;} W13;
typedef struct {word f0, f1;} W2;
typedef W5 *W5Pt;
typedef struct {word f0, f1, f2, f3, f4, f5, f6;} W7;
typedef struct {W8 f; word r;} W9;
typedef struct {word f0, f1, f2;} W3;
typedef W3 *W3Pt;
#define SOURCE(p, l) /* source p, l */
static float fc86 = 1.0;
static void NoName←Q2064();
static void ImagerXCFontMapImpl←P0();
static word FilterFonts←P60();
static void MySetFont←P120();
static word NoName←Q2124();
static void MyShow←P180();
static void myString←P636();
static void myCharAction←P696();
static void MyShowText←P240();
static void string←P756();
static word MySave←P300();
static void MyRestore←P360();
static word MyGetFont←P420();
static void InitFontMaps←P480();
static void NoName←Q2184();
static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\205\026\031\133\300\153\303\216\034\100\164\000\000"};
static struct {unsigned f; char r[8];} string2 = {458759, "\006\002\000\001A\024\001"};
static struct {unsigned f; char r[44];} string3 = {2752556, "\260\006\005\146\151\162\163\164\257\300\300\060\004\300\300\305\315\151\025\101\064\005\004\162\145\163\164\214\257\300\300\060\004\300\300\305\315\151\025\101\064\261\000"};
static struct {unsigned f; char r[4];} string4 = {131074, "\004\017\000"};
static struct {unsigned f; char r[16];} string5 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"};
static struct {unsigned f; char r[4];} string6 = {65537, "\001\000\000"};
static struct {unsigned f; char r[36];} string7 = {2097188, "\260\006\005\146\151\162\163\164\210\241\000\300\177\377\377\377\005\004\162\145\163\164\214\210\241\000\300\177\377\377\377\261\000\000\000"};
static struct {unsigned f; char r[4];} string8 = {131074, "\003\001\000"};
static struct {unsigned f; char r[44];} string9 = {2752556, "\260\006\005\146\151\162\163\164\257\300\373\007\371\350\300\001\036\142\104\100\260\005\004\162\145\163\164\214\257\300\373\007\371\350\300\001\036\142\104\100\260\261\000"};
static struct {unsigned f; char r[4];} string10 = {131074, "\004'\000"};
static struct {unsigned f; char r[44];} string11 = {2752556, "\260\006\005\146\151\162\163\164\257\300\300\060\004\300\300\305\315\151\025\100\244\005\004\162\145\163\164\214\257\300\300\060\004\300\300\305\315\151\025\100\244\261\000"};
static struct {unsigned f; char r[4];} string12 = {131074, "\004\037\000"};
static struct {unsigned f; char r[16];} string13 = {851984, "\257\300\300\060\004\300\300\305\315\151\025\100\200\000\000"};
static struct {unsigned f; char r[4];} string14 = {131074, "\004\003\000"};
static struct {unsigned f; char r[16];} string15 = {851984, "\257\300\074\177\166\242\300\203\113\217\044\100\164\000\000"};
static struct {unsigned f; char r[4];} string16 = {131076, "\216\251\000"};
static struct {unsigned f; char r[16];} string17 = {851984, "\257\300\300\060\004\300\300\305\315\151\025\100\214\000\000"};
static struct {unsigned f; char r[4];} string18 = {196611, "\004@\377"};
static struct {unsigned f; char r[44];} string19 = {2752556, "\260\006\005\146\151\162\163\164\257\300\300\060\004\300\300\305\315\151\025\101\144\005\004\162\145\163\164\214\257\300\300\060\004\300\300\305\315\151\025\101\144\261\000"};
static struct {unsigned f; char r[4];} string20 = {131074, "\004\007\000"};
static struct {unsigned f; char r[44];} string21 = {2752556, "\260\006\005\146\151\162\163\164\257\300\300\060\004\300\300\305\315\151\025\101\050\005\004\162\145\163\164\214\257\300\300\060\004\300\300\305\315\151\025\101\050\261\000"};
static struct {unsigned f; char r[8];} string22 = {327688, "Gacha\000\000"};
static struct {unsigned f; char r[20];} string23 = {1179668, "EightBitTimesRoman\000"};
static struct {unsigned f; char r[12];} string24 = {524300, "Cyrillic\000\000\000"};
static struct {unsigned f; char r[8];} string25 = {327688, "Cream\000\000"};
static struct {unsigned f; char r[8];} string26 = {393224, "Modern\000"};
static struct {unsigned f; char r[12];} string27 = {524300, "Asterisk\000\000\000"};
static struct {unsigned f; char r[4];} string28 = {196612, "APL"};
static struct {unsigned f; char r[8];} string29 = {327688, "AMTeX\000\000"};
static struct {unsigned f; char r[8];} string30 = {393224, "Hebrew\000"};
static struct {unsigned f; char r[4];} string31 = {131076, "BI\000"};
static struct {unsigned f; char r[16];} string32 = {786448, "-bold-italic\000\000\000"};
static struct {unsigned f; char r[12];} string33 = {589836, "Helvetica\000\000"};
static struct {unsigned f; char r[4];} string34 = {65540, "B\000\000"};
static struct {unsigned f; char r[8];} string35 = {327688, "-bold\000\000"};
static struct {unsigned f; char r[4];} string36 = {65540, "I\000\000"};
static struct {unsigned f; char r[8];} string37 = {458760, "-italic"};
static struct {unsigned f; char r[4];} string38 = {4, "\000\000\000"};
static struct {unsigned f; char r[8];} string39 = {327688, "Hippo\000\000"};
static struct {unsigned f; char r[8];} string40 = {262152, "Logo\000\000\000"};
static struct {unsigned f; char r[12];} string41 = {589836, "XeroxBook\000\000"};
static struct {unsigned f; char r[12];} string42 = {720908, "ModernPiOne"};
static struct {unsigned f; char r[8];} string43 = {393224, "Laurel\000"};
static struct {unsigned f; char r[16];} string44 = {786448, "ClassicPiOne\000\000\000"};
static struct {unsigned f; char r[8];} string45 = {262152, "-bir\000\000\000"};
static struct {unsigned f; char r[8];} string46 = {262152, "-brr\000\000\000"};
static struct {unsigned f; char r[8];} string47 = {262152, "-mir\000\000\000"};
static struct {unsigned f; char r[8];} string48 = {262152, "-mrr\000\000\000"};
static struct {unsigned f; char r[8];} string49 = {262152, "Math\000\000\000"};
static struct {unsigned f; char r[12];} string50 = {655372, "OldEnglish\000"};
static struct {unsigned f; char r[12];} string51 = {524300, "Terminal\000\000\000"};
static struct {unsigned f; char r[20];} string52 = {1114132, "ImagerXCMapFilter\000\000"};
static struct {unsigned f; char r[16];} string53 = {786448, "ReverseGacha\000\000\000"};
static struct {unsigned f; char r[8];} string54 = {262152, "Sail\000\000\000"};
static struct {unsigned f; char r[12];} string55 = {655372, "TimesRoman\000"};
static struct {unsigned f; char r[12];} string56 = {589836, " WARNING:\000\000"};
static struct {unsigned f; char r[12];} string57 = {589836, " (%g =>%g\000\000"};
static struct {unsigned f; char r[8];} string58 = {327688, " {%g}\000\000"};
static struct {unsigned f; char r[4];} string59 = {65540, ")\000\000"};
static struct {unsigned f; char r[12];} string60 = {655372, "FontFilter\000"};
static struct {unsigned f; char r[8];} string61 = {458760, "Classic"};
static struct {unsigned f; char r[8];} string62 = {327688, "Tioga\000\000"};
static struct {unsigned f; char r[20];} string63 = {1179668, "Xerox/XC1-2-2/%g%g\000"};
static struct {unsigned f; char r[24];} string64 = {1507352, "Xerox/TiogaFonts/%g%g%g"};
static struct {unsigned f; char r[16];} string65 = {983056, "Logotypes-Xerox"};
static struct {unsigned f; char r[16];} string66 = {917520, "XeroxLogotypes\000"};
static struct {unsigned f; char r[24];} string67 = {1376280, "Xerox/PressFonts/%g%g\000\000"};
static struct {unsigned f; char r[16];} string68 = {851984, "\257\300\300\060\004\300\300\305\315\151\025\100\164\000\000"};
static struct {unsigned f; char r[24];} string69 = {1507351, "\006\010\020\001\024\001\030\001\034\001\040\001\044\001\050\001\100\174\010\000\004\056\001"};
static struct {unsigned f; char r[4];} string70 = {1231905127, "er"};
static struct {unsigned f; char r[16];} string71 = {851984, "\257\300\074\177\166\242\300\203\113\217\044\100\150\000\000"};
static struct {unsigned f; char r[16];} string72 = {851984, "\257\300\046\300\267\143\300\022\215\240\122\100\150\000\000"};
static struct {unsigned f; char r[16];} string73 = {851984, "\257\300\121\117\377\026\300\315\013\026\004\100\150\000\000"};
static struct {unsigned f; char r[16];} string74 = {851984, "\257\300\015\277\004\146\300\034\367\146\045\100\164\000\000"};
static struct {unsigned f; char r[16];} string75 = {851984, "\257\300\240\236\274\171\300\344\000\142\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string76 = {851984, "\257\300\242\221\264\046\300\105\142\142\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string77 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\100\150\000\000"};
static struct {unsigned f; char r[8];} string78 = {1231905127, "erXCMap"};
static struct {unsigned f; char r[16];} string79 = {851984, "\257\300\373\007\371\350\300\001\036\142\104\100\150\000\000"};
static struct {unsigned f; char r[24];} string80 = {1376280, "\211\011\010\103\154\141\163\163\122\145\160\300\074\177\166\242\300\203\113\217\044\000\000"};
static struct {
word f0[77]; word f77; word f78; word f79;
word f80; word f81; word f82; word f83;
word f84; word f85; word f86; word f87;
word f88; word f89; word f90; word f91;
word f92; word f93; word f94[11];
} globalframe = {
{0}, (word) InitFontMaps←P480, 0, (word) MyGetFont←P420,
0, (word) MyRestore←P360, 0, (word) MySave←P300,
0, (word) MyShowText←P240, 0, (word) MyShow←P180,
0, (word) MySetFont←P120, 0, (word) FilterFonts←P60,
0, (word) ImagerXCFontMapImpl←P0, {0}
};
static void NoName←Q2064()
{
register ptr gf←c0189 = (ptr) &globalframe;
word var←c35844;
(* (( (ptr) gf←c0189)+11) ) = (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2);
(* (( (ptr) gf←c0189)+12) ) = (word) XR←GetTypeIndex((word) &string3, 0, (word) &string4);
(* (( (ptr) gf←c0189)+14) ) = (word) XR←GetTypeIndex((word) &string5, 0, (word) &string6);
(* (( (ptr) gf←c0189)+16) ) = (word) XR←GetTypeIndex((word) &string7, 0, (word) &string8);
(* (( (ptr) gf←c0189)+17) ) = (word) XR←GetTypeIndex((word) &string9, 0, (word) &string10);
(* (( (ptr) gf←c0189)+20) ) = (word) XR←GetTypeIndex((word) &string11, 0, (word) &string12);
(* (( (ptr) gf←c0189)+21) ) = (word) XR←GetTypeIndex((word) &string13, 0, (word) &string14);
(* (( (ptr) gf←c0189)+22) ) = (word) XR←GetTypeIndex((word) &string15, 0, (word) &string4);
(* (( (ptr) gf←c0189)+24) ) = (word) XR←GetTypeIndex((word) &string16, 0, (word) &string6);
(* (( (ptr) gf←c0189)+25) ) = (word) XR←GetTypeIndex((word) &string17, 0, (word) &string18);
(* (( (ptr) gf←c0189)+28) ) = (word) XR←GetTypeIndex((word) &string19, 0, (word) &string20);
(* (( (ptr) gf←c0189)+30) ) = (word) XR←GetTypeIndex((word) &string21, 0, (word) &string20);
(* (ptr) (( (bPt) gf←c0189)+124) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string22);
(* (ptr) (( (bPt) gf←c0189)+128) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string23);
(* (ptr) (( (bPt) gf←c0189)+132) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string24);
(* (ptr) (( (bPt) gf←c0189)+136) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string25);
(* (ptr) (( (bPt) gf←c0189)+140) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string26);
(* (ptr) (( (bPt) gf←c0189)+144) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string27);
(* (ptr) (( (bPt) gf←c0189)+148) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string28);
(* (ptr) (( (bPt) gf←c0189)+152) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string29);
(* (ptr) (( (bPt) gf←c0189)+156) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string30);
(* (ptr) (( (bPt) gf←c0189)+160) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string31);
(* (ptr) (( (bPt) gf←c0189)+164) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string32);
(* (ptr) (( (bPt) gf←c0189)+168) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string33);
(* (ptr) (( (bPt) gf←c0189)+172) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string34);
(* (ptr) (( (bPt) gf←c0189)+176) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string35);
(* (ptr) (( (bPt) gf←c0189)+180) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string36);
(* (ptr) (( (bPt) gf←c0189)+184) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string37);
(* (ptr) (( (bPt) gf←c0189)+188) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string38);
(* (ptr) (( (bPt) gf←c0189)+192) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string39);
(* (ptr) (( (bPt) gf←c0189)+196) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string40);
(* (ptr) (( (bPt) gf←c0189)+200) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string41);
(* (ptr) (( (bPt) gf←c0189)+204) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string42);
(* (ptr) (( (bPt) gf←c0189)+208) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string43);
(* (ptr) (( (bPt) gf←c0189)+212) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string44);
(* (ptr) (( (bPt) gf←c0189)+216) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string45);
(* (ptr) (( (bPt) gf←c0189)+220) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string46);
(* (ptr) (( (bPt) gf←c0189)+224) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string47);
(* (ptr) (( (bPt) gf←c0189)+228) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string48);
(* (ptr) (( (bPt) gf←c0189)+232) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string49);
(* (ptr) (( (bPt) gf←c0189)+236) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string50);
(* (ptr) (( (bPt) gf←c0189)+240) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string51);
(* (ptr) (( (bPt) gf←c0189)+244) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+24) ), (word) &string52);
(* (ptr) (( (bPt) gf←c0189)+248) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string53);
(* (ptr) (( (bPt) gf←c0189)+252) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string54);
(* (ptr) (( (bPt) gf←c0189)+256) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string55);
(* (ptr) (( (bPt) gf←c0189)+260) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string56);
(* (ptr) (( (bPt) gf←c0189)+264) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string57);
(* (ptr) (( (bPt) gf←c0189)+268) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string58);
(* (ptr) (( (bPt) gf←c0189)+272) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string59);
(* (ptr) (( (bPt) gf←c0189)+276) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+24) ), (word) &string60);
(* (ptr) (( (bPt) gf←c0189)+280) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string61);
(* (ptr) (( (bPt) gf←c0189)+284) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string62);
(* (ptr) (( (bPt) gf←c0189)+288) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string63);
(* (ptr) (( (bPt) gf←c0189)+292) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string64);
(* (ptr) (( (bPt) gf←c0189)+296) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string65);
(* (ptr) (( (bPt) gf←c0189)+300) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string66);
(* (ptr) (( (bPt) gf←c0189)+304) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0189)+14) ), (word) &string67);
(void) XR←DeclareGlobalFrame((word) "ImagerXCFontMapImpl", &globalframe, (word) XR←GetTypeIndex((word) &string68, 0, (word) &string69)
, (word) (( (bPt) gf←c0189)+372)/* var←c31812 */ );
var←c35844 = (word) XR←ImportInterface((word) &string70, (word) XR←GetTypeIndexS((word) (&string71)), 84);
(* (( (ptr) gf←c0189)+97)/* var←c34116 */ ) = var←c35844;
(void) XR←ImportProcS(var←c35844, 793603);
(void) XR←ImportProcS(var←c35844, 530946);
(void) XR←ImportProcS(var←c35844, 67634946);
var←c35844 = (word) XR←ImportInterface((word) "ImagerFont", (word) XR←GetTypeIndexS((word) (&string72)), 26);
(* (( (ptr) gf←c0189)+98)/* var←c34148 */ ) = var←c35844;
(void) XR←ImportProcS(var←c35844, 1048836);
(void) XR←ImportProcS(var←c35844, 67634178);
(void) XR←ImportProcS(var←c35844, 67633922);
(void) XR←ImportProcS(var←c35844, 67374849);
var←c35844 = (word) XR←ImportInterface((word) "ImagerTransformation", (word) XR←GetTypeIndexS((word) (&string73)), 55);
(* (( (ptr) gf←c0189)+102)/* var←c34468 */ ) = var←c35844;
(void) XR←ImportProcS(var←c35844, 67636994);
var←c35844 = (word) XR←ImportInterface((word) "IO", (word) XR←GetTypeIndexS((word) (&string74)), 103);
(* (( (ptr) gf←c0189)+101)/* var←c34276 */ ) = var←c35844;
(void) XR←ImportProcS(var←c35844, 68958724);
(void) XR←ImportProcS(var←c35844, 1063171);
(void) XR←ImportProcS(var←c35844, 2111493);
(void) XR←ImportProcS(var←c35844, 1071364);
var←c35844 = (word) XR←ImportInterface((word) "Prop", (word) XR←GetTypeIndexS((word) (&string75)), 4);
(* (( (ptr) gf←c0189)+96)/* var←c34020 */ ) = var←c35844;
(void) XR←ImportProcS(var←c35844, 67895299);
var←c35844 = (word) XR←ImportInterface((word) "RefTab", (word) XR←GetTypeIndexS((word) (&string76)), 16);
(* (( (ptr) gf←c0189)+95)/* var←c33956 */ ) = var←c35844;
(void) XR←ImportProcS(var←c35844, 67896579);
(void) XR←ImportProcS(var←c35844, 134742786);
(void) XR←ImportProcS(var←c35844, 67895555);
var←c35844 = (word) XR←ImportInterface((word) "Rope", (word) XR←GetTypeIndexS((word) (&string77)), 43);
(* (( (ptr) gf←c0189)+99)/* var←c34212 */ ) = var←c35844;
(void) XR←ImportProcS(var←c35844, 67896323);
var←c35844 = (word) XR←ImportInterface((word) &string78, (word) XR←GetTypeIndexS((word) (&string79)), 11);
(* (( (ptr) gf←c0189)+100)/* var←c34244 */ ) = var←c35844;
(void) XR←ImportProcS(var←c35844, 67372289);
var←c35844 = (word) XR←ExportInterface((word) &string70, (word) XR←GetTypeIndexS((word) (&string71)), 84);
(* (( (ptr) gf←c0189)+103)/* var←c35876 */ ) = var←c35844;
(void) XR←ExportType((word) "ClassRep", (word) XR←GetTypeIndexS((word) (&string80)), (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2)
);
var←c35844 = (word) XR←ExportInterface((word) &string78, (word) XR←GetTypeIndexS((word) (&string79)), 11);
(* (( (ptr) gf←c0189)+104)/* var←c35908 */ ) = var←c35844;
(void) XR←ExportVar(var←c35844, 7, (word) (( (bPt) gf←c0189)+16)/* tiogaToXC←v3336 */ );
(void) XR←ExportVar(var←c35844, 8, (word) (( (bPt) gf←c0189)+20)/* pressToXC←v3364 */ );
(void) XR←ExportVar(var←c35844, 9, (word) (( (bPt) gf←c0189)+24)/* tiogaAndPressToXC←v3392 */ );
(void) XR←ExportProcS(var←c35844, (word) (( (bPt) gf←c0189)+364)/* var←c31780 */ , 68160004);
}
static void ImagerXCFontMapImpl←P0(formal←c079, formal←c032)
word formal←c079;
word formal←c032;
{
register ptr gf←c35940 = (ptr) &globalframe;
/* ImagerXCFontMapImpl: */
SOURCE(118, 7967)
SOURCE(5017, 15)
{
word var←c31844;
word var←c31876;
var←c31844 = XR←NewObject(16, (* (( (ptr) gf←c35940)+12) ));
var←c31876 = var←c31844;
(* (ptr) var←c31876 ) = (* (( (ptr) gf←c35940)+38) );
{
word var←c31940;
word var←c31972;
var←c31940 = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c31972 = var←c31940;
(* (ptr) var←c31972 ) = 10;
(* (( (ptr) var←c31876)+1) ) = var←c31940;
};
(* (( (ptr) var←c31876)+2) ) = (* (( (ptr) gf←c35940)+60) );
(* (( (ptr) var←c31876)+3) ) = XR←NewObject(16, (* (( (ptr) gf←c35940)+12) ));
var←c31876 = (* (( (ptr) var←c31876)+3) );
(* (ptr) var←c31876 ) = (* (( (ptr) gf←c35940)+37) );
{
word var←c32036;
word var←c32068;
var←c32036 = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32068 = var←c32036;
(* (ptr) var←c32068 ) = 14;
(* (( (ptr) var←c31876)+1) ) = var←c32036;
};
(* (( (ptr) var←c31876)+2) ) = (* (( (ptr) gf←c35940)+70) );
(* (( (ptr) var←c31876)+3) ) = XR←NewObject(16, (* (( (ptr) gf←c35940)+12) ));
var←c31876 = (* (( (ptr) var←c31876)+3) );
(* (ptr) var←c31876 ) = (* (( (ptr) gf←c35940)+36) );
{
word var←c32132;
word var←c32164;
var←c32132 = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32164 = var←c32132;
(* (ptr) var←c32164 ) = 10;
(* (( (ptr) var←c31876)+1) ) = var←c32132;
};
(* (( (ptr) var←c31876)+2) ) = (* (( (ptr) gf←c35940)+35) );
(* (( (ptr) var←c31876)+3) ) = XR←NewObject(16, (* (( (ptr) gf←c35940)+12) ));
var←c31876 = (* (( (ptr) var←c31876)+3) );
(* (ptr) var←c31876 ) = (* (( (ptr) gf←c35940)+70) );
{
word var←c32228;
word var←c32260;
var←c32228 = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32260 = var←c32228;
(* (ptr) var←c32260 ) = 8;
(* (( (ptr) var←c32260)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32260 = (* (( (ptr) var←c32260)+1) );
(* (ptr) var←c32260 ) = 10;
(* (( (ptr) var←c32260)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32260 = (* (( (ptr) var←c32260)+1) );
(* (ptr) var←c32260 ) = 12;
(* (( (ptr) var←c32260)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32260 = (* (( (ptr) var←c32260)+1) );
(* (ptr) var←c32260 ) = 14;
(* (( (ptr) var←c31876)+1) ) = var←c32228;
};
(* (( (ptr) var←c31876)+2) ) = (* (( (ptr) gf←c35940)+70) );
(* (( (ptr) var←c31876)+3) ) = XR←NewObject(16, (* (( (ptr) gf←c35940)+12) ));
var←c31876 = (* (( (ptr) var←c31876)+3) );
(* (ptr) var←c31876 ) = (* (( (ptr) gf←c35940)+34) );
{
word var←c32324;
word var←c32356;
var←c32324 = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32356 = var←c32324;
(* (ptr) var←c32356 ) = 10;
(* (( (ptr) var←c32356)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32356 = (* (( (ptr) var←c32356)+1) );
(* (ptr) var←c32356 ) = 12;
(* (( (ptr) var←c31876)+1) ) = var←c32324;
};
(* (( (ptr) var←c31876)+2) ) = (* (( (ptr) gf←c35940)+35) );
(* (( (ptr) var←c31876)+3) ) = XR←NewObject(16, (* (( (ptr) gf←c35940)+12) ));
var←c31876 = (* (( (ptr) var←c31876)+3) );
(* (ptr) var←c31876 ) = (* (( (ptr) gf←c35940)+33) );
{
word var←c32420;
word var←c32452;
var←c32420 = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32452 = var←c32420;
(* (ptr) var←c32452 ) = 10;
(* (( (ptr) var←c32452)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32452 = (* (( (ptr) var←c32452)+1) );
(* (ptr) var←c32452 ) = 12;
(* (( (ptr) var←c31876)+1) ) = var←c32420;
};
(* (( (ptr) var←c31876)+2) ) = (* (( (ptr) gf←c35940)+70) );
(* (( (ptr) var←c31876)+3) ) = XR←NewObject(16, (* (( (ptr) gf←c35940)+12) ));
var←c31876 = (* (( (ptr) var←c31876)+3) );
(* (ptr) var←c31876 ) = (* (( (ptr) gf←c35940)+32) );
{
word var←c32516;
word var←c32548;
var←c32516 = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32548 = var←c32516;
(* (ptr) var←c32548 ) = 10;
(* (( (ptr) var←c31876)+1) ) = var←c32516;
};
(* (( (ptr) var←c31876)+2) ) = (* (( (ptr) gf←c35940)+64) );
(* (( (ptr) var←c31876)+3) ) = XR←NewObject(16, (* (( (ptr) gf←c35940)+12) ));
var←c31876 = (* (( (ptr) var←c31876)+3) );
(* (ptr) var←c31876 ) = (* (( (ptr) gf←c35940)+31) );
{
word var←c32612;
word var←c32644;
var←c32612 = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32644 = var←c32612;
(* (ptr) var←c32644 ) = 8;
(* (( (ptr) var←c32644)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32644 = (* (( (ptr) var←c32644)+1) );
(* (ptr) var←c32644 ) = 10;
(* (( (ptr) var←c32644)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32644 = (* (( (ptr) var←c32644)+1) );
(* (ptr) var←c32644 ) = 12;
(* (( (ptr) var←c31876)+1) ) = var←c32612;
};
(* (( (ptr) var←c31876)+2) ) = (* (( (ptr) gf←c35940)+60) );
(* (( (ptr) var←c31876)+3) ) = XR←NewObject(16, (* (( (ptr) gf←c35940)+12) ));
var←c31876 = (* (( (ptr) var←c31876)+3) );
(* (ptr) var←c31876 ) = (* (( (ptr) gf←c35940)+39) );
{
word var←c32708;
word var←c32740;
var←c32708 = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32740 = var←c32708;
(* (ptr) var←c32740 ) = 14;
(* (( (ptr) var←c31876)+1) ) = var←c32708;
};
(* (( (ptr) var←c31876)+2) ) = (* (( (ptr) gf←c35940)+70) );
(* (( (ptr) var←c31876)+3) ) = XR←NewObject(16, (* (( (ptr) gf←c35940)+12) ));
var←c31876 = (* (( (ptr) var←c31876)+3) );
(* (ptr) var←c31876 ) = (* (( (ptr) gf←c35940)+42) );
{
word var←c32804;
word var←c32836;
var←c32804 = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32836 = var←c32804;
(* (ptr) var←c32836 ) = 6;
(* (( (ptr) var←c32836)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32836 = (* (( (ptr) var←c32836)+1) );
(* (ptr) var←c32836 ) = 7;
(* (( (ptr) var←c32836)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32836 = (* (( (ptr) var←c32836)+1) );
(* (ptr) var←c32836 ) = 8;
(* (( (ptr) var←c32836)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32836 = (* (( (ptr) var←c32836)+1) );
(* (ptr) var←c32836 ) = 9;
(* (( (ptr) var←c32836)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32836 = (* (( (ptr) var←c32836)+1) );
(* (ptr) var←c32836 ) = 10;
(* (( (ptr) var←c32836)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32836 = (* (( (ptr) var←c32836)+1) );
(* (ptr) var←c32836 ) = 11;
(* (( (ptr) var←c32836)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32836 = (* (( (ptr) var←c32836)+1) );
(* (ptr) var←c32836 ) = 12;
(* (( (ptr) var←c32836)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32836 = (* (( (ptr) var←c32836)+1) );
(* (ptr) var←c32836 ) = 13;
(* (( (ptr) var←c32836)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32836 = (* (( (ptr) var←c32836)+1) );
(* (ptr) var←c32836 ) = 14;
(* (( (ptr) var←c32836)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32836 = (* (( (ptr) var←c32836)+1) );
(* (ptr) var←c32836 ) = 16;
(* (( (ptr) var←c32836)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32836 = (* (( (ptr) var←c32836)+1) );
(* (ptr) var←c32836 ) = 18;
(* (( (ptr) var←c31876)+1) ) = var←c32804;
};
(* (( (ptr) var←c31876)+2) ) = (* (( (ptr) gf←c35940)+42) );
(* (( (ptr) var←c31876)+3) ) = XR←NewObject(16, (* (( (ptr) gf←c35940)+12) ));
var←c31876 = (* (( (ptr) var←c31876)+3) );
(* (ptr) var←c31876 ) = (* (( (ptr) gf←c35940)+48) );
{
word var←c32900;
word var←c32932;
var←c32900 = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32932 = var←c32900;
(* (ptr) var←c32932 ) = 8;
(* (( (ptr) var←c32932)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32932 = (* (( (ptr) var←c32932)+1) );
(* (ptr) var←c32932 ) = 10;
(* (( (ptr) var←c32932)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32932 = (* (( (ptr) var←c32932)+1) );
(* (ptr) var←c32932 ) = 12;
(* (( (ptr) var←c32932)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c32932 = (* (( (ptr) var←c32932)+1) );
(* (ptr) var←c32932 ) = 18;
(* (( (ptr) var←c31876)+1) ) = var←c32900;
};
(* (( (ptr) var←c31876)+2) ) = (* (( (ptr) gf←c35940)+70) );
(* (( (ptr) var←c31876)+3) ) = XR←NewObject(16, (* (( (ptr) gf←c35940)+12) ));
var←c31876 = (* (( (ptr) var←c31876)+3) );
(* (ptr) var←c31876 ) = (* (( (ptr) gf←c35940)+49) );
{
word var←c32996;
word var←c33028;
var←c32996 = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33028 = var←c32996;
(* (ptr) var←c33028 ) = 12;
(* (( (ptr) var←c33028)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33028 = (* (( (ptr) var←c33028)+1) );
(* (ptr) var←c33028 ) = 14;
(* (( (ptr) var←c33028)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33028 = (* (( (ptr) var←c33028)+1) );
(* (ptr) var←c33028 ) = 18;
(* (( (ptr) var←c33028)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33028 = (* (( (ptr) var←c33028)+1) );
(* (ptr) var←c33028 ) = 20;
(* (( (ptr) var←c33028)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33028 = (* (( (ptr) var←c33028)+1) );
(* (ptr) var←c33028 ) = 24;
(* (( (ptr) var←c33028)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33028 = (* (( (ptr) var←c33028)+1) );
(* (ptr) var←c33028 ) = 26;
(* (( (ptr) var←c31876)+1) ) = var←c32996;
};
(* (( (ptr) var←c31876)+2) ) = (* (( (ptr) gf←c35940)+74) );
(* (( (ptr) var←c31876)+3) ) = XR←NewObject(16, (* (( (ptr) gf←c35940)+12) ));
var←c31876 = (* (( (ptr) var←c31876)+3) );
(* (ptr) var←c31876 ) = (* (( (ptr) gf←c35940)+58) );
{
word var←c33092;
word var←c33124;
var←c33092 = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33124 = var←c33092;
(* (ptr) var←c33124 ) = 8;
(* (( (ptr) var←c33124)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33124 = (* (( (ptr) var←c33124)+1) );
(* (ptr) var←c33124 ) = 10;
(* (( (ptr) var←c33124)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33124 = (* (( (ptr) var←c33124)+1) );
(* (ptr) var←c33124 ) = 12;
(* (( (ptr) var←c31876)+1) ) = var←c33092;
};
(* (( (ptr) var←c31876)+2) ) = (* (( (ptr) gf←c35940)+70) );
(* (( (ptr) var←c31876)+3) ) = XR←NewObject(16, (* (( (ptr) gf←c35940)+12) ));
var←c31876 = (* (( (ptr) var←c31876)+3) );
(* (ptr) var←c31876 ) = (* (( (ptr) gf←c35940)+59) );
{
word var←c33188;
word var←c33220;
var←c33188 = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33220 = var←c33188;
(* (ptr) var←c33220 ) = 10;
(* (( (ptr) var←c33220)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33220 = (* (( (ptr) var←c33220)+1) );
(* (ptr) var←c33220 ) = 18;
(* (( (ptr) var←c31876)+1) ) = var←c33188;
};
(* (( (ptr) var←c31876)+2) ) = (* (( (ptr) gf←c35940)+70) );
(* (( (ptr) var←c31876)+3) ) = XR←NewObject(16, (* (( (ptr) gf←c35940)+12) ));
var←c31876 = (* (( (ptr) var←c31876)+3) );
(* (ptr) var←c31876 ) = (* (( (ptr) gf←c35940)+62) );
{
word var←c33284;
word var←c33316;
var←c33284 = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33316 = var←c33284;
(* (ptr) var←c33316 ) = 10;
(* (( (ptr) var←c31876)+1) ) = var←c33284;
};
(* (( (ptr) var←c31876)+2) ) = (* (( (ptr) gf←c35940)+60) );
(* (( (ptr) var←c31876)+3) ) = XR←NewObject(16, (* (( (ptr) gf←c35940)+12) ));
var←c31876 = (* (( (ptr) var←c31876)+3) );
(* (ptr) var←c31876 ) = (* (( (ptr) gf←c35940)+63) );
{
word var←c33380;
word var←c33412;
var←c33380 = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33412 = var←c33380;
(* (ptr) var←c33412 ) = 10;
(* (( (ptr) var←c33412)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33412 = (* (( (ptr) var←c33412)+1) );
(* (ptr) var←c33412 ) = 12;
(* (( (ptr) var←c31876)+1) ) = var←c33380;
};
(* (( (ptr) var←c31876)+2) ) = (* (( (ptr) gf←c35940)+70) );
(* (( (ptr) var←c31876)+3) ) = XR←NewObject(16, (* (( (ptr) gf←c35940)+12) ));
var←c31876 = (* (( (ptr) var←c31876)+3) );
(* (ptr) var←c31876 ) = (* (( (ptr) gf←c35940)+64) );
{
word var←c33476;
word var←c33508;
var←c33476 = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33508 = var←c33476;
(* (ptr) var←c33508 ) = 8;
(* (( (ptr) var←c33508)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33508 = (* (( (ptr) var←c33508)+1) );
(* (ptr) var←c33508 ) = 9;
(* (( (ptr) var←c33508)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33508 = (* (( (ptr) var←c33508)+1) );
(* (ptr) var←c33508 ) = 10;
(* (( (ptr) var←c33508)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33508 = (* (( (ptr) var←c33508)+1) );
(* (ptr) var←c33508 ) = 11;
(* (( (ptr) var←c33508)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33508 = (* (( (ptr) var←c33508)+1) );
(* (ptr) var←c33508 ) = 12;
(* (( (ptr) var←c33508)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33508 = (* (( (ptr) var←c33508)+1) );
(* (ptr) var←c33508 ) = 13;
(* (( (ptr) var←c33508)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33508 = (* (( (ptr) var←c33508)+1) );
(* (ptr) var←c33508 ) = 14;
(* (( (ptr) var←c33508)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33508 = (* (( (ptr) var←c33508)+1) );
(* (ptr) var←c33508 ) = 16;
(* (( (ptr) var←c33508)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33508 = (* (( (ptr) var←c33508)+1) );
(* (ptr) var←c33508 ) = 18;
(* (( (ptr) var←c31876)+1) ) = var←c33476;
};
(* (( (ptr) var←c31876)+2) ) = (* (( (ptr) gf←c35940)+64) );
(* (( (ptr) var←c31876)+3) ) = XR←NewObject(16, (* (( (ptr) gf←c35940)+12) ));
var←c31876 = (* (( (ptr) var←c31876)+3) );
(* (ptr) var←c31876 ) = (* (( (ptr) gf←c35940)+71) );
{
word var←c33572;
word var←c33604;
var←c33572 = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33604 = var←c33572;
(* (ptr) var←c33604 ) = 10;
(* (( (ptr) var←c31876)+1) ) = var←c33572;
};
(* (( (ptr) var←c31876)+2) ) = (* (( (ptr) gf←c35940)+70) );
(* (( (ptr) var←c31876)+3) ) = XR←NewObject(16, (* (( (ptr) gf←c35940)+12) ));
var←c31876 = (* (( (ptr) var←c31876)+3) );
(* (ptr) var←c31876 ) = (* (( (ptr) gf←c35940)+75) );
{
word var←c33668;
word var←c33700;
var←c33668 = XR←NewObject(8, (* (( (ptr) gf←c35940)+16) ));
var←c33700 = var←c33668;
(* (ptr) var←c33700 ) = 48;
(* (( (ptr) var←c31876)+1) ) = var←c33668;
};
(* (( (ptr) var←c31876)+2) ) = (* (( (ptr) gf←c35940)+74) );
(* (( (ptr) gf←c35940)+7)/* tiogaMappings←v3476 */ ) = var←c31844;
};
SOURCE(5900, 12)
{
word var←c33732;
word var←c33764;
var←c33732 = XR←NewObject(12, (* (( (ptr) gf←c35940)+30) ));
var←c33764 = var←c33732;
(* (ptr) var←c33764 ) = (* (( (ptr) gf←c35940)+47) );
(* (( (ptr) var←c33764)+1) ) = (* (( (ptr) gf←c35940)+47) );
(* (( (ptr) var←c33764)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c35940)+30) ));
var←c33764 = (* (( (ptr) var←c33764)+2) );
(* (ptr) var←c33764 ) = (* (( (ptr) gf←c35940)+45) );
(* (( (ptr) var←c33764)+1) ) = (* (( (ptr) gf←c35940)+46) );
(* (( (ptr) var←c33764)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c35940)+30) ));
var←c33764 = (* (( (ptr) var←c33764)+2) );
(* (ptr) var←c33764 ) = (* (( (ptr) gf←c35940)+43) );
(* (( (ptr) var←c33764)+1) ) = (* (( (ptr) gf←c35940)+44) );
(* (( (ptr) var←c33764)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c35940)+30) ));
var←c33764 = (* (( (ptr) var←c33764)+2) );
(* (ptr) var←c33764 ) = (* (( (ptr) gf←c35940)+40) );
(* (( (ptr) var←c33764)+1) ) = (* (( (ptr) gf←c35940)+41) );
(* (( (ptr) gf←c35940)+8)/* tiogaFaces←v3504 */ ) = var←c33732;
};
SOURCE(6073, 15)
{
word var←c33796;
word var←c33828;
var←c33796 = XR←NewObject(12, (* (( (ptr) gf←c35940)+28) ));
var←c33828 = var←c33796;
(* (ptr) var←c33828 ) = (* (( (ptr) gf←c35940)+70) );
(* (( (ptr) var←c33828)+1) ) = (* (( (ptr) gf←c35940)+70) );
(* (( (ptr) var←c33828)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c35940)+28) ));
var←c33828 = (* (( (ptr) var←c33828)+2) );
(* (ptr) var←c33828 ) = (* (( (ptr) gf←c35940)+53) );
(* (( (ptr) var←c33828)+1) ) = (* (( (ptr) gf←c35940)+70) );
(* (( (ptr) var←c33828)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c35940)+28) ));
var←c33828 = (* (( (ptr) var←c33828)+2) );
(* (ptr) var←c33828 ) = (* (( (ptr) gf←c35940)+31) );
(* (( (ptr) var←c33828)+1) ) = (* (( (ptr) gf←c35940)+60) );
(* (( (ptr) var←c33828)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c35940)+28) ));
var←c33828 = (* (( (ptr) var←c33828)+2) );
(* (ptr) var←c33828 ) = (* (( (ptr) gf←c35940)+42) );
(* (( (ptr) var←c33828)+1) ) = (* (( (ptr) gf←c35940)+42) );
(* (( (ptr) var←c33828)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c35940)+28) ));
var←c33828 = (* (( (ptr) var←c33828)+2) );
(* (ptr) var←c33828 ) = (* (( (ptr) gf←c35940)+48) );
(* (( (ptr) var←c33828)+1) ) = (* (( (ptr) gf←c35940)+70) );
(* (( (ptr) var←c33828)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c35940)+28) ));
var←c33828 = (* (( (ptr) var←c33828)+2) );
(* (ptr) var←c33828 ) = (* (( (ptr) gf←c35940)+52) );
(* (( (ptr) var←c33828)+1) ) = (* (( (ptr) gf←c35940)+70) );
(* (( (ptr) var←c33828)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c35940)+28) ));
var←c33828 = (* (( (ptr) var←c33828)+2) );
(* (ptr) var←c33828 ) = (* (( (ptr) gf←c35940)+58) );
(* (( (ptr) var←c33828)+1) ) = (* (( (ptr) gf←c35940)+70) );
(* (( (ptr) var←c33828)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c35940)+28) ));
var←c33828 = (* (( (ptr) var←c33828)+2) );
(* (ptr) var←c33828 ) = (* (( (ptr) gf←c35940)+35) );
(* (( (ptr) var←c33828)+1) ) = (* (( (ptr) gf←c35940)+35) );
(* (( (ptr) var←c33828)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c35940)+28) ));
var←c33828 = (* (( (ptr) var←c33828)+2) );
(* (ptr) var←c33828 ) = (* (( (ptr) gf←c35940)+51) );
(* (( (ptr) var←c33828)+1) ) = (* (( (ptr) gf←c35940)+35) );
(* (( (ptr) var←c33828)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c35940)+28) ));
var←c33828 = (* (( (ptr) var←c33828)+2) );
(* (ptr) var←c33828 ) = (* (( (ptr) gf←c35940)+59) );
(* (( (ptr) var←c33828)+1) ) = (* (( (ptr) gf←c35940)+70) );
(* (( (ptr) var←c33828)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c35940)+28) ));
var←c33828 = (* (( (ptr) var←c33828)+2) );
(* (ptr) var←c33828 ) = (* (( (ptr) gf←c35940)+64) );
(* (( (ptr) var←c33828)+1) ) = (* (( (ptr) gf←c35940)+64) );
(* (( (ptr) var←c33828)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c35940)+28) ));
var←c33828 = (* (( (ptr) var←c33828)+2) );
(* (ptr) var←c33828 ) = (* (( (ptr) gf←c35940)+50) );
(* (( (ptr) var←c33828)+1) ) = (* (( (ptr) gf←c35940)+60) );
(* (( (ptr) var←c33828)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c35940)+28) ));
var←c33828 = (* (( (ptr) var←c33828)+2) );
(* (ptr) var←c33828 ) = (* (( (ptr) gf←c35940)+75) );
(* (( (ptr) var←c33828)+1) ) = (* (( (ptr) gf←c35940)+74) );
(* (( (ptr) gf←c35940)+9)/* pressMappings←v3560 */ ) = var←c33796;
};
SOURCE(6461, 12)
{
word var←c33860;
word var←c33892;
var←c33860 = XR←NewObject(12, (* (( (ptr) gf←c35940)+30) ));
var←c33892 = var←c33860;
(* (ptr) var←c33892 ) = (* (( (ptr) gf←c35940)+57) );
(* (( (ptr) var←c33892)+1) ) = (* (( (ptr) gf←c35940)+47) );
(* (( (ptr) var←c33892)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c35940)+30) ));
var←c33892 = (* (( (ptr) var←c33892)+2) );
(* (ptr) var←c33892 ) = (* (( (ptr) gf←c35940)+56) );
(* (( (ptr) var←c33892)+1) ) = (* (( (ptr) gf←c35940)+46) );
(* (( (ptr) var←c33892)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c35940)+30) ));
var←c33892 = (* (( (ptr) var←c33892)+2) );
(* (ptr) var←c33892 ) = (* (( (ptr) gf←c35940)+55) );
(* (( (ptr) var←c33892)+1) ) = (* (( (ptr) gf←c35940)+44) );
(* (( (ptr) var←c33892)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c35940)+30) ));
var←c33892 = (* (( (ptr) var←c33892)+2) );
(* (ptr) var←c33892 ) = (* (( (ptr) gf←c35940)+54) );
(* (( (ptr) var←c33892)+1) ) = (* (( (ptr) gf←c35940)+41) );
(* (( (ptr) gf←c35940)+10)/* pressFaces←v3588 */ ) = var←c33860;
};
SOURCE(8071, 14)
(void) InitFontMaps←P480();
}
static word FilterFonts←P60(c←v4288, fontMap←v4316, msg←v4344, verbose←v4372)
word c←v4288;
word fontMap←v4316;
word msg←v4344;
word verbose←v4372;
{
register ptr gf←c35972 = (ptr) &globalframe;
word context←v4416;
word oldClass←v5860;
word data←v5888;
word props←v5916;
word class←v5944;
/* FilterFonts: */
SOURCE(983, 1635)
SOURCE(983, 1635)
context←v4416 = 0;
SOURCE(1115, 25)
oldClass←v5860 = (* (ptr) c←v4288 );
SOURCE(1142, 108)
{
word var←c33924;
word var←c33988;
{
word pd81;
pd81 = (* (( (ptr) (* (( (ptr) gf←c35972)+95)/* var←c33956 */ ))+5) );
var←c33924 = (word) ( *( (fPt) ((* (ptr) pd81 ))))(17, 0, 0, pd81);
};
var←c33988 = XR←NewObject(36, (* (( (ptr) gf←c35972)+25) ));
(* (ptr) var←c33988 ) = c←v4288;
(* (( (ptr) var←c33988)+4) ) = fontMap←v4316;
(* (( (ptr) var←c33988)+5) ) = var←c33924;
(* (( (ptr) var←c33988)+7) ) = msg←v4344;
(* (( (ptr) var←c33988)+8) ) = verbose←v4372;
data←v5888 = var←c33988;
};
SOURCE(1252, 69)
{
word pd82;
pd82 = (* (( (ptr) (* (( (ptr) gf←c35972)+96)/* var←c34020 */ ))+4) );
props←v5916 = (word) ( *( (fPt) ((* (ptr) pd82 ))))((* (( (ptr) c←v4288)+3) ), (* (( (ptr) gf←c35972)+61) ), data←v5888, pd82)
;
};
SOURCE(1323, 40)
class←v5944 = XR←NewObject(280, (* (( (ptr) gf←c35972)+11) ));
(* (W70Pt) class←v5944 ) = (* (W70Pt) oldClass←v5860 );
SOURCE(1365, 31)
(* (ptr) class←v5944 ) = (* (( (ptr) gf←c35972)+61) );
SOURCE(1398, 19)
(* (( (ptr) class←v5944)+1) ) = (word) (( (bPt) gf←c35972)+332)/* var←c31652 */ ;
SOURCE(1419, 25)
(* (( (ptr) class←v5944)+2) ) = (word) (( (bPt) gf←c35972)+324)/* var←c31620 */ ;
SOURCE(1446, 25)
(* (( (ptr) class←v5944)+6) ) = (word) (( (bPt) gf←c35972)+356)/* var←c31748 */ ;
SOURCE(1473, 25)
(* (( (ptr) class←v5944)+12) ) = (word) (( (bPt) gf←c35972)+316)/* var←c31588 */ ;
SOURCE(1500, 19)
(* (( (ptr) class←v5944)+38) ) = (word) (( (bPt) gf←c35972)+348)/* var←c31716 */ ;
SOURCE(1521, 27)
(* (( (ptr) class←v5944)+45) ) = (word) (( (bPt) gf←c35972)+340)/* var←c31684 */ ;
SOURCE(1550, 1068)
{
word var←c34084;
var←c34084 = XR←NewObject(16, (* (( (ptr) gf←c35972)+22) ));
(* (ptr) var←c34084 ) = class←v5944;
(* (( (ptr) var←c34084)+1) ) = (* (( (ptr) c←v4288)+1) );
(* (( (ptr) var←c34084)+2) ) = (* (( (ptr) c←v4288)+2) );
(* (( (ptr) var←c34084)+3) ) = props←v5916;
context←v4416 = var←c34084;
};
SOURCE(983, 1635)
return(context←v4416);
}
static void MySetFont←P120(context←v4476, font←v4504)
word context←v4476;
word font←v4504;
{
W13 var←c36004;
register ptr gf←c36036 = (ptr) &globalframe;
/* declaration of data←v5988 skipped */
word subst←v6016;
/* MySetFont: */
SOURCE(1652, 1406)
SOURCE(1720, 64)
{
word pd83;
pd83 = (* (( (ptr) (* (( (ptr) gf←c36036)+97)/* var←c34116 */ ))+11) );
(* (( (ptr) &var←c36004)+4)/* data←v5988 */ ) = XR←Narrow((word) ( *( (fPt) ((* (ptr) pd83 ))))(context←v4476, (* (( (ptr) gf←c36036)+61)
), pd83), (* (( (ptr) gf←c36036)+25) ));
};
SOURCE(1786, 62)
{
W2 var←c096;
word var←c0205;
{
word pd84;
pd84 = (* (( (ptr) (* (( (ptr) gf←c36036)+95)/* var←c33956 */ ))+7) );
(void) ( *( (fPt) ((* (ptr) pd84 ))))((word) &var←c096, (* (( (ptr) (* (( (ptr) &var←c36004)+4)/* data←v5988 */ ))+5) ), font←v4504, pd84)
;
};
var←c0205 = var←c096.f1;
subst←v6016 = XR←Narrow(var←c0205, (* (( (ptr) gf←c36036)+21) ));
};
SOURCE(1850, 1004)
if ((subst←v6016 == 0)) {
SOURCE(1870, 986)
{
word oldName←v6060;
/* declaration of fme←v6088 skipped */
word newFont←v6116 = 0;
word canPrint←v6144;
/* declaration of printing←v6172 skipped */
SOURCE(1872, 42)
{
word pd85;
pd85 = (* (( (ptr) (* (( (ptr) gf←c36036)+98)/* var←c34148 */ ))+19) );
oldName←v6060 = (word) ( *( (fPt) ((* (ptr) pd85 ))))(font←v4504, pd85);
};
SOURCE(1916, 17)
(* (( (ptr) &var←c36004)+5) ) = 0;
(* (( (ptr) &var←c36004)+6) ) = 0;
(* (( (ptr) &var←c36004)+7) ) = 0;
(* (( (ptr) &var←c36004)+8) ) = (* (ptr) &fc86 );
(* (( (ptr) &var←c36004)+9) ) = 0;
SOURCE(1961, 29)
canPrint←v6144 = ((* (( (ptr) (* (( (ptr) &var←c36004)+4)/* data←v5988 */ ))+7) ) != 0);
SOURCE(1992, 42)
(* (( (ptr) &var←c36004)+10)/* printing←v6172 */ ) = ( (0 != canPrint←v6144) ? (0 != (* (( (ptr) (* (( (ptr) &var←c36004)+4)
/* data←v5988 */ ))+8) )) : 0 ) ;
SOURCE(2036, 582)
{
register word p←v6216;
p←v6216 = (* (( (ptr) (* (( (ptr) &var←c36004)+4)/* data←v5988 */ ))+4) );
lab←L100003: ;
if ((p←v6216 != 0)) {
}
else {
goto lab←L100000;
};
SOURCE(2089, 529)
{
word pd87;
pd87 = (* (( (ptr) (* (( (ptr) gf←c36036)+99)/* var←c34212 */ ))+8) );
if ((0 != (word) ( *( (fPt) ((* (ptr) pd87 ))))(oldName←v6060, (* (ptr) p←v6216 ), 0, pd87))) {
SOURCE(2145, 13)
(* (W5Pt) (( (ptr) &var←c36004)+5)/* fme←v6088 */ ) = (* (W5Pt) p←v6216 );
SOURCE(2160, 4)
goto lab←L100001;
};
};
p←v6216 = (* (( (ptr) p←v6216)+5) );
goto lab←L100003;
lab←L100000: ;
SOURCE(2188, 430)
(* (( (ptr) &var←c36004)+5) ) = oldName←v6060;
(* (( (ptr) &var←c36004)+6) ) = oldName←v6060;
(* (( (ptr) &var←c36004)+7) ) = (* (ptr) (* (( (ptr) (* (( (ptr) gf←c36036)+100)/* var←c34244 */ ))+4) ) );
(* (( (ptr) &var←c36004)+8) ) = (* (ptr) &fc86 );
(* (( (ptr) &var←c36004)+9) ) = 0;
lab←L100001: ;
};
SOURCE(2284, 45)
if (((0 != (* (( (ptr) &var←c36004)+9) )) && (0 != canPrint←v6144))) {
SOURCE(2314, 15)
(* (( (ptr) &var←c36004)+10)/* printing←v6172 */ ) = 1;
};
SOURCE(2331, 59)
if (((0 != (* (( (ptr) &var←c36004)+9) )) && (0 != (* (( (ptr) &var←c36004)+10)/* printing←v6172 */ )))) {
SOURCE(2361, 29)
{
word pd88;
pd88 = (* (( (ptr) (* (( (ptr) gf←c36036)+101)/* var←c34276 */ ))+93) );
(void) ( *( (fPt) ((* (ptr) pd88 ))))((* (( (ptr) (* (( (ptr) &var←c36004)+4)/* data←v5988 */ ))+7) ), (* (( (ptr) gf←c36036)+65)
), 0, 2147483647, pd88);
};
};
SOURCE(2392, 226)
if ((0 != (* (( (ptr) &var←c36004)+10)/* printing←v6172 */ ))) {
SOURCE(2409, 209)
{
W2 var←c34308;
W2 var←c34340;
W2 var←c0206;
var←c34308.f0 = 11;
var←c34308.f1 = oldName←v6060;
var←c34340.f0 = 11;
var←c34340.f1 = (* (( (ptr) &var←c36004)+6) );
(* (ptr) (word) &var←c0206 ) = 0;
(* (( (ptr) (word) &var←c0206) + 1) ) = 0;
{
word pd89;
pd89 = (* (( (ptr) (* (( (ptr) gf←c36036)+101)/* var←c34276 */ ))+60) );
(void) ( *( (fPt) ((* (ptr) pd89 ))))((* (( (ptr) (* (( (ptr) &var←c36004)+4)/* data←v5988 */ ))+7) ), (* (( (ptr) gf←c36036)+66)
), var←c34308, var←c34340, var←c0206, pd89);
};
};
};
SOURCE(2480, 138)
{
/* declaration of var←c01 skipped */
(* (( (ptr) &var←c36004)+11)/* var←c01 */ ) = (* (( (ptr) (* (( (ptr) gf←c36036)+98)/* var←c34148 */ ))+7) );
{
/* declaration of var←c02 skipped */
{
word var←c0207;
var←c0207 = (word) &var←c36004;
(void) (word) XR←Enable(( ((word) (fPt) NoName←Q2124) ), ( ((word) (fPt) NoName←Q2184) ), var←c0207);
};
newFont←v6116 = (* (( (ptr) &var←c36004)+12)/* var←c02 */ );
};
};
SOURCE(2622, 98)
{
word var←c34436;
{
word pd90;
pd90 = (* (( (ptr) (* (( (ptr) gf←c36036)+102)/* var←c34468 */ ))+19) );
var←c34436 = (word) ( *( (fPt) ((* (ptr) pd90 ))))((* (ptr) font←v4504 ), (* (( (ptr) &var←c36004)+8) ), pd90);
};
{
word pd91;
pd91 = (* (( (ptr) (* (( (ptr) gf←c36036)+98)/* var←c34148 */ ))+8) );
newFont←v6116 = (word) ( *( (fPt) ((* (ptr) pd91 ))))(newFont←v6116, var←c34436, pd91);
};
};
SOURCE(2722, 38)
if ((0 != (* (( (ptr) &var←c36004)+10)/* printing←v6172 */ ))) {
SOURCE(2739, 21)
{
word pd92;
pd92 = (* (( (ptr) (* (( (ptr) gf←c36036)+101)/* var←c34276 */ ))+93) );
(void) ( *( (fPt) ((* (ptr) pd92 ))))((* (( (ptr) (* (( (ptr) &var←c36004)+4)/* data←v5988 */ ))+7) ), (* (( (ptr) gf←c36036)+68)
), 0, 2147483647, pd92);
};
};
SOURCE(2762, 52)
{
word var←c34500;
var←c34500 = XR←NewObject(8, (* (( (ptr) gf←c36036)+21) ));
(* (ptr) var←c34500 ) = newFont←v6116;
(* (( (ptr) var←c34500)+1) ) = (* (( (ptr) &var←c36004)+7) );
subst←v6016 = var←c34500;
};
SOURCE(2816, 38)
{
word var←c34532;
word pd93;
pd93 = (* (( (ptr) (* (( (ptr) gf←c36036)+95)/* var←c33956 */ ))+9) );
var←c34532 = (word) ( *( (fPt) ((* (ptr) pd93 ))))((* (( (ptr) (* (( (ptr) &var←c36004)+4)/* data←v5988 */ ))+5) ), font←v4504, subst←v6016, pd93)
;
};
};
};
SOURCE(2859, 19)
(* (( (ptr) (* (( (ptr) &var←c36004)+4)/* data←v5988 */ ))+1) ) = font←v4504;
SOURCE(2880, 20)
if ((subst←v6016 == 0)) {
SOURCE(2900, 5)
(void) XR←RaiseUnnamedError();
};
SOURCE(2907, 116)
if (((* (( (ptr) (* (( (ptr) &var←c36004)+4)/* data←v5988 */ ))+3) ) != (* (ptr) subst←v6016 ))) {
SOURCE(2950, 37)
{
word pd94;
pd94 = (* (( (ptr) (* (( (ptr) gf←c36036)+97)/* var←c34116 */ ))+30) );
(void) ( *( (fPt) ((* (ptr) pd94 ))))((* (ptr) (* (( (ptr) &var←c36004)+4)/* data←v5988 */ ) ), (* (ptr) subst←v6016 ), pd94)
;
};
SOURCE(2989, 34)
(* (( (ptr) (* (( (ptr) &var←c36004)+4)/* data←v5988 */ ))+3) ) = (* (ptr) subst←v6016 );
};
SOURCE(3028, 30)
(* (( (ptr) (* (( (ptr) &var←c36004)+4)/* data←v5988 */ ))+2) ) = subst←v6016;
}
static word NoName←Q2124(formal←c0193)
word formal←c0193;
{
SOURCE(2480, 138)
{
word pd95;
pd95 = (* (( (ptr) formal←c0193)+11) );
(* (( (ptr) formal←c0193)+12) ) = (word) ( *( (fPt) ((* (ptr) pd95 ))))((* (( (ptr) formal←c0193)+6) ), 1, pd95);
};
return(0);
}
static void MyShow←P180(context←v4564, formal←c0219, xrel←v4620)
word context←v4564;
word formal←c0219;
word xrel←v4620;
{
W8 var←c36068;
/* declaration of string←v4592 skipped */
register ptr gf←c36100 = (ptr) &globalframe;
/* declaration of var←c34564 skipped */
/* declaration of data←v6288 skipped */
var←c36068.f4/* string←v4592 */ = formal←c0219;
/* MyShow: */
SOURCE(3064, 391)
{
word tmpAddr96;
tmpAddr96 = (word) (( (ptr) &var←c36068)+5)/* var←c34564 */ ;
(* (ptr) tmpAddr96 ) = ( ((word) (fPt) myString←P636) );
(* (( (ptr) tmpAddr96) + 1) ) = 1;
};
SOURCE(3354, 64)
{
word pd97;
pd97 = (* (( (ptr) (* (( (ptr) gf←c36100)+97)/* var←c34116 */ ))+11) );
var←c36068.f7/* data←v6288 */ = XR←Narrow((word) ( *( (fPt) ((* (ptr) pd97 ))))(context←v4564, (* (( (ptr) gf←c36100)+61)
), pd97), (* (( (ptr) gf←c36100)+25) ));
};
SOURCE(3420, 35)
{
word pd98;
pd98 = (* (( (ptr) (* (( (ptr) gf←c36100)+97)/* var←c34116 */ ))+32) );
(void) ( *( (fPt) ((* (ptr) pd98 ))))((* (ptr) var←c36068.f7/* data←v6288 */ ), (word) (( (bPt) &var←c36068)+20)/* var←c34564 */ , xrel←v4620, pd98)
;
};
}
static void myString←P636(formal←c0220, formal←c36164)
word formal←c0220;
word formal←c36164;
{
W7 var←c36132;
/* declaration of charAction←v29244 skipped */
/* declaration of var←c34596 skipped */
formal←c36164 = (formal←c36164 - 20);
var←c36132.f4/* charAction←v29244 */ = formal←c0220;
var←c36132.f0 = formal←c36164;
/* myString: */
SOURCE(3150, 199)
{
word tmpAddr99;
tmpAddr99 = (word) (( (ptr) &var←c36132)+5)/* var←c34596 */ ;
(* (ptr) tmpAddr99 ) = ( ((word) (fPt) myCharAction←P696) );
(* (( (ptr) tmpAddr99) + 1) ) = 1;
};
SOURCE(3329, 20)
{
word pd100;
pd100 = (* (( (ptr) formal←c36164)+4) );
(void) ( *( (fPt) ((* (ptr) pd100 ))))((word) ((( (bPt) &var←c36132)+20)/* var←c34596 */ ), pd100);
};
}
static void myCharAction←P696(char←v29452, formal←c36196)
word char←v29452;
word formal←c36196;
{
formal←c36196 = (formal←c36196 - 20);
/* myCharAction: */
SOURCE(3187, 137)
SOURCE(3226, 80)
if (((char←v29452 >> 8) == 0)) {
SOURCE(3251, 55)
char←v29452 = (* (( (ptr) (* (( (ptr) (* (( (ptr) (* (( (ptr) (* (ptr) formal←c36196 ))+7) ))+2) ))+1) ))+(char←v29452 & 0377))
);
};
SOURCE(3308, 16)
{
word pd101;
pd101 = (* (( (ptr) formal←c36196)+4) );
(void) ( *( (fPt) ((* (ptr) pd101 ))))(char←v29452, pd101);
};
}
static void MyShowText←P240(context←v4680, formal←c0221, formal←c0222, formal←c0223, xrel←v4792)
word context←v4680;
word formal←c0221;
word formal←c0222;
word formal←c0223;
word xrel←v4792;
{
W9 var←c36228;
/* declaration of text←v4708 skipped */
/* declaration of start←v4736 skipped */
/* declaration of len←v4764 skipped */
register ptr gf←c36260 = (ptr) &globalframe;
/* declaration of var←c34628 skipped */
(* (( (ptr) &var←c36228)+4)/* text←v4708 */ ) = formal←c0221;
(* (( (ptr) &var←c36228)+5)/* start←v4736 */ ) = formal←c0222;
(* (( (ptr) &var←c36228)+6)/* len←v4764 */ ) = formal←c0223;
/* MyShowText: */
SOURCE(3461, 222)
{
word tmpAddr102;
tmpAddr102 = (word) (( (ptr) &var←c36228)+7)/* var←c34628 */ ;
(* (ptr) tmpAddr102 ) = ( ((word) (fPt) string←P756) );
(* (( (ptr) tmpAddr102) + 1) ) = 1;
};
SOURCE(3649, 34)
{
word pd103;
pd103 = (* (( (ptr) (* (( (ptr) gf←c36260)+97)/* var←c34116 */ ))+32) );
(void) ( *( (fPt) ((* (ptr) pd103 ))))(context←v4680, (word) (( (bPt) &var←c36228)+28)/* var←c34628 */ , xrel←v4792, pd103)
;
};
}
static void string←P756(charAction←v30076, formal←c36324)
word charAction←v30076;
word formal←c36324;
{
register ptr gf←c36292 = (ptr) &globalframe;
formal←c36324 = (formal←c36324 - 28);
/* string: */
SOURCE(3562, 84)
SOURCE(3597, 49)
{
word pd104;
pd104 = (* (( (ptr) (* (( (ptr) gf←c36292)+98)/* var←c34148 */ ))+5) );
(void) ( *( (fPt) ((* (ptr) pd104 ))))((* (( (ptr) formal←c36324)+4) ), (* (( (ptr) formal←c36324)+5) ), (* (( (ptr) formal←c36324)+6)
), charAction←v30076, pd104);
};
}
static word MySave←P300(context←v4864, all←v4892)
word context←v4864;
word all←v4892;
{
register ptr gf←c36356 = (ptr) &globalframe;
word var←c4936;
word data←v6420;
word cClass←v6448;
/* MySave: */
SOURCE(3689, 358)
SOURCE(3756, 57)
{
word pd105;
pd105 = (* (( (ptr) (* (( (ptr) gf←c36356)+97)/* var←c34116 */ ))+11) );
data←v6420 = XR←Narrow((word) ( *( (fPt) ((* (ptr) pd105 ))))(context←v4864, (* (( (ptr) gf←c36356)+69) ), pd105), (* (( (ptr) gf←c36356)+25)
));
};
SOURCE(3815, 28)
cClass←v6448 = (* (ptr) (* (ptr) data←v6420 ) );
SOURCE(3845, 176)
{
word var←c34660;
{
word var←c34692;
word var←c34724;
{
word pd106;
pd106 = (* (( (ptr) cClass←v6448)+1) );
var←c34692 = (word) ( *( (fPt) ((* (ptr) pd106 ))))(context←v4864, all←v4892, pd106);
};
var←c34724 = XR←NewObject(20, (* (( (ptr) gf←c36356)+20) ));
(* (ptr) var←c34724 ) = (* (( (ptr) data←v6420)+1) );
(* (( (ptr) var←c34724)+1) ) = (* (( (ptr) data←v6420)+2) );
(* (( (ptr) var←c34724)+2) ) = (* (( (ptr) data←v6420)+3) );
(* (( (ptr) var←c34724)+3) ) = var←c34692;
(* (( (ptr) var←c34724)+4) ) = (* (( (ptr) data←v6420)+6) );
var←c34660 = var←c34724;
};
(* (( (ptr) data←v6420)+6) ) = var←c34660;
};
SOURCE(4023, 24)
return((* (( (ptr) data←v6420)+6) ));
}
static void MyRestore←P360(context←v5008, ref←v5036)
word context←v5008;
word ref←v5036;
{
register ptr gf←c36388 = (ptr) &globalframe;
word data←v6492;
word cClass←v6520;
/* MyRestore: */
SOURCE(4051, 451)
SOURCE(4106, 57)
{
word pd107;
pd107 = (* (( (ptr) (* (( (ptr) gf←c36388)+97)/* var←c34116 */ ))+11) );
data←v6492 = XR←Narrow((word) ( *( (fPt) ((* (ptr) pd107 ))))(context←v5008, (* (( (ptr) gf←c36388)+69) ), pd107), (* (( (ptr) gf←c36388)+25)
));
};
SOURCE(4165, 28)
cClass←v6520 = (* (ptr) (* (ptr) data←v6492 ) );
SOURCE(4195, 46)
if ( ( (ref←v5036 != 0) ? (ref←v5036 != (* (( (ptr) data←v6492)+6) )) : 0 ) ) {
SOURCE(4241, 5)
(void) XR←RaiseUnnamedError();
};
SOURCE(4248, 49)
{
word pd108;
pd108 = (* (( (ptr) cClass←v6520)+2) );
(void) ( *( (fPt) ((* (ptr) pd108 ))))(context←v5008, (* (( (ptr) (* (( (ptr) data←v6492)+6) ))+3) ), pd108);
};
SOURCE(4299, 55)
(* (( (ptr) data←v6492)+3) ) = (* (( (ptr) (* (( (ptr) data←v6492)+6) ))+2) );
SOURCE(4356, 63)
(* (( (ptr) data←v6492)+2) ) = (* (( (ptr) (* (( (ptr) data←v6492)+6) ))+1) );
SOURCE(4421, 43)
(* (( (ptr) data←v6492)+1) ) = (* (ptr) (* (( (ptr) data←v6492)+6) ) );
SOURCE(4466, 36)
(* (( (ptr) data←v6492)+6) ) = (* (( (ptr) (* (( (ptr) data←v6492)+6) ))+4) );
}
static word MyGetFont←P420(context←v5108)
word context←v5108;
{
register ptr gf←c36420 = (ptr) &globalframe;
word var←c5152;
word data←v6564;
/* MyGetFont: */
SOURCE(4508, 158)
SOURCE(4578, 64)
{
word pd109;
pd109 = (* (( (ptr) (* (( (ptr) gf←c36420)+97)/* var←c34116 */ ))+11) );
data←v6564 = XR←Narrow((word) ( *( (fPt) ((* (ptr) pd109 ))))(context←v5108, (* (( (ptr) gf←c36420)+61) ), pd109), (* (( (ptr) gf←c36420)+25)
));
};
SOURCE(4644, 22)
return((* (( (ptr) data←v6564)+1) ));
}
static void InitFontMaps←P480()
{
register ptr gf←c36452 = (ptr) &globalframe;
/* InitFontMaps: */
SOURCE(6578, 1477)
SOURCE(6615, 15)
(* (( (ptr) gf←c36452)+4)/* tiogaToXC←v3336 */ ) = 0;
SOURCE(6632, 605)
{
register word tms←v6608;
tms←v6608 = (* (( (ptr) gf←c36452)+7)/* tiogaMappings←v3476 */ );
lab←L100009: ;
if ((tms←v6608 != 0)) {
}
else {
goto lab←L100006;
};
{
word map←v6736;
SOURCE(6705, 41)
{
word pd110;
pd110 = (* (( (ptr) (* (( (ptr) gf←c36452)+100)/* var←c34244 */ ))+9) );
map←v6736 = (word) ( *( (fPt) ((* (ptr) pd110 ))))((* (ptr) (tms←v6608) ), pd110);
};
SOURCE(6748, 489)
{
register word faces←v6780;
faces←v6780 = (* (( (ptr) gf←c36452)+8)/* tiogaFaces←v3504 */ );
lab←L100013: ;
if ((faces←v6780 != 0)) {
}
else {
goto lab←L100010;
};
{
word dest←v6908;
SOURCE(6816, 102)
{
W2 var←c34756;
W2 var←c34852;
{
W2 var←c34788;
word v←v31508;
v←v31508 = (* (( (ptr) tms←v6608)+2) );
var←c34788.f0 = 11;
var←c34788.f1 = v←v31508;
var←c34756 = var←c34788;
};
{
W2 var←c34884;
word v←v31460;
v←v31460 = (* (( (ptr) faces←v6780)+1) );
var←c34884.f0 = 11;
var←c34884.f1 = v←v31460;
var←c34852 = var←c34884;
};
{
W2 var←c0208;
(* (ptr) (word) &var←c0208 ) = 0;
(* (( (ptr) (word) &var←c0208) + 1) ) = 0;
{
word pd111;
pd111 = (* (( (ptr) (* (( (ptr) gf←c36452)+101)/* var←c34276 */ ))+62) );
dest←v6908 = (word) ( *( (fPt) ((* (ptr) pd111 ))))((* (( (ptr) gf←c36452)+72) ), var←c34756, var←c34852, var←c0208, pd111)
;
};
};
};
SOURCE(6920, 317)
{
register word sizes←v6952;
sizes←v6952 = (* (( (ptr) tms←v6608)+1) );
lab←L100019: ;
if ((sizes←v6952 != 0)) {
}
else {
goto lab←L100016;
};
{
word source←v7080;
SOURCE(6992, 132)
{
W2 var←c34980;
W2 var←c35076;
W2 var←c35172;
{
W2 var←c35012;
word v←v31412;
v←v31412 = (* (ptr) tms←v6608 );
var←c35012.f0 = 11;
var←c35012.f1 = v←v31412;
var←c34980 = var←c35012;
};
{
W2 var←c35108;
word v←v31124;
v←v31124 = (* (ptr) sizes←v6952 );
var←c35108.f0 = 5;
var←c35108.f1 = v←v31124;
var←c35076 = var←c35108;
};
{
W2 var←c35204;
word v←v31364;
v←v31364 = (* (ptr) faces←v6780 );
var←c35204.f0 = 11;
var←c35204.f1 = v←v31364;
var←c35172 = var←c35204;
};
{
word pd112;
pd112 = (* (( (ptr) (* (( (ptr) gf←c36452)+101)/* var←c34276 */ ))+62) );
source←v7080 = (word) ( *( (fPt) ((* (ptr) pd112 ))))((* (( (ptr) gf←c36452)+73) ), var←c34980, var←c35076, var←c35172, pd112)
;
};
};
SOURCE(7126, 111)
{
word var←c35268;
var←c35268 = XR←NewObject(24, (* (( (ptr) gf←c36452)+17) ));
(* (ptr) var←c35268 ) = source←v7080;
(* (( (ptr) var←c35268)+1) ) = dest←v6908;
(* (( (ptr) var←c35268)+2) ) = map←v6736;
{
float tf113;
(* (( (ptr) var←c35268)+3) ) = (
/*1*/ tf113 = (float)(unsigned)(* (ptr) sizes←v6952 ), *(word*)&tf113
/*1*/ );
};
(* (( (ptr) var←c35268)+5) ) = (* (( (ptr) gf←c36452)+4)/* tiogaToXC←v3336 */ );
(* (( (ptr) gf←c36452)+4)/* tiogaToXC←v3336 */ ) = var←c35268;
};
};
sizes←v6952 = (* (( (ptr) sizes←v6952)+1) );
goto lab←L100019;
lab←L100016: ;
};
};
faces←v6780 = (* (( (ptr) faces←v6780)+2) );
goto lab←L100013;
lab←L100010: ;
};
};
tms←v6608 = (* (( (ptr) tms←v6608)+3) );
goto lab←L100009;
lab←L100006: ;
};
SOURCE(7266, 15)
(* (( (ptr) gf←c36452)+5)/* pressToXC←v3364 */ ) = 0;
SOURCE(7283, 502)
{
register word tms←v7124;
tms←v7124 = (* (( (ptr) gf←c36452)+9)/* pressMappings←v3560 */ );
lab←L100026: ;
if ((tms←v7124 != 0)) {
}
else {
goto lab←L100023;
};
{
word map←v7252;
SOURCE(7356, 41)
{
word pd114;
pd114 = (* (( (ptr) (* (( (ptr) gf←c36452)+100)/* var←c34244 */ ))+9) );
map←v7252 = (word) ( *( (fPt) ((* (ptr) pd114 ))))((* (ptr) (tms←v7124) ), pd114);
};
SOURCE(7399, 386)
{
register word faces←v7296;
faces←v7296 = (* (( (ptr) gf←c36452)+8)/* tiogaFaces←v3504 */ );
lab←L100030: ;
if ((faces←v7296 != 0)) {
}
else {
goto lab←L100027;
};
{
word dest←v7424;
word source←v7452;
SOURCE(7467, 102)
{
W2 var←c35300;
W2 var←c35396;
{
W2 var←c35332;
word v←v31316;
v←v31316 = (* (( (ptr) tms←v7124)+1) );
var←c35332.f0 = 11;
var←c35332.f1 = v←v31316;
var←c35300 = var←c35332;
};
{
W2 var←c35428;
word v←v31268;
v←v31268 = (* (( (ptr) faces←v7296)+1) );
var←c35428.f0 = 11;
var←c35428.f1 = v←v31268;
var←c35396 = var←c35428;
};
{
W2 var←c0209;
(* (ptr) (word) &var←c0209 ) = 0;
(* (( (ptr) (word) &var←c0209) + 1) ) = 0;
{
word pd115;
pd115 = (* (( (ptr) (* (( (ptr) gf←c36452)+101)/* var←c34276 */ ))+62) );
dest←v7424 = (word) ( *( (fPt) ((* (ptr) pd115 ))))((* (( (ptr) gf←c36452)+72) ), var←c35300, var←c35396, var←c0209, pd115)
;
};
};
};
SOURCE(7571, 109)
{
W2 var←c35524;
W2 var←c35620;
{
W2 var←c35556;
word v←v31220;
v←v31220 = (* (ptr) tms←v7124 );
var←c35556.f0 = 11;
var←c35556.f1 = v←v31220;
var←c35524 = var←c35556;
};
{
W2 var←c35652;
word v←v31172;
v←v31172 = (* (ptr) faces←v7296 );
var←c35652.f0 = 11;
var←c35652.f1 = v←v31172;
var←c35620 = var←c35652;
};
{
W2 var←c0210;
(* (ptr) (word) &var←c0210 ) = 0;
(* (( (ptr) (word) &var←c0210) + 1) ) = 0;
{
word pd116;
pd116 = (* (( (ptr) (* (( (ptr) gf←c36452)+101)/* var←c34276 */ ))+62) );
source←v7452 = (word) ( *( (fPt) ((* (ptr) pd116 ))))((* (( (ptr) gf←c36452)+76) ), var←c35524, var←c35620, var←c0210, pd116)
;
};
};
};
SOURCE(7682, 103)
{
word var←c35748;
var←c35748 = XR←NewObject(24, (* (( (ptr) gf←c36452)+17) ));
(* (ptr) var←c35748 ) = source←v7452;
(* (( (ptr) var←c35748)+1) ) = dest←v7424;
(* (( (ptr) var←c35748)+2) ) = map←v7252;
(* (( (ptr) var←c35748)+3) ) = (* (ptr) &fc86 );
(* (( (ptr) var←c35748)+5) ) = (* (( (ptr) gf←c36452)+5)/* pressToXC←v3364 */ );
(* (( (ptr) gf←c36452)+5)/* pressToXC←v3364 */ ) = var←c35748;
};
};
faces←v7296 = (* (( (ptr) faces←v7296)+2) );
goto lab←L100030;
lab←L100027: ;
};
};
tms←v7124 = (* (( (ptr) tms←v7124)+2) );
goto lab←L100026;
lab←L100023: ;
};
SOURCE(7805, 23)
(* (( (ptr) gf←c36452)+6)/* tiogaAndPressToXC←v3392 */ ) = 0;
SOURCE(7830, 107)
{
register word fm←v7496;
fm←v7496 = (* (( (ptr) gf←c36452)+4)/* tiogaToXC←v3336 */ );
lab←L100038: ;
if ((fm←v7496 != 0)) {
}
else {
goto lab←L100035;
};
SOURCE(7883, 54)
{
word var←c35780;
var←c35780 = XR←NewObject(24, (* (( (ptr) gf←c36452)+17) ));
(* (W5Pt) var←c35780 ) = (* (W5Pt) fm←v7496 );
(* (( (ptr) var←c35780)+5) ) = (* (( (ptr) gf←c36452)+6)/* tiogaAndPressToXC←v3392 */ );
(* (( (ptr) gf←c36452)+6)/* tiogaAndPressToXC←v3392 */ ) = var←c35780;
};
fm←v7496 = (* (( (ptr) fm←v7496)+5) );
goto lab←L100038;
lab←L100035: ;
};
SOURCE(7948, 107)
{
register word fm←v7540;
fm←v7540 = (* (( (ptr) gf←c36452)+5)/* pressToXC←v3364 */ );
lab←L100042: ;
if ((fm←v7540 != 0)) {
}
else {
goto lab←L100039;
};
SOURCE(8001, 54)
{
word var←c35812;
var←c35812 = XR←NewObject(24, (* (( (ptr) gf←c36452)+17) ));
(* (W5Pt) var←c35812 ) = (* (W5Pt) fm←v7540 );
(* (( (ptr) var←c35812)+5) ) = (* (( (ptr) gf←c36452)+6)/* tiogaAndPressToXC←v3392 */ );
(* (( (ptr) gf←c36452)+6)/* tiogaAndPressToXC←v3392 */ ) = var←c35812;
};
fm←v7540 = (* (( (ptr) fm←v7540)+5) );
goto lab←L100042;
lab←L100039: ;
};
}
static void NoName←Q2184(formal←c0188, formal←c200000, formal←c200001, formal←c200002, formal←c200003)
word formal←c0188;
word formal←c200000;
word formal←c200001;
word formal←c200002;
word formal←c200003;
{
register ptr gf←c0204 = (ptr) &globalframe;
if ((formal←c200001 == (* (ptr) (* (( (ptr) (* (( (ptr) gf←c0204)+97)/* var←c34116 */ ))+7) ) ))) {
{
W3 error←v28300;
error←v28300 = (* (W3Pt) formal←c200003 );
SOURCE(2542, 76)
if ((0 != (* (( (ptr) formal←c200000)+10) ))) {
SOURCE(2559, 59)
{
W2 var←c34404;
var←c34404.f0 = 11;
var←c34404.f1 = error←v28300.f1;
{
word pd117;
pd117 = (* (( (ptr) (* (( (ptr) gf←c0204)+101)/* var←c34276 */ ))+61) );
(void) ( *( (fPt) ((* (ptr) pd117 ))))((* (( (ptr) (* (( (ptr) formal←c200000)+4) ))+7) ), (* (( (ptr) gf←c0204)+67) ), var←c34404, pd117)
;
};
};
};
SOURCE(2612, 6)
(* (ptr) formal←c0188 ) = 1;
(* (( (ptr) formal←c0188)+1) ) = 0;
return;
};
};
(* (ptr) formal←c0188 ) = 0;
(* (( (ptr) formal←c0188)+1) ) = 0;
return;
}
/* file: ImagerXCFontMapImpl, module: ImagerXCFontMapImpl, compiled at: April 6, 1992 12:58:44 pm PDT */
extern void XR←install←ImagerXCFontMapImpl() {
NoName←Q2064();
}
extern void XR←run←ImagerXCFontMapImpl() { XR←Start(&globalframe); }