|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 11264 (0x2c00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a7cf5
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 1588 | | .CONST 0x1588 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 800c | | .CONST 0x800c ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0194 | | .CONST 0x0194 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0066 | f | .CONST 0x0066 ; Number of locals
000b INIT_0008:
000b 00bf | | Action Accept_Activation
000c e001 | | Load 0x0,0x1
000d 1b20 | | Execute Package,Field_Read,Field_Number 0x20
000e 00e9 | | Load_Encached String_Cache
000f 02a0 | | Declare_Subprogram Null_Subprogram
0010 4818 |H | Short_Literal 0x18
0011 03d3 | | Declare_Type Access,Defined,Accesses_Protected
0012 00d8 | | Load_Top At_Offset_0
0013 e002 | | Load 0x0,0x2
0014 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0015 02a0 | | Declare_Subprogram Null_Subprogram
0016 4802 |H | Short_Literal 0x2
0017 032d | - | Declare_Type Record,Defined
0018 4801 |H | Short_Literal 0x1
0019 4805 |H | Short_Literal 0x5
001a e20f | | Load 0x1,0xf
001b 02a0 | | Declare_Subprogram Null_Subprogram
001c 4801 |H | Short_Literal 0x1
001d 035d | ] | Declare_Type Array,Defined
001e 00d8 | | Load_Top At_Offset_0
001f 0337 | 7 | Declare_Variable Array
0020 00d8 | | Load_Top At_Offset_0
0021 0335 | 5 | Declare_Variable Array,Duplicate
0022 00cd | | Action Spare6_Action
0023 e20f | | Load 0x1,0xf
0024 0322 | " | Declare_Variable Record
0025 0092 0f14 | | Action Push_String_Extended,0xf14 ; "STANDARD"
0027 e20e | | Load 0x1,0xe
0028 03b6 | | Declare_Variable Access,By_Allocation,With_Value
0029 e213 | | Load 0x1,0x13
002a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
002b 00d8 | | Load_Top At_Offset_0
002c 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
002d 619e |a | Indirect_Literal Discrete,0x1cc,{0x00000000, 0x000c15c0}
002e e214 | | Load 0x1,0x14
002f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0030 4800 |H | Short_Literal 0x0
0031 e214 | | Load 0x1,0x14
0032 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0033 6194 |a | Indirect_Literal Discrete,0x1c8,{0x00000000, 0x000956a0}
0034 e214 | | Load 0x1,0x14
0035 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0036 4800 |H | Short_Literal 0x0
0037 e214 | | Load 0x1,0x14
0038 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0039 6192 |a | Indirect_Literal Discrete,0x1cc,{0x00000000, 0x000c15c0}
003a 00d0 | | Action Swap_Control
003b 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
003c 4801 |H | Short_Literal 0x1
003d e212 | | Load 0x1,0x12
003e 01d6 | | Execute Vector,Field_Write
003f 4805 |H | Short_Literal 0x5
0040 4802 |H | Short_Literal 0x2
0041 e20f | | Load 0x1,0xf
0042 0322 | " | Declare_Variable Record
0043 e20e | | Load 0x1,0xe
0044 e215 | | Load 0x1,0x15
0045 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0046 00d8 | | Load_Top At_Offset_0
0047 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0048 4800 |H | Short_Literal 0x0
0049 e216 | | Load 0x1,0x16
004a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
004b 4800 |H | Short_Literal 0x0
004c e216 | | Load 0x1,0x16
004d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
004e 4800 |H | Short_Literal 0x0
004f e216 | | Load 0x1,0x16
0050 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0051 4800 |H | Short_Literal 0x0
0052 e216 | | Load 0x1,0x16
0053 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0054 4800 |H | Short_Literal 0x0
0055 00d0 | | Action Swap_Control
0056 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0057 e214 | | Load 0x1,0x14
0058 e212 | | Load 0x1,0x12
0059 01d6 | | Execute Vector,Field_Write
005a 3fe6 |? | Loop_Increasing 0x41
005b e211 | | Load 0x1,0x11
005c 01d4 | | Execute Vector,Structure_Write
005d 4800 |H | Short_Literal 0x0
005e 4801 |H | Short_Literal 0x1
005f 029f 019b | | Declare_Subprogram INIT_0198,For_Call
0061 03fd | | Declare_Type Discrete,Defined
0062 e003 | | Load 0x0,0x3
0063 e004 | | Load 0x0,0x4
0064 e212 | | Load 0x1,0x12
0065 4800 |H | Short_Literal 0x0
0066 4801 |H | Short_Literal 0x1
0067 4801 |H | Short_Literal 0x1
0068 0092 0f15 | | Action Push_String_Extended,0xf15 ; "others => Unspecified"
006a 00ea | | Load_Encached Null_String_Cache
006b 00ea | | Load_Encached Null_String_Cache
006c 4801 |H | Short_Literal 0x1
006d 4801 |H | Short_Literal 0x1
006e e005 | | Load 0x0,0x5
006f 0387 | | Declare_Variable Package
0070 00d8 | | Load_Top At_Offset_0
0071 020f | | Execute Module,Activate
0072 0092 0f16 | | Action Push_String_Extended,0xf16 ; "CAP-"
0074 00e1 | | Load_Encached Boolean_Cache
0075 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0076 e006 | | Load 0x0,0x6
0077 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0078 00d8 | | Load_Top At_Offset_0
0079 02a0 | | Declare_Subprogram Null_Subprogram
007a 4818 |H | Short_Literal 0x18
007b 03d3 | | Declare_Type Access,Defined,Accesses_Protected
007c e007 | | Load 0x0,0x7
007d e008 | | Load 0x0,0x8
007e e216 | | Load 0x1,0x16
007f e009 | | Load 0x0,0x9
0080 0387 | | Declare_Variable Package
0081 00d8 | | Load_Top At_Offset_0
0082 020f | | Execute Module,Activate
0083 4800 |H | Short_Literal 0x0
0084 4878 |Hx | Short_Literal 0x78
0085 00e2 | | Load_Encached Integer_Cache
0086 03f8 | | Declare_Type Discrete,Constrained
0087 4801 |H | Short_Literal 0x1
0088 4878 |Hx | Short_Literal 0x78
0089 e219 | | Load 0x1,0x19
008a 03f8 | | Declare_Type Discrete,Constrained
008b 4801 |H | Short_Literal 0x1
008c 4878 |Hx | Short_Literal 0x78
008d e20e | | Load 0x1,0xe
008e 02a0 | | Declare_Subprogram Null_Subprogram
008f 4801 |H | Short_Literal 0x1
0090 035d | ] | Declare_Type Array,Defined
0091 00d8 | | Load_Top At_Offset_0
0092 0337 | 7 | Declare_Variable Array
0093 e219 | | Load 0x1,0x19
0094 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0095 4801 |H | Short_Literal 0x1
0096 4878 |Hx | Short_Literal 0x78
0097 e217 | | Load 0x1,0x17
0098 02a0 | | Declare_Subprogram Null_Subprogram
0099 4801 |H | Short_Literal 0x1
009a 035d | ] | Declare_Type Array,Defined
009b 00d8 | | Load_Top At_Offset_0
009c 0337 | 7 | Declare_Variable Array
009d 4801 |H | Short_Literal 0x1
009e 4878 |Hx | Short_Literal 0x78
009f e217 | | Load 0x1,0x17
00a0 02a0 | | Declare_Subprogram Null_Subprogram
00a1 4801 |H | Short_Literal 0x1
00a2 035d | ] | Declare_Type Array,Defined
00a3 00d8 | | Load_Top At_Offset_0
00a4 0337 | 7 | Declare_Variable Array
00a5 4801 |H | Short_Literal 0x1
00a6 4828 |H( | Short_Literal 0x28
00a7 e20e | | Load 0x1,0xe
00a8 02a0 | | Declare_Subprogram Null_Subprogram
00a9 4801 |H | Short_Literal 0x1
00aa 035d | ] | Declare_Type Array,Defined
00ab 00d8 | | Load_Top At_Offset_0
00ac 0337 | 7 | Declare_Variable Array
00ad e001 | | Load 0x0,0x1
00ae 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
00af 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00b0 4804 |H | Short_Literal 0x4
00b1 48a3 |H | Short_Literal 0xa3
00b2 00e3 | | Load_Encached Natural_Cache
00b3 03f8 | | Declare_Type Discrete,Constrained
00b4 4804 |H | Short_Literal 0x4
00b5 48a3 |H | Short_Literal 0xa3
00b6 e21a | | Load 0x1,0x1a
00b7 02a0 | | Declare_Subprogram Null_Subprogram
00b8 4801 |H | Short_Literal 0x1
00b9 035d | ] | Declare_Type Array,Defined
00ba 00d8 | | Load_Top At_Offset_0
00bb 0337 | 7 | Declare_Variable Array
00bc 4804 |H | Short_Literal 0x4
00bd 48a3 |H | Short_Literal 0xa3
00be e217 | | Load 0x1,0x17
00bf 02a0 | | Declare_Subprogram Null_Subprogram
00c0 4801 |H | Short_Literal 0x1
00c1 035d | ] | Declare_Type Array,Defined
00c2 00d8 | | Load_Top At_Offset_0
00c3 0337 | 7 | Declare_Variable Array
00c4 4804 |H | Short_Literal 0x4
00c5 48a3 |H | Short_Literal 0xa3
00c6 e217 | | Load 0x1,0x17
00c7 02a0 | | Declare_Subprogram Null_Subprogram
00c8 4801 |H | Short_Literal 0x1
00c9 035d | ] | Declare_Type Array,Defined
00ca 00d8 | | Load_Top At_Offset_0
00cb 0337 | 7 | Declare_Variable Array
00cc 4800 |H | Short_Literal 0x0
00cd 4805 |H | Short_Literal 0x5
00ce 029f 01d3 | | Declare_Subprogram INIT_01d0,For_Call
00d0 03fd | | Declare_Type Discrete,Defined
00d1 e00a | | Load 0x0,0xa
00d2 e00b | | Load 0x0,0xb
00d3 e22c | , | Load 0x1,0x2c
00d4 4800 |H | Short_Literal 0x0
00d5 4801 |H | Short_Literal 0x1
00d6 4805 |H | Short_Literal 0x5
00d7 0092 0f15 | | Action Push_String_Extended,0xf15 ; "others => Unspecified"
00d9 00ea | | Load_Encached Null_String_Cache
00da 00ea | | Load_Encached Null_String_Cache
00db 4801 |H | Short_Literal 0x1
00dc 4805 |H | Short_Literal 0x5
00dd e005 | | Load 0x0,0x5
00de 0387 | | Declare_Variable Package
00df 00d8 | | Load_Top At_Offset_0
00e0 020f | | Execute Module,Activate
00e1 e20e | | Load 0x1,0xe
00e2 0007 | | Action Break_Optional
00e3 480b |H | Short_Literal 0xb
00e4 032a | * | Declare_Type Record,Incomplete
00e5 00d8 | | Load_Top At_Offset_0
00e6 02a0 | | Declare_Subprogram Null_Subprogram
00e7 4818 |H | Short_Literal 0x18
00e8 03d3 | | Declare_Type Access,Defined,Accesses_Protected
00e9 e001 | | Load 0x0,0x1
00ea 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00eb 00e1 | | Load_Encached Boolean_Cache
00ec e001 | | Load 0x0,0x1
00ed 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00ee e001 | | Load 0x0,0x1
00ef 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00f0 e001 | | Load 0x0,0x1
00f1 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00f2 e001 | | Load 0x0,0x1
00f3 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00f4 00e3 | | Load_Encached Natural_Cache
00f5 00e3 | | Load_Encached Natural_Cache
00f6 00e3 | | Load_Encached Natural_Cache
00f7 00e1 | | Load_Encached Boolean_Cache
00f8 e230 | 0 | Load 0x1,0x30
00f9 02a0 | | Declare_Subprogram Null_Subprogram
00fa e22f | / | Load 0x1,0x2f
00fb 0326 | & | Complete_Type Record,By_Defining
00fc 00d8 | | Load_Top At_Offset_0
00fd 0007 | | Action Break_Optional
00fe e230 | 0 | Load 0x1,0x30
00ff 0007 | | Action Break_Optional
0100 e00c | | Load 0x0,0xc
0101 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0102 02c7 | | Declare_Variable Any
0103 00d8 | | Load_Top At_Offset_0
0104 1c00 | | Execute_Immediate Run_Utility,0x0
0105 00e3 | | Load_Encached Natural_Cache
0106 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0107 e217 | | Load 0x1,0x17
0108 0007 | | Action Break_Optional
0109 e001 | | Load 0x0,0x1
010a 1b12 | | Execute Package,Field_Read,Field_Number 0x12
010b 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
010c e001 | | Load 0x0,0x1
010d 1b10 | | Execute Package,Field_Read,Field_Number 0x10
010e e001 | | Load 0x0,0x1
010f 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0110 4fff |O | Short_Literal -0x1
0111 e001 | | Load 0x0,0x1
0112 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0113 03f1 | | Declare_Variable Discrete,With_Value
0114 4fff |O | Short_Literal -0x1
0115 e001 | | Load 0x0,0x1
0116 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0117 03f1 | | Declare_Variable Discrete,With_Value
0118 60ab |` | Indirect_Literal Discrete,0x1c4,{0x00000000, 0x00008ca0}
0119 e001 | | Load 0x0,0x1
011a 1b10 | | Execute Package,Field_Read,Field_Number 0x10
011b 03f1 | | Declare_Variable Discrete,With_Value
011c 60a3 |` | Indirect_Literal Discrete,0x1c0,{0x00000000, 0x0008ca00}
011d e001 | | Load 0x0,0x1
011e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
011f 03f1 | | Declare_Variable Discrete,With_Value
0120 00e3 | | Load_Encached Natural_Cache
0121 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0122 e001 | | Load 0x0,0x1
0123 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0124 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0125 029d 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call
0127 029d 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call
0129 029d 0233 | 3| Declare_Subprogram INIT_0230,For_Outer_Call
012b 029d 024b | K| Declare_Subprogram INIT_0248,For_Outer_Call
012d 029d 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call
012f 029d 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call
0131 029d 029b | | Declare_Subprogram INIT_0298,For_Outer_Call
0133 029d 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call
0135 029d 030b | | Declare_Subprogram INIT_0308,For_Outer_Call
0137 029d 0313 | | Declare_Subprogram INIT_0310,For_Outer_Call
0139 029d 0343 | C| Declare_Subprogram INIT_0340,For_Outer_Call
013b 029d 035b | [| Declare_Subprogram INIT_0358,For_Outer_Call
013d 029d 037b | {| Declare_Subprogram INIT_0378,For_Outer_Call
013f 029d 038b | | Declare_Subprogram INIT_0388,For_Outer_Call
0141 029d 03c3 | | Declare_Subprogram INIT_03c0,For_Outer_Call
0143 029d 0433 | 3| Declare_Subprogram INIT_0430,For_Outer_Call
0145 029d 04cb | | Declare_Subprogram INIT_04c8,For_Outer_Call
0147 029d 0503 | | Declare_Subprogram INIT_0500,For_Outer_Call
0149 029d 052b | +| Declare_Subprogram INIT_0528,For_Outer_Call
014b 029d 054b | K| Declare_Subprogram INIT_0548,For_Outer_Call
014d 029d 05cb | | Declare_Subprogram INIT_05c8,For_Outer_Call
014f 029d 063b | ;| Declare_Subprogram INIT_0638,For_Outer_Call
0151 029d 064b | K| Declare_Subprogram INIT_0648,For_Outer_Call
0153 029d 0653 | S| Declare_Subprogram INIT_0650,For_Outer_Call
0155 029d 065b | [| Declare_Subprogram INIT_0658,For_Outer_Call
0157 029d 0663 | c| Declare_Subprogram INIT_0660,For_Outer_Call
0159 029d 066b | k| Declare_Subprogram INIT_0668,For_Outer_Call
015b 029d 068b | | Declare_Subprogram INIT_0688,For_Outer_Call
015d 029d 069b | | Declare_Subprogram INIT_0698,For_Outer_Call
015f 029d 0783 | | Declare_Subprogram INIT_0780,For_Outer_Call
0161 029d 07bb | | Declare_Subprogram INIT_07b8,For_Outer_Call
0163 029d 07c3 | | Declare_Subprogram INIT_07c0,For_Outer_Call
0165 029d 07d3 | | Declare_Subprogram INIT_07d0,For_Outer_Call
0167 029d 083b | ;| Declare_Subprogram INIT_0838,For_Outer_Call
0169 029d 0943 | C| Declare_Subprogram INIT_0940,For_Outer_Call
016b 029d 0973 | s| Declare_Subprogram INIT_0970,For_Outer_Call
016d 029d 09a3 | | Declare_Subprogram INIT_09a0,For_Outer_Call
016f 029d 0ca3 | | Declare_Subprogram INIT_0ca0,For_Outer_Call
0171 029d 0ce3 | | Declare_Subprogram INIT_0ce0,For_Outer_Call
0173 e00d | | Load 0x0,0xd
0174 e00e | | Load 0x0,0xe
0175 1d5b | [ | Execute_Immediate Reference_Lex_1,0x5b
0176 1d5c | \ | Execute_Immediate Reference_Lex_1,0x5c
0177 1d5d | ] | Execute_Immediate Reference_Lex_1,0x5d
0178 1d43 | C | Execute_Immediate Reference_Lex_1,0x43
0179 1d45 | E | Execute_Immediate Reference_Lex_1,0x45
017a 1d47 | G | Execute_Immediate Reference_Lex_1,0x47
017b 1d48 | H | Execute_Immediate Reference_Lex_1,0x48
017c 1d4e | N | Execute_Immediate Reference_Lex_1,0x4e
017d 1d4f | O | Execute_Immediate Reference_Lex_1,0x4f
017e 1d4a | J | Execute_Immediate Reference_Lex_1,0x4a
017f 1d4b | K | Execute_Immediate Reference_Lex_1,0x4b
0180 1d54 | T | Execute_Immediate Reference_Lex_1,0x54
0181 1d57 | W | Execute_Immediate Reference_Lex_1,0x57
0182 1d58 | X | Execute_Immediate Reference_Lex_1,0x58
0183 1d55 | U | Execute_Immediate Reference_Lex_1,0x55
0184 1d56 | V | Execute_Immediate Reference_Lex_1,0x56
0185 1d59 | Y | Execute_Immediate Reference_Lex_1,0x59
0186 1d5a | Z | Execute_Immediate Reference_Lex_1,0x5a
0187 1d63 | c | Execute_Immediate Reference_Lex_1,0x63
0188 1d5f | _ | Execute_Immediate Reference_Lex_1,0x5f
0189 1d5e | ^ | Execute_Immediate Reference_Lex_1,0x5e
018a 1d64 | d | Execute_Immediate Reference_Lex_1,0x64
018b 1d65 | e | Execute_Immediate Reference_Lex_1,0x65
018c 0092 0f17 | | Action Push_String_Extended,0xf17 ; "PostScript"
018e e002 | | Load 0x0,0x2
018f 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0190 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0191 0387 | | Declare_Variable Package
0192 00d8 | | Load_Top At_Offset_0
0193 020f | | Execute Module,Activate
0194 BODY_0008:
0194 00bc | | Action Signal_Activated
0195 00bb | | Action Signal_Completion
0196 0000 0000 | | .XXX[0x2]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b | | .CONST 0x019b ; Address of begin
0199 0004 | | .CONST 0x0004 ; Address of exception handler
019a 0001 | | .CONST 0x0001 ; Number of locals
019b BODY_0198:
019b INIT_0198:
019b 4607 |F | Jump_Case 0x8
019c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
019d 7806 |x | Jump 0x1a4 ; case 0x1
019e 7809 |x | Jump 0x1a8 ; case 0x2
019f 780d |x | Jump 0x1ad ; case 0x3
01a0 7810 |x | Jump 0x1b1 ; case 0x4
01a1 7811 |x | Jump 0x1b3 ; case 0x5
01a2 7812 |x | Jump 0x1b5 ; case 0x6
01a3 7815 |x | Jump 0x1b9 ; case 0x7
01a4 00da | | Load_Top At_Offset_2
01a5 0091 0f0c | | Action Push_String_Extended_Indexed,0xf0c ; "NIL"
01a7 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
01a8 00db | | Load_Top At_Offset_3
01a9 00db | | Load_Top At_Offset_3
01aa 00e0 | | Load_Encached Standard_Cache
01ab 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01ac 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01ad 00da | | Load_Top At_Offset_2
01ae 00e0 | | Load_Encached Standard_Cache
01af 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01b0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
01b1 00db | | Load_Top At_Offset_3
01b2 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01b3 00db | | Load_Top At_Offset_3
01b4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01b5 e212 | | Load 0x1,0x12
01b6 00dc | | Load_Top At_Offset_4
01b7 0267 | g | Execute Discrete,Predecessor
01b8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01b9 e212 | | Load 0x1,0x12
01ba 00dc | | Load_Top At_Offset_4
01bb 0268 | h | Execute Discrete,Successor
01bc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01bd 0000 0000 | | .XXX[0x3]
01bf 0000 | |
01c0 0000 0000 | | .LITERAL {0x00000000, 0x0008ca00}
01c4 0000 0000 | | .LITERAL {0x00000000, 0x00008ca0}
01c8 0000 0000 | | .LITERAL {0x00000000, 0x000956a0}
01cc 0000 0000 | | .LITERAL {0x00000000, 0x000c15c0}
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3 | | .CONST 0x01d3 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0001 | | .CONST 0x0001 ; Number of locals
01d3 BODY_01d0:
01d3 INIT_01d0:
01d3 4607 |F | Jump_Case 0x8
01d4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
01d5 7806 |x | Jump 0x1dc ; case 0x1
01d6 7809 |x | Jump 0x1e0 ; case 0x2
01d7 780d |x | Jump 0x1e5 ; case 0x3
01d8 7810 |x | Jump 0x1e9 ; case 0x4
01d9 7811 |x | Jump 0x1eb ; case 0x5
01da 7812 |x | Jump 0x1ed ; case 0x6
01db 7815 |x | Jump 0x1f1 ; case 0x7
01dc 00da | | Load_Top At_Offset_2
01dd 0091 0f0e | | Action Push_String_Extended_Indexed,0xf0e ; "NIL"
01df 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
01e0 00db | | Load_Top At_Offset_3
01e1 00db | | Load_Top At_Offset_3
01e2 00e0 | | Load_Encached Standard_Cache
01e3 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01e4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01e5 00da | | Load_Top At_Offset_2
01e6 00e0 | | Load_Encached Standard_Cache
01e7 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01e8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
01e9 00db | | Load_Top At_Offset_3
01ea 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01eb 00db | | Load_Top At_Offset_3
01ec 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01ed e22c | , | Load 0x1,0x2c
01ee 00dc | | Load_Top At_Offset_4
01ef 0267 | g | Execute Discrete,Predecessor
01f0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01f1 e22c | , | Load 0x1,0x2c
01f2 00dc | | Load_Top At_Offset_4
01f3 0268 | h | Execute Discrete,Successor
01f4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01f5 0000 0000 | | .XXX[0x3]
01f7 0000 | |
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fd | | .CONST 0x01fd ; Address of begin
01f9 0004 | | .CONST 0x0004 ; Address of exception handler
01fa 0003 | | .CONST 0x0003 ; Number of locals
01fb INIT_01f8:
01fb 00e2 | | Load_Encached Integer_Cache
01fc 03e9 | | Declare_Variable Discrete,Duplicate
01fd BODY_01f8:
01fd e5ff | | Load 0x2,-0x1
01fe 4be8 |K | Short_Literal 0x3e8
01ff 0270 | p | Execute Discrete,Divide
0200 a402 | | Store_Unchecked 0x2,0x2
0201 e5ff | | Load 0x2,-0x1
0202 4be8 |K | Short_Literal 0x3e8
0203 026f | o | Execute Discrete,Remainder
0204 a403 | | Store_Unchecked 0x2,0x3
0205 00d8 | | Load_Top At_Offset_0
0206 6810 |h | Jump_Zero 0x217
0207 482e |H. | Short_Literal 0x2e
0208 4820 |H | Short_Literal 0x20
0209 4800 |H | Short_Literal 0x0
020a 480a |H | Short_Literal 0xa
020b e402 | | Load 0x2,0x2
020c e00f | | Load 0x0,0xf
020d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
020e 01cb | | Execute Vector,Append
020f 4830 |H0 | Short_Literal 0x30
0210 4803 |H | Short_Literal 0x3
0211 480a |H | Short_Literal 0xa
0212 e403 | | Load 0x2,0x3
0213 e00f | | Load 0x0,0xf
0214 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0215 01cc | | Execute Vector,Catenate
0216 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0217 4820 |H | Short_Literal 0x20
0218 4800 |H | Short_Literal 0x0
0219 480a |H | Short_Literal 0xa
021a e402 | | Load 0x2,0x2
021b e00f | | Load 0x0,0xf
021c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
021d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
021e 0000 0000 | | .XXX[0x2]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223 | # | .CONST 0x0223 ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0001 | | .CONST 0x0001 ; Number of locals
0223 BODY_0220:
0223 INIT_0220:
0223 e5ff | | Load 0x2,-0x1
0224 0d00 | | Execute_Immediate Less,0x0
0225 6806 |h | Jump_Zero 0x22c
0226 482d |H- | Short_Literal 0x2d
0227 e5ff | | Load 0x2,-0x1
0228 0275 | u | Execute Discrete,Unary_Minus
0229 823f | ? | Call 0x1,0x3f
022a 01ca | | Execute Vector,Prepend
022b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
022c e5ff | | Load 0x2,-0x1
022d 823f | ? | Call 0x1,0x3f
022e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
022f 0000 | | .XXX[0x1]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0233 | 3 | .CONST 0x0233 ; Address of begin
0231 0004 | | .CONST 0x0004 ; Address of exception handler
0232 0001 | | .CONST 0x0001 ; Number of locals
0233 BODY_0230:
0233 INIT_0230:
0233 485c |H\ | Short_Literal 0x5c
0234 4830 |H0 | Short_Literal 0x30
0235 4803 |H | Short_Literal 0x3
0236 4808 |H | Short_Literal 0x8
0237 e5ff | | Load 0x2,-0x1
0238 00d8 | | Load_Top At_Offset_0
0239 00e2 | | Load_Encached Integer_Cache
023a 0260 | ` | Execute Discrete,In_Type
023b 7001 |p | Jump_Nonzero 0x23d
023c 0801 | | Execute_Immediate Raise,0x1
023d e00f | | Load 0x0,0xf
023e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
023f 01ca | | Execute Vector,Prepend
0240 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0241 0000 0000 | | .BLANK 0000[0x7]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 0257 | W | .CONST 0x0257 ; Address of begin
0249 0004 | | .CONST 0x0004 ; Address of exception handler
024a 0002 | | .CONST 0x0002 ; Number of locals
024b INIT_0248:
024b e23e | > | Load 0x1,0x3e
024c 4820 |H | Short_Literal 0x20
024d e235 | 5 | Load 0x1,0x35
024e 0227 | ' | Execute Access,All_Reference
024f 2406 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x6
0250 01d7 | | Execute Vector,Field_Read
0251 e236 | 6 | Load 0x1,0x36
0252 0271 | q | Execute Discrete,Times
0253 0272 | r | Execute Discrete,Minus
0254 e001 | | Load 0x0,0x1
0255 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0256 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0257 BODY_0248:
0257 00d8 | | Load_Top At_Offset_0
0258 0c01 | | Execute_Immediate Greater_Equal,0x1
0259 680c |h | Jump_Zero 0x266
025a 0092 0f18 | | Action Push_String_Extended,0xf18 ; ") "
025c e402 | | Load 0x2,0x2
025d 8240 | @ | Call 0x1,0x40
025e 01cc | | Execute Vector,Catenate
025f 0092 0f19 | | Action Push_String_Extended,0xf19 ; " WS"
0261 01cc | | Execute Vector,Catenate
0262 e233 | 3 | Load 0x1,0x33
0263 e00c | | Load 0x0,0xc
0264 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0265 7805 |x | Jump 0x26b
0266 0092 0f1a | | Action Push_String_Extended,0xf1a ; ") show"
0268 e233 | 3 | Load 0x1,0x33
0269 e00c | | Load 0x0,0xc
026a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
026b 4800 |H | Short_Literal 0x0
026c a23e | > | Store_Unchecked 0x1,0x3e
026d 4800 |H | Short_Literal 0x0
026e a23d | = | Store_Unchecked 0x1,0x3d
026f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273 | s | .CONST 0x0273 ; Address of begin
0271 0004 | | .CONST 0x0004 ; Address of exception handler
0272 0001 | | .CONST 0x0001 ; Number of locals
0273 BODY_0270:
0273 INIT_0270:
0273 4801 |H | Short_Literal 0x1
0274 00ca | | Action Exit_Nullary_Function
0275 0000 0000 | | .XXX[0x3]
0277 0000 | |
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027e | ~ | .CONST 0x027e ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 0002 | | .CONST 0x0002 ; Number of locals
027b INIT_0278:
027b e5ff | | Load 0x2,-0x1
027c e00f | | Load 0x0,0xf
027d 1814 | | Execute Package,Field_Execute,Field_Number 0x14
027e BODY_0278:
027e 00cf | | Action Mark_Auxiliary
027f e211 | | Load 0x1,0x11
0280 01d9 | | Execute Vector,Reverse_Bounds
0281 0007 | | Action Break_Optional
0282 00d8 | | Load_Top At_Offset_0
0283 e211 | | Load 0x1,0x11
0284 01d5 | | Execute Vector,Field_Reference
0285 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0286 7002 |p | Jump_Nonzero 0x289
0287 4800 |H | Short_Literal 0x0
0288 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0289 00d8 | | Load_Top At_Offset_0
028a e211 | | Load 0x1,0x11
028b 01d5 | | Execute Vector,Field_Reference
028c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
028d 0227 | ' | Execute Access,All_Reference
028e e402 | | Load 0x2,0x2
028f 01df | | Execute Vector,Equal
0290 6802 |h | Jump_Zero 0x293
0291 00d8 | | Load_Top At_Offset_0
0292 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0293 00c8 | | Action Pop_Auxiliary_Range
0294 3fed |? | Loop_Increasing 0x282
0295 00ce | | Action Pop_Auxiliary
0296 4800 |H | Short_Literal 0x0
0297 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029f | | .CONST 0x029f ; Address of begin
0299 0004 | | .CONST 0x0004 ; Address of exception handler
029a 0002 | | .CONST 0x0002 ; Number of locals
029b INIT_0298:
029b e5ff | | Load 0x2,-0x1
029c 8244 | D | Call 0x1,0x44
029d 00e3 | | Load_Encached Natural_Cache
029e 03f1 | | Declare_Variable Discrete,With_Value
029f BODY_0298:
029f 00d8 | | Load_Top At_Offset_0
02a0 6807 |h | Jump_Zero 0x2a8
02a1 00d8 | | Load_Top At_Offset_0
02a2 e211 | | Load 0x1,0x11
02a3 01d5 | | Execute Vector,Field_Reference
02a4 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
02a5 e5fe | | Load 0x2,-0x2
02a6 017d | } | Execute Record,Structure_Write
02a7 4502 |E | Exit_Suprogram New_Top_Offset 0x2
02a8 0092 0f1b | | Action Push_String_Extended,0xf1b ; "Invalid form selection "
02aa e5ff | | Load 0x2,-0x1
02ab 01cc | | Execute Vector,Catenate
02ac 0092 0f1c | | Action Push_String_Extended,0xf1c ; ". Form "
02ae 01cc | | Execute Vector,Catenate
02af 4801 |H | Short_Literal 0x1
02b0 e211 | | Load 0x1,0x11
02b1 01d5 | | Execute Vector,Field_Reference
02b2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02b3 0227 | ' | Execute Access,All_Reference
02b4 01cc | | Execute Vector,Catenate
02b5 0092 0f1d | | Action Push_String_Extended,0xf1d ; " assumed"
02b7 01cc | | Execute Vector,Catenate
02b8 e010 | | Load 0x0,0x10
02b9 180e | | Execute Package,Field_Execute,Field_Number 0xe
02ba 4801 |H | Short_Literal 0x1
02bb e211 | | Load 0x1,0x11
02bc 01d5 | | Execute Vector,Field_Reference
02bd 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
02be e5fe | | Load 0x2,-0x2
02bf 017d | } | Execute Record,Structure_Write
02c0 4502 |E | Exit_Suprogram New_Top_Offset 0x2
02c1 0000 0000 | | .BLANK 0000[0x7]
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02ce | | .CONST 0x02ce ; Address of begin
02c9 0004 | | .CONST 0x0004 ; Address of exception handler
02ca 0002 | | .CONST 0x0002 ; Number of locals
02cb INIT_02c8:
02cb e5ff | | Load 0x2,-0x1
02cc e00f | | Load 0x0,0xf
02cd 1814 | | Execute Package,Field_Execute,Field_Number 0x14
02ce BODY_02c8:
02ce 00cf | | Action Mark_Auxiliary
02cf e211 | | Load 0x1,0x11
02d0 01d9 | | Execute Vector,Reverse_Bounds
02d1 0007 | | Action Break_Optional
02d2 00d8 | | Load_Top At_Offset_0
02d3 e211 | | Load 0x1,0x11
02d4 01d5 | | Execute Vector,Field_Reference
02d5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02d6 700e |p | Jump_Nonzero 0x2e5
02d7 e20f | | Load 0x1,0xf
02d8 0322 | " | Declare_Variable Record
02d9 e5ff | | Load 0x2,-0x1
02da e20e | | Load 0x1,0xe
02db 03b6 | | Declare_Variable Access,By_Allocation,With_Value
02dc e406 | | Load 0x2,0x6
02dd 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02de e5fd | | Load 0x2,-0x3
02df e406 | | Load 0x2,0x6
02e0 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
02e1 e405 | | Load 0x2,0x5
02e2 e211 | | Load 0x1,0x11
02e3 01d6 | | Execute Vector,Field_Write
02e4 4504 |E | Exit_Suprogram New_Top_Offset 0x4
02e5 00d8 | | Load_Top At_Offset_0
02e6 e211 | | Load 0x1,0x11
02e7 01d5 | | Execute Vector,Field_Reference
02e8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02e9 0227 | ' | Execute Access,All_Reference
02ea e402 | | Load 0x2,0x2
02eb 01df | | Execute Vector,Equal
02ec 680f |h | Jump_Zero 0x2fc
02ed 0092 0f1e | | Action Push_String_Extended,0xf1e ; "Form "
02ef e5ff | | Load 0x2,-0x1
02f0 01cc | | Execute Vector,Catenate
02f1 0092 0f1f | | Action Push_String_Extended,0xf1f ; " is being redefined"
02f3 01cc | | Execute Vector,Catenate
02f4 e010 | | Load 0x0,0x10
02f5 180f | | Execute Package,Field_Execute,Field_Number 0xf
02f6 e5fd | | Load 0x2,-0x3
02f7 e405 | | Load 0x2,0x5
02f8 e211 | | Load 0x1,0x11
02f9 01d5 | | Execute Vector,Field_Reference
02fa 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
02fb 4504 |E | Exit_Suprogram New_Top_Offset 0x4
02fc 00c8 | | Action Pop_Auxiliary_Range
02fd 3fd4 |? | Loop_Increasing 0x2d2
02fe 00ce | | Action Pop_Auxiliary
02ff 0092 0f20 | | Action Push_String_Extended,0xf20 ; "Too many forms defined"
0301 e010 | | Load 0x0,0x10
0302 180e | | Execute Package,Field_Execute,Field_Number 0xe
0303 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0304 0000 0000 | | .BLANK 0000[0x4]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 030b | | .CONST 0x030b ; Address of begin
0309 0004 | | .CONST 0x0004 ; Address of exception handler
030a 0001 | | .CONST 0x0001 ; Number of locals
030b BODY_0308:
030b INIT_0308:
030b 0092 0f21 | !| Action Push_String_Extended,0xf21 ; "The PostScript device does not support defining forms"
030d e010 | | Load 0x0,0x10
030e 180e | | Execute Package,Field_Execute,Field_Number 0xe
030f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 031c | | .CONST 0x031c ; Address of begin
0311 0321 | ! | .CONST 0x0321 ; Address of exception handler
0312 0004 | | .CONST 0x0004 ; Number of locals
0313 INIT_0310:
0313 e011 | | Load 0x0,0x11
0314 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0315 02c7 | | Declare_Variable Any
0316 00d8 | | Load_Top At_Offset_0
0317 1c00 | | Execute_Immediate Run_Utility,0x0
0318 029f 0ceb | | Declare_Subprogram INIT_0ce8,For_Call
031a 029f 0d0b | | Declare_Subprogram INIT_0d08,For_Call
031c BODY_0310:
031c 8403 | | Call 0x2,0x3
031d 00cf | | Action Mark_Auxiliary
031e 8404 | | Call 0x2,0x4
031f 00c9 | | Action Pop_Auxiliary_Loop
0320 7ffd | | Jump 0x31e
0321 TRAP_0310:
0321 00d8 | | Load_Top At_Offset_0
0322 0107 | | Execute Exception,Get_Name
0323 4950 |IP | Short_Literal 0x150
0324 495f |I_ | Short_Literal 0x15f
0325 0262 | b | Execute Discrete,In_Range
0326 6805 |h | Jump_Zero 0x32c
0327 e402 | | Load 0x2,0x2
0328 e011 | | Load 0x0,0x11
0329 181b | | Execute Package,Field_Execute,Field_Number 0x1b
032a c402 | | Store 0x2,0x2
032b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
032c e001 | | Load 0x0,0x1
032d 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
032e 010f | | Execute Exception,Equal
032f 6802 |h | Jump_Zero 0x332
0330 00d8 | | Load_Top At_Offset_0
0331 0101 | | Execute Exception,Reraise
0332 0092 0f22 | "| Action Push_String_Extended,0xf22 ; "Could not define forms in "
0334 e5ff | | Load 0x2,-0x1
0335 01cc | | Execute Vector,Catenate
0336 e010 | | Load 0x0,0x10
0337 180e | | Execute Package,Field_Execute,Field_Number 0xe
0338 e001 | | Load 0x0,0x1
0339 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
033a 0257 | W | Execute Discrete,Raise
033b 0000 0000 | | .BLANK 0000[0x5]
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 0343 | C | .CONST 0x0343 ; Address of begin
0341 0004 | | .CONST 0x0004 ; Address of exception handler
0342 0001 | | .CONST 0x0001 ; Number of locals
0343 BODY_0340:
0343 INIT_0340:
0343 00cf | | Action Mark_Auxiliary
0344 e21d | | Load 0x1,0x1d
0345 4801 |H | Short_Literal 0x1
0346 0263 | c | Execute Discrete,Above_Bound
0347 700c |p | Jump_Nonzero 0x354
0348 e5ff | | Load 0x2,-0x1
0349 e404 | | Load 0x2,0x4
034a e21c | | Load 0x1,0x1c
034b 01d7 | | Execute Vector,Field_Read
034c 0227 | ' | Execute Access,All_Reference
034d 01df | | Execute Vector,Equal
034e 6803 |h | Jump_Zero 0x352
034f 00d8 | | Load_Top At_Offset_0
0350 a5fe | | Store_Unchecked 0x2,-0x2
0351 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0352 00c8 | | Action Pop_Auxiliary_Range
0353 3ff4 |? | Loop_Increasing 0x348
0354 00ce | | Action Pop_Auxiliary
0355 4800 |H | Short_Literal 0x0
0356 a5fe | | Store_Unchecked 0x2,-0x2
0357 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0358 ; --------------------------------------------------------------------------------------
0358 ; SUBPROGRAM
0358 ; --------------------------------------------------------------------------------------
0358 035e | ^ | .CONST 0x035e ; Address of begin
0359 0004 | | .CONST 0x0004 ; Address of exception handler
035a 0002 | | .CONST 0x0002 ; Number of locals
035b INIT_0358:
035b e5ff | | Load 0x2,-0x1
035c e00f | | Load 0x0,0xf
035d 1814 | | Execute Package,Field_Execute,Field_Number 0x14
035e BODY_0358:
035e 00cf | | Action Mark_Auxiliary
035f e224 | $ | Load 0x1,0x24
0360 4801 |H | Short_Literal 0x1
0361 0263 | c | Execute Discrete,Above_Bound
0362 700c |p | Jump_Nonzero 0x36f
0363 e402 | | Load 0x2,0x2
0364 e405 | | Load 0x2,0x5
0365 e223 | # | Load 0x1,0x23
0366 01d7 | | Execute Vector,Field_Read
0367 0227 | ' | Execute Access,All_Reference
0368 01df | | Execute Vector,Equal
0369 6803 |h | Jump_Zero 0x36d
036a 00d8 | | Load_Top At_Offset_0
036b a5fe | | Store_Unchecked 0x2,-0x2
036c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
036d 00c8 | | Action Pop_Auxiliary_Range
036e 3ff4 |? | Loop_Increasing 0x363
036f 00ce | | Action Pop_Auxiliary
0370 4800 |H | Short_Literal 0x0
0371 a5fe | | Store_Unchecked 0x2,-0x2
0372 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0373 0000 0000 | | .BLANK 0000[0x5]
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 037b | { | .CONST 0x037b ; Address of begin
0379 0382 | | .CONST 0x0382 ; Address of exception handler
037a 0001 | | .CONST 0x0001 ; Number of locals
037b BODY_0378:
037b INIT_0378:
037b e5ff | | Load 0x2,-0x1
037c e223 | # | Load 0x1,0x23
037d 01d7 | | Execute Vector,Field_Read
037e 0227 | ' | Execute Access,All_Reference
037f 0335 | 5 | Declare_Variable Array,Duplicate
0380 00cd | | Action Spare6_Action
0381 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0382 TRAP_0378:
0382 0007 | | Action Break_Optional
0383 0092 0f23 | #| Action Push_String_Extended,0xf23 ; "Standard"
0385 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0386 0000 0000 | | .XXX[0x2]
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 0390 | | .CONST 0x0390 ; Address of begin
0389 0004 | | .CONST 0x0004 ; Address of exception handler
038a 0003 | | .CONST 0x0003 ; Number of locals
038b INIT_0388:
038b e219 | | Load 0x1,0x19
038c 0007 | | Action Break_Optional
038d e5fe | | Load 0x2,-0x2
038e e00f | | Load 0x0,0xf
038f 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0390 BODY_0388:
0390 e219 | | Load 0x1,0x19
0391 e403 | | Load 0x2,0x3
0392 8249 | I | Call 0x1,0x49
0393 c402 | | Store 0x2,0x2
0394 e402 | | Load 0x2,0x2
0395 7013 |p | Jump_Nonzero 0x3a9
0396 e21d | | Load 0x1,0x1d
0397 0c78 | x | Execute_Immediate Greater_Equal,0x78
0398 6805 |h | Jump_Zero 0x39e
0399 0092 0f24 | $| Action Push_String_Extended,0xf24 ; "No more fonts can be defined"
039b e010 | | Load 0x0,0x10
039c 180e | | Execute Package,Field_Execute,Field_Number 0xe
039d 4503 |E | Exit_Suprogram New_Top_Offset 0x3
039e e21d | | Load 0x1,0x1d
039f 0a01 | | Execute_Immediate Plus,0x1
03a0 c21d | | Store 0x1,0x1d
03a1 e21d | | Load 0x1,0x1d
03a2 a402 | | Store_Unchecked 0x2,0x2
03a3 00d8 | | Load_Top At_Offset_0
03a4 e20e | | Load 0x1,0xe
03a5 03b6 | | Declare_Variable Access,By_Allocation,With_Value
03a6 e402 | | Load 0x2,0x2
03a7 e21c | | Load 0x1,0x1c
03a8 01d6 | | Execute Vector,Field_Write
03a9 e402 | | Load 0x2,0x2
03aa e5ff | | Load 0x2,-0x1
03ab e227 | ' | Load 0x1,0x27
03ac 01d6 | | Execute Vector,Field_Write
03ad e402 | | Load 0x2,0x2
03ae e21f | | Load 0x1,0x1f
03af 01d7 | | Execute Vector,Field_Read
03b0 e5ff | | Load 0x2,-0x1
03b1 e229 | ) | Load 0x1,0x29
03b2 01d6 | | Execute Vector,Field_Write
03b3 e402 | | Load 0x2,0x2
03b4 e221 | ! | Load 0x1,0x21
03b5 01d7 | | Execute Vector,Field_Read
03b6 e5ff | | Load 0x2,-0x1
03b7 e22b | + | Load 0x1,0x2b
03b8 01d6 | | Execute Vector,Field_Write
03b9 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03ba 0000 0000 | | .BLANK 0000[0x6]
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03c7 | | .CONST 0x03c7 ; Address of begin
03c1 0004 | | .CONST 0x0004 ; Address of exception handler
03c2 0003 | | .CONST 0x0003 ; Number of locals
03c3 INIT_03c0:
03c3 e001 | | Load 0x0,0x1
03c4 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
03c5 e225 | % | Load 0x1,0x25
03c6 0007 | | Action Break_Optional
03c7 BODY_03c0:
03c7 e001 | | Load 0x0,0x1
03c8 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
03c9 e5ff | | Load 0x2,-0x1
03ca 824a | J | Call 0x1,0x4a
03cb c402 | | Store 0x2,0x2
03cc e402 | | Load 0x2,0x2
03cd 7015 |p | Jump_Nonzero 0x3e3
03ce e224 | $ | Load 0x1,0x24
03cf 0c28 | ( | Execute_Immediate Greater_Equal,0x28
03d0 6805 |h | Jump_Zero 0x3d6
03d1 0092 0f25 | %| Action Push_String_Extended,0xf25 ; "No more font families can be defined"
03d3 e010 | | Load 0x0,0x10
03d4 180e | | Execute Package,Field_Execute,Field_Number 0xe
03d5 4506 |E | Exit_Suprogram New_Top_Offset 0x6
03d6 e224 | $ | Load 0x1,0x24
03d7 0a01 | | Execute_Immediate Plus,0x1
03d8 c224 | $ | Store 0x1,0x24
03d9 e224 | $ | Load 0x1,0x24
03da a402 | | Store_Unchecked 0x2,0x2
03db e5ff | | Load 0x2,-0x1
03dc e00f | | Load 0x0,0xf
03dd 1814 | | Execute Package,Field_Execute,Field_Number 0x14
03de e20e | | Load 0x1,0xe
03df 03b6 | | Declare_Variable Access,By_Allocation,With_Value
03e0 e402 | | Load 0x2,0x2
03e1 e223 | # | Load 0x1,0x23
03e2 01d6 | | Execute Vector,Field_Write
03e3 e402 | | Load 0x2,0x2
03e4 0902 | | Execute_Immediate Binary_Scale,0x2
03e5 c403 | | Store 0x2,0x3
03e6 e5fe | | Load 0x2,-0x2
03e7 e403 | | Load 0x2,0x3
03e8 824c | L | Call 0x1,0x4c
03e9 e5fd | | Load 0x2,-0x3
03ea 01db | | Execute Vector,Length
03eb 700a |p | Jump_Nonzero 0x3f6
03ec e5fe | | Load 0x2,-0x2
03ed e403 | | Load 0x2,0x3
03ee 0a01 | | Execute_Immediate Plus,0x1
03ef 00d8 | | Load_Top At_Offset_0
03f0 e225 | % | Load 0x1,0x25
03f1 0260 | ` | Execute Discrete,In_Type
03f2 7001 |p | Jump_Nonzero 0x3f4
03f3 0801 | | Execute_Immediate Raise,0x1
03f4 824c | L | Call 0x1,0x4c
03f5 7809 |x | Jump 0x3ff
03f6 e5fd | | Load 0x2,-0x3
03f7 e403 | | Load 0x2,0x3
03f8 0a01 | | Execute_Immediate Plus,0x1
03f9 00d8 | | Load_Top At_Offset_0
03fa e225 | % | Load 0x1,0x25
03fb 0260 | ` | Execute Discrete,In_Type
03fc 7001 |p | Jump_Nonzero 0x3fe
03fd 0801 | | Execute_Immediate Raise,0x1
03fe 824c | L | Call 0x1,0x4c
03ff e5fc | | Load 0x2,-0x4
0400 01db | | Execute Vector,Length
0401 700a |p | Jump_Nonzero 0x40c
0402 e5fe | | Load 0x2,-0x2
0403 e403 | | Load 0x2,0x3
0404 0a02 | | Execute_Immediate Plus,0x2
0405 00d8 | | Load_Top At_Offset_0
0406 e225 | % | Load 0x1,0x25
0407 0260 | ` | Execute Discrete,In_Type
0408 7001 |p | Jump_Nonzero 0x40a
0409 0801 | | Execute_Immediate Raise,0x1
040a 824c | L | Call 0x1,0x4c
040b 7809 |x | Jump 0x415
040c e5fc | | Load 0x2,-0x4
040d e403 | | Load 0x2,0x3
040e 0a02 | | Execute_Immediate Plus,0x2
040f 00d8 | | Load_Top At_Offset_0
0410 e225 | % | Load 0x1,0x25
0411 0260 | ` | Execute Discrete,In_Type
0412 7001 |p | Jump_Nonzero 0x414
0413 0801 | | Execute_Immediate Raise,0x1
0414 824c | L | Call 0x1,0x4c
0415 e5fb | | Load 0x2,-0x5
0416 01db | | Execute Vector,Length
0417 700a |p | Jump_Nonzero 0x422
0418 e5fe | | Load 0x2,-0x2
0419 e403 | | Load 0x2,0x3
041a 0a03 | | Execute_Immediate Plus,0x3
041b 00d8 | | Load_Top At_Offset_0
041c e225 | % | Load 0x1,0x25
041d 0260 | ` | Execute Discrete,In_Type
041e 7001 |p | Jump_Nonzero 0x420
041f 0801 | | Execute_Immediate Raise,0x1
0420 824c | L | Call 0x1,0x4c
0421 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0422 e5fb | | Load 0x2,-0x5
0423 e403 | | Load 0x2,0x3
0424 0a03 | | Execute_Immediate Plus,0x3
0425 00d8 | | Load_Top At_Offset_0
0426 e225 | % | Load 0x1,0x25
0427 0260 | ` | Execute Discrete,In_Type
0428 7001 |p | Jump_Nonzero 0x42a
0429 0801 | | Execute_Immediate Raise,0x1
042a 824c | L | Call 0x1,0x4c
042b 4506 |E | Exit_Suprogram New_Top_Offset 0x6
042c 0000 0000 | | .BLANK 0000[0x4]
0430 ; --------------------------------------------------------------------------------------
0430 ; SUBPROGRAM
0430 ; --------------------------------------------------------------------------------------
0430 0444 | D | .CONST 0x0444 ; Address of begin
0431 0004 | | .CONST 0x0004 ; Address of exception handler
0432 0007 | | .CONST 0x0007 ; Number of locals
0433 INIT_0430:
0433 00ea | | Load_Encached Null_String_Cache
0434 e20e | | Load 0x1,0xe
0435 03b6 | | Declare_Variable Access,By_Allocation,With_Value
0436 00ea | | Load_Encached Null_String_Cache
0437 e20e | | Load 0x1,0xe
0438 03b6 | | Declare_Variable Access,By_Allocation,With_Value
0439 00ea | | Load_Encached Null_String_Cache
043a e20e | | Load 0x1,0xe
043b 03b6 | | Declare_Variable Access,By_Allocation,With_Value
043c 00ea | | Load_Encached Null_String_Cache
043d e20e | | Load 0x1,0xe
043e 03b6 | | Declare_Variable Access,By_Allocation,With_Value
043f 00ea | | Load_Encached Null_String_Cache
0440 e20e | | Load 0x1,0xe
0441 03b6 | | Declare_Variable Access,By_Allocation,With_Value
0442 e22d | - | Load 0x1,0x2d
0443 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
0444 BODY_0430:
0444 e5ff | | Load 0x2,-0x1
0445 e22d | - | Load 0x1,0x2d
0446 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0447 a407 | | Store_Unchecked 0x2,0x7
0448 00d8 | | Load_Top At_Offset_0
0449 e22d | - | Load 0x1,0x2d
044a 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
044b e5ff | | Load 0x2,-0x1
044c 01db | | Execute Vector,Length
044d 0e00 | | Execute_Immediate Not_Equal,0x0
044e 0279 | y | Execute Discrete,And
044f 6805 |h | Jump_Zero 0x455
0450 0092 0f26 | &| Action Push_String_Extended,0xf26 ; "Argument to Define_Font was unrecognizable"
0452 e010 | | Load 0x0,0x10
0453 180e | | Execute Package,Field_Execute,Field_Number 0xe
0454 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0455 00cf | | Action Mark_Auxiliary
0456 784a |xJ | Jump 0x4a1
0457 4800 |H | Short_Literal 0x0
0458 e407 | | Load 0x2,0x7
0459 e22d | - | Load 0x1,0x2d
045a 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
045b 6837 |h7 | Jump_Zero 0x493
045c e407 | | Load 0x2,0x7
045d e22d | - | Load 0x1,0x2d
045e 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
045f 4605 |F | Jump_Case 0x6
0460 783b |x; | Jump 0x49c ; case 0x0
0461 780d |x | Jump 0x46f ; case 0x1
0462 7815 |x | Jump 0x478 ; case 0x2
0463 781d |x | Jump 0x481 ; case 0x3
0464 7825 |x% | Jump 0x48a ; case 0x4
0465 7800 |x | Jump 0x466 ; case 0x5
0466 00ea | | Load_Encached Null_String_Cache
0467 4800 |H | Short_Literal 0x0
0468 e407 | | Load 0x2,0x7
0469 e22d | - | Load 0x1,0x2d
046a 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
046b e20e | | Load 0x1,0xe
046c 03b6 | | Declare_Variable Access,By_Allocation,With_Value
046d a406 | | Store_Unchecked 0x2,0x6
046e 782d |x- | Jump 0x49c
046f 00ea | | Load_Encached Null_String_Cache
0470 4800 |H | Short_Literal 0x0
0471 e407 | | Load 0x2,0x7
0472 e22d | - | Load 0x1,0x2d
0473 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0474 e20e | | Load 0x1,0xe
0475 03b6 | | Declare_Variable Access,By_Allocation,With_Value
0476 a402 | | Store_Unchecked 0x2,0x2
0477 7824 |x$ | Jump 0x49c
0478 00ea | | Load_Encached Null_String_Cache
0479 4800 |H | Short_Literal 0x0
047a e407 | | Load 0x2,0x7
047b e22d | - | Load 0x1,0x2d
047c 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
047d e20e | | Load 0x1,0xe
047e 03b6 | | Declare_Variable Access,By_Allocation,With_Value
047f a403 | | Store_Unchecked 0x2,0x3
0480 781b |x | Jump 0x49c
0481 00ea | | Load_Encached Null_String_Cache
0482 4800 |H | Short_Literal 0x0
0483 e407 | | Load 0x2,0x7
0484 e22d | - | Load 0x1,0x2d
0485 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0486 e20e | | Load 0x1,0xe
0487 03b6 | | Declare_Variable Access,By_Allocation,With_Value
0488 a405 | | Store_Unchecked 0x2,0x5
0489 7812 |x | Jump 0x49c
048a 00ea | | Load_Encached Null_String_Cache
048b 4800 |H | Short_Literal 0x0
048c e407 | | Load 0x2,0x7
048d e22d | - | Load 0x1,0x2d
048e 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
048f e20e | | Load 0x1,0xe
0490 03b6 | | Declare_Variable Access,By_Allocation,With_Value
0491 a404 | | Store_Unchecked 0x2,0x4
0492 7809 |x | Jump 0x49c
0493 0092 0f27 | '| Action Push_String_Extended,0xf27 ; "Define_Font"
0495 4800 |H | Short_Literal 0x0
0496 e407 | | Load 0x2,0x7
0497 e22d | - | Load 0x1,0x2d
0498 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0499 01cc | | Execute Vector,Catenate
049a e010 | | Load 0x0,0x10
049b 180e | | Execute Package,Field_Execute,Field_Number 0xe
049c e407 | | Load 0x2,0x7
049d e22d | - | Load 0x1,0x2d
049e 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
049f c407 | | Store 0x2,0x7
04a0 00c9 | | Action Pop_Auxiliary_Loop
04a1 e407 | | Load 0x2,0x7
04a2 e22d | - | Load 0x1,0x2d
04a3 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
04a4 6fb2 |o | Jump_Zero 0x457
04a5 00ce | | Action Pop_Auxiliary
04a6 e402 | | Load 0x2,0x2
04a7 0227 | ' | Execute Access,All_Reference
04a8 01db | | Execute Vector,Length
04a9 7005 |p | Jump_Nonzero 0x4af
04aa 0092 0f28 | (| Action Push_String_Extended,0xf28 ; "Define_Font requires a Family name"
04ac e010 | | Load 0x0,0x10
04ad 180e | | Execute Package,Field_Execute,Field_Number 0xe
04ae 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04af e403 | | Load 0x2,0x3
04b0 0227 | ' | Execute Access,All_Reference
04b1 01db | | Execute Vector,Length
04b2 7005 |p | Jump_Nonzero 0x4b8
04b3 0092 0f29 | )| Action Push_String_Extended,0xf29 ; "Define_Font requires a Normal font"
04b5 e010 | | Load 0x0,0x10
04b6 180e | | Execute Package,Field_Execute,Field_Number 0xe
04b7 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04b8 e406 | | Load 0x2,0x6
04b9 0227 | ' | Execute Access,All_Reference
04ba e404 | | Load 0x2,0x4
04bb 0227 | ' | Execute Access,All_Reference
04bc e405 | | Load 0x2,0x5
04bd 0227 | ' | Execute Access,All_Reference
04be e403 | | Load 0x2,0x3
04bf 0227 | ' | Execute Access,All_Reference
04c0 e402 | | Load 0x2,0x2
04c1 0227 | ' | Execute Access,All_Reference
04c2 824d | M | Call 0x1,0x4d
04c3 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04c4 0000 0000 | | .BLANK 0000[0x4]
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04d4 | | .CONST 0x04d4 ; Address of begin
04c9 04df | | .CONST 0x04df ; Address of exception handler
04ca 0004 | | .CONST 0x0004 ; Number of locals
04cb INIT_04c8:
04cb e011 | | Load 0x0,0x11
04cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04cd 02c7 | | Declare_Variable Any
04ce 00d8 | | Load_Top At_Offset_0
04cf 1c00 | | Execute_Immediate Run_Utility,0x0
04d0 029f 0d1b | | Declare_Subprogram INIT_0d18,For_Call
04d2 029f 0d3b | ;| Declare_Subprogram INIT_0d38,For_Call
04d4 BODY_04c8:
04d4 482e |H. | Short_Literal 0x2e
04d5 e5fe | | Load 0x2,-0x2
04d6 01cb | | Execute Vector,Append
04d7 e20e | | Load 0x1,0xe
04d8 03b6 | | Declare_Variable Access,By_Allocation,With_Value
04d9 a22e | . | Store_Unchecked 0x1,0x2e
04da 8403 | | Call 0x2,0x3
04db 00cf | | Action Mark_Auxiliary
04dc 8404 | | Call 0x2,0x4
04dd 00c9 | | Action Pop_Auxiliary_Loop
04de 7ffd | | Jump 0x4dc
04df TRAP_04c8:
04df 00d8 | | Load_Top At_Offset_0
04e0 0107 | | Execute Exception,Get_Name
04e1 4950 |IP | Short_Literal 0x150
04e2 495f |I_ | Short_Literal 0x15f
04e3 0262 | b | Execute Discrete,In_Range
04e4 6805 |h | Jump_Zero 0x4ea
04e5 e402 | | Load 0x2,0x2
04e6 e011 | | Load 0x0,0x11
04e7 181b | | Execute Package,Field_Execute,Field_Number 0x1b
04e8 c402 | | Store 0x2,0x2
04e9 4503 |E | Exit_Suprogram New_Top_Offset 0x3
04ea e001 | | Load 0x0,0x1
04eb 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
04ec 010f | | Execute Exception,Equal
04ed 6802 |h | Jump_Zero 0x4f0
04ee 00d8 | | Load_Top At_Offset_0
04ef 0101 | | Execute Exception,Reraise
04f0 0092 0f2a | *| Action Push_String_Extended,0xf2a ; "Could not define fonts in "
04f2 e5ff | | Load 0x2,-0x1
04f3 01cc | | Execute Vector,Catenate
04f4 e010 | | Load 0x0,0x10
04f5 180e | | Execute Package,Field_Execute,Field_Number 0xe
04f6 e001 | | Load 0x0,0x1
04f7 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
04f8 0257 | W | Execute Discrete,Raise
04f9 0000 0000 | | .BLANK 0000[0x7]
0500 ; --------------------------------------------------------------------------------------
0500 ; SUBPROGRAM
0500 ; --------------------------------------------------------------------------------------
0500 0517 | | .CONST 0x0517 ; Address of begin
0501 0004 | | .CONST 0x0004 ; Address of exception handler
0502 0006 | | .CONST 0x0006 ; Number of locals
0503 INIT_0500:
0503 e218 | | Load 0x1,0x18
0504 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0505 02c7 | | Declare_Variable Any
0506 00d8 | | Load_Top At_Offset_0
0507 1c00 | | Execute_Immediate Run_Utility,0x0
0508 e216 | | Load 0x1,0x16
0509 02ff | | Declare_Variable Variant_Record
050a 00d8 | | Load_Top At_Offset_0
050b 1c00 | | Execute_Immediate Run_Utility,0x0
050c e22e | . | Load 0x1,0x2e
050d 0227 | ' | Execute Access,All_Reference
050e e5ff | | Load 0x2,-0x1
050f e21c | | Load 0x1,0x1c
0510 01d7 | | Execute Vector,Field_Read
0511 0227 | ' | Execute Access,All_Reference
0512 01cc | | Execute Vector,Catenate
0513 029f 0d4b | K| Declare_Subprogram INIT_0d48,For_Call
0515 029f 0d6b | k| Declare_Subprogram INIT_0d68,For_Call
0517 BODY_0500:
0517 8405 | | Call 0x2,0x5
0518 8406 | | Call 0x2,0x6
0519 e402 | | Load 0x2,0x2
051a e218 | | Load 0x1,0x18
051b 1814 | | Execute Package,Field_Execute,Field_Number 0x14
051c c402 | | Store 0x2,0x2
051d e403 | | Load 0x2,0x3
051e e217 | | Load 0x1,0x17
051f 03b6 | | Declare_Variable Access,By_Allocation,With_Value
0520 e5ff | | Load 0x2,-0x1
0521 e21f | | Load 0x1,0x1f
0522 01d6 | | Execute Vector,Field_Write
0523 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0524 0000 0000 | | .BLANK 0000[0x4]
0528 ; --------------------------------------------------------------------------------------
0528 ; SUBPROGRAM
0528 ; --------------------------------------------------------------------------------------
0528 052b | + | .CONST 0x052b ; Address of begin
0529 0004 | | .CONST 0x0004 ; Address of exception handler
052a 0001 | | .CONST 0x0001 ; Number of locals
052b BODY_0528:
052b INIT_0528:
052b e23d | = | Load 0x1,0x3d
052c 0c01 | | Execute_Immediate Greater_Equal,0x1
052d 6801 |h | Jump_Zero 0x52f
052e 8242 | B | Call 0x1,0x42
052f 0092 0f2b | +| Action Push_String_Extended,0xf2b ; "/"
0531 e5ff | | Load 0x2,-0x1
0532 0227 | ' | Execute Access,All_Reference
0533 2507 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x7
0534 01cc | | Execute Vector,Catenate
0535 0092 0f2c | ,| Action Push_String_Extended,0xf2c ; " /"
0537 01cc | | Execute Vector,Catenate
0538 e5ff | | Load 0x2,-0x1
0539 0227 | ' | Execute Access,All_Reference
053a 2508 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x8
053b 01cc | | Execute Vector,Catenate
053c 0092 0f2d | -| Action Push_String_Extended,0xf2d ; " findfont dup setfont [.9 0 0 FINDSCALE 0 0] makefont COPYFONT dup /Encoding CAP-ENCODING put definefont pop"
053e 01cc | | Execute Vector,Catenate
053f e233 | 3 | Load 0x1,0x33
0540 e00c | | Load 0x0,0xc
0541 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0542 4801 |H | Short_Literal 0x1
0543 a215 | | Store_Unchecked 0x1,0x15
0544 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0545 0000 0000 | | .XXX[0x3]
0547 0000 | |
0548 ; --------------------------------------------------------------------------------------
0548 ; SUBPROGRAM
0548 ; --------------------------------------------------------------------------------------
0548 0553 | S | .CONST 0x0553 ; Address of begin
0549 0004 | | .CONST 0x0004 ; Address of exception handler
054a 0003 | | .CONST 0x0003 ; Number of locals
054b INIT_0548:
054b e5ff | | Load 0x2,-0x1
054c e21f | | Load 0x1,0x1f
054d 01d5 | | Execute Vector,Field_Reference
054e 0007 | | Action Break_Optional
054f e5ff | | Load 0x2,-0x1
0550 e221 | ! | Load 0x1,0x21
0551 01d5 | | Execute Vector,Field_Reference
0552 0007 | | Action Break_Optional
0553 BODY_0548:
0553 e402 | | Load 0x2,0x2
0554 0227 | ' | Execute Access,All_Reference
0555 2507 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x7
0556 01db | | Execute Vector,Length
0557 0a04 | | Execute_Immediate Plus,0x4
0558 e402 | | Load 0x2,0x2
0559 0227 | ' | Execute Access,All_Reference
055a 2507 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x7
055b 01db | | Execute Vector,Length
055c e006 | | Load 0x0,0x6
055d 1b11 | | Execute Package,Field_Read,Field_Number 0x11
055e 1c08 | | Execute_Immediate Run_Utility,0x8
055f e214 | | Load 0x1,0x14
0560 e402 | | Load 0x2,0x2
0561 0227 | ' | Execute Access,All_Reference
0562 2507 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x7
0563 01cc | | Execute Vector,Catenate
0564 e404 | | Load 0x2,0x4
0565 00d8 | | Load_Top At_Offset_0
0566 2507 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x7
0567 00da | | Load_Top At_Offset_2
0568 01da | | Execute Vector,Bounds
0569 00da | | Load_Top At_Offset_2
056a 01da | | Execute Vector,Bounds
056b 00da | | Load_Top At_Offset_2
056c 027f | | Execute Discrete,Equal
056d 7001 |p | Jump_Nonzero 0x56f
056e 08e0 | | Execute_Immediate Raise,0xe0
056f 00cd | | Action Spare6_Action
0570 027f | | Execute Discrete,Equal
0571 7001 |p | Jump_Nonzero 0x573
0572 08e0 | | Execute_Immediate Raise,0xe0
0573 00d2 | | Pop_Control Pop_Count_2
0574 e404 | | Load 0x2,0x4
0575 2907 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x7
0576 e402 | | Load 0x2,0x2
0577 0227 | ' | Execute Access,All_Reference
0578 2507 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x7
0579 e404 | | Load 0x2,0x4
057a 00d8 | | Load_Top At_Offset_0
057b 2508 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x8
057c 00da | | Load_Top At_Offset_2
057d 01da | | Execute Vector,Bounds
057e 00da | | Load_Top At_Offset_2
057f 01da | | Execute Vector,Bounds
0580 00da | | Load_Top At_Offset_2
0581 027f | | Execute Discrete,Equal
0582 7001 |p | Jump_Nonzero 0x584
0583 08e0 | | Execute_Immediate Raise,0xe0
0584 00cd | | Action Spare6_Action
0585 027f | | Execute Discrete,Equal
0586 7001 |p | Jump_Nonzero 0x588
0587 08e0 | | Execute_Immediate Raise,0xe0
0588 00d2 | | Pop_Control Pop_Count_2
0589 e404 | | Load 0x2,0x4
058a 2908 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x8
058b e402 | | Load 0x2,0x2
058c 0227 | ' | Execute Access,All_Reference
058d 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
058e e404 | | Load 0x2,0x4
058f 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0590 e402 | | Load 0x2,0x2
0591 0227 | ' | Execute Access,All_Reference
0592 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
0593 e404 | | Load 0x2,0x4
0594 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4
0595 4800 |H | Short_Literal 0x0
0596 e404 | | Load 0x2,0x4
0597 2805 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5
0598 e402 | | Load 0x2,0x2
0599 0227 | ' | Execute Access,All_Reference
059a 2406 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x6
059b e006 | | Load 0x0,0x6
059c 1b11 | | Execute Package,Field_Read,Field_Number 0x11
059d 2306 |# | Execute Variant_Record,Field_Type,Field_Number 0x6
059e 0119 | | Execute Any,Check_In_Formal_Type
059f e404 | | Load 0x2,0x4
05a0 2806 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x6
05a1 e217 | | Load 0x1,0x17
05a2 03b6 | | Declare_Variable Access,By_Allocation,With_Value
05a3 a403 | | Store_Unchecked 0x2,0x3
05a4 00cf | | Action Mark_Auxiliary
05a5 e403 | | Load 0x2,0x3
05a6 0227 | ' | Execute Access,All_Reference
05a7 2406 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x6
05a8 01d9 | | Execute Vector,Reverse_Bounds
05a9 0007 | | Action Break_Optional
05aa 00d8 | | Load_Top At_Offset_0
05ab e403 | | Load 0x2,0x3
05ac 0227 | ' | Execute Access,All_Reference
05ad 2406 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x6
05ae 01d7 | | Execute Vector,Field_Read
05af 4809 |H | Short_Literal 0x9
05b0 0271 | q | Execute Discrete,Times
05b1 480a |H | Short_Literal 0xa
05b2 0270 | p | Execute Discrete,Divide
05b3 e406 | | Load 0x2,0x6
05b4 e403 | | Load 0x2,0x3
05b5 0227 | ' | Execute Access,All_Reference
05b6 2406 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x6
05b7 01d6 | | Execute Vector,Field_Write
05b8 00c8 | | Action Pop_Auxiliary_Range
05b9 3ff0 |? | Loop_Increasing 0x5aa
05ba 00ce | | Action Pop_Auxiliary
05bb 4841 |HA | Short_Literal 0x41
05bc 485a |HZ | Short_Literal 0x5a
05bd e403 | | Load 0x2,0x3
05be 0227 | ' | Execute Access,All_Reference
05bf 2406 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x6
05c0 01cf | | Execute Vector,Slice_Read
05c1 4861 |Ha | Short_Literal 0x61
05c2 487a |Hz | Short_Literal 0x7a
05c3 e403 | | Load 0x2,0x3
05c4 0229 | ) | Execute Access,All_Read
05c5 2c06 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x6
05c6 01ce | | Execute Vector,Slice_Write
05c7 4502 |E | Exit_Suprogram New_Top_Offset 0x2
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05d1 | | .CONST 0x05d1 ; Address of begin
05c9 05fb | | .CONST 0x05fb ; Address of exception handler
05ca 0003 | | .CONST 0x0003 ; Number of locals
05cb INIT_05c8:
05cb e5ff | | Load 0x2,-0x1
05cc 0902 | | Execute_Immediate Binary_Scale,0x2
05cd e225 | % | Load 0x1,0x25
05ce 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
05cf e21a | | Load 0x1,0x1a
05d0 0007 | | Action Break_Optional
05d1 BODY_05c8:
05d1 e5fe | | Load 0x2,-0x2
05d2 6803 |h | Jump_Zero 0x5d6
05d3 e402 | | Load 0x2,0x2
05d4 0a01 | | Execute_Immediate Plus,0x1
05d5 c402 | | Store 0x2,0x2
05d6 e5fd | | Load 0x2,-0x3
05d7 6803 |h | Jump_Zero 0x5db
05d8 e402 | | Load 0x2,0x2
05d9 0a02 | | Execute_Immediate Plus,0x2
05da c402 | | Store 0x2,0x2
05db e5fc | | Load 0x2,-0x4
05dc 6814 |h | Jump_Zero 0x5f1
05dd e402 | | Load 0x2,0x2
05de e22b | + | Load 0x1,0x2b
05df 01d7 | | Execute Vector,Field_Read
05e0 0227 | ' | Execute Access,All_Reference
05e1 2c05 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x5
05e2 700a |p | Jump_Nonzero 0x5ed
05e3 4801 |H | Short_Literal 0x1
05e4 e402 | | Load 0x2,0x2
05e5 e22b | + | Load 0x1,0x2b
05e6 01d7 | | Execute Vector,Field_Read
05e7 0227 | ' | Execute Access,All_Reference
05e8 2805 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5
05e9 e402 | | Load 0x2,0x2
05ea e22b | + | Load 0x1,0x2b
05eb 01d7 | | Execute Vector,Field_Read
05ec 8251 | Q | Call 0x1,0x51
05ed e402 | | Load 0x2,0x2
05ee e22b | + | Load 0x1,0x2b
05ef 01d7 | | Execute Vector,Field_Read
05f0 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
05f1 4801 |H | Short_Literal 0x1
05f2 e402 | | Load 0x2,0x2
05f3 e229 | ) | Load 0x1,0x29
05f4 01d7 | | Execute Vector,Field_Read
05f5 0227 | ' | Execute Access,All_Reference
05f6 2805 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5
05f7 e402 | | Load 0x2,0x2
05f8 e229 | ) | Load 0x1,0x29
05f9 01d7 | | Execute Vector,Field_Read
05fa 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
05fb TRAP_05c8:
05fb 010e | | Execute Exception,Is_Constraint_Error
05fc 6836 |h6 | Jump_Zero 0x633
05fd e402 | | Load 0x2,0x2
05fe e227 | ' | Load 0x1,0x27
05ff 01d7 | | Execute Vector,Field_Read
0600 a403 | | Store_Unchecked 0x2,0x3
0601 e403 | | Load 0x2,0x3
0602 e21f | | Load 0x1,0x1f
0603 01d7 | | Execute Vector,Field_Read
0604 7002 |p | Jump_Nonzero 0x607
0605 e403 | | Load 0x2,0x3
0606 8250 | P | Call 0x1,0x50
0607 e5fc | | Load 0x2,-0x4
0608 6820 |h | Jump_Zero 0x629
0609 e403 | | Load 0x2,0x3
060a e221 | ! | Load 0x1,0x21
060b 01d7 | | Execute Vector,Field_Read
060c 7002 |p | Jump_Nonzero 0x60f
060d e403 | | Load 0x2,0x3
060e 8252 | R | Call 0x1,0x52
060f e403 | | Load 0x2,0x3
0610 e221 | ! | Load 0x1,0x21
0611 01d7 | | Execute Vector,Field_Read
0612 e402 | | Load 0x2,0x2
0613 e22b | + | Load 0x1,0x2b
0614 01d6 | | Execute Vector,Field_Write
0615 e402 | | Load 0x2,0x2
0616 e22b | + | Load 0x1,0x2b
0617 01d7 | | Execute Vector,Field_Read
0618 0227 | ' | Execute Access,All_Reference
0619 2c05 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x5
061a 700a |p | Jump_Nonzero 0x625
061b 4801 |H | Short_Literal 0x1
061c e402 | | Load 0x2,0x2
061d e22b | + | Load 0x1,0x2b
061e 01d7 | | Execute Vector,Field_Read
061f 0227 | ' | Execute Access,All_Reference
0620 2805 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5
0621 e402 | | Load 0x2,0x2
0622 e22b | + | Load 0x1,0x2b
0623 01d7 | | Execute Vector,Field_Read
0624 8251 | Q | Call 0x1,0x51
0625 e402 | | Load 0x2,0x2
0626 e22b | + | Load 0x1,0x2b
0627 01d7 | | Execute Vector,Field_Read
0628 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0629 e403 | | Load 0x2,0x3
062a e21f | | Load 0x1,0x1f
062b 01d7 | | Execute Vector,Field_Read
062c e402 | | Load 0x2,0x2
062d e229 | ) | Load 0x1,0x29
062e 01d6 | | Execute Vector,Field_Write
062f e402 | | Load 0x2,0x2
0630 e229 | ) | Load 0x1,0x29
0631 01d7 | | Execute Vector,Field_Read
0632 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0633 0100 | | Execute Exception,Raise
0634 0000 0000 | | .BLANK 0000[0x4]
0638 ; --------------------------------------------------------------------------------------
0638 ; SUBPROGRAM
0638 ; --------------------------------------------------------------------------------------
0638 063b | ; | .CONST 0x063b ; Address of begin
0639 0004 | | .CONST 0x0004 ; Address of exception handler
063a 0001 | | .CONST 0x0001 ; Number of locals
063b BODY_0638:
063b INIT_0638:
063b e5ff | | Load 0x2,-0x1
063c 0d01 | | Execute_Immediate Less,0x1
063d 6802 |h | Jump_Zero 0x640
063e 4801 |H | Short_Literal 0x1
063f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0640 e5ff | | Load 0x2,-0x1
0641 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0642 0000 0000 | | .BLANK 0000[0x6]
0648 ; --------------------------------------------------------------------------------------
0648 ; SUBPROGRAM
0648 ; --------------------------------------------------------------------------------------
0648 064b | K | .CONST 0x064b ; Address of begin
0649 0004 | | .CONST 0x0004 ; Address of exception handler
064a 0001 | | .CONST 0x0001 ; Number of locals
064b BODY_0648:
064b INIT_0648:
064b 4801 |H | Short_Literal 0x1
064c 00ca | | Action Exit_Nullary_Function
064d 0000 0000 | | .XXX[0x3]
064f 0000 | |
0650 ; --------------------------------------------------------------------------------------
0650 ; SUBPROGRAM
0650 ; --------------------------------------------------------------------------------------
0650 0653 | S | .CONST 0x0653 ; Address of begin
0651 0004 | | .CONST 0x0004 ; Address of exception handler
0652 0001 | | .CONST 0x0001 ; Number of locals
0653 BODY_0650:
0653 INIT_0650:
0653 4801 |H | Short_Literal 0x1
0654 00ca | | Action Exit_Nullary_Function
0655 0000 0000 | | .XXX[0x3]
0657 0000 | |
0658 ; --------------------------------------------------------------------------------------
0658 ; SUBPROGRAM
0658 ; --------------------------------------------------------------------------------------
0658 065b | [ | .CONST 0x065b ; Address of begin
0659 0004 | | .CONST 0x0004 ; Address of exception handler
065a 0001 | | .CONST 0x0001 ; Number of locals
065b BODY_0658:
065b INIT_0658:
065b e5ff | | Load 0x2,-0x1
065c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
065d 0000 0000 | | .XXX[0x3]
065f 0000 | |
0660 ; --------------------------------------------------------------------------------------
0660 ; SUBPROGRAM
0660 ; --------------------------------------------------------------------------------------
0660 0663 | c | .CONST 0x0663 ; Address of begin
0661 0004 | | .CONST 0x0004 ; Address of exception handler
0662 0001 | | .CONST 0x0001 ; Number of locals
0663 BODY_0660:
0663 INIT_0660:
0663 e5ff | | Load 0x2,-0x1
0664 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0665 0000 0000 | | .XXX[0x3]
0667 0000 | |
0668 ; --------------------------------------------------------------------------------------
0668 ; SUBPROGRAM
0668 ; --------------------------------------------------------------------------------------
0668 066b | k | .CONST 0x066b ; Address of begin
0669 0004 | | .CONST 0x0004 ; Address of exception handler
066a 0001 | | .CONST 0x0001 ; Number of locals
066b BODY_0668:
066b INIT_0668:
066b e5ff | | Load 0x2,-0x1
066c e20d | | Load 0x1,0xd
066d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
066e e20d | | Load 0x1,0xd
066f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0670 e20d | | Load 0x1,0xd
0671 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0672 e20d | | Load 0x1,0xd
0673 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0674 8253 | S | Call 0x1,0x53
0675 0227 | ' | Execute Access,All_Reference
0676 2406 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x6
0677 01d7 | | Execute Vector,Field_Read
0678 e20d | | Load 0x1,0xd
0679 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
067a 0271 | q | Execute Discrete,Times
067b e001 | | Load 0x0,0x1
067c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
067d 00d9 | | Load_Top At_Offset_1
067e 00d0 | | Action Swap_Control
067f 0260 | ` | Execute Discrete,In_Type
0680 7001 |p | Jump_Nonzero 0x682
0681 0801 | | Execute_Immediate Raise,0x1
0682 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0683 0000 0000 | | .BLANK 0000[0x5]
0688 ; --------------------------------------------------------------------------------------
0688 ; SUBPROGRAM
0688 ; --------------------------------------------------------------------------------------
0688 068b | | .CONST 0x068b ; Address of begin
0689 0004 | | .CONST 0x0004 ; Address of exception handler
068a 0001 | | .CONST 0x0001 ; Number of locals
068b BODY_0688:
068b INIT_0688:
068b e20d | | Load 0x1,0xd
068c 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
068d 4be8 |K | Short_Literal 0x3e8
068e 0271 | q | Execute Discrete,Times
068f e001 | | Load 0x0,0x1
0690 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0691 00d9 | | Load_Top At_Offset_1
0692 00d0 | | Action Swap_Control
0693 0260 | ` | Execute Discrete,In_Type
0694 7001 |p | Jump_Nonzero 0x696
0695 0801 | | Execute_Immediate Raise,0x1
0696 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0697 0000 | | .XXX[0x1]
0698 ; --------------------------------------------------------------------------------------
0698 ; SUBPROGRAM
0698 ; --------------------------------------------------------------------------------------
0698 06a3 | | .CONST 0x06a3 ; Address of begin
0699 076b | k | .CONST 0x076b ; Address of exception handler
069a 0002 | | .CONST 0x0002 ; Number of locals
069b INIT_0698:
069b e5ff | | Load 0x2,-0x1
069c e012 | | Load 0x0,0x12
069d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
069e 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
069f 0092 0f2e | .| Action Push_String_Extended,0xf2e ; "_PS"
06a1 01cc | | Execute Vector,Catenate
06a2 0007 | | Action Break_Optional
06a3 BODY_0698:
06a3 e233 | 3 | Load 0x1,0x33
06a4 e013 | | Load 0x0,0x13
06a5 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
06a6 e402 | | Load 0x2,0x2
06a7 e00c | | Load 0x0,0xc
06a8 180f | | Execute Package,Field_Execute,Field_Number 0xf
06a9 c233 | 3 | Store 0x1,0x33
06aa 0092 0f2f | /| Action Push_String_Extended,0xf2f ; "%!PS-Adobe-2.0"
06ac e233 | 3 | Load 0x1,0x33
06ad e00c | | Load 0x0,0xc
06ae 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06af e001 | | Load 0x0,0x1
06b0 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
06b1 681a |h | Jump_Zero 0x6cc
06b2 0092 0f30 | 0| Action Push_String_Extended,0xf30 ; "%%Title: "
06b4 e5ff | | Load 0x2,-0x1
06b5 e012 | | Load 0x0,0x12
06b6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06b7 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
06b8 01cc | | Execute Vector,Catenate
06b9 e233 | 3 | Load 0x1,0x33
06ba e00c | | Load 0x0,0xc
06bb 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06bc 0092 0f31 | 1| Action Push_String_Extended,0xf31 ; "%%Creator: COMPOSE"
06be e233 | 3 | Load 0x1,0x33
06bf e00c | | Load 0x0,0xc
06c0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06c1 0092 0f32 | 2| Action Push_String_Extended,0xf32 ; "%%CreationDate: MM/DD/YY"
06c3 e233 | 3 | Load 0x1,0x33
06c4 e00c | | Load 0x0,0xc
06c5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06c6 0092 0f33 | 3| Action Push_String_Extended,0xf33 ; "%%For: regression test"
06c8 e233 | 3 | Load 0x1,0x33
06c9 e00c | | Load 0x0,0xc
06ca 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06cb 7826 |x& | Jump 0x6f2
06cc 0092 0f30 | 0| Action Push_String_Extended,0xf30 ; "%%Title: "
06ce e5ff | | Load 0x2,-0x1
06cf e012 | | Load 0x0,0x12
06d0 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06d1 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
06d2 01cc | | Execute Vector,Catenate
06d3 e233 | 3 | Load 0x1,0x33
06d4 e00c | | Load 0x0,0xc
06d5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06d6 0092 0f34 | 4| Action Push_String_Extended,0xf34 ; "%%Creator: COMPOSE "
06d8 e001 | | Load 0x0,0x1
06d9 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
06da 01cc | | Execute Vector,Catenate
06db e233 | 3 | Load 0x1,0x33
06dc e00c | | Load 0x0,0xc
06dd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06de 0092 0f35 | 5| Action Push_String_Extended,0xf35 ; "%%CreationDate: "
06e0 4800 |H | Short_Literal 0x0
06e1 4800 |H | Short_Literal 0x0
06e2 4800 |H | Short_Literal 0x0
06e3 e014 | | Load 0x0,0x14
06e4 1815 | | Execute Package,Field_Execute,Field_Number 0x15
06e5 e014 | | Load 0x0,0x14
06e6 181f | | Execute Package,Field_Execute,Field_Number 0x1f
06e7 01cc | | Execute Vector,Catenate
06e8 e233 | 3 | Load 0x1,0x33
06e9 e00c | | Load 0x0,0xc
06ea 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06eb 0092 0f36 | 6| Action Push_String_Extended,0xf36 ; "%%For: "
06ed e5fe | | Load 0x2,-0x2
06ee 01cc | | Execute Vector,Catenate
06ef e233 | 3 | Load 0x1,0x33
06f0 e00c | | Load 0x0,0xc
06f1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06f2 0092 0f37 | 7| Action Push_String_Extended,0xf37 ; "%%Pages: (atend)"
06f4 e233 | 3 | Load 0x1,0x33
06f5 e00c | | Load 0x0,0xc
06f6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06f7 0092 0f38 | 8| Action Push_String_Extended,0xf38 ; "%%DocumentFonts: (atend)"
06f9 e233 | 3 | Load 0x1,0x33
06fa e00c | | Load 0x0,0xc
06fb 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06fc 0092 0f39 | 9| Action Push_String_Extended,0xf39 ; "%%EndComments"
06fe e233 | 3 | Load 0x1,0x33
06ff e00c | | Load 0x0,0xc
0700 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0701 0092 0f3a | :| Action Push_String_Extended,0xf3a ; "/SelectFont {findfont exch dup neg 0 0 3 -1 roll 0 0 MAT astore makefont setfont} bind def"
0703 e233 | 3 | Load 0x1,0x33
0704 e00c | | Load 0x0,0xc
0705 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0706 0092 0f3b | ;| Action Push_String_Extended,0xf3b ; "/BeginPage {/State save def /INITIAL-MATRIX matrix currentmatrix def 1 -1 scale 0.5 setlinewidth} bind def"
0708 e233 | 3 | Load 0x1,0x33
0709 e00c | | Load 0x0,0xc
070a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
070b 0092 0f3c | <| Action Push_String_Extended,0xf3c ; "/PositionPage {{-90 rotate pop} {0 exch neg translate} ifelse} bind def"
070d e233 | 3 | Load 0x1,0x33
070e e00c | | Load 0x0,0xc
070f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0710 0092 0f3d | =| Action Push_String_Extended,0xf3d ; "/EndPage {State restore showpage} def"
0712 e233 | 3 | Load 0x1,0x33
0713 e00c | | Load 0x0,0xc
0714 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0715 0092 0f3e | >| Action Push_String_Extended,0xf3e ; "/WS {0 32 4 -1 roll widthshow} bind def"
0717 e233 | 3 | Load 0x1,0x33
0718 e00c | | Load 0x0,0xc
0719 1813 | | Execute Package,Field_Execute,Field_Number 0x13
071a 0092 0f3f | ?| Action Push_String_Extended,0xf3f ; "/MX {0 rmoveto} bind def"
071c e233 | 3 | Load 0x1,0x33
071d e00c | | Load 0x0,0xc
071e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
071f 0092 0f40 | @| Action Push_String_Extended,0xf40 ; "/LTAB {gsave exch (.) stringwidth pop sub exch {dup 2 div dup 0 rmoveto (.) show 0 rmoveto} repeat pop grestore} bind def"
0721 e233 | 3 | Load 0x1,0x33
0722 e00c | | Load 0x0,0xc
0723 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0724 0092 0f41 | A| Action Push_String_Extended,0xf41 ; "/MAT matrix def"
0726 e233 | 3 | Load 0x1,0x33
0727 e00c | | Load 0x0,0xc
0728 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0729 0092 0f42 | B| Action Push_String_Extended,0xf42 ; "/FINDSCALE {gsave newpath 0 0 moveto (X) false charpath"
072b e233 | 3 | Load 0x1,0x33
072c e00c | | Load 0x0,0xc
072d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
072e 0092 0f43 | C| Action Push_String_Extended,0xf43 ; "flattenpath pathbbox /CAPHEIGHT exch def pop pop pop newpath 0 0 moveto"
0730 e233 | 3 | Load 0x1,0x33
0731 e00c | | Load 0x0,0xc
0732 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0733 0092 0f44 | D| Action Push_String_Extended,0xf44 ; "(x) false charpath flattenpath pathbbox /XHEIGHT exch def pop pop pop"
0735 e233 | 3 | Load 0x1,0x33
0736 e00c | | Load 0x0,0xc
0737 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0738 0092 0f45 | E| Action Push_String_Extended,0xf45 ; "grestore XHEIGHT CAPHEIGHT XHEIGHT sub 3 div add CAPHEIGHT div } bind def"
073a e233 | 3 | Load 0x1,0x33
073b e00c | | Load 0x0,0xc
073c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
073d 0092 0f46 | F| Action Push_String_Extended,0xf46 ; "/CAP-ENCODING [ StandardEncoding aload pop ] def"
073f e233 | 3 | Load 0x1,0x33
0740 e00c | | Load 0x0,0xc
0741 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0742 0092 0f47 | G| Action Push_String_Extended,0xf47 ; "8#141 1 8#172 {CAP-ENCODING exch dup 1 string dup 0 4 -1 roll 8#40 sub put cvn put} for"
0744 e233 | 3 | Load 0x1,0x33
0745 e00c | | Load 0x0,0xc
0746 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0747 0092 0f48 | H| Action Push_String_Extended,0xf48 ; "/COPYFONT {dup length dict /TMPDICT exch def {1 index /FID ne {TMPDICT 3 1 roll put} {pop pop} ifelse } forall TMPDICT }bind def"
0749 e233 | 3 | Load 0x1,0x33
074a e00c | | Load 0x0,0xc
074b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
074c 0092 0f49 | I| Action Push_String_Extended,0xf49 ; "/SYM {save exch /newfont currentfont maxlength dict def currentfont"
074e e233 | 3 | Load 0x1,0x33
074f e00c | | Load 0x0,0xc
0750 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0751 0092 0f4a | J| Action Push_String_Extended,0xf4a ; "{exch dup /FID ne {dup /Encoding eq {exch dup length array copy newfont 3 1 roll put}"
0753 e233 | 3 | Load 0x1,0x33
0754 e00c | | Load 0x0,0xc
0755 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0756 0092 0f4b | K| Action Push_String_Extended,0xf4b ; "{exch newfont 3 1 roll put} ifelse } {pop pop} ifelse} forall"
0758 e233 | 3 | Load 0x1,0x33
0759 e00c | | Load 0x0,0xc
075a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
075b 0092 0f4c | L| Action Push_String_Extended,0xf4c ; "newfont /Encoding get 8#377 3 -1 roll put /NEWFONT newfont definefont setfont"
075d e233 | 3 | Load 0x1,0x33
075e e00c | | Load 0x0,0xc
075f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0760 0092 0f4d | M| Action Push_String_Extended,0xf4d ; "(\x5c377) show restore} bind def"
0762 e233 | 3 | Load 0x1,0x33
0763 e00c | | Load 0x0,0xc
0764 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0765 0092 0f4e | N| Action Push_String_Extended,0xf4e ; "%%EndProlog"
0767 e233 | 3 | Load 0x1,0x33
0768 e00c | | Load 0x0,0xc
0769 1813 | | Execute Package,Field_Execute,Field_Number 0x13
076a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
076b TRAP_0698:
076b 0007 | | Action Break_Optional
076c 4829 |H) | Short_Literal 0x29
076d 0092 0f4f | O| Action Push_String_Extended,0xf4f ; "Cannot create output "
076f e402 | | Load 0x2,0x2
0770 01cc | | Execute Vector,Catenate
0771 0092 0f50 | P| Action Push_String_Extended,0xf50 ; " ("
0773 01cc | | Execute Vector,Catenate
0774 4800 |H | Short_Literal 0x0
0775 4801 |H | Short_Literal 0x1
0776 e015 | | Load 0x0,0x15
0777 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0778 01cc | | Execute Vector,Catenate
0779 01cb | | Execute Vector,Append
077a e010 | | Load 0x0,0x10
077b 180e | | Execute Package,Field_Execute,Field_Number 0xe
077c e001 | | Load 0x0,0x1
077d 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
077e 0257 | W | Execute Discrete,Raise
077f 0000 | | .XXX[0x1]
0780 ; --------------------------------------------------------------------------------------
0780 ; SUBPROGRAM
0780 ; --------------------------------------------------------------------------------------
0780 0783 | | .CONST 0x0783 ; Address of begin
0781 0004 | | .CONST 0x0004 ; Address of exception handler
0782 0001 | | .CONST 0x0001 ; Number of locals
0783 BODY_0780:
0783 INIT_0780:
0783 0092 0f51 | Q| Action Push_String_Extended,0xf51 ; "%%Trailer"
0785 e233 | 3 | Load 0x1,0x33
0786 e00c | | Load 0x0,0xc
0787 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0788 0092 0f52 | R| Action Push_String_Extended,0xf52 ; "%%Pages:"
078a e234 | 4 | Load 0x1,0x34
078b 00e0 | | Load_Encached Standard_Cache
078c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
078d 01cc | | Execute Vector,Catenate
078e 0092 0f53 | S| Action Push_String_Extended,0xf53 ; " 1"
0790 01cc | | Execute Vector,Catenate
0791 e233 | 3 | Load 0x1,0x33
0792 e00c | | Load 0x0,0xc
0793 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0794 0092 0f54 | T| Action Push_String_Extended,0xf54 ; "%%DocumentFonts:"
0796 e233 | 3 | Load 0x1,0x33
0797 e00c | | Load 0x0,0xc
0798 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0799 00cf | | Action Mark_Auxiliary
079a e21d | | Load 0x1,0x1d
079b 4801 |H | Short_Literal 0x1
079c 0263 | c | Execute Discrete,Above_Bound
079d 7010 |p | Jump_Nonzero 0x7ae
079e 00d8 | | Load_Top At_Offset_0
079f e21f | | Load 0x1,0x1f
07a0 01d7 | | Execute Vector,Field_Read
07a1 680a |h | Jump_Zero 0x7ac
07a2 4820 |H | Short_Literal 0x20
07a3 e404 | | Load 0x2,0x4
07a4 e21f | | Load 0x1,0x1f
07a5 01d7 | | Execute Vector,Field_Read
07a6 0227 | ' | Execute Access,All_Reference
07a7 2507 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x7
07a8 01ca | | Execute Vector,Prepend
07a9 e233 | 3 | Load 0x1,0x33
07aa e00c | | Load 0x0,0xc
07ab 1812 | | Execute Package,Field_Execute,Field_Number 0x12
07ac 00c8 | | Action Pop_Auxiliary_Range
07ad 3ff0 |? | Loop_Increasing 0x79e
07ae 00ce | | Action Pop_Auxiliary
07af 00ea | | Load_Encached Null_String_Cache
07b0 e233 | 3 | Load 0x1,0x33
07b1 e00c | | Load 0x0,0xc
07b2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07b3 e233 | 3 | Load 0x1,0x33
07b4 e00c | | Load 0x0,0xc
07b5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
07b6 c233 | 3 | Store 0x1,0x33
07b7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07b8 ; --------------------------------------------------------------------------------------
07b8 ; SUBPROGRAM
07b8 ; --------------------------------------------------------------------------------------
07b8 07bb | | .CONST 0x07bb ; Address of begin
07b9 0004 | | .CONST 0x0004 ; Address of exception handler
07ba 0001 | | .CONST 0x0001 ; Number of locals
07bb BODY_07b8:
07bb INIT_07b8:
07bb 0092 0f55 | U| Action Push_String_Extended,0xf55 ; "_PS_AUX"
07bd 00ca | | Action Exit_Nullary_Function
07be 0000 0000 | | .XXX[0x2]
07c0 ; --------------------------------------------------------------------------------------
07c0 ; SUBPROGRAM
07c0 ; --------------------------------------------------------------------------------------
07c0 07c3 | | .CONST 0x07c3 ; Address of begin
07c1 0004 | | .CONST 0x0004 ; Address of exception handler
07c2 0001 | | .CONST 0x0001 ; Number of locals
07c3 BODY_07c0:
07c3 INIT_07c0:
07c3 0092 0f56 | V| Action Push_String_Extended,0xf56 ; "EndPage"
07c5 e233 | 3 | Load 0x1,0x33
07c6 e00c | | Load 0x0,0xc
07c7 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07c8 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07c9 0000 0000 | | .BLANK 0000[0x7]
07d0 ; --------------------------------------------------------------------------------------
07d0 ; SUBPROGRAM
07d0 ; --------------------------------------------------------------------------------------
07d0 07d7 | | .CONST 0x07d7 ; Address of begin
07d1 0004 | | .CONST 0x0004 ; Address of exception handler
07d2 0002 | | .CONST 0x0002 ; Number of locals
07d3 INIT_07d0:
07d3 e5ff | | Load 0x2,-0x1
07d4 8244 | D | Call 0x1,0x44
07d5 00e3 | | Load_Encached Natural_Cache
07d6 03f1 | | Declare_Variable Discrete,With_Value
07d7 BODY_07d0:
07d7 e234 | 4 | Load 0x1,0x34
07d8 0a01 | | Execute_Immediate Plus,0x1
07d9 c234 | 4 | Store 0x1,0x34
07da 0092 0f57 | W| Action Push_String_Extended,0xf57 ; "%%Page: "
07dc e5fd | | Load 0x2,-0x3
07dd 01cc | | Execute Vector,Catenate
07de e234 | 4 | Load 0x1,0x34
07df 00e0 | | Load_Encached Standard_Cache
07e0 1818 | | Execute Package,Field_Execute,Field_Number 0x18
07e1 01cc | | Execute Vector,Catenate
07e2 e233 | 3 | Load 0x1,0x33
07e3 e00c | | Load 0x0,0xc
07e4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07e5 0092 0f58 | X| Action Push_String_Extended,0xf58 ; "BeginPage"
07e7 e233 | 3 | Load 0x1,0x33
07e8 e00c | | Load 0x0,0xc
07e9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07ea 00d8 | | Load_Top At_Offset_0
07eb 680a |h | Jump_Zero 0x7f6
07ec 00d8 | | Load_Top At_Offset_0
07ed e211 | | Load 0x1,0x11
07ee 01d5 | | Execute Vector,Field_Reference
07ef 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
07f0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
07f1 8240 | @ | Call 0x1,0x40
07f2 e233 | 3 | Load 0x1,0x33
07f3 e00c | | Load 0x0,0xc
07f4 1812 | | Execute Package,Field_Execute,Field_Number 0x12
07f5 7816 |x | Jump 0x80c
07f6 0092 0f59 | Y| Action Push_String_Extended,0xf59 ; "Page started with unknown form selected. "
07f8 4801 |H | Short_Literal 0x1
07f9 e211 | | Load 0x1,0x11
07fa 01d5 | | Execute Vector,Field_Reference
07fb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
07fc 0227 | ' | Execute Access,All_Reference
07fd 01cc | | Execute Vector,Catenate
07fe 0092 0f1d | | Action Push_String_Extended,0xf1d ; " assumed"
0800 01cc | | Execute Vector,Catenate
0801 e010 | | Load 0x0,0x10
0802 180f | | Execute Package,Field_Execute,Field_Number 0xf
0803 4801 |H | Short_Literal 0x1
0804 e211 | | Load 0x1,0x11
0805 01d5 | | Execute Vector,Field_Reference
0806 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0807 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0808 8240 | @ | Call 0x1,0x40
0809 e233 | 3 | Load 0x1,0x33
080a e00c | | Load 0x0,0xc
080b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
080c e5fe | | Load 0x2,-0x2
080d 6806 |h | Jump_Zero 0x814
080e 0092 0f5a | Z| Action Push_String_Extended,0xf5a ; " true"
0810 e233 | 3 | Load 0x1,0x33
0811 e00c | | Load 0x0,0xc
0812 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0813 7805 |x | Jump 0x819
0814 0092 0f5b | [| Action Push_String_Extended,0xf5b ; " false"
0816 e233 | 3 | Load 0x1,0x33
0817 e00c | | Load 0x0,0xc
0818 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0819 0092 0f5c | \| Action Push_String_Extended,0xf5c ; " PositionPage"
081b e233 | 3 | Load 0x1,0x33
081c e00c | | Load 0x0,0xc
081d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
081e e217 | | Load 0x1,0x17
081f a235 | 5 | Store_Unchecked 0x1,0x35
0820 e215 | | Load 0x1,0x15
0821 6814 |h | Jump_Zero 0x836
0822 00cf | | Action Mark_Auxiliary
0823 e21d | | Load 0x1,0x1d
0824 4801 |H | Short_Literal 0x1
0825 0263 | c | Execute Discrete,Above_Bound
0826 700c |p | Jump_Nonzero 0x833
0827 00d8 | | Load_Top At_Offset_0
0828 e221 | ! | Load 0x1,0x21
0829 01d7 | | Execute Vector,Field_Read
082a 6806 |h | Jump_Zero 0x831
082b 4800 |H | Short_Literal 0x0
082c e405 | | Load 0x2,0x5
082d e221 | ! | Load 0x1,0x21
082e 01d7 | | Execute Vector,Field_Read
082f 0227 | ' | Execute Access,All_Reference
0830 2805 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5
0831 00c8 | | Action Pop_Auxiliary_Range
0832 3ff4 |? | Loop_Increasing 0x827
0833 00ce | | Action Pop_Auxiliary
0834 4800 |H | Short_Literal 0x0
0835 a215 | | Store_Unchecked 0x1,0x15
0836 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0837 0000 | | .XXX[0x1]
0838 ; --------------------------------------------------------------------------------------
0838 ; SUBPROGRAM
0838 ; --------------------------------------------------------------------------------------
0838 084f | O | .CONST 0x084f ; Address of begin
0839 0004 | | .CONST 0x0004 ; Address of exception handler
083a 0007 | | .CONST 0x0007 ; Number of locals
083b INIT_0838:
083b e232 | 2 | Load 0x1,0x32
083c 0227 | ' | Execute Access,All_Reference
083d 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
083e 0007 | | Action Break_Optional
083f e232 | 2 | Load 0x1,0x32
0840 0227 | ' | Execute Access,All_Reference
0841 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0842 0007 | | Action Break_Optional
0843 e232 | 2 | Load 0x1,0x32
0844 0227 | ' | Execute Access,All_Reference
0845 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
0846 0007 | | Action Break_Optional
0847 e232 | 2 | Load 0x1,0x32
0848 0227 | ' | Execute Access,All_Reference
0849 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
084a 0007 | | Action Break_Optional
084b 029f 0d8b | | Declare_Subprogram INIT_0d88,For_Call
084d 029f 0dab | | Declare_Subprogram INIT_0da8,For_Call
084f BODY_0838:
084f 0092 0f5d | ]| Action Push_String_Extended,0xf5d ; "/PICSAVE save def newpath"
0851 e233 | 3 | Load 0x1,0x33
0852 e00c | | Load 0x0,0xc
0853 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0854 e232 | 2 | Load 0x1,0x32
0855 0227 | ' | Execute Access,All_Reference
0856 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
0857 682c |h, | Jump_Zero 0x884
0858 4820 |H | Short_Literal 0x20
0859 e237 | 7 | Load 0x1,0x37
085a 8240 | @ | Call 0x1,0x40
085b 01cb | | Execute Vector,Append
085c e238 | 8 | Load 0x1,0x38
085d 8240 | @ | Call 0x1,0x40
085e 01cc | | Execute Vector,Catenate
085f 0092 0f5e | ^| Action Push_String_Extended,0xf5e ; " moveto"
0861 01cc | | Execute Vector,Catenate
0862 e233 | 3 | Load 0x1,0x33
0863 e00c | | Load 0x0,0xc
0864 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0865 0092 0f5f | _| Action Push_String_Extended,0xf5f ; "0 "
0867 e403 | | Load 0x2,0x3
0868 0275 | u | Execute Discrete,Unary_Minus
0869 8240 | @ | Call 0x1,0x40
086a 01cc | | Execute Vector,Catenate
086b 0092 0f60 | `| Action Push_String_Extended,0xf60 ; " rlineto "
086d 01cc | | Execute Vector,Catenate
086e e402 | | Load 0x2,0x2
086f 8240 | @ | Call 0x1,0x40
0870 01cc | | Execute Vector,Catenate
0871 0092 0f61 | a| Action Push_String_Extended,0xf61 ; " 0 rlineto 0 "
0873 01cc | | Execute Vector,Catenate
0874 e403 | | Load 0x2,0x3
0875 8240 | @ | Call 0x1,0x40
0876 01cc | | Execute Vector,Catenate
0877 0092 0f60 | `| Action Push_String_Extended,0xf60 ; " rlineto "
0879 01cc | | Execute Vector,Catenate
087a e402 | | Load 0x2,0x2
087b 0275 | u | Execute Discrete,Unary_Minus
087c 8240 | @ | Call 0x1,0x40
087d 01cc | | Execute Vector,Catenate
087e 0092 0f62 | b| Action Push_String_Extended,0xf62 ; " 0 rlineto closepath clip"
0880 01cc | | Execute Vector,Catenate
0881 e233 | 3 | Load 0x1,0x33
0882 e00c | | Load 0x0,0xc
0883 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0884 4820 |H | Short_Literal 0x20
0885 e237 | 7 | Load 0x1,0x37
0886 e404 | | Load 0x2,0x4
0887 0273 | s | Execute Discrete,Plus
0888 e001 | | Load 0x0,0x1
0889 1b10 | | Execute Package,Field_Read,Field_Number 0x10
088a 00d9 | | Load_Top At_Offset_1
088b 00d0 | | Action Swap_Control
088c 0260 | ` | Execute Discrete,In_Type
088d 7001 |p | Jump_Nonzero 0x88f
088e 0801 | | Execute_Immediate Raise,0x1
088f 8240 | @ | Call 0x1,0x40
0890 01cb | | Execute Vector,Append
0891 e238 | 8 | Load 0x1,0x38
0892 e405 | | Load 0x2,0x5
0893 0272 | r | Execute Discrete,Minus
0894 e001 | | Load 0x0,0x1
0895 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0896 00d9 | | Load_Top At_Offset_1
0897 00d0 | | Action Swap_Control
0898 0260 | ` | Execute Discrete,In_Type
0899 7001 |p | Jump_Nonzero 0x89b
089a 0801 | | Execute_Immediate Raise,0x1
089b 8240 | @ | Call 0x1,0x40
089c 01cc | | Execute Vector,Catenate
089d 0092 0f5e | ^| Action Push_String_Extended,0xf5e ; " moveto"
089f 01cc | | Execute Vector,Catenate
08a0 e233 | 3 | Load 0x1,0x33
08a1 e00c | | Load 0x0,0xc
08a2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08a3 0092 0f63 | c| Action Push_String_Extended,0xf63 ; "INITIAL-MATRIX setmatrix"
08a5 e233 | 3 | Load 0x1,0x33
08a6 e00c | | Load 0x0,0xc
08a7 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08a8 0092 0f64 | d| Action Push_String_Extended,0xf64 ; "currentpoint translate"
08aa e233 | 3 | Load 0x1,0x33
08ab e00c | | Load 0x0,0xc
08ac 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08ad e232 | 2 | Load 0x1,0x32
08ae 0227 | ' | Execute Access,All_Reference
08af 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
08b0 683d |h= | Jump_Zero 0x8ee
08b1 4820 |H | Short_Literal 0x20
08b2 4820 |H | Short_Literal 0x20
08b3 4820 |H | Short_Literal 0x20
08b4 4820 |H | Short_Literal 0x20
08b5 e402 | | Load 0x2,0x2
08b6 09ff | | Execute_Immediate Binary_Scale,-0x1
08b7 8240 | @ | Call 0x1,0x40
08b8 01cb | | Execute Vector,Append
08b9 4be8 |K | Short_Literal 0x3e8
08ba 8240 | @ | Call 0x1,0x40
08bb 01cc | | Execute Vector,Catenate
08bc 0092 0f65 | e| Action Push_String_Extended,0xf65 ; " div "
08be 01cc | | Execute Vector,Catenate
08bf e403 | | Load 0x2,0x3
08c0 09ff | | Execute_Immediate Binary_Scale,-0x1
08c1 8240 | @ | Call 0x1,0x40
08c2 01cc | | Execute Vector,Catenate
08c3 01cb | | Execute Vector,Append
08c4 4be8 |K | Short_Literal 0x3e8
08c5 8240 | @ | Call 0x1,0x40
08c6 01cc | | Execute Vector,Catenate
08c7 0092 0f66 | f| Action Push_String_Extended,0xf66 ; " div translate "
08c9 01cc | | Execute Vector,Catenate
08ca e232 | 2 | Load 0x1,0x32
08cb 0227 | ' | Execute Access,All_Reference
08cc 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
08cd 00e0 | | Load_Encached Standard_Cache
08ce 1818 | | Execute Package,Field_Execute,Field_Number 0x18
08cf 01cc | | Execute Vector,Catenate
08d0 0092 0f67 | g| Action Push_String_Extended,0xf67 ; " rotate "
08d2 01cc | | Execute Vector,Catenate
08d3 e402 | | Load 0x2,0x2
08d4 09ff | | Execute_Immediate Binary_Scale,-0x1
08d5 0275 | u | Execute Discrete,Unary_Minus
08d6 8240 | @ | Call 0x1,0x40
08d7 01cc | | Execute Vector,Catenate
08d8 01cb | | Execute Vector,Append
08d9 4be8 |K | Short_Literal 0x3e8
08da 8240 | @ | Call 0x1,0x40
08db 01cc | | Execute Vector,Catenate
08dc 0092 0f65 | e| Action Push_String_Extended,0xf65 ; " div "
08de 01cc | | Execute Vector,Catenate
08df e403 | | Load 0x2,0x3
08e0 09ff | | Execute_Immediate Binary_Scale,-0x1
08e1 0275 | u | Execute Discrete,Unary_Minus
08e2 8240 | @ | Call 0x1,0x40
08e3 01cc | | Execute Vector,Catenate
08e4 01cb | | Execute Vector,Append
08e5 4be8 |K | Short_Literal 0x3e8
08e6 8240 | @ | Call 0x1,0x40
08e7 01cc | | Execute Vector,Catenate
08e8 0092 0f68 | h| Action Push_String_Extended,0xf68 ; " div translate"
08ea 01cc | | Execute Vector,Catenate
08eb e233 | 3 | Load 0x1,0x33
08ec e00c | | Load 0x0,0xc
08ed 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08ee e232 | 2 | Load 0x1,0x32
08ef 0227 | ' | Execute Access,All_Reference
08f0 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
08f1 0e64 | d | Execute_Immediate Not_Equal,0x64
08f2 7005 |p | Jump_Nonzero 0x8f8
08f3 e232 | 2 | Load 0x1,0x32
08f4 0227 | ' | Execute Access,All_Reference
08f5 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
08f6 0e64 | d | Execute_Immediate Not_Equal,0x64
08f7 6811 |h | Jump_Zero 0x909
08f8 4820 |H | Short_Literal 0x20
08f9 e232 | 2 | Load 0x1,0x32
08fa 0227 | ' | Execute Access,All_Reference
08fb 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
08fc 8406 | | Call 0x2,0x6
08fd 01cb | | Execute Vector,Append
08fe e232 | 2 | Load 0x1,0x32
08ff 0227 | ' | Execute Access,All_Reference
0900 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0901 8406 | | Call 0x2,0x6
0902 01cc | | Execute Vector,Catenate
0903 0092 0f69 | i| Action Push_String_Extended,0xf69 ; " scale"
0905 01cc | | Execute Vector,Catenate
0906 e233 | 3 | Load 0x1,0x33
0907 e00c | | Load 0x0,0xc
0908 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0909 0092 0f6a | j| Action Push_String_Extended,0xf6a ; "newpath 0 0 moveto /Helvetica findfont 10 scalefont setfont"
090b e233 | 3 | Load 0x1,0x33
090c e00c | | Load 0x0,0xc
090d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
090e 0092 0f6b | k| Action Push_String_Extended,0xf6b ; "/showpage { } def"
0910 e233 | 3 | Load 0x1,0x33
0911 e00c | | Load 0x0,0xc
0912 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0913 e232 | 2 | Load 0x1,0x32
0914 0227 | ' | Execute Access,All_Reference
0915 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0916 680f |h | Jump_Zero 0x926
0917 0092 0f6c | l| Action Push_String_Extended,0xf6c ; "%%BeginDocument: (literal)"
0919 e233 | 3 | Load 0x1,0x33
091a e00c | | Load 0x0,0xc
091b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
091c e232 | 2 | Load 0x1,0x32
091d 0227 | ' | Execute Access,All_Reference
091e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
091f e001 | | Load 0x0,0x1
0920 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0921 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0922 e233 | 3 | Load 0x1,0x33
0923 e00c | | Load 0x0,0xc
0924 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0925 7801 |x | Jump 0x927
0926 8407 | | Call 0x2,0x7
0927 0092 0f6d | m| Action Push_String_Extended,0xf6d ; "%%EndDocument"
0929 e233 | 3 | Load 0x1,0x33
092a e00c | | Load 0x0,0xc
092b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
092c 4820 |H | Short_Literal 0x20
092d 0092 0f6e | n| Action Push_String_Extended,0xf6e ; "PICSAVE restore "
092f e237 | 7 | Load 0x1,0x37
0930 8240 | @ | Call 0x1,0x40
0931 01cc | | Execute Vector,Catenate
0932 01cb | | Execute Vector,Append
0933 e238 | 8 | Load 0x1,0x38
0934 8240 | @ | Call 0x1,0x40
0935 01cc | | Execute Vector,Catenate
0936 0092 0f5e | ^| Action Push_String_Extended,0xf5e ; " moveto"
0938 01cc | | Execute Vector,Catenate
0939 e233 | 3 | Load 0x1,0x33
093a e00c | | Load 0x0,0xc
093b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
093c e217 | | Load 0x1,0x17
093d a235 | 5 | Store_Unchecked 0x1,0x35
093e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
093f 0000 | | .XXX[0x1]
0940 ; --------------------------------------------------------------------------------------
0940 ; SUBPROGRAM
0940 ; --------------------------------------------------------------------------------------
0940 0943 | C | .CONST 0x0943 ; Address of begin
0941 0004 | | .CONST 0x0004 ; Address of exception handler
0942 0001 | | .CONST 0x0001 ; Number of locals
0943 BODY_0940:
0943 INIT_0940:
0943 4820 |H | Short_Literal 0x20
0944 0092 0f6f | o| Action Push_String_Extended,0xf6f ; "newpath "
0946 e237 | 7 | Load 0x1,0x37
0947 8240 | @ | Call 0x1,0x40
0948 01cc | | Execute Vector,Catenate
0949 01cb | | Execute Vector,Append
094a e238 | 8 | Load 0x1,0x38
094b 8240 | @ | Call 0x1,0x40
094c 01cc | | Execute Vector,Catenate
094d 0092 0f5e | ^| Action Push_String_Extended,0xf5e ; " moveto"
094f 01cc | | Execute Vector,Catenate
0950 e233 | 3 | Load 0x1,0x33
0951 e00c | | Load 0x0,0xc
0952 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0953 4820 |H | Short_Literal 0x20
0954 e5ff | | Load 0x2,-0x1
0955 8240 | @ | Call 0x1,0x40
0956 01cb | | Execute Vector,Append
0957 e5fe | | Load 0x2,-0x2
0958 8240 | @ | Call 0x1,0x40
0959 01cc | | Execute Vector,Catenate
095a 0092 0f70 | p| Action Push_String_Extended,0xf70 ; " rlineto stroke"
095c 01cc | | Execute Vector,Catenate
095d e233 | 3 | Load 0x1,0x33
095e e00c | | Load 0x0,0xc
095f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0960 e237 | 7 | Load 0x1,0x37
0961 e5ff | | Load 0x2,-0x1
0962 0273 | s | Execute Discrete,Plus
0963 c237 | 7 | Store 0x1,0x37
0964 e238 | 8 | Load 0x1,0x38
0965 e5fe | | Load 0x2,-0x2
0966 0273 | s | Execute Discrete,Plus
0967 c238 | 8 | Store 0x1,0x38
0968 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0969 0000 0000 | | .BLANK 0000[0x7]
0970 ; --------------------------------------------------------------------------------------
0970 ; SUBPROGRAM
0970 ; --------------------------------------------------------------------------------------
0970 0973 | s | .CONST 0x0973 ; Address of begin
0971 0004 | | .CONST 0x0004 ; Address of exception handler
0972 0001 | | .CONST 0x0001 ; Number of locals
0973 BODY_0970:
0973 INIT_0970:
0973 4820 |H | Short_Literal 0x20
0974 0092 0f6f | o| Action Push_String_Extended,0xf6f ; "newpath "
0976 e237 | 7 | Load 0x1,0x37
0977 8240 | @ | Call 0x1,0x40
0978 01cc | | Execute Vector,Catenate
0979 01cb | | Execute Vector,Append
097a e238 | 8 | Load 0x1,0x38
097b 8240 | @ | Call 0x1,0x40
097c 01cc | | Execute Vector,Catenate
097d 0092 0f5e | ^| Action Push_String_Extended,0xf5e ; " moveto"
097f 01cc | | Execute Vector,Catenate
0980 e233 | 3 | Load 0x1,0x33
0981 e00c | | Load 0x0,0xc
0982 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0983 e5ff | | Load 0x2,-0x1
0984 8240 | @ | Call 0x1,0x40
0985 0092 0f71 | q| Action Push_String_Extended,0xf71 ; " 0 rlineto"
0987 01cc | | Execute Vector,Catenate
0988 e233 | 3 | Load 0x1,0x33
0989 e00c | | Load 0x0,0xc
098a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
098b 0092 0f5f | _| Action Push_String_Extended,0xf5f ; "0 "
098d e5fe | | Load 0x2,-0x2
098e 8240 | @ | Call 0x1,0x40
098f 01cc | | Execute Vector,Catenate
0990 0092 0f72 | r| Action Push_String_Extended,0xf72 ; " rlineto"
0992 01cc | | Execute Vector,Catenate
0993 e233 | 3 | Load 0x1,0x33
0994 e00c | | Load 0x0,0xc
0995 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0996 e5ff | | Load 0x2,-0x1
0997 0275 | u | Execute Discrete,Unary_Minus
0998 8240 | @ | Call 0x1,0x40
0999 0092 0f73 | s| Action Push_String_Extended,0xf73 ; " 0 rlineto closepath stroke"
099b 01cc | | Execute Vector,Catenate
099c e233 | 3 | Load 0x1,0x33
099d e00c | | Load 0x0,0xc
099e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
099f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
09a0 ; --------------------------------------------------------------------------------------
09a0 ; SUBPROGRAM
09a0 ; --------------------------------------------------------------------------------------
09a0 09b7 | | .CONST 0x09b7 ; Address of begin
09a1 0004 | | .CONST 0x0004 ; Address of exception handler
09a2 000a | | .CONST 0x000a ; Number of locals
09a3 INIT_09a0:
09a3 e001 | | Load 0x0,0x1
09a4 1b16 | | Execute Package,Field_Read,Field_Number 0x16
09a5 0322 | " | Declare_Variable Record
09a6 e001 | | Load 0x0,0x1
09a7 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
09a8 e001 | | Load 0x0,0x1
09a9 1b10 | | Execute Package,Field_Read,Field_Number 0x10
09aa e217 | | Load 0x1,0x17
09ab 0007 | | Action Break_Optional
09ac e001 | | Load 0x0,0x1
09ad 1b10 | | Execute Package,Field_Read,Field_Number 0x10
09ae 00e1 | | Load_Encached Boolean_Cache
09af 4fff |O | Short_Literal -0x1
09b0 e001 | | Load 0x0,0x1
09b1 1b10 | | Execute Package,Field_Read,Field_Number 0x10
09b2 03f1 | | Declare_Variable Discrete,With_Value
09b3 029f 0e0b | | Declare_Subprogram INIT_0e08,For_Call
09b5 029f 0e63 | c| Declare_Subprogram INIT_0e60,For_Call
09b7 BODY_09a0:
09b7 e5ff | | Load 0x2,-0x1
09b8 0227 | ' | Execute Access,All_Reference
09b9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
09ba 0f02 | | Execute_Immediate Equal,0x2
09bb 6801 |h | Jump_Zero 0x9bd
09bc 4502 |E | Exit_Suprogram New_Top_Offset 0x2
09bd 4800 |H | Short_Literal 0x0
09be a23d | = | Store_Unchecked 0x1,0x3d
09bf 4800 |H | Short_Literal 0x0
09c0 a407 | | Store_Unchecked 0x2,0x7
09c1 4800 |H | Short_Literal 0x0
09c2 a23e | > | Store_Unchecked 0x1,0x3e
09c3 e20d | | Load 0x1,0xd
09c4 3c1b |< | Execute Record,Field_Read,Field_Number 0x1b
09c5 a237 | 7 | Store_Unchecked 0x1,0x37
09c6 e5ff | | Load 0x2,-0x1
09c7 0227 | ' | Execute Access,All_Reference
09c8 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
09c9 a238 | 8 | Store_Unchecked 0x1,0x38
09ca e5ff | | Load 0x2,-0x1
09cb 0227 | ' | Execute Access,All_Reference
09cc 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
09cd 687f |h | Jump_Zero 0xa4d
09ce 00cf | | Action Mark_Auxiliary
09cf e5ff | | Load 0x2,-0x1
09d0 0227 | ' | Execute Access,All_Reference
09d1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
09d2 4801 |H | Short_Literal 0x1
09d3 0263 | c | Execute Discrete,Above_Bound
09d4 7077 |pw | Jump_Nonzero 0xa4c
09d5 00d8 | | Load_Top At_Offset_0
09d6 e5ff | | Load 0x2,-0x1
09d7 0227 | ' | Execute Access,All_Reference
09d8 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
09d9 01d5 | | Execute Vector,Field_Reference
09da 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
09db 00d8 | | Load_Top At_Offset_0
09dc 494e |IN | Short_Literal 0x14e
09dd 027c | | | Execute Discrete,Less
09de 7025 |p% | Jump_Nonzero 0xa04
09df 4eb2 |N | Short_Literal -0x14e
09e0 0273 | s | Execute Discrete,Plus
09e1 4606 |F | Jump_Case 0x7
09e2 785d |x] | Jump 0xa40 ; case 0x0
09e3 7822 |x" | Jump 0xa06 ; case 0x1
09e4 7829 |x) | Jump 0xa0e ; case 0x2
09e5 7832 |x2 | Jump 0xa18 ; case 0x3
09e6 783b |x; | Jump 0xa22 ; case 0x4
09e7 7849 |xI | Jump 0xa31 ; case 0x5
09e8 7800 |x | Jump 0x9e9 ; case 0x6
09e9 e232 | 2 | Load 0x1,0x32
09ea 685f |h_ | Jump_Zero 0xa4a
09eb e237 | 7 | Load 0x1,0x37
09ec 4801 |H | Short_Literal 0x1
09ed e5ff | | Load 0x2,-0x1
09ee 0227 | ' | Execute Access,All_Reference
09ef 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
09f0 01d5 | | Execute Vector,Field_Reference
09f1 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
09f2 0273 | s | Execute Discrete,Plus
09f3 c237 | 7 | Store 0x1,0x37
09f4 8260 | ` | Call 0x1,0x60
09f5 e232 | 2 | Load 0x1,0x32
09f6 0229 | ) | Execute Access,All_Read
09f7 00d8 | | Load_Top At_Offset_0
09f8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
09f9 e001 | | Load 0x0,0x1
09fa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09fb 1812 | | Execute Package,Field_Execute,Field_Number 0x12
09fc e40e | | Load 0x2,0xe
09fd 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
09fe 00d1 | | Pop_Control Pop_Count_1
09ff e232 | 2 | Load 0x1,0x32
0a00 0227 | ' | Execute Access,All_Reference
0a01 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
0a02 a232 | 2 | Store_Unchecked 0x1,0x32
0a03 7846 |xF | Jump 0xa4a
0a04 00d1 | | Pop_Control Pop_Count_1
0a05 7844 |xD | Jump 0xa4a
0a06 00d8 | | Load_Top At_Offset_0
0a07 e5ff | | Load 0x2,-0x1
0a08 0227 | ' | Execute Access,All_Reference
0a09 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0a0a 01d5 | | Execute Vector,Field_Reference
0a0b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a0c a238 | 8 | Store_Unchecked 0x1,0x38
0a0d 783c |x< | Jump 0xa4a
0a0e e237 | 7 | Load 0x1,0x37
0a0f e40d | | Load 0x2,0xd
0a10 e5ff | | Load 0x2,-0x1
0a11 0227 | ' | Execute Access,All_Reference
0a12 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0a13 01d5 | | Execute Vector,Field_Reference
0a14 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a15 0273 | s | Execute Discrete,Plus
0a16 c237 | 7 | Store 0x1,0x37
0a17 7832 |x2 | Jump 0xa4a
0a18 e238 | 8 | Load 0x1,0x38
0a19 e40d | | Load 0x2,0xd
0a1a e5ff | | Load 0x2,-0x1
0a1b 0227 | ' | Execute Access,All_Reference
0a1c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0a1d 01d5 | | Execute Vector,Field_Reference
0a1e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a1f 0273 | s | Execute Discrete,Plus
0a20 c238 | 8 | Store 0x1,0x38
0a21 7828 |x( | Jump 0xa4a
0a22 00d8 | | Load_Top At_Offset_0
0a23 0a01 | | Execute_Immediate Plus,0x1
0a24 e5ff | | Load 0x2,-0x1
0a25 0227 | ' | Execute Access,All_Reference
0a26 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0a27 01d5 | | Execute Vector,Field_Reference
0a28 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a29 e40d | | Load 0x2,0xd
0a2a e5ff | | Load 0x2,-0x1
0a2b 0227 | ' | Execute Access,All_Reference
0a2c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0a2d 01d5 | | Execute Vector,Field_Reference
0a2e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a2f 8261 | a | Call 0x1,0x61
0a30 7819 |x | Jump 0xa4a
0a31 00d8 | | Load_Top At_Offset_0
0a32 0a01 | | Execute_Immediate Plus,0x1
0a33 e5ff | | Load 0x2,-0x1
0a34 0227 | ' | Execute Access,All_Reference
0a35 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0a36 01d5 | | Execute Vector,Field_Reference
0a37 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a38 e40d | | Load 0x2,0xd
0a39 e5ff | | Load 0x2,-0x1
0a3a 0227 | ' | Execute Access,All_Reference
0a3b 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0a3c 01d5 | | Execute Vector,Field_Reference
0a3d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a3e 8262 | b | Call 0x1,0x62
0a3f 780a |x | Jump 0xa4a
0a40 00d8 | | Load_Top At_Offset_0
0a41 e5ff | | Load 0x2,-0x1
0a42 0227 | ' | Execute Access,All_Reference
0a43 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0a44 01d5 | | Execute Vector,Field_Reference
0a45 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a46 e20d | | Load 0x1,0xd
0a47 3c1b |< | Execute Record,Field_Read,Field_Number 0x1b
0a48 0273 | s | Execute Discrete,Plus
0a49 c237 | 7 | Store 0x1,0x37
0a4a 00c8 | | Action Pop_Auxiliary_Range
0a4b 3f89 |? | Loop_Increasing 0x9d5
0a4c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0a4d e237 | 7 | Load 0x1,0x37
0a4e 4801 |H | Short_Literal 0x1
0a4f e5ff | | Load 0x2,-0x1
0a50 0227 | ' | Execute Access,All_Reference
0a51 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0a52 01d5 | | Execute Vector,Field_Reference
0a53 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a54 0273 | s | Execute Discrete,Plus
0a55 c237 | 7 | Store 0x1,0x37
0a56 4820 |H | Short_Literal 0x20
0a57 e237 | 7 | Load 0x1,0x37
0a58 8240 | @ | Call 0x1,0x40
0a59 01cb | | Execute Vector,Append
0a5a e5ff | | Load 0x2,-0x1
0a5b 0227 | ' | Execute Access,All_Reference
0a5c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a5d 8240 | @ | Call 0x1,0x40
0a5e 01cc | | Execute Vector,Catenate
0a5f 0092 0f5e | ^| Action Push_String_Extended,0xf5e ; " moveto"
0a61 01cc | | Execute Vector,Catenate
0a62 e233 | 3 | Load 0x1,0x33
0a63 e00c | | Load 0x0,0xc
0a64 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0a65 00cf | | Action Mark_Auxiliary
0a66 e5ff | | Load 0x2,-0x1
0a67 0227 | ' | Execute Access,All_Reference
0a68 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0a69 0aff | | Execute_Immediate Plus,-0x1
0a6a 4802 |H | Short_Literal 0x2
0a6b 0263 | c | Execute Discrete,Above_Bound
0a6c 71df |q | Jump_Nonzero 0xc4c
0a6d 00d8 | | Load_Top At_Offset_0
0a6e e5ff | | Load 0x2,-0x1
0a6f 0227 | ' | Execute Access,All_Reference
0a70 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0a71 01d5 | | Execute Vector,Field_Reference
0a72 e402 | | Load 0x2,0x2
0a73 017d | } | Execute Record,Structure_Write
0a74 e402 | | Load 0x2,0x2
0a75 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0a76 a403 | | Store_Unchecked 0x2,0x3
0a77 e402 | | Load 0x2,0x2
0a78 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a79 a406 | | Store_Unchecked 0x2,0x6
0a7a e402 | | Load 0x2,0x2
0a7b 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0a7c e402 | | Load 0x2,0x2
0a7d 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0a7e e402 | | Load 0x2,0x2
0a7f 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0a80 e402 | | Load 0x2,0x2
0a81 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0a82 8253 | S | Call 0x1,0x53
0a83 a405 | | Store_Unchecked 0x2,0x5
0a84 e403 | | Load 0x2,0x3
0a85 4945 |IE | Short_Literal 0x145
0a86 4949 |II | Short_Literal 0x149
0a87 0262 | b | Execute Discrete,In_Range
0a88 7026 |p& | Jump_Nonzero 0xaaf
0a89 e405 | | Load 0x2,0x5
0a8a e235 | 5 | Load 0x1,0x35
0a8b 022e | . | Execute Access,Not_Equal
0a8c e236 | 6 | Load 0x1,0x36
0a8d e402 | | Load 0x2,0x2
0a8e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0a8f 027e | ~ | Execute Discrete,Not_Equal
0a90 0278 | x | Execute Discrete,Or
0a91 681d |h | Jump_Zero 0xaaf
0a92 e23d | = | Load 0x1,0x3d
0a93 0c01 | | Execute_Immediate Greater_Equal,0x1
0a94 6801 |h | Jump_Zero 0xa96
0a95 8242 | B | Call 0x1,0x42
0a96 4820 |H | Short_Literal 0x20
0a97 4800 |H | Short_Literal 0x0
0a98 480a |H | Short_Literal 0xa
0a99 e402 | | Load 0x2,0x2
0a9a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0a9b e00f | | Load 0x0,0xf
0a9c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0a9d 0092 0f2c | ,| Action Push_String_Extended,0xf2c ; " /"
0a9f 01cc | | Execute Vector,Catenate
0aa0 e405 | | Load 0x2,0x5
0aa1 0227 | ' | Execute Access,All_Reference
0aa2 2507 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x7
0aa3 01cc | | Execute Vector,Catenate
0aa4 0092 0f74 | t| Action Push_String_Extended,0xf74 ; " SelectFont"
0aa6 01cc | | Execute Vector,Catenate
0aa7 e233 | 3 | Load 0x1,0x33
0aa8 e00c | | Load 0x0,0xc
0aa9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0aaa e405 | | Load 0x2,0x5
0aab a235 | 5 | Store_Unchecked 0x1,0x35
0aac e402 | | Load 0x2,0x2
0aad 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0aae a236 | 6 | Store_Unchecked 0x1,0x36
0aaf e402 | | Load 0x2,0x2
0ab0 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0ab1 6806 |h | Jump_Zero 0xab8
0ab2 e408 | | Load 0x2,0x8
0ab3 0d00 | | Execute_Immediate Less,0x0
0ab4 6854 |hT | Jump_Zero 0xb09
0ab5 e237 | 7 | Load 0x1,0x37
0ab6 a408 | | Store_Unchecked 0x2,0x8
0ab7 7851 |xQ | Jump 0xb09
0ab8 e408 | | Load 0x2,0x8
0ab9 0c00 | | Execute_Immediate Greater_Equal,0x0
0aba 684e |hN | Jump_Zero 0xb09
0abb e23d | = | Load 0x1,0x3d
0abc 0c01 | | Execute_Immediate Greater_Equal,0x1
0abd 6801 |h | Jump_Zero 0xabf
0abe 8242 | B | Call 0x1,0x42
0abf 4820 |H | Short_Literal 0x20
0ac0 0092 0f75 | u| Action Push_String_Extended,0xf75 ; "gsave "
0ac2 e408 | | Load 0x2,0x8
0ac3 e237 | 7 | Load 0x1,0x37
0ac4 0272 | r | Execute Discrete,Minus
0ac5 e001 | | Load 0x0,0x1
0ac6 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0ac7 00d9 | | Load_Top At_Offset_1
0ac8 00d0 | | Action Swap_Control
0ac9 0260 | ` | Execute Discrete,In_Type
0aca 7001 |p | Jump_Nonzero 0xacc
0acb 0801 | | Execute_Immediate Raise,0x1
0acc 8240 | @ | Call 0x1,0x40
0acd 01cc | | Execute Vector,Catenate
0ace 01cb | | Execute Vector,Append
0acf e405 | | Load 0x2,0x5
0ad0 0227 | ' | Execute Access,All_Reference
0ad1 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0ad2 e236 | 6 | Load 0x1,0x36
0ad3 0271 | q | Execute Discrete,Times
0ad4 e001 | | Load 0x0,0x1
0ad5 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0ad6 00d9 | | Load_Top At_Offset_1
0ad7 00d0 | | Action Swap_Control
0ad8 0260 | ` | Execute Discrete,In_Type
0ad9 7001 |p | Jump_Nonzero 0xadb
0ada 0801 | | Execute_Immediate Raise,0x1
0adb 8240 | @ | Call 0x1,0x40
0adc 01cc | | Execute Vector,Catenate
0add 0092 0f76 | v| Action Push_String_Extended,0xf76 ; " rmoveto"
0adf 01cc | | Execute Vector,Catenate
0ae0 e233 | 3 | Load 0x1,0x33
0ae1 e00c | | Load 0x0,0xc
0ae2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ae3 e405 | | Load 0x2,0x5
0ae4 0227 | ' | Execute Access,All_Reference
0ae5 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
0ae6 e236 | 6 | Load 0x1,0x36
0ae7 0271 | q | Execute Discrete,Times
0ae8 e001 | | Load 0x0,0x1
0ae9 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0aea 00d9 | | Load_Top At_Offset_1
0aeb 00d0 | | Action Swap_Control
0aec 0260 | ` | Execute Discrete,In_Type
0aed 7001 |p | Jump_Nonzero 0xaef
0aee 0801 | | Execute_Immediate Raise,0x1
0aef 8240 | @ | Call 0x1,0x40
0af0 0092 0f77 | w| Action Push_String_Extended,0xf77 ; " setlinewidth"
0af2 01cc | | Execute Vector,Catenate
0af3 e233 | 3 | Load 0x1,0x33
0af4 e00c | | Load 0x0,0xc
0af5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0af6 e237 | 7 | Load 0x1,0x37
0af7 e408 | | Load 0x2,0x8
0af8 0272 | r | Execute Discrete,Minus
0af9 e001 | | Load 0x0,0x1
0afa 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0afb 00d9 | | Load_Top At_Offset_1
0afc 00d0 | | Action Swap_Control
0afd 0260 | ` | Execute Discrete,In_Type
0afe 7001 |p | Jump_Nonzero 0xb00
0aff 0801 | | Execute_Immediate Raise,0x1
0b00 8240 | @ | Call 0x1,0x40
0b01 0092 0f78 | x| Action Push_String_Extended,0xf78 ; " 0 rlineto stroke grestore"
0b03 01cc | | Execute Vector,Catenate
0b04 e233 | 3 | Load 0x1,0x33
0b05 e00c | | Load 0x0,0xc
0b06 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b07 4fff |O | Short_Literal -0x1
0b08 a408 | | Store_Unchecked 0x2,0x8
0b09 e403 | | Load 0x2,0x3
0b0a 00d8 | | Load_Top At_Offset_0
0b0b 4938 |I8 | Short_Literal 0x138
0b0c 027c | | | Execute Discrete,Less
0b0d 7090 |p | Jump_Nonzero 0xb9e
0b0e 4ec8 |N | Short_Literal -0x138
0b0f 0273 | s | Execute Discrete,Plus
0b10 461c |F | Jump_Case 0x1d
0b11 7929 |y) | Jump 0xc3b ; case 0x0
0b12 7928 |y( | Jump 0xc3b ; case 0x1
0b13 7927 |y' | Jump 0xc3b ; case 0x2
0b14 7926 |y& | Jump 0xc3b ; case 0x3
0b15 7925 |y% | Jump 0xc3b ; case 0x4
0b16 7817 |x | Jump 0xb2e ; case 0x5
0b17 7816 |x | Jump 0xb2e ; case 0x6
0b18 7815 |x | Jump 0xb2e ; case 0x7
0b19 7814 |x | Jump 0xb2e ; case 0x8
0b1a 7813 |x | Jump 0xb2e ; case 0x9
0b1b 78a4 |x | Jump 0xbc0 ; case 0xa
0b1c 78b0 |x | Jump 0xbcd ; case 0xb
0b1d 7810 |x | Jump 0xb2e ; case 0xc
0b1e 7889 |x | Jump 0xba8 ; case 0xd
0b1f 7888 |x | Jump 0xba8 ; case 0xe
0b20 7887 |x | Jump 0xba8 ; case 0xf
0b21 7886 |x | Jump 0xba8 ; case 0x10
0b22 7885 |x | Jump 0xba8 ; case 0x11
0b23 7884 |x | Jump 0xba8 ; case 0x12
0b24 7809 |x | Jump 0xb2e ; case 0x13
0b25 7808 |x | Jump 0xb2e ; case 0x14
0b26 78ef |x | Jump 0xc16 ; case 0x15
0b27 7806 |x | Jump 0xb2e ; case 0x16
0b28 7805 |x | Jump 0xb2e ; case 0x17
0b29 7804 |x | Jump 0xb2e ; case 0x18
0b2a 7803 |x | Jump 0xb2e ; case 0x19
0b2b 7802 |x | Jump 0xb2e ; case 0x1a
0b2c 7801 |x | Jump 0xb2e ; case 0x1b
0b2d 7800 |x | Jump 0xb2e ; case 0x1c
0b2e e407 | | Load 0x2,0x7
0b2f 680a |h | Jump_Zero 0xb3a
0b30 4800 |H | Short_Literal 0x0
0b31 a407 | | Store_Unchecked 0x2,0x7
0b32 e404 | | Load 0x2,0x4
0b33 8240 | @ | Call 0x1,0x40
0b34 0092 0f79 | y| Action Push_String_Extended,0xf79 ; " MX"
0b36 01cc | | Execute Vector,Catenate
0b37 e233 | 3 | Load 0x1,0x33
0b38 e00c | | Load 0x0,0xc
0b39 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b3a e23d | = | Load 0x1,0x3d
0b3b 7005 |p | Jump_Nonzero 0xb41
0b3c 0092 0f7a | z| Action Push_String_Extended,0xf7a ; "("
0b3e e233 | 3 | Load 0x1,0x33
0b3f e00c | | Load 0x0,0xc
0b40 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0b41 e23d | = | Load 0x1,0x3d
0b42 0a01 | | Execute_Immediate Plus,0x1
0b43 c23d | = | Store 0x1,0x3d
0b44 e403 | | Load 0x2,0x3
0b45 00d8 | | Load_Top At_Offset_0
0b46 0d2a | * | Execute_Immediate Less,0x2a
0b47 7018 |p | Jump_Nonzero 0xb60
0b48 00d8 | | Load_Top At_Offset_0
0b49 0c5c | \ | Execute_Immediate Greater_Equal,0x5c
0b4a 700b |p | Jump_Nonzero 0xb56
0b4b 00d1 | | Pop_Control Pop_Count_1
0b4c e403 | | Load 0x2,0x3
0b4d 00d8 | | Load_Top At_Offset_0
0b4e 00e8 | | Load_Encached Character_Cache
0b4f 0260 | ` | Execute Discrete,In_Type
0b50 7001 |p | Jump_Nonzero 0xb52
0b51 0801 | | Execute_Immediate Raise,0x1
0b52 e233 | 3 | Load 0x1,0x33
0b53 e00c | | Load 0x0,0xc
0b54 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0b55 78ef |x | Jump 0xc45
0b56 00d8 | | Load_Top At_Offset_0
0b57 485d |H] | Short_Literal 0x5d
0b58 487f |H | Short_Literal 0x7f
0b59 0262 | b | Execute Discrete,In_Range
0b5a 77f0 |w | Jump_Nonzero 0xb4b
0b5b 4900 |I | Short_Literal 0x100
0b5c 4954 |IT | Short_Literal 0x154
0b5d 0262 | b | Execute Discrete,In_Range
0b5e 702f |p/ | Jump_Nonzero 0xb8e
0b5f 7828 |x( | Jump 0xb88
0b60 0b20 | | Execute_Immediate Case_Compare,0x20
0b61 700a |p | Jump_Nonzero 0xb6c
0b62 00d8 | | Load_Top At_Offset_0
0b63 4821 |H! | Short_Literal 0x21
0b64 4827 |H' | Short_Literal 0x27
0b65 0262 | b | Execute Discrete,In_Range
0b66 77e4 |w | Jump_Nonzero 0xb4b
0b67 4828 |H( | Short_Literal 0x28
0b68 4829 |H) | Short_Literal 0x29
0b69 0262 | b | Execute Discrete,In_Range
0b6a 701d |p | Jump_Nonzero 0xb88
0b6b 7822 |x" | Jump 0xb8e
0b6c 00d1 | | Pop_Control Pop_Count_1
0b6d e23e | > | Load 0x1,0x3e
0b6e e406 | | Load 0x2,0x6
0b6f 027f | | Execute Discrete,Equal
0b70 6805 |h | Jump_Zero 0xb76
0b71 4820 |H | Short_Literal 0x20
0b72 e233 | 3 | Load 0x1,0x33
0b73 e00c | | Load 0x0,0xc
0b74 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0b75 78cf |x | Jump 0xc45
0b76 e23e | > | Load 0x1,0x3e
0b77 7007 |p | Jump_Nonzero 0xb7f
0b78 e406 | | Load 0x2,0x6
0b79 a23e | > | Store_Unchecked 0x1,0x3e
0b7a 4820 |H | Short_Literal 0x20
0b7b e233 | 3 | Load 0x1,0x33
0b7c e00c | | Load 0x0,0xc
0b7d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0b7e 78c6 |x | Jump 0xc45
0b7f e23d | = | Load 0x1,0x3d
0b80 0c01 | | Execute_Immediate Greater_Equal,0x1
0b81 6801 |h | Jump_Zero 0xb83
0b82 8242 | B | Call 0x1,0x42
0b83 4801 |H | Short_Literal 0x1
0b84 a407 | | Store_Unchecked 0x2,0x7
0b85 e406 | | Load 0x2,0x6
0b86 a404 | | Store_Unchecked 0x2,0x4
0b87 78bd |x | Jump 0xc45
0b88 e403 | | Load 0x2,0x3
0b89 8241 | A | Call 0x1,0x41
0b8a e233 | 3 | Load 0x1,0x33
0b8b e00c | | Load 0x0,0xc
0b8c 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0b8d 78b7 |x | Jump 0xc45
0b8e 482c |H, | Short_Literal 0x2c
0b8f 0092 0f7b | {| Action Push_String_Extended,0xf7b ; "Non-printing character,"
0b91 e403 | | Load 0x2,0x3
0b92 00d8 | | Load_Top At_Offset_0
0b93 00e2 | | Load_Encached Integer_Cache
0b94 0260 | ` | Execute Discrete,In_Type
0b95 7001 |p | Jump_Nonzero 0xb97
0b96 0801 | | Execute_Immediate Raise,0x1
0b97 00e0 | | Load_Encached Standard_Cache
0b98 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0b99 01cc | | Execute Vector,Catenate
0b9a 01cb | | Execute Vector,Append
0b9b e010 | | Load 0x0,0x10
0b9c 180f | | Execute Package,Field_Execute,Field_Number 0xf
0b9d 78a7 |x | Jump 0xc45
0b9e 00d8 | | Load_Top At_Offset_0
0b9f 4900 |I | Short_Literal 0x100
0ba0 491b |I | Short_Literal 0x11b
0ba1 0262 | b | Execute Discrete,In_Range
0ba2 7083 |p | Jump_Nonzero 0xc26
0ba3 491c |I | Short_Literal 0x11c
0ba4 4937 |I7 | Short_Literal 0x137
0ba5 0262 | b | Execute Discrete,In_Range
0ba6 708a |p | Jump_Nonzero 0xc31
0ba7 7f86 | | Jump 0xb2e
0ba8 e23d | = | Load 0x1,0x3d
0ba9 0c01 | | Execute_Immediate Greater_Equal,0x1
0baa 6801 |h | Jump_Zero 0xbac
0bab 8242 | B | Call 0x1,0x42
0bac e402 | | Load 0x2,0x2
0bad 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0bae 0d00 | | Execute_Immediate Less,0x0
0baf 680c |h | Jump_Zero 0xbbc
0bb0 e407 | | Load 0x2,0x7
0bb1 6805 |h | Jump_Zero 0xbb7
0bb2 e404 | | Load 0x2,0x4
0bb3 e406 | | Load 0x2,0x6
0bb4 0273 | s | Execute Discrete,Plus
0bb5 c404 | | Store 0x2,0x4
0bb6 788e |x | Jump 0xc45
0bb7 4801 |H | Short_Literal 0x1
0bb8 a407 | | Store_Unchecked 0x2,0x7
0bb9 e406 | | Load 0x2,0x6
0bba a404 | | Store_Unchecked 0x2,0x4
0bbb 7889 |x | Jump 0xc45
0bbc e402 | | Load 0x2,0x2
0bbd 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0bbe 840a | | Call 0x2,0xa
0bbf 7885 |x | Jump 0xc45
0bc0 e406 | | Load 0x2,0x6
0bc1 0d00 | | Execute_Immediate Less,0x0
0bc2 6805 |h | Jump_Zero 0xbc8
0bc3 e238 | 8 | Load 0x1,0x38
0bc4 e406 | | Load 0x2,0x6
0bc5 0273 | s | Execute Discrete,Plus
0bc6 c239 | 9 | Store 0x1,0x39
0bc7 787d |x} | Jump 0xc45
0bc8 e238 | 8 | Load 0x1,0x38
0bc9 e406 | | Load 0x2,0x6
0bca 0272 | r | Execute Discrete,Minus
0bcb c23a | : | Store 0x1,0x3a
0bcc 7878 |xx | Jump 0xc45
0bcd e23d | = | Load 0x1,0x3d
0bce 0c01 | | Execute_Immediate Greater_Equal,0x1
0bcf 6801 |h | Jump_Zero 0xbd1
0bd0 8242 | B | Call 0x1,0x42
0bd1 e239 | 9 | Load 0x1,0x39
0bd2 0c00 | | Execute_Immediate Greater_Equal,0x0
0bd3 681f |h | Jump_Zero 0xbf3
0bd4 4820 |H | Short_Literal 0x20
0bd5 0092 0f75 | u| Action Push_String_Extended,0xf75 ; "gsave "
0bd7 e23b | ; | Load 0x1,0x3b
0bd8 8240 | @ | Call 0x1,0x40
0bd9 01cc | | Execute Vector,Catenate
0bda 01cb | | Execute Vector,Append
0bdb e239 | 9 | Load 0x1,0x39
0bdc 8240 | @ | Call 0x1,0x40
0bdd 01cc | | Execute Vector,Catenate
0bde 0092 0f5e | ^| Action Push_String_Extended,0xf5e ; " moveto"
0be0 01cc | | Execute Vector,Catenate
0be1 e233 | 3 | Load 0x1,0x33
0be2 e00c | | Load 0x0,0xc
0be3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0be4 4820 |H | Short_Literal 0x20
0be5 e23b | ; | Load 0x1,0x3b
0be6 8240 | @ | Call 0x1,0x40
0be7 01cb | | Execute Vector,Append
0be8 e238 | 8 | Load 0x1,0x38
0be9 8240 | @ | Call 0x1,0x40
0bea 01cc | | Execute Vector,Catenate
0beb 0092 0f7c | || Action Push_String_Extended,0xf7c ; " lineto stroke grestore"
0bed 01cc | | Execute Vector,Catenate
0bee e233 | 3 | Load 0x1,0x33
0bef e00c | | Load 0x0,0xc
0bf0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0bf1 4fff |O | Short_Literal -0x1
0bf2 a239 | 9 | Store_Unchecked 0x1,0x39
0bf3 e23a | : | Load 0x1,0x3a
0bf4 0c00 | | Execute_Immediate Greater_Equal,0x0
0bf5 684f |hO | Jump_Zero 0xc45
0bf6 4820 |H | Short_Literal 0x20
0bf7 0092 0f75 | u| Action Push_String_Extended,0xf75 ; "gsave "
0bf9 e23c | < | Load 0x1,0x3c
0bfa 8240 | @ | Call 0x1,0x40
0bfb 01cc | | Execute Vector,Catenate
0bfc 01cb | | Execute Vector,Append
0bfd e23a | : | Load 0x1,0x3a
0bfe 8240 | @ | Call 0x1,0x40
0bff 01cc | | Execute Vector,Catenate
0c00 0092 0f5e | ^| Action Push_String_Extended,0xf5e ; " moveto"
0c02 01cc | | Execute Vector,Catenate
0c03 e233 | 3 | Load 0x1,0x33
0c04 e00c | | Load 0x0,0xc
0c05 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c06 4820 |H | Short_Literal 0x20
0c07 e23c | < | Load 0x1,0x3c
0c08 8240 | @ | Call 0x1,0x40
0c09 01cb | | Execute Vector,Append
0c0a e238 | 8 | Load 0x1,0x38
0c0b 8240 | @ | Call 0x1,0x40
0c0c 01cc | | Execute Vector,Catenate
0c0d 0092 0f7c | || Action Push_String_Extended,0xf7c ; " lineto stroke grestore"
0c0f 01cc | | Execute Vector,Catenate
0c10 e233 | 3 | Load 0x1,0x33
0c11 e00c | | Load 0x0,0xc
0c12 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c13 4fff |O | Short_Literal -0x1
0c14 a23a | : | Store_Unchecked 0x1,0x3a
0c15 782f |x/ | Jump 0xc45
0c16 e23d | = | Load 0x1,0x3d
0c17 0c01 | | Execute_Immediate Greater_Equal,0x1
0c18 6801 |h | Jump_Zero 0xc1a
0c19 8242 | B | Call 0x1,0x42
0c1a 0092 0f5f | _| Action Push_String_Extended,0xf5f ; "0 "
0c1c e406 | | Load 0x2,0x6
0c1d 8240 | @ | Call 0x1,0x40
0c1e 01cc | | Execute Vector,Catenate
0c1f 0092 0f76 | v| Action Push_String_Extended,0xf76 ; " rmoveto"
0c21 01cc | | Execute Vector,Catenate
0c22 e233 | 3 | Load 0x1,0x33
0c23 e00c | | Load 0x0,0xc
0c24 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c25 781f |x | Jump 0xc45
0c26 00d1 | | Pop_Control Pop_Count_1
0c27 e406 | | Load 0x2,0x6
0c28 4801 |H | Short_Literal 0x1
0c29 4804 |H | Short_Literal 0x4
0c2a e403 | | Load 0x2,0x3
0c2b e001 | | Load 0x0,0x1
0c2c 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0c2d 011c | | Execute Any,Convert_Unchecked
0c2e 1c01 | | Execute_Immediate Run_Utility,0x1
0c2f 8409 | | Call 0x2,0x9
0c30 7814 |x | Jump 0xc45
0c31 e406 | | Load 0x2,0x6
0c32 4800 |H | Short_Literal 0x0
0c33 4806 |H | Short_Literal 0x6
0c34 e403 | | Load 0x2,0x3
0c35 e001 | | Load 0x0,0x1
0c36 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0c37 011c | | Execute Any,Convert_Unchecked
0c38 1c01 | | Execute_Immediate Run_Utility,0x1
0c39 8409 | | Call 0x2,0x9
0c3a 780a |x | Jump 0xc45
0c3b e406 | | Load 0x2,0x6
0c3c 4800 |H | Short_Literal 0x0
0c3d 4800 |H | Short_Literal 0x0
0c3e e403 | | Load 0x2,0x3
0c3f e001 | | Load 0x0,0x1
0c40 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0c41 011c | | Execute Any,Convert_Unchecked
0c42 1c01 | | Execute_Immediate Run_Utility,0x1
0c43 8409 | | Call 0x2,0x9
0c44 7800 |x | Jump 0xc45
0c45 e237 | 7 | Load 0x1,0x37
0c46 e406 | | Load 0x2,0x6
0c47 0273 | s | Execute Discrete,Plus
0c48 c237 | 7 | Store 0x1,0x37
0c49 00c8 | | Action Pop_Auxiliary_Range
0c4a 00a4 0a6d | m| Action Loop_Increasing_Extended,0xa6d
0c4c 00ce | | Action Pop_Auxiliary
0c4d e23d | = | Load 0x1,0x3d
0c4e 0c01 | | Execute_Immediate Greater_Equal,0x1
0c4f 6801 |h | Jump_Zero 0xc51
0c50 8242 | B | Call 0x1,0x42
0c51 e408 | | Load 0x2,0x8
0c52 0c00 | | Execute_Immediate Greater_Equal,0x0
0c53 6848 |hH | Jump_Zero 0xc9c
0c54 4820 |H | Short_Literal 0x20
0c55 0092 0f75 | u| Action Push_String_Extended,0xf75 ; "gsave "
0c57 e408 | | Load 0x2,0x8
0c58 e237 | 7 | Load 0x1,0x37
0c59 0272 | r | Execute Discrete,Minus
0c5a e001 | | Load 0x0,0x1
0c5b 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0c5c 00d9 | | Load_Top At_Offset_1
0c5d 00d0 | | Action Swap_Control
0c5e 0260 | ` | Execute Discrete,In_Type
0c5f 7001 |p | Jump_Nonzero 0xc61
0c60 0801 | | Execute_Immediate Raise,0x1
0c61 8240 | @ | Call 0x1,0x40
0c62 01cc | | Execute Vector,Catenate
0c63 01cb | | Execute Vector,Append
0c64 e405 | | Load 0x2,0x5
0c65 0227 | ' | Execute Access,All_Reference
0c66 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0c67 e236 | 6 | Load 0x1,0x36
0c68 0271 | q | Execute Discrete,Times
0c69 e001 | | Load 0x0,0x1
0c6a 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0c6b 00d9 | | Load_Top At_Offset_1
0c6c 00d0 | | Action Swap_Control
0c6d 0260 | ` | Execute Discrete,In_Type
0c6e 7001 |p | Jump_Nonzero 0xc70
0c6f 0801 | | Execute_Immediate Raise,0x1
0c70 8240 | @ | Call 0x1,0x40
0c71 01cc | | Execute Vector,Catenate
0c72 0092 0f76 | v| Action Push_String_Extended,0xf76 ; " rmoveto"
0c74 01cc | | Execute Vector,Catenate
0c75 e233 | 3 | Load 0x1,0x33
0c76 e00c | | Load 0x0,0xc
0c77 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c78 e405 | | Load 0x2,0x5
0c79 0227 | ' | Execute Access,All_Reference
0c7a 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
0c7b e236 | 6 | Load 0x1,0x36
0c7c 0271 | q | Execute Discrete,Times
0c7d e001 | | Load 0x0,0x1
0c7e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0c7f 00d9 | | Load_Top At_Offset_1
0c80 00d0 | | Action Swap_Control
0c81 0260 | ` | Execute Discrete,In_Type
0c82 7001 |p | Jump_Nonzero 0xc84
0c83 0801 | | Execute_Immediate Raise,0x1
0c84 8240 | @ | Call 0x1,0x40
0c85 0092 0f77 | w| Action Push_String_Extended,0xf77 ; " setlinewidth"
0c87 01cc | | Execute Vector,Catenate
0c88 e233 | 3 | Load 0x1,0x33
0c89 e00c | | Load 0x0,0xc
0c8a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c8b e237 | 7 | Load 0x1,0x37
0c8c e408 | | Load 0x2,0x8
0c8d 0272 | r | Execute Discrete,Minus
0c8e e001 | | Load 0x0,0x1
0c8f 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0c90 00d9 | | Load_Top At_Offset_1
0c91 00d0 | | Action Swap_Control
0c92 0260 | ` | Execute Discrete,In_Type
0c93 7001 |p | Jump_Nonzero 0xc95
0c94 0801 | | Execute_Immediate Raise,0x1
0c95 8240 | @ | Call 0x1,0x40
0c96 0092 0f78 | x| Action Push_String_Extended,0xf78 ; " 0 rlineto stroke grestore"
0c98 01cc | | Execute Vector,Catenate
0c99 e233 | 3 | Load 0x1,0x33
0c9a e00c | | Load 0x0,0xc
0c9b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c9c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0c9d 0000 0000 | | .XXX[0x3]
0c9f 0000 | |
0ca0 ; --------------------------------------------------------------------------------------
0ca0 ; SUBPROGRAM
0ca0 ; --------------------------------------------------------------------------------------
0ca0 0ca5 | | .CONST 0x0ca5 ; Address of begin
0ca1 0004 | | .CONST 0x0004 ; Address of exception handler
0ca2 0002 | | .CONST 0x0002 ; Number of locals
0ca3 INIT_0ca0:
0ca3 e230 | 0 | Load 0x1,0x30
0ca4 0007 | | Action Break_Optional
0ca5 BODY_0ca0:
0ca5 e22f | / | Load 0x1,0x2f
0ca6 0322 | " | Declare_Variable Record
0ca7 e5ff | | Load 0x2,-0x1
0ca8 e001 | | Load 0x0,0x1
0ca9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0caa 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0cab e403 | | Load 0x2,0x3
0cac 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0cad e5fe | | Load 0x2,-0x2
0cae e403 | | Load 0x2,0x3
0caf 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0cb0 e5fd | | Load 0x2,-0x3
0cb1 e403 | | Load 0x2,0x3
0cb2 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0cb3 e5fc | | Load 0x2,-0x4
0cb4 e403 | | Load 0x2,0x3
0cb5 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0cb6 e5fb | | Load 0x2,-0x5
0cb7 e403 | | Load 0x2,0x3
0cb8 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0cb9 e5fa | | Load 0x2,-0x6
0cba e403 | | Load 0x2,0x3
0cbb 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0cbc e5f9 | | Load 0x2,-0x7
0cbd e403 | | Load 0x2,0x3
0cbe 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0cbf e5f8 | | Load 0x2,-0x8
0cc0 e403 | | Load 0x2,0x3
0cc1 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
0cc2 e5f7 | | Load 0x2,-0x9
0cc3 e403 | | Load 0x2,0x3
0cc4 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0cc5 e5f6 | | Load 0x2,-0xa
0cc6 e403 | | Load 0x2,0x3
0cc7 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
0cc8 e230 | 0 | Load 0x1,0x30
0cc9 e403 | | Load 0x2,0x3
0cca 380a |8 | Execute Record,Field_Write,Field_Number 0xa
0ccb e230 | 0 | Load 0x1,0x30
0ccc 03b6 | | Declare_Variable Access,By_Allocation,With_Value
0ccd a402 | | Store_Unchecked 0x2,0x2
0cce e231 | 1 | Load 0x1,0x31
0ccf 6804 |h | Jump_Zero 0xcd4
0cd0 00d8 | | Load_Top At_Offset_0
0cd1 e231 | 1 | Load 0x1,0x31
0cd2 0227 | ' | Execute Access,All_Reference
0cd3 380a |8 | Execute Record,Field_Write,Field_Number 0xa
0cd4 00d8 | | Load_Top At_Offset_0
0cd5 a231 | 1 | Store_Unchecked 0x1,0x31
0cd6 e232 | 2 | Load 0x1,0x32
0cd7 7002 |p | Jump_Nonzero 0xcda
0cd8 e231 | 1 | Load 0x1,0x31
0cd9 a232 | 2 | Store_Unchecked 0x1,0x32
0cda 450b |E | Exit_Suprogram New_Top_Offset 0xb
0cdb 0000 0000 | | .BLANK 0000[0x5]
0ce0 ; --------------------------------------------------------------------------------------
0ce0 ; SUBPROGRAM
0ce0 ; --------------------------------------------------------------------------------------
0ce0 0ce3 | | .CONST 0x0ce3 ; Address of begin
0ce1 0004 | | .CONST 0x0004 ; Address of exception handler
0ce2 0001 | | .CONST 0x0001 ; Number of locals
0ce3 BODY_0ce0:
0ce3 INIT_0ce0:
0ce3 e5ff | | Load 0x2,-0x1
0ce4 a23b | ; | Store_Unchecked 0x1,0x3b
0ce5 e5fe | | Load 0x2,-0x2
0ce6 a23c | < | Store_Unchecked 0x1,0x3c
0ce7 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0ce8 ; --------------------------------------------------------------------------------------
0ce8 ; SUBPROGRAM
0ce8 ; --------------------------------------------------------------------------------------
0ce8 0ceb | | .CONST 0x0ceb ; Address of begin
0ce9 0cf3 | | .CONST 0x0cf3 ; Address of exception handler
0cea 0001 | | .CONST 0x0001 ; Number of locals
0ceb BODY_0ce8:
0ceb INIT_0ce8:
0ceb e402 | | Load 0x2,0x2
0cec 00ea | | Load_Encached Null_String_Cache
0ced e5ff | | Load 0x2,-0x1
0cee 4800 |H | Short_Literal 0x0
0cef e011 | | Load 0x0,0x11
0cf0 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0cf1 c402 | | Store 0x2,0x2
0cf2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0cf3 TRAP_0ce8:
0cf3 0007 | | Action Break_Optional
0cf4 4829 |H) | Short_Literal 0x29
0cf5 0092 0f7d | }| Action Push_String_Extended,0xf7d ; "Could not open the form setup file "
0cf7 e5ff | | Load 0x2,-0x1
0cf8 01cc | | Execute Vector,Catenate
0cf9 0092 0f50 | P| Action Push_String_Extended,0xf50 ; " ("
0cfb 01cc | | Execute Vector,Catenate
0cfc 4800 |H | Short_Literal 0x0
0cfd 4801 |H | Short_Literal 0x1
0cfe e015 | | Load 0x0,0x15
0cff 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0d00 01cc | | Execute Vector,Catenate
0d01 01cb | | Execute Vector,Append
0d02 e010 | | Load 0x0,0x10
0d03 180e | | Execute Package,Field_Execute,Field_Number 0xe
0d04 e001 | | Load 0x0,0x1
0d05 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0d06 0257 | W | Execute Discrete,Raise
0d07 0000 | | .XXX[0x1]
0d08 ; --------------------------------------------------------------------------------------
0d08 ; SUBPROGRAM
0d08 ; --------------------------------------------------------------------------------------
0d08 0d0e | | .CONST 0x0d0e ; Address of begin
0d09 0004 | | .CONST 0x0004 ; Address of exception handler
0d0a 0002 | | .CONST 0x0002 ; Number of locals
0d0b INIT_0d08:
0d0b e402 | | Load 0x2,0x2
0d0c e011 | | Load 0x0,0x11
0d0d 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0d0e BODY_0d08:
0d0e 00d8 | | Load_Top At_Offset_0
0d0f 01db | | Execute Vector,Length
0d10 0c01 | | Execute_Immediate Greater_Equal,0x1
0d11 6802 |h | Jump_Zero 0xd14
0d12 00d8 | | Load_Top At_Offset_0
0d13 8247 | G | Call 0x1,0x47
0d14 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0d15 0000 0000 | | .XXX[0x3]
0d17 0000 | |
0d18 ; --------------------------------------------------------------------------------------
0d18 ; SUBPROGRAM
0d18 ; --------------------------------------------------------------------------------------
0d18 0d1b | | .CONST 0x0d1b ; Address of begin
0d19 0d23 | # | .CONST 0x0d23 ; Address of exception handler
0d1a 0001 | | .CONST 0x0001 ; Number of locals
0d1b BODY_0d18:
0d1b INIT_0d18:
0d1b e402 | | Load 0x2,0x2
0d1c 00ea | | Load_Encached Null_String_Cache
0d1d e5ff | | Load 0x2,-0x1
0d1e 4800 |H | Short_Literal 0x0
0d1f e011 | | Load 0x0,0x11
0d20 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0d21 c402 | | Store 0x2,0x2
0d22 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0d23 TRAP_0d18:
0d23 0007 | | Action Break_Optional
0d24 4829 |H) | Short_Literal 0x29
0d25 0092 0f7e | ~| Action Push_String_Extended,0xf7e ; "Could not open the font setup file "
0d27 e5ff | | Load 0x2,-0x1
0d28 01cc | | Execute Vector,Catenate
0d29 0092 0f50 | P| Action Push_String_Extended,0xf50 ; " ("
0d2b 01cc | | Execute Vector,Catenate
0d2c 4800 |H | Short_Literal 0x0
0d2d 4801 |H | Short_Literal 0x1
0d2e e015 | | Load 0x0,0x15
0d2f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0d30 01cc | | Execute Vector,Catenate
0d31 01cb | | Execute Vector,Append
0d32 e010 | | Load 0x0,0x10
0d33 180e | | Execute Package,Field_Execute,Field_Number 0xe
0d34 e001 | | Load 0x0,0x1
0d35 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0d36 0257 | W | Execute Discrete,Raise
0d37 0000 | | .XXX[0x1]
0d38 ; --------------------------------------------------------------------------------------
0d38 ; SUBPROGRAM
0d38 ; --------------------------------------------------------------------------------------
0d38 0d3e | > | .CONST 0x0d3e ; Address of begin
0d39 0004 | | .CONST 0x0004 ; Address of exception handler
0d3a 0002 | | .CONST 0x0002 ; Number of locals
0d3b INIT_0d38:
0d3b e402 | | Load 0x2,0x2
0d3c e011 | | Load 0x0,0x11
0d3d 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0d3e BODY_0d38:
0d3e 00d8 | | Load_Top At_Offset_0
0d3f 01db | | Execute Vector,Length
0d40 0c01 | | Execute_Immediate Greater_Equal,0x1
0d41 6802 |h | Jump_Zero 0xd44
0d42 00d8 | | Load_Top At_Offset_0
0d43 824e | N | Call 0x1,0x4e
0d44 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0d45 0000 0000 | | .XXX[0x3]
0d47 0000 | |
0d48 ; --------------------------------------------------------------------------------------
0d48 ; SUBPROGRAM
0d48 ; --------------------------------------------------------------------------------------
0d48 0d4b | K | .CONST 0x0d4b ; Address of begin
0d49 0d53 | S | .CONST 0x0d53 ; Address of exception handler
0d4a 0001 | | .CONST 0x0001 ; Number of locals
0d4b BODY_0d48:
0d4b INIT_0d48:
0d4b e402 | | Load 0x2,0x2
0d4c 00ea | | Load_Encached Null_String_Cache
0d4d e404 | | Load 0x2,0x4
0d4e 4800 |H | Short_Literal 0x0
0d4f e218 | | Load 0x1,0x18
0d50 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0d51 c402 | | Store 0x2,0x2
0d52 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0d53 TRAP_0d48:
0d53 0007 | | Action Break_Optional
0d54 4829 |H) | Short_Literal 0x29
0d55 0092 0f7f | | Action Push_String_Extended,0xf7f ; "Could not open the font file "
0d57 e404 | | Load 0x2,0x4
0d58 01cc | | Execute Vector,Catenate
0d59 0092 0f50 | P| Action Push_String_Extended,0xf50 ; " ("
0d5b 01cc | | Execute Vector,Catenate
0d5c 4800 |H | Short_Literal 0x0
0d5d 4801 |H | Short_Literal 0x1
0d5e e015 | | Load 0x0,0x15
0d5f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0d60 01cc | | Execute Vector,Catenate
0d61 01cb | | Execute Vector,Append
0d62 e010 | | Load 0x0,0x10
0d63 180e | | Execute Package,Field_Execute,Field_Number 0xe
0d64 e001 | | Load 0x0,0x1
0d65 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0d66 0257 | W | Execute Discrete,Raise
0d67 0000 | | .XXX[0x1]
0d68 ; --------------------------------------------------------------------------------------
0d68 ; SUBPROGRAM
0d68 ; --------------------------------------------------------------------------------------
0d68 0d6b | k | .CONST 0x0d6b ; Address of begin
0d69 0d70 | p | .CONST 0x0d70 ; Address of exception handler
0d6a 0001 | | .CONST 0x0001 ; Number of locals
0d6b BODY_0d68:
0d6b INIT_0d68:
0d6b e403 | | Load 0x2,0x3
0d6c e402 | | Load 0x2,0x2
0d6d e218 | | Load 0x1,0x18
0d6e 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0d6f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0d70 TRAP_0d68:
0d70 0007 | | Action Break_Optional
0d71 4829 |H) | Short_Literal 0x29
0d72 0092 0f80 | | Action Push_String_Extended,0xf80 ; "Could not read the font file "
0d74 e404 | | Load 0x2,0x4
0d75 01cc | | Execute Vector,Catenate
0d76 0092 0f50 | P| Action Push_String_Extended,0xf50 ; " ("
0d78 01cc | | Execute Vector,Catenate
0d79 4800 |H | Short_Literal 0x0
0d7a 4801 |H | Short_Literal 0x1
0d7b e015 | | Load 0x0,0x15
0d7c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0d7d 01cc | | Execute Vector,Catenate
0d7e 01cb | | Execute Vector,Append
0d7f e010 | | Load 0x0,0x10
0d80 180e | | Execute Package,Field_Execute,Field_Number 0xe
0d81 e402 | | Load 0x2,0x2
0d82 e218 | | Load 0x1,0x18
0d83 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0d84 c402 | | Store 0x2,0x2
0d85 e001 | | Load 0x0,0x1
0d86 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0d87 0257 | W | Execute Discrete,Raise
0d88 ; --------------------------------------------------------------------------------------
0d88 ; SUBPROGRAM
0d88 ; --------------------------------------------------------------------------------------
0d88 0d8b | | .CONST 0x0d8b ; Address of begin
0d89 0004 | | .CONST 0x0004 ; Address of exception handler
0d8a 0001 | | .CONST 0x0001 ; Number of locals
0d8b BODY_0d88:
0d8b INIT_0d88:
0d8b e7ff | | Load 0x3,-0x1
0d8c 0f64 | d | Execute_Immediate Equal,0x64
0d8d 6803 |h | Jump_Zero 0xd91
0d8e 0092 0f81 | | Action Push_String_Extended,0xf81 ; "1"
0d90 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0d91 482e |H. | Short_Literal 0x2e
0d92 4820 |H | Short_Literal 0x20
0d93 4800 |H | Short_Literal 0x0
0d94 480a |H | Short_Literal 0xa
0d95 e7ff | | Load 0x3,-0x1
0d96 4864 |Hd | Short_Literal 0x64
0d97 0270 | p | Execute Discrete,Divide
0d98 e00f | | Load 0x0,0xf
0d99 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0d9a 01cb | | Execute Vector,Append
0d9b 4830 |H0 | Short_Literal 0x30
0d9c 4802 |H | Short_Literal 0x2
0d9d 480a |H | Short_Literal 0xa
0d9e e7ff | | Load 0x3,-0x1
0d9f 4864 |Hd | Short_Literal 0x64
0da0 026e | n | Execute Discrete,Modulo
0da1 e00f | | Load 0x0,0xf
0da2 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0da3 01cc | | Execute Vector,Catenate
0da4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0da5 0000 0000 | | .XXX[0x3]
0da7 0000 | |
0da8 ; --------------------------------------------------------------------------------------
0da8 ; SUBPROGRAM
0da8 ; --------------------------------------------------------------------------------------
0da8 0db2 | | .CONST 0x0db2 ; Address of begin
0da9 0dcb | | .CONST 0x0dcb ; Address of exception handler
0daa 0003 | | .CONST 0x0003 ; Number of locals
0dab INIT_0da8:
0dab e011 | | Load 0x0,0x11
0dac 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0dad 02c7 | | Declare_Variable Any
0dae 00d8 | | Load_Top At_Offset_0
0daf 1c00 | | Execute_Immediate Run_Utility,0x0
0db0 029f 0edb | | Declare_Subprogram INIT_0ed8,For_Call
0db2 BODY_0da8:
0db2 e602 | | Load 0x3,0x2
0db3 00ea | | Load_Encached Null_String_Cache
0db4 e232 | 2 | Load 0x1,0x32
0db5 0227 | ' | Execute Access,All_Reference
0db6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0db7 e001 | | Load 0x0,0x1
0db8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0db9 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0dba 4800 |H | Short_Literal 0x0
0dbb e011 | | Load 0x0,0x11
0dbc 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0dbd c602 | | Store 0x3,0x2
0dbe 0092 0f82 | | Action Push_String_Extended,0xf82 ; "%%BeginDocument: "
0dc0 e602 | | Load 0x3,0x2
0dc1 e011 | | Load 0x0,0x11
0dc2 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0dc3 01cc | | Execute Vector,Catenate
0dc4 e233 | 3 | Load 0x1,0x33
0dc5 e00c | | Load 0x0,0xc
0dc6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0dc7 00cf | | Action Mark_Auxiliary
0dc8 8603 | | Call 0x3,0x3
0dc9 00c9 | | Action Pop_Auxiliary_Loop
0dca 7ffd | | Jump 0xdc8
0dcb TRAP_0da8:
0dcb 00d8 | | Load_Top At_Offset_0
0dcc 0107 | | Execute Exception,Get_Name
0dcd 4950 |IP | Short_Literal 0x150
0dce 495f |I_ | Short_Literal 0x15f
0dcf 0262 | b | Execute Discrete,In_Range
0dd0 6805 |h | Jump_Zero 0xdd6
0dd1 e602 | | Load 0x3,0x2
0dd2 e011 | | Load 0x0,0x11
0dd3 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0dd4 c602 | | Store 0x3,0x2
0dd5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0dd6 e602 | | Load 0x3,0x2
0dd7 e011 | | Load 0x0,0x11
0dd8 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0dd9 680a |h | Jump_Zero 0xde4
0dda e602 | | Load 0x3,0x2
0ddb e011 | | Load 0x0,0x11
0ddc 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0ddd c602 | | Store 0x3,0x2
0dde 0092 0f83 | | Action Push_String_Extended,0xf83 ; "% ERROR INTERPOLATING PICTURE"
0de0 e233 | 3 | Load 0x1,0x33
0de1 e00c | | Load 0x0,0xc
0de2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0de3 780a |x | Jump 0xdee
0de4 0092 0f84 | | Action Push_String_Extended,0xf84 ; "%%BeginDocument: ?"
0de6 e233 | 3 | Load 0x1,0x33
0de7 e00c | | Load 0x0,0xc
0de8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0de9 0092 0f85 | | Action Push_String_Extended,0xf85 ; "% PICTURE NOT FOUND"
0deb e233 | 3 | Load 0x1,0x33
0dec e00c | | Load 0x0,0xc
0ded 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0dee 4829 |H) | Short_Literal 0x29
0def 0092 0f86 | | Action Push_String_Extended,0xf86 ; "Could not interpolate file "
0df1 e232 | 2 | Load 0x1,0x32
0df2 0227 | ' | Execute Access,All_Reference
0df3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0df4 e001 | | Load 0x0,0x1
0df5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0df6 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0df7 01cc | | Execute Vector,Catenate
0df8 0092 0f50 | P| Action Push_String_Extended,0xf50 ; " ("
0dfa 01cc | | Execute Vector,Catenate
0dfb 4800 |H | Short_Literal 0x0
0dfc 4801 |H | Short_Literal 0x1
0dfd e015 | | Load 0x0,0x15
0dfe 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0dff 01cc | | Execute Vector,Catenate
0e00 01cb | | Execute Vector,Append
0e01 e010 | | Load 0x0,0x10
0e02 180e | | Execute Package,Field_Execute,Field_Number 0xe
0e03 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0e04 0000 0000 | | .BLANK 0000[0x4]
0e08 ; --------------------------------------------------------------------------------------
0e08 ; SUBPROGRAM
0e08 ; --------------------------------------------------------------------------------------
0e08 0e0b | | .CONST 0x0e0b ; Address of begin
0e09 0004 | | .CONST 0x0004 ; Address of exception handler
0e0a 0001 | | .CONST 0x0001 ; Number of locals
0e0b BODY_0e08:
0e0b INIT_0e08:
0e0b e407 | | Load 0x2,0x7
0e0c 680b |h | Jump_Zero 0xe18
0e0d 4800 |H | Short_Literal 0x0
0e0e a407 | | Store_Unchecked 0x2,0x7
0e0f e404 | | Load 0x2,0x4
0e10 8240 | @ | Call 0x1,0x40
0e11 0092 0f79 | y| Action Push_String_Extended,0xf79 ; " MX"
0e13 01cc | | Execute Vector,Catenate
0e14 e233 | 3 | Load 0x1,0x33
0e15 e00c | | Load 0x0,0xc
0e16 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0e17 7804 |x | Jump 0xe1c
0e18 e23d | = | Load 0x1,0x3d
0e19 0c01 | | Execute_Immediate Greater_Equal,0x1
0e1a 6801 |h | Jump_Zero 0xe1c
0e1b 8242 | B | Call 0x1,0x42
0e1c e7fd | | Load 0x3,-0x3
0e1d 681e |h | Jump_Zero 0xe3c
0e1e 482f |H/ | Short_Literal 0x2f
0e1f e7ff | | Load 0x3,-0x1
0e20 01dd | | Execute Vector,First
0e21 e7fe | | Load 0x3,-0x2
0e22 0273 | s | Execute Discrete,Plus
0e23 00d8 | | Load_Top At_Offset_0
0e24 00e2 | | Load_Encached Integer_Cache
0e25 0260 | ` | Execute Discrete,In_Type
0e26 7001 |p | Jump_Nonzero 0xe28
0e27 0801 | | Execute_Immediate Raise,0x1
0e28 e7ff | | Load 0x3,-0x1
0e29 01dc | | Execute Vector,Last
0e2a e7ff | | Load 0x3,-0x1
0e2b 01cf | | Execute Vector,Slice_Read
0e2c e00f | | Load 0x0,0xf
0e2d 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0e2e 01ca | | Execute Vector,Prepend
0e2f 0092 0f87 | | Action Push_String_Extended,0xf87 ; " SYM "
0e31 01cc | | Execute Vector,Catenate
0e32 e7fc | | Load 0x3,-0x4
0e33 8240 | @ | Call 0x1,0x40
0e34 01cc | | Execute Vector,Catenate
0e35 0092 0f79 | y| Action Push_String_Extended,0xf79 ; " MX"
0e37 01cc | | Execute Vector,Catenate
0e38 e233 | 3 | Load 0x1,0x33
0e39 e00c | | Load 0x0,0xc
0e3a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0e3b 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0e3c 482f |H/ | Short_Literal 0x2f
0e3d e7ff | | Load 0x3,-0x1
0e3e 01dd | | Execute Vector,First
0e3f e7fe | | Load 0x3,-0x2
0e40 0273 | s | Execute Discrete,Plus
0e41 00d8 | | Load_Top At_Offset_0
0e42 00e2 | | Load_Encached Integer_Cache
0e43 0260 | ` | Execute Discrete,In_Type
0e44 7001 |p | Jump_Nonzero 0xe46
0e45 0801 | | Execute_Immediate Raise,0x1
0e46 e7ff | | Load 0x3,-0x1
0e47 01dc | | Execute Vector,Last
0e48 e7ff | | Load 0x3,-0x1
0e49 01cf | | Execute Vector,Slice_Read
0e4a e00f | | Load 0x0,0xf
0e4b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0e4c 01ca | | Execute Vector,Prepend
0e4d 0092 0f87 | | Action Push_String_Extended,0xf87 ; " SYM "
0e4f 01cc | | Execute Vector,Catenate
0e50 e7fc | | Load 0x3,-0x4
0e51 8240 | @ | Call 0x1,0x40
0e52 01cc | | Execute Vector,Catenate
0e53 0092 0f79 | y| Action Push_String_Extended,0xf79 ; " MX"
0e55 01cc | | Execute Vector,Catenate
0e56 e233 | 3 | Load 0x1,0x33
0e57 e00c | | Load 0x0,0xc
0e58 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0e59 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0e5a 0000 0000 | | .BLANK 0000[0x6]
0e60 ; --------------------------------------------------------------------------------------
0e60 ; SUBPROGRAM
0e60 ; --------------------------------------------------------------------------------------
0e60 0e6c | l | .CONST 0x0e6c ; Address of begin
0e61 0004 | | .CONST 0x0004 ; Address of exception handler
0e62 0003 | | .CONST 0x0003 ; Number of locals
0e63 INIT_0e60:
0e63 e7ff | | Load 0x3,-0x1
0e64 4be8 |K | Short_Literal 0x3e8
0e65 0271 | q | Execute Discrete,Times
0e66 e001 | | Load 0x0,0x1
0e67 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0e68 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0e69 e001 | | Load 0x0,0x1
0e6a 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0e6b 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0e6c BODY_0e60:
0e6c e602 | | Load 0x3,0x2
0e6d 7011 |p | Jump_Nonzero 0xe7f
0e6e 4800 |H | Short_Literal 0x0
0e6f e406 | | Load 0x2,0x6
0e70 8261 | a | Call 0x1,0x61
0e71 4820 |H | Short_Literal 0x20
0e72 e237 | 7 | Load 0x1,0x37
0e73 8240 | @ | Call 0x1,0x40
0e74 01cb | | Execute Vector,Append
0e75 e238 | 8 | Load 0x1,0x38
0e76 8240 | @ | Call 0x1,0x40
0e77 01cc | | Execute Vector,Catenate
0e78 0092 0f5e | ^| Action Push_String_Extended,0xf5e ; " moveto"
0e7a 01cc | | Execute Vector,Catenate
0e7b e233 | 3 | Load 0x1,0x33
0e7c e00c | | Load 0x0,0xc
0e7d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0e7e 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0e7f e602 | | Load 0x3,0x2
0e80 e237 | 7 | Load 0x1,0x37
0e81 e602 | | Load 0x3,0x2
0e82 026e | n | Execute Discrete,Modulo
0e83 0272 | r | Execute Discrete,Minus
0e84 c603 | | Store 0x3,0x3
0e85 00d8 | | Load_Top At_Offset_0
0e86 e602 | | Load 0x3,0x2
0e87 0273 | s | Execute Discrete,Plus
0e88 e406 | | Load 0x2,0x6
0e89 027d | } | Execute Discrete,Greater
0e8a 680c |h | Jump_Zero 0xe97
0e8b e407 | | Load 0x2,0x7
0e8c 6805 |h | Jump_Zero 0xe92
0e8d e404 | | Load 0x2,0x4
0e8e e406 | | Load 0x2,0x6
0e8f 0273 | s | Execute Discrete,Plus
0e90 c404 | | Store 0x2,0x4
0e91 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0e92 4801 |H | Short_Literal 0x1
0e93 a407 | | Store_Unchecked 0x2,0x7
0e94 e406 | | Load 0x2,0x6
0e95 a404 | | Store_Unchecked 0x2,0x4
0e96 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0e97 e407 | | Load 0x2,0x7
0e98 680f |h | Jump_Zero 0xea8
0e99 e404 | | Load 0x2,0x4
0e9a e603 | | Load 0x3,0x3
0e9b 0273 | s | Execute Discrete,Plus
0e9c c404 | | Store 0x2,0x4
0e9d e404 | | Load 0x2,0x4
0e9e 8240 | @ | Call 0x1,0x40
0e9f 0092 0f79 | y| Action Push_String_Extended,0xf79 ; " MX"
0ea1 01cc | | Execute Vector,Catenate
0ea2 e233 | 3 | Load 0x1,0x33
0ea3 e00c | | Load 0x0,0xc
0ea4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ea5 4800 |H | Short_Literal 0x0
0ea6 a407 | | Store_Unchecked 0x2,0x7
0ea7 7808 |x | Jump 0xeb0
0ea8 00d8 | | Load_Top At_Offset_0
0ea9 8240 | @ | Call 0x1,0x40
0eaa 0092 0f79 | y| Action Push_String_Extended,0xf79 ; " MX"
0eac 01cc | | Execute Vector,Catenate
0ead e233 | 3 | Load 0x1,0x33
0eae e00c | | Load 0x0,0xc
0eaf 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0eb0 e237 | 7 | Load 0x1,0x37
0eb1 e603 | | Load 0x3,0x3
0eb2 0273 | s | Execute Discrete,Plus
0eb3 c237 | 7 | Store 0x1,0x37
0eb4 e406 | | Load 0x2,0x6
0eb5 e603 | | Load 0x3,0x3
0eb6 0272 | r | Execute Discrete,Minus
0eb7 c406 | | Store 0x2,0x6
0eb8 e406 | | Load 0x2,0x6
0eb9 e602 | | Load 0x3,0x2
0eba 0270 | p | Execute Discrete,Divide
0ebb 0c01 | | Execute_Immediate Greater_Equal,0x1
0ebc 7001 |p | Jump_Nonzero 0xebe
0ebd 0887 | | Execute_Immediate Raise,0x87
0ebe e602 | | Load 0x3,0x2
0ebf 8240 | @ | Call 0x1,0x40
0ec0 e406 | | Load 0x2,0x6
0ec1 e602 | | Load 0x3,0x2
0ec2 0270 | p | Execute Discrete,Divide
0ec3 00d8 | | Load_Top At_Offset_0
0ec4 00e3 | | Load_Encached Natural_Cache
0ec5 0260 | ` | Execute Discrete,In_Type
0ec6 7001 |p | Jump_Nonzero 0xec8
0ec7 0801 | | Execute_Immediate Raise,0x1
0ec8 00e0 | | Load_Encached Standard_Cache
0ec9 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0eca 01cc | | Execute Vector,Catenate
0ecb 0092 0f88 | | Action Push_String_Extended,0xf88 ; " LTAB "
0ecd 01cc | | Execute Vector,Catenate
0ece e406 | | Load 0x2,0x6
0ecf 8240 | @ | Call 0x1,0x40
0ed0 01cc | | Execute Vector,Catenate
0ed1 0092 0f79 | y| Action Push_String_Extended,0xf79 ; " MX"
0ed3 01cc | | Execute Vector,Catenate
0ed4 e233 | 3 | Load 0x1,0x33
0ed5 e00c | | Load 0x0,0xc
0ed6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ed7 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0ed8 ; --------------------------------------------------------------------------------------
0ed8 ; SUBPROGRAM
0ed8 ; --------------------------------------------------------------------------------------
0ed8 0ede | | .CONST 0x0ede ; Address of begin
0ed9 0004 | | .CONST 0x0004 ; Address of exception handler
0eda 0002 | | .CONST 0x0002 ; Number of locals
0edb INIT_0ed8:
0edb e602 | | Load 0x3,0x2
0edc e011 | | Load 0x0,0x11
0edd 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0ede BODY_0ed8:
0ede 4800 |H | Short_Literal 0x0
0edf e802 | | Load 0x4,0x2
0ee0 0092 0f89 | | Action Push_String_Extended,0xf89 ; "%%Page:"
0ee2 e00f | | Load 0x0,0xf
0ee3 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0ee4 e802 | | Load 0x4,0x2
0ee5 01dd | | Execute Vector,First
0ee6 027f | | Execute Discrete,Equal
0ee7 4800 |H | Short_Literal 0x0
0ee8 e802 | | Load 0x4,0x2
0ee9 0092 0f51 | Q| Action Push_String_Extended,0xf51 ; "%%Trailer"
0eeb e00f | | Load 0x0,0xf
0eec 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0eed e802 | | Load 0x4,0x2
0eee 01dd | | Execute Vector,First
0eef 027f | | Execute Discrete,Equal
0ef0 0278 | x | Execute Discrete,Or
0ef1 6815 |h | Jump_Zero 0xf07
0ef2 485d |H] | Short_Literal 0x5d
0ef3 0092 0f8a | | Action Push_String_Extended,0xf8a ; "%%["
0ef5 e802 | | Load 0x4,0x2
0ef6 01dd | | Execute Vector,First
0ef7 0a02 | | Execute_Immediate Plus,0x2
0ef8 00d8 | | Load_Top At_Offset_0
0ef9 00e2 | | Load_Encached Integer_Cache
0efa 0260 | ` | Execute Discrete,In_Type
0efb 7001 |p | Jump_Nonzero 0xefd
0efc 0801 | | Execute_Immediate Raise,0x1
0efd e802 | | Load 0x4,0x2
0efe 01dc | | Execute Vector,Last
0eff e802 | | Load 0x4,0x2
0f00 01cf | | Execute Vector,Slice_Read
0f01 01cc | | Execute Vector,Catenate
0f02 01cb | | Execute Vector,Append
0f03 e233 | 3 | Load 0x1,0x33
0f04 e00c | | Load 0x0,0xc
0f05 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0f06 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0f07 00d8 | | Load_Top At_Offset_0
0f08 e233 | 3 | Load 0x1,0x33
0f09 e00c | | Load 0x0,0xc
0f0a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0f0b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0f0c ; --------------------------------------------------------------------------------------
0f0c ; STRING TABLE
0f0c ; --------------------------------------------------------------------------------------
0f0c 0100 | | .STRTAB 0x0100->0x0f8c ; "NIL"
0f0d 0101 | | .STRTAB 0x0101->0x0f8d ; "TO_BE_SUPPLIED"
0f0e 010d | | .STRTAB 0x010d->0x0f94 ; "NIL"
0f0f 010e | | .STRTAB 0x010e->0x0f96 ; "FAMILY"
0f10 0112 | | .STRTAB 0x0112->0x0f99 ; "NORMAL"
0f11 0116 | | .STRTAB 0x0116->0x0f9c ; "BOLD"
0f12 0118 | | .STRTAB 0x0118->0x0f9e ; "ITALIC"
0f13 011c | | .STRTAB 0x011c->0x0fa1 ; "BOLD_ITALIC"
0f14 0125 | % | .STRTAB 0x0125->0x0fa6 ; "STANDARD"
0f15 012b | + | .STRTAB 0x012b->0x0faa ; "others => Unspecified"
0f16 013e | > | .STRTAB 0x013e->0x0fb5 ; "CAP-"
0f17 0140 | @ | .STRTAB 0x0140->0x0fb7 ; "PostScript"
0f18 0148 | H | .STRTAB 0x0148->0x0fbc ; ") "
0f19 0148 | H | .STRTAB 0x0148->0x0fbd ; " WS"
0f1a 0149 | I | .STRTAB 0x0149->0x0fbe ; ") show"
0f1b 014d | M | .STRTAB 0x014d->0x0fc1 ; "Invalid form selection "
0f1c 0162 | b | .STRTAB 0x0162->0x0fcd ; ". Form "
0f1d 0168 | h | .STRTAB 0x0168->0x0fd1 ; " assumed"
0f1e 016e | n | .STRTAB 0x016e->0x0fd5 ; "Form "
0f1f 0171 | q | .STRTAB 0x0171->0x0fd7 ; " is being redefined"
0f20 0182 | | .STRTAB 0x0182->0x0fe1 ; "Too many forms defined"
0f21 0196 | | .STRTAB 0x0196->0x0fec ; "The PostScript device does not support defining forms"
0f22 01c9 | | .STRTAB 0x01c9->0x1006 ; "Could not define forms in "
0f23 01e1 | | .STRTAB 0x01e1->0x1013 ; "Standard"
0f24 01e7 | | .STRTAB 0x01e7->0x1017 ; "No more fonts can be defined"
0f25 0201 | | .STRTAB 0x0201->0x1025 ; "No more font families can be defined"
0f26 0223 | # | .STRTAB 0x0223->0x1037 ; "Argument to Define_Font was unrecognizable"
0f27 024b | K | .STRTAB 0x024b->0x104c ; "Define_Font"
0f28 0254 | T | .STRTAB 0x0254->0x1052 ; "Define_Font requires a Family name"
0f29 0274 | t | .STRTAB 0x0274->0x1063 ; "Define_Font requires a Normal font"
0f2a 0294 | | .STRTAB 0x0294->0x1074 ; "Could not define fonts in "
0f2b 02ac | | .STRTAB 0x02ac->0x1081 ; "/"
0f2c 02ab | | .STRTAB 0x02ab->0x1081 ; " /"
0f2d 02ab | | .STRTAB 0x02ab->0x1082 ; " findfont dup setfont [.9 0 0 FINDSCALE 0 0] makefont COPYFONT dup /Encoding CAP-ENCODING put definefont pop"
0f2e 0315 | | .STRTAB 0x0315->0x10b8 ; "_PS"
0f2f 0316 | | .STRTAB 0x0316->0x10ba ; "%!PS-Adobe-2.0"
0f30 0322 | " | .STRTAB 0x0322->0x10c1 ; "%%Title: "
0f31 0329 | ) | .STRTAB 0x0329->0x10c5 ; "%%Creator: COMPOSE"
0f32 0339 | 9 | .STRTAB 0x0339->0x10ce ; "%%CreationDate: MM/DD/YY"
0f33 034f | O | .STRTAB 0x034f->0x10da ; "%%For: regression test"
0f34 0363 | c | .STRTAB 0x0363->0x10e5 ; "%%Creator: COMPOSE "
0f35 0374 | t | .STRTAB 0x0374->0x10ef ; "%%CreationDate: "
0f36 0382 | | .STRTAB 0x0382->0x10f7 ; "%%For: "
0f37 0387 | | .STRTAB 0x0387->0x10fa ; "%%Pages: (atend)"
0f38 0395 | | .STRTAB 0x0395->0x1102 ; "%%DocumentFonts: (atend)"
0f39 03ab | | .STRTAB 0x03ab->0x110e ; "%%EndComments"
0f3a 03b6 | | .STRTAB 0x03b6->0x1115 ; "/SelectFont {findfont exch dup neg 0 0 3 -1 roll 0 0 MAT astore makefont setfont} bind def"
0f3b 040e | | .STRTAB 0x040e->0x1142 ; "/BeginPage {/State save def /INITIAL-MATRIX matrix currentmatrix def 1 -1 scale 0.5 setlinewidth} bind def"
0f3c 0476 | v | .STRTAB 0x0476->0x1177 ; "/PositionPage {{-90 rotate pop} {0 exch neg translate} ifelse} bind def"
0f3d 04bb | | .STRTAB 0x04bb->0x119a ; "/EndPage {State restore showpage} def"
0f3e 04de | | .STRTAB 0x04de->0x11ad ; "/WS {0 32 4 -1 roll widthshow} bind def"
0f3f 0503 | | .STRTAB 0x0503->0x11c0 ; "/MX {0 rmoveto} bind def"
0f40 0519 | | .STRTAB 0x0519->0x11cc ; "/LTAB {gsave exch (.) stringwidth pop sub exch {dup 2 div dup 0 rmoveto (.) show 0 rmoveto} repeat pop grestore} bind def"
0f41 0590 | | .STRTAB 0x0590->0x1209 ; "/MAT matrix def"
0f42 059d | | .STRTAB 0x059d->0x1210 ; "/FINDSCALE {gsave newpath 0 0 moveto (X) false charpath"
0f43 05d2 | | .STRTAB 0x05d2->0x122c ; "flattenpath pathbbox /CAPHEIGHT exch def pop pop pop newpath 0 0 moveto"
0f44 0617 | | .STRTAB 0x0617->0x124f ; "(x) false charpath flattenpath pathbbox /XHEIGHT exch def pop pop pop"
0f45 065a | Z | .STRTAB 0x065a->0x1272 ; "grestore XHEIGHT CAPHEIGHT XHEIGHT sub 3 div add CAPHEIGHT div } bind def"
0f46 06a1 | | .STRTAB 0x06a1->0x1296 ; "/CAP-ENCODING [ StandardEncoding aload pop ] def"
0f47 06cf | | .STRTAB 0x06cf->0x12ae ; "8#141 1 8#172 {CAP-ENCODING exch dup 1 string dup 0 4 -1 roll 8#40 sub put cvn put} for"
0f48 0724 | $ | .STRTAB 0x0724->0x12da ; "/COPYFONT {dup length dict /TMPDICT exch def {1 index /FID ne {TMPDICT 3 1 roll put} {pop pop} ifelse } forall TMPDICT }bind def"
0f49 07a2 | | .STRTAB 0x07a2->0x131a ; "/SYM {save exch /newfont currentfont maxlength dict def currentfont"
0f4a 07e3 | | .STRTAB 0x07e3->0x133b ; "{exch dup /FID ne {dup /Encoding eq {exch dup length array copy newfont 3 1 roll put}"
0f4b 0836 | 6 | .STRTAB 0x0836->0x1366 ; "{exch newfont 3 1 roll put} ifelse } {pop pop} ifelse} forall"
0f4c 0871 | q | .STRTAB 0x0871->0x1384 ; "newfont /Encoding get 8#377 3 -1 roll put /NEWFONT newfont definefont setfont"
0f4d 08bc | | .STRTAB 0x08bc->0x13ab ; "(\x5c377) show restore} bind def"
0f4e 08d7 | | .STRTAB 0x08d7->0x13b9 ; "%%EndProlog"
0f4f 08e0 | | .STRTAB 0x08e0->0x13bf ; "Cannot create output "
0f50 08f3 | | .STRTAB 0x08f3->0x13c9 ; " ("
0f51 08f3 | | .STRTAB 0x08f3->0x13ca ; "%%Trailer"
0f52 08fa | | .STRTAB 0x08fa->0x13cf ; "%%Pages:"
0f53 0900 | | .STRTAB 0x0900->0x13d3 ; " 1"
0f54 0900 | | .STRTAB 0x0900->0x13d4 ; "%%DocumentFonts:"
0f55 090e | | .STRTAB 0x090e->0x13dc ; "_PS_AUX"
0f56 0913 | | .STRTAB 0x0913->0x13df ; "EndPage"
0f57 0918 | | .STRTAB 0x0918->0x13e3 ; "%%Page: "
0f58 091e | | .STRTAB 0x091e->0x13e7 ; "BeginPage"
0f59 0925 | % | .STRTAB 0x0925->0x13eb ; "Page started with unknown form selected. "
0f5a 094d | M | .STRTAB 0x094d->0x1400 ; " true"
0f5b 0950 | P | .STRTAB 0x0950->0x1403 ; " false"
0f5c 0954 | T | .STRTAB 0x0954->0x1406 ; " PositionPage"
0f5d 095f | _ | .STRTAB 0x095f->0x140c ; "/PICSAVE save def newpath"
0f5e 0976 | v | .STRTAB 0x0976->0x1419 ; " moveto"
0f5f 097b | { | .STRTAB 0x097b->0x141c ; "0 "
0f60 097b | { | .STRTAB 0x097b->0x141d ; " rlineto "
0f61 0982 | | .STRTAB 0x0982->0x1422 ; " 0 rlineto 0 "
0f62 098d | | .STRTAB 0x098d->0x1428 ; " 0 rlineto closepath clip"
0f63 09a4 | | .STRTAB 0x09a4->0x1435 ; "INITIAL-MATRIX setmatrix"
0f64 09ba | | .STRTAB 0x09ba->0x1441 ; "currentpoint translate"
0f65 09ce | | .STRTAB 0x09ce->0x144c ; " div "
0f66 09d1 | | .STRTAB 0x09d1->0x144e ; " div translate "
0f67 09de | | .STRTAB 0x09de->0x1456 ; " rotate "
0f68 09e4 | | .STRTAB 0x09e4->0x145a ; " div translate"
0f69 09f0 | | .STRTAB 0x09f0->0x1461 ; " scale"
0f6a 09f4 | | .STRTAB 0x09f4->0x1464 ; "newpath 0 0 moveto /Helvetica findfont 10 scalefont setfont"
0f6b 0a2d | - | .STRTAB 0x0a2d->0x1481 ; "/showpage { } def"
0f6c 0a3c | < | .STRTAB 0x0a3c->0x148a ; "%%BeginDocument: (literal)"
0f6d 0a54 | T | .STRTAB 0x0a54->0x1497 ; "%%EndDocument"
0f6e 0a5f | _ | .STRTAB 0x0a5f->0x149d ; "PICSAVE restore "
0f6f 0a6d | m | .STRTAB 0x0a6d->0x14a5 ; "newpath "
0f70 0a73 | s | .STRTAB 0x0a73->0x14a9 ; " rlineto stroke"
0f71 0a80 | | .STRTAB 0x0a80->0x14b1 ; " 0 rlineto"
0f72 0a88 | | .STRTAB 0x0a88->0x14b6 ; " rlineto"
0f73 0a8e | | .STRTAB 0x0a8e->0x14ba ; " 0 rlineto closepath stroke"
0f74 0aa7 | | .STRTAB 0x0aa7->0x14c7 ; " SelectFont"
0f75 0ab0 | | .STRTAB 0x0ab0->0x14cd ; "gsave "
0f76 0ab4 | | .STRTAB 0x0ab4->0x14d0 ; " rmoveto"
0f77 0aba | | .STRTAB 0x0aba->0x14d4 ; " setlinewidth"
0f78 0ac5 | | .STRTAB 0x0ac5->0x14da ; " 0 rlineto stroke grestore"
0f79 0add | | .STRTAB 0x0add->0x14e7 ; " MX"
0f7a 0ade | | .STRTAB 0x0ade->0x14e9 ; "("
0f7b 0add | | .STRTAB 0x0add->0x14e9 ; "Non-printing character,"
0f7c 0af2 | | .STRTAB 0x0af2->0x14f5 ; " lineto stroke grestore"
0f7d 0b07 | | .STRTAB 0x0b07->0x1500 ; "Could not open the form setup file "
0f7e 0b28 | ( | .STRTAB 0x0b28->0x1512 ; "Could not open the font setup file "
0f7f 0b49 | I | .STRTAB 0x0b49->0x1523 ; "Could not open the font file "
0f80 0b64 | d | .STRTAB 0x0b64->0x1532 ; "Could not read the font file "
0f81 0b7f | | .STRTAB 0x0b7f->0x1540 ; "1"
0f82 0b7e | ~ | .STRTAB 0x0b7e->0x1541 ; "%%BeginDocument: "
0f83 0b8d | | .STRTAB 0x0b8d->0x1549 ; "% ERROR INTERPOLATING PICTURE"
0f84 0ba8 | | .STRTAB 0x0ba8->0x1558 ; "%%BeginDocument: ?"
0f85 0bb8 | | .STRTAB 0x0bb8->0x1561 ; "% PICTURE NOT FOUND"
0f86 0bc9 | | .STRTAB 0x0bc9->0x156a ; "Could not interpolate file "
0f87 0be2 | | .STRTAB 0x0be2->0x1578 ; " SYM "
0f88 0be5 | | .STRTAB 0x0be5->0x157a ; " LTAB "
0f89 0be9 | | .STRTAB 0x0be9->0x157d ; "%%Page:"
0f8a 0bee | | .STRTAB 0x0bee->0x1581 ; "%%["
0f8b 0bef | | .STREND 0x0bef->0x1582
0f8c 4e49 4c54 |NILT| .STRTAB_STRINGS
1583 0000 0000 | | .BLANK 0000[0x5]
1588 ; --------------------------------------------------------------------------------------
1588 ; Debug Table
1588 ; --------------------------------------------------------------------------------------
1588 0004 000f | | .DEBUG4 0x0004,0x000f,0x4316,0x0000,0x0001,0x0000
158e 4026 0194 |@& | .XXX[0x6e]
1590 0000 4026 | @&|
1592 01a4 0000 | |
1594 4026 01e4 |@& |
1596 0000 4026 | @&|
1598 0204 0000 | |
159a 4026 0214 |@& |
159c 0000 4026 | @&|
159e 0224 0000 | $ |
15a0 4026 0284 |@& |
15a2 0000 4026 | @&|
15a4 0294 0000 | |
15a6 4026 02a4 |@& |
15a8 0000 4026 | @&|
15aa 02f4 0000 | |
15ac 4026 0344 |@& D|
15ae 0000 4026 | @&|
15b0 0384 0000 | |
15b2 4026 03a4 |@& |
15b4 0000 4026 | @&|
15b6 03b4 0000 | |
15b8 4026 0484 |@& |
15ba 0000 4026 | @&|
15bc 0524 0000 | $ |
15be 4026 0574 |@& t|
15c0 0000 4026 | @&|
15c2 05c4 0000 | |
15c4 4026 05d4 |@& |
15c6 0000 4026 | @&|
15c8 05f4 0000 | |
15ca 4026 0644 |@& D|
15cc 0000 4026 | @&|
15ce 0674 0000 | t |
15d0 4026 0684 |@& |
15d2 0000 4026 | @&|
15d4 06d4 0000 | |
15d6 4026 0764 |@& d|
15d8 0000 4026 | @&|
15da 07c4 0000 | |
15dc 4026 0804 |@& |
15de 0000 4026 | @&|
15e0 0814 0000 | |
15e2 4026 0884 |@& |
15e4 0000 4026 | @&|
15e6 08a4 0000 | |
15e8 4026 08b4 |@& |
15ea 0000 4026 | @&|
15ec 0914 0000 | |
15ee 4026 0944 |@& D|
15f0 0000 4026 | @&|
15f2 0954 0000 | T |
15f4 4026 09b4 |@& |
15f6 0000 4026 | @&|
15f8 0a04 0000 | |
15fa 4026 0a10 |@& |
15fc 0000 0000 | | .BLANK 0000[0x4]