/* Generated with C2C (Cedar To C)*/ /* Copyright (C) 1993 by Xerox Corporation. All rights reserved. */ /* time: September 14, 1993 4:25:49 pm PDT */ /* C2C version: April 20, 1993 (sun4) */ /* ref-counting: off */ /* file: XlImplTexts, module: XlImplTexts */ /* switches: bcfhklnouw */ #include #include #define XRM_BITAND(x, y) (((word)(x)) & ((word)(y))) static char versionStamp[] = "@(#)mob_version [2241281978,2718402277] XlImplTexts"; typedef unsigned word, *ptr; typedef unsigned char byte, *bPt; typedef unsigned short half, *hPt; typedef struct {word f0, f1, f2, f3, f4, f5, f6;} W7; typedef struct {word f0, f1;} W2; typedef word (*fPt)(); typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8; typedef struct {W8 f; word r;} W9; typedef struct {W8 f; W2 r;} W10; typedef W2 *W2Pt; typedef struct {word f0, f1, f2;} W3; typedef W3 *W3Pt; typedef struct {W8 f; W3 r;} W11; typedef W8 *W8Pt; typedef struct {word f0, f1, f2, f3, f4, f5;} W6; typedef struct {W8 f; W6 r;} W14; typedef W6 *W6Pt; #define SOURCE(p, l) /* source p, l */ #define IOP2(op, x, y) ( (word) ((x) op (y)) ) #define BCK(idx, lim) ( ((unsigned) idx) >= ((unsigned) lim) ? (XR_RaiseBoundsFault()) : (idx) ) #define SGNCK(i) ((int) (word) (i) < 0 ? XR_RaiseArithmeticFault(): i ) #define MAX(cast, x, y) ( ( cast x) > ( cast y) ? (x) : (y) ) #define MIN(cast, x, y) ( ( cast x) < ( cast y) ? (x) : (y) ) static void NoName_Q5556(); static void XlImplTexts_P0(); static word FontId_P60(); static word IsFont_P120(); static word NarrowFont_P180(); static word GetFontStuff_P240(); static void InitFontTable_P2040(); static void FinalizeFont_P300(); static word NoName_Q5616(); static void RemoveFontFromFontCache_P2148(); static void UpdateTable_P2412(); static void FreeFont_P2208(); static void action_P2472(); static word OpenFont_P360(); static word OpenFontId_P420(); static void action_P2724(); static void PreventGcOnServer_P480(); static void ListFonts_P540(); static void action_P2784(); static word GetFontPath_P600(); static void action_P2940(); static word IntERead16_P660(); static word QueryFont_P720(); static word QueryFontID_P780(); static void action_P3192(); static word InternalReportOneFont_P840(); static word ListFontsWithInfo_P900(); static void ProtectedListFontsWithInfo_P3300(); static void ReadFontReply_P960(); static void ReadFontProp_P3504(); static void ReadCharInfo_P3564(); static word ReadRopeOfKnownLength_P1020(); static void QueryTextExtents16OnServer_P1080(); static void action_P3768(); static void QueryTextExtents_P1200(); static void QueryTextExtents16_P1260(); static void CharExtent_P1320(); static void DoExtent_P1380(); static void ComputeTextExtents_P1440(); static word CharAction_P3828(); static void ComputeTextExtents16_P1500(); static word CharAction_P3936(); static word QueryKeymap_P1560(); static void action_P4092(); static word GetKeyboardMapping_P1620(); static void action_P4200(); static void MakeKeyTable_P1680(); static word GetModifierMapping_P1740(); static void action_P4596(); static word GetPointerMapping_P1800(); static void action_P4848(); static word XMapCount_P1860(); static void XMapRange_P1920(); static word XMapKeyCode_P1980(); static void NoName_Q5676(); static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\137\016\143\051\300\142\000\073\260\100\164\000\000"}; static struct {unsigned f; char r[4];} string2 = {131074, "\004\034\000"}; static struct {unsigned f; char r[16];} string3 = {851984, "\257\300\205\227\077\272\300\242\007\206\345\100\214\000\000"}; static struct {unsigned f; char r[4];} string4 = {131074, "\004\003\000"}; static struct {unsigned f; char r[16];} string5 = {851984, "\257\300\205\227\077\272\300\242\007\206\345\102\300\000\000"}; static struct {unsigned f; char r[4];} string6 = {196611, "\004@`"}; static struct {unsigned f; char r[16];} string7 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\115\224\000\000"}; static struct {unsigned f; char r[16];} string8 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\113\374\000\000"}; static struct {unsigned f; char r[16];} string9 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\104\304\000\000"}; static struct {unsigned f; char r[24];} string10 = {1376277, "\007\000\001\002\007\020\001\002\000\007\036\002\004\003\002\004\014\016\015\003\001\000\000"}; static struct {unsigned f; char r[16];} string11 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"}; static struct {unsigned f; char r[4];} string12 = {65537, "\001\000\000"}; static struct {unsigned f; char r[48];} string13 = {2883632, "\260\006\005\146\151\162\163\164\216\257\300\363\223\326\161\300\017\164\046\072\104\350\005\004\162\145\163\164\214\216\257\300\363\223\326\161\300\017\164\046\072\104\350\261\000\000\000"}; static struct {unsigned f; char r[16];} string14 = {851984, "\257\300\205\227\077\272\300\242\007\206\345\101\254\000\000"}; static struct {unsigned f; char r[4];} string15 = {131074, "\004\006\000"}; static struct {unsigned f; char r[48];} string16 = {2883632, "\260\006\005\146\151\162\163\164\216\257\300\304\042\023\266\300\315\144\243\337\103\260\005\004\162\145\163\164\214\216\257\300\304\042\023\266\300\315\144\243\337\103\260\261\000\000\000"}; static struct {unsigned f; char r[4];} string17 = {131076, "\216\251\000"}; static struct {unsigned f; char r[16];} string18 = {851984, "\257\300\003\153\243\146\300\005\107\115\327\100\164\000\000"}; static struct {unsigned f; char r[16];} string19 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\113\110\000\000"}; static struct {unsigned f; char r[8];} string20 = {262148, "\004\200`\001\000\000\000"}; static struct {unsigned f; char r[16];} string21 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\113\000\000\000"}; static struct {unsigned f; char r[16];} string22 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\113\014\000\000"}; static struct {unsigned f; char r[16];} string23 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\112\364\000\000"}; static struct {unsigned f; char r[32];} string24 = {1835040, "\254\205\257\300\233\221\325\046\300\135\160\307\206\100\164\257\300\337\227\034\246\300\245\273\012\063\100\164\000\000\000"}; static struct {unsigned f; char r[32];} string25 = {1835040, "\205\257\300\233\221\325\046\300\135\160\307\206\100\164\216\257\300\003\153\243\146\300\005\107\115\327\100\164\000\000\000"}; static struct {unsigned f; char r[8];} string26 = {393222, "\010\000\004A\000\001\000"}; static struct {unsigned f; char r[20];} string27 = {1245204, "x11PrivateKMappings"}; static struct {unsigned f; char r[20];} string28 = {1245204, "x11PrivateMMappings"}; static struct {unsigned f; char r[8];} string29 = {458760, "tooLong"}; static struct {unsigned f; char r[8];} string30 = {262152, "fake\000\000\000"}; static struct {unsigned f; char r[16];} string31 = {851984, "\257\300\205\227\077\272\300\242\007\206\345\100\200\000\000"}; static struct {unsigned f; char r[8];} string32 = {393222, "\006\001@t\004\017\000"}; static struct {unsigned f; char r[16];} string33 = {851984, "\257\300\250\013\333\033\300\120\151\334\170\100\150\000\000"}; static struct {unsigned f; char r[16];} string34 = {851984, "\257\300\157\176\027\244\300\037\074\133\137\100\150\000\000"}; static struct {unsigned f; char r[16];} string35 = {851984, "\257\300\003\153\243\146\300\005\107\115\327\100\150\000\000"}; static struct {unsigned f; char r[16];} string36 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\100\150\000\000"}; static struct {unsigned f; char r[16];} string37 = {851984, "\257\300\072\337\114\355\300\232\070\352\142\100\150\000\000"}; static unsigned string38 = 1483472896; static struct {unsigned f; char r[16];} string39 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\100\164\000\000"}; static struct {unsigned f; char r[16];} string40 = {851984, "\257\300\337\070\153\303\300\227\216\321\214\100\150\000\000"}; static struct {unsigned f; char r[16];} string41 = {851984, "\257\300\216\377\237\261\300\201\335\023\142\100\150\000\000"}; static struct {unsigned f; char r[16];} string42 = {851984, "\257\300\304\042\023\266\300\315\144\243\337\100\150\000\000"}; static struct {unsigned f; char r[16];} string43 = {851984, "\257\300\212\247\207\172\300\123\222\237\073\100\150\000\000"}; static struct {unsigned f; char r[16];} string44 = {851984, "\257\300\044\126\136\322\300\125\273\233\107\100\150\000\000"}; static struct {unsigned f; char r[16];} string45 = {851984, "\257\300\126\372\175\303\300\214\014\321\126\100\150\000\000"}; static struct {unsigned f; char r[32];} string46 = {1966112, "\211\022\021\103\157\156\156\145\143\164\151\157\156\120\162\151\166\141\164\145\300\351\276\264\273\300\115\104\320\264\000"}; static struct {unsigned f; char r[16];} string47 = {851984, "\257\300\012\063\155\016\300\130\140\234\375\100\164\000\000"}; static struct {unsigned f; char r[40];} string48 = {2424869, "\006\016\000\001\004\001\010\001\014\001\020\001\024\001\030\001\034\001\040\001\044\001\060\001\070\010\000\004\100\100\001\101\070\001\101\074\001\000\000"}; static struct {unsigned f; char r[24];} string49 = {1310744, "\211\010\007\106\157\156\164\122\145\160\300\351\276\264\273\300\115\104\320\264\000\000\000"}; static struct {unsigned f; char r[16];} string50 = {851984, "\257\300\012\063\155\016\300\130\140\234\375\100\150\000\000"}; static struct {unsigned f; char r[32];} string51 = {1900576, "\211\021\020\113\115\141\160\160\151\156\147\103\141\143\150\145\122\145\160\300\012\063\155\016\300\130\140\234\375\000\000"}; static struct {unsigned f; char r[32];} string52 = {1900576, "\211\021\020\120\115\141\160\160\151\156\147\103\141\143\150\145\122\145\160\300\012\063\155\016\300\130\140\234\375\000\000"}; static struct {unsigned f; char r[32];} string53 = {1900576, "\211\021\020\115\115\141\160\160\151\156\147\103\141\143\150\145\122\145\160\300\012\063\155\016\300\130\140\234\375\000\000"}; static struct {unsigned f; char r[28];} string54 = {1572892, "\211\014\013\106\157\156\164\120\162\151\166\141\164\145\300\012\063\155\016\300\130\140\234\375\000\000\000"}; static struct { word f0[34]; word f34; word f35; word f36; word f37; word f38; word f39; word f40; word f41; word f42; word f43; word f44; word f45; word f46; word f47; word f48; word f49; word f50; word f51; word f52; word f53; word f54; word f55; word f56; word f57; word f58; word f59; word f60; word f61; word f62; word f63; word f64; word f65; word f66; word f67; word f68; word f69; word f70; word f71; word f72; word f73; word f74; word f75; word f76; 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; word f95; word f96; word f97; word f98; word f99[15]; } globalframe = { {0}, (word) XMapKeyCode_P1980, 0, (word) XMapRange_P1920, 0, (word) XMapCount_P1860, 0, (word) GetPointerMapping_P1800, 0, (word) GetModifierMapping_P1740, 0, (word) MakeKeyTable_P1680, 0, (word) GetKeyboardMapping_P1620, 0, (word) QueryKeymap_P1560, 0, (word) ComputeTextExtents16_P1500, 0, (word) ComputeTextExtents_P1440, 0, (word) DoExtent_P1380, 0, (word) CharExtent_P1320, 0, (word) QueryTextExtents16_P1260, 0, (word) QueryTextExtents_P1200, 0, (word) QueryTextExtents16OnServer_P1080, 0, (word) ReadRopeOfKnownLength_P1020, 0, (word) ReadFontReply_P960, 0, (word) ListFontsWithInfo_P900, 0, (word) InternalReportOneFont_P840, 0, (word) QueryFontID_P780, 0, (word) QueryFont_P720, 0, (word) IntERead16_P660, 0, (word) GetFontPath_P600, 0, (word) ListFonts_P540, 0, (word) PreventGcOnServer_P480, 0, (word) OpenFontId_P420, 0, (word) OpenFont_P360, 0, (word) FinalizeFont_P300, 0, (word) GetFontStuff_P240, 0, (word) NarrowFont_P180, 0, (word) IsFont_P120, 0, (word) FontId_P60, 0, (word) XlImplTexts_P0, {0} }; static void NoName_Q5556() { register ptr gf_c0405 = (ptr) &globalframe; word var_c41068; (* (( (ptr) gf_c0405)+5) ) = (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2); (* (( (ptr) gf_c0405)+6) ) = (word) XR_GetTypeIndex((word) &string3, 0, (word) &string4); (* (( (ptr) gf_c0405)+7) ) = (word) XR_GetTypeIndex((word) &string5, 0, (word) &string6); (* (( (ptr) gf_c0405)+8) ) = (word) XR_GetTypeIndexS((word) (&string7)); (* (( (ptr) gf_c0405)+9) ) = (word) XR_GetTypeIndexS((word) (&string8)); (* (( (ptr) gf_c0405)+10) ) = (word) XR_GetTypeIndex((word) &string9, 0, (word) &string10); (* (( (ptr) gf_c0405)+11) ) = (word) XR_GetTypeIndex((word) &string11, 0, (word) &string12); (* (( (ptr) gf_c0405)+17) ) = (word) XR_GetTypeIndex((word) &string13, 0, (word) &string4); (* (( (ptr) gf_c0405)+18) ) = (word) XR_GetTypeIndex((word) &string14, 0, (word) &string15); (* (( (ptr) gf_c0405)+19) ) = (word) XR_GetTypeIndex((word) &string16, 0, (word) &string4); (* (( (ptr) gf_c0405)+20) ) = (word) XR_GetTypeIndex((word) &string17, 0, (word) &string12); (* (( (ptr) gf_c0405)+21) ) = (word) XR_GetTypeIndexS((word) (&string18)); (* (( (ptr) gf_c0405)+23) ) = (word) XR_GetTypeIndex((word) &string19, 0, (word) &string20); (* (( (ptr) gf_c0405)+24) ) = (word) XR_GetTypeIndexS((word) (&string21)); (* (( (ptr) gf_c0405)+25) ) = (word) XR_GetTypeIndexS((word) (&string22)); (* (( (ptr) gf_c0405)+26) ) = (word) XR_GetTypeIndexS((word) (&string23)); (* (( (ptr) gf_c0405)+27) ) = (word) XR_GetTypeIndexS((word) (&string24)); (* (( (ptr) gf_c0405)+28) ) = (word) XR_GetTypeIndex((word) &string25, 0, (word) &string26); (* (ptr) (( (bPt) gf_c0405)+116) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0405)+20) ), (word) &string27); (* (ptr) (( (bPt) gf_c0405)+120) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0405)+20) ), (word) &string28); (* (ptr) (( (bPt) gf_c0405)+124) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0405)+20) ), (word) &string29); (* (ptr) (( (bPt) gf_c0405)+128) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0405)+11) ), (word) &string30); (void) XR_DeclareGlobalFrame((word) "XlImplTexts", &globalframe, (word) XR_GetTypeIndex((word) &string31, 0, (word) &string32) , (word) (( (bPt) gf_c0405)+392)/* var_c37196 */ ); var_c41068 = (word) XR_ImportInterface((word) "Finalize", (word) XR_GetTypeIndexS((word) (&string33)), 14); (* (( (ptr) gf_c0405)+102)/* var_c37580 */ ) = var_c41068; (void) XR_ImportProcS(var_c41068, 67372801); (void) XR_ImportProcS(var_c41068, 67373057); var_c41068 = (word) XR_ImportInterface((word) "FinalizeOps", (word) XR_GetTypeIndexS((word) (&string34)), 7); (* (( (ptr) gf_c0405)+101)/* var_c37388 */ ) = var_c41068; (void) XR_ImportProcS(var_c41068, 67634178); (void) XR_ImportProcS(var_c41068, 67634690); var_c41068 = (word) XR_ImportInterface((word) "KeyMapping", (word) XR_GetTypeIndexS((word) (&string35)), 6); (* (( (ptr) gf_c0405)+111)/* var_c40172 */ ) = var_c41068; (void) XR_ImportProcS(var_c41068, 67634434); var_c41068 = (word) XR_ImportInterface((word) "Rope", (word) XR_GetTypeIndexS((word) (&string36)), 43); (* (( (ptr) gf_c0405)+106)/* var_c37740 */ ) = var_c41068; (void) XR_ImportProcS(var_c41068, 68163076); (void) XR_ImportProcS(var_c41068, 67373569); (void) XR_ImportProcS(var_c41068, 67896323); var_c41068 = (word) XR_ImportInterface((word) "SymTab", (word) XR_GetTypeIndexS((word) (&string37)), 13); (* (( (ptr) gf_c0405)+100)/* var_c37324 */ ) = var_c41068; (void) XR_ImportProcS(var_c41068, 67896835); (void) XR_ImportProcS(var_c41068, 134742786); (void) XR_ImportProcS(var_c41068, 789251); (void) XR_ImportProcS(var_c41068, 67633410); var_c41068 = (word) XR_ImportInterface((word) &string38, (word) XR_GetTypeIndexS((word) (&string39)), 218); (* (( (ptr) gf_c0405)+107)/* var_c38284 */ ) = var_c41068; (void) XR_ImportProcS(var_c41068, 67405825); (void) XR_ImportProcS(var_c41068, 67405569); var_c41068 = (word) XR_ImportInterface((word) "XlDetails", (word) XR_GetTypeIndexS((word) (&string40)), 4); (* (( (ptr) gf_c0405)+104)/* var_c37676 */ ) = var_c41068; var_c41068 = (word) XR_ImportInterface((word) "XlGContextOps", (word) XR_GetTypeIndexS((word) (&string41)), 8); (* (( (ptr) gf_c0405)+108)/* var_c38348 */ ) = var_c41068; (void) XR_ImportProcS(var_c41068, 67633154); var_c41068 = (word) XR_ImportInterface((word) "XlPrivate", (word) XR_GetTypeIndexS((word) (&string42)), 77); (* (( (ptr) gf_c0405)+105)/* var_c37708 */ ) = var_c41068; (void) XR_ImportProcS(var_c41068, 528130); (void) XR_ImportProcS(var_c41068, 67909891); (void) XR_ImportProcS(var_c41068, 67389697); (void) XR_ImportProcS(var_c41068, 67390209); (void) XR_ImportProcS(var_c41068, 801539); (void) XR_ImportProcS(var_c41068, 67385857); (void) XR_ImportProcS(var_c41068, 540418); (void) XR_ImportProcS(var_c41068, 67390465); (void) XR_ImportProcS(var_c41068, 67389953); (void) XR_ImportProcS(var_c41068, 278529); (void) XR_ImportProcS(var_c41068, 1057028); (void) XR_ImportProcS(var_c41068, 528386); (void) XR_ImportProcS(var_c41068, 539650); (void) XR_ImportProcS(var_c41068, 528642); (void) XR_ImportProcS(var_c41068, 1051908); (void) XR_ImportProcS(var_c41068, 786947); var_c41068 = (word) XR_ImportInterface((word) "XlPrivateErrorHandling", (word) XR_GetTypeIndexS((word) (&string43)), 10); (* (( (ptr) gf_c0405)+109)/* var_c38540 */ ) = var_c41068; (void) XR_ImportProcS(var_c41068, 526082); var_c41068 = (word) XR_ImportInterface((word) "XlPrivateResources", (word) XR_GetTypeIndexS((word) (&string44)), 9); (* (( (ptr) gf_c0405)+103)/* var_c37644 */ ) = var_c41068; (void) XR_ImportProcS(var_c41068, 67371521); (void) XR_ImportProcS(var_c41068, 525058); (void) XR_ImportProcS(var_c41068, 67634434); var_c41068 = (word) XR_ImportInterface((word) "XlService", (word) XR_GetTypeIndexS((word) (&string45)), 6); (* (( (ptr) gf_c0405)+110)/* var_c40012 */ ) = var_c41068; (void) XR_ImportProcS(var_c41068, 787203); (void) XR_ImportProcS(var_c41068, 67634178); var_c41068 = (word) XR_ExportInterface((word) &string38, (word) XR_GetTypeIndexS((word) (&string39)), 218); (* (( (ptr) gf_c0405)+112)/* var_c41100 */ ) = var_c41068; (void) XR_ExportProcS(var_c41068, (word) (( (bPt) gf_c0405)+384)/* var_c37164 */ , 67371777, (word) "FontId"); (void) XR_ExportProcS(var_c41068, (word) (( (bPt) gf_c0405)+376)/* var_c37132 */ , 67395073, (word) "IsFont"); (void) XR_ExportProcS(var_c41068, (word) (( (bPt) gf_c0405)+368)/* var_c37100 */ , 67395329, (word) "NarrowFont"); (void) XR_ExportProcS(var_c41068, (word) (( (bPt) gf_c0405)+344)/* var_c37004 */ , 67919875, (word) "OpenFont"); (void) XR_ExportProcS(var_c41068, (word) (( (bPt) gf_c0405)+328)/* var_c36940 */ , 286977, (word) "PreventGcOnServer"); (void) XR_ExportProcS(var_c41068, (word) (( (bPt) gf_c0405)+312)/* var_c36876 */ , 67396097, (word) "GetFontPath"); (void) XR_ExportProcS(var_c41068, (word) (( (bPt) gf_c0405)+296)/* var_c36812 */ , 67658498, (word) "QueryFont"); (void) XR_ExportProcS(var_c41068, (word) (( (bPt) gf_c0405)+240)/* var_c36588 */ , 537682947, (word) "QueryTextExtents"); (void) XR_ExportProcS(var_c41068, (word) (( (bPt) gf_c0405)+232)/* var_c36556 */ , 537683203, (word) "QueryTextExtents16") ; (void) XR_ExportProcS(var_c41068, (word) (( (bPt) gf_c0405)+320)/* var_c36908 */ , 1336837, (word) "ListFonts"); (void) XR_ExportProcS(var_c41068, (word) (( (bPt) gf_c0405)+272)/* var_c36716 */ , 68445957, (word) "ListFontsWithInfo"); (void) XR_ExportProcS(var_c41068, (word) (( (bPt) gf_c0405)+160)/* var_c36268 */ , 67397633, (word) "GetPointerMapping"); (void) XR_ExportProcS(var_c41068, (word) (( (bPt) gf_c0405)+184)/* var_c36364 */ , 67401729, (word) "GetKeyboardMapping") ; (void) XR_ExportProcS(var_c41068, (word) (( (bPt) gf_c0405)+168)/* var_c36300 */ , 67401985, (word) "GetModifierMapping") ; (void) XR_ExportProcS(var_c41068, (word) (( (bPt) gf_c0405)+192)/* var_c36396 */ , 67664386, (word) "QueryKeymap"); (void) XR_ExportType((word) "ConnectionPrivate", (word) XR_GetTypeIndexS((word) (&string46)), (word) XR_GetTypeIndex((word) &string47, 0, (word) &string48) ); (void) XR_ExportType((word) "FontRep", (word) XR_GetTypeIndexS((word) (&string49)), (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2) ); var_c41068 = (word) XR_ExportInterface((word) "XlPrivateTypes", (word) XR_GetTypeIndexS((word) (&string50)), 7); (* (( (ptr) gf_c0405)+113)/* var_c41132 */ ) = var_c41068; (void) XR_ExportType((word) "KMappingCacheRep", (word) XR_GetTypeIndexS((word) (&string51)), (word) XR_GetTypeIndex((word) &string5, 0, (word) &string6) ); (void) XR_ExportType((word) "PMappingCacheRep", (word) XR_GetTypeIndexS((word) (&string52)), (word) XR_GetTypeIndexS((word) (&string8)) ); (void) XR_ExportType((word) "MMappingCacheRep", (word) XR_GetTypeIndexS((word) (&string53)), (word) XR_GetTypeIndexS((word) (&string7)) ); (void) XR_ExportType((word) "FontPrivate", (word) XR_GetTypeIndexS((word) (&string54)), (word) XR_GetTypeIndex((word) &string3, 0, (word) &string4) ); } static void XlImplTexts_P0(formal_c054, formal_c053) word formal_c054; word formal_c053; { /* XlImplTexts: */ } static word FontId_P60(f_v4736) word f_v4736; { word var_c4780; /* FontId: */ SOURCE(959, 69) SOURCE(1006, 22) return((* (ptr) f_v4736 )); } static word IsFont_P120(x_v4840) word x_v4840; { register ptr gf_c41164 = (ptr) &globalframe; word var_c4900; /* IsFont: */ SOURCE(1032, 84) SOURCE(1084, 32) { word tc55; if ((x_v4840 == 0)) { tc55 = (word) (unsigned) 1; } else { tc55 = (word) (unsigned) ((* (( (ptr) gf_c41164)+5) ) == XR_GetReferentType(x_v4840)); }; return(tc55); }; } static word NarrowFont_P180(x_v4960) word x_v4960; { register ptr gf_c41196 = (ptr) &globalframe; word var_c5016; /* NarrowFont: */ SOURCE(1120, 88) SOURCE(1176, 32) return(XR_Narrow(x_v4960, (* (( (ptr) gf_c41196)+5) ))); } static word GetFontStuff_P240(c_v5076) word c_v5076; { W7 var_c41228; /* declaration of fp_v5120 skipped */ /* declaration of var_c37260 skipped */ /* GetFontStuff: */ SOURCE(1212, 522) { word tmpAddr56; tmpAddr56 = (word) (( (ptr) &var_c41228)+5)/* var_c37260 */ ; (* (ptr) tmpAddr56 ) = ( ((word) (fPt) InitFontTable_P2040) ); (* (( (ptr) tmpAddr56) + 1) ) = 1; }; SOURCE(1212, 522) var_c41228.f4/* fp_v5120 */ = 0; SOURCE(1569, 165) if ( ( (c_v5076 != 0) ? (0 != (* (( (ptr) c_v5076)+15) )) : 0 ) ) { SOURCE(1589, 150) { word cPriv_v9668; SOURCE(1591, 45) cPriv_v9668 = (* (( (ptr) c_v5076)+24) ); SOURCE(1638, 96) if ((cPriv_v9668 != 0)) { SOURCE(1658, 20) var_c41228.f4/* fp_v5120 */ = (* (( (ptr) cPriv_v9668)+78) ); SOURCE(1680, 54) if ((var_c41228.f4/* fp_v5120 */ == 0)) { SOURCE(1696, 16) (void) InitFontTable_P2040(c_v5076, (word) (( (bPt) &var_c41228)+20)/* var_c37260 */ ); SOURCE(1714, 20) var_c41228.f4/* fp_v5120 */ = (* (( (ptr) cPriv_v9668)+78) ); }; }; }; }; SOURCE(1212, 522) return(var_c41228.f4/* fp_v5120 */ ); } static void InitFontTable_P2040(c_v9640, formal_c41292) word c_v9640; word formal_c41292; { register ptr gf_c41260 = (ptr) &globalframe; word cPriv_v9724; formal_c41292 = (formal_c41292 - 20); /* InitFontTable: */ SOURCE(1281, 280) (void) (XR_MonitorEntry(c_v9640)); SOURCE(1327, 45) cPriv_v9724 = (* (( (ptr) c_v9640)+24) ); SOURCE(1374, 187) if ( ( (cPriv_v9724 != 0) ? ((* (( (ptr) cPriv_v9724)+78) ) == 0) : 0 ) ) { SOURCE(1418, 121) { word var_c37292; word var_c37356; word var_c37420; { word pd57; pd57 = (* (( (ptr) (* (( (ptr) gf_c41260)+100)/* var_c37324 */ ))+5) ); var_c37292 = (word) ( *( (fPt) ((* (ptr) pd57 ))))(17, 0, pd57); }; { word pd58; pd58 = (* (( (ptr) (* (( (ptr) gf_c41260)+101)/* var_c37388 */ ))+10) ); var_c37356 = (word) ( *( (fPt) ((* (ptr) pd58 ))))((word) (( (bPt) gf_c41260)+352)/* var_c37036 */ , 3, pd58); }; var_c37420 = XR_NewObject(8, (* (( (ptr) gf_c41260)+6) )); (* (ptr) var_c37420 ) = var_c37292; (* (( (ptr) var_c37420)+1) ) = var_c37356; (* (( (ptr) formal_c41292)+4) ) = var_c37420; }; SOURCE(1541, 20) (* (( (ptr) cPriv_v9724)+78) ) = (* (( (ptr) formal_c41292)+4) ); }; SOURCE(1281, 280) (void) (XR_MonitorExit(c_v9640)); return; } static void FinalizeFont_P300(handle_v21832, object_v21860) word handle_v21832; word object_v21860; { W9 var_c41324; register ptr gf_c41356 = (ptr) &globalframe; /* declaration of var_c37452 skipped */ /* declaration of var_c37484 skipped */ /* declaration of f_v9836 skipped */ /* FinalizeFont: */ SOURCE(1747, 1161) { word tmpAddr59; tmpAddr59 = (word) (( (ptr) &var_c41324)+4)/* var_c37452 */ ; (* (ptr) tmpAddr59 ) = ( ((word) (fPt) FreeFont_P2208) ); (* (( (ptr) tmpAddr59) + 1) ) = 1; }; { word tmpAddr60; tmpAddr60 = (word) (( (ptr) &var_c41324)+6)/* var_c37484 */ ; (* (ptr) tmpAddr60 ) = ( ((word) (fPt) RemoveFontFromFontCache_P2148) ); (* (( (ptr) tmpAddr60) + 1) ) = 1; }; SOURCE(2855, 31) (* (( (ptr) &var_c41324)+8)/* f_v9836 */ ) = XR_Narrow(object_v21860, (* (( (ptr) gf_c41356)+5) )); SOURCE(2888, 20) SOURCE(2888, 20) { word var_c01; { word var_c0464; var_c0464 = (word) &var_c41324; var_c01 = (word) XR_Enable(( ((word) (fPt) NoName_Q5616) ), ( ((word) (fPt) NoName_Q5676) ), var_c0464); }; /* removed trivial cond node */ }; } static word NoName_Q5616(formal_c0411) word formal_c0411; { SOURCE(2888, 20) (void) FreeFont_P2208((* (( (ptr) formal_c0411)+8) ), (word) (( (bPt) formal_c0411)+16)); return(0); } static void RemoveFontFromFontCache_P2148(formal_c0501, formal_c41452) word formal_c0501; word formal_c41452; { W7 var_c41388; /* declaration of font_v9912 skipped */ register ptr gf_c41420 = (ptr) &globalframe; /* declaration of var_c37516 skipped */ word owner_v10012; formal_c41452 = (formal_c41452 - 24); var_c41388.f4/* font_v9912 */ = formal_c0501; var_c41388.f0 = formal_c41452; /* RemoveFontFromFontCache: */ SOURCE(1789, 490) { word tmpAddr61; tmpAddr61 = (word) (( (ptr) &var_c41388)+5)/* var_c37516 */ ; (* (ptr) tmpAddr61 ) = ( ((word) (fPt) UpdateTable_P2412) ); (* (( (ptr) tmpAddr61) + 1) ) = 1; }; SOURCE(1839, 34) owner_v10012 = (* (( (ptr) var_c41388.f4/* font_v9912 */ )+3) ); SOURCE(1875, 404) if ( ( (owner_v10012 != 0) ? (0 == (* (( (ptr) var_c41388.f4/* font_v9912 */ )+1) )) : 0 ) ) { SOURCE(1918, 361) { word var_c37548; var_c37548 = (* (( (ptr) var_c41388.f4/* font_v9912 */ )+4) ); if ((var_c37548 == 0)) { goto lab_L100004; }; { word tc62; if (((* (( (ptr) gf_c41420)+10) ) == XR_GetReferentType(var_c37548))) { tc62 = (word) ( (unsigned) (*(int*)var_c37548<0) == 0); } else { tc62 = (word) 0; }; if (tc62) { { word name_v10068; name_v10068 = var_c37548; SOURCE(1968, 316) { word c_v10112; word fp_v10140; SOURCE(1970, 22) c_v10112 = (* (ptr) owner_v10012 ); SOURCE(1994, 37) fp_v10140 = (word) GetFontStuff_P240(c_v10112); SOURCE(2033, 246) if ((fp_v10140 != 0)) { SOURCE(2048, 233) SOURCE(2237, 42) { word pd63; pd63 = (* (( (ptr) (* (( (ptr) gf_c41420)+100)/* var_c37324 */ ))+15) ); (void) ( *( (fPt) ((* (ptr) pd63 ))))((* (ptr) fp_v10140 ), name_v10068, (word) (( (bPt) &var_c41388)+20)/* var_c37516 */ , pd63) ; }; }; }; }; } else { lab_L100004: ; }; }; }; }; } static void UpdateTable_P2412(formal_c087, found_v23188, val_v23216, formal_c41516) word formal_c087; word found_v23188; word val_v23216; word formal_c41516; { register ptr gf_c41484 = (ptr) &globalframe; word op_v23260; word new_v23288; word handle_v10240 = 0; formal_c41516 = (formal_c41516 - 20); /* UpdateTable: */ SOURCE(2050, 36) SOURCE(2050, 36) op_v23260 = 0; SOURCE(2050, 36) new_v23288 = 0; SOURCE(2121, 23) SOURCE(2122, 22) handle_v10240 = val_v23216; SOURCE(2147, 87) { word pd65; if ((handle_v10240 == 0)) { goto then064;}; pd65 = (* (( (ptr) (* (( (ptr) gf_c41484)+102)/* var_c37580 */ ))+12) ); if (((word) ( *( (fPt) ((* (ptr) pd65 ))))(handle_v10240, pd65) == (* (( (ptr) formal_c41516)+4) ))) { then064: ; SOURCE(2207, 17) op_v23260 = 2; } else { SOURCE(2224, 10) op_v23260 = 0; }; }; /* removed tail goto */ (* (ptr) formal_c087 ) = op_v23260; (* (( (ptr) formal_c087)+1) ) = new_v23288; return; } static void FreeFont_P2208(font_v9972, formal_c41612) word font_v9972; word formal_c41612; { W7 var_c41548; register ptr gf_c41580 = (ptr) &globalframe; /* declaration of var_c37612 skipped */ /* declaration of id_v10312 skipped */ formal_c41612 = (formal_c41612 - 16); var_c41548.f0 = formal_c41612; /* FreeFont: */ SOURCE(2308, 533) { word tmpAddr66; tmpAddr66 = (word) (( (ptr) &var_c41548)+4)/* var_c37612 */ ; (* (ptr) tmpAddr66 ) = ( ((word) (fPt) action_P2472) ); (* (( (ptr) tmpAddr66) + 1) ) = 1; }; SOURCE(2524, 317) if ((font_v9972 != 0)) { SOURCE(2541, 308) { word owner_v10416; SOURCE(2543, 34) owner_v10416 = (* (( (ptr) font_v9972)+3) ); SOURCE(2579, 56) if ((0 == (* (( (ptr) font_v9972)+1) ))) { SOURCE(2606, 29) (void) RemoveFontFromFontCache_P2148(font_v9972, (word) (( (bPt) formal_c41612)+24)); }; SOURCE(2637, 204) if ((owner_v10416 != 0)) { SOURCE(2655, 191) { word c_v10472; SOURCE(2657, 22) c_v10472 = (* (ptr) owner_v10416 ); SOURCE(2681, 20) var_c41548.f6/* id_v10312 */ = (* (ptr) font_v9972 ); SOURCE(2703, 138) { word tc67; word pd68; if ( ( ( (0 == (* (( (ptr) font_v9972)+1) )) ? (var_c41548.f6/* id_v10312 */ != 0) : 0 ) ? ( (c_v10472 != 0) ? (0 != (* ( ( (ptr) c_v10472)+15) )) : 0 ) : 0 ) ) { pd68 = (* (( (ptr) (* (( (ptr) gf_c41580)+103)/* var_c37644 */ ))+9) ); tc67 = (word) (0 != (word) ( *( (fPt) ((* (ptr) pd68 ))))(c_v10472, var_c41548.f6/* id_v10312 */ , pd68)); } else { tc67 = (word) 0; }; if (tc67) { SOURCE(2795, 46) { word pd69; pd69 = (* (( (ptr) (* (( (ptr) gf_c41580)+105)/* var_c37708 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd69 ))))(c_v10472, (word) (( (bPt) &var_c41548)+16)/* var_c37612 */ , (* (ptr) (* (( (ptr) (* ( /*1*/ ( (ptr) gf_c41580)+104)/* var_c37676 */ ))+5) ) ), pd69); }; }; }; }; }; }; }; } static void action_P2472(c_v10388, formal_c41676) word c_v10388; word formal_c41676; { register ptr gf_c41644 = (ptr) &globalframe; formal_c41676 = (formal_c41676 - 16); /* action: */ SOURCE(2343, 168) SOURCE(2376, 28) { word pd70; pd70 = (* (( (ptr) (* (( (ptr) gf_c41644)+105)/* var_c37708 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd70 ))))(c_v10388, 46, 0, 2, pd70); }; SOURCE(2406, 23) { word pd71; pd71 = (* (( (ptr) (* (( (ptr) gf_c41644)+105)/* var_c37708 */ ))+21) ); (void) ( *( (fPt) ((* (ptr) pd71 ))))(c_v10388, (* (( (ptr) formal_c41676)+6) ), pd71); }; SOURCE(2431, 30) { word pd72; pd72 = (* (( (ptr) (* (( (ptr) gf_c41644)+105)/* var_c37708 */ ))+64) ); (void) ( *( (fPt) ((* (ptr) pd72 ))))(c_v10388, 0, pd72); }; SOURCE(2463, 48) { word pd73; pd73 = (* (( (ptr) (* (( (ptr) gf_c41644)+103)/* var_c37644 */ ))+7) ); (void) ( *( (fPt) ((* (ptr) pd73 ))))(c_v10388, (* (( (ptr) formal_c41676)+6) ), pd73); }; } static word OpenFont_P360(c_v5192, name_v5220, details_v5248) word c_v5192; word name_v5220; word details_v5248; { register ptr gf_c41708 = (ptr) &globalframe; word font_v5292; word handle_v10516 = 0; /* OpenFont: */ SOURCE(2923, 770) SOURCE(2923, 770) font_v5292 = 0; SOURCE(3054, 64) { word tc74; word pd75; if ((c_v5192 == 0)) { pd75 = (* (( (ptr) (* (( (ptr) gf_c41708)+106)/* var_c37740 */ ))+8) ); tc74 = (word) (0 != (word) ( *( (fPt) ((* (ptr) pd75 ))))(name_v5220, (* (( (ptr) gf_c41708)+32) ), 1, pd75)); } else { tc74 = (word) 0; }; if (tc74) { SOURCE(3097, 21) return(XR_NewObject(20, (* (( (ptr) gf_c41708)+5) ))); }; }; SOURCE(3120, 578) { word cPriv_v10560; word fp_v10588; SOURCE(3126, 45) cPriv_v10560 = (* (( (ptr) c_v5192)+24) ); SOURCE(3173, 37) fp_v10588 = (word) GetFontStuff_P240(c_v5192); SOURCE(3212, 224) if ((fp_v10588 != 0)) { SOURCE(3227, 214) { word val_v10656; W2 var_c0102; SOURCE(3229, 43) { word pd76; pd76 = (* (( (ptr) (* (( (ptr) gf_c41708)+100)/* var_c37324 */ ))+7) ); (void) ( *( (fPt) ((* (ptr) pd76 ))))((word) &var_c0102, (* (ptr) fp_v10588 ), name_v5220, pd76); }; val_v10656 = var_c0102.f1; SOURCE(3274, 162) if ((val_v10656 != 0)) { SOURCE(3300, 23) SOURCE(3301, 22) handle_v10516 = val_v10656; SOURCE(3326, 48) { word pd77; pd77 = (* (( (ptr) (* (( (ptr) gf_c41708)+102)/* var_c37580 */ ))+12) ); font_v5292 = XR_Narrow((word) ( *( (fPt) ((* (ptr) pd77 ))))(handle_v10516, pd77), (* (( (ptr) gf_c41708)+5) )); }; SOURCE(3376, 60) { word pd78; pd78 = (* (( (ptr) (* (( (ptr) gf_c41708)+102)/* var_c37580 */ ))+11) ); if (((word) ( *( (fPt) ((* (ptr) pd78 ))))(handle_v10516, pd78) == 0)) { SOURCE(3430, 6) return(font_v5292); }; }; }; }; }; SOURCE(3444, 19) font_v5292 = XR_NewObject(20, (* (( (ptr) gf_c41708)+5) )); SOURCE(3465, 29) (* (( (ptr) font_v5292)+3) ) = (* (ptr) cPriv_v10560 ); SOURCE(3496, 46) (* (ptr) font_v5292 ) = (word) OpenFontId_P420(c_v5192, name_v5220, details_v5248); SOURCE(3544, 20) (* (( (ptr) font_v5292)+4) ) = name_v5220; SOURCE(3566, 127) if ((fp_v10588 != 0)) { SOURCE(3583, 67) { word pd79; pd79 = (* (( (ptr) (* (( (ptr) gf_c41708)+101)/* var_c37388 */ ))+8) ); handle_v10516 = (word) ( *( (fPt) ((* (ptr) pd79 ))))(font_v5292, (* (( (ptr) fp_v10588)+1) ), pd79); }; SOURCE(3652, 41) { word var_c37868; word pd80; pd80 = (* (( (ptr) (* (( (ptr) gf_c41708)+100)/* var_c37324 */ ))+10) ); var_c37868 = (word) ( *( (fPt) ((* (ptr) pd80 ))))((* (ptr) fp_v10588 ), name_v5220, handle_v10516, pd80); }; }; }; SOURCE(2923, 770) return(font_v5292); } static word OpenFontId_P420(c_v5364, formal_c0502, formal_c0503) word c_v5364; word formal_c0502; word formal_c0503; { W10 var_c41740; /* declaration of name_v5392 skipped */ /* declaration of details_v5420 skipped */ register ptr gf_c41772 = (ptr) &globalframe; /* declaration of font_v5464 skipped */ /* declaration of var_c37900 skipped */ /* declaration of n_v10712 skipped */ (* (( (ptr) &var_c41740)+4)/* name_v5392 */ ) = formal_c0502; (* (( (ptr) &var_c41740)+5)/* details_v5420 */ ) = formal_c0503; /* OpenFontId: */ SOURCE(3708, 464) { word tmpAddr81; tmpAddr81 = (word) (( (ptr) &var_c41740)+7)/* var_c37900 */ ; (* (ptr) tmpAddr81 ) = ( ((word) (fPt) action_P2724) ); (* (( (ptr) tmpAddr81) + 1) ) = 1; }; SOURCE(3708, 464) (* (( (ptr) &var_c41740)+6)/* font_v5464 */ ) = 0; SOURCE(3808, 26) { word pd82; pd82 = (* (( (ptr) (* (( (ptr) gf_c41772)+106)/* var_c37740 */ ))+14) ); (* (( (ptr) &var_c41740)+9)/* n_v10712 */ ) = (word) ( *( (fPt) ((* (ptr) pd82 ))))((* ((( (ptr) &var_c41740)+4)/* name_v5392 */ ) ), pd82) ; }; SOURCE(4086, 53) if (( (int)(* (( (ptr) &var_c41740)+9)/* n_v10712 */ ) >= (int)(* (( (ptr) (* (( (ptr) c_v5364)+16) ))+7) ))) { SOURCE(4126, 13) (void) XR_RaiseError((word) (( (bPt) gf_c41772)+132)/* var_c36140 */ , 0); }; SOURCE(4141, 31) { word pd83; pd83 = (* (( (ptr) (* (( (ptr) gf_c41772)+105)/* var_c37708 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd83 ))))(c_v5364, (word) (( (bPt) &var_c41740)+28)/* var_c37900 */ , (* (( (ptr) &var_c41740)+5) /* details_v5420 */ ), pd83); }; SOURCE(3708, 464) return((* (( (ptr) &var_c41740)+6)/* font_v5464 */ )); } static void action_P2724(c_v10816, formal_c41836) word c_v10816; word formal_c41836; { register ptr gf_c41804 = (ptr) &globalframe; formal_c41836 = (formal_c41836 - 28); /* action: */ SOURCE(3836, 245) SOURCE(3869, 42) { word pd84; pd84 = (* (( (ptr) (* (( (ptr) gf_c41804)+103)/* var_c37644 */ ))+6) ); (* (( (ptr) formal_c41836)+6) ) = (word) ( *( (fPt) ((* (ptr) pd84 ))))(c_v10816, pd84); }; SOURCE(3913, 26) { word pd85; pd85 = (* (( (ptr) (* (( (ptr) gf_c41804)+105)/* var_c37708 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd85 ))))(c_v10816, 45, 0, (IOP2( / , (int)((* (( (ptr) formal_c41836)+9) ) + 3), (int)4) + 3), pd85); }; SOURCE(3941, 15) { word pd86; pd86 = (* (( (ptr) (* (( (ptr) gf_c41804)+105)/* var_c37708 */ ))+21) ); (void) ( *( (fPt) ((* (ptr) pd86 ))))(c_v10816, (* (( (ptr) formal_c41836)+6) ), pd86); }; SOURCE(3981, 12) { word pd87; word idx88; pd87 = (* (( (ptr) (* (( (ptr) gf_c41804)+105)/* var_c37708 */ ))+20) ); (void) ( *( (fPt) ((* (ptr) pd87 ))))(c_v10816, ( idx88 = (* (( (ptr) formal_c41836)+9) ), BCK(idx88, 65536) ), pd87); }; SOURCE(4013, 11) (* (( (ptr) c_v10816)+4) ) = ((* (( (ptr) c_v10816)+4) ) + 2); SOURCE(4027, 23) { word pd89; pd89 = (* (( (ptr) (* (( (ptr) gf_c41804)+105)/* var_c37708 */ ))+37) ); (void) ( *( (fPt) ((* (ptr) pd89 ))))(c_v10816, (* (( (ptr) formal_c41836)+4) ), 0, 2147483647, pd89); }; SOURCE(4052, 29) { word pd90; pd90 = (* (( (ptr) (* (( (ptr) gf_c41804)+105)/* var_c37708 */ ))+64) ); (void) ( *( (fPt) ((* (ptr) pd90 ))))(c_v10816, (* (( (ptr) formal_c41836)+5) ), pd90); }; } static void PreventGcOnServer_P480(font_v5524) word font_v5524; { /* PreventGcOnServer: */ SOURCE(4178, 72) SOURCE(4226, 24) (* (( (ptr) font_v5524)+1) ) = 1; } static void ListFonts_P540(c_v5584, each_v5612, formal_c0504, formal_c0505, data_v5696) word c_v5584; word each_v5612; word formal_c0504; word formal_c0505; word data_v5696; { W10 var_c41868; /* declaration of pattern_v5640 skipped */ /* declaration of maxNames_v5668 skipped */ register ptr gf_c41900 = (ptr) &globalframe; /* declaration of var_c37932 skipped */ /* declaration of reply_v10844 skipped */ word nSTR_v10872; /* declaration of n_v10928 skipped */ (* (( (ptr) &var_c41868)+4)/* pattern_v5640 */ ) = formal_c0504; (* (( (ptr) &var_c41868)+5)/* maxNames_v5668 */ ) = formal_c0505; /* ListFonts: */ SOURCE(4256, 622) { word tmpAddr91; tmpAddr91 = (word) (( (ptr) &var_c41868)+6)/* var_c37932 */ ; (* (ptr) tmpAddr91 ) = ( ((word) (fPt) action_P2784) ); (* (( (ptr) tmpAddr91) + 1) ) = 1; }; SOURCE(4362, 12) (* (( (ptr) &var_c41868)+8)/* reply_v10844 */ ) = 0; SOURCE(4545, 32) { word pd92; word idx93; pd92 = (* (( (ptr) (* (( (ptr) gf_c41900)+106)/* var_c37740 */ ))+14) ); (* (( (ptr) &var_c41868)+9)/* n_v10928 */ ) = ( idx93 = (word) ( *( (fPt) ((* (ptr) pd92 ))))((* ((( (ptr) &var_c41868)+4)/* pattern_v5640 */ ) ), pd92), BCK(idx93, 65536) ); }; SOURCE(4579, 53) if (( (int)(* (( (ptr) &var_c41868)+9)/* n_v10928 */ ) >= (int)(* (( (ptr) (* (( (ptr) c_v5584)+16) ))+7) ))) { SOURCE(4619, 13) (void) XR_RaiseError((word) (( (bPt) gf_c41900)+132)/* var_c36140 */ , 0); }; SOURCE(4634, 27) { word pd94; pd94 = (* (( (ptr) (* (( (ptr) gf_c41900)+105)/* var_c37708 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd94 ))))(c_v5584, (word) (( (bPt) &var_c41868)+24)/* var_c37932 */ , 0, pd94); }; SOURCE(4663, 17) { word pd95; pd95 = (* (( (ptr) (* (( (ptr) gf_c41900)+105)/* var_c37708 */ ))+68) ); (void) ( *( (fPt) ((* (ptr) pd95 ))))((* ((( (ptr) &var_c41868)+8)/* reply_v10844 */ ) ), pd95); }; SOURCE(4682, 14) (* (( (ptr) (* (( (ptr) &var_c41868)+8)/* reply_v10844 */ ))+10) ) = ((* (( (ptr) (* (( (ptr) &var_c41868)+8)/* reply_v10844 */ ))+10) ) + 7); SOURCE(4698, 21) { word pd96; pd96 = (* (( (ptr) (* (( (ptr) gf_c41900)+105)/* var_c37708 */ ))+78) ); nSTR_v10872 = (word) ( *( (fPt) ((* (ptr) pd96 ))))((* ((( (ptr) &var_c41868)+8)/* reply_v10844 */ ) ), pd96); }; SOURCE(4721, 15) (* (( (ptr) (* (( (ptr) &var_c41868)+8)/* reply_v10844 */ ))+10) ) = ((* (( (ptr) (* (( (ptr) &var_c41868)+8)/* reply_v10844 */ ))+10) ) + 22); SOURCE(4738, 103) { register word i_v11032 = 0; register word noName_c37964; noName_c37964 = nSTR_v10872; if ((i_v11032 >= noName_c37964)) { goto lab_L100006; }; lab_L100009: ; { word name_v11076; word quit_v11104; SOURCE(4766, 29) { word pd97; pd97 = (* (( (ptr) (* (( (ptr) gf_c41900)+105)/* var_c37708 */ ))+80) ); name_v11076 = (word) ( *( (fPt) ((* (ptr) pd97 ))))((* ((( (ptr) &var_c41868)+8)/* reply_v10844 */ ) ), pd97); }; SOURCE(4797, 29) quit_v11104 = (word) ( *( (fPt) ((* (ptr) each_v5612 ))))(name_v11076, data_v5696, each_v5612); SOURCE(4828, 13) if ((0 != quit_v11104)) { SOURCE(4841, 4) goto lab_L100007; }; }; i_v11032 = (i_v11032 + 1); if ((i_v11032 < noName_c37964)) { goto lab_L100009; }; lab_L100006: ; lab_L100007: ; }; SOURCE(4856, 22) { word pd98; pd98 = (* (( (ptr) (* (( (ptr) gf_c41900)+105)/* var_c37708 */ ))+67) ); (void) ( *( (fPt) ((* (ptr) pd98 ))))(c_v5584, (* (( (ptr) &var_c41868)+8)/* reply_v10844 */ ), pd98); }; } static void action_P2784(c_v11004, formal_c41964) word c_v11004; word formal_c41964; { register ptr gf_c41932 = (ptr) &globalframe; formal_c41964 = (formal_c41964 - 24); /* action: */ SOURCE(4390, 150) SOURCE(4423, 26) { word pd99; pd99 = (* (( (ptr) (* (( (ptr) gf_c41932)+105)/* var_c37708 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd99 ))))(c_v11004, 49, 0, (((word) ((* (( (ptr) formal_c41964)+9) ) + 3) >> 2) + 2), pd99); }; SOURCE(4451, 19) { word pd100; word idx101; pd100 = (* (( (ptr) (* (( (ptr) gf_c41932)+105)/* var_c37708 */ ))+20) ); (void) ( *( (fPt) ((* (ptr) pd100 ))))(c_v11004, ( idx101 = (* (( (ptr) formal_c41964)+5) ), BCK(idx101, 65536) ), pd100); }; SOURCE(4472, 12) { word pd102; pd102 = (* (( (ptr) (* (( (ptr) gf_c41932)+105)/* var_c37708 */ ))+20) ); (void) ( *( (fPt) ((* (ptr) pd102 ))))(c_v11004, (* (( (ptr) formal_c41964)+9) ), pd102); }; SOURCE(4486, 26) { word pd103; pd103 = (* (( (ptr) (* (( (ptr) gf_c41932)+105)/* var_c37708 */ ))+37) ); (void) ( *( (fPt) ((* (ptr) pd103 ))))(c_v11004, (* (( (ptr) formal_c41964)+4) ), 0, 2147483647, pd103); }; SOURCE(4514, 26) { word pd104; pd104 = (* (( (ptr) (* (( (ptr) gf_c41932)+105)/* var_c37708 */ ))+62) ); (* (( (ptr) formal_c41964)+8) ) = (word) ( *( (fPt) ((* (ptr) pd104 ))))(c_v11004, pd104); }; } static word GetFontPath_P600(c_v5768) word c_v5768; { W7 var_c41996; register ptr gf_c42028 = (ptr) &globalframe; word var_c5812; /* declaration of var_c37996 skipped */ /* declaration of reply_v11176 skipped */ word nSTR_v11204; word head_v11232; word last_v11260; /* GetFontPath: */ SOURCE(4884, 486) { word tmpAddr105; tmpAddr105 = (word) (( (ptr) &var_c41996)+4)/* var_c37996 */ ; (* (ptr) tmpAddr105 ) = ( ((word) (fPt) action_P2940) ); (* (( (ptr) tmpAddr105) + 1) ) = 1; }; SOURCE(5036, 12) var_c41996.f6/* reply_v11176 */ = 0; SOURCE(5064, 6) { word var_c38060; head_v11232 = XR_NewObject(8, (* (( (ptr) gf_c42028)+17) )); var_c38060 = head_v11232; }; SOURCE(5096, 6) last_v11260 = head_v11232; SOURCE(5123, 27) { word pd106; pd106 = (* (( (ptr) (* (( (ptr) gf_c42028)+105)/* var_c37708 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd106 ))))(c_v5768, (word) (( (bPt) &var_c41996)+16)/* var_c37996 */ , 0, pd106); }; SOURCE(5152, 17) { word pd107; pd107 = (* (( (ptr) (* (( (ptr) gf_c42028)+105)/* var_c37708 */ ))+68) ); (void) ( *( (fPt) ((* (ptr) pd107 ))))(var_c41996.f6/* reply_v11176 */ , pd107); }; SOURCE(5171, 14) (* (( (ptr) var_c41996.f6/* reply_v11176 */ )+10) ) = ((* (( (ptr) var_c41996.f6/* reply_v11176 */ )+10) ) + 7); SOURCE(5187, 21) { word pd108; pd108 = (* (( (ptr) (* (( (ptr) gf_c42028)+105)/* var_c37708 */ ))+78) ); nSTR_v11204 = (word) ( *( (fPt) ((* (ptr) pd108 ))))(var_c41996.f6/* reply_v11176 */ , pd108); }; SOURCE(5210, 15) (* (( (ptr) var_c41996.f6/* reply_v11176 */ )+10) ) = ((* (( (ptr) var_c41996.f6/* reply_v11176 */ )+10) ) + 22); SOURCE(5227, 90) { register word i_v11532 = 0; register word noName_c38092; noName_c38092 = nSTR_v11204; if ((i_v11532 >= noName_c38092)) { goto lab_L100010; }; lab_L100013: ; { word name_v11576; SOURCE(5257, 29) { word pd109; pd109 = (* (( (ptr) (* (( (ptr) gf_c42028)+105)/* var_c37708 */ ))+80) ); name_v11576 = (word) ( *( (fPt) ((* (ptr) pd109 ))))(var_c41996.f6/* reply_v11176 */ , pd109); }; SOURCE(5288, 29) { word var_c38124; { word var_c38156; word var_c38188; var_c38156 = XR_NewObject(8, (* (( (ptr) gf_c42028)+17) )); var_c38188 = var_c38156; (* (ptr) var_c38188 ) = name_v11576; var_c38124 = var_c38156; }; (* (( (ptr) last_v11260)+1) ) = var_c38124; last_v11260 = var_c38124; }; }; i_v11532 = (i_v11532 + 1); if ((i_v11532 < noName_c38092)) { goto lab_L100013; }; lab_L100010: ; }; SOURCE(5328, 22) { word pd110; pd110 = (* (( (ptr) (* (( (ptr) gf_c42028)+105)/* var_c37708 */ ))+67) ); (void) ( *( (fPt) ((* (ptr) pd110 ))))(c_v5768, var_c41996.f6/* reply_v11176 */ , pd110); }; SOURCE(5352, 18) return((* (( (ptr) head_v11232)+1) )); } static void action_P2940(c_v11336, formal_c42092) word c_v11336; word formal_c42092; { register ptr gf_c42060 = (ptr) &globalframe; formal_c42092 = (formal_c42092 - 16); /* action: */ SOURCE(4952, 79) SOURCE(4985, 18) { word pd111; pd111 = (* (( (ptr) (* (( (ptr) gf_c42060)+105)/* var_c37708 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd111 ))))(c_v11336, 52, 0, 1, pd111); }; SOURCE(5005, 26) { word pd112; pd112 = (* (( (ptr) (* (( (ptr) gf_c42060)+105)/* var_c37708 */ ))+62) ); (* (( (ptr) formal_c42092)+6) ) = (word) ( *( (fPt) ((* (ptr) pd112 ))))(c_v11336, pd112); }; } static word IntERead16_P660(r_v5956) word r_v5956; { register ptr gf_c42124 = (ptr) &globalframe; word i_v6000; word small_v11620; /* IntERead16: */ SOURCE(5376, 103) SOURCE(5425, 42) { word pd113; pd113 = (* (( (ptr) (* (( (ptr) gf_c42124)+105)/* var_c37708 */ ))+78) ); small_v11620 = (int) ( short )( (((unsigned)(word) ( *( (fPt) ((* (ptr) pd113 ))))(r_v5956, pd113) << 16) >> 16) ); }; SOURCE(5469, 10) i_v6000 = small_v11620; SOURCE(5376, 103) return(i_v6000); } static word QueryFont_P720(c_v6060, font_v6088) word c_v6060; word font_v6088; { register ptr gf_c42156 = (ptr) &globalframe; word inf_v6132; /* QueryFont: */ SOURCE(5485, 347) SOURCE(5485, 347) inf_v6132 = 0; SOURCE(5584, 248) { word var_c38220; var_c38220 = font_v6088; if ((var_c38220 == 0)) { goto lab_L100014; }; if (((* (( (ptr) gf_c42156)+5) ) == XR_GetReferentType(var_c38220))) { { word f_v11664; f_v11664 = var_c38220; SOURCE(5626, 12) inf_v6132 = (* (( (ptr) f_v11664)+2) ); SOURCE(5640, 61) if ((inf_v6132 == 0)) { SOURCE(5658, 43) { word var_c38252; var_c38252 = (word) QueryFontID_P780(c_v6060, (* (ptr) f_v11664 )); (* (( (ptr) f_v11664)+2) ) = var_c38252; inf_v6132 = var_c38252; }; }; }; } else { lab_L100014: ; SOURCE(5723, 109) { word pd114; pd114 = (* (( (ptr) (* (( (ptr) gf_c42156)+107)/* var_c38284 */ ))+139) ); if ((0 != (word) ( *( (fPt) ((* (ptr) pd114 ))))(font_v6088, pd114))) { SOURCE(5749, 85) { word id_v11720; SOURCE(5751, 55) { word var_c38316; { word pd115; pd115 = (* (( (ptr) (* (( (ptr) gf_c42156)+107)/* var_c38284 */ ))+140) ); var_c38316 = (word) ( *( (fPt) ((* (ptr) pd115 ))))(font_v6088, pd115); }; { word pd116; pd116 = (* (( (ptr) (* (( (ptr) gf_c42156)+108)/* var_c38348 */ ))+4) ); id_v11720 = (word) ( *( (fPt) ((* (ptr) pd116 ))))(var_c38316, 1, pd116); }; }; SOURCE(5808, 24) inf_v6132 = (word) QueryFontID_P780(c_v6060, id_v11720); }; } else { SOURCE(5841, 5) (void) XR_RaiseUnnamedError(); }; }; }; }; SOURCE(5485, 347) return(inf_v6132); } static word QueryFontID_P780(c_v6204, formal_c0506) word c_v6204; word formal_c0506; { W8 var_c42188; /* declaration of fontableId_v6232 skipped */ register ptr gf_c42220 = (ptr) &globalframe; word fi_v6276; /* declaration of var_c38380 skipped */ /* declaration of reply_v11764 skipped */ var_c42188.f4/* fontableId_v6232 */ = formal_c0506; /* QueryFontID: */ SOURCE(5855, 292) { word tmpAddr117; tmpAddr117 = (word) (( (ptr) &var_c42188)+5)/* var_c38380 */ ; (* (ptr) tmpAddr117 ) = ( ((word) (fPt) action_P3192) ); (* (( (ptr) tmpAddr117) + 1) ) = 1; }; SOURCE(5855, 292) fi_v6276 = 0; SOURCE(5939, 12) var_c42188.f7/* reply_v11764 */ = 0; { W2 var_c0157; SOURCE(6060, 27) { word pd118; pd118 = (* (( (ptr) (* (( (ptr) gf_c42220)+105)/* var_c37708 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd118 ))))(c_v6204, (word) (( (bPt) &var_c42188)+20)/* var_c38380 */ , 0, pd118); }; SOURCE(6089, 34) (void) ReadFontReply_P960((word) &var_c0157, var_c42188.f7/* reply_v11764 */ , 1); fi_v6276 = var_c0157.f0; SOURCE(6125, 22) { word pd119; pd119 = (* (( (ptr) (* (( (ptr) gf_c42220)+105)/* var_c37708 */ ))+67) ); (void) ( *( (fPt) ((* (ptr) pd119 ))))(c_v6204, var_c42188.f7/* reply_v11764 */ , pd119); }; }; SOURCE(5855, 292) return(fi_v6276); } static void action_P3192(c_v11868, formal_c42284) word c_v11868; word formal_c42284; { register ptr gf_c42252 = (ptr) &globalframe; formal_c42284 = (formal_c42284 - 20); /* action: */ SOURCE(5953, 102) SOURCE(5986, 18) { word pd120; pd120 = (* (( (ptr) (* (( (ptr) gf_c42252)+105)/* var_c37708 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd120 ))))(c_v11868, 47, 0, 2, pd120); }; SOURCE(6006, 21) { word pd121; pd121 = (* (( (ptr) (* (( (ptr) gf_c42252)+105)/* var_c37708 */ ))+21) ); (void) ( *( (fPt) ((* (ptr) pd121 ))))(c_v11868, (* (( (ptr) formal_c42284)+4) ), pd121); }; SOURCE(6029, 26) { word pd122; pd122 = (* (( (ptr) (* (( (ptr) gf_c42252)+105)/* var_c37708 */ ))+62) ); (* (( (ptr) formal_c42284)+7) ) = (word) ( *( (fPt) ((* (ptr) pd122 ))))(c_v11868, pd122); }; } static word InternalReportOneFont_P840(c_v21952, reply_v21980, data_v22008) word c_v21952; word reply_v21980; word data_v22008; { register ptr gf_c42316 = (ptr) &globalframe; word more_v22052; /* InternalReportOneFont: */ SOURCE(6282, 344) SOURCE(6282, 344) more_v22052 = 0; SOURCE(6353, 273) { word tc123; if (( (unsigned) (* (bPt) reply_v21980 ) == 1)) { tc123 = (word) ( (unsigned) (* (( (bPt) reply_v21980)+1) ) != 0); } else { tc123 = (word) 0; }; if (tc123) { SOURCE(6399, 207) { word rcr_v11896; word new_v11924; SOURCE(6401, 42) rcr_v11896 = XR_Narrow(data_v22008, (* (( (ptr) gf_c42316)+18) )); SOURCE(6445, 5) new_v11924 = XR_NewObject(8, (* (( (ptr) gf_c42316)+19) )); { word var_c38444; var_c38444 = new_v11924; (* (ptr) var_c38444 ) = reply_v21980; }; SOURCE(6489, 59) if (( (int)(* (ptr) rcr_v11896 ) == (int)0)) { SOURCE(6509, 20) (* (( (ptr) rcr_v11896)+1) ) = new_v11924; } else { SOURCE(6529, 19) (* (( (ptr) (* (( (ptr) rcr_v11896)+2) ))+1) ) = new_v11924; }; SOURCE(6551, 14) (* (( (ptr) rcr_v11896)+2) ) = new_v11924; SOURCE(6567, 25) (* (ptr) rcr_v11896 ) = ((* (ptr) rcr_v11896 ) + 1); SOURCE(6594, 12) more_v22052 = 1; }; } else { SOURCE(6613, 13) more_v22052 = 0; }; }; SOURCE(6282, 344) return(more_v22052); } static word ListFontsWithInfo_P900(c_v6616, each_v6644, formal_c0507, formal_c0508, data_v6728) word c_v6616; word each_v6644; word formal_c0507; word formal_c0508; word data_v6728; { W10 var_c42348; /* declaration of pattern_v6672 skipped */ /* declaration of maxNames_v6700 skipped */ register ptr gf_c42380 = (ptr) &globalframe; word count_v6784; /* declaration of var_c38476 skipped */ /* declaration of rcr_v12064 skipped */ /* declaration of n_v12120 skipped */ (* (( (ptr) &var_c42348)+4)/* pattern_v6672 */ ) = formal_c0507; (* (( (ptr) &var_c42348)+5)/* maxNames_v6700 */ ) = formal_c0508; /* ListFontsWithInfo: */ SOURCE(6630, 991) { word tmpAddr124; tmpAddr124 = (word) (( (ptr) &var_c42348)+6)/* var_c38476 */ ; (* (ptr) tmpAddr124 ) = ( ((word) (fPt) ProtectedListFontsWithInfo_P3300) ); (* (( (ptr) tmpAddr124) + 1) ) = 1; }; SOURCE(6769, 53) (* (( (ptr) &var_c42348)+8)/* rcr_v12064 */ ) = XR_NewObject(12, (* (( (ptr) gf_c42380)+18) )); SOURCE(7098, 29) { word pd125; pd125 = (* (( (ptr) (* (( (ptr) gf_c42380)+106)/* var_c37740 */ ))+14) ); (* (( (ptr) &var_c42348)+9)/* n_v12120 */ ) = (word) ( *( (fPt) ((* (ptr) pd125 ))))((* ((( (ptr) &var_c42348)+4)/* pattern_v6672 */ ) ), pd125) ; }; SOURCE(7129, 92) if (( (int)(* (( (ptr) &var_c42348)+9)/* n_v12120 */ ) >= (int)(* (( (ptr) (* (( (ptr) c_v6616)+16) ))+7) ))) { SOURCE(7169, 52) { word pd126; pd126 = (* (( (ptr) (* (( (ptr) gf_c42380)+109)/* var_c38540 */ ))+11) ); (void) ( *( (fPt) ((* (ptr) pd126 ))))(c_v6616, (* (( (ptr) gf_c42380)+31) ), pd126); }; }; SOURCE(7223, 57) { word pd127; pd127 = (* (( (ptr) (* (( (ptr) gf_c42380)+105)/* var_c37708 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd127 ))))(c_v6616, (word) (( (bPt) &var_c42348)+24)/* var_c38476 */ , 0, pd127); }; SOURCE(7282, 17) count_v6784 = (* (ptr) (* (( (ptr) &var_c42348)+8)/* rcr_v12064 */ ) ); SOURCE(7301, 206) { register word l_v12236; l_v12236 = (* (( (ptr) (* (( (ptr) &var_c42348)+8)/* rcr_v12064 */ ))+1) ); lab_L100018: ; if ((l_v12236 != 0)) { } else { goto lab_L100015; }; { word info_v12364 = 0; word name_v12392 = 0; SOURCE(7406, 44) { W2 var_c38572; (void) ReadFontReply_P960((word) &var_c38572, (* (ptr) l_v12236 ), 0); name_v12392 = var_c38572.f1; info_v12364 = var_c38572.f0; }; SOURCE(7453, 54) if ((0 != (word) ( *( (fPt) ((* (ptr) each_v6644 ))))(name_v12392, info_v12364, data_v6728, each_v6644))) { SOURCE(7507, 4) goto lab_L100016; }; }; l_v12236 = (* (( (ptr) l_v12236)+1) ); goto lab_L100018; lab_L100015: ; lab_L100016: ; }; SOURCE(7522, 99) { register word l_v12448; l_v12448 = (* (( (ptr) (* (( (ptr) &var_c42348)+8)/* rcr_v12064 */ ))+1) ); lab_L100022: ; if ((l_v12448 != 0)) { } else { goto lab_L100019; }; SOURCE(7587, 34) { word pd128; pd128 = (* (( (ptr) (* (( (ptr) gf_c42380)+105)/* var_c37708 */ ))+67) ); (void) ( *( (fPt) ((* (ptr) pd128 ))))(c_v6616, (* (ptr) l_v12448 ), pd128); }; l_v12448 = (* (( (ptr) l_v12448)+1) ); goto lab_L100022; lab_L100019: ; }; SOURCE(6630, 991) return(count_v6784); } static void ProtectedListFontsWithInfo_P3300(c_v12208, formal_c42444) word c_v12208; word formal_c42444; { register ptr gf_c42412 = (ptr) &globalframe; formal_c42444 = (formal_c42444 - 24); /* ProtectedListFontsWithInfo: */ SOURCE(6824, 269) SOURCE(6877, 36) { word pd129; pd129 = (* (( (ptr) (* (( (ptr) gf_c42412)+105)/* var_c37708 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd129 ))))(c_v12208, 50, 0, (IOP2( / , (int)((* (( (ptr) formal_c42444)+9) ) + 3), (int)4) + 2), pd129); }; SOURCE(6915, 29) { word pd130; word idx131; pd130 = (* (( (ptr) (* (( (ptr) gf_c42412)+105)/* var_c37708 */ ))+20) ); (void) ( *( (fPt) ((* (ptr) pd130 ))))(c_v12208, ( idx131 = (* (( (ptr) formal_c42444)+5) ), BCK(idx131, 65536) ), pd130); }; SOURCE(6946, 22) { word pd132; word idx133; pd132 = (* (( (ptr) (* (( (ptr) gf_c42412)+105)/* var_c37708 */ ))+20) ); (void) ( *( (fPt) ((* (ptr) pd132 ))))(c_v12208, ( idx133 = (* (( (ptr) formal_c42444)+9) ), BCK(idx133, 65536) ), pd132); }; SOURCE(6970, 36) { word pd134; pd134 = (* (( (ptr) (* (( (ptr) gf_c42412)+105)/* var_c37708 */ ))+37) ); (void) ( *( (fPt) ((* (ptr) pd134 ))))(c_v12208, (* (( (ptr) formal_c42444)+4) ), 0, 2147483647, pd134); }; SOURCE(7008, 85) { word pd135; pd135 = (* (( (ptr) (* (( (ptr) gf_c42412)+105)/* var_c37708 */ ))+63) ); (void) ( *( (fPt) ((* (ptr) pd135 ))))(c_v12208, (word) (( (bPt) gf_c42412)+280)/* var_c36748 */ , (* (( (ptr) formal_c42444)+8) ), pd135); }; } static void ReadFontReply_P960(formal_c0217, reply_v6844, hasCharInfo_v6872) word formal_c0217; word reply_v6844; word hasCharInfo_v6872; { W8 var_c42476; register ptr gf_c42508 = (ptr) &globalframe; word fi_v6916; word name_v6944; /* declaration of var_c38604 skipped */ /* declaration of var_c38636 skipped */ word replyLeng_v12632; word nameLength_v12660; word fontPropNum_v12688; word charInfoNum_v12716; word prop_v12744 = 0; /* ReadFontReply: */ SOURCE(7636, 2223) { word tmpAddr136; tmpAddr136 = (word) (( (ptr) &var_c42476)+4)/* var_c38604 */ ; (* (ptr) tmpAddr136 ) = ( ((word) (fPt) ReadCharInfo_P3564) ); (* (( (ptr) tmpAddr136) + 1) ) = 1; }; { word tmpAddr137; tmpAddr137 = (word) (( (ptr) &var_c42476)+6)/* var_c38636 */ ; (* (ptr) tmpAddr137 ) = ( ((word) (fPt) ReadFontProp_P3504) ); (* (( (ptr) tmpAddr137) + 1) ) = 1; }; SOURCE(7636, 2223) fi_v6916 = 0; SOURCE(7636, 2223) name_v6944 = 0; SOURCE(8437, 21) fi_v6916 = XR_NewObject(60, (* (( (ptr) gf_c42508)+23) )); SOURCE(8460, 27) { word pd138; pd138 = (* (( (ptr) (* (( (ptr) gf_c42508)+105)/* var_c37708 */ ))+68) ); (void) ( *( (fPt) ((* (ptr) pd138 ))))(reply_v6844, pd138); }; SOURCE(8489, 35) { word var_c38700; word b_v36092; b_v36092 = (unsigned) (word) (* (( (bPt) reply_v6844)+(* (( (ptr) reply_v6844)+10) )) ); (* (( (ptr) reply_v6844)+10) ) = ((* (( (ptr) reply_v6844)+10) ) + 1); var_c38700 = b_v36092; nameLength_v12660 = var_c38700; }; SOURCE(8568, 24) (* (( (ptr) reply_v6844)+10) ) = ((* (( (ptr) reply_v6844)+10) ) + 2); SOURCE(8612, 36) { word pd139; word idx140; pd139 = (* (( (ptr) (* (( (ptr) gf_c42508)+105)/* var_c37708 */ ))+79) ); replyLeng_v12632 = ( idx140 = (word) ( *( (fPt) ((* (ptr) pd139 ))))(reply_v6844, pd139), SGNCK(idx140) ); }; SOURCE(8651, 31) (* (ptr) fi_v6916 ) = XR_NewObject(12, (* (( (ptr) gf_c42508)+24) )); SOURCE(8691, 46) SOURCE(8693, 44) (void) ReadCharInfo_P3564(reply_v6844, (* (ptr) fi_v6916 ), (word) (( (bPt) &var_c42476)+16)/* var_c38604 */ ); SOURCE(8740, 24) (* (( (ptr) reply_v6844)+10) ) = ((* (( (ptr) reply_v6844)+10) ) + 4); SOURCE(8782, 37) SOURCE(8784, 35) (void) ReadCharInfo_P3564(reply_v6844, (word) (( (bPt) fi_v6916)+4), (word) (( (bPt) &var_c42476)+16)/* var_c38604 */ ); SOURCE(8822, 24) (* (( (ptr) reply_v6844)+10) ) = ((* (( (ptr) reply_v6844)+10) ) + 4); SOURCE(8857, 44) { word var_c38732; { word pd141; pd141 = (* (( (ptr) (* (( (ptr) gf_c42508)+105)/* var_c37708 */ ))+78) ); var_c38732 = (word) ( *( (fPt) ((* (ptr) pd141 ))))(reply_v6844, pd141); }; (* (( (ptr) fi_v6916)+4) ) = var_c38732; }; SOURCE(8903, 44) { word var_c38764; { word pd142; pd142 = (* (( (ptr) (* (( (ptr) gf_c42508)+105)/* var_c37708 */ ))+78) ); var_c38764 = (word) ( *( (fPt) ((* (ptr) pd142 ))))(reply_v6844, pd142); }; (* (( (ptr) fi_v6916)+5) ) = var_c38764; }; SOURCE(8949, 41) { word pd143; pd143 = (* (( (ptr) (* (( (ptr) gf_c42508)+105)/* var_c37708 */ ))+78) ); (* (( (ptr) fi_v6916)+6) ) = (word) ( *( (fPt) ((* (ptr) pd143 ))))(reply_v6844, pd143); }; SOURCE(8992, 38) { word pd144; pd144 = (* (( (ptr) (* (( (ptr) gf_c42508)+105)/* var_c37708 */ ))+78) ); fontPropNum_v12688 = (word) ( *( (fPt) ((* (ptr) pd144 ))))(reply_v6844, pd144); }; SOURCE(9032, 47) { word var_c38796; { word pd145; word idx146; pd145 = (* (( (ptr) (* (( (ptr) gf_c42508)+105)/* var_c37708 */ ))+77) ); var_c38796 = ( idx146 = (word) ( *( (fPt) ((* (ptr) pd145 ))))(reply_v6844, pd145), BCK(idx146, 2) ); }; (* (( (ptr) fi_v6916)+7) ) = var_c38796; }; SOURCE(9081, 37) { word var_c38828; { word pd147; pd147 = (* (( (ptr) (* (( (ptr) gf_c42508)+105)/* var_c37708 */ ))+77) ); var_c38828 = (word) ( *( (fPt) ((* (ptr) pd147 ))))(reply_v6844, pd147); }; (* (( (ptr) fi_v6916)+8) ) = var_c38828; }; SOURCE(9120, 37) { word var_c38860; { word pd148; pd148 = (* (( (ptr) (* (( (ptr) gf_c42508)+105)/* var_c37708 */ ))+77) ); var_c38860 = (word) ( *( (fPt) ((* (ptr) pd148 ))))(reply_v6844, pd148); }; (* (( (ptr) fi_v6916)+9) ) = var_c38860; }; SOURCE(9159, 44) { word var_c38892; { word pd149; pd149 = (* (( (ptr) (* (( (ptr) gf_c42508)+105)/* var_c37708 */ ))+77) ); var_c38892 = (unsigned) ((word) ( *( (fPt) ((* (ptr) pd149 ))))(reply_v6844, pd149) != 0); }; (* (( (ptr) fi_v6916)+10) ) = var_c38892; }; SOURCE(9205, 57) { word var_c38924; { word pd150; pd150 = (* (( (ptr) (* (( (ptr) gf_c42508)+105)/* var_c37708 */ ))+78) ); var_c38924 = (int) ( short )( (((unsigned)(word) ( *( (fPt) ((* (ptr) pd150 ))))(reply_v6844, pd150) << 16) >> 16) ); }; (* (( (ptr) fi_v6916)+11) ) = var_c38924; }; SOURCE(9264, 58) { word var_c38956; { word pd151; pd151 = (* (( (ptr) (* (( (ptr) gf_c42508)+105)/* var_c37708 */ ))+78) ); var_c38956 = (int) ( short )( (((unsigned)(word) ( *( (fPt) ((* (ptr) pd151 ))))(reply_v6844, pd151) << 16) >> 16) ); }; (* (( (ptr) fi_v6916)+12) ) = var_c38956; }; SOURCE(9324, 38) { word pd152; pd152 = (* (( (ptr) (* (( (ptr) gf_c42508)+105)/* var_c37708 */ ))+79) ); charInfoNum_v12716 = (word) ( *( (fPt) ((* (ptr) pd152 ))))(reply_v6844, pd152); }; SOURCE(9408, 60) { word var_c38988; { word var_c39020; word var_c39052; var_c39020 = ((word) fontPropNum_v12688 << 3); var_c39052 = XR_NewObject((4 + var_c39020), (* (( (ptr) gf_c42508)+25) )); (* (ptr) var_c39052 ) = fontPropNum_v12688; var_c38988 = var_c39052; }; prop_v12744 = var_c38988; (* (( (ptr) fi_v6916)+13) ) = var_c38988; }; SOURCE(9470, 66) { register word i_v13004 = 0; register word noName_c39084; noName_c39084 = fontPropNum_v12688; if ((i_v13004 >= noName_c39084)) { goto lab_L100025; }; lab_L100028: ; SOURCE(9507, 29) { W2 var_c39116; (void) ReadFontProp_P3504((word) &var_c39116, reply_v6844, (word) (( (bPt) &var_c42476)+24)/* var_c38636 */ ); { word limit153; (* (( (W2Pt) (( (ptr) prop_v12744)+1))+( limit153 = (* (ptr) prop_v12744 ), BCK(i_v13004, limit153) )) ) = var_c39116; }; }; i_v13004 = (i_v13004 + 1); if ((i_v13004 < noName_c39084)) { goto lab_L100028; }; lab_L100025: ; }; SOURCE(9547, 312) if ((0 != hasCharInfo_v6872)) { SOURCE(9568, 216) { word chars_v13048 = 0; SOURCE(9610, 160) if ((charInfoNum_v12716 > 0)) { SOURCE(9634, 57) { word var_c39148; { word var_c39180; word var_c39212; word var_c39244; var_c39180 = BCK(charInfoNum_v12716, 22369621); var_c39212 = ((word) var_c39180 * 12); var_c39244 = XR_NewObject((4 + var_c39212), (* (( (ptr) gf_c42508)+26) )); (* (ptr) var_c39244 ) = var_c39180; var_c39148 = var_c39244; }; chars_v13048 = var_c39148; (* (( (ptr) fi_v6916)+14) ) = var_c39148; }; SOURCE(9693, 77) { register word i_v13104 = 0; register word noName_c39276; noName_c39276 = charInfoNum_v12716; if ((i_v13104 >= noName_c39276)) { goto lab_L100029; }; lab_L100032: ; SOURCE(9737, 33) SOURCE(9739, 31) { word limit154; (void) ReadCharInfo_P3564(reply_v6844, (word) (( (W3Pt) (( (bPt) chars_v13048)+4))+( limit154 = (* (ptr) chars_v13048 ), BCK(i_v13104, limit154) )), (word) (( (bPt) &var_c42476)+16)/* var_c38604 */ ); }; i_v13104 = (i_v13104 + 1); if ((i_v13104 < noName_c39276)) { goto lab_L100032; }; lab_L100029: ; }; }; }; } else { SOURCE(9812, 47) name_v6944 = (word) ReadRopeOfKnownLength_P1020(reply_v6844, SGNCK(nameLength_v12660)); }; /* removed tail goto */ (* (ptr) formal_c0217 ) = fi_v6916; (* (( (ptr) formal_c0217)+1) ) = name_v6944; return; } static void ReadFontProp_P3504(formal_c0220, reply_v12820, formal_c42572) word formal_c0220; word reply_v12820; word formal_c42572; { register ptr gf_c42540 = (ptr) &globalframe; W2 fp_v12864; formal_c42572 = (formal_c42572 - 24); /* ReadFontProp: */ SOURCE(7757, 147) SOURCE(7831, 36) { word pd155; pd155 = (* (( (ptr) (* (( (ptr) gf_c42540)+105)/* var_c37708 */ ))+79) ); fp_v12864.f0 = (word) ( *( (fPt) ((* (ptr) pd155 ))))(reply_v12820, pd155); }; SOURCE(7869, 35) { word pd156; pd156 = (* (( (ptr) (* (( (ptr) gf_c42540)+105)/* var_c37708 */ ))+79) ); fp_v12864.f1 = (word) ( *( (fPt) ((* (ptr) pd156 ))))(reply_v12820, pd156); }; /* removed tail goto */ (* (W2Pt) formal_c0220 ) = fp_v12864; return; } static void ReadCharInfo_P3564(reply_v12924, ci_v12952, formal_c42636) word reply_v12924; word ci_v12952; word formal_c42636; { register ptr gf_c42604 = (ptr) &globalframe; formal_c42636 = (formal_c42636 - 16); /* ReadCharInfo: */ SOURCE(7909, 419) SOURCE(7998, 58) { word var_c39308; { word pd157; pd157 = (* (( (ptr) (* (( (ptr) gf_c42604)+105)/* var_c37708 */ ))+78) ); var_c39308 = (int) ( short )( (((unsigned)(word) ( *( (fPt) ((* (ptr) pd157 ))))(reply_v12924, pd157) << 16) >> 16) ); }; (* (hPt) ci_v12952 ) = var_c39308; }; SOURCE(8058, 59) { word var_c39340; { word pd158; pd158 = (* (( (ptr) (* (( (ptr) gf_c42604)+105)/* var_c37708 */ ))+78) ); var_c39340 = (int) ( short )( (((unsigned)(word) ( *( (fPt) ((* (ptr) pd158 ))))(reply_v12924, pd158) << 16) >> 16) ); }; (* (( (hPt) ci_v12952)+1) ) = var_c39340; }; SOURCE(8119, 56) { word var_c39372; { word pd159; pd159 = (* (( (ptr) (* (( (ptr) gf_c42604)+105)/* var_c37708 */ ))+78) ); var_c39372 = (int) ( short )( (((unsigned)(word) ( *( (fPt) ((* (ptr) pd159 ))))(reply_v12924, pd159) << 16) >> 16) ); }; (* (( (hPt) ci_v12952)+2) ) = var_c39372; }; SOURCE(8177, 53) { word var_c39404; { word pd160; pd160 = (* (( (ptr) (* (( (ptr) gf_c42604)+105)/* var_c37708 */ ))+78) ); var_c39404 = (int) ( short )( (((unsigned)(word) ( *( (fPt) ((* (ptr) pd160 ))))(reply_v12924, pd160) << 16) >> 16) ); }; (* (( (hPt) ci_v12952)+3) ) = var_c39404; }; SOURCE(8232, 54) { word var_c39436; { word pd161; pd161 = (* (( (ptr) (* (( (ptr) gf_c42604)+105)/* var_c37708 */ ))+78) ); var_c39436 = (int) ( short )( (((unsigned)(word) ( *( (fPt) ((* (ptr) pd161 ))))(reply_v12924, pd161) << 16) >> 16) ); }; (* (( (hPt) ci_v12952)+4) ) = var_c39436; }; SOURCE(8288, 40) { word pd162; pd162 = (* (( (ptr) (* (( (ptr) gf_c42604)+105)/* var_c37708 */ ))+78) ); (* (( (hPt) ci_v12952)+5) ) = (word) ( *( (fPt) ((* (ptr) pd162 ))))(reply_v12924, pd162); }; } static word ReadRopeOfKnownLength_P1020(r_v7016, length_v7044) word r_v7016; word length_v7044; { register ptr gf_c42668 = (ptr) &globalframe; word rope_v7088; word m_v13148; /* ReadRopeOfKnownLength: */ SOURCE(9868, 290) SOURCE(9868, 290) rope_v7088 = 0; SOURCE(9963, 15) m_v13148 = length_v7044; SOURCE(9980, 18) if (( (int)(* (( (ptr) r_v7016)+10) ) < (int)32)) { SOURCE(9998, 5) (void) XR_RaiseUnnamedError(); }; SOURCE(10005, 57) lab_L100036: ; { word tc163; if ((m_v13148 > 0)) { tc163 = (word) ( (unsigned) (word) (* (( (bPt) (* (( (ptr) r_v7016)+8) ))+(((* (( (ptr) r_v7016)+10) ) + m_v13148) - 33)) ) == 0); } else { tc163 = (word) 0; }; if (tc163) { } else { goto lab_L100034; }; }; SOURCE(10047, 15) m_v13148 = SGNCK((m_v13148 - 1)); goto lab_L100036; lab_L100034: ; SOURCE(10064, 68) { word pd164; pd164 = (* (( (ptr) (* (( (ptr) gf_c42668)+105)/* var_c37708 */ ))+61) ); rope_v7088 = (word) ( *( (fPt) ((* (ptr) pd164 ))))((* (( (ptr) r_v7016)+8) ), ((* (( (ptr) r_v7016)+10) ) - 32), m_v13148, pd164) ; }; SOURCE(10134, 24) (* (( (ptr) r_v7016)+10) ) = ((* (( (ptr) r_v7016)+10) ) + length_v7044); SOURCE(9868, 290) return(rope_v7088); } static void QueryTextExtents16OnServer_P1080(formal_c0243, c_v7148, formal_c0509, s_v7204) word formal_c0243; word c_v7148; word formal_c0509; word s_v7204; { W11 var_c42700; /* declaration of fontableID_v7176 skipped */ register ptr gf_c42732 = (ptr) &globalframe; W8 te_v7248; /* declaration of var_c39468 skipped */ /* declaration of reply_v13192 skipped */ /* declaration of r_v13220 skipped */ /* declaration of n_v13248 skipped */ /* declaration of odd_v13276 skipped */ (* (( (ptr) &var_c42700)+4)/* fontableID_v7176 */ ) = formal_c0509; /* QueryTextExtents16OnServer: */ SOURCE(10164, 852) { word tmpAddr165; tmpAddr165 = (word) (( (ptr) &var_c42700)+5)/* var_c39468 */ ; (* (ptr) tmpAddr165 ) = ( ((word) (fPt) action_P3768) ); (* (( (ptr) tmpAddr165) + 1) ) = 1; }; SOURCE(10275, 12) (* (( (ptr) &var_c42700)+7)/* reply_v13192 */ ) = 0; SOURCE(10289, 13) (* (( (ptr) &var_c42700)+8)/* r_v13220 */ ) = s_v7204; SOURCE(10320, 23) { word pd166; pd166 = (* (( (ptr) (* (( (ptr) gf_c42732)+106)/* var_c37740 */ ))+14) ); (* (( (ptr) &var_c42700)+9)/* n_v13248 */ ) = (word) ( *( (fPt) ((* (ptr) pd166 ))))((* ((( (ptr) &var_c42700)+8)/* r_v13220 */ ) ), pd166) ; }; SOURCE(10497, 33) if (( (int)IOP2( % , (int)(* (( (ptr) &var_c42700)+9)/* n_v13248 */ ), (int)2) != (int)0)) { SOURCE(10517, 13) (void) XR_RaiseError((word) (( (bPt) gf_c42732)+132)/* var_c36140 */ , 0); }; SOURCE(10532, 17) { word idx167; (* (( (ptr) &var_c42700)+10)/* odd_v13276 */ ) = ( idx167 = (word) IOP2( % , (int)IOP2( / , (int)(* (( (ptr) &var_c42700)+9)/* n_v13248 */ ), (int)2), (int)2), BCK(idx167, 2) ); }; SOURCE(10551, 27) { word pd168; pd168 = (* (( (ptr) (* (( (ptr) gf_c42732)+105)/* var_c37708 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd168 ))))(c_v7148, (word) (( (bPt) &var_c42700)+20)/* var_c39468 */ , 0, pd168); }; SOURCE(10580, 17) { word pd169; pd169 = (* (( (ptr) (* (( (ptr) gf_c42732)+105)/* var_c37708 */ ))+68) ); (void) ( *( (fPt) ((* (ptr) pd169 ))))((* ((( (ptr) &var_c42700)+7)/* reply_v13192 */ ) ), pd169); }; SOURCE(10599, 37) { word pd170; word idx171; pd170 = (* (( (ptr) (* (( (ptr) gf_c42732)+105)/* var_c37708 */ ))+77) ); te_v7248.f0 = ( idx171 = (word) ( *( (fPt) ((* (ptr) pd170 ))))((* ((( (ptr) &var_c42700)+7)/* reply_v13192 */ ) ), pd170), BCK(idx171, 2) ); }; SOURCE(10639, 19) { word var_c39500; word pd172; pd172 = (* (( (ptr) (* (( (ptr) gf_c42732)+105)/* var_c37708 */ ))+78) ); var_c39500 = (word) ( *( (fPt) ((* (ptr) pd172 ))))((* ((( (ptr) &var_c42700)+7)/* reply_v13192 */ ) ), pd172); }; SOURCE(10678, 19) { word var_c39532; word pd173; pd173 = (* (( (ptr) (* (( (ptr) gf_c42732)+105)/* var_c37708 */ ))+79) ); var_c39532 = (word) ( *( (fPt) ((* (ptr) pd173 ))))((* ((( (ptr) &var_c42700)+7)/* reply_v13192 */ ) ), pd173); }; SOURCE(10715, 33) te_v7248.f1 = (word) IntERead16_P660((* ((( (ptr) &var_c42700)+7)/* reply_v13192 */ ) )); SOURCE(10750, 34) te_v7248.f2 = (word) IntERead16_P660((* ((( (ptr) &var_c42700)+7)/* reply_v13192 */ ) )); SOURCE(10786, 36) te_v7248.f3 = (word) IntERead16_P660((* ((( (ptr) &var_c42700)+7)/* reply_v13192 */ ) )); SOURCE(10824, 37) te_v7248.f4 = (word) IntERead16_P660((* ((( (ptr) &var_c42700)+7)/* reply_v13192 */ ) )); SOURCE(10863, 42) { word pd174; pd174 = (* (( (ptr) (* (( (ptr) gf_c42732)+105)/* var_c37708 */ ))+79) ); te_v7248.f5 = (word) ( *( (fPt) ((* (ptr) pd174 ))))((* ((( (ptr) &var_c42700)+7)/* reply_v13192 */ ) ), pd174); }; SOURCE(10907, 41) { word pd175; pd175 = (* (( (ptr) (* (( (ptr) gf_c42732)+105)/* var_c37708 */ ))+79) ); te_v7248.f6 = (word) ( *( (fPt) ((* (ptr) pd175 ))))((* ((( (ptr) &var_c42700)+7)/* reply_v13192 */ ) ), pd175); }; SOURCE(10950, 42) { word pd176; pd176 = (* (( (ptr) (* (( (ptr) gf_c42732)+105)/* var_c37708 */ ))+79) ); te_v7248.f7 = (word) ( *( (fPt) ((* (ptr) pd176 ))))((* ((( (ptr) &var_c42700)+7)/* reply_v13192 */ ) ), pd176); }; SOURCE(10994, 22) { word pd177; pd177 = (* (( (ptr) (* (( (ptr) gf_c42732)+105)/* var_c37708 */ ))+67) ); (void) ( *( (fPt) ((* (ptr) pd177 ))))(c_v7148, (* (( (ptr) &var_c42700)+7)/* reply_v13192 */ ), pd177); }; /* removed tail goto */ (* (W8Pt) formal_c0243 ) = te_v7248; return; } static void action_P3768(c_v13400, formal_c42796) word c_v13400; word formal_c42796; { register ptr gf_c42764 = (ptr) &globalframe; formal_c42796 = (formal_c42796 - 20); /* action: */ SOURCE(10358, 134) SOURCE(10391, 28) { word pd178; pd178 = (* (( (ptr) (* (( (ptr) gf_c42764)+105)/* var_c37708 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd178 ))))(c_v13400, 48, (* (( (ptr) formal_c42796)+10) ), (IOP2( / , (int)((* (( (ptr) formal_c42796)+9) ) + 3), (int)4) + 2), pd178); }; SOURCE(10421, 21) { word pd179; pd179 = (* (( (ptr) (* (( (ptr) gf_c42764)+105)/* var_c37708 */ ))+21) ); (void) ( *( (fPt) ((* (ptr) pd179 ))))(c_v13400, (* (( (ptr) formal_c42796)+4) ), pd179); }; SOURCE(10444, 20) { word pd180; pd180 = (* (( (ptr) (* (( (ptr) gf_c42764)+105)/* var_c37708 */ ))+37) ); (void) ( *( (fPt) ((* (ptr) pd180 ))))(c_v13400, (* (( (ptr) formal_c42796)+8) ), 0, 2147483647, pd180); }; SOURCE(10466, 26) { word pd181; pd181 = (* (( (ptr) (* (( (ptr) gf_c42764)+105)/* var_c37708 */ ))+62) ); (* (( (ptr) formal_c42796)+7) ) = (word) ( *( (fPt) ((* (ptr) pd181 ))))(c_v13400, pd181); }; } static void QueryTextExtents_P1200(formal_c0250, c_v7412, font_v7440, r_v7468) word formal_c0250; word c_v7412; word font_v7440; word r_v7468; { W8 t_v7512; word fi_v13456; /* QueryTextExtents: */ SOURCE(11206, 192) SOURCE(11309, 49) fi_v13456 = (word) QueryFont_P720(c_v7412, font_v7440); SOURCE(11368, 30) SOURCE(11369, 29) (void) ComputeTextExtents_P1440(fi_v13456, r_v7468, (word) &t_v7512); /* removed tail goto */ (* (W8Pt) formal_c0250 ) = t_v7512; return; } static void QueryTextExtents16_P1260(formal_c0256, c_v7572, font_v7600, s_v7628) word formal_c0256; word c_v7572; word font_v7600; word s_v7628; { W8 t_v7672; word fi_v13512; /* QueryTextExtents16: */ SOURCE(11405, 202) SOURCE(11514, 49) fi_v13512 = (word) QueryFont_P720(c_v7572, font_v7600); SOURCE(11573, 34) SOURCE(11574, 33) (void) ComputeTextExtents16_P1500(fi_v13512, s_v7628, (word) &t_v7672); /* removed tail goto */ (* (W8Pt) formal_c0256 ) = t_v7672; return; } static void CharExtent_P1320(p_v7732, t_v7760) word p_v7732; word t_v7760; { word var_c39564; word attributes_v35996; /* CharExtent: */ SOURCE(11614, 462) SOURCE(11720, 43) attributes_v35996 = (unsigned) (* (( (hPt) p_v7732)+5) ); SOURCE(11133, 69) var_c39564 = (unsigned) ((word) XRM_BITAND(attributes_v35996, 16384) == 0); if ((0 == var_c39564)) { SOURCE(11757, 6) return; }; SOURCE(11765, 48) { word x182; word x183; (* (( (ptr) t_v7760)+3) ) = (x182 = (* (( (ptr) t_v7760)+3) ), x183 = (int) ( short )(* (( (hPt) p_v7732)+3) ), MAX((int)(word), x182, x183)); }; SOURCE(11815, 50) { word x184; word x185; (* (( (ptr) t_v7760)+4) ) = (x184 = (* (( (ptr) t_v7760)+4) ), x185 = (int) ( short )(* (( (hPt) p_v7732)+3) ), MAX((int)(word), x184, x185)); }; SOURCE(11867, 64) { word x186; word x187; (* (( (ptr) t_v7760)+6) ) = (x186 = (* (( (ptr) t_v7760)+6) ), x187 = ((* (( (ptr) t_v7760)+5) ) + (int) ( short )(* (hPt) p_v7732 )), MIN((int)(word), x186, x187)); }; SOURCE(11933, 67) { word x188; word x189; (* (( (ptr) t_v7760)+7) ) = (x188 = (* (( (ptr) t_v7760)+7) ), x189 = ((* (( (ptr) t_v7760)+5) ) + (int) ( short )(* (( (hPt) p_v7732)+1) )), MAX((int)(word), x188, x189)); }; SOURCE(12002, 43) (* (( (ptr) t_v7760)+5) ) = ((* (( (ptr) t_v7760)+5) ) + (int) ( short )(* (( (hPt) p_v7732)+2) )); SOURCE(12047, 29) (* (( (ptr) t_v7760)+1) ) = ((* (( (ptr) t_v7760)+1) ) + 1); } static void DoExtent_P1380(fi_v7844, t_v7872, r_v7900, charAction_v7928) word fi_v7844; word t_v7872; word r_v7900; word charAction_v7928; { register ptr gf_c42828 = (ptr) &globalframe; /* DoExtent: */ SOURCE(12097, 575) SOURCE(12228, 18) (* (( (ptr) t_v7872)+5) ) = 0; SOURCE(12248, 16) (* (( (ptr) t_v7872)+1) ) = 0; SOURCE(12281, 30) (* (( (ptr) t_v7872)+3) ) = 4294934528; SOURCE(12313, 31) (* (( (ptr) t_v7872)+4) ) = 4294934528; SOURCE(12346, 27) (* (( (ptr) t_v7872)+6) ) = 2147483647; SOURCE(12375, 29) (* (( (ptr) t_v7872)+7) ) = 2147483648; SOURCE(12406, 42) { word var_c39628; word pd190; pd190 = (* (( (ptr) (* (( (ptr) gf_c42828)+106)/* var_c37740 */ ))+26) ); var_c39628 = (word) ( *( (fPt) ((* (ptr) pd190 ))))(r_v7900, 0, 2147483647, charAction_v7928, pd190); }; SOURCE(12450, 121) if (( (int)(* (( (ptr) t_v7872)+1) ) == (int)0)) { SOURCE(12491, 19) (* (( (ptr) t_v7872)+3) ) = 0; SOURCE(12512, 20) (* (( (ptr) t_v7872)+4) ) = 0; SOURCE(12534, 17) (* (( (ptr) t_v7872)+6) ) = 0; SOURCE(12553, 18) (* (( (ptr) t_v7872)+7) ) = 0; }; SOURCE(12576, 28) (* (( (ptr) t_v7872)+1) ) = (* (( (ptr) fi_v7844)+11) ); SOURCE(12606, 30) (* (( (ptr) t_v7872)+2) ) = (* (( (ptr) fi_v7844)+12) ); SOURCE(12638, 34) (* (ptr) t_v7872 ) = (* (( (ptr) fi_v7844)+7) ); } static void ComputeTextExtents_P1440(formal_c0510, r_v8040, formal_c0511) word formal_c0510; word r_v8040; word formal_c0511; { W10 var_c42860; /* declaration of fi_v8012 skipped */ /* declaration of t_v8068 skipped */ /* declaration of var_c39660 skipped */ /* declaration of firstCol_v13596 skipped */ /* declaration of numCols_v13624 skipped */ (* (( (ptr) &var_c42860)+4)/* fi_v8012 */ ) = formal_c0510; (* (( (ptr) &var_c42860)+5)/* t_v8068 */ ) = formal_c0511; /* ComputeTextExtents: */ SOURCE(12678, 932) { word tmpAddr191; tmpAddr191 = (word) (( (ptr) &var_c42860)+6)/* var_c39660 */ ; (* (ptr) tmpAddr191 ) = ( ((word) (fPt) CharAction_P3828) ); (* (( (ptr) tmpAddr191) + 1) ) = 1; }; SOURCE(13500, 33) { word idx192; (* (( (ptr) &var_c42860)+8)/* firstCol_v13596 */ ) = ( idx192 = (* (( (ptr) (* (( (ptr) &var_c42860)+4)/* fi_v8012 */ ))+4) ), SGNCK(idx192) ); }; SOURCE(13535, 43) (* (( (ptr) &var_c42860)+9)/* numCols_v13624 */ ) = (((* (( (ptr) (* (( (ptr) &var_c42860)+4)/* fi_v8012 */ ))+5) ) - (* ( ( (ptr) &var_c42860)+8)/* firstCol_v13596 */ )) + 1); SOURCE(13580, 30) (void) DoExtent_P1380((* (( (ptr) &var_c42860)+4)/* fi_v8012 */ ), (* (( (ptr) &var_c42860)+5)/* t_v8068 */ ), r_v8040, (word) ( ( (bPt) &var_c42860)+24)/* var_c39660 */ ); } static word CharAction_P3828(c_v13700, formal_c42892) word c_v13700; word formal_c42892; { word quit_v13744; word idx_v13772; formal_c42892 = (formal_c42892 - 24); /* CharAction: */ SOURCE(12790, 704) SOURCE(12790, 704) quit_v13744 = 0; SOURCE(12858, 17) idx_v13772 = c_v13700; { word var_c39692; word attributes_v35920; SOURCE(12877, 20) idx_v13772 = (idx_v13772 - (* (( (ptr) formal_c42892)+8) )); SOURCE(12947, 259) { word tc194; if (( (int)idx_v13772 < (int)0)) { goto then0193;}; if (( (int)idx_v13772 >= (int)(* (( (ptr) formal_c42892)+9) ))) { goto then0193;}; if ( ( ((* (( (ptr) (* (( (ptr) formal_c42892)+4) ))+14) ) != 0) ? ( (int)(* (ptr) (* (( (ptr) (* (( (ptr) formal_c42892)+4) ))+14) ) ) > (int)idx_v13772) : 0 ) ) { { word var_c0465; word var_c39724; { word limit195; var_c39724 = (* (( (ptr) (* (( (ptr) formal_c42892)+4) ))+14) ); var_c0465 = (var_c0465 & 4294901760) | ((word) ((* (( (hPt) (( (W3Pt) (( (ptr) var_c39724)+1))+( /*1*/ limit195 = (* (ptr) var_c39724 ), /*1*/ BCK(idx_v13772, limit195) /*1*/ )))+5) ))); }; attributes_v35920 = (unsigned) ( (((unsigned)var_c0465 << 16) >> 16) ); }; SOURCE(11133, 69) var_c39692 = (unsigned) ((word) XRM_BITAND(attributes_v35920, 16384) == 0); tc194 = (word) (0 == var_c39692); } else { tc194 = (word) 0; }; if (tc194) { then0193: ; SOURCE(13076, 20) idx_v13772 = (* (( (ptr) (* (( (ptr) formal_c42892)+4) ))+6) ); SOURCE(13146, 20) idx_v13772 = (idx_v13772 - (* (( (ptr) formal_c42892)+8) )); SOURCE(13168, 38) if (( (int)idx_v13772 < (int)0) || ( (int)idx_v13772 >= (int)(* (( (ptr) formal_c42892)+9) ))) { SOURCE(13200, 6) return(quit_v13744); }; }; }; SOURCE(13243, 251) { word p_v13816; SOURCE(13286, 189) if ( ( ((* (( (ptr) (* (( (ptr) formal_c42892)+4) ))+14) ) != 0) ? ( (int)idx_v13772 < (int)(* (ptr) (* (( (ptr) (* (( (ptr) formal_c42892)+4) ))+14) ) )) : 0 ) ) { SOURCE(13338, 97) p_v13816 = (((* (( (ptr) (* (( (ptr) formal_c42892)+4) ))+14) ) + IOP2( * , (int)idx_v13772, (int)12)) + 4); } else { SOURCE(13435, 40) p_v13816 = (* (ptr) (* (( (ptr) formal_c42892)+4) ) ); }; SOURCE(13477, 17) (void) CharExtent_P1320(p_v13816, (* (( (ptr) formal_c42892)+5) )); }; }; SOURCE(12790, 704) return(quit_v13744); } static void ComputeTextExtents16_P1500(formal_c0512, r_v8180, formal_c0513) word formal_c0512; word r_v8180; word formal_c0513; { W14 var_c42924; /* declaration of fi_v8152 skipped */ /* declaration of t_v8208 skipped */ /* declaration of var_c39788 skipped */ /* declaration of highByte_v13896 skipped */ /* declaration of oddChar_v13924 skipped */ /* declaration of firstCol_v13980 skipped */ /* declaration of numCols_v14008 skipped */ /* declaration of firstRow_v14036 skipped */ /* declaration of numRows_v14064 skipped */ (* (( (ptr) &var_c42924)+4)/* fi_v8152 */ ) = formal_c0512; (* (( (ptr) &var_c42924)+5)/* t_v8208 */ ) = formal_c0513; /* ComputeTextExtents16: */ SOURCE(13616, 1449) { word tmpAddr196; tmpAddr196 = (word) (( (ptr) &var_c42924)+6)/* var_c39788 */ ; (* (ptr) tmpAddr196 ) = ( ((word) (fPt) CharAction_P3936) ); (* (( (ptr) tmpAddr196) + 1) ) = 1; }; SOURCE(13746, 21) (* (( (ptr) &var_c42924)+9)/* oddChar_v13924 */ ) = 0; SOURCE(14887, 33) { word idx197; (* (( (ptr) &var_c42924)+10)/* firstCol_v13980 */ ) = ( idx197 = (* (( (ptr) (* (( (ptr) &var_c42924)+4)/* fi_v8152 */ ))+4) ), SGNCK(idx197) ); }; SOURCE(14922, 43) (* (( (ptr) &var_c42924)+11)/* numCols_v14008 */ ) = (((* (( (ptr) (* (( (ptr) &var_c42924)+4)/* fi_v8152 */ ))+5) ) - (* ( ( (ptr) &var_c42924)+10)/* firstCol_v13980 */ )) + 1); SOURCE(14967, 27) (* (( (ptr) &var_c42924)+12)/* firstRow_v14036 */ ) = (* (( (ptr) (* (( (ptr) &var_c42924)+4)/* fi_v8152 */ ))+8) ); SOURCE(14996, 37) (* (( (ptr) &var_c42924)+13)/* numRows_v14064 */ ) = (((* (( (ptr) (* (( (ptr) &var_c42924)+4)/* fi_v8152 */ ))+9) ) - (* ( ( (ptr) &var_c42924)+12)/* firstRow_v14036 */ )) + 1); SOURCE(15035, 30) (void) DoExtent_P1380((* (( (ptr) &var_c42924)+4)/* fi_v8152 */ ), (* (( (ptr) &var_c42924)+5)/* t_v8208 */ ), r_v8180, (word) ( ( (bPt) &var_c42924)+24)/* var_c39788 */ ); } static word CharAction_P3936(c_v14140, formal_c42956) word c_v14140; word formal_c42956; { word quit_v14184; word idx_v14212; word lowByte_v14240; formal_c42956 = (formal_c42956 - 24); /* CharAction: */ SOURCE(13769, 1112) SOURCE(13769, 1112) quit_v14184 = 0; SOURCE(13848, 21) lowByte_v14240 = c_v14140; SOURCE(13871, 18) (* (( (ptr) formal_c42956)+9) ) = (unsigned) (0 == (* (( (ptr) formal_c42956)+9) )); SOURCE(13891, 43) if ((0 != (* (( (ptr) formal_c42956)+9) ))) { SOURCE(13908, 18) (* (( (ptr) formal_c42956)+8) ) = lowByte_v14240; SOURCE(13928, 6) return(quit_v14184); }; SOURCE(13937, 680) if (( (int)(* (( (ptr) (* (( (ptr) formal_c42956)+4) ))+9) ) == (int)0)) { { word var_c39820; word attributes_v35844; SOURCE(13962, 39) idx_v14212 = ((IOP2( * , (int)(* (( (ptr) formal_c42956)+8) ), (int)256) + lowByte_v14240) - (* (( (ptr) formal_c42956)+10) )); SOURCE(14003, 259) { word tc199; if (( (int)idx_v14212 < (int)0)) { goto then0198;}; if (( (int)idx_v14212 >= (int)(* (( (ptr) formal_c42956)+11) ))) { goto then0198;}; if ( ( ((* (( (ptr) (* (( (ptr) formal_c42956)+4) ))+14) ) != 0) ? ( (int)(* (ptr) (* (( (ptr) (* (( (ptr) formal_c42956)+4) ))+14) ) ) > (int)idx_v14212) : 0 ) ) { { word var_c0466; word var_c39852; { word limit200; var_c39852 = (* (( (ptr) (* (( (ptr) formal_c42956)+4) ))+14) ); var_c0466 = (var_c0466 & 4294901760) | ((word) ((* (( (hPt) (( (W3Pt) (( (ptr) var_c39852)+1))+( /*1*/ limit200 = (* (ptr) var_c39852 ), /*1*/ BCK(idx_v14212, limit200) /*1*/ )))+5) ))); }; attributes_v35844 = (unsigned) ( (((unsigned)var_c0466 << 16) >> 16) ); }; SOURCE(11133, 69) var_c39820 = (unsigned) ((word) XRM_BITAND(attributes_v35844, 16384) == 0); tc199 = (word) (0 == var_c39820); } else { tc199 = (word) 0; }; if (tc199) { then0198: ; SOURCE(14132, 20) idx_v14212 = (* (( (ptr) (* (( (ptr) formal_c42956)+4) ))+6) ); SOURCE(14202, 20) idx_v14212 = (idx_v14212 - (* (( (ptr) formal_c42956)+10) )); SOURCE(14224, 38) if (( (int)idx_v14212 < (int)0) || ( (int)idx_v14212 >= (int)(* (( (ptr) formal_c42956)+11) ))) { SOURCE(14256, 6) return(quit_v14184); }; }; }; }; } else { SOURCE(14298, 321) { word row_v14284; word col_v14312; SOURCE(14300, 30) row_v14284 = ((* (( (ptr) formal_c42956)+8) ) - (* (( (ptr) formal_c42956)+12) )); SOURCE(14332, 29) col_v14312 = (lowByte_v14240 - (* (( (ptr) formal_c42956)+10) )); SOURCE(14363, 202) if (((( (int)row_v14284 < (int)0) || ( (int)col_v14312 < (int)0)) || ( (int)row_v14284 >= (int)(* (( (ptr) formal_c42956)+13) ))) || ( (int)col_v14312 >= (int)(* (( (ptr) formal_c42956)+11) ))) { SOURCE(14420, 37) row_v14284 = (((* (( (ptr) (* (( (ptr) formal_c42956)+4) ))+6) ) >> 8) - (* (( (ptr) formal_c42956)+12) )); SOURCE(14459, 39) col_v14312 = (((* (( (ptr) (* (( (ptr) formal_c42956)+4) ))+6) ) & 0377) - (* (( (ptr) formal_c42956)+10) )); SOURCE(14500, 65) if (((( (int)row_v14284 < (int)0) || ( (int)col_v14312 < (int)0)) || ( (int)row_v14284 >= (int)(* (( (ptr) formal_c42956)+13) ))) || ( (int)col_v14312 >= (int)(* (( (ptr) formal_c42956)+11) ))) { SOURCE(14559, 6) return(quit_v14184); }; }; SOURCE(14594, 23) idx_v14212 = (IOP2( * , (int)row_v14284, (int)(* (( (ptr) formal_c42956)+11) )) + col_v14312); }; }; SOURCE(14630, 251) { word p_v14356; SOURCE(14673, 189) if ( ( ((* (( (ptr) (* (( (ptr) formal_c42956)+4) ))+14) ) != 0) ? ( (int)idx_v14212 < (int)(* (ptr) (* (( (ptr) (* (( (ptr) formal_c42956)+4) ))+14) ) )) : 0 ) ) { SOURCE(14725, 97) p_v14356 = (((* (( (ptr) (* (( (ptr) formal_c42956)+4) ))+14) ) + IOP2( * , (int)idx_v14212, (int)12)) + 4); } else { SOURCE(14822, 40) p_v14356 = (* (ptr) (* (( (ptr) formal_c42956)+4) ) ); }; SOURCE(14864, 17) (void) CharExtent_P1320(p_v14356, (* (( (ptr) formal_c42956)+5) )); }; SOURCE(13769, 1112) return(quit_v14184); } static word QueryKeymap_P1560(c_v8292, reUse_v8320) word c_v8292; word reUse_v8320; { W7 var_c42988; register ptr gf_c43020 = (ptr) &globalframe; word rka_v8376; /* declaration of var_c39916 skipped */ /* declaration of reply_v14464 skipped */ /* QueryKeymap: */ SOURCE(15071, 727) { word tmpAddr201; tmpAddr201 = (word) (( (ptr) &var_c42988)+4)/* var_c39916 */ ; (* (ptr) tmpAddr201 ) = ( ((word) (fPt) action_P4092) ); (* (( (ptr) tmpAddr201) + 1) ) = 1; }; SOURCE(15071, 727) rka_v8376 = 0; SOURCE(15265, 12) var_c42988.f6/* reply_v14464 */ = 0; SOURCE(15279, 27) { word pd202; pd202 = (* (( (ptr) (* (( (ptr) gf_c43020)+105)/* var_c37708 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd202 ))))(c_v8292, (word) (( (bPt) &var_c42988)+16)/* var_c39916 */ , 0, pd202); }; SOURCE(15308, 59) if ((reUse_v8320 == 0)) { SOURCE(15326, 30) rka_v8376 = XR_NewObject(32, (* (( (ptr) gf_c43020)+27) )); } else { SOURCE(15356, 11) rka_v8376 = reUse_v8320; }; SOURCE(15377, 396) { word src1_v14624; word dst1_v14652; word src2_v14680; word dst2_v14708; SOURCE(15470, 85) src1_v14624 = (var_c42988.f6/* reply_v14464 */ + 8); SOURCE(15557, 45) dst1_v14652 = rka_v8376; SOURCE(15604, 55) src2_v14680 = (* (( (ptr) var_c42988.f6/* reply_v14464 */ )+8) ); SOURCE(15661, 80) dst2_v14708 = (rka_v8376 + 24); SOURCE(15743, 13) (* (W6Pt) dst1_v14652 ) = (* (W6Pt) src1_v14624 ); SOURCE(15758, 13) (* (W2Pt) dst2_v14708 ) = (* (W2Pt) src2_v14680 ); }; SOURCE(15776, 22) { word pd203; pd203 = (* (( (ptr) (* (( (ptr) gf_c43020)+105)/* var_c37708 */ ))+67) ); (void) ( *( (fPt) ((* (ptr) pd203 ))))(c_v8292, var_c42988.f6/* reply_v14464 */ , pd203); }; SOURCE(15071, 727) return(rka_v8376); } static void action_P4092(c_v14540, formal_c43084) word c_v14540; word formal_c43084; { register ptr gf_c43052 = (ptr) &globalframe; formal_c43084 = (formal_c43084 - 16); /* action: */ SOURCE(15181, 79) SOURCE(15214, 18) { word pd204; pd204 = (* (( (ptr) (* (( (ptr) gf_c43052)+105)/* var_c37708 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd204 ))))(c_v14540, 44, 0, 1, pd204); }; SOURCE(15234, 26) { word pd205; pd205 = (* (( (ptr) (* (( (ptr) gf_c43052)+105)/* var_c37708 */ ))+62) ); (* (( (ptr) formal_c43084)+6) ) = (word) ( *( (fPt) ((* (ptr) pd205 ))))(c_v14540, pd205); }; } static word GetKeyboardMapping_P1620(c_v8684) word c_v8684; { W9 var_c43116; register ptr gf_c43148 = (ptr) &globalframe; /* declaration of mapping_v8728 skipped */ /* declaration of var_c39980 skipped */ /* declaration of reply_v14900 skipped */ /* declaration of cp_v14928 skipped */ word cache_v14956; /* GetKeyboardMapping: */ SOURCE(16145, 1634) { word tmpAddr206; tmpAddr206 = (word) (( (ptr) &var_c43116)+5)/* var_c39980 */ ; (* (ptr) tmpAddr206 ) = ( ((word) (fPt) action_P4200) ); (* (( (ptr) tmpAddr206) + 1) ) = 1; }; SOURCE(16145, 1634) (* (( (ptr) &var_c43116)+4)/* mapping_v8728 */ ) = 0; SOURCE(17337, 12) (* (( (ptr) &var_c43116)+7)/* reply_v14900 */ ) = 0; SOURCE(17351, 42) (* (( (ptr) &var_c43116)+8)/* cp_v14928 */ ) = (* (( (ptr) c_v8684)+24) ); SOURCE(17395, 48) cache_v14956 = (* (( (ptr) (* (( (ptr) &var_c43116)+8)/* cp_v14928 */ ))+3) ); SOURCE(17483, 296) if ((cache_v14956 != 0)) { SOURCE(17502, 28) return((* (( (ptr) cache_v14956)+6) )); } else { SOURCE(17530, 249) { word var_c40044; { word pd207; pd207 = (* (( (ptr) (* (( (ptr) gf_c43148)+110)/* var_c40012 */ ))+8) ); var_c40044 = (word) ( *( (fPt) ((* (ptr) pd207 ))))(c_v8684, (* (( (ptr) gf_c43148)+30) ), pd207); }; if ((var_c40044 == 0)) { goto lab_L100043; }; if (((* (( (ptr) gf_c43148)+7) ) == XR_GetReferentType(var_c40044))) { { word km_v15084; km_v15084 = var_c40044; SOURCE(17632, 18) (* (( (ptr) (* (( (ptr) &var_c43116)+8)/* cp_v14928 */ ))+3) ) = km_v15084; SOURCE(17652, 19) return((* (( (ptr) km_v15084)+6) )); }; } else { lab_L100043: ; SOURCE(17687, 27) { word pd208; pd208 = (* (( (ptr) (* (( (ptr) gf_c43148)+105)/* var_c37708 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd208 ))))(c_v8684, (word) (( (bPt) &var_c43116)+20)/* var_c39980 */ , 0, pd208); }; SOURCE(17716, 17) { word pd209; pd209 = (* (( (ptr) (* (( (ptr) gf_c43148)+105)/* var_c37708 */ ))+68) ); (void) ( *( (fPt) ((* (ptr) pd209 ))))((* ((( (ptr) &var_c43116)+7)/* reply_v14900 */ ) ), pd209); }; SOURCE(17735, 19) (* (( (ptr) (* (( (ptr) &var_c43116)+7)/* reply_v14900 */ ))+8) ) = 0; SOURCE(17757, 22) { word pd210; pd210 = (* (( (ptr) (* (( (ptr) gf_c43148)+105)/* var_c37708 */ ))+67) ); (void) ( *( (fPt) ((* (ptr) pd210 ))))(c_v8684, (* (( (ptr) &var_c43116)+7)/* reply_v14900 */ ), pd210); }; }; }; }; SOURCE(16145, 1634) return((* (( (ptr) &var_c43116)+4)/* mapping_v8728 */ )); } static void action_P4200(c_v15032, formal_c43212) word c_v15032; word formal_c43212; { register ptr gf_c43180 = (ptr) &globalframe; word keyTable_v15140 = 0; word maxCode_v15168; word count_v15196 = 255; word firstKeyCode_v15224 = 0; word replyLength_v15252; word symsPerCode_v15280; word km_v15308; formal_c43212 = (formal_c43212 - 20); /* action: */ SOURCE(16238, 1094) SOURCE(16411, 60) km_v15308 = XR_NewObject(28, (* (( (ptr) gf_c43180)+7) )); SOURCE(16473, 136) if ((firstKeyCode_v15224 < (* (( (ptr) (* (( (ptr) c_v15032)+16) ))+13) ))) { SOURCE(16515, 59) { word idx211; count_v15196 = ( idx211 = (word) (count_v15196 - ((* (( (ptr) (* (( (ptr) c_v15032)+16) ))+13) ) - firstKeyCode_v15224)), BCK(idx211, 256) ); }; SOURCE(16576, 33) firstKeyCode_v15224 = (* (( (ptr) (* (( (ptr) c_v15032)+16) ))+13) ); }; SOURCE(16614, 63) { word x212; word idx213; count_v15196 = ( idx213 = (word) (x212 = (((* (( (ptr) (* (( (ptr) c_v15032)+16) ))+14) ) - firstKeyCode_v15224) + 1), MIN((int)(word), count_v15196, x212)), BCK(idx213, 256) ); }; SOURCE(16679, 30) (* (( (ptr) km_v15308)+2) ) = firstKeyCode_v15224; SOURCE(16711, 16) (* (( (ptr) km_v15308)+3) ) = count_v15196; SOURCE(16729, 27) (* (ptr) km_v15308 ) = (* (( (ptr) (* (( (ptr) c_v15032)+16) ))+13) ); SOURCE(16758, 27) (* (( (ptr) km_v15308)+1) ) = (* (( (ptr) (* (( (ptr) c_v15032)+16) ))+14) ); SOURCE(16787, 19) { word pd214; pd214 = (* (( (ptr) (* (( (ptr) gf_c43180)+105)/* var_c37708 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd214 ))))(c_v15032, 101, 0, 2, pd214); }; SOURCE(16808, 27) { word pd215; pd215 = (* (( (ptr) (* (( (ptr) gf_c43180)+105)/* var_c37708 */ ))+19) ); (void) ( *( (fPt) ((* (ptr) pd215 ))))(c_v15032, firstKeyCode_v15224, pd215); }; SOURCE(16838, 15) { word pd216; pd216 = (* (( (ptr) (* (( (ptr) gf_c43180)+105)/* var_c37708 */ ))+19) ); (void) ( *( (fPt) ((* (ptr) pd216 ))))(c_v15032, count_v15196, pd216); }; SOURCE(16856, 12) { word pd217; pd217 = (* (( (ptr) (* (( (ptr) gf_c43180)+105)/* var_c37708 */ ))+20) ); (void) ( *( (fPt) ((* (ptr) pd217 ))))(c_v15032, 0, pd217); }; SOURCE(16879, 26) { word pd218; pd218 = (* (( (ptr) (* (( (ptr) gf_c43180)+105)/* var_c37708 */ ))+62) ); (* (( (ptr) formal_c43212)+7) ) = (word) ( *( (fPt) ((* (ptr) pd218 ))))(c_v15032, pd218); }; SOURCE(16907, 45) if (( (unsigned) (* (bPt) (* (( (ptr) formal_c43212)+7) ) ) != 1)) { SOURCE(16930, 22) return; }; SOURCE(16954, 24) (* (( (ptr) km_v15308)+5) ) = (* (( (ptr) (* (( (ptr) formal_c43212)+7) ))+8) ); SOURCE(16980, 27) { word pd219; pd219 = (* (( (ptr) (* (( (ptr) gf_c43180)+105)/* var_c37708 */ ))+77) ); symsPerCode_v15280 = (word) ( *( (fPt) ((* (ptr) pd219 ))))((* ((( (ptr) formal_c43212)+7)) ), pd219); }; SOURCE(17009, 14) (* (( (ptr) (* (( (ptr) formal_c43212)+7) ))+10) ) = ((* (( (ptr) (* (( (ptr) formal_c43212)+7) ))+10) ) + 2); SOURCE(17042, 28) { word pd220; word idx221; pd220 = (* (( (ptr) (* (( (ptr) gf_c43180)+105)/* var_c37708 */ ))+79) ); replyLength_v15252 = ( idx221 = (word) ( *( (fPt) ((* (ptr) pd220 ))))((* ((( (ptr) formal_c43212)+7)) ), pd220), SGNCK(idx221) ); }; SOURCE(17072, 28) (* (( (ptr) km_v15308)+4) ) = symsPerCode_v15280; SOURCE(17102, 46) if (( (int)replyLength_v15252 != (int)IOP2( * , (int)(* (( (ptr) km_v15308)+4) ), (int)(* (( (ptr) km_v15308)+3) )))) { SOURCE(17148, 5) (void) XR_RaiseUnnamedError(); }; SOURCE(17155, 38) { W2 var_c40108; (void) MakeKeyTable_P1680((word) &var_c40108, km_v15308); maxCode_v15168 = var_c40108.f1; keyTable_v15140 = var_c40108.f0; }; SOURCE(17195, 63) { word var_c40140; { word pd222; pd222 = (* (( (ptr) (* (( (ptr) gf_c43180)+111)/* var_c40172 */ ))+9) ); var_c40140 = (word) ( *( (fPt) ((* (ptr) pd222 ))))(keyTable_v15140, maxCode_v15168, pd222); }; (* (( (ptr) formal_c43212)+4) ) = var_c40140; (* (( (ptr) km_v15308)+6) ) = var_c40140; }; SOURCE(17260, 53) { word pd223; pd223 = (* (( (ptr) (* (( (ptr) gf_c43180)+110)/* var_c40012 */ ))+7) ); (void) ( *( (fPt) ((* (ptr) pd223 ))))(c_v15032, (* (( (ptr) gf_c43180)+29) ), km_v15308, pd223); }; SOURCE(17315, 17) (* (( (ptr) (* (( (ptr) formal_c43212)+8) ))+3) ) = km_v15308; } static void MakeKeyTable_P1680(formal_c0348, xKeyMap_v8788) word formal_c0348; word xKeyMap_v8788; { register ptr gf_c43244 = (ptr) &globalframe; word keyTable_v8844; word maxCode_v8872; word tab_v15364 = 0; word min_v15392; word max_v15420; word count_v15448; /* MakeKeyTable: */ SOURCE(17788, 900) SOURCE(17788, 900) keyTable_v8844 = 0; SOURCE(17958, 32) count_v15448 = (word) XMapCount_P1860(xKeyMap_v8788); SOURCE(17992, 31) { W2 var_c40204; (void) XMapRange_P1920((word) &var_c40204, xKeyMap_v8788); max_v15420 = var_c40204.f1; min_v15392 = var_c40204.f0; }; SOURCE(18025, 44) tab_v15364 = XR_NewObject(1024, (* (( (ptr) gf_c43244)+28) )); SOURCE(18071, 205) { register word keyCode_v15492; register word noName_c40268; keyCode_v15492 = min_v15392; noName_c40268 = max_v15420; if ((keyCode_v15492 > noName_c40268)) { goto lab_L100045; }; lab_L100048: ; { word ks_v15536; SOURCE(18112, 65) { word var_c40300; word var_c40332; var_c40300 = ((word) count_v15448 << 2); var_c40332 = XR_NewObject((4 + var_c40300), (* (( (ptr) gf_c43244)+21) )); (* (ptr) var_c40332 ) = count_v15448; ks_v15536 = var_c40332; }; SOURCE(18179, 69) { register word n_v15592 = 0; register word noName_c40364; noName_c40364 = count_v15448; if ((n_v15592 >= noName_c40364)) { goto lab_L100049; }; lab_L100052: ; SOURCE(18208, 40) { word var_c40396; var_c40396 = (word) XMapKeyCode_P1980(xKeyMap_v8788, keyCode_v15492, n_v15592); { word limit224; (* ((( (ptr) ks_v15536)+1)+( limit224 = (* (ptr) ks_v15536 ), BCK(n_v15592, limit224) )) ) = var_c40396; }; }; n_v15592 = (n_v15592 + 1); if ((n_v15592 < noName_c40364)) { goto lab_L100052; }; lab_L100049: ; }; SOURCE(18259, 17) (* (( (ptr) tab_v15364)+keyCode_v15492) ) = ks_v15536; }; if ((keyCode_v15492 >= noName_c40268)) { goto lab_L100045; }; keyCode_v15492 = (keyCode_v15492 + 1); goto lab_L100048; lab_L100045: ; }; SOURCE(18287, 354) { word ksl_v15636; word ksm_v15664; word ksr_v15692; SOURCE(18293, 62) ksl_v15636 = XR_NewObject(8, (* (( (ptr) gf_c43244)+21) )); (* (ptr) ksl_v15636 ) = 1; SOURCE(18357, 62) ksm_v15664 = XR_NewObject(8, (* (( (ptr) gf_c43244)+21) )); (* (ptr) ksm_v15664 ) = 1; SOURCE(18421, 62) ksr_v15692 = XR_NewObject(8, (* (( (ptr) gf_c43244)+21) )); (* (ptr) ksr_v15692 ) = 1; SOURCE(18485, 31) { word limit225; (* ((( (ptr) ksl_v15636)+1)+( limit225 = (* (ptr) ksl_v15636 ), BCK(0, limit225) )) ) = 268894209; }; SOURCE(18518, 17) (* (( (ptr) tab_v15364)+1) ) = ksl_v15636; SOURCE(18537, 31) { word limit226; (* ((( (ptr) ksm_v15664)+1)+( limit226 = (* (ptr) ksm_v15664 ), BCK(0, limit226) )) ) = 268894210; }; SOURCE(18570, 17) (* (( (ptr) tab_v15364)+2) ) = ksm_v15664; SOURCE(18589, 31) { word limit227; (* ((( (ptr) ksr_v15692)+1)+( limit227 = (* (ptr) ksr_v15692 ), BCK(0, limit227) )) ) = 268894211; }; SOURCE(18622, 17) (* (( (ptr) tab_v15364)+3) ) = ksr_v15692; }; SOURCE(18646, 14) keyTable_v8844 = tab_v15364; SOURCE(18662, 26) maxCode_v8872 = (unsigned) ((MAX( (unsigned) , max_v15420, 3)) & 0377); /* removed tail goto */ (* (ptr) formal_c0348 ) = keyTable_v8844; (* (( (ptr) formal_c0348)+1) ) = maxCode_v8872; return; } static word GetModifierMapping_P1740(c_v8932) word c_v8932; { W9 var_c43276; register ptr gf_c43308 = (ptr) &globalframe; /* declaration of modifierMapping_v8976 skipped */ /* declaration of var_c40524 skipped */ /* declaration of cp_v15772 skipped */ word cache_v15800; /* GetModifierMapping: */ SOURCE(18847, 972) { word tmpAddr228; tmpAddr228 = (word) (( (ptr) &var_c43276)+5)/* var_c40524 */ ; (* (ptr) tmpAddr228 ) = ( ((word) (fPt) action_P4596) ); (* (( (ptr) tmpAddr228) + 1) ) = 1; }; SOURCE(18847, 972) (* (( (ptr) &var_c43276)+4)/* modifierMapping_v8976 */ ) = 0; SOURCE(18942, 42) (* (( (ptr) &var_c43276)+7)/* cp_v15772 */ ) = (* (( (ptr) c_v8932)+24) ); SOURCE(18986, 49) cache_v15800 = (* (( (ptr) (* (( (ptr) &var_c43276)+7)/* cp_v15772 */ ))+4) ); SOURCE(19038, 781) if ((cache_v15800 != 0)) { SOURCE(19056, 20) return(cache_v15800); } else { SOURCE(19076, 743) { word var_c40556; { word pd229; pd229 = (* (( (ptr) (* (( (ptr) gf_c43308)+110)/* var_c40012 */ ))+8) ); var_c40556 = (word) ( *( (fPt) ((* (ptr) pd229 ))))(c_v8932, (* (( (ptr) gf_c43308)+30) ), pd229); }; if ((var_c40556 == 0)) { goto lab_L100053; }; if (((* (( (ptr) gf_c43308)+8) ) == XR_GetReferentType(var_c40556))) { { word mm_v15868; mm_v15868 = var_c40556; SOURCE(19179, 17) (* (( (ptr) (* (( (ptr) &var_c43276)+7)/* cp_v15772 */ ))+4) ) = mm_v15868; SOURCE(19198, 11) return(mm_v15868); }; } else { lab_L100053: ; SOURCE(19223, 598) { /* declaration of reply_v15924 skipped */ SOURCE(19225, 12) (* (( (ptr) &var_c43276)+8)/* reply_v15924 */ ) = 0; SOURCE(19749, 27) { word pd230; pd230 = (* (( (ptr) (* (( (ptr) gf_c43308)+105)/* var_c37708 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd230 ))))(c_v8932, (word) (( (bPt) &var_c43276)+20)/* var_c40524 */ , 0, pd230); }; SOURCE(19778, 17) { word pd231; pd231 = (* (( (ptr) (* (( (ptr) gf_c43308)+105)/* var_c37708 */ ))+68) ); (void) ( *( (fPt) ((* (ptr) pd231 ))))((* ((( (ptr) &var_c43276)+8)/* reply_v15924 */ ) ), pd231); }; SOURCE(19797, 22) { word pd232; pd232 = (* (( (ptr) (* (( (ptr) gf_c43308)+105)/* var_c37708 */ ))+67) ); (void) ( *( (fPt) ((* (ptr) pd232 ))))(c_v8932, (* (( (ptr) &var_c43276)+8)/* reply_v15924 */ ), pd232); }; }; }; }; }; SOURCE(18847, 972) return((* (( (ptr) &var_c43276)+4)/* modifierMapping_v8976 */ )); } static void action_P4596(c_v16028, formal_c43372) word c_v16028; word formal_c43372; { register ptr gf_c43340 = (ptr) &globalframe; word mm_v16056 = 0; word keycodesPerModifier_v16084; formal_c43372 = (formal_c43372 - 20); /* action: */ SOURCE(19239, 14) SOURCE(19332, 19) { word pd233; pd233 = (* (( (ptr) (* (( (ptr) gf_c43340)+105)/* var_c37708 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd233 ))))(c_v16028, 119, 0, 1, pd233); }; SOURCE(19353, 26) { word pd234; pd234 = (* (( (ptr) (* (( (ptr) gf_c43340)+105)/* var_c37708 */ ))+62) ); (* (( (ptr) formal_c43372)+8) ) = (word) ( *( (fPt) ((* (ptr) pd234 ))))(c_v16028, pd234); }; SOURCE(19381, 45) if (( (unsigned) (* (bPt) (* (( (ptr) formal_c43372)+8) ) ) != 1)) { SOURCE(19404, 22) return; }; SOURCE(19428, 35) { word pd235; pd235 = (* (( (ptr) (* (( (ptr) gf_c43340)+105)/* var_c37708 */ ))+77) ); keycodesPerModifier_v16084 = (word) ( *( (fPt) ((* (ptr) pd235 ))))((* ((( (ptr) formal_c43372)+8)) ), pd235); }; SOURCE(19465, 15) (* (( (ptr) (* (( (ptr) formal_c43372)+8) ))+10) ) = ((* (( (ptr) (* (( (ptr) formal_c43372)+8) ))+10) ) + 30); SOURCE(19483, 54) { word var_c40588; word var_c40620; var_c40588 = ((word) keycodesPerModifier_v16084 << 5); var_c40620 = XR_NewObject((4 + var_c40588), (* (( (ptr) gf_c43340)+8) )); (* (ptr) var_c40620 ) = keycodesPerModifier_v16084; mm_v16056 = var_c40620; }; SOURCE(19539, 95) { register word i_v16140 = 0; register word noName_c40652; noName_c40652 = (* (ptr) mm_v16056 ); if ((i_v16140 >= noName_c40652)) { goto lab_L100054; }; lab_L100057: ; SOURCE(19569, 65) { register word m_v16184 = 0; lab_L100061: ; SOURCE(19605, 29) { word var_c40684; { word pd236; pd236 = (* (( (ptr) (* (( (ptr) gf_c43340)+105)/* var_c37708 */ ))+77) ); var_c40684 = (word) ( *( (fPt) ((* (ptr) pd236 ))))((* ((( (ptr) formal_c43372)+8)) ), pd236); }; { word limit237; (* (( (ptr) (( (W8Pt) (( (ptr) mm_v16056)+1))+( limit237 = (* (ptr) mm_v16056 ), BCK(i_v16140, limit237) )))+m_v16184) ) = var_c40684; }; }; if ((m_v16184 >= 7)) { goto lab_L100058; }; m_v16184 = (m_v16184 + 1); goto lab_L100061; lab_L100058: ; }; i_v16140 = (i_v16140 + 1); if ((i_v16140 < noName_c40652)) { goto lab_L100057; }; lab_L100054: ; }; SOURCE(19654, 53) { word pd238; pd238 = (* (( (ptr) (* (( (ptr) gf_c43340)+110)/* var_c40012 */ ))+7) ); (void) ( *( (fPt) ((* (ptr) pd238 ))))(c_v16028, (* (( (ptr) gf_c43340)+30) ), mm_v16056, pd238); }; SOURCE(19709, 35) { word var_c40716; var_c40716 = mm_v16056; (* (( (ptr) formal_c43372)+4) ) = mm_v16056; (* (( (ptr) (* (( (ptr) formal_c43372)+7) ))+4) ) = var_c40716; }; } static word GetPointerMapping_P1800(c_v9036) word c_v9036; { W9 var_c43404; register ptr gf_c43436 = (ptr) &globalframe; /* declaration of pointerMapping_v9080 skipped */ /* declaration of var_c40748 skipped */ /* declaration of cp_v16228 skipped */ word cache_v16256; /* GetPointerMapping: */ SOURCE(19885, 922) { word tmpAddr239; tmpAddr239 = (word) (( (ptr) &var_c43404)+5)/* var_c40748 */ ; (* (ptr) tmpAddr239 ) = ( ((word) (fPt) action_P4848) ); (* (( (ptr) tmpAddr239) + 1) ) = 1; }; SOURCE(19885, 922) (* (( (ptr) &var_c43404)+4)/* pointerMapping_v9080 */ ) = 0; SOURCE(19977, 42) (* (( (ptr) &var_c43404)+7)/* cp_v16228 */ ) = (* (( (ptr) c_v9036)+24) ); SOURCE(20021, 48) cache_v16256 = (* (( (ptr) (* (( (ptr) &var_c43404)+7)/* cp_v16228 */ ))+5) ); SOURCE(20105, 702) if ((cache_v16256 != 0)) { SOURCE(20123, 20) return(cache_v16256); } else { SOURCE(20143, 664) { word var_c40780; { word pd240; pd240 = (* (( (ptr) (* (( (ptr) gf_c43436)+110)/* var_c40012 */ ))+8) ); var_c40780 = (word) ( *( (fPt) ((* (ptr) pd240 ))))(c_v9036, (* (( (ptr) gf_c43436)+30) ), pd240); }; if ((var_c40780 == 0)) { goto lab_L100062; }; if (((* (( (ptr) gf_c43436)+9) ) == XR_GetReferentType(var_c40780))) { { word pm_v16324; pm_v16324 = var_c40780; SOURCE(20245, 17) (* (( (ptr) (* (( (ptr) &var_c43404)+7)/* cp_v16228 */ ))+5) ) = pm_v16324; SOURCE(20264, 11) return(pm_v16324); }; } else { lab_L100062: ; SOURCE(20289, 520) { /* declaration of reply_v16380 skipped */ SOURCE(20291, 12) (* (( (ptr) &var_c43404)+8)/* reply_v16380 */ ) = 0; SOURCE(20737, 27) { word pd241; pd241 = (* (( (ptr) (* (( (ptr) gf_c43436)+105)/* var_c37708 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd241 ))))(c_v9036, (word) (( (bPt) &var_c43404)+20)/* var_c40748 */ , 0, pd241); }; SOURCE(20766, 17) { word pd242; pd242 = (* (( (ptr) (* (( (ptr) gf_c43436)+105)/* var_c37708 */ ))+68) ); (void) ( *( (fPt) ((* (ptr) pd242 ))))((* ((( (ptr) &var_c43404)+8)/* reply_v16380 */ ) ), pd242); }; SOURCE(20785, 22) { word pd243; pd243 = (* (( (ptr) (* (( (ptr) gf_c43436)+105)/* var_c37708 */ ))+67) ); (void) ( *( (fPt) ((* (ptr) pd243 ))))(c_v9036, (* (( (ptr) &var_c43404)+8)/* reply_v16380 */ ), pd243); }; }; }; }; }; SOURCE(19885, 922) return((* (( (ptr) &var_c43404)+4)/* pointerMapping_v9080 */ )); } static void action_P4848(c_v16484, formal_c43500) word c_v16484; word formal_c43500; { register ptr gf_c43468 = (ptr) &globalframe; word pm_v16512 = 0; word n_v16540; formal_c43500 = (formal_c43500 - 20); /* action: */ SOURCE(20305, 14) SOURCE(20379, 19) { word pd244; pd244 = (* (( (ptr) (* (( (ptr) gf_c43468)+105)/* var_c37708 */ ))+17) ); (void) ( *( (fPt) ((* (ptr) pd244 ))))(c_v16484, 117, 0, 1, pd244); }; SOURCE(20400, 26) { word pd245; pd245 = (* (( (ptr) (* (( (ptr) gf_c43468)+105)/* var_c37708 */ ))+62) ); (* (( (ptr) formal_c43500)+8) ) = (word) ( *( (fPt) ((* (ptr) pd245 ))))(c_v16484, pd245); }; SOURCE(20428, 45) if (( (unsigned) (* (bPt) (* (( (ptr) formal_c43500)+8) ) ) != 1)) { SOURCE(20451, 22) return; }; SOURCE(20475, 17) { word pd246; pd246 = (* (( (ptr) (* (( (ptr) gf_c43468)+105)/* var_c37708 */ ))+77) ); n_v16540 = (word) ( *( (fPt) ((* (ptr) pd246 ))))((* ((( (ptr) formal_c43500)+8)) ), pd246); }; SOURCE(20512, 15) (* (( (ptr) (* (( (ptr) formal_c43500)+8) ))+10) ) = ((* (( (ptr) (* (( (ptr) formal_c43500)+8) ))+10) ) + 30); SOURCE(20530, 37) { word var_c40812; word var_c40844; word var_c40876; var_c40812 = (n_v16540 + 1); var_c40844 = ((word) var_c40812 << 2); var_c40876 = XR_NewObject((4 + var_c40844), (* (( (ptr) gf_c43468)+9) )); (* (ptr) var_c40876 ) = var_c40812; pm_v16512 = var_c40876; }; SOURCE(20569, 9) { word limit247; (* ((( (ptr) pm_v16512)+1)+( limit247 = (* (ptr) pm_v16512 ), BCK(0, limit247) )) ) = 0; }; SOURCE(20580, 52) { register word i_v16596 = 1; register word noName_c40908; noName_c40908 = (* (ptr) pm_v16512 ); if ((i_v16596 >= noName_c40908)) { goto lab_L100063; }; lab_L100066: ; SOURCE(20611, 21) { word var_c40940; { word pd248; pd248 = (* (( (ptr) (* (( (ptr) gf_c43468)+105)/* var_c37708 */ ))+77) ); var_c40940 = (word) ( *( (fPt) ((* (ptr) pd248 ))))((* ((( (ptr) formal_c43500)+8)) ), pd248); }; { word limit249; (* ((( (ptr) pm_v16512)+1)+( limit249 = (* (ptr) pm_v16512 ), BCK(i_v16596, limit249) )) ) = var_c40940; }; }; i_v16596 = (i_v16596 + 1); if ((i_v16596 < noName_c40908)) { goto lab_L100066; }; lab_L100063: ; }; SOURCE(20643, 53) { word pd250; pd250 = (* (( (ptr) (* (( (ptr) gf_c43468)+110)/* var_c40012 */ ))+7) ); (void) ( *( (fPt) ((* (ptr) pd250 ))))(c_v16484, (* (( (ptr) gf_c43468)+30) ), pm_v16512, pd250); }; SOURCE(20698, 34) { word var_c40972; var_c40972 = pm_v16512; (* (( (ptr) formal_c43500)+4) ) = pm_v16512; (* (( (ptr) (* (( (ptr) formal_c43500)+7) ))+5) ) = var_c40972; }; } static word XMapCount_P1860(mapping_v9140) word mapping_v9140; { word count_v9196; /* XMapCount: */ SOURCE(20816, 116) SOURCE(20903, 29) return((* (( (ptr) mapping_v9140)+4) )); } static void XMapRange_P1920(formal_c0391, mapping_v9256) word formal_c0391; word mapping_v9256; { word min_v9312; word max_v9340; word maxCard_v16640; /* XMapRange: */ SOURCE(20936, 202) SOURCE(21029, 61) maxCard_v16640 = (((* (( (ptr) mapping_v9256)+2) ) + (* (( (ptr) mapping_v9256)+3) )) - 1); SOURCE(21092, 26) min_v9312 = (* (( (ptr) mapping_v9256)+2) ); SOURCE(21120, 18) max_v9340 = BCK(maxCard_v16640, 256); /* removed tail goto */ (* (ptr) formal_c0391 ) = min_v9312; (* (( (ptr) formal_c0391)+1) ) = max_v9340; return; } static word XMapKeyCode_P1980(mapping_v9400, key_v9428, no_v9456) word mapping_v9400; word key_v9428; word no_v9456; { word keysym_v9512; word index_v16684; /* XMapKeyCode: */ SOURCE(21144, 459) SOURCE(21144, 459) keysym_v9512 = 0; SOURCE(21281, 46) if (( (int)no_v9456 < (int)0) || ( (int)no_v9456 >= (int)(* (( (ptr) mapping_v9400)+4) ))) { SOURCE(21321, 6) return(keysym_v9512); }; SOURCE(21329, 39) if ((key_v9428 < (* (( (ptr) mapping_v9400)+2) ))) { SOURCE(21362, 6) return(keysym_v9512); }; SOURCE(21370, 64) if (( (int)key_v9428 >= (int)((* (( (ptr) mapping_v9400)+2) ) + (* (( (ptr) mapping_v9400)+3) )))) { SOURCE(21428, 6) return(keysym_v9512); }; SOURCE(21436, 80) index_v16684 = IOP2( * , (int)(IOP2( * , (int)(key_v9428 - (* (( (ptr) mapping_v9400)+2) )), (int)(* (( (ptr) mapping_v9400)+4) )) + no_v9456), (int)4); SOURCE(21526, 77) SOURCE(21528, 73) { word var_c41004; word b_v36044; b_v36044 = (* (( (ptr) mapping_v9400)+5) ); { word ln_v35440; ln_v35440 = (((word) (((word) (((word) (unsigned) (word) (* (( (bPt) b_v36044)+index_v16684) ) << 8) + (unsigned) (word) (* ( ( (bPt) b_v36044)+(index_v16684 + 1)) )) << 8) + (unsigned) (word) (* (( (bPt) b_v36044)+(index_v16684 + 2)) )) << 8) + (unsigned) (word) (* (( (bPt) b_v36044)+(index_v16684 + 3)) )); var_c41004 = ln_v35440; }; keysym_v9512 = var_c41004; }; SOURCE(21144, 459) return(keysym_v9512); } static void NoName_Q5676(formal_c0404, formal_c200000, formal_c200001, formal_c200002, formal_c200003) word formal_c0404; word formal_c200000; word formal_c200001; word formal_c200002; word formal_c200003; { SOURCE(2908, 9) (* (ptr) formal_c0404 ) = 2; (* (( (ptr) formal_c0404)+1) ) = 2; return; /* c2c skipped dead code */ } /* file: XlImplTexts, module: XlImplTexts, compiled at: September 14, 1993 4:25:47 pm PDT */ extern void XR_install_XlImplTexts() { NoName_Q5556(); } extern void XR_run_XlImplTexts() { XR_Start(&globalframe); }