/* Generated with C2C (Cedar To C)*/ /* Copyright (C) 1993 by Xerox Corporation. All rights reserved. */ /* time: July 28, 1993 10:17:31 am PDT */ /* C2C version: April 20, 1993 (sun4) */ /* ref-counting: off */ /* file: ImagerErrorImpl, module: ImagerErrorImpl */ /* switches: bcfhklnouw */ #include #include static char versionStamp[] = "@(#)mob_version [2631171420,176140034] ImagerErrorImpl"; typedef unsigned word, *ptr; typedef unsigned char byte, *bPt; typedef unsigned short half, *hPt; typedef word (*fPt)(); #define SOURCE(p, l) /* source p, l */ static void NoName_Q348(); static void ImagerErrorImpl_P0(); static word ErrorCodeFromAtom_P60(); static word NameFromErrorCode_P120(); static word AtomFromErrorCode_P180(); static word AtomForNumber_P240(); static struct {unsigned f; char r[4];} string1 = {131076, "\216\251\000"}; static struct {unsigned f; char r[4];} string2 = {65537, "\001\000\000"}; static struct {unsigned f; char r[44];} string3 = {2818092, "\216\260\007\006\154\145\156\147\164\150\210\241\000\200\177\377\005\004\164\145\170\164\254\206\012\011\155\141\170\114\145\156\147\164\150\210\241\000\200\177\377\243\261"}; static struct {unsigned f; char r[12];} string4 = {655372, "zeroDivide\000"}; static struct {unsigned f; char r[12];} string5 = {524300, "nilFault\000\000\000"}; static struct {unsigned f; char r[20];} string6 = {1179668, "insufficientMemory\000"}; static struct {unsigned f; char r[8];} string7 = {458760, "ioError"}; static struct {unsigned f; char r[8];} string8 = {458760, "timeout"}; static struct {unsigned f; char r[4];} string9 = {196612, "eof"}; static struct {unsigned f; char r[24];} string10 = {1310744, "numericalInstability\000\000\000"}; static struct {unsigned f; char r[4];} string11 = {196612, "bug"}; static struct {unsigned f; char r[16];} string12 = {786448, "fileNotFound\000\000\000"}; static struct {unsigned f; char r[28];} string13 = {1703964, "colorModelOperatorNotFound\000"}; static struct {unsigned f; char r[24];} string14 = {1376280, "colorOperatorNotFound\000\000"}; static struct {unsigned f; char r[16];} string15 = {851984, "colorNotFound\000\000"}; static struct {unsigned f; char r[24];} string16 = {1310744, "decompressorNotFound\000\000\000"}; static struct {unsigned f; char r[16];} string17 = {786448, "fontNotFound\000\000\000"}; static struct {unsigned f; char r[20];} string18 = {1048596, "operatorNotFound\000\000\000"}; static struct {unsigned f; char r[20];} string19 = {1048596, "resourceNotFound\000\000\000"}; static struct {unsigned f; char r[12];} string20 = {720908, "accessError"}; static struct {unsigned f; char r[8];} string21 = {393224, "syntax\000"}; static struct {unsigned f; char r[20];} string22 = {1179668, "undefinedOperation\000"}; static struct {unsigned f; char r[28];} string23 = {1638428, "invalidCompressedSequence\000\000"}; static struct {unsigned f; char r[16];} string24 = {851984, "malformedFont\000\000"}; static struct {unsigned f; char r[16];} string25 = {983056, "invalidEncoding"}; static struct {unsigned f; char r[16];} string26 = {851984, "invalidHeader\000\000"}; static struct {unsigned f; char r[20];} string27 = {1114132, "invalidIdentifier\000\000"}; static struct {unsigned f; char r[28];} string28 = {1703964, "invalidInstructionProperty\000"}; static struct {unsigned f; char r[12];} string29 = {720908, "invalidName"}; static struct {unsigned f; char r[16];} string30 = {851984, "invalidString\000\000"}; static struct {unsigned f; char r[16];} string31 = {786448, "invalidToner\000\000\000"}; static struct {unsigned f; char r[16];} string32 = {917520, "invalidVersion\000"}; static struct {unsigned f; char r[12];} string33 = {589836, "nullValue\000\000"}; static struct {unsigned f; char r[24];} string34 = {1507352, "illegalAlternateMetrics"}; static struct {unsigned f; char r[16];} string35 = {786448, "illegalColor\000\000\000"}; static struct {unsigned f; char r[20];} string36 = {1245204, "unknownSpecialColor"}; static struct {unsigned f; char r[20];} string37 = {1114132, "unknownSignalType\000\000"}; static struct {unsigned f; char r[12];} string38 = {655372, "wrongShape\000"}; static struct {unsigned f; char r[12];} string39 = {589836, "wrongSize\000\000"}; static struct {unsigned f; char r[12];} string40 = {720908, "notCardinal"}; static struct {unsigned f; char r[12];} string41 = {655372, "notInteger\000"}; static struct {unsigned f; char r[12];} string42 = {589836, "notNumber\000\000"}; static struct {unsigned f; char r[12];} string43 = {589836, "wrongType\000\000"}; static struct {unsigned f; char r[8];} string44 = {393224, "noFont\000"}; static struct {unsigned f; char r[20];} string45 = {1048596, "illegalArguments\000\000\000"}; static struct {unsigned f; char r[24];} string46 = {1376280, "illegalTransformation\000\000"}; static struct {unsigned f; char r[20];} string47 = {1048596, "illegalPixelMask\000\000\000"}; static struct {unsigned f; char r[24];} string48 = {1376280, "illegalPropertyVector\000\000"}; static struct {unsigned f; char r[20];} string49 = {1048596, "illegalRunVector\000\000\000"}; static struct {unsigned f; char r[20];} string50 = {1114132, "undefinedProperty\000\000"}; static struct {unsigned f; char r[16];} string51 = {851984, "stackOverflow\000\000"}; static struct {unsigned f; char r[16];} string52 = {917520, "stackUnderflow\000"}; static struct {unsigned f; char r[20];} string53 = {1245204, "saveRestoreMismatch"}; static struct {unsigned f; char r[16];} string54 = {786448, "markMismatch\000\000\000"}; static struct {unsigned f; char r[16];} string55 = {786448, "unmarkFailed\000\000\000"}; static struct {unsigned f; char r[28];} string56 = {1572892, "invalidOperationSequence\000\000\000"}; static struct {unsigned f; char r[20];} string57 = {1114132, "obsoleteConstruct\000\000"}; static struct {unsigned f; char r[28];} string58 = {1572892, "unsupportedColorOperator\000\000\000"}; static struct {unsigned f; char r[16];} string59 = {917520, "notImplemented\000"}; static struct {unsigned f; char r[16];} string60 = {851984, "unimplemented\000\000"}; static struct {unsigned f; char r[32];} string61 = {1900576, "squareEndOnStrokeOfZeroLength\000\000"}; static struct {unsigned f; char r[36];} string62 = {2293796, "unableToProperlyAdjustMaskPositions"}; static struct {unsigned f; char r[20];} string63 = {1114132, "noSubstituteColor\000\000"}; static struct {unsigned f; char r[20];} string64 = {1048596, "fontSubstitution\000\000\000"}; static struct {unsigned f; char r[12];} string65 = {655372, "appearance\000"}; static struct {unsigned f; char r[8];} string66 = {327688, "error\000\000"}; static struct {unsigned f; char r[16];} string67 = {851984, "copySensitive\000\000"}; static struct {unsigned f; char r[12];} string68 = {524300, "overflow\000\000\000"}; static struct {unsigned f; char r[8];} string69 = {393224, "bounds\000"}; static struct {unsigned f; char r[8];} string70 = {393224, "imager\000"}; static struct {unsigned f; char r[4];} string71 = {131076, "ok\000"}; static struct {unsigned f; char r[16];} string72 = {851984, "\257\300\234\324\175\134\300\012\177\257\002\100\164\000\000"}; static struct {unsigned f; char r[12];} string73 = {589833, "\006\001\044\010\000\004\100\104\001\000\000"}; static struct {unsigned f; char r[16];} string74 = {851984, "\257\300\055\153\222\376\300\327\164\352\142\100\150\000\000"}; static struct {unsigned f; char r[16];} string75 = {851984, "\257\300\255\053\300\023\300\142\135\315\105\100\150\000\000"}; static struct {unsigned f; char r[16];} string76 = {851984, "\257\300\332\223\177\020\300\304\076\102\260\100\164\000\000"}; static struct {unsigned f; char r[16];} string77 = {851984, "\257\300\045\370\116\014\300\270\323\074\131\100\150\000\000"}; static struct { word f0[79]; word f79; word f80; word f81; word f82; word f83; word f84; word f85; word f86; word f87; word f88[5]; } globalframe = { {0}, (word) AtomForNumber_P240, 0, (word) AtomFromErrorCode_P180, 0, (word) NameFromErrorCode_P120, 0, (word) ErrorCodeFromAtom_P60, 0, (word) ImagerErrorImpl_P0, {0} }; static void NoName_Q348() { register ptr gf_c027 = (ptr) &globalframe; word var_c7396; (* (( (ptr) gf_c027)+4) ) = (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2); (* (( (ptr) gf_c027)+7) ) = (word) XR_GetTypeIndex((word) &string3, 0, (word) &string2); (* (ptr) (( (bPt) gf_c027)+36) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string4); (* (ptr) (( (bPt) gf_c027)+40) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string5); (* (ptr) (( (bPt) gf_c027)+44) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string6); (* (ptr) (( (bPt) gf_c027)+48) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string7); (* (ptr) (( (bPt) gf_c027)+52) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string8); (* (ptr) (( (bPt) gf_c027)+56) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string9); (* (ptr) (( (bPt) gf_c027)+60) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string10); (* (ptr) (( (bPt) gf_c027)+64) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string11); (* (ptr) (( (bPt) gf_c027)+68) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string12); (* (ptr) (( (bPt) gf_c027)+72) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string13); (* (ptr) (( (bPt) gf_c027)+76) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string14); (* (ptr) (( (bPt) gf_c027)+80) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string15); (* (ptr) (( (bPt) gf_c027)+84) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string16); (* (ptr) (( (bPt) gf_c027)+88) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string17); (* (ptr) (( (bPt) gf_c027)+92) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string18); (* (ptr) (( (bPt) gf_c027)+96) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string19); (* (ptr) (( (bPt) gf_c027)+100) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string20); (* (ptr) (( (bPt) gf_c027)+104) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string21); (* (ptr) (( (bPt) gf_c027)+108) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string22); (* (ptr) (( (bPt) gf_c027)+112) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string23); (* (ptr) (( (bPt) gf_c027)+116) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string24); (* (ptr) (( (bPt) gf_c027)+120) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string25); (* (ptr) (( (bPt) gf_c027)+124) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string26); (* (ptr) (( (bPt) gf_c027)+128) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string27); (* (ptr) (( (bPt) gf_c027)+132) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string28); (* (ptr) (( (bPt) gf_c027)+136) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string29); (* (ptr) (( (bPt) gf_c027)+140) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string30); (* (ptr) (( (bPt) gf_c027)+144) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string31); (* (ptr) (( (bPt) gf_c027)+148) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string32); (* (ptr) (( (bPt) gf_c027)+152) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string33); (* (ptr) (( (bPt) gf_c027)+156) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string34); (* (ptr) (( (bPt) gf_c027)+160) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string35); (* (ptr) (( (bPt) gf_c027)+164) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string36); (* (ptr) (( (bPt) gf_c027)+168) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string37); (* (ptr) (( (bPt) gf_c027)+172) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string38); (* (ptr) (( (bPt) gf_c027)+176) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string39); (* (ptr) (( (bPt) gf_c027)+180) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string40); (* (ptr) (( (bPt) gf_c027)+184) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string41); (* (ptr) (( (bPt) gf_c027)+188) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string42); (* (ptr) (( (bPt) gf_c027)+192) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string43); (* (ptr) (( (bPt) gf_c027)+196) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string44); (* (ptr) (( (bPt) gf_c027)+200) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string45); (* (ptr) (( (bPt) gf_c027)+204) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string46); (* (ptr) (( (bPt) gf_c027)+208) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string47); (* (ptr) (( (bPt) gf_c027)+212) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string48); (* (ptr) (( (bPt) gf_c027)+216) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string49); (* (ptr) (( (bPt) gf_c027)+220) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string50); (* (ptr) (( (bPt) gf_c027)+224) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string51); (* (ptr) (( (bPt) gf_c027)+228) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string52); (* (ptr) (( (bPt) gf_c027)+232) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string53); (* (ptr) (( (bPt) gf_c027)+236) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string54); (* (ptr) (( (bPt) gf_c027)+240) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string55); (* (ptr) (( (bPt) gf_c027)+244) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string56); (* (ptr) (( (bPt) gf_c027)+248) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string57); (* (ptr) (( (bPt) gf_c027)+252) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string58); (* (ptr) (( (bPt) gf_c027)+256) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string59); (* (ptr) (( (bPt) gf_c027)+260) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string60); (* (ptr) (( (bPt) gf_c027)+264) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string61); (* (ptr) (( (bPt) gf_c027)+268) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string62); (* (ptr) (( (bPt) gf_c027)+272) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string63); (* (ptr) (( (bPt) gf_c027)+276) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string64); (* (ptr) (( (bPt) gf_c027)+280) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string65); (* (ptr) (( (bPt) gf_c027)+284) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string66); (* (ptr) (( (bPt) gf_c027)+288) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string67); (* (ptr) (( (bPt) gf_c027)+292) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string68); (* (ptr) (( (bPt) gf_c027)+296) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string69); (* (ptr) (( (bPt) gf_c027)+300) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+7) ), (word) &string70); (* (ptr) (( (bPt) gf_c027)+304) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c027)+4) ), (word) &string71); (void) XR_DeclareGlobalFrame((word) "ImagerErrorImpl", &globalframe, (word) XR_GetTypeIndex((word) &string72, 0, (word) &string73) , (word) (( (bPt) gf_c027)+348)/* var_c7236 */ ); var_c7396 = (word) XR_ImportInterface((word) "Atom", (word) XR_GetTypeIndexS((word) (&string74)), 16); (* (( (ptr) gf_c027)+91)/* var_c7364 */ ) = var_c7396; (void) XR_ImportProcS(var_c7396, 67372033); var_c7396 = (word) XR_ImportInterface((word) "Convert", (word) XR_GetTypeIndexS((word) (&string75)), 73); (* (( (ptr) gf_c027)+90)/* var_c7332 */ ) = var_c7396; (void) XR_ImportProcS(var_c7396, 68166916); var_c7396 = (word) XR_ImportInterface((word) "RefText", (word) XR_GetTypeIndexS((word) (&string76)), 26); (* (( (ptr) gf_c027)+89)/* var_c7300 */ ) = var_c7396; (void) XR_ImportProcS(var_c7396, 262913); (void) XR_ImportProcS(var_c7396, 68158468); (void) XR_ImportProcS(var_c7396, 67371521); var_c7396 = (word) XR_ExportInterface((word) "ImagerError", (word) XR_GetTypeIndexS((word) (&string77)), 3); (* (( (ptr) gf_c027)+92)/* var_c7428 */ ) = var_c7396; (void) XR_ExportVar(var_c7396, 0, (word) (( (bPt) gf_c027)+308)); (void) XR_ExportVar(var_c7396, 1, (word) (( (bPt) gf_c027)+312)); (void) XR_ExportProcS(var_c7396, (word) (( (bPt) gf_c027)+324)/* var_c7140 */ , 67371521, (word) "AtomFromErrorCode"); } static void ImagerErrorImpl_P0(formal_c015, formal_c014) word formal_c015; word formal_c014; { /* ImagerErrorImpl: */ } static word ErrorCodeFromAtom_P60(atom_v2976) word atom_v2976; { word var_c3020; /* ErrorCodeFromAtom: */ SOURCE(274, 207) SOURCE(354, 103) { register word e_v3360 = 0; lab_L100003: ; SOURCE(411, 46) if (((word) AtomFromErrorCode_P180(e_v3360) == atom_v2976)) { SOURCE(447, 10) return(e_v3360); }; if ((e_v3360 >= 255)) { goto lab_L100000; }; e_v3360 = (e_v3360 + 1); goto lab_L100003; lab_L100000: ; }; SOURCE(468, 13) return(10); } static word NameFromErrorCode_P120(code_v3080) word code_v3080; { word name_v3124; /* NameFromErrorCode: */ SOURCE(485, 168) SOURCE(485, 168) name_v3124 = 0; SOURCE(571, 30) name_v3124 = (word) AtomFromErrorCode_P180(code_v3080); SOURCE(603, 50) if ((name_v3124 == 0)) { SOURCE(622, 31) name_v3124 = (word) AtomForNumber_P240(code_v3080); }; SOURCE(485, 168) return(name_v3124); } static word AtomFromErrorCode_P180(code_v3184) word code_v3184; { register ptr gf_c7460 = (ptr) &globalframe; word var_c3228; /* AtomFromErrorCode: */ SOURCE(659, 2899) SOURCE(739, 2819) { word var_c7268; var_c7268 = code_v3184; switch (var_c7268) { case 0: return((* (( (ptr) gf_c7460)+76) )); case 1: return((* (( (ptr) gf_c7460)+74) )); case 2: return((* (( (ptr) gf_c7460)+73) )); case 3: return((* (( (ptr) gf_c7460)+9) )); case 4: return((* (( (ptr) gf_c7460)+10) )); case 5: return((* (( (ptr) gf_c7460)+11) )); case 6: return((* (( (ptr) gf_c7460)+12) )); case 7: return((* (( (ptr) gf_c7460)+13) )); case 8: return((* (( (ptr) gf_c7460)+14) )); case 9: return((* (( (ptr) gf_c7460)+15) )); case 10: return((* (( (ptr) gf_c7460)+16) )); case 20: return((* (( (ptr) gf_c7460)+17) )); case 21: return((* (( (ptr) gf_c7460)+18) )); case 22: return((* (( (ptr) gf_c7460)+19) )); case 23: return((* (( (ptr) gf_c7460)+20) )); case 24: return((* (( (ptr) gf_c7460)+21) )); case 25: return((* (( (ptr) gf_c7460)+22) )); case 26: return((* (( (ptr) gf_c7460)+23) )); case 27: return((* (( (ptr) gf_c7460)+24) )); case 28: return((* (( (ptr) gf_c7460)+25) )); case 40: return((* (( (ptr) gf_c7460)+26) )); case 41: return((* (( (ptr) gf_c7460)+27) )); case 42: return((* (( (ptr) gf_c7460)+28) )); case 43: return((* (( (ptr) gf_c7460)+29) )); case 44: return((* (( (ptr) gf_c7460)+30) )); case 45: return((* (( (ptr) gf_c7460)+31) )); case 46: return((* (( (ptr) gf_c7460)+32) )); case 47: return((* (( (ptr) gf_c7460)+33) )); case 48: return((* (( (ptr) gf_c7460)+34) )); case 49: return((* (( (ptr) gf_c7460)+35) )); case 50: return((* (( (ptr) gf_c7460)+36) )); case 51: return((* (( (ptr) gf_c7460)+37) )); case 60: return((* (( (ptr) gf_c7460)+38) )); case 61: return((* (( (ptr) gf_c7460)+39) )); case 62: return((* (( (ptr) gf_c7460)+40) )); case 63: return((* (( (ptr) gf_c7460)+41) )); case 64: return((* (( (ptr) gf_c7460)+42) )); case 65: return((* (( (ptr) gf_c7460)+43) )); case 66: return((* (( (ptr) gf_c7460)+44) )); case 67: return((* (( (ptr) gf_c7460)+45) )); case 68: return((* (( (ptr) gf_c7460)+46) )); case 69: return((* (( (ptr) gf_c7460)+47) )); case 70: return((* (( (ptr) gf_c7460)+48) )); case 71: return((* (( (ptr) gf_c7460)+49) )); case 72: return((* (( (ptr) gf_c7460)+50) )); case 73: return((* (( (ptr) gf_c7460)+51) )); case 74: return((* (( (ptr) gf_c7460)+52) )); case 75: return((* (( (ptr) gf_c7460)+53) )); case 76: return((* (( (ptr) gf_c7460)+54) )); case 77: return((* (( (ptr) gf_c7460)+55) )); case 80: return((* (( (ptr) gf_c7460)+56) )); case 81: return((* (( (ptr) gf_c7460)+57) )); case 82: return((* (( (ptr) gf_c7460)+58) )); case 83: return((* (( (ptr) gf_c7460)+59) )); case 84: return((* (( (ptr) gf_c7460)+60) )); case 85: return((* (( (ptr) gf_c7460)+61) )); case 100: return((* (( (ptr) gf_c7460)+62) )); case 101: return((* (( (ptr) gf_c7460)+63) )); case 102: return((* (( (ptr) gf_c7460)+64) )); case 103: return((* (( (ptr) gf_c7460)+65) )); case 120: return((* (( (ptr) gf_c7460)+66) )); case 121: return((* (( (ptr) gf_c7460)+67) )); case 122: return((* (( (ptr) gf_c7460)+68) )); case 123: return((* (( (ptr) gf_c7460)+69) )); case 124: return((* (( (ptr) gf_c7460)+70) )); case 140: return((* (( (ptr) gf_c7460)+71) )); case 160: return((* (( (ptr) gf_c7460)+72) )); default: return(0); }; }; } static word AtomForNumber_P240(card_v3288) word card_v3288; { register ptr gf_c7492 = (ptr) &globalframe; word atom_v3332; word t_v3404; /* AtomForNumber: */ SOURCE(3562, 227) SOURCE(3562, 227) atom_v3332 = 0; SOURCE(3620, 40) { word pd78; pd78 = (* (( (ptr) (* (( (ptr) gf_c7492)+89)/* var_c7300 */ ))+6) ); t_v3404 = (word) ( *( (fPt) ((* (ptr) pd78 ))))(100, pd78); }; SOURCE(3662, 31) { word pd79; pd79 = (* (( (ptr) (* (( (ptr) gf_c7492)+89)/* var_c7300 */ ))+8) ); t_v3404 = (word) ( *( (fPt) ((* (ptr) pd79 ))))(t_v3404, (* (( (ptr) gf_c7492)+75) ), 0, 32767, pd79); }; SOURCE(3695, 31) { word pd80; pd80 = (* (( (ptr) (* (( (ptr) gf_c7492)+90)/* var_c7332 */ ))+41) ); t_v3404 = (word) ( *( (fPt) ((* (ptr) pd80 ))))(t_v3404, card_v3288, 8, 1, pd80); }; SOURCE(3728, 34) { word pd81; pd81 = (* (( (ptr) (* (( (ptr) gf_c7492)+91)/* var_c7364 */ ))+8) ); atom_v3332 = (word) ( *( (fPt) ((* (ptr) pd81 ))))(t_v3404, pd81); }; SOURCE(3764, 25) { word pd82; pd82 = (* (( (ptr) (* (( (ptr) gf_c7492)+89)/* var_c7300 */ ))+7) ); (void) ( *( (fPt) ((* (ptr) pd82 ))))(t_v3404, pd82); }; SOURCE(3562, 227) return(atom_v3332); } /* file: ImagerErrorImpl, module: ImagerErrorImpl, compiled at: July 28, 1993 10:17:31 am PDT */ extern void XR_install_ImagerErrorImpl() { NoName_Q348(); } extern void XR_run_ImagerErrorImpl() { XR_Start(&globalframe); }