|
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: 14336 (0x3800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03bcfe
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦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 1ba0 | | .CONST 0x1ba0 ; 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 8011 | | .CONST 0x8011 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 014f | O | .CONST 0x014f ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0066 | f | .CONST 0x0066 ; Number of locals
000b INIT_0008:
000b 029a 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call,Visible,Unelaborated
000d 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated
000f 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated
0011 029a 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call,Visible,Unelaborated
0013 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated
0015 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated
0017 029a 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call,Visible,Unelaborated
0019 e001 | | Load 0x0,0x1
001a 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address
001b e002 | | Load 0x0,0x2
001c 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address
001d 029a 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call,Visible,Unelaborated
001f e003 | | Load 0x0,0x3
0020 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address
0021 e004 | | Load 0x0,0x4
0022 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address
0023 029a 034b | K| Declare_Subprogram INIT_0348,For_Outer_Call,Visible,Unelaborated
0025 029a 0363 | c| Declare_Subprogram INIT_0360,For_Outer_Call,Visible,Unelaborated
0027 029a 037b | {| Declare_Subprogram INIT_0378,For_Outer_Call,Visible,Unelaborated
0029 029a 039b | | Declare_Subprogram INIT_0398,For_Outer_Call,Visible,Unelaborated
002b 029a 03bb | | Declare_Subprogram INIT_03b8,For_Outer_Call,Visible,Unelaborated
002d 029a 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call,Visible,Unelaborated
002f e005 | | Load 0x0,0x5
0030 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address
0031 029a 03fb | | Declare_Subprogram INIT_03f8,For_Outer_Call,Visible,Unelaborated
0033 029a 0413 | | Declare_Subprogram INIT_0410,For_Outer_Call,Visible,Unelaborated
0035 e006 | | Load 0x0,0x6
0036 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address
0037 029a 04eb | | Declare_Subprogram INIT_04e8,For_Outer_Call,Visible,Unelaborated
0039 029a 04fb | | Declare_Subprogram INIT_04f8,For_Outer_Call,Visible,Unelaborated
003b 029a 050b | | Declare_Subprogram INIT_0508,For_Outer_Call,Visible,Unelaborated
003d 029a 0523 | #| Declare_Subprogram INIT_0520,For_Outer_Call,Visible,Unelaborated
003f e007 | | Load 0x0,0x7
0040 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address
0041 029a 0593 | | Declare_Subprogram INIT_0590,For_Outer_Call,Visible,Unelaborated
0043 029a 05e3 | | Declare_Subprogram INIT_05e0,For_Outer_Call,Visible,Unelaborated
0045 029a 06fb | | Declare_Subprogram INIT_06f8,For_Outer_Call,Visible,Unelaborated
0047 029a 0713 | | Declare_Subprogram INIT_0710,For_Outer_Call,Visible,Unelaborated
0049 029a 072b | +| Declare_Subprogram INIT_0728,For_Outer_Call,Visible,Unelaborated
004b 029a 075b | [| Declare_Subprogram INIT_0758,For_Outer_Call,Visible,Unelaborated
004d 029a 076b | k| Declare_Subprogram INIT_0768,For_Outer_Call,Visible,Unelaborated
004f 029a 078b | | Declare_Subprogram INIT_0788,For_Outer_Call,Visible,Unelaborated
0051 029a 07a3 | | Declare_Subprogram INIT_07a0,For_Outer_Call,Visible,Unelaborated
0053 029a 0803 | | Declare_Subprogram INIT_0800,For_Outer_Call,Visible,Unelaborated
0055 029a 085b | [| Declare_Subprogram INIT_0858,For_Outer_Call,Visible,Unelaborated
0057 e008 | | Load 0x0,0x8
0058 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address
0059 029a 0893 | | Declare_Subprogram INIT_0890,For_Outer_Call,Visible,Unelaborated
005b 029a 08ab | | Declare_Subprogram INIT_08a8,For_Outer_Call,Visible,Unelaborated
005d 029a 08c3 | | Declare_Subprogram INIT_08c0,For_Outer_Call,Visible,Unelaborated
005f 029a 095b | [| Declare_Subprogram INIT_0958,For_Outer_Call,Visible,Unelaborated
0061 e009 | | Load 0x0,0x9
0062 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address
0063 029a 0973 | s| Declare_Subprogram INIT_0970,For_Outer_Call,Visible,Unelaborated
0065 029a 0993 | | Declare_Subprogram INIT_0990,For_Outer_Call,Visible,Unelaborated
0067 029a 09ab | | Declare_Subprogram INIT_09a8,For_Outer_Call,Visible,Unelaborated
0069 e00a | | Load 0x0,0xa
006a 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address
006b 029a 09cb | | Declare_Subprogram INIT_09c8,For_Outer_Call,Visible,Unelaborated
006d 029a 0aa3 | | Declare_Subprogram INIT_0aa0,For_Outer_Call,Visible,Unelaborated
006f 029a 0abb | | Declare_Subprogram INIT_0ab8,For_Outer_Call,Visible,Unelaborated
0071 029a 0ad3 | | Declare_Subprogram INIT_0ad0,For_Outer_Call,Visible,Unelaborated
0073 e00b | | Load 0x0,0xb
0074 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address
0075 e00c | | Load 0x0,0xc
0076 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address
0077 029a 0aeb | | Declare_Subprogram INIT_0ae8,For_Outer_Call,Visible,Unelaborated
0079 029a 0b1b | | Declare_Subprogram INIT_0b18,For_Outer_Call,Visible,Unelaborated
007b 029a 0b53 | S| Declare_Subprogram INIT_0b50,For_Outer_Call,Visible,Unelaborated
007d 029a 0b6b | k| Declare_Subprogram INIT_0b68,For_Outer_Call,Visible,Unelaborated
007f 029a 0b83 | | Declare_Subprogram INIT_0b80,For_Outer_Call,Visible,Unelaborated
0081 029a 0b9b | | Declare_Subprogram INIT_0b98,For_Outer_Call,Visible,Unelaborated
0083 e00d | | Load 0x0,0xd
0084 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address
0085 029a 0bc3 | | Declare_Subprogram INIT_0bc0,For_Outer_Call,Visible,Unelaborated
0087 029a 0c6b | k| Declare_Subprogram INIT_0c68,For_Outer_Call,Visible,Unelaborated
0089 029a 0c8b | | Declare_Subprogram INIT_0c88,For_Outer_Call,Visible,Unelaborated
008b 029a 0ca3 | | Declare_Subprogram INIT_0ca0,For_Outer_Call,Visible,Unelaborated
008d e00e | | Load 0x0,0xe
008e 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address
008f 00bf | | Action Accept_Activation
0090 e00f | | Load 0x0,0xf
0091 e010 | | Load 0x0,0x10
0092 4835 |H5 | Short_Literal 0x35
0093 e011 | | Load 0x0,0x11
0094 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0095 4801 |H | Short_Literal 0x1
0096 e012 | | Load 0x0,0x12
0097 0387 | | Declare_Variable Package
0098 00d8 | | Load_Top At_Offset_0
0099 020f | | Execute Module,Activate
009a 00d8 | | Load_Top At_Offset_0
009b 1b12 | | Execute Package,Field_Read,Field_Number 0x12
009c 00e3 | | Load_Encached Natural_Cache
009d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
009e 00e2 | | Load_Encached Integer_Cache
009f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00a0 00e1 | | Load_Encached Boolean_Cache
00a1 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00a2 4800 |H | Short_Literal 0x0
00a3 48ff |H | Short_Literal 0xff
00a4 029f 0cbb | | Declare_Subprogram INIT_0cb8,For_Call
00a6 03fd | | Declare_Type Discrete,Defined
00a7 029d 0ce3 | | Declare_Subprogram INIT_0ce0,For_Outer_Call
00a9 029d 0d33 | 3| Declare_Subprogram INIT_0d30,For_Outer_Call
00ab 029d 0d43 | C| Declare_Subprogram INIT_0d40,For_Outer_Call
00ad 029d 0d6b | k| Declare_Subprogram INIT_0d68,For_Outer_Call
00af 029d 0d83 | | Declare_Subprogram INIT_0d80,For_Outer_Call
00b1 029d 0d93 | | Declare_Subprogram INIT_0d90,For_Outer_Call
00b3 029d 0dc3 | | Declare_Subprogram INIT_0dc0,For_Outer_Call
00b5 029d 0ddb | | Declare_Subprogram INIT_0dd8,For_Outer_Call
00b7 029d 0deb | | Declare_Subprogram INIT_0de8,For_Outer_Call
00b9 029d 0e03 | | Declare_Subprogram INIT_0e00,For_Outer_Call
00bb 029d 0e23 | #| Declare_Subprogram INIT_0e20,For_Outer_Call
00bd 029d 0e63 | c| Declare_Subprogram INIT_0e60,For_Outer_Call
00bf 029d 0ebb | | Declare_Subprogram INIT_0eb8,For_Outer_Call
00c1 029d 0f13 | | Declare_Subprogram INIT_0f10,For_Outer_Call
00c3 e013 | | Load 0x0,0x13
00c4 02a5 | | Declare_Subprogram For_Outer_Call,With_Address
00c5 e014 | | Load 0x0,0x14
00c6 02a5 | | Declare_Subprogram For_Outer_Call,With_Address
00c7 029d 0f7b | {| Declare_Subprogram INIT_0f78,For_Outer_Call
00c9 1d0d | | Execute_Immediate Reference_Lex_1,0xd
00ca 00c7 | | Action Elaborate_Subprogram
00cb 1d0e | | Execute_Immediate Reference_Lex_1,0xe
00cc 00c7 | | Action Elaborate_Subprogram
00cd 1d0f | | Execute_Immediate Reference_Lex_1,0xf
00ce 00c7 | | Action Elaborate_Subprogram
00cf 1d10 | | Execute_Immediate Reference_Lex_1,0x10
00d0 00c7 | | Action Elaborate_Subprogram
00d1 1d11 | | Execute_Immediate Reference_Lex_1,0x11
00d2 00c7 | | Action Elaborate_Subprogram
00d3 1d12 | | Execute_Immediate Reference_Lex_1,0x12
00d4 00c7 | | Action Elaborate_Subprogram
00d5 1d13 | | Execute_Immediate Reference_Lex_1,0x13
00d6 00c7 | | Action Elaborate_Subprogram
00d7 1d14 | | Execute_Immediate Reference_Lex_1,0x14
00d8 00c7 | | Action Elaborate_Subprogram
00d9 1d15 | | Execute_Immediate Reference_Lex_1,0x15
00da 00c7 | | Action Elaborate_Subprogram
00db 1d16 | | Execute_Immediate Reference_Lex_1,0x16
00dc 00c7 | | Action Elaborate_Subprogram
00dd 1d17 | | Execute_Immediate Reference_Lex_1,0x17
00de 00c7 | | Action Elaborate_Subprogram
00df 1d18 | | Execute_Immediate Reference_Lex_1,0x18
00e0 00c7 | | Action Elaborate_Subprogram
00e1 1d19 | | Execute_Immediate Reference_Lex_1,0x19
00e2 00c7 | | Action Elaborate_Subprogram
00e3 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
00e4 00c7 | | Action Elaborate_Subprogram
00e5 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
00e6 00c7 | | Action Elaborate_Subprogram
00e7 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
00e8 00c7 | | Action Elaborate_Subprogram
00e9 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
00ea 00c7 | | Action Elaborate_Subprogram
00eb 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
00ec 00c7 | | Action Elaborate_Subprogram
00ed 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
00ee 00c7 | | Action Elaborate_Subprogram
00ef 1d20 | | Execute_Immediate Reference_Lex_1,0x20
00f0 00c7 | | Action Elaborate_Subprogram
00f1 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
00f2 00c7 | | Action Elaborate_Subprogram
00f3 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
00f4 00c7 | | Action Elaborate_Subprogram
00f5 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
00f6 00c7 | | Action Elaborate_Subprogram
00f7 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
00f8 00c7 | | Action Elaborate_Subprogram
00f9 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
00fa 00c7 | | Action Elaborate_Subprogram
00fb 1d26 | & | Execute_Immediate Reference_Lex_1,0x26
00fc 00c7 | | Action Elaborate_Subprogram
00fd 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
00fe 00c7 | | Action Elaborate_Subprogram
00ff 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
0100 00c7 | | Action Elaborate_Subprogram
0101 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
0102 00c7 | | Action Elaborate_Subprogram
0103 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
0104 00c7 | | Action Elaborate_Subprogram
0105 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b
0106 00c7 | | Action Elaborate_Subprogram
0107 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
0108 00c7 | | Action Elaborate_Subprogram
0109 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d
010a 00c7 | | Action Elaborate_Subprogram
010b 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
010c 00c7 | | Action Elaborate_Subprogram
010d 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
010e 00c7 | | Action Elaborate_Subprogram
010f 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31
0110 00c7 | | Action Elaborate_Subprogram
0111 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32
0112 00c7 | | Action Elaborate_Subprogram
0113 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
0114 00c7 | | Action Elaborate_Subprogram
0115 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33
0116 00c7 | | Action Elaborate_Subprogram
0117 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34
0118 00c7 | | Action Elaborate_Subprogram
0119 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35
011a 00c7 | | Action Elaborate_Subprogram
011b 1d36 | 6 | Execute_Immediate Reference_Lex_1,0x36
011c 00c7 | | Action Elaborate_Subprogram
011d 1d37 | 7 | Execute_Immediate Reference_Lex_1,0x37
011e 00c7 | | Action Elaborate_Subprogram
011f 1d38 | 8 | Execute_Immediate Reference_Lex_1,0x38
0120 00c7 | | Action Elaborate_Subprogram
0121 029d 0f8b | | Declare_Subprogram INIT_0f88,For_Outer_Call
0123 1d39 | 9 | Execute_Immediate Reference_Lex_1,0x39
0124 00c7 | | Action Elaborate_Subprogram
0125 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a
0126 00c7 | | Action Elaborate_Subprogram
0127 1d3b | ; | Execute_Immediate Reference_Lex_1,0x3b
0128 00c7 | | Action Elaborate_Subprogram
0129 1d3c | < | Execute_Immediate Reference_Lex_1,0x3c
012a 00c7 | | Action Elaborate_Subprogram
012b 1d3d | = | Execute_Immediate Reference_Lex_1,0x3d
012c 00c7 | | Action Elaborate_Subprogram
012d 1d3e | > | Execute_Immediate Reference_Lex_1,0x3e
012e 00c7 | | Action Elaborate_Subprogram
012f 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f
0130 00c7 | | Action Elaborate_Subprogram
0131 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40
0132 00c7 | | Action Elaborate_Subprogram
0133 1d42 | B | Execute_Immediate Reference_Lex_1,0x42
0134 00c7 | | Action Elaborate_Subprogram
0135 1d41 | A | Execute_Immediate Reference_Lex_1,0x41
0136 00c7 | | Action Elaborate_Subprogram
0137 1d43 | C | Execute_Immediate Reference_Lex_1,0x43
0138 00c7 | | Action Elaborate_Subprogram
0139 1d44 | D | Execute_Immediate Reference_Lex_1,0x44
013a 00c7 | | Action Elaborate_Subprogram
013b 1d45 | E | Execute_Immediate Reference_Lex_1,0x45
013c 00c7 | | Action Elaborate_Subprogram
013d 1d46 | F | Execute_Immediate Reference_Lex_1,0x46
013e 00c7 | | Action Elaborate_Subprogram
013f 1d47 | G | Execute_Immediate Reference_Lex_1,0x47
0140 00c7 | | Action Elaborate_Subprogram
0141 1d48 | H | Execute_Immediate Reference_Lex_1,0x48
0142 00c7 | | Action Elaborate_Subprogram
0143 1d49 | I | Execute_Immediate Reference_Lex_1,0x49
0144 00c7 | | Action Elaborate_Subprogram
0145 1d4a | J | Execute_Immediate Reference_Lex_1,0x4a
0146 00c7 | | Action Elaborate_Subprogram
0147 1d4b | K | Execute_Immediate Reference_Lex_1,0x4b
0148 00c7 | | Action Elaborate_Subprogram
0149 1d4c | L | Execute_Immediate Reference_Lex_1,0x4c
014a 00c7 | | Action Elaborate_Subprogram
014b 1d4d | M | Execute_Immediate Reference_Lex_1,0x4d
014c 00c7 | | Action Elaborate_Subprogram
014d 1d4e | N | Execute_Immediate Reference_Lex_1,0x4e
014e 00c7 | | Action Elaborate_Subprogram
014f BODY_0008:
014f e24f | O | Load 0x1,0x4f
0150 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0151 e24f | O | Load 0x1,0x4f
0152 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0153 c250 | P | Store 0x1,0x50
0154 00bc | | Action Signal_Activated
0155 00bb | | Action Signal_Completion
0156 0000 0000 | | .XXX[0x2]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 0163 | c | .CONST 0x0163 ; Address of begin
0159 0004 | | .CONST 0x0004 ; Address of exception handler
015a 0004 | | .CONST 0x0004 ; Number of locals
015b INIT_0158:
015b e5ff | | Load 0x2,-0x1
015c e011 | | Load 0x0,0x11
015d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
015e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
015f e011 | | Load 0x0,0x11
0160 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0161 029f 100b | | Declare_Subprogram INIT_1008,For_Call
0163 BODY_0158:
0163 e402 | | Load 0x2,0x2
0164 8404 | | Call 0x2,0x4
0165 e403 | | Load 0x2,0x3
0166 e015 | | Load 0x0,0x15
0167 180f | | Execute Package,Field_Execute,Field_Number 0xf
0168 e403 | | Load 0x2,0x3
0169 e011 | | Load 0x0,0x11
016a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
016b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
016c c403 | | Store 0x2,0x3
016d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
016e 0000 0000 | | .XXX[0x2]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0173 | s | .CONST 0x0173 ; Address of begin
0171 0004 | | .CONST 0x0004 ; Address of exception handler
0172 0001 | | .CONST 0x0001 ; Number of locals
0173 BODY_0170:
0173 INIT_0170:
0173 4801 |H | Short_Literal 0x1
0174 c016 | | Store 0x0,0x16
0175 4801 |H | Short_Literal 0x1
0176 a251 | Q | Store_Unchecked 0x1,0x51
0177 4801 |H | Short_Literal 0x1
0178 e017 | | Load 0x0,0x17
0179 3829 |8) | Execute Record,Field_Write,Field_Number 0x29
017a e018 | | Load 0x0,0x18
017b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
017c 0f02 | | Execute_Immediate Equal,0x2
017d 6803 |h | Jump_Zero 0x181
017e e019 | | Load 0x0,0x19
017f e018 | | Load 0x0,0x18
0180 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0181 4800 |H | Short_Literal 0x0
0182 4800 |H | Short_Literal 0x0
0183 4801 |H | Short_Literal 0x1
0184 4800 |H | Short_Literal 0x0
0185 4800 |H | Short_Literal 0x0
0186 4801 |H | Short_Literal 0x1
0187 e5ff | | Load 0x2,-0x1
0188 4802 |H | Short_Literal 0x2
0189 8263 | c | Call 0x1,0x63
018a 4502 |E | Exit_Suprogram New_Top_Offset 0x2
018b 0000 0000 | | .BLANK 0000[0x5]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 019e | | .CONST 0x019e ; Address of begin
0191 0004 | | .CONST 0x0004 ; Address of exception handler
0192 0003 | | .CONST 0x0003 ; Number of locals
0193 INIT_0190:
0193 e011 | | Load 0x0,0x11
0194 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0195 4820 |H | Short_Literal 0x20
0196 e5ff | | Load 0x2,-0x1
0197 e011 | | Load 0x0,0x11
0198 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0199 1816 | | Execute Package,Field_Execute,Field_Number 0x16
019a e01a | | Load 0x0,0x1a
019b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
019c e01a | | Load 0x0,0x1a
019d 181c | | Execute Package,Field_Execute,Field_Number 0x1c
019e BODY_0190:
019e 00d8 | | Load_Top At_Offset_0
019f 01db | | Execute Vector,Length
01a0 0c01 | | Execute_Immediate Greater_Equal,0x1
01a1 6813 |h | Jump_Zero 0x1b5
01a2 00d8 | | Load_Top At_Offset_0
01a3 01dc | | Execute Vector,Last
01a4 e403 | | Load 0x2,0x3
01a5 01d7 | | Execute Vector,Field_Read
01a6 4861 |Ha | Short_Literal 0x61
01a7 487a |Hz | Short_Literal 0x7a
01a8 0262 | b | Execute Discrete,In_Range
01a9 6804 |h | Jump_Zero 0x1ae
01aa 00d8 | | Load_Top At_Offset_0
01ab 801b | | Call 0x0,0x1b
01ac a402 | | Store_Unchecked 0x2,0x2
01ad 7816 |x | Jump 0x1c4
01ae 00d8 | | Load_Top At_Offset_0
01af 0092 13ac | | Action Push_String_Extended,0x13ac ; "lines"
01b1 01cc | | Execute Vector,Catenate
01b2 801b | | Call 0x0,0x1b
01b3 a402 | | Store_Unchecked 0x2,0x2
01b4 780f |x | Jump 0x1c4
01b5 0092 13ad | | Action Push_String_Extended,0x13ad ; "'"
01b7 e5ff | | Load 0x2,-0x1
01b8 e011 | | Load 0x0,0x11
01b9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ba 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01bb 01cc | | Execute Vector,Catenate
01bc 0092 13ae | | Action Push_String_Extended,0x13ae ; "' isn't a number. 1 assumed"
01be 01cc | | Execute Vector,Catenate
01bf e01c | | Load 0x0,0x1c
01c0 180e | | Execute Package,Field_Execute,Field_Number 0xe
01c1 e01d | | Load 0x0,0x1d
01c2 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
01c3 a402 | | Store_Unchecked 0x2,0x2
01c4 e402 | | Load 0x2,0x2
01c5 600e |` | Indirect_Literal Discrete,0x1d4,{0x00000000, 0x00dbba00}
01c6 027d | } | Execute Discrete,Greater
01c7 6802 |h | Jump_Zero 0x1ca
01c8 600b |` | Indirect_Literal Discrete,0x1d4,{0x00000000, 0x00dbba00}
01c9 a402 | | Store_Unchecked 0x2,0x2
01ca e015 | | Load 0x0,0x15
01cb 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01cc 4801 |H | Short_Literal 0x1
01cd 4800 |H | Short_Literal 0x0
01ce e402 | | Load 0x2,0x2
01cf e01e | | Load 0x0,0x1e
01d0 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01d1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01d2 0000 0000 | | .XXX[0x2]
01d4 0000 0000 | | .LITERAL {0x00000000, 0x00dbba00}
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01db | | .CONST 0x01db ; Address of begin
01d9 0004 | | .CONST 0x0004 ; Address of exception handler
01da 0001 | | .CONST 0x0001 ; Number of locals
01db BODY_01d8:
01db INIT_01d8:
01db 4801 |H | Short_Literal 0x1
01dc a251 | Q | Store_Unchecked 0x1,0x51
01dd 4800 |H | Short_Literal 0x0
01de 4800 |H | Short_Literal 0x0
01df 4801 |H | Short_Literal 0x1
01e0 4800 |H | Short_Literal 0x0
01e1 4800 |H | Short_Literal 0x0
01e2 4801 |H | Short_Literal 0x1
01e3 e5ff | | Load 0x2,-0x1
01e4 4808 |H | Short_Literal 0x8
01e5 8263 | c | Call 0x1,0x63
01e6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01e7 0000 | | .XXX[0x1]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01f2 | | .CONST 0x01f2 ; Address of begin
01e9 0225 | % | .CONST 0x0225 ; Address of exception handler
01ea 0005 | | .CONST 0x0005 ; Number of locals
01eb INIT_01e8:
01eb e011 | | Load 0x0,0x11
01ec 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
01ed e011 | | Load 0x0,0x11
01ee 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
01ef e254 | T | Load 0x1,0x54
01f0 029f 103b | ;| Declare_Subprogram INIT_1038,For_Call
01f2 BODY_01e8:
01f2 8405 | | Call 0x2,0x5
01f3 e5ff | | Load 0x2,-0x1
01f4 e011 | | Load 0x0,0x11
01f5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01f6 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01f7 e254 | T | Load 0x1,0x54
01f8 1c02 | | Execute_Immediate Run_Utility,0x2
01f9 a404 | | Store_Unchecked 0x2,0x4
01fa 4809 |H | Short_Literal 0x9
01fb 801f | | Call 0x0,0x1f
01fc e011 | | Load 0x0,0x11
01fd 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
01fe 0092 13af | | Action Push_String_Extended,0x13af ; "symbol"
0200 e020 | | Load 0x0,0x20
0201 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0202 e021 | ! | Load 0x0,0x21
0203 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0204 00d8 | | Load_Top At_Offset_0
0205 e021 | ! | Load 0x0,0x21
0206 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0207 7003 |p | Jump_Nonzero 0x20b
0208 e022 | " | Load 0x0,0x22
0209 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
020a 0257 | W | Execute Discrete,Raise
020b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
020c c402 | | Store 0x2,0x2
020d e402 | | Load 0x2,0x2
020e 7007 |p | Jump_Nonzero 0x216
020f 0092 13b0 | | Action Push_String_Extended,0x13b0 ; "Symbols font family not available"
0211 e01c | | Load 0x0,0x1c
0212 180e | | Execute Package,Field_Execute,Field_Number 0xe
0213 4820 |H | Short_Literal 0x20
0214 a404 | | Store_Unchecked 0x2,0x4
0215 7803 |x | Jump 0x219
0216 e402 | | Load 0x2,0x2
0217 e01d | | Load 0x0,0x1d
0218 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0219 e404 | | Load 0x2,0x4
021a 00d8 | | Load_Top At_Offset_0
021b e011 | | Load 0x0,0x11
021c 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
021d 0260 | ` | Execute Discrete,In_Type
021e 7001 |p | Jump_Nonzero 0x220
021f 0801 | | Execute_Immediate Raise,0x1
0220 e015 | | Load 0x0,0x15
0221 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0222 4809 |H | Short_Literal 0x9
0223 8023 | # | Call 0x0,0x23
0224 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0225 TRAP_01e8:
0225 010e | | Execute Exception,Is_Constraint_Error
0226 680d |h | Jump_Zero 0x234
0227 0092 13ad | | Action Push_String_Extended,0x13ad ; "'"
0229 e5ff | | Load 0x2,-0x1
022a e011 | | Load 0x0,0x11
022b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
022c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
022d 01cc | | Execute Vector,Catenate
022e 0092 13b1 | | Action Push_String_Extended,0x13b1 ; "' is not a valid character or symbol name"
0230 01cc | | Execute Vector,Catenate
0231 e01c | | Load 0x0,0x1c
0232 180e | | Execute Package,Field_Execute,Field_Number 0xe
0233 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0234 0100 | | Execute Exception,Raise
0235 0000 0000 | | .XXX[0x3]
0237 0000 | |
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023b | ; | .CONST 0x023b ; Address of begin
0239 0004 | | .CONST 0x0004 ; Address of exception handler
023a 0001 | | .CONST 0x0001 ; Number of locals
023b BODY_0238:
023b INIT_0238:
023b 4800 |H | Short_Literal 0x0
023c e01d | | Load 0x0,0x1d
023d 3815 |8 | Execute Record,Field_Write,Field_Number 0x15
023e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
023f 0000 | | .XXX[0x1]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0247 | G | .CONST 0x0247 ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0003 | | .CONST 0x0003 ; Number of locals
0243 INIT_0240:
0243 e024 | $ | Load 0x0,0x24
0244 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
0245 e025 | % | Load 0x0,0x25
0246 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0247 BODY_0240:
0247 e5ff | | Load 0x2,-0x1
0248 e011 | | Load 0x0,0x11
0249 1b0d | | Execute Package,Field_Read,Field_Number 0xd
024a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
024b e024 | $ | Load 0x0,0x24
024c 1820 | | Execute Package,Field_Execute,Field_Number 0x20
024d a402 | | Store_Unchecked 0x2,0x2
024e e402 | | Load 0x2,0x2
024f e024 | $ | Load 0x0,0x24
0250 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0251 e5ff | | Load 0x2,-0x1
0252 e011 | | Load 0x0,0x11
0253 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0254 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0255 0e00 | | Execute_Immediate Not_Equal,0x0
0256 0279 | y | Execute Discrete,And
0257 6805 |h | Jump_Zero 0x25d
0258 0092 13b2 | | Action Push_String_Extended,0x13b2 ; "Argument to Close was unrecognizable"
025a e01c | | Load 0x0,0x1c
025b 180e | | Execute Package,Field_Execute,Field_Number 0xe
025c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
025d 00cf | | Action Mark_Auxiliary
025e 782a |x* | Jump 0x289
025f 4800 |H | Short_Literal 0x0
0260 e402 | | Load 0x2,0x2
0261 e024 | $ | Load 0x0,0x24
0262 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0263 6817 |h | Jump_Zero 0x27b
0264 e402 | | Load 0x2,0x2
0265 e024 | $ | Load 0x0,0x24
0266 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0267 681c |h | Jump_Zero 0x284
0268 4800 |H | Short_Literal 0x0
0269 4801 |H | Short_Literal 0x1
026a 4800 |H | Short_Literal 0x0
026b e402 | | Load 0x2,0x2
026c e026 | & | Load 0x0,0x26
026d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
026e a403 | | Store_Unchecked 0x2,0x3
026f e403 | | Load 0x2,0x3
0270 7013 |p | Jump_Nonzero 0x284
0271 0092 13b3 | | Action Push_String_Extended,0x13b3 ; "Close File"
0273 4800 |H | Short_Literal 0x0
0274 e402 | | Load 0x2,0x2
0275 e024 | $ | Load 0x0,0x24
0276 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0277 01cc | | Execute Vector,Catenate
0278 e01c | | Load 0x0,0x1c
0279 180e | | Execute Package,Field_Execute,Field_Number 0xe
027a 4502 |E | Exit_Suprogram New_Top_Offset 0x2
027b 0092 13b4 | | Action Push_String_Extended,0x13b4 ; "Close"
027d 4800 |H | Short_Literal 0x0
027e e402 | | Load 0x2,0x2
027f e024 | $ | Load 0x0,0x24
0280 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0281 01cc | | Execute Vector,Catenate
0282 e01c | | Load 0x0,0x1c
0283 180e | | Execute Package,Field_Execute,Field_Number 0xe
0284 e402 | | Load 0x2,0x2
0285 e024 | $ | Load 0x0,0x24
0286 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0287 c402 | | Store 0x2,0x2
0288 00c9 | | Action Pop_Auxiliary_Loop
0289 e402 | | Load 0x2,0x2
028a e024 | $ | Load 0x0,0x24
028b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
028c 6fd2 |o | Jump_Zero 0x25f
028d 00ce | | Action Pop_Auxiliary
028e 00d8 | | Load_Top At_Offset_0
028f 7005 |p | Jump_Nonzero 0x295
0290 0092 13b5 | | Action Push_String_Extended,0x13b5 ; "Close missing File argument"
0292 e01c | | Load 0x0,0x1c
0293 180e | | Execute Package,Field_Execute,Field_Number 0xe
0294 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0295 00d8 | | Load_Top At_Offset_0
0296 e027 | ' | Load 0x0,0x27
0297 01d7 | | Execute Vector,Field_Read
0298 e028 | ( | Load 0x0,0x28
0299 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
029a 680c |h | Jump_Zero 0x2a7
029b e027 | ' | Load 0x0,0x27
029c e403 | | Load 0x2,0x3
029d 00d8 | | Load_Top At_Offset_0
029e e404 | | Load 0x2,0x4
029f 01d7 | | Execute Vector,Field_Read
02a0 e028 | ( | Load 0x0,0x28
02a1 181b | | Execute Package,Field_Execute,Field_Number 0x1b
02a2 e405 | | Load 0x2,0x5
02a3 e404 | | Load 0x2,0x4
02a4 01d6 | | Execute Vector,Field_Write
02a5 00d2 | | Pop_Control Pop_Count_2
02a6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
02a7 00d8 | | Load_Top At_Offset_0
02a8 e025 | % | Load 0x0,0x25
02a9 011c | | Execute Any,Convert_Unchecked
02aa 1c01 | | Execute_Immediate Run_Utility,0x1
02ab 0092 13b6 | | Action Push_String_Extended,0x13b6 ; " is not open"
02ad 01cc | | Execute Vector,Catenate
02ae e01c | | Load 0x0,0x1c
02af 180f | | Execute Package,Field_Execute,Field_Number 0xf
02b0 4502 |E | Exit_Suprogram New_Top_Offset 0x2
02b1 0000 0000 | | .BLANK 0000[0x7]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02c5 | | .CONST 0x02c5 ; Address of begin
02b9 0004 | | .CONST 0x0004 ; Address of exception handler
02ba 0006 | | .CONST 0x0006 ; Number of locals
02bb INIT_02b8:
02bb e029 | ) | Load 0x0,0x29
02bc 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
02bd e025 | % | Load 0x0,0x25
02be 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
02bf e011 | | Load 0x0,0x11
02c0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02c1 00e1 | | Load_Encached Boolean_Cache
02c2 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
02c3 029f 104b | K| Declare_Subprogram INIT_1048,For_Call
02c5 BODY_02b8:
02c5 e5ff | | Load 0x2,-0x1
02c6 e011 | | Load 0x0,0x11
02c7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02c8 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02c9 e029 | ) | Load 0x0,0x29
02ca 1820 | | Execute Package,Field_Execute,Field_Number 0x20
02cb a402 | | Store_Unchecked 0x2,0x2
02cc e402 | | Load 0x2,0x2
02cd e029 | ) | Load 0x0,0x29
02ce 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
02cf e5ff | | Load 0x2,-0x1
02d0 e011 | | Load 0x0,0x11
02d1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02d2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02d3 0e00 | | Execute_Immediate Not_Equal,0x0
02d4 0279 | y | Execute Discrete,And
02d5 6805 |h | Jump_Zero 0x2db
02d6 0092 13b7 | | Action Push_String_Extended,0x13b7 ; "Argument to Create was unrecognizable"
02d8 e01c | | Load 0x0,0x1c
02d9 180e | | Execute Package,Field_Execute,Field_Number 0xe
02da 4502 |E | Exit_Suprogram New_Top_Offset 0x2
02db 00cf | | Action Mark_Auxiliary
02dc 7839 |x9 | Jump 0x316
02dd 4800 |H | Short_Literal 0x0
02de e402 | | Load 0x2,0x2
02df e029 | ) | Load 0x0,0x29
02e0 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
02e1 6826 |h& | Jump_Zero 0x308
02e2 e402 | | Load 0x2,0x2
02e3 e029 | ) | Load 0x0,0x29
02e4 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
02e5 4602 |F | Jump_Case 0x3
02e6 782a |x* | Jump 0x311 ; case 0x0
02e7 780d |x | Jump 0x2f5 ; case 0x1
02e8 7800 |x | Jump 0x2e9 ; case 0x2
02e9 4801 |H | Short_Literal 0x1
02ea a405 | | Store_Unchecked 0x2,0x5
02eb 00ea | | Load_Encached Null_String_Cache
02ec 4800 |H | Short_Literal 0x0
02ed e402 | | Load 0x2,0x2
02ee e029 | ) | Load 0x0,0x29
02ef 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
02f0 e011 | | Load 0x0,0x11
02f1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02f2 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02f3 a404 | | Store_Unchecked 0x2,0x4
02f4 781c |x | Jump 0x311
02f5 4800 |H | Short_Literal 0x0
02f6 4801 |H | Short_Literal 0x1
02f7 4800 |H | Short_Literal 0x0
02f8 e402 | | Load 0x2,0x2
02f9 e02a | * | Load 0x0,0x2a
02fa 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02fb a403 | | Store_Unchecked 0x2,0x3
02fc e403 | | Load 0x2,0x3
02fd 7013 |p | Jump_Nonzero 0x311
02fe 0092 13b8 | | Action Push_String_Extended,0x13b8 ; "Create File"
0300 4800 |H | Short_Literal 0x0
0301 e402 | | Load 0x2,0x2
0302 e029 | ) | Load 0x0,0x29
0303 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0304 01cc | | Execute Vector,Catenate
0305 e01c | | Load 0x0,0x1c
0306 180e | | Execute Package,Field_Execute,Field_Number 0xe
0307 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0308 0092 13b9 | | Action Push_String_Extended,0x13b9 ; "Create"
030a 4800 |H | Short_Literal 0x0
030b e402 | | Load 0x2,0x2
030c e029 | ) | Load 0x0,0x29
030d 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
030e 01cc | | Execute Vector,Catenate
030f e01c | | Load 0x0,0x1c
0310 180e | | Execute Package,Field_Execute,Field_Number 0xe
0311 e402 | | Load 0x2,0x2
0312 e029 | ) | Load 0x0,0x29
0313 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0314 c402 | | Store 0x2,0x2
0315 00c9 | | Action Pop_Auxiliary_Loop
0316 e402 | | Load 0x2,0x2
0317 e029 | ) | Load 0x0,0x29
0318 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0319 6fc3 |o | Jump_Zero 0x2dd
031a 00ce | | Action Pop_Auxiliary
031b e403 | | Load 0x2,0x3
031c 7005 |p | Jump_Nonzero 0x322
031d 0092 13ba | | Action Push_String_Extended,0x13ba ; "Create missing File argument"
031f e01c | | Load 0x0,0x1c
0320 180e | | Execute Package,Field_Execute,Field_Number 0xe
0321 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0322 e403 | | Load 0x2,0x3
0323 e027 | ' | Load 0x0,0x27
0324 01d7 | | Execute Vector,Field_Read
0325 e028 | ( | Load 0x0,0x28
0326 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0327 6810 |h | Jump_Zero 0x338
0328 e403 | | Load 0x2,0x3
0329 e025 | % | Load 0x0,0x25
032a 011c | | Execute Any,Convert_Unchecked
032b 1c01 | | Execute_Immediate Run_Utility,0x1
032c 0092 13bb | | Action Push_String_Extended,0x13bb ; " is already open to "
032e 01cc | | Execute Vector,Catenate
032f e403 | | Load 0x2,0x3
0330 e027 | ' | Load 0x0,0x27
0331 01d7 | | Execute Vector,Field_Read
0332 e028 | ( | Load 0x0,0x28
0333 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0334 01cc | | Execute Vector,Catenate
0335 e01c | | Load 0x0,0x1c
0336 180e | | Execute Package,Field_Execute,Field_Number 0xe
0337 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0338 e405 | | Load 0x2,0x5
0339 6806 |h | Jump_Zero 0x340
033a e404 | | Load 0x2,0x4
033b e011 | | Load 0x0,0x11
033c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
033d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
033e 8406 | | Call 0x2,0x6
033f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0340 e403 | | Load 0x2,0x3
0341 e025 | % | Load 0x0,0x25
0342 011c | | Execute Any,Convert_Unchecked
0343 1c01 | | Execute_Immediate Run_Utility,0x1
0344 8406 | | Call 0x2,0x6
0345 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0346 0000 0000 | | .XXX[0x2]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 034b | K | .CONST 0x034b ; Address of begin
0349 0004 | | .CONST 0x0004 ; Address of exception handler
034a 0001 | | .CONST 0x0001 ; Number of locals
034b BODY_0348:
034b INIT_0348:
034b e5ff | | Load 0x2,-0x1
034c e011 | | Load 0x0,0x11
034d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
034e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
034f e020 | | Load 0x0,0x20
0350 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0351 e021 | ! | Load 0x0,0x21
0352 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0353 00d8 | | Load_Top At_Offset_0
0354 e021 | ! | Load 0x0,0x21
0355 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0356 7003 |p | Jump_Nonzero 0x35a
0357 e022 | " | Load 0x0,0x22
0358 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0359 0257 | W | Execute Discrete,Raise
035a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
035b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
035c 0000 0000 | | .BLANK 0000[0x4]
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 0363 | c | .CONST 0x0363 ; Address of begin
0361 0004 | | .CONST 0x0004 ; Address of exception handler
0362 0001 | | .CONST 0x0001 ; Number of locals
0363 BODY_0360:
0363 INIT_0360:
0363 e5ff | | Load 0x2,-0x1
0364 e011 | | Load 0x0,0x11
0365 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0366 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0367 e020 | | Load 0x0,0x20
0368 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0369 e021 | ! | Load 0x0,0x21
036a 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
036b 00d8 | | Load_Top At_Offset_0
036c e021 | ! | Load 0x0,0x21
036d 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
036e 7003 |p | Jump_Nonzero 0x372
036f e022 | " | Load 0x0,0x22
0370 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0371 0257 | W | Execute Discrete,Raise
0372 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0373 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0374 0000 0000 | | .BLANK 0000[0x4]
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 037e | ~ | .CONST 0x037e ; Address of begin
0379 0004 | | .CONST 0x0004 ; Address of exception handler
037a 0003 | | .CONST 0x0003 ; Number of locals
037b INIT_0378:
037b e011 | | Load 0x0,0x11
037c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
037d 00e1 | | Load_Encached Boolean_Cache
037e BODY_0378:
037e 00e1 | | Load_Encached Boolean_Cache
037f e402 | | Load 0x2,0x2
0380 e5ff | | Load 0x2,-0x1
0381 e250 | P | Load 0x1,0x50
0382 e24f | O | Load 0x1,0x4f
0383 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0384 c402 | | Store 0x2,0x2
0385 c403 | | Store 0x2,0x3
0386 00d8 | | Load_Top At_Offset_0
0387 700a |p | Jump_Nonzero 0x392
0388 0092 13bc | | Action Push_String_Extended,0x13bc ; "String Macro '"
038a e5ff | | Load 0x2,-0x1
038b 01cc | | Execute Vector,Catenate
038c 0092 13bd | | Action Push_String_Extended,0x13bd ; "' is undefined"
038e 01cc | | Execute Vector,Catenate
038f e01c | | Load 0x0,0x1c
0390 180e | | Execute Package,Field_Execute,Field_Number 0xe
0391 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0392 e402 | | Load 0x2,0x2
0393 e015 | | Load 0x0,0x15
0394 180f | | Execute Package,Field_Execute,Field_Number 0xf
0395 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0396 0000 0000 | | .XXX[0x2]
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 03a0 | | .CONST 0x03a0 ; Address of begin
0399 0004 | | .CONST 0x0004 ; Address of exception handler
039a 0004 | | .CONST 0x0004 ; Number of locals
039b INIT_0398:
039b e011 | | Load 0x0,0x11
039c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
039d 00e1 | | Load_Encached Boolean_Cache
039e 029f 109b | | Declare_Subprogram INIT_1098,For_Call
03a0 BODY_0398:
03a0 00e1 | | Load_Encached Boolean_Cache
03a1 e402 | | Load 0x2,0x2
03a2 e5ff | | Load 0x2,-0x1
03a3 e250 | P | Load 0x1,0x50
03a4 e24f | O | Load 0x1,0x4f
03a5 1814 | | Execute Package,Field_Execute,Field_Number 0x14
03a6 c402 | | Store 0x2,0x2
03a7 c403 | | Store 0x2,0x3
03a8 e403 | | Load 0x2,0x3
03a9 700a |p | Jump_Nonzero 0x3b4
03aa 0092 13be | | Action Push_String_Extended,0x13be ; "Macro '"
03ac e5ff | | Load 0x2,-0x1
03ad 01cc | | Execute Vector,Catenate
03ae 0092 13bd | | Action Push_String_Extended,0x13bd ; "' is undefined"
03b0 01cc | | Execute Vector,Catenate
03b1 e01c | | Load 0x0,0x1c
03b2 180e | | Execute Package,Field_Execute,Field_Number 0xe
03b3 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03b4 8404 | | Call 0x2,0x4
03b5 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03b6 0000 0000 | | .XXX[0x2]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bb | | .CONST 0x03bb ; Address of begin
03b9 0004 | | .CONST 0x0004 ; Address of exception handler
03ba 0001 | | .CONST 0x0001 ; Number of locals
03bb BODY_03b8:
03bb INIT_03b8:
03bb e02b | + | Load 0x0,0x2b
03bc 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
03bd 7005 |p | Jump_Nonzero 0x3c3
03be 0092 13bf | | Action Push_String_Extended,0x13bf ; "End_Ip encountered with no matching Start_Ip"
03c0 e01c | | Load 0x0,0x1c
03c1 180e | | Execute Package,Field_Execute,Field_Number 0xe
03c2 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03c3 e5ff | | Load 0x2,-0x1
03c4 6802 |h | Jump_Zero 0x3c7
03c5 e5fe | | Load 0x2,-0x2
03c6 8023 | # | Call 0x0,0x23
03c7 e02b | + | Load 0x0,0x2b
03c8 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
03c9 0aff | | Execute_Immediate Plus,-0x1
03ca e02b | + | Load 0x0,0x2b
03cb 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
03cc 4800 |H | Short_Literal 0x0
03cd e02c | , | Load 0x0,0x2c
03ce 1820 | | Execute Package,Field_Execute,Field_Number 0x20
03cf e015 | | Load 0x0,0x15
03d0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03d1 4800 |H | Short_Literal 0x0
03d2 a253 | S | Store_Unchecked 0x1,0x53
03d3 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03d4 0000 0000 | | .BLANK 0000[0x4]
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03db | | .CONST 0x03db ; Address of begin
03d9 0004 | | .CONST 0x0004 ; Address of exception handler
03da 0001 | | .CONST 0x0001 ; Number of locals
03db BODY_03d8:
03db INIT_03d8:
03db e02d | - | Load 0x0,0x2d
03dc 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
03dd 7005 |p | Jump_Nonzero 0x3e3
03de 0092 13c0 | | Action Push_String_Extended,0x13c0 ; "End_Np encountered with no matching Start_Np"
03e0 e01c | | Load 0x0,0x1c
03e1 180e | | Execute Package,Field_Execute,Field_Number 0xe
03e2 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03e3 e5ff | | Load 0x2,-0x1
03e4 6802 |h | Jump_Zero 0x3e7
03e5 e5fe | | Load 0x2,-0x2
03e6 8023 | # | Call 0x0,0x23
03e7 e02d | - | Load 0x0,0x2d
03e8 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
03e9 0aff | | Execute_Immediate Plus,-0x1
03ea e02d | - | Load 0x0,0x2d
03eb 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
03ec 4800 |H | Short_Literal 0x0
03ed e02c | , | Load 0x0,0x2c
03ee 1820 | | Execute Package,Field_Execute,Field_Number 0x20
03ef e015 | | Load 0x0,0x15
03f0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03f1 4800 |H | Short_Literal 0x0
03f2 a253 | S | Store_Unchecked 0x1,0x53
03f3 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03f4 0000 0000 | | .BLANK 0000[0x4]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 03fd | | .CONST 0x03fd ; Address of begin
03f9 0004 | | .CONST 0x0004 ; Address of exception handler
03fa 0002 | | .CONST 0x0002 ; Number of locals
03fb INIT_03f8:
03fb e011 | | Load 0x0,0x11
03fc 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03fd BODY_03f8:
03fd 4801 |H | Short_Literal 0x1
03fe e5ff | | Load 0x2,-0x1
03ff e011 | | Load 0x0,0x11
0400 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0401 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0402 8264 | d | Call 0x1,0x64
0403 e011 | | Load 0x0,0x11
0404 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0405 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0406 a402 | | Store_Unchecked 0x2,0x2
0407 00d8 | | Load_Top At_Offset_0
0408 e015 | | Load 0x0,0x15
0409 180f | | Execute Package,Field_Execute,Field_Number 0xf
040a 00d8 | | Load_Top At_Offset_0
040b e011 | | Load 0x0,0x11
040c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
040d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
040e c402 | | Store 0x2,0x2
040f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0410 ; --------------------------------------------------------------------------------------
0410 ; SUBPROGRAM
0410 ; --------------------------------------------------------------------------------------
0410 0415 | | .CONST 0x0415 ; Address of begin
0411 0004 | | .CONST 0x0004 ; Address of exception handler
0412 0002 | | .CONST 0x0002 ; Number of locals
0413 INIT_0410:
0413 e011 | | Load 0x0,0x11
0414 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0415 BODY_0410:
0415 e02e | . | Load 0x0,0x2e
0416 700b |p | Jump_Nonzero 0x422
0417 e02f | / | Load 0x0,0x2f
0418 e017 | | Load 0x0,0x17
0419 3c19 |< | Execute Record,Field_Read,Field_Number 0x19
041a e017 | | Load 0x0,0x17
041b 3c16 |< | Execute Record,Field_Read,Field_Number 0x16
041c 0273 | s | Execute Discrete,Plus
041d 0272 | r | Execute Discrete,Minus
041e c02f | / | Store 0x0,0x2f
041f 4801 |H | Short_Literal 0x1
0420 c02e | . | Store 0x0,0x2e
0421 7805 |x | Jump 0x427
0422 e02f | / | Load 0x0,0x2f
0423 e017 | | Load 0x0,0x17
0424 3c1a |< | Execute Record,Field_Read,Field_Number 0x1a
0425 0272 | r | Execute Discrete,Minus
0426 c02f | / | Store 0x0,0x2f
0427 481d |H | Short_Literal 0x1d
0428 e030 | 0 | Load 0x0,0x30
0429 8031 | 1 | Call 0x0,0x31
042a e017 | | Load 0x0,0x17
042b 3c14 |< | Execute Record,Field_Read,Field_Number 0x14
042c e020 | | Load 0x0,0x20
042d 1b12 | | Execute Package,Field_Read,Field_Number 0x12
042e e021 | ! | Load 0x0,0x21
042f 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0430 00d8 | | Load_Top At_Offset_0
0431 e021 | ! | Load 0x0,0x21
0432 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0433 7003 |p | Jump_Nonzero 0x437
0434 e022 | " | Load 0x0,0x22
0435 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0436 0257 | W | Execute Discrete,Raise
0437 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0438 e01d | | Load 0x0,0x1d
0439 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
043a e01d | | Load 0x0,0x1d
043b 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
043c 0a02 | | Execute_Immediate Plus,0x2
043d 4be8 |K | Short_Literal 0x3e8
043e 0271 | q | Execute Discrete,Times
043f e011 | | Load 0x0,0x11
0440 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0441 00d9 | | Load_Top At_Offset_1
0442 00d0 | | Action Swap_Control
0443 0260 | ` | Execute Discrete,In_Type
0444 7001 |p | Jump_Nonzero 0x446
0445 0801 | | Execute_Immediate Raise,0x1
0446 e020 | | Load 0x0,0x20
0447 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0448 e021 | ! | Load 0x0,0x21
0449 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
044a 00d8 | | Load_Top At_Offset_0
044b e021 | ! | Load 0x0,0x21
044c 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
044d 7003 |p | Jump_Nonzero 0x451
044e e022 | " | Load 0x0,0x22
044f 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0450 0257 | W | Execute Discrete,Raise
0451 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0452 e01d | | Load 0x0,0x1d
0453 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0454 e032 | 2 | Load 0x0,0x32
0455 4801 |H | Short_Literal 0x1
0456 e033 | 3 | Load 0x0,0x33
0457 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0458 00d1 | | Pop_Control Pop_Count_1
0459 00d8 | | Load_Top At_Offset_0
045a e032 | 2 | Load 0x0,0x32
045b e033 | 3 | Load 0x0,0x33
045c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
045d 00d1 | | Pop_Control Pop_Count_1
045e c402 | | Store 0x2,0x2
045f e017 | | Load 0x0,0x17
0460 3c1b |< | Execute Record,Field_Read,Field_Number 0x1b
0461 0275 | u | Execute Discrete,Unary_Minus
0462 e02c | , | Load 0x0,0x2c
0463 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0464 00d8 | | Load_Top At_Offset_0
0465 e015 | | Load 0x0,0x15
0466 180f | | Execute Package,Field_Execute,Field_Number 0xf
0467 e017 | | Load 0x0,0x17
0468 3c1b |< | Execute Record,Field_Read,Field_Number 0x1b
0469 e02c | , | Load 0x0,0x2c
046a 181f | | Execute Package,Field_Execute,Field_Number 0x1f
046b e017 | | Load 0x0,0x17
046c 3c14 |< | Execute Record,Field_Read,Field_Number 0x14
046d e020 | | Load 0x0,0x20
046e 1b12 | | Execute Package,Field_Read,Field_Number 0x12
046f e021 | ! | Load 0x0,0x21
0470 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0471 00d8 | | Load_Top At_Offset_0
0472 e021 | ! | Load 0x0,0x21
0473 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0474 7003 |p | Jump_Nonzero 0x478
0475 e022 | " | Load 0x0,0x22
0476 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0477 0257 | W | Execute Discrete,Raise
0478 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0479 e01d | | Load 0x0,0x1d
047a 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
047b e01d | | Load 0x0,0x1d
047c 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
047d 0a02 | | Execute_Immediate Plus,0x2
047e 4be8 |K | Short_Literal 0x3e8
047f 0271 | q | Execute Discrete,Times
0480 e011 | | Load 0x0,0x11
0481 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0482 00d9 | | Load_Top At_Offset_1
0483 00d0 | | Action Swap_Control
0484 0260 | ` | Execute Discrete,In_Type
0485 7001 |p | Jump_Nonzero 0x487
0486 0801 | | Execute_Immediate Raise,0x1
0487 e020 | | Load 0x0,0x20
0488 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0489 e021 | ! | Load 0x0,0x21
048a 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
048b 00d8 | | Load_Top At_Offset_0
048c e021 | ! | Load 0x0,0x21
048d 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
048e 7003 |p | Jump_Nonzero 0x492
048f e022 | " | Load 0x0,0x22
0490 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0491 0257 | W | Execute Discrete,Raise
0492 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0493 e01d | | Load 0x0,0x1d
0494 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0495 e01d | | Load 0x0,0x1d
0496 3c17 |< | Execute Record,Field_Read,Field_Number 0x17
0497 e017 | | Load 0x0,0x17
0498 3c15 |< | Execute Record,Field_Read,Field_Number 0x15
0499 0272 | r | Execute Discrete,Minus
049a e01d | | Load 0x0,0x1d
049b 3817 |8 | Execute Record,Field_Write,Field_Number 0x17
049c e02c | , | Load 0x0,0x2c
049d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
049e e017 | | Load 0x0,0x17
049f 3c1b |< | Execute Record,Field_Read,Field_Number 0x1b
04a0 0275 | u | Execute Discrete,Unary_Minus
04a1 e02c | , | Load 0x0,0x2c
04a2 181f | | Execute Package,Field_Execute,Field_Number 0x1f
04a3 00d8 | | Load_Top At_Offset_0
04a4 e015 | | Load 0x0,0x15
04a5 180f | | Execute Package,Field_Execute,Field_Number 0xf
04a6 00d8 | | Load_Top At_Offset_0
04a7 e011 | | Load 0x0,0x11
04a8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04a9 1812 | | Execute Package,Field_Execute,Field_Number 0x12
04aa c402 | | Store 0x2,0x2
04ab e017 | | Load 0x0,0x17
04ac 3c1b |< | Execute Record,Field_Read,Field_Number 0x1b
04ad e02c | , | Load 0x0,0x2c
04ae 181f | | Execute Package,Field_Execute,Field_Number 0x1f
04af e5ff | | Load 0x2,-0x1
04b0 e015 | | Load 0x0,0x15
04b1 180f | | Execute Package,Field_Execute,Field_Number 0xf
04b2 4801 |H | Short_Literal 0x1
04b3 4800 |H | Short_Literal 0x0
04b4 4800 |H | Short_Literal 0x0
04b5 e01e | | Load 0x0,0x1e
04b6 1818 | | Execute Package,Field_Execute,Field_Number 0x18
04b7 e034 | 4 | Load 0x0,0x34
04b8 0a01 | | Execute_Immediate Plus,0x1
04b9 c034 | 4 | Store 0x0,0x34
04ba 4800 |H | Short_Literal 0x0
04bb e034 | 4 | Load 0x0,0x34
04bc e035 | 5 | Load 0x0,0x35
04bd 01d5 | | Execute Vector,Field_Reference
04be 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
04bf e02c | , | Load 0x0,0x2c
04c0 1b12 | | Execute Package,Field_Read,Field_Number 0x12
04c1 e034 | 4 | Load 0x0,0x34
04c2 e035 | 5 | Load 0x0,0x35
04c3 01d5 | | Execute Vector,Field_Reference
04c4 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
04c5 e02f | / | Load 0x0,0x2f
04c6 e02c | , | Load 0x0,0x2c
04c7 1b12 | | Execute Package,Field_Read,Field_Number 0x12
04c8 0272 | r | Execute Discrete,Minus
04c9 c02f | / | Store 0x0,0x2f
04ca 481d |H | Short_Literal 0x1d
04cb 8023 | # | Call 0x0,0x23
04cc e02c | , | Load 0x0,0x2c
04cd 1814 | | Execute Package,Field_Execute,Field_Number 0x14
04ce e034 | 4 | Load 0x0,0x34
04cf e035 | 5 | Load 0x0,0x35
04d0 01d5 | | Execute Vector,Field_Reference
04d1 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
04d2 e02c | , | Load 0x0,0x2c
04d3 1b12 | | Execute Package,Field_Read,Field_Number 0x12
04d4 e034 | 4 | Load 0x0,0x34
04d5 e035 | 5 | Load 0x0,0x35
04d6 01d5 | | Execute Vector,Field_Reference
04d7 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
04d8 e02f | / | Load 0x0,0x2f
04d9 e02c | , | Load 0x0,0x2c
04da 1b12 | | Execute Package,Field_Read,Field_Number 0x12
04db 027c | | | Execute Discrete,Less
04dc 6803 |h | Jump_Zero 0x4e0
04dd e02c | , | Load 0x0,0x2c
04de 1b12 | | Execute Package,Field_Read,Field_Number 0x12
04df c02f | / | Store 0x0,0x2f
04e0 e02f | / | Load 0x0,0x2f
04e1 e02c | , | Load 0x0,0x2c
04e2 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
04e3 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04e4 0000 0000 | | .BLANK 0000[0x4]
04e8 ; --------------------------------------------------------------------------------------
04e8 ; SUBPROGRAM
04e8 ; --------------------------------------------------------------------------------------
04e8 04eb | | .CONST 0x04eb ; Address of begin
04e9 0004 | | .CONST 0x0004 ; Address of exception handler
04ea 0001 | | .CONST 0x0001 ; Number of locals
04eb BODY_04e8:
04eb INIT_04e8:
04eb 8265 | e | Call 0x1,0x65
04ec 7003 |p | Jump_Nonzero 0x4f0
04ed e5ff | | Load 0x2,-0x1
04ee e015 | | Load 0x0,0x15
04ef 180f | | Execute Package,Field_Execute,Field_Number 0xf
04f0 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04f1 0000 0000 | | .BLANK 0000[0x7]
04f8 ; --------------------------------------------------------------------------------------
04f8 ; SUBPROGRAM
04f8 ; --------------------------------------------------------------------------------------
04f8 04fb | | .CONST 0x04fb ; Address of begin
04f9 0004 | | .CONST 0x0004 ; Address of exception handler
04fa 0001 | | .CONST 0x0001 ; Number of locals
04fb BODY_04f8:
04fb INIT_04f8:
04fb 8265 | e | Call 0x1,0x65
04fc 6803 |h | Jump_Zero 0x500
04fd e5ff | | Load 0x2,-0x1
04fe e015 | | Load 0x0,0x15
04ff 180f | | Execute Package,Field_Execute,Field_Number 0xf
0500 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0501 0000 0000 | | .BLANK 0000[0x7]
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 0510 | | .CONST 0x0510 ; Address of begin
0509 0004 | | .CONST 0x0004 ; Address of exception handler
050a 0003 | | .CONST 0x0003 ; Number of locals
050b INIT_0508:
050b 00e1 | | Load_Encached Boolean_Cache
050c e5ff | | Load 0x2,-0x1
050d e011 | | Load 0x0,0x11
050e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
050f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0510 BODY_0508:
0510 e402 | | Load 0x2,0x2
0511 e403 | | Load 0x2,0x3
0512 e015 | | Load 0x0,0x15
0513 180e | | Execute Package,Field_Execute,Field_Number 0xe
0514 c402 | | Store 0x2,0x2
0515 e402 | | Load 0x2,0x2
0516 6802 |h | Jump_Zero 0x519
0517 00d8 | | Load_Top At_Offset_0
0518 8262 | b | Call 0x1,0x62
0519 4502 |E | Exit_Suprogram New_Top_Offset 0x2
051a 0000 0000 | | .BLANK 0000[0x6]
0520 ; --------------------------------------------------------------------------------------
0520 ; SUBPROGRAM
0520 ; --------------------------------------------------------------------------------------
0520 0532 | 2 | .CONST 0x0532 ; Address of begin
0521 0544 | D | .CONST 0x0544 ; Address of exception handler
0522 0006 | | .CONST 0x0006 ; Number of locals
0523 INIT_0520:
0523 e5ff | | Load 0x2,-0x1
0524 e011 | | Load 0x0,0x11
0525 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0526 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0527 e028 | ( | Load 0x0,0x28
0528 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0529 02c7 | | Declare_Variable Any
052a 00d8 | | Load_Top At_Offset_0
052b 1c00 | | Execute_Immediate Run_Utility,0x0
052c e011 | | Load 0x0,0x11
052d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
052e 029f 10e3 | | Declare_Subprogram INIT_10e0,For_Call
0530 029f 1103 | | Declare_Subprogram INIT_1100,For_Call
0532 BODY_0520:
0532 8405 | | Call 0x2,0x5
0533 e011 | | Load 0x0,0x11
0534 1b26 | & | Execute Package,Field_Read,Field_Number 0x26
0535 680a |h | Jump_Zero 0x540
0536 4800 |H | Short_Literal 0x0
0537 4800 |H | Short_Literal 0x0
0538 0092 13c1 | | Action Push_String_Extended,0x13c1 ; "Including Ada input from "
053a e403 | | Load 0x2,0x3
053b e028 | ( | Load 0x0,0x28
053c 1820 | | Execute Package,Field_Execute,Field_Number 0x20
053d 01cc | | Execute Vector,Catenate
053e e01c | | Load 0x0,0x1c
053f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0540 00cf | | Action Mark_Auxiliary
0541 8406 | | Call 0x2,0x6
0542 00c9 | | Action Pop_Auxiliary_Loop
0543 7ffd | | Jump 0x541
0544 TRAP_0520:
0544 00d8 | | Load_Top At_Offset_0
0545 0107 | | Execute Exception,Get_Name
0546 4950 |IP | Short_Literal 0x150
0547 495f |I_ | Short_Literal 0x15f
0548 0262 | b | Execute Discrete,In_Range
0549 6825 |h% | Jump_Zero 0x56f
054a e404 | | Load 0x2,0x4
054b e011 | | Load 0x0,0x11
054c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
054d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
054e 0c01 | | Execute_Immediate Greater_Equal,0x1
054f 6808 |h | Jump_Zero 0x558
0550 e404 | | Load 0x2,0x4
0551 e015 | | Load 0x0,0x15
0552 180f | | Execute Package,Field_Execute,Field_Number 0xf
0553 e404 | | Load 0x2,0x4
0554 e011 | | Load 0x0,0x11
0555 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0556 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0557 c404 | | Store 0x2,0x4
0558 e011 | | Load 0x0,0x11
0559 1b26 | & | Execute Package,Field_Read,Field_Number 0x26
055a 680d |h | Jump_Zero 0x568
055b 4800 |H | Short_Literal 0x0
055c 4800 |H | Short_Literal 0x0
055d 0092 13c2 | | Action Push_String_Extended,0x13c2 ; "Finished Ada input from "
055f e403 | | Load 0x2,0x3
0560 e028 | ( | Load 0x0,0x28
0561 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0562 01cc | | Execute Vector,Catenate
0563 0092 13c3 | | Action Push_String_Extended,0x13c3 ; "; resuming"
0565 01cc | | Execute Vector,Catenate
0566 e01c | | Load 0x0,0x1c
0567 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0568 e403 | | Load 0x2,0x3
0569 e028 | ( | Load 0x0,0x28
056a 181b | | Execute Package,Field_Execute,Field_Number 0x1b
056b c403 | | Store 0x2,0x3
056c e402 | | Load 0x2,0x2
056d 8262 | b | Call 0x1,0x62
056e 4502 |E | Exit_Suprogram New_Top_Offset 0x2
056f e403 | | Load 0x2,0x3
0570 e028 | ( | Load 0x0,0x28
0571 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0572 6804 |h | Jump_Zero 0x577
0573 e403 | | Load 0x2,0x3
0574 e028 | ( | Load 0x0,0x28
0575 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0576 c403 | | Store 0x2,0x3
0577 e404 | | Load 0x2,0x4
0578 e011 | | Load 0x0,0x11
0579 1b0d | | Execute Package,Field_Read,Field_Number 0xd
057a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
057b c404 | | Store 0x2,0x4
057c 4829 |H) | Short_Literal 0x29
057d 0092 13c4 | | Action Push_String_Extended,0x13c4 ; "Error including Ada input file "
057f e402 | | Load 0x2,0x2
0580 01cc | | Execute Vector,Catenate
0581 0092 13c5 | | Action Push_String_Extended,0x13c5 ; " ("
0583 01cc | | Execute Vector,Catenate
0584 4800 |H | Short_Literal 0x0
0585 4801 |H | Short_Literal 0x1
0586 e036 | 6 | Load 0x0,0x36
0587 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0588 01cc | | Execute Vector,Catenate
0589 01cb | | Execute Vector,Append
058a e01c | | Load 0x0,0x1c
058b 180e | | Execute Package,Field_Execute,Field_Number 0xe
058c e011 | | Load 0x0,0x11
058d 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
058e 0257 | W | Execute Discrete,Raise
058f 0000 | | .XXX[0x1]
0590 ; --------------------------------------------------------------------------------------
0590 ; SUBPROGRAM
0590 ; --------------------------------------------------------------------------------------
0590 0595 | | .CONST 0x0595 ; Address of begin
0591 0004 | | .CONST 0x0004 ; Address of exception handler
0592 0002 | | .CONST 0x0002 ; Number of locals
0593 INIT_0590:
0593 e011 | | Load 0x0,0x11
0594 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0595 BODY_0590:
0595 e02b | + | Load 0x0,0x2b
0596 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0597 7005 |p | Jump_Nonzero 0x59d
0598 0092 13c6 | | Action Push_String_Extended,0x13c6 ; "Ignoring Ip that is not bracketed by Start_Ip and End_Ip"
059a e01c | | Load 0x0,0x1c
059b 180e | | Execute Package,Field_Execute,Field_Number 0xe
059c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
059d 4801 |H | Short_Literal 0x1
059e 4800 |H | Short_Literal 0x0
059f e017 | | Load 0x0,0x17
05a0 3c2b |<+ | Execute Record,Field_Read,Field_Number 0x2b
05a1 e01e | | Load 0x0,0x1e
05a2 1818 | | Execute Package,Field_Execute,Field_Number 0x18
05a3 4826 |H& | Short_Literal 0x26
05a4 801f | | Call 0x0,0x1f
05a5 4801 |H | Short_Literal 0x1
05a6 e01d | | Load 0x0,0x1d
05a7 3815 |8 | Execute Record,Field_Write,Field_Number 0x15
05a8 e01d | | Load 0x0,0x1d
05a9 3c16 |< | Execute Record,Field_Read,Field_Number 0x16
05aa 4801 |H | Short_Literal 0x1
05ab e01d | | Load 0x0,0x1d
05ac 3412 |4 | Execute Record,Field_Reference,Field_Number 0x12
05ad 01d6 | | Execute Vector,Field_Write
05ae e017 | | Load 0x0,0x17
05af 3c20 |< | Execute Record,Field_Read,Field_Number 0x20
05b0 0275 | u | Execute Discrete,Unary_Minus
05b1 e01d | | Load 0x0,0x1d
05b2 381a |8 | Execute Record,Field_Write,Field_Number 0x1a
05b3 00d8 | | Load_Top At_Offset_0
05b4 e02b | + | Load 0x0,0x2b
05b5 e033 | 3 | Load 0x0,0x33
05b6 1816 | | Execute Package,Field_Execute,Field_Number 0x16
05b7 00d1 | | Pop_Control Pop_Count_1
05b8 c402 | | Store 0x2,0x2
05b9 e017 | | Load 0x0,0x17
05ba 3c21 |<! | Execute Record,Field_Read,Field_Number 0x21
05bb 680c |h | Jump_Zero 0x5c8
05bc 4803 |H | Short_Literal 0x3
05bd 4801 |H | Short_Literal 0x1
05be e01d | | Load 0x0,0x1d
05bf 3413 |4 | Execute Record,Field_Reference,Field_Number 0x13
05c0 01d6 | | Execute Vector,Field_Write
05c1 00d8 | | Load_Top At_Offset_0
05c2 e015 | | Load 0x0,0x15
05c3 180f | | Execute Package,Field_Execute,Field_Number 0xf
05c4 4940 |I@ | Short_Literal 0x140
05c5 e015 | | Load 0x0,0x15
05c6 1814 | | Execute Package,Field_Execute,Field_Number 0x14
05c7 780b |x | Jump 0x5d3
05c8 4804 |H | Short_Literal 0x4
05c9 4801 |H | Short_Literal 0x1
05ca e01d | | Load 0x0,0x1d
05cb 3413 |4 | Execute Record,Field_Reference,Field_Number 0x13
05cc 01d6 | | Execute Vector,Field_Write
05cd 4940 |I@ | Short_Literal 0x140
05ce e015 | | Load 0x0,0x15
05cf 1814 | | Execute Package,Field_Execute,Field_Number 0x14
05d0 00d8 | | Load_Top At_Offset_0
05d1 e015 | | Load 0x0,0x15
05d2 180f | | Execute Package,Field_Execute,Field_Number 0xf
05d3 00d8 | | Load_Top At_Offset_0
05d4 e011 | | Load 0x0,0x11
05d5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05d6 1812 | | Execute Package,Field_Execute,Field_Number 0x12
05d7 c402 | | Store 0x2,0x2
05d8 4826 |H& | Short_Literal 0x26
05d9 8023 | # | Call 0x0,0x23
05da 4801 |H | Short_Literal 0x1
05db e02c | , | Load 0x0,0x2c
05dc 1820 | | Execute Package,Field_Execute,Field_Number 0x20
05dd 4501 |E | Exit_Suprogram New_Top_Offset 0x1
05de 0000 0000 | | .XXX[0x2]
05e0 ; --------------------------------------------------------------------------------------
05e0 ; SUBPROGRAM
05e0 ; --------------------------------------------------------------------------------------
05e0 05f1 | | .CONST 0x05f1 ; Address of begin
05e1 0004 | | .CONST 0x0004 ; Address of exception handler
05e2 0007 | | .CONST 0x0007 ; Number of locals
05e3 INIT_05e0:
05e3 e5ff | | Load 0x2,-0x1
05e4 e011 | | Load 0x0,0x11
05e5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05e6 1816 | | Execute Package,Field_Execute,Field_Number 0x16
05e7 e037 | 7 | Load 0x0,0x37
05e8 0322 | " | Declare_Variable Record
05e9 00e1 | | Load_Encached Boolean_Cache
05ea e033 | 3 | Load 0x0,0x33
05eb 1b18 | | Execute Package,Field_Read,Field_Number 0x18
05ec 0337 | 7 | Declare_Variable Array
05ed e033 | 3 | Load 0x0,0x33
05ee 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05ef e038 | 8 | Load 0x0,0x38
05f0 0007 | | Action Break_Optional
05f1 BODY_05e0:
05f1 e5fe | | Load 0x2,-0x2
05f2 4604 |F | Jump_Case 0x5
05f3 782a |x* | Jump 0x61e ; case 0x0
05f4 780c |x | Jump 0x601 ; case 0x1
05f5 7815 |x | Jump 0x60b ; case 0x2
05f6 781d |x | Jump 0x614 ; case 0x3
05f7 7800 |x | Jump 0x5f8 ; case 0x4
05f8 e039 | 9 | Load 0x0,0x39
05f9 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
05fa e405 | | Load 0x2,0x5
05fb 01d4 | | Execute Vector,Structure_Write
05fc 4800 |H | Short_Literal 0x0
05fd a406 | | Store_Unchecked 0x2,0x6
05fe 4803 |H | Short_Literal 0x3
05ff a407 | | Store_Unchecked 0x2,0x7
0600 7879 |xy | Jump 0x67a
0601 e03a | : | Load 0x0,0x3a
0602 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0603 e405 | | Load 0x2,0x5
0604 01d4 | | Execute Vector,Structure_Write
0605 e03a | : | Load 0x0,0x3a
0606 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0607 a406 | | Store_Unchecked 0x2,0x6
0608 4802 |H | Short_Literal 0x2
0609 a407 | | Store_Unchecked 0x2,0x7
060a 786f |xo | Jump 0x67a
060b e03a | : | Load 0x0,0x3a
060c 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
060d e405 | | Load 0x2,0x5
060e 01d4 | | Execute Vector,Structure_Write
060f 4800 |H | Short_Literal 0x0
0610 a406 | | Store_Unchecked 0x2,0x6
0611 4802 |H | Short_Literal 0x2
0612 a407 | | Store_Unchecked 0x2,0x7
0613 7866 |xf | Jump 0x67a
0614 e039 | 9 | Load 0x0,0x39
0615 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0616 e405 | | Load 0x2,0x5
0617 01d4 | | Execute Vector,Structure_Write
0618 e039 | 9 | Load 0x0,0x39
0619 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
061a a406 | | Store_Unchecked 0x2,0x6
061b 4803 |H | Short_Literal 0x3
061c a407 | | Store_Unchecked 0x2,0x7
061d 785c |x\ | Jump 0x67a
061e e03b | ; | Load 0x0,0x3b
061f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0620 682f |h/ | Jump_Zero 0x650
0621 e02d | - | Load 0x0,0x2d
0622 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0623 e03b | ; | Load 0x0,0x3b
0624 3c11 |< | Execute Record,Field_Read,Field_Number 0x11
0625 027d | } | Execute Discrete,Greater
0626 6811 |h | Jump_Zero 0x638
0627 e02d | - | Load 0x0,0x2d
0628 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0629 e02d | - | Load 0x0,0x2d
062a 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
062b 01d7 | | Execute Vector,Field_Read
062c 0c01 | | Execute_Immediate Greater_Equal,0x1
062d 680a |h | Jump_Zero 0x638
062e e02d | - | Load 0x0,0x2d
062f 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0630 e405 | | Load 0x2,0x5
0631 01d4 | | Execute Vector,Structure_Write
0632 e02d | - | Load 0x0,0x2d
0633 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0634 a406 | | Store_Unchecked 0x2,0x6
0635 4804 |H | Short_Literal 0x4
0636 a407 | | Store_Unchecked 0x2,0x7
0637 7842 |xB | Jump 0x67a
0638 e03b | ; | Load 0x0,0x3b
0639 3c0f |< | Execute Record,Field_Read,Field_Number 0xf
063a 6809 |h | Jump_Zero 0x644
063b 4822 |H" | Short_Literal 0x22
063c 0092 13c7 | | Action Push_String_Extended,0x13c7 ; "Tables can only be labelled once; ignoring label \x22"
063e e402 | | Load 0x2,0x2
063f 01cc | | Execute Vector,Catenate
0640 01cb | | Execute Vector,Append
0641 e01c | | Load 0x0,0x1c
0642 180f | | Execute Package,Field_Execute,Field_Number 0xf
0643 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0644 4801 |H | Short_Literal 0x1
0645 e03b | ; | Load 0x0,0x3b
0646 380f |8 | Execute Record,Field_Write,Field_Number 0xf
0647 e03b | ; | Load 0x0,0x3b
0648 3c10 |< | Execute Record,Field_Read,Field_Number 0x10
0649 e5ff | | Load 0x2,-0x1
064a e011 | | Load 0x0,0x11
064b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
064c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
064d e03b | ; | Load 0x0,0x3b
064e 3810 |8 | Execute Record,Field_Write,Field_Number 0x10
064f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0650 e02d | - | Load 0x0,0x2d
0651 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0652 0c01 | | Execute_Immediate Greater_Equal,0x1
0653 6811 |h | Jump_Zero 0x665
0654 e02d | - | Load 0x0,0x2d
0655 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0656 e02d | - | Load 0x0,0x2d
0657 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0658 01d7 | | Execute Vector,Field_Read
0659 0c01 | | Execute_Immediate Greater_Equal,0x1
065a 680a |h | Jump_Zero 0x665
065b e02d | - | Load 0x0,0x2d
065c 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
065d e405 | | Load 0x2,0x5
065e 01d4 | | Execute Vector,Structure_Write
065f e02d | - | Load 0x0,0x2d
0660 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0661 a406 | | Store_Unchecked 0x2,0x6
0662 4804 |H | Short_Literal 0x4
0663 a407 | | Store_Unchecked 0x2,0x7
0664 7815 |x | Jump 0x67a
0665 e016 | | Load 0x0,0x16
0666 680a |h | Jump_Zero 0x671
0667 e03c | < | Load 0x0,0x3c
0668 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0669 e405 | | Load 0x2,0x5
066a 01d4 | | Execute Vector,Structure_Write
066b e03c | < | Load 0x0,0x3c
066c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
066d a406 | | Store_Unchecked 0x2,0x6
066e 4801 |H | Short_Literal 0x1
066f a407 | | Store_Unchecked 0x2,0x7
0670 7809 |x | Jump 0x67a
0671 e03d | = | Load 0x0,0x3d
0672 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0673 e405 | | Load 0x2,0x5
0674 01d4 | | Execute Vector,Structure_Write
0675 e03d | = | Load 0x0,0x3d
0676 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0677 a406 | | Store_Unchecked 0x2,0x6
0678 4800 |H | Short_Literal 0x0
0679 a407 | | Store_Unchecked 0x2,0x7
067a 00e1 | | Load_Encached Boolean_Cache
067b e403 | | Load 0x2,0x3
067c e402 | | Load 0x2,0x2
067d e03e | > | Load 0x0,0x3e
067e e03f | ? | Load 0x0,0x3f
067f 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0680 00d1 | | Pop_Control Pop_Count_1
0681 c404 | | Store 0x2,0x4
0682 e404 | | Load 0x2,0x4
0683 6840 |h@ | Jump_Zero 0x6c4
0684 e403 | | Load 0x2,0x3
0685 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0686 6848 |hH | Jump_Zero 0x6cf
0687 e403 | | Load 0x2,0x3
0688 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0689 6819 |h | Jump_Zero 0x6a3
068a e403 | | Load 0x2,0x3
068b 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
068c e406 | | Load 0x2,0x6
068d 027e | ~ | Execute Discrete,Not_Equal
068e 700b |p | Jump_Nonzero 0x69a
068f 4801 |H | Short_Literal 0x1
0690 e406 | | Load 0x2,0x6
0691 e403 | | Load 0x2,0x3
0692 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0693 01cf | | Execute Vector,Slice_Read
0694 4801 |H | Short_Literal 0x1
0695 e406 | | Load 0x2,0x6
0696 e405 | | Load 0x2,0x5
0697 01cf | | Execute Vector,Slice_Read
0698 01df | | Execute Vector,Equal
0699 7009 |p | Jump_Nonzero 0x6a3
069a 0092 13c8 | | Action Push_String_Extended,0x13c8 ; "Please run Compose again; ~Ref ("
069c e402 | | Load 0x2,0x2
069d 01cc | | Execute Vector,Catenate
069e 0092 13c9 | | Action Push_String_Extended,0x13c9 ; ") has changed value"
06a0 01cc | | Execute Vector,Catenate
06a1 e01c | | Load 0x0,0x1c
06a2 180e | | Execute Package,Field_Execute,Field_Number 0xe
06a3 e403 | | Load 0x2,0x3
06a4 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
06a5 6829 |h) | Jump_Zero 0x6cf
06a6 e403 | | Load 0x2,0x3
06a7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
06a8 e018 | | Load 0x0,0x18
06a9 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
06aa 027e | ~ | Execute Discrete,Not_Equal
06ab 700e |p | Jump_Nonzero 0x6ba
06ac 4801 |H | Short_Literal 0x1
06ad e018 | | Load 0x0,0x18
06ae 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
06af e403 | | Load 0x2,0x3
06b0 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
06b1 01cf | | Execute Vector,Slice_Read
06b2 4801 |H | Short_Literal 0x1
06b3 e018 | | Load 0x0,0x18
06b4 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
06b5 e018 | | Load 0x0,0x18
06b6 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
06b7 01cf | | Execute Vector,Slice_Read
06b8 01df | | Execute Vector,Equal
06b9 7015 |p | Jump_Nonzero 0x6cf
06ba 0092 13ca | | Action Push_String_Extended,0x13ca ; "Please run Compose again; ~Page_Ref ("
06bc e402 | | Load 0x2,0x2
06bd 01cc | | Execute Vector,Catenate
06be 0092 13c9 | | Action Push_String_Extended,0x13c9 ; ") has changed value"
06c0 01cc | | Execute Vector,Catenate
06c1 e01c | | Load 0x0,0x1c
06c2 180e | | Execute Package,Field_Execute,Field_Number 0xe
06c3 780b |x | Jump 0x6cf
06c4 4800 |H | Short_Literal 0x0
06c5 e403 | | Load 0x2,0x3
06c6 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
06c7 4800 |H | Short_Literal 0x0
06c8 e403 | | Load 0x2,0x3
06c9 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
06ca e011 | | Load 0x0,0x11
06cb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06cc 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
06cd e403 | | Load 0x2,0x3
06ce 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
06cf e018 | | Load 0x0,0x18
06d0 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
06d1 e403 | | Load 0x2,0x3
06d2 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
06d3 e018 | | Load 0x0,0x18
06d4 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
06d5 e403 | | Load 0x2,0x3
06d6 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
06d7 e016 | | Load 0x0,0x16
06d8 6804 |h | Jump_Zero 0x6dd
06d9 4801 |H | Short_Literal 0x1
06da e403 | | Load 0x2,0x3
06db 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
06dc 7803 |x | Jump 0x6e0
06dd 4800 |H | Short_Literal 0x0
06de e403 | | Load 0x2,0x3
06df 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
06e0 e405 | | Load 0x2,0x5
06e1 e403 | | Load 0x2,0x3
06e2 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
06e3 e406 | | Load 0x2,0x6
06e4 e403 | | Load 0x2,0x3
06e5 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
06e6 00d8 | | Load_Top At_Offset_0
06e7 e403 | | Load 0x2,0x3
06e8 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
06e9 4801 |H | Short_Literal 0x1
06ea e403 | | Load 0x2,0x3
06eb 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
06ec e03e | > | Load 0x0,0x3e
06ed 4800 |H | Short_Literal 0x0
06ee e403 | | Load 0x2,0x3
06ef e402 | | Load 0x2,0x2
06f0 e03f | ? | Load 0x0,0x3f
06f1 1815 | | Execute Package,Field_Execute,Field_Number 0x15
06f2 c03e | > | Store 0x0,0x3e
06f3 4503 |E | Exit_Suprogram New_Top_Offset 0x3
06f4 0000 0000 | | .BLANK 0000[0x4]
06f8 ; --------------------------------------------------------------------------------------
06f8 ; SUBPROGRAM
06f8 ; --------------------------------------------------------------------------------------
06f8 06fb | | .CONST 0x06fb ; Address of begin
06f9 0004 | | .CONST 0x0004 ; Address of exception handler
06fa 0001 | | .CONST 0x0001 ; Number of locals
06fb BODY_06f8:
06fb INIT_06f8:
06fb e040 | @ | Load 0x0,0x40
06fc e011 | | Load 0x0,0x11
06fd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06fe 1812 | | Execute Package,Field_Execute,Field_Number 0x12
06ff c040 | @ | Store 0x0,0x40
0700 e040 | @ | Load 0x0,0x40
0701 e5ff | | Load 0x2,-0x1
0702 e011 | | Load 0x0,0x11
0703 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0704 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0705 c040 | @ | Store 0x0,0x40
0706 4801 |H | Short_Literal 0x1
0707 c041 | A | Store 0x0,0x41
0708 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0709 0000 0000 | | .BLANK 0000[0x7]
0710 ; --------------------------------------------------------------------------------------
0710 ; SUBPROGRAM
0710 ; --------------------------------------------------------------------------------------
0710 0713 | | .CONST 0x0713 ; Address of begin
0711 0004 | | .CONST 0x0004 ; Address of exception handler
0712 0001 | | .CONST 0x0001 ; Number of locals
0713 BODY_0710:
0713 INIT_0710:
0713 e042 | B | Load 0x0,0x42
0714 e011 | | Load 0x0,0x11
0715 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0716 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0717 c042 | B | Store 0x0,0x42
0718 e042 | B | Load 0x0,0x42
0719 e5ff | | Load 0x2,-0x1
071a e011 | | Load 0x0,0x11
071b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
071c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
071d c042 | B | Store 0x0,0x42
071e 4801 |H | Short_Literal 0x1
071f c043 | C | Store 0x0,0x43
0720 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0721 0000 0000 | | .BLANK 0000[0x7]
0728 ; --------------------------------------------------------------------------------------
0728 ; SUBPROGRAM
0728 ; --------------------------------------------------------------------------------------
0728 072d | - | .CONST 0x072d ; Address of begin
0729 0004 | | .CONST 0x0004 ; Address of exception handler
072a 0002 | | .CONST 0x0002 ; Number of locals
072b INIT_0728:
072b e011 | | Load 0x0,0x11
072c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
072d BODY_0728:
072d 482e |H. | Short_Literal 0x2e
072e 801f | | Call 0x0,0x1f
072f e02c | , | Load 0x0,0x2c
0730 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0731 a402 | | Store_Unchecked 0x2,0x2
0732 4801 |H | Short_Literal 0x1
0733 4800 |H | Short_Literal 0x0
0734 4800 |H | Short_Literal 0x0
0735 e01e | | Load 0x0,0x1e
0736 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0737 4800 |H | Short_Literal 0x0
0738 e01d | | Load 0x0,0x1d
0739 3816 |8 | Execute Record,Field_Write,Field_Number 0x16
073a 4800 |H | Short_Literal 0x0
073b e01d | | Load 0x0,0x1d
073c 3818 |8 | Execute Record,Field_Write,Field_Number 0x18
073d 4800 |H | Short_Literal 0x0
073e e01d | | Load 0x0,0x1d
073f 381a |8 | Execute Record,Field_Write,Field_Number 0x1a
0740 4801 |H | Short_Literal 0x1
0741 e01d | | Load 0x0,0x1d
0742 3815 |8 | Execute Record,Field_Write,Field_Number 0x15
0743 4803 |H | Short_Literal 0x3
0744 4801 |H | Short_Literal 0x1
0745 e01d | | Load 0x0,0x1d
0746 3413 |4 | Execute Record,Field_Reference,Field_Number 0x13
0747 01d6 | | Execute Vector,Field_Write
0748 00d8 | | Load_Top At_Offset_0
0749 4801 |H | Short_Literal 0x1
074a e01d | | Load 0x0,0x1d
074b 3412 |4 | Execute Record,Field_Reference,Field_Number 0x12
074c 01d6 | | Execute Vector,Field_Write
074d e5ff | | Load 0x2,-0x1
074e e015 | | Load 0x0,0x15
074f 180f | | Execute Package,Field_Execute,Field_Number 0xf
0750 4940 |I@ | Short_Literal 0x140
0751 e015 | | Load 0x0,0x15
0752 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0753 482e |H. | Short_Literal 0x2e
0754 8023 | # | Call 0x0,0x23
0755 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0756 0000 0000 | | .XXX[0x2]
0758 ; --------------------------------------------------------------------------------------
0758 ; SUBPROGRAM
0758 ; --------------------------------------------------------------------------------------
0758 075b | [ | .CONST 0x075b ; Address of begin
0759 0004 | | .CONST 0x0004 ; Address of exception handler
075a 0001 | | .CONST 0x0001 ; Number of locals
075b BODY_0758:
075b INIT_0758:
075b e044 | D | Load 0x0,0x44
075c 180e | | Execute Package,Field_Execute,Field_Number 0xe
075d 4802 |H | Short_Literal 0x2
075e 4801 |H | Short_Literal 0x1
075f e5ff | | Load 0x2,-0x1
0760 e011 | | Load 0x0,0x11
0761 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0762 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0763 8264 | d | Call 0x1,0x64
0764 e045 | E | Load 0x0,0x45
0765 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0766 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0767 0000 | | .XXX[0x1]
0768 ; --------------------------------------------------------------------------------------
0768 ; SUBPROGRAM
0768 ; --------------------------------------------------------------------------------------
0768 076b | k | .CONST 0x076b ; Address of begin
0769 0004 | | .CONST 0x0004 ; Address of exception handler
076a 0001 | | .CONST 0x0001 ; Number of locals
076b BODY_0768:
076b INIT_0768:
076b e253 | S | Load 0x1,0x53
076c 6809 |h | Jump_Zero 0x776
076d 4800 |H | Short_Literal 0x0
076e 4800 |H | Short_Literal 0x0
076f e017 | | Load 0x0,0x17
0770 3c45 |<E | Execute Record,Field_Read,Field_Number 0x45
0771 e01e | | Load 0x0,0x1e
0772 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0773 4800 |H | Short_Literal 0x0
0774 a253 | S | Store_Unchecked 0x1,0x53
0775 780b |x | Jump 0x781
0776 e252 | R | Load 0x1,0x52
0777 e02c | , | Load 0x0,0x2c
0778 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0779 027e | ~ | Execute Discrete,Not_Equal
077a 6806 |h | Jump_Zero 0x781
077b 4801 |H | Short_Literal 0x1
077c 4800 |H | Short_Literal 0x0
077d e017 | | Load 0x0,0x17
077e 3c2b |<+ | Execute Record,Field_Read,Field_Number 0x2b
077f e01e | | Load 0x0,0x1e
0780 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0781 4801 |H | Short_Literal 0x1
0782 e02c | , | Load 0x0,0x2c
0783 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0784 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0785 0000 0000 | | .XXX[0x3]
0787 0000 | |
0788 ; --------------------------------------------------------------------------------------
0788 ; SUBPROGRAM
0788 ; --------------------------------------------------------------------------------------
0788 0791 | | .CONST 0x0791 ; Address of begin
0789 0004 | | .CONST 0x0004 ; Address of exception handler
078a 0004 | | .CONST 0x0004 ; Number of locals
078b INIT_0788:
078b e011 | | Load 0x0,0x11
078c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
078d e046 | F | Load 0x0,0x46
078e 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
078f 029f 112b | +| Declare_Subprogram INIT_1128,For_Call
0791 BODY_0788:
0791 e5ff | | Load 0x2,-0x1
0792 e011 | | Load 0x0,0x11
0793 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0794 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0795 e046 | F | Load 0x0,0x46
0796 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0797 a403 | | Store_Unchecked 0x2,0x3
0798 8404 | | Call 0x2,0x4
0799 4502 |E | Exit_Suprogram New_Top_Offset 0x2
079a 0000 0000 | | .BLANK 0000[0x6]
07a0 ; --------------------------------------------------------------------------------------
07a0 ; SUBPROGRAM
07a0 ; --------------------------------------------------------------------------------------
07a0 07a5 | | .CONST 0x07a5 ; Address of begin
07a1 0004 | | .CONST 0x0004 ; Address of exception handler
07a2 0002 | | .CONST 0x0002 ; Number of locals
07a3 INIT_07a0:
07a3 e011 | | Load 0x0,0x11
07a4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
07a5 BODY_07a0:
07a5 e02d | - | Load 0x0,0x2d
07a6 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
07a7 7005 |p | Jump_Nonzero 0x7ad
07a8 0092 13cb | | Action Push_String_Extended,0x13cb ; "Ignoring Np that is not bracketed by Start_Np and End_Np"
07aa e01c | | Load 0x0,0x1c
07ab 180e | | Execute Package,Field_Execute,Field_Number 0xe
07ac 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07ad 4801 |H | Short_Literal 0x1
07ae 4800 |H | Short_Literal 0x0
07af e017 | | Load 0x0,0x17
07b0 3c2b |<+ | Execute Record,Field_Read,Field_Number 0x2b
07b1 e01e | | Load 0x0,0x1e
07b2 1818 | | Execute Package,Field_Execute,Field_Number 0x18
07b3 4837 |H7 | Short_Literal 0x37
07b4 801f | | Call 0x0,0x1f
07b5 4801 |H | Short_Literal 0x1
07b6 e01d | | Load 0x0,0x1d
07b7 3815 |8 | Execute Record,Field_Write,Field_Number 0x15
07b8 e01d | | Load 0x0,0x1d
07b9 3c16 |< | Execute Record,Field_Read,Field_Number 0x16
07ba 4801 |H | Short_Literal 0x1
07bb e01d | | Load 0x0,0x1d
07bc 3412 |4 | Execute Record,Field_Reference,Field_Number 0x12
07bd 01d6 | | Execute Vector,Field_Write
07be e017 | | Load 0x0,0x17
07bf 3c20 |< | Execute Record,Field_Read,Field_Number 0x20
07c0 0275 | u | Execute Discrete,Unary_Minus
07c1 e01d | | Load 0x0,0x1d
07c2 381a |8 | Execute Record,Field_Write,Field_Number 0x1a
07c3 e02d | - | Load 0x0,0x2d
07c4 4800 |H | Short_Literal 0x0
07c5 e033 | 3 | Load 0x0,0x33
07c6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07c7 00d1 | | Pop_Control Pop_Count_1
07c8 00d8 | | Load_Top At_Offset_0
07c9 e02d | - | Load 0x0,0x2d
07ca e033 | 3 | Load 0x0,0x33
07cb 1816 | | Execute Package,Field_Execute,Field_Number 0x16
07cc 00d1 | | Pop_Control Pop_Count_1
07cd c402 | | Store 0x2,0x2
07ce e017 | | Load 0x0,0x17
07cf 3c21 |<! | Execute Record,Field_Read,Field_Number 0x21
07d0 680c |h | Jump_Zero 0x7dd
07d1 4803 |H | Short_Literal 0x3
07d2 4801 |H | Short_Literal 0x1
07d3 e01d | | Load 0x0,0x1d
07d4 3413 |4 | Execute Record,Field_Reference,Field_Number 0x13
07d5 01d6 | | Execute Vector,Field_Write
07d6 00d8 | | Load_Top At_Offset_0
07d7 4809 |H | Short_Literal 0x9
07d8 e011 | | Load 0x0,0x11
07d9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07da 181e | | Execute Package,Field_Execute,Field_Number 0x1e
07db c402 | | Store 0x2,0x2
07dc 7813 |x | Jump 0x7f0
07dd 4804 |H | Short_Literal 0x4
07de 4801 |H | Short_Literal 0x1
07df e01d | | Load 0x0,0x1d
07e0 3413 |4 | Execute Record,Field_Reference,Field_Number 0x13
07e1 01d6 | | Execute Vector,Field_Write
07e2 00d8 | | Load_Top At_Offset_0
07e3 4809 |H | Short_Literal 0x9
07e4 4801 |H | Short_Literal 0x1
07e5 e011 | | Load 0x0,0x11
07e6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07e7 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
07e8 c402 | | Store 0x2,0x2
07e9 00d8 | | Load_Top At_Offset_0
07ea 0092 13cc | | Action Push_String_Extended,0x13cc ; "~ "
07ec e011 | | Load 0x0,0x11
07ed 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07ee 181d | | Execute Package,Field_Execute,Field_Number 0x1d
07ef c402 | | Store 0x2,0x2
07f0 00d8 | | Load_Top At_Offset_0
07f1 e015 | | Load 0x0,0x15
07f2 180f | | Execute Package,Field_Execute,Field_Number 0xf
07f3 00d8 | | Load_Top At_Offset_0
07f4 e011 | | Load 0x0,0x11
07f5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07f6 1812 | | Execute Package,Field_Execute,Field_Number 0x12
07f7 c402 | | Store 0x2,0x2
07f8 4837 |H7 | Short_Literal 0x37
07f9 8023 | # | Call 0x0,0x23
07fa 4801 |H | Short_Literal 0x1
07fb e02c | , | Load 0x0,0x2c
07fc 1820 | | Execute Package,Field_Execute,Field_Number 0x20
07fd 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07fe 0000 0000 | | .XXX[0x2]
0800 ; --------------------------------------------------------------------------------------
0800 ; SUBPROGRAM
0800 ; --------------------------------------------------------------------------------------
0800 0803 | | .CONST 0x0803 ; Address of begin
0801 0004 | | .CONST 0x0004 ; Address of exception handler
0802 0001 | | .CONST 0x0001 ; Number of locals
0803 BODY_0800:
0803 INIT_0800:
0803 e02c | , | Load 0x0,0x2c
0804 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0805 680d |h | Jump_Zero 0x813
0806 e03b | ; | Load 0x0,0x3b
0807 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0808 6805 |h | Jump_Zero 0x80e
0809 0092 13cd | | Action Push_String_Extended,0x13cd ; "Ignoring New_Page during Table input"
080b e01c | | Load 0x0,0x1c
080c 180f | | Execute Package,Field_Execute,Field_Number 0xf
080d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
080e 0092 13ce | | Action Push_String_Extended,0x13ce ; "New_Page must be ignored while buffering output"
0810 e01c | | Load 0x0,0x1c
0811 180f | | Execute Package,Field_Execute,Field_Number 0xf
0812 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0813 e01d | | Load 0x0,0x1d
0814 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0815 0d01 | | Execute_Immediate Less,0x1
0816 6823 |h# | Jump_Zero 0x83a
0817 0092 13cf | | Action Push_String_Extended,0x13cf ; "Overriding non-positive spacing for New_Page"
0819 e01c | | Load 0x0,0x1c
081a 180f | | Execute Package,Field_Execute,Field_Number 0xf
081b 4802 |H | Short_Literal 0x2
081c e01d | | Load 0x0,0x1d
081d 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
081e e01d | | Load 0x0,0x1d
081f 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0820 e01d | | Load 0x0,0x1d
0821 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0822 0273 | s | Execute Discrete,Plus
0823 4be8 |K | Short_Literal 0x3e8
0824 0271 | q | Execute Discrete,Times
0825 e011 | | Load 0x0,0x11
0826 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0827 00d9 | | Load_Top At_Offset_1
0828 00d0 | | Action Swap_Control
0829 0260 | ` | Execute Discrete,In_Type
082a 7001 |p | Jump_Nonzero 0x82c
082b 0801 | | Execute_Immediate Raise,0x1
082c e020 | | Load 0x0,0x20
082d 1b12 | | Execute Package,Field_Read,Field_Number 0x12
082e e021 | ! | Load 0x0,0x21
082f 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0830 00d8 | | Load_Top At_Offset_0
0831 e021 | ! | Load 0x0,0x21
0832 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0833 7003 |p | Jump_Nonzero 0x837
0834 e022 | " | Load 0x0,0x22
0835 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0836 0257 | W | Execute Discrete,Raise
0837 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0838 e01d | | Load 0x0,0x1d
0839 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
083a 4800 |H | Short_Literal 0x0
083b e02c | , | Load 0x0,0x2c
083c 1820 | | Execute Package,Field_Execute,Field_Number 0x20
083d 4800 |H | Short_Literal 0x0
083e e02c | , | Load 0x0,0x2c
083f 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0840 00cf | | Action Mark_Auxiliary
0841 7803 |x | Jump 0x845
0842 e015 | | Load 0x0,0x15
0843 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0844 00c9 | | Action Pop_Auxiliary_Loop
0845 e02c | , | Load 0x0,0x2c
0846 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0847 6ffa |o | Jump_Zero 0x842
0848 00ce | | Action Pop_Auxiliary
0849 4801 |H | Short_Literal 0x1
084a 4800 |H | Short_Literal 0x0
084b 4800 |H | Short_Literal 0x0
084c e01e | | Load 0x0,0x1e
084d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
084e 6005 |` | Indirect_Literal Discrete,0x854,{0x00000000, 0x7fffffff}
084f c047 | G | Store 0x0,0x47
0850 e015 | | Load 0x0,0x15
0851 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0852 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0853 0000 | | .XXX[0x1]
0854 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
0858 ; --------------------------------------------------------------------------------------
0858 ; SUBPROGRAM
0858 ; --------------------------------------------------------------------------------------
0858 085b | [ | .CONST 0x085b ; Address of begin
0859 0004 | | .CONST 0x0004 ; Address of exception handler
085a 0001 | | .CONST 0x0001 ; Number of locals
085b BODY_0858:
085b INIT_0858:
085b e048 | H | Load 0x0,0x48
085c 682a |h* | Jump_Zero 0x887
085d e049 | I | Load 0x0,0x49
085e 4801 |H | Short_Literal 0x1
085f 0279 | y | Execute Discrete,And
0860 0f01 | | Execute_Immediate Equal,0x1
0861 6825 |h% | Jump_Zero 0x887
0862 e02c | , | Load 0x0,0x2c
0863 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0864 7001 |p | Jump_Nonzero 0x866
0865 8231 | 1 | Call 0x1,0x31
0866 e015 | | Load 0x0,0x15
0867 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0868 e04a | J | Load 0x0,0x4a
0869 e011 | | Load 0x0,0x11
086a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
086b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
086c 0c01 | | Execute_Immediate Greater_Equal,0x1
086d 6819 |h | Jump_Zero 0x887
086e 4801 |H | Short_Literal 0x1
086f 4801 |H | Short_Literal 0x1
0870 e017 | | Load 0x0,0x17
0871 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
0872 e017 | | Load 0x0,0x17
0873 3c1f |< | Execute Record,Field_Read,Field_Number 0x1f
0874 e017 | | Load 0x0,0x17
0875 3c1e |< | Execute Record,Field_Read,Field_Number 0x1e
0876 0273 | s | Execute Discrete,Plus
0877 0272 | r | Execute Discrete,Minus
0878 4803 |H | Short_Literal 0x3
0879 0270 | p | Execute Discrete,Divide
087a e011 | | Load 0x0,0x11
087b 1b10 | | Execute Package,Field_Read,Field_Number 0x10
087c 00d9 | | Load_Top At_Offset_1
087d 00d0 | | Action Swap_Control
087e 0260 | ` | Execute Discrete,In_Type
087f 7001 |p | Jump_Nonzero 0x881
0880 0801 | | Execute_Immediate Raise,0x1
0881 e01e | | Load 0x0,0x1e
0882 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0883 4800 |H | Short_Literal 0x0
0884 e04a | J | Load 0x0,0x4a
0885 e04b | K | Load 0x0,0x4b
0886 180e | | Execute Package,Field_Execute,Field_Number 0xe
0887 8231 | 1 | Call 0x1,0x31
0888 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0889 0000 0000 | | .BLANK 0000[0x7]
0890 ; --------------------------------------------------------------------------------------
0890 ; SUBPROGRAM
0890 ; --------------------------------------------------------------------------------------
0890 0893 | | .CONST 0x0893 ; Address of begin
0891 0004 | | .CONST 0x0004 ; Address of exception handler
0892 0001 | | .CONST 0x0001 ; Number of locals
0893 BODY_0890:
0893 INIT_0890:
0893 e04c | L | Load 0x0,0x4c
0894 e011 | | Load 0x0,0x11
0895 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0896 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0897 c04c | L | Store 0x0,0x4c
0898 e04c | L | Load 0x0,0x4c
0899 e5ff | | Load 0x2,-0x1
089a e011 | | Load 0x0,0x11
089b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
089c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
089d c04c | L | Store 0x0,0x4c
089e 4801 |H | Short_Literal 0x1
089f c04d | M | Store 0x0,0x4d
08a0 4502 |E | Exit_Suprogram New_Top_Offset 0x2
08a1 0000 0000 | | .BLANK 0000[0x7]
08a8 ; --------------------------------------------------------------------------------------
08a8 ; SUBPROGRAM
08a8 ; --------------------------------------------------------------------------------------
08a8 08ab | | .CONST 0x08ab ; Address of begin
08a9 0004 | | .CONST 0x0004 ; Address of exception handler
08aa 0001 | | .CONST 0x0001 ; Number of locals
08ab BODY_08a8:
08ab INIT_08a8:
08ab e04e | N | Load 0x0,0x4e
08ac e011 | | Load 0x0,0x11
08ad 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08ae 1812 | | Execute Package,Field_Execute,Field_Number 0x12
08af c04e | N | Store 0x0,0x4e
08b0 e04e | N | Load 0x0,0x4e
08b1 e5ff | | Load 0x2,-0x1
08b2 e011 | | Load 0x0,0x11
08b3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08b4 1818 | | Execute Package,Field_Execute,Field_Number 0x18
08b5 c04e | N | Store 0x0,0x4e
08b6 4801 |H | Short_Literal 0x1
08b7 c04f | O | Store 0x0,0x4f
08b8 4502 |E | Exit_Suprogram New_Top_Offset 0x2
08b9 0000 0000 | | .BLANK 0000[0x7]
08c0 ; --------------------------------------------------------------------------------------
08c0 ; SUBPROGRAM
08c0 ; --------------------------------------------------------------------------------------
08c0 08cc | | .CONST 0x08cc ; Address of begin
08c1 0004 | | .CONST 0x0004 ; Address of exception handler
08c2 0005 | | .CONST 0x0005 ; Number of locals
08c3 INIT_08c0:
08c3 e5ff | | Load 0x2,-0x1
08c4 e011 | | Load 0x0,0x11
08c5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08c6 1816 | | Execute Package,Field_Execute,Field_Number 0x16
08c7 e037 | 7 | Load 0x0,0x37
08c8 0322 | " | Declare_Variable Record
08c9 00e1 | | Load_Encached Boolean_Cache
08ca e011 | | Load 0x0,0x11
08cb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
08cc BODY_08c0:
08cc 00e1 | | Load_Encached Boolean_Cache
08cd e403 | | Load 0x2,0x3
08ce e402 | | Load 0x2,0x2
08cf e03e | > | Load 0x0,0x3e
08d0 e03f | ? | Load 0x0,0x3f
08d1 1814 | | Execute Package,Field_Execute,Field_Number 0x14
08d2 00d1 | | Pop_Control Pop_Count_1
08d3 c404 | | Store 0x2,0x4
08d4 4801 |H | Short_Literal 0x1
08d5 e403 | | Load 0x2,0x3
08d6 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
08d7 e404 | | Load 0x2,0x4
08d8 6849 |hI | Jump_Zero 0x922
08d9 e403 | | Load 0x2,0x3
08da 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
08db 6831 |h1 | Jump_Zero 0x90d
08dc e403 | | Load 0x2,0x3
08dd 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
08de 0f01 | | Execute_Immediate Equal,0x1
08df 680f |h | Jump_Zero 0x8ef
08e0 e403 | | Load 0x2,0x3
08e1 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
08e2 e050 | P | Load 0x0,0x50
08e3 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
08e4 e403 | | Load 0x2,0x3
08e5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
08e6 e050 | P | Load 0x0,0x50
08e7 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
08e8 00d8 | | Load_Top At_Offset_0
08e9 e050 | P | Load 0x0,0x50
08ea e033 | 3 | Load 0x0,0x33
08eb 1816 | | Execute Package,Field_Execute,Field_Number 0x16
08ec 00d1 | | Pop_Control Pop_Count_1
08ed c405 | | Store 0x2,0x5
08ee 780e |x | Jump 0x8fd
08ef e403 | | Load 0x2,0x3
08f0 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
08f1 e051 | Q | Load 0x0,0x51
08f2 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
08f3 e403 | | Load 0x2,0x3
08f4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
08f5 e051 | Q | Load 0x0,0x51
08f6 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
08f7 00d8 | | Load_Top At_Offset_0
08f8 e051 | Q | Load 0x0,0x51
08f9 e033 | 3 | Load 0x0,0x33
08fa 1816 | | Execute Package,Field_Execute,Field_Number 0x16
08fb 00d1 | | Pop_Control Pop_Count_1
08fc c405 | | Store 0x2,0x5
08fd e03e | > | Load 0x0,0x3e
08fe 4800 |H | Short_Literal 0x0
08ff e403 | | Load 0x2,0x3
0900 e402 | | Load 0x2,0x2
0901 e03f | ? | Load 0x0,0x3f
0902 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0903 c03e | > | Store 0x0,0x3e
0904 00d8 | | Load_Top At_Offset_0
0905 e015 | | Load 0x0,0x15
0906 180f | | Execute Package,Field_Execute,Field_Number 0xf
0907 00d8 | | Load_Top At_Offset_0
0908 e011 | | Load 0x0,0x11
0909 1b0d | | Execute Package,Field_Read,Field_Number 0xd
090a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
090b c405 | | Store 0x2,0x5
090c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
090d e403 | | Load 0x2,0x3
090e 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
090f 482c |H, | Short_Literal 0x2c
0910 8052 | R | Call 0x0,0x52
0911 01ca | | Execute Vector,Prepend
0912 e011 | | Load 0x0,0x11
0913 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0914 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0915 e403 | | Load 0x2,0x3
0916 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
0917 e03e | > | Load 0x0,0x3e
0918 4800 |H | Short_Literal 0x0
0919 e403 | | Load 0x2,0x3
091a e402 | | Load 0x2,0x2
091b e03f | ? | Load 0x0,0x3f
091c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
091d c03e | > | Store 0x0,0x3e
091e e5ff | | Load 0x2,-0x1
091f e015 | | Load 0x0,0x15
0920 180f | | Execute Package,Field_Execute,Field_Number 0xf
0921 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0922 4800 |H | Short_Literal 0x0
0923 e403 | | Load 0x2,0x3
0924 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
0925 4800 |H | Short_Literal 0x0
0926 e403 | | Load 0x2,0x3
0927 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0928 e403 | | Load 0x2,0x3
0929 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
092a 8052 | R | Call 0x0,0x52
092b e011 | | Load 0x0,0x11
092c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
092d 1819 | | Execute Package,Field_Execute,Field_Number 0x19
092e e403 | | Load 0x2,0x3
092f 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
0930 e018 | | Load 0x0,0x18
0931 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0932 e403 | | Load 0x2,0x3
0933 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0934 e018 | | Load 0x0,0x18
0935 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0936 e403 | | Load 0x2,0x3
0937 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0938 4800 |H | Short_Literal 0x0
0939 e403 | | Load 0x2,0x3
093a 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
093b e03d | = | Load 0x0,0x3d
093c 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
093d e403 | | Load 0x2,0x3
093e 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
093f e03d | = | Load 0x0,0x3d
0940 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0941 e403 | | Load 0x2,0x3
0942 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0943 4800 |H | Short_Literal 0x0
0944 e403 | | Load 0x2,0x3
0945 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0946 e03e | > | Load 0x0,0x3e
0947 4800 |H | Short_Literal 0x0
0948 e403 | | Load 0x2,0x3
0949 e402 | | Load 0x2,0x2
094a e03f | ? | Load 0x0,0x3f
094b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
094c c03e | > | Store 0x0,0x3e
094d e5ff | | Load 0x2,-0x1
094e e015 | | Load 0x0,0x15
094f 180f | | Execute Package,Field_Execute,Field_Number 0xf
0950 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0951 0000 0000 | | .BLANK 0000[0x7]
0958 ; --------------------------------------------------------------------------------------
0958 ; SUBPROGRAM
0958 ; --------------------------------------------------------------------------------------
0958 095b | [ | .CONST 0x095b ; Address of begin
0959 0004 | | .CONST 0x0004 ; Address of exception handler
095a 0001 | | .CONST 0x0001 ; Number of locals
095b BODY_0958:
095b INIT_0958:
095b 4800 |H | Short_Literal 0x0
095c 4800 |H | Short_Literal 0x0
095d 4801 |H | Short_Literal 0x1
095e 4800 |H | Short_Literal 0x0
095f 4800 |H | Short_Literal 0x0
0960 e251 | Q | Load 0x1,0x51
0961 0a03 | | Execute_Immediate Plus,0x3
0962 e033 | 3 | Load 0x0,0x33
0963 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0964 00d9 | | Load_Top At_Offset_1
0965 00d0 | | Action Swap_Control
0966 0260 | ` | Execute Discrete,In_Type
0967 7001 |p | Jump_Nonzero 0x969
0968 0801 | | Execute_Immediate Raise,0x1
0969 e5ff | | Load 0x2,-0x1
096a 483d |H= | Short_Literal 0x3d
096b 8263 | c | Call 0x1,0x63
096c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
096d 0000 0000 | | .XXX[0x3]
096f 0000 | |
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 e053 | S | Load 0x0,0x53
0974 0d01 | | Execute_Immediate Less,0x1
0975 6805 |h | Jump_Zero 0x97b
0976 0092 13d0 | | Action Push_String_Extended,0x13d0 ; "Ignoring Pop_Setup that has no corresponding Push_Setup"
0978 e01c | | Load 0x0,0x1c
0979 180e | | Execute Package,Field_Execute,Field_Number 0xe
097a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
097b e053 | S | Load 0x0,0x53
097c 0d0b | | Execute_Immediate Less,0xb
097d 680a |h | Jump_Zero 0x988
097e e053 | S | Load 0x0,0x53
097f e054 | T | Load 0x0,0x54
0980 01d7 | | Execute Vector,Field_Read
0981 6801 |h | Jump_Zero 0x983
0982 8266 | f | Call 0x1,0x66
0983 e053 | S | Load 0x0,0x53
0984 e055 | U | Load 0x0,0x55
0985 01d5 | | Execute Vector,Field_Reference
0986 e017 | | Load 0x0,0x17
0987 017d | } | Execute Record,Structure_Write
0988 e053 | S | Load 0x0,0x53
0989 0aff | | Execute_Immediate Plus,-0x1
098a c053 | S | Store 0x0,0x53
098b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
098c 0000 0000 | | .BLANK 0000[0x4]
0990 ; --------------------------------------------------------------------------------------
0990 ; SUBPROGRAM
0990 ; --------------------------------------------------------------------------------------
0990 0993 | | .CONST 0x0993 ; Address of begin
0991 0004 | | .CONST 0x0004 ; Address of exception handler
0992 0001 | | .CONST 0x0001 ; Number of locals
0993 BODY_0990:
0993 INIT_0990:
0993 e252 | R | Load 0x1,0x52
0994 e02c | , | Load 0x0,0x2c
0995 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0996 027e | ~ | Execute Discrete,Not_Equal
0997 6806 |h | Jump_Zero 0x99e
0998 4801 |H | Short_Literal 0x1
0999 4800 |H | Short_Literal 0x0
099a e017 | | Load 0x0,0x17
099b 3c2b |<+ | Execute Record,Field_Read,Field_Number 0x2b
099c e01e | | Load 0x0,0x1e
099d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
099e e017 | | Load 0x0,0x17
099f 3c2a |<* | Execute Record,Field_Read,Field_Number 0x2a
09a0 e01d | | Load 0x0,0x1d
09a1 381a |8 | Execute Record,Field_Write,Field_Number 0x1a
09a2 4801 |H | Short_Literal 0x1
09a3 e02c | , | Load 0x0,0x2c
09a4 1820 | | Execute Package,Field_Execute,Field_Number 0x20
09a5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
09a6 0000 0000 | | .XXX[0x2]
09a8 ; --------------------------------------------------------------------------------------
09a8 ; SUBPROGRAM
09a8 ; --------------------------------------------------------------------------------------
09a8 09ab | | .CONST 0x09ab ; Address of begin
09a9 0004 | | .CONST 0x0004 ; Address of exception handler
09aa 0001 | | .CONST 0x0001 ; Number of locals
09ab BODY_09a8:
09ab INIT_09a8:
09ab e053 | S | Load 0x0,0x53
09ac 0a01 | | Execute_Immediate Plus,0x1
09ad c053 | S | Store 0x0,0x53
09ae e053 | S | Load 0x0,0x53
09af 0c0b | | Execute_Immediate Greater_Equal,0xb
09b0 6805 |h | Jump_Zero 0x9b6
09b1 0092 13d1 | | Action Push_String_Extended,0x13d1 ; "Too many Push_Setups. The setup stack is full"
09b3 e01c | | Load 0x0,0x1c
09b4 180e | | Execute Package,Field_Execute,Field_Number 0xe
09b5 7808 |x | Jump 0x9be
09b6 e017 | | Load 0x0,0x17
09b7 e053 | S | Load 0x0,0x53
09b8 e055 | U | Load 0x0,0x55
09b9 01d6 | | Execute Vector,Field_Write
09ba 4800 |H | Short_Literal 0x0
09bb e053 | S | Load 0x0,0x53
09bc e054 | T | Load 0x0,0x54
09bd 01d6 | | Execute Vector,Field_Write
09be e5ff | | Load 0x2,-0x1
09bf 8242 | B | Call 0x1,0x42
09c0 4502 |E | Exit_Suprogram New_Top_Offset 0x2
09c1 0000 0000 | | .BLANK 0000[0x7]
09c8 ; --------------------------------------------------------------------------------------
09c8 ; SUBPROGRAM
09c8 ; --------------------------------------------------------------------------------------
09c8 09d4 | | .CONST 0x09d4 ; Address of begin
09c9 0004 | | .CONST 0x0004 ; Address of exception handler
09ca 0005 | | .CONST 0x0005 ; Number of locals
09cb INIT_09c8:
09cb e5ff | | Load 0x2,-0x1
09cc e011 | | Load 0x0,0x11
09cd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09ce 1816 | | Execute Package,Field_Execute,Field_Number 0x16
09cf e037 | 7 | Load 0x0,0x37
09d0 0322 | " | Declare_Variable Record
09d1 00e1 | | Load_Encached Boolean_Cache
09d2 e011 | | Load 0x0,0x11
09d3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
09d4 BODY_09c8:
09d4 00e1 | | Load_Encached Boolean_Cache
09d5 e403 | | Load 0x2,0x3
09d6 e402 | | Load 0x2,0x2
09d7 e03e | > | Load 0x0,0x3e
09d8 e03f | ? | Load 0x0,0x3f
09d9 1814 | | Execute Package,Field_Execute,Field_Number 0x14
09da 00d1 | | Pop_Control Pop_Count_1
09db c404 | | Store 0x2,0x4
09dc 4801 |H | Short_Literal 0x1
09dd e403 | | Load 0x2,0x3
09de 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
09df e404 | | Load 0x2,0x4
09e0 688e |h | Jump_Zero 0xa6f
09e1 e403 | | Load 0x2,0x3
09e2 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
09e3 6876 |hv | Jump_Zero 0xa5a
09e4 e403 | | Load 0x2,0x3
09e5 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
09e6 7011 |p | Jump_Nonzero 0x9f8
09e7 0092 13d2 | | Action Push_String_Extended,0x13d2 ; "Label "
09e9 e402 | | Load 0x2,0x2
09ea 01cc | | Execute Vector,Catenate
09eb 0092 13d3 | | Action Push_String_Extended,0x13d3 ; " references an unnumbered object"
09ed 01cc | | Execute Vector,Catenate
09ee e01c | | Load 0x0,0x1c
09ef 180e | | Execute Package,Field_Execute,Field_Number 0xe
09f0 0092 13d4 | | Action Push_String_Extended,0x13d4 ; "UNNUMBERED"
09f2 e011 | | Load 0x0,0x11
09f3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09f4 1817 | | Execute Package,Field_Execute,Field_Number 0x17
09f5 e015 | | Load 0x0,0x15
09f6 180f | | Execute Package,Field_Execute,Field_Number 0xf
09f7 4502 |E | Exit_Suprogram New_Top_Offset 0x2
09f8 e403 | | Load 0x2,0x3
09f9 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
09fa 4604 |F | Jump_Case 0x5
09fb 7813 |x | Jump 0xa0f ; case 0x0
09fc 7821 |x! | Jump 0xa1e ; case 0x1
09fd 782f |x/ | Jump 0xa2d ; case 0x2
09fe 783d |x= | Jump 0xa3c ; case 0x3
09ff 7800 |x | Jump 0xa00 ; case 0x4
0a00 e403 | | Load 0x2,0x3
0a01 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0a02 e056 | V | Load 0x0,0x56
0a03 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0a04 e403 | | Load 0x2,0x3
0a05 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0a06 e056 | V | Load 0x0,0x56
0a07 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0a08 00d8 | | Load_Top At_Offset_0
0a09 e056 | V | Load 0x0,0x56
0a0a e033 | 3 | Load 0x0,0x33
0a0b 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0a0c 00d1 | | Pop_Control Pop_Count_1
0a0d c405 | | Store 0x2,0x5
0a0e 783b |x; | Jump 0xa4a
0a0f e403 | | Load 0x2,0x3
0a10 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0a11 e057 | W | Load 0x0,0x57
0a12 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0a13 e403 | | Load 0x2,0x3
0a14 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0a15 e057 | W | Load 0x0,0x57
0a16 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0a17 00d8 | | Load_Top At_Offset_0
0a18 e057 | W | Load 0x0,0x57
0a19 e033 | 3 | Load 0x0,0x33
0a1a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0a1b 00d1 | | Pop_Control Pop_Count_1
0a1c c405 | | Store 0x2,0x5
0a1d 782c |x, | Jump 0xa4a
0a1e e403 | | Load 0x2,0x3
0a1f 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0a20 e058 | X | Load 0x0,0x58
0a21 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0a22 e403 | | Load 0x2,0x3
0a23 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0a24 e058 | X | Load 0x0,0x58
0a25 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0a26 00d8 | | Load_Top At_Offset_0
0a27 e058 | X | Load 0x0,0x58
0a28 e033 | 3 | Load 0x0,0x33
0a29 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0a2a 00d1 | | Pop_Control Pop_Count_1
0a2b c405 | | Store 0x2,0x5
0a2c 781d |x | Jump 0xa4a
0a2d e403 | | Load 0x2,0x3
0a2e 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0a2f e059 | Y | Load 0x0,0x59
0a30 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0a31 e403 | | Load 0x2,0x3
0a32 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0a33 e059 | Y | Load 0x0,0x59
0a34 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0a35 00d8 | | Load_Top At_Offset_0
0a36 e059 | Y | Load 0x0,0x59
0a37 e033 | 3 | Load 0x0,0x33
0a38 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0a39 00d1 | | Pop_Control Pop_Count_1
0a3a c405 | | Store 0x2,0x5
0a3b 780e |x | Jump 0xa4a
0a3c e403 | | Load 0x2,0x3
0a3d 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0a3e e05a | Z | Load 0x0,0x5a
0a3f 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0a40 e403 | | Load 0x2,0x3
0a41 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0a42 e05a | Z | Load 0x0,0x5a
0a43 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0a44 00d8 | | Load_Top At_Offset_0
0a45 e05a | Z | Load 0x0,0x5a
0a46 e033 | 3 | Load 0x0,0x33
0a47 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0a48 00d1 | | Pop_Control Pop_Count_1
0a49 c405 | | Store 0x2,0x5
0a4a e03e | > | Load 0x0,0x3e
0a4b 4800 |H | Short_Literal 0x0
0a4c e403 | | Load 0x2,0x3
0a4d e402 | | Load 0x2,0x2
0a4e e03f | ? | Load 0x0,0x3f
0a4f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0a50 c03e | > | Store 0x0,0x3e
0a51 00d8 | | Load_Top At_Offset_0
0a52 e015 | | Load 0x0,0x15
0a53 180f | | Execute Package,Field_Execute,Field_Number 0xf
0a54 00d8 | | Load_Top At_Offset_0
0a55 e011 | | Load 0x0,0x11
0a56 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a57 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0a58 c405 | | Store 0x2,0x5
0a59 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0a5a e403 | | Load 0x2,0x3
0a5b 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
0a5c 482c |H, | Short_Literal 0x2c
0a5d 8052 | R | Call 0x0,0x52
0a5e 01ca | | Execute Vector,Prepend
0a5f e011 | | Load 0x0,0x11
0a60 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a61 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0a62 e403 | | Load 0x2,0x3
0a63 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
0a64 e03e | > | Load 0x0,0x3e
0a65 4800 |H | Short_Literal 0x0
0a66 e403 | | Load 0x2,0x3
0a67 e402 | | Load 0x2,0x2
0a68 e03f | ? | Load 0x0,0x3f
0a69 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0a6a c03e | > | Store 0x0,0x3e
0a6b e5ff | | Load 0x2,-0x1
0a6c e015 | | Load 0x0,0x15
0a6d 180f | | Execute Package,Field_Execute,Field_Number 0xf
0a6e 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0a6f 4800 |H | Short_Literal 0x0
0a70 e403 | | Load 0x2,0x3
0a71 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0a72 4800 |H | Short_Literal 0x0
0a73 e403 | | Load 0x2,0x3
0a74 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0a75 e403 | | Load 0x2,0x3
0a76 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
0a77 8052 | R | Call 0x0,0x52
0a78 e011 | | Load 0x0,0x11
0a79 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a7a 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0a7b e403 | | Load 0x2,0x3
0a7c 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
0a7d e018 | | Load 0x0,0x18
0a7e 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0a7f e403 | | Load 0x2,0x3
0a80 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0a81 e018 | | Load 0x0,0x18
0a82 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a83 e403 | | Load 0x2,0x3
0a84 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0a85 4800 |H | Short_Literal 0x0
0a86 e403 | | Load 0x2,0x3
0a87 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0a88 e03d | = | Load 0x0,0x3d
0a89 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0a8a e403 | | Load 0x2,0x3
0a8b 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0a8c e03d | = | Load 0x0,0x3d
0a8d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a8e e403 | | Load 0x2,0x3
0a8f 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0a90 4800 |H | Short_Literal 0x0
0a91 e403 | | Load 0x2,0x3
0a92 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0a93 e03e | > | Load 0x0,0x3e
0a94 4800 |H | Short_Literal 0x0
0a95 e403 | | Load 0x2,0x3
0a96 e402 | | Load 0x2,0x2
0a97 e03f | ? | Load 0x0,0x3f
0a98 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0a99 c03e | > | Store 0x0,0x3e
0a9a e5ff | | Load 0x2,-0x1
0a9b e015 | | Load 0x0,0x15
0a9c 180f | | Execute Package,Field_Execute,Field_Number 0xf
0a9d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0a9e 0000 0000 | | .XXX[0x2]
0aa0 ; --------------------------------------------------------------------------------------
0aa0 ; SUBPROGRAM
0aa0 ; --------------------------------------------------------------------------------------
0aa0 0aa3 | | .CONST 0x0aa3 ; Address of begin
0aa1 0004 | | .CONST 0x0004 ; Address of exception handler
0aa2 0001 | | .CONST 0x0001 ; Number of locals
0aa3 BODY_0aa0:
0aa3 INIT_0aa0:
0aa3 e05b | [ | Load 0x0,0x5b
0aa4 e011 | | Load 0x0,0x11
0aa5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0aa6 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0aa7 c05b | [ | Store 0x0,0x5b
0aa8 e05b | [ | Load 0x0,0x5b
0aa9 e5ff | | Load 0x2,-0x1
0aaa e011 | | Load 0x0,0x11
0aab 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0aac 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0aad c05b | [ | Store 0x0,0x5b
0aae 4801 |H | Short_Literal 0x1
0aaf c05c | \ | Store 0x0,0x5c
0ab0 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0ab1 0000 0000 | | .BLANK 0000[0x7]
0ab8 ; --------------------------------------------------------------------------------------
0ab8 ; SUBPROGRAM
0ab8 ; --------------------------------------------------------------------------------------
0ab8 0abb | | .CONST 0x0abb ; Address of begin
0ab9 0004 | | .CONST 0x0004 ; Address of exception handler
0aba 0001 | | .CONST 0x0001 ; Number of locals
0abb BODY_0ab8:
0abb INIT_0ab8:
0abb e05d | ] | Load 0x0,0x5d
0abc e011 | | Load 0x0,0x11
0abd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0abe 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0abf c05d | ] | Store 0x0,0x5d
0ac0 e05d | ] | Load 0x0,0x5d
0ac1 e5ff | | Load 0x2,-0x1
0ac2 e011 | | Load 0x0,0x11
0ac3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ac4 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0ac5 c05d | ] | Store 0x0,0x5d
0ac6 4801 |H | Short_Literal 0x1
0ac7 c05e | ^ | Store 0x0,0x5e
0ac8 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0ac9 0000 0000 | | .BLANK 0000[0x7]
0ad0 ; --------------------------------------------------------------------------------------
0ad0 ; SUBPROGRAM
0ad0 ; --------------------------------------------------------------------------------------
0ad0 0ad3 | | .CONST 0x0ad3 ; Address of begin
0ad1 0004 | | .CONST 0x0004 ; Address of exception handler
0ad2 0001 | | .CONST 0x0001 ; Number of locals
0ad3 BODY_0ad0:
0ad3 INIT_0ad0:
0ad3 4800 |H | Short_Literal 0x0
0ad4 4800 |H | Short_Literal 0x0
0ad5 4801 |H | Short_Literal 0x1
0ad6 4800 |H | Short_Literal 0x0
0ad7 4800 |H | Short_Literal 0x0
0ad8 e251 | Q | Load 0x1,0x51
0ad9 0a01 | | Execute_Immediate Plus,0x1
0ada e033 | 3 | Load 0x0,0x33
0adb 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0adc 00d9 | | Load_Top At_Offset_1
0add 00d0 | | Action Swap_Control
0ade 0260 | ` | Execute Discrete,In_Type
0adf 7001 |p | Jump_Nonzero 0xae1
0ae0 0801 | | Execute_Immediate Raise,0x1
0ae1 e5ff | | Load 0x2,-0x1
0ae2 484a |HJ | Short_Literal 0x4a
0ae3 8263 | c | Call 0x1,0x63
0ae4 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0ae5 0000 0000 | | .XXX[0x3]
0ae7 0000 | |
0ae8 ; --------------------------------------------------------------------------------------
0ae8 ; SUBPROGRAM
0ae8 ; --------------------------------------------------------------------------------------
0ae8 0aeb | | .CONST 0x0aeb ; Address of begin
0ae9 0004 | | .CONST 0x0004 ; Address of exception handler
0aea 0001 | | .CONST 0x0001 ; Number of locals
0aeb BODY_0ae8:
0aeb INIT_0ae8:
0aeb e02b | + | Load 0x0,0x2b
0aec 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0aed 0f0f | | Execute_Immediate Equal,0xf
0aee 680b |h | Jump_Zero 0xafa
0aef 0092 13d5 | | Action Push_String_Extended,0x13d5 ; "Ignoring "
0af1 e5fe | | Load 0x2,-0x2
0af2 805f | _ | Call 0x0,0x5f
0af3 01cc | | Execute Vector,Catenate
0af4 0092 13d6 | | Action Push_String_Extended,0x13d6 ; " that is nested too deeply"
0af6 01cc | | Execute Vector,Catenate
0af7 e01c | | Load 0x0,0x1c
0af8 180e | | Execute Package,Field_Execute,Field_Number 0xe
0af9 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0afa e5ff | | Load 0x2,-0x1
0afb 6802 |h | Jump_Zero 0xafe
0afc e5fe | | Load 0x2,-0x2
0afd 801f | | Call 0x0,0x1f
0afe e01d | | Load 0x0,0x1d
0aff 3c16 |< | Execute Record,Field_Read,Field_Number 0x16
0b00 e017 | | Load 0x0,0x17
0b01 3c20 |< | Execute Record,Field_Read,Field_Number 0x20
0b02 0273 | s | Execute Discrete,Plus
0b03 e01d | | Load 0x0,0x1d
0b04 3816 |8 | Execute Record,Field_Write,Field_Number 0x16
0b05 4830 |H0 | Short_Literal 0x30
0b06 e01d | | Load 0x0,0x1d
0b07 381c |8 | Execute Record,Field_Write,Field_Number 0x1c
0b08 4800 |H | Short_Literal 0x0
0b09 e01d | | Load 0x0,0x1d
0b0a 381d |8 | Execute Record,Field_Write,Field_Number 0x1d
0b0b e02b | + | Load 0x0,0x2b
0b0c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0b0d 0a01 | | Execute_Immediate Plus,0x1
0b0e e02b | + | Load 0x0,0x2b
0b0f 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0b10 e015 | | Load 0x0,0x15
0b11 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b12 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0b13 0000 0000 | | .BLANK 0000[0x5]
0b18 ; --------------------------------------------------------------------------------------
0b18 ; SUBPROGRAM
0b18 ; --------------------------------------------------------------------------------------
0b18 0b1b | | .CONST 0x0b1b ; Address of begin
0b19 0004 | | .CONST 0x0004 ; Address of exception handler
0b1a 0001 | | .CONST 0x0001 ; Number of locals
0b1b BODY_0b18:
0b1b INIT_0b18:
0b1b e02d | - | Load 0x0,0x2d
0b1c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0b1d 0f0f | | Execute_Immediate Equal,0xf
0b1e 680b |h | Jump_Zero 0xb2a
0b1f 0092 13d5 | | Action Push_String_Extended,0x13d5 ; "Ignoring "
0b21 e5fe | | Load 0x2,-0x2
0b22 805f | _ | Call 0x0,0x5f
0b23 01cc | | Execute Vector,Catenate
0b24 0092 13d6 | | Action Push_String_Extended,0x13d6 ; " that is nested too deeply"
0b26 01cc | | Execute Vector,Catenate
0b27 e01c | | Load 0x0,0x1c
0b28 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b29 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0b2a e5ff | | Load 0x2,-0x1
0b2b 6802 |h | Jump_Zero 0xb2e
0b2c e5fe | | Load 0x2,-0x2
0b2d 801f | | Call 0x0,0x1f
0b2e e01d | | Load 0x0,0x1d
0b2f 3c16 |< | Execute Record,Field_Read,Field_Number 0x16
0b30 e017 | | Load 0x0,0x17
0b31 3c20 |< | Execute Record,Field_Read,Field_Number 0x20
0b32 0273 | s | Execute Discrete,Plus
0b33 e01d | | Load 0x0,0x1d
0b34 3816 |8 | Execute Record,Field_Write,Field_Number 0x16
0b35 4830 |H0 | Short_Literal 0x30
0b36 e01d | | Load 0x0,0x1d
0b37 381c |8 | Execute Record,Field_Write,Field_Number 0x1c
0b38 4800 |H | Short_Literal 0x0
0b39 e01d | | Load 0x0,0x1d
0b3a 381d |8 | Execute Record,Field_Write,Field_Number 0x1d
0b3b e02d | - | Load 0x0,0x2d
0b3c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0b3d 0a01 | | Execute_Immediate Plus,0x1
0b3e e02d | - | Load 0x0,0x2d
0b3f 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0b40 4800 |H | Short_Literal 0x0
0b41 e02d | - | Load 0x0,0x2d
0b42 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0b43 e02d | - | Load 0x0,0x2d
0b44 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0b45 01d6 | | Execute Vector,Field_Write
0b46 e015 | | Load 0x0,0x15
0b47 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b48 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0b49 0000 0000 | | .BLANK 0000[0x7]
0b50 ; --------------------------------------------------------------------------------------
0b50 ; SUBPROGRAM
0b50 ; --------------------------------------------------------------------------------------
0b50 0b59 | Y | .CONST 0x0b59 ; Address of begin
0b51 0004 | | .CONST 0x0004 ; Address of exception handler
0b52 0004 | | .CONST 0x0004 ; Number of locals
0b53 INIT_0b50:
0b53 e011 | | Load 0x0,0x11
0b54 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0b55 e046 | F | Load 0x0,0x46
0b56 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
0b57 029f 1193 | | Declare_Subprogram INIT_1190,For_Call
0b59 BODY_0b50:
0b59 e5ff | | Load 0x2,-0x1
0b5a e011 | | Load 0x0,0x11
0b5b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b5c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0b5d e046 | F | Load 0x0,0x46
0b5e 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0b5f a403 | | Store_Unchecked 0x2,0x3
0b60 8404 | | Call 0x2,0x4
0b61 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0b62 0000 0000 | | .BLANK 0000[0x6]
0b68 ; --------------------------------------------------------------------------------------
0b68 ; SUBPROGRAM
0b68 ; --------------------------------------------------------------------------------------
0b68 0b6b | k | .CONST 0x0b6b ; Address of begin
0b69 0004 | | .CONST 0x0004 ; Address of exception handler
0b6a 0001 | | .CONST 0x0001 ; Number of locals
0b6b BODY_0b68:
0b6b INIT_0b68:
0b6b 4800 |H | Short_Literal 0x0
0b6c 4800 |H | Short_Literal 0x0
0b6d 4801 |H | Short_Literal 0x1
0b6e 4800 |H | Short_Literal 0x0
0b6f 4800 |H | Short_Literal 0x0
0b70 e251 | Q | Load 0x1,0x51
0b71 0a04 | | Execute_Immediate Plus,0x4
0b72 e033 | 3 | Load 0x0,0x33
0b73 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0b74 00d9 | | Load_Top At_Offset_1
0b75 00d0 | | Action Swap_Control
0b76 0260 | ` | Execute Discrete,In_Type
0b77 7001 |p | Jump_Nonzero 0xb79
0b78 0801 | | Execute_Immediate Raise,0x1
0b79 e5ff | | Load 0x2,-0x1
0b7a 4852 |HR | Short_Literal 0x52
0b7b 8263 | c | Call 0x1,0x63
0b7c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0b7d 0000 0000 | | .XXX[0x3]
0b7f 0000 | |
0b80 ; --------------------------------------------------------------------------------------
0b80 ; SUBPROGRAM
0b80 ; --------------------------------------------------------------------------------------
0b80 0b83 | | .CONST 0x0b83 ; Address of begin
0b81 0004 | | .CONST 0x0004 ; Address of exception handler
0b82 0001 | | .CONST 0x0001 ; Number of locals
0b83 BODY_0b80:
0b83 INIT_0b80:
0b83 4800 |H | Short_Literal 0x0
0b84 4800 |H | Short_Literal 0x0
0b85 4801 |H | Short_Literal 0x1
0b86 4800 |H | Short_Literal 0x0
0b87 4800 |H | Short_Literal 0x0
0b88 e251 | Q | Load 0x1,0x51
0b89 0a02 | | Execute_Immediate Plus,0x2
0b8a e033 | 3 | Load 0x0,0x33
0b8b 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0b8c 00d9 | | Load_Top At_Offset_1
0b8d 00d0 | | Action Swap_Control
0b8e 0260 | ` | Execute Discrete,In_Type
0b8f 7001 |p | Jump_Nonzero 0xb91
0b90 0801 | | Execute_Immediate Raise,0x1
0b91 e5ff | | Load 0x2,-0x1
0b92 4854 |HT | Short_Literal 0x54
0b93 8263 | c | Call 0x1,0x63
0b94 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0b95 0000 0000 | | .XXX[0x3]
0b97 0000 | |
0b98 ; --------------------------------------------------------------------------------------
0b98 ; SUBPROGRAM
0b98 ; --------------------------------------------------------------------------------------
0b98 0ba3 | | .CONST 0x0ba3 ; Address of begin
0b99 0bb0 | | .CONST 0x0bb0 ; Address of exception handler
0b9a 0005 | | .CONST 0x0005 ; Number of locals
0b9b INIT_0b98:
0b9b e011 | | Load 0x0,0x11
0b9c 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
0b9d e254 | T | Load 0x1,0x54
0b9e 0007 | | Action Break_Optional
0b9f e011 | | Load 0x0,0x11
0ba0 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0ba1 029f 11fb | | Declare_Subprogram INIT_11f8,For_Call
0ba3 BODY_0b98:
0ba3 8405 | | Call 0x2,0x5
0ba4 e5ff | | Load 0x2,-0x1
0ba5 e011 | | Load 0x0,0x11
0ba6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ba7 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0ba8 e011 | | Load 0x0,0x11
0ba9 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0baa 1c02 | | Execute_Immediate Run_Utility,0x2
0bab a404 | | Store_Unchecked 0x2,0x4
0bac e404 | | Load 0x2,0x4
0bad e015 | | Load 0x0,0x15
0bae 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0baf 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0bb0 TRAP_0b98:
0bb0 010e | | Execute Exception,Is_Constraint_Error
0bb1 680d |h | Jump_Zero 0xbbf
0bb2 0092 13ad | | Action Push_String_Extended,0x13ad ; "'"
0bb4 e5ff | | Load 0x2,-0x1
0bb5 e011 | | Load 0x0,0x11
0bb6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0bb7 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0bb8 01cc | | Execute Vector,Catenate
0bb9 0092 13d7 | | Action Push_String_Extended,0x13d7 ; "' is not a valid symbol or character name"
0bbb 01cc | | Execute Vector,Catenate
0bbc e01c | | Load 0x0,0x1c
0bbd 180e | | Execute Package,Field_Execute,Field_Number 0xe
0bbe 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0bbf 0100 | | Execute Exception,Raise
0bc0 ; --------------------------------------------------------------------------------------
0bc0 ; SUBPROGRAM
0bc0 ; --------------------------------------------------------------------------------------
0bc0 0bdf | | .CONST 0x0bdf ; Address of begin
0bc1 0004 | | .CONST 0x0004 ; Address of exception handler
0bc2 0004 | | .CONST 0x0004 ; Number of locals
0bc3 INIT_0bc0:
0bc3 e5ff | | Load 0x2,-0x1
0bc4 e011 | | Load 0x0,0x11
0bc5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0bc6 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0bc7 e060 | ` | Load 0x0,0x60
0bc8 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0bc9 4801 |H | Short_Literal 0x1
0bca e402 | | Load 0x2,0x2
0bcb e060 | ` | Load 0x0,0x60
0bcc 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0bcd 4801 |H | Short_Literal 0x1
0bce e402 | | Load 0x2,0x2
0bcf e060 | ` | Load 0x0,0x60
0bd0 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0bd1 0279 | y | Execute Discrete,And
0bd2 00e1 | | Load_Encached Boolean_Cache
0bd3 03f1 | | Declare_Variable Discrete,With_Value
0bd4 4802 |H | Short_Literal 0x2
0bd5 e402 | | Load 0x2,0x2
0bd6 e060 | ` | Load 0x0,0x60
0bd7 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0bd8 4802 |H | Short_Literal 0x2
0bd9 e402 | | Load 0x2,0x2
0bda e060 | ` | Load 0x0,0x60
0bdb 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0bdc 0279 | y | Execute Discrete,And
0bdd 00e1 | | Load_Encached Boolean_Cache
0bde 03f1 | | Declare_Variable Discrete,With_Value
0bdf BODY_0bc0:
0bdf e03b | ; | Load 0x0,0x3b
0be0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0be1 7005 |p | Jump_Nonzero 0xbe7
0be2 0092 13d8 | | Action Push_String_Extended,0x13d8 ; "Ignoring Table_Title not bracketed by Begin(Table) and End(Table)"
0be4 e01c | | Load 0x0,0x1c
0be5 180e | | Execute Package,Field_Execute,Field_Number 0xe
0be6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0be7 e403 | | Load 0x2,0x3
0be8 e404 | | Load 0x2,0x4
0be9 0279 | y | Execute Discrete,And
0bea 681f |h | Jump_Zero 0xc0a
0beb e03b | ; | Load 0x0,0x3b
0bec 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0bed 00ea | | Load_Encached Null_String_Cache
0bee 4801 |H | Short_Literal 0x1
0bef e402 | | Load 0x2,0x2
0bf0 e060 | ` | Load 0x0,0x60
0bf1 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0bf2 e011 | | Load 0x0,0x11
0bf3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0bf4 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0bf5 e011 | | Load 0x0,0x11
0bf6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0bf7 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0bf8 e03b | ; | Load 0x0,0x3b
0bf9 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0bfa e03b | ; | Load 0x0,0x3b
0bfb 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0bfc 00ea | | Load_Encached Null_String_Cache
0bfd 4802 |H | Short_Literal 0x2
0bfe e402 | | Load 0x2,0x2
0bff e060 | ` | Load 0x0,0x60
0c00 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0c01 e011 | | Load 0x0,0x11
0c02 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c03 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0c04 e011 | | Load 0x0,0x11
0c05 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c06 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0c07 e03b | ; | Load 0x0,0x3b
0c08 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
0c09 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0c0a e403 | | Load 0x2,0x3
0c0b 6822 |h" | Jump_Zero 0xc2e
0c0c e03b | ; | Load 0x0,0x3b
0c0d 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0c0e 00ea | | Load_Encached Null_String_Cache
0c0f 4801 |H | Short_Literal 0x1
0c10 e402 | | Load 0x2,0x2
0c11 e060 | ` | Load 0x0,0x60
0c12 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0c13 e011 | | Load 0x0,0x11
0c14 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c15 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0c16 e011 | | Load 0x0,0x11
0c17 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c18 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0c19 e03b | ; | Load 0x0,0x3b
0c1a 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0c1b e03b | ; | Load 0x0,0x3b
0c1c 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0c1d e03b | ; | Load 0x0,0x3b
0c1e 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0c1f e011 | | Load 0x0,0x11
0c20 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c21 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0c22 e03b | ; | Load 0x0,0x3b
0c23 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
0c24 e03b | ; | Load 0x0,0x3b
0c25 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0c26 0092 13d9 | | Action Push_String_Extended,0x13d9 ; " (continued)"
0c28 e011 | | Load 0x0,0x11
0c29 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c2a 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0c2b e03b | ; | Load 0x0,0x3b
0c2c 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
0c2d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0c2e 00d8 | | Load_Top At_Offset_0
0c2f 681d |h | Jump_Zero 0xc4d
0c30 0092 13da | | Action Push_String_Extended,0x13da ; "No Title specified; using Repeat_Title"
0c32 e01c | | Load 0x0,0x1c
0c33 180f | | Execute Package,Field_Execute,Field_Number 0xf
0c34 e03b | ; | Load 0x0,0x3b
0c35 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0c36 00ea | | Load_Encached Null_String_Cache
0c37 4802 |H | Short_Literal 0x2
0c38 e402 | | Load 0x2,0x2
0c39 e060 | ` | Load 0x0,0x60
0c3a 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0c3b e011 | | Load 0x0,0x11
0c3c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c3d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0c3e e011 | | Load 0x0,0x11
0c3f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c40 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0c41 e03b | ; | Load 0x0,0x3b
0c42 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
0c43 e03b | ; | Load 0x0,0x3b
0c44 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0c45 e03b | ; | Load 0x0,0x3b
0c46 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0c47 e011 | | Load 0x0,0x11
0c48 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c49 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0c4a e03b | ; | Load 0x0,0x3b
0c4b 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0c4c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0c4d e03b | ; | Load 0x0,0x3b
0c4e 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0c4f e5ff | | Load 0x2,-0x1
0c50 e011 | | Load 0x0,0x11
0c51 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c52 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0c53 e03b | ; | Load 0x0,0x3b
0c54 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0c55 e03b | ; | Load 0x0,0x3b
0c56 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0c57 e5ff | | Load 0x2,-0x1
0c58 e011 | | Load 0x0,0x11
0c59 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c5a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0c5b e03b | ; | Load 0x0,0x3b
0c5c 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
0c5d e03b | ; | Load 0x0,0x3b
0c5e 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0c5f 0092 13d9 | | Action Push_String_Extended,0x13d9 ; " (continued)"
0c61 e011 | | Load 0x0,0x11
0c62 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c63 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0c64 e03b | ; | Load 0x0,0x3b
0c65 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
0c66 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0c67 0000 | | .XXX[0x1]
0c68 ; --------------------------------------------------------------------------------------
0c68 ; SUBPROGRAM
0c68 ; --------------------------------------------------------------------------------------
0c68 0c6b | k | .CONST 0x0c6b ; Address of begin
0c69 0004 | | .CONST 0x0004 ; Address of exception handler
0c6a 0001 | | .CONST 0x0001 ; Number of locals
0c6b BODY_0c68:
0c6b INIT_0c68:
0c6b 4800 |H | Short_Literal 0x0
0c6c e01d | | Load 0x0,0x1d
0c6d 3818 |8 | Execute Record,Field_Write,Field_Number 0x18
0c6e 4801 |H | Short_Literal 0x1
0c6f 4800 |H | Short_Literal 0x0
0c70 e017 | | Load 0x0,0x17
0c71 3c2b |<+ | Execute Record,Field_Read,Field_Number 0x2b
0c72 e01e | | Load 0x0,0x1e
0c73 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0c74 4801 |H | Short_Literal 0x1
0c75 e02c | , | Load 0x0,0x2c
0c76 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0c77 e5ff | | Load 0x2,-0x1
0c78 e015 | | Load 0x0,0x15
0c79 180f | | Execute Package,Field_Execute,Field_Number 0xf
0c7a 4940 |I@ | Short_Literal 0x140
0c7b e015 | | Load 0x0,0x15
0c7c 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0c7d e02c | , | Load 0x0,0x2c
0c7e 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0c7f e01d | | Load 0x0,0x1d
0c80 3c16 |< | Execute Record,Field_Read,Field_Number 0x16
0c81 0272 | r | Execute Discrete,Minus
0c82 e01d | | Load 0x0,0x1d
0c83 3818 |8 | Execute Record,Field_Write,Field_Number 0x18
0c84 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0c85 0000 0000 | | .XXX[0x3]
0c87 0000 | |
0c88 ; --------------------------------------------------------------------------------------
0c88 ; SUBPROGRAM
0c88 ; --------------------------------------------------------------------------------------
0c88 0c8b | | .CONST 0x0c8b ; Address of begin
0c89 0004 | | .CONST 0x0004 ; Address of exception handler
0c8a 0001 | | .CONST 0x0001 ; Number of locals
0c8b BODY_0c88:
0c8b INIT_0c88:
0c8b 8228 | ( | Call 0x1,0x28
0c8c 4830 |H0 | Short_Literal 0x30
0c8d e01d | | Load 0x0,0x1d
0c8e 381c |8 | Execute Record,Field_Write,Field_Number 0x1c
0c8f 4800 |H | Short_Literal 0x0
0c90 e01d | | Load 0x0,0x1d
0c91 381d |8 | Execute Record,Field_Write,Field_Number 0x1d
0c92 4801 |H | Short_Literal 0x1
0c93 e02c | , | Load 0x0,0x2c
0c94 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0c95 e5ff | | Load 0x2,-0x1
0c96 e015 | | Load 0x0,0x15
0c97 180f | | Execute Package,Field_Execute,Field_Number 0xf
0c98 e015 | | Load 0x0,0x15
0c99 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c9a 4801 |H | Short_Literal 0x1
0c9b a253 | S | Store_Unchecked 0x1,0x53
0c9c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0c9d 0000 0000 | | .XXX[0x3]
0c9f 0000 | |
0ca0 ; --------------------------------------------------------------------------------------
0ca0 ; SUBPROGRAM
0ca0 ; --------------------------------------------------------------------------------------
0ca0 0ca3 | | .CONST 0x0ca3 ; Address of begin
0ca1 0004 | | .CONST 0x0004 ; Address of exception handler
0ca2 0001 | | .CONST 0x0001 ; Number of locals
0ca3 BODY_0ca0:
0ca3 INIT_0ca0:
0ca3 8230 | 0 | Call 0x1,0x30
0ca4 4830 |H0 | Short_Literal 0x30
0ca5 e01d | | Load 0x0,0x1d
0ca6 381c |8 | Execute Record,Field_Write,Field_Number 0x1c
0ca7 4800 |H | Short_Literal 0x0
0ca8 e01d | | Load 0x0,0x1d
0ca9 381d |8 | Execute Record,Field_Write,Field_Number 0x1d
0caa 4801 |H | Short_Literal 0x1
0cab e02c | , | Load 0x0,0x2c
0cac 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0cad e5ff | | Load 0x2,-0x1
0cae e015 | | Load 0x0,0x15
0caf 180f | | Execute Package,Field_Execute,Field_Number 0xf
0cb0 e015 | | Load 0x0,0x15
0cb1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0cb2 4801 |H | Short_Literal 0x1
0cb3 a253 | S | Store_Unchecked 0x1,0x53
0cb4 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0cb5 0000 0000 | | .XXX[0x3]
0cb7 0000 | |
0cb8 ; --------------------------------------------------------------------------------------
0cb8 ; SUBPROGRAM
0cb8 ; --------------------------------------------------------------------------------------
0cb8 0cbb | | .CONST 0x0cbb ; Address of begin
0cb9 0004 | | .CONST 0x0004 ; Address of exception handler
0cba 0001 | | .CONST 0x0001 ; Number of locals
0cbb BODY_0cb8:
0cbb INIT_0cb8:
0cbb 4607 |F | Jump_Case 0x8
0cbc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
0cbd 7806 |x | Jump 0xcc4 ; case 0x1
0cbe 7809 |x | Jump 0xcc8 ; case 0x2
0cbf 780d |x | Jump 0xccd ; case 0x3
0cc0 7810 |x | Jump 0xcd1 ; case 0x4
0cc1 7811 |x | Jump 0xcd3 ; case 0x5
0cc2 7812 |x | Jump 0xcd5 ; case 0x6
0cc3 7815 |x | Jump 0xcd9 ; case 0x7
0cc4 00da | | Load_Top At_Offset_2
0cc5 0091 12ac | | Action Push_String_Extended_Indexed,0x12ac ; "U_000"
0cc7 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0cc8 00db | | Load_Top At_Offset_3
0cc9 00db | | Load_Top At_Offset_3
0cca 00e0 | | Load_Encached Standard_Cache
0ccb 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0ccc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0ccd 00da | | Load_Top At_Offset_2
0cce 00e0 | | Load_Encached Standard_Cache
0ccf 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0cd0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0cd1 00db | | Load_Top At_Offset_3
0cd2 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0cd3 00db | | Load_Top At_Offset_3
0cd4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0cd5 e254 | T | Load 0x1,0x54
0cd6 00dc | | Load_Top At_Offset_4
0cd7 0267 | g | Execute Discrete,Predecessor
0cd8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0cd9 e254 | T | Load 0x1,0x54
0cda 00dc | | Load_Top At_Offset_4
0cdb 0268 | h | Execute Discrete,Successor
0cdc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0cdd 0000 0000 | | .XXX[0x3]
0cdf 0000 | |
0ce0 ; --------------------------------------------------------------------------------------
0ce0 ; SUBPROGRAM
0ce0 ; --------------------------------------------------------------------------------------
0ce0 0cee | | .CONST 0x0cee ; Address of begin
0ce1 0004 | | .CONST 0x0004 ; Address of exception handler
0ce2 0009 | | .CONST 0x0009 ; Number of locals
0ce3 INIT_0ce0:
0ce3 e011 | | Load 0x0,0x11
0ce4 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0ce5 00e1 | | Load_Encached Boolean_Cache
0ce6 00e2 | | Load_Encached Integer_Cache
0ce7 03e9 | | Declare_Variable Discrete,Duplicate
0ce8 00e2 | | Load_Encached Integer_Cache
0ce9 03e9 | | Declare_Variable Discrete,Duplicate
0cea 029f 1233 | 3| Declare_Subprogram INIT_1230,For_Call
0cec 029f 1243 | C| Declare_Subprogram INIT_1240,For_Call
0cee BODY_0ce0:
0cee e5ff | | Load 0x2,-0x1
0cef 0d00 | | Execute_Immediate Less,0x0
0cf0 6806 |h | Jump_Zero 0xcf7
0cf1 4801 |H | Short_Literal 0x1
0cf2 a403 | | Store_Unchecked 0x2,0x3
0cf3 e5ff | | Load 0x2,-0x1
0cf4 0275 | u | Execute Discrete,Unary_Minus
0cf5 a402 | | Store_Unchecked 0x2,0x2
0cf6 7804 |x | Jump 0xcfb
0cf7 4800 |H | Short_Literal 0x0
0cf8 a403 | | Store_Unchecked 0x2,0x3
0cf9 e5ff | | Load 0x2,-0x1
0cfa a402 | | Store_Unchecked 0x2,0x2
0cfb e402 | | Load 0x2,0x2
0cfc 4be8 |K | Short_Literal 0x3e8
0cfd 0270 | p | Execute Discrete,Divide
0cfe a404 | | Store_Unchecked 0x2,0x4
0cff e402 | | Load 0x2,0x2
0d00 4be8 |K | Short_Literal 0x3e8
0d01 026e | n | Execute Discrete,Modulo
0d02 4be8 |K | Short_Literal 0x3e8
0d03 0271 | q | Execute Discrete,Times
0d04 4be8 |K | Short_Literal 0x3e8
0d05 0270 | p | Execute Discrete,Divide
0d06 00d8 | | Load_Top At_Offset_0
0d07 00e2 | | Load_Encached Integer_Cache
0d08 0260 | ` | Execute Discrete,In_Type
0d09 7001 |p | Jump_Nonzero 0xd0b
0d0a 0801 | | Execute_Immediate Raise,0x1
0d0b a405 | | Store_Unchecked 0x2,0x5
0d0c e402 | | Load 0x2,0x2
0d0d 601e |` | Indirect_Literal Discrete,0xd2c,{0x00000000, 0x00011940}
0d0e 0270 | p | Execute Discrete,Divide
0d0f a406 | | Store_Unchecked 0x2,0x6
0d10 e402 | | Load 0x2,0x2
0d11 601a |` | Indirect_Literal Discrete,0xd2c,{0x00000000, 0x00011940}
0d12 026e | n | Execute Discrete,Modulo
0d13 4be8 |K | Short_Literal 0x3e8
0d14 0271 | q | Execute Discrete,Times
0d15 6016 |` | Indirect_Literal Discrete,0xd2c,{0x00000000, 0x00011940}
0d16 0270 | p | Execute Discrete,Divide
0d17 00d8 | | Load_Top At_Offset_0
0d18 00e2 | | Load_Encached Integer_Cache
0d19 0260 | ` | Execute Discrete,In_Type
0d1a 7001 |p | Jump_Nonzero 0xd1c
0d1b 0801 | | Execute_Immediate Raise,0x1
0d1c a407 | | Store_Unchecked 0x2,0x7
0d1d e405 | | Load 0x2,0x5
0d1e e404 | | Load 0x2,0x4
0d1f 8409 | | Call 0x2,0x9
0d20 0092 13db | | Action Push_String_Extended,0x13db ; " points = "
0d22 01cc | | Execute Vector,Catenate
0d23 e407 | | Load 0x2,0x7
0d24 e406 | | Load 0x2,0x6
0d25 8409 | | Call 0x2,0x9
0d26 01cc | | Execute Vector,Catenate
0d27 0092 13dc | | Action Push_String_Extended,0x13dc ; " inches"
0d29 01cc | | Execute Vector,Catenate
0d2a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0d2b 0000 | | .XXX[0x1]
0d2c 0000 0000 | | .LITERAL {0x00000000, 0x00011940}
0d30 ; --------------------------------------------------------------------------------------
0d30 ; SUBPROGRAM
0d30 ; --------------------------------------------------------------------------------------
0d30 0d33 | 3 | .CONST 0x0d33 ; Address of begin
0d31 0004 | | .CONST 0x0004 ; Address of exception handler
0d32 0001 | | .CONST 0x0001 ; Number of locals
0d33 BODY_0d30:
0d33 INIT_0d30:
0d33 4800 |H | Short_Literal 0x0
0d34 4800 |H | Short_Literal 0x0
0d35 e5ff | | Load 0x2,-0x1
0d36 0092 13dd | | Action Push_String_Extended,0x13dd ; " = "
0d38 01cc | | Execute Vector,Catenate
0d39 e5fe | | Load 0x2,-0x2
0d3a 8255 | U | Call 0x1,0x55
0d3b 01cc | | Execute Vector,Catenate
0d3c e01c | | Load 0x0,0x1c
0d3d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0d3e 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0d3f 0000 | | .XXX[0x1]
0d40 ; --------------------------------------------------------------------------------------
0d40 ; SUBPROGRAM
0d40 ; --------------------------------------------------------------------------------------
0d40 0d43 | C | .CONST 0x0d43 ; Address of begin
0d41 0004 | | .CONST 0x0004 ; Address of exception handler
0d42 0001 | | .CONST 0x0001 ; Number of locals
0d43 BODY_0d40:
0d43 INIT_0d40:
0d43 e5fe | | Load 0x2,-0x2
0d44 0d00 | | Execute_Immediate Less,0x0
0d45 6810 |h | Jump_Zero 0xd56
0d46 4800 |H | Short_Literal 0x0
0d47 4800 |H | Short_Literal 0x0
0d48 e5ff | | Load 0x2,-0x1
0d49 0092 13dd | | Action Push_String_Extended,0x13dd ; " = "
0d4b 01cc | | Execute Vector,Catenate
0d4c e5fe | | Load 0x2,-0x2
0d4d 00e0 | | Load_Encached Standard_Cache
0d4e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0d4f 01cc | | Execute Vector,Catenate
0d50 0092 13de | | Action Push_String_Extended,0x13de ; " points"
0d52 01cc | | Execute Vector,Catenate
0d53 e01c | | Load 0x0,0x1c
0d54 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0d55 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0d56 4800 |H | Short_Literal 0x0
0d57 4800 |H | Short_Literal 0x0
0d58 e5ff | | Load 0x2,-0x1
0d59 0092 13df | | Action Push_String_Extended,0x13df ; " ="
0d5b 01cc | | Execute Vector,Catenate
0d5c e5fe | | Load 0x2,-0x2
0d5d 00e0 | | Load_Encached Standard_Cache
0d5e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0d5f 01cc | | Execute Vector,Catenate
0d60 0092 13de | | Action Push_String_Extended,0x13de ; " points"
0d62 01cc | | Execute Vector,Catenate
0d63 e01c | | Load 0x0,0x1c
0d64 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0d65 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0d66 0000 0000 | | .XXX[0x2]
0d68 ; --------------------------------------------------------------------------------------
0d68 ; SUBPROGRAM
0d68 ; --------------------------------------------------------------------------------------
0d68 0d6b | k | .CONST 0x0d6b ; Address of begin
0d69 0004 | | .CONST 0x0004 ; Address of exception handler
0d6a 0001 | | .CONST 0x0001 ; Number of locals
0d6b BODY_0d68:
0d6b INIT_0d68:
0d6b 4800 |H | Short_Literal 0x0
0d6c 4800 |H | Short_Literal 0x0
0d6d 4822 |H" | Short_Literal 0x22
0d6e e5ff | | Load 0x2,-0x1
0d6f 0092 13e0 | | Action Push_String_Extended,0x13e0 ; " = \x22"
0d71 01cc | | Execute Vector,Catenate
0d72 e5fe | | Load 0x2,-0x2
0d73 e011 | | Load 0x0,0x11
0d74 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d75 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0d76 01cc | | Execute Vector,Catenate
0d77 01cb | | Execute Vector,Append
0d78 e01c | | Load 0x0,0x1c
0d79 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0d7a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0d7b 0000 0000 | | .BLANK 0000[0x5]
0d80 ; --------------------------------------------------------------------------------------
0d80 ; SUBPROGRAM
0d80 ; --------------------------------------------------------------------------------------
0d80 0d83 | | .CONST 0x0d83 ; Address of begin
0d81 0004 | | .CONST 0x0004 ; Address of exception handler
0d82 0001 | | .CONST 0x0001 ; Number of locals
0d83 BODY_0d80:
0d83 INIT_0d80:
0d83 4800 |H | Short_Literal 0x0
0d84 4800 |H | Short_Literal 0x0
0d85 4822 |H" | Short_Literal 0x22
0d86 e5ff | | Load 0x2,-0x1
0d87 0092 13e0 | | Action Push_String_Extended,0x13e0 ; " = \x22"
0d89 01cc | | Execute Vector,Catenate
0d8a e5fe | | Load 0x2,-0x2
0d8b 01cc | | Execute Vector,Catenate
0d8c 01cb | | Execute Vector,Append
0d8d e01c | | Load 0x0,0x1c
0d8e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0d8f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0d90 ; --------------------------------------------------------------------------------------
0d90 ; SUBPROGRAM
0d90 ; --------------------------------------------------------------------------------------
0d90 0d93 | | .CONST 0x0d93 ; Address of begin
0d91 0004 | | .CONST 0x0004 ; Address of exception handler
0d92 0001 | | .CONST 0x0001 ; Number of locals
0d93 BODY_0d90:
0d93 INIT_0d90:
0d93 e5fe | | Load 0x2,-0x2
0d94 0c20 | | Execute_Immediate Greater_Equal,0x20
0d95 e5fe | | Load 0x2,-0x2
0d96 0d7f | | Execute_Immediate Less,0x7f
0d97 0279 | y | Execute Discrete,And
0d98 6813 |h | Jump_Zero 0xdac
0d99 4800 |H | Short_Literal 0x0
0d9a 4800 |H | Short_Literal 0x0
0d9b e5fe | | Load 0x2,-0x2
0d9c 00d8 | | Load_Top At_Offset_0
0d9d 00e8 | | Load_Encached Character_Cache
0d9e 0260 | ` | Execute Discrete,In_Type
0d9f 7001 |p | Jump_Nonzero 0xda1
0da0 0801 | | Execute_Immediate Raise,0x1
0da1 e5ff | | Load 0x2,-0x1
0da2 0092 13e1 | | Action Push_String_Extended,0x13e1 ; " = '"
0da4 01cc | | Execute Vector,Catenate
0da5 01cb | | Execute Vector,Append
0da6 0092 13ad | | Action Push_String_Extended,0x13ad ; "'"
0da8 01cc | | Execute Vector,Catenate
0da9 e01c | | Load 0x0,0x1c
0daa 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0dab 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0dac 4800 |H | Short_Literal 0x0
0dad 4800 |H | Short_Literal 0x0
0dae e5ff | | Load 0x2,-0x1
0daf 0092 13dd | | Action Push_String_Extended,0x13dd ; " = "
0db1 01cc | | Execute Vector,Catenate
0db2 e5fe | | Load 0x2,-0x2
0db3 e011 | | Load 0x0,0x11
0db4 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0db5 011c | | Execute Any,Convert_Unchecked
0db6 1c01 | | Execute_Immediate Run_Utility,0x1
0db7 01cc | | Execute Vector,Catenate
0db8 e01c | | Load 0x0,0x1c
0db9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0dba 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0dbb 0000 0000 | | .BLANK 0000[0x5]
0dc0 ; --------------------------------------------------------------------------------------
0dc0 ; SUBPROGRAM
0dc0 ; --------------------------------------------------------------------------------------
0dc0 0dc3 | | .CONST 0x0dc3 ; Address of begin
0dc1 0004 | | .CONST 0x0004 ; Address of exception handler
0dc2 0001 | | .CONST 0x0001 ; Number of locals
0dc3 BODY_0dc0:
0dc3 INIT_0dc0:
0dc3 4800 |H | Short_Literal 0x0
0dc4 4800 |H | Short_Literal 0x0
0dc5 e5fe | | Load 0x2,-0x2
0dc6 e5ff | | Load 0x2,-0x1
0dc7 0092 13e1 | | Action Push_String_Extended,0x13e1 ; " = '"
0dc9 01cc | | Execute Vector,Catenate
0dca 01cb | | Execute Vector,Append
0dcb 0092 13ad | | Action Push_String_Extended,0x13ad ; "'"
0dcd 01cc | | Execute Vector,Catenate
0dce e01c | | Load 0x0,0x1c
0dcf 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0dd0 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0dd1 0000 0000 | | .BLANK 0000[0x7]
0dd8 ; --------------------------------------------------------------------------------------
0dd8 ; SUBPROGRAM
0dd8 ; --------------------------------------------------------------------------------------
0dd8 0ddb | | .CONST 0x0ddb ; Address of begin
0dd9 0004 | | .CONST 0x0004 ; Address of exception handler
0dda 0001 | | .CONST 0x0001 ; Number of locals
0ddb BODY_0dd8:
0ddb INIT_0dd8:
0ddb 4800 |H | Short_Literal 0x0
0ddc 4800 |H | Short_Literal 0x0
0ddd e5ff | | Load 0x2,-0x1
0dde 0092 13dd | | Action Push_String_Extended,0x13dd ; " = "
0de0 01cc | | Execute Vector,Catenate
0de1 e5fe | | Load 0x2,-0x2
0de2 01cc | | Execute Vector,Catenate
0de3 e01c | | Load 0x0,0x1c
0de4 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0de5 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0de6 0000 0000 | | .XXX[0x2]
0de8 ; --------------------------------------------------------------------------------------
0de8 ; SUBPROGRAM
0de8 ; --------------------------------------------------------------------------------------
0de8 0deb | | .CONST 0x0deb ; Address of begin
0de9 0004 | | .CONST 0x0004 ; Address of exception handler
0dea 0001 | | .CONST 0x0001 ; Number of locals
0deb BODY_0de8:
0deb INIT_0de8:
0deb 4800 |H | Short_Literal 0x0
0dec 4800 |H | Short_Literal 0x0
0ded e5ff | | Load 0x2,-0x1
0dee 0092 13dd | | Action Push_String_Extended,0x13dd ; " = "
0df0 01cc | | Execute Vector,Catenate
0df1 e5fe | | Load 0x2,-0x2
0df2 00e1 | | Load_Encached Boolean_Cache
0df3 011c | | Execute Any,Convert_Unchecked
0df4 1c01 | | Execute_Immediate Run_Utility,0x1
0df5 01cc | | Execute Vector,Catenate
0df6 e01c | | Load 0x0,0x1c
0df7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0df8 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0df9 0000 0000 | | .BLANK 0000[0x7]
0e00 ; --------------------------------------------------------------------------------------
0e00 ; SUBPROGRAM
0e00 ; --------------------------------------------------------------------------------------
0e00 0e03 | | .CONST 0x0e03 ; Address of begin
0e01 0004 | | .CONST 0x0004 ; Address of exception handler
0e02 0001 | | .CONST 0x0001 ; Number of locals
0e03 BODY_0e00:
0e03 INIT_0e00:
0e03 e5fe | | Load 0x2,-0x2
0e04 0d00 | | Execute_Immediate Less,0x0
0e05 680d |h | Jump_Zero 0xe13
0e06 4800 |H | Short_Literal 0x0
0e07 4800 |H | Short_Literal 0x0
0e08 e5ff | | Load 0x2,-0x1
0e09 0092 13dd | | Action Push_String_Extended,0x13dd ; " = "
0e0b 01cc | | Execute Vector,Catenate
0e0c e5fe | | Load 0x2,-0x2
0e0d 00e0 | | Load_Encached Standard_Cache
0e0e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0e0f 01cc | | Execute Vector,Catenate
0e10 e01c | | Load 0x0,0x1c
0e11 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0e12 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0e13 4800 |H | Short_Literal 0x0
0e14 4800 |H | Short_Literal 0x0
0e15 e5ff | | Load 0x2,-0x1
0e16 0092 13df | | Action Push_String_Extended,0x13df ; " ="
0e18 01cc | | Execute Vector,Catenate
0e19 e5fe | | Load 0x2,-0x2
0e1a 00e0 | | Load_Encached Standard_Cache
0e1b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0e1c 01cc | | Execute Vector,Catenate
0e1d e01c | | Load 0x0,0x1c
0e1e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0e1f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0e20 ; --------------------------------------------------------------------------------------
0e20 ; SUBPROGRAM
0e20 ; --------------------------------------------------------------------------------------
0e20 0e3e | > | .CONST 0x0e3e ; Address of begin
0e21 0004 | | .CONST 0x0004 ; Address of exception handler
0e22 0003 | | .CONST 0x0003 ; Number of locals
0e23 INIT_0e20:
0e23 e033 | 3 | Load 0x0,0x33
0e24 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0e25 0322 | " | Declare_Variable Record
0e26 0092 13e2 | | Action Push_String_Extended,0x13e2 ; "~1~+.~|~1~+.~|~1~+.~|~1~+.~|~1~+.~|~1~+.~|"
0e28 e011 | | Load 0x0,0x11
0e29 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e2a 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0e2b e402 | | Load 0x2,0x2
0e2c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0e2d 4801 |H | Short_Literal 0x1
0e2e e402 | | Load 0x2,0x2
0e2f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0e30 e5fe | | Load 0x2,-0x2
0e31 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0e32 e402 | | Load 0x2,0x2
0e33 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0e34 e5fe | | Load 0x2,-0x2
0e35 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0e36 e033 | 3 | Load 0x0,0x33
0e37 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0e38 3003 |0 | Execute Record,Field_Type,Field_Number 0x3
0e39 0119 | | Execute Any,Check_In_Formal_Type
0e3a e402 | | Load 0x2,0x2
0e3b 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0e3c e011 | | Load 0x0,0x11
0e3d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0e3e BODY_0e20:
0e3e 00d8 | | Load_Top At_Offset_0
0e3f e402 | | Load 0x2,0x2
0e40 e033 | 3 | Load 0x0,0x33
0e41 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0e42 00d1 | | Pop_Control Pop_Count_1
0e43 c403 | | Store 0x2,0x3
0e44 4800 |H | Short_Literal 0x0
0e45 4800 |H | Short_Literal 0x0
0e46 e5ff | | Load 0x2,-0x1
0e47 0092 13dd | | Action Push_String_Extended,0x13dd ; " = "
0e49 01cc | | Execute Vector,Catenate
0e4a e403 | | Load 0x2,0x3
0e4b e011 | | Load 0x0,0x11
0e4c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e4d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0e4e 01cc | | Execute Vector,Catenate
0e4f e01c | | Load 0x0,0x1c
0e50 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0e51 e402 | | Load 0x2,0x2
0e52 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0e53 e011 | | Load 0x0,0x11
0e54 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e55 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0e56 e402 | | Load 0x2,0x2
0e57 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0e58 00d8 | | Load_Top At_Offset_0
0e59 e011 | | Load 0x0,0x11
0e5a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e5b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0e5c c403 | | Store 0x2,0x3
0e5d 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0e5e 0000 0000 | | .XXX[0x2]
0e60 ; --------------------------------------------------------------------------------------
0e60 ; SUBPROGRAM
0e60 ; --------------------------------------------------------------------------------------
0e60 0e67 | g | .CONST 0x0e67 ; Address of begin
0e61 0004 | | .CONST 0x0004 ; Address of exception handler
0e62 0003 | | .CONST 0x0003 ; Number of locals
0e63 INIT_0e60:
0e63 e5ff | | Load 0x2,-0x1
0e64 8061 | a | Call 0x0,0x61
0e65 e5fe | | Load 0x2,-0x2
0e66 8061 | a | Call 0x0,0x61
0e67 BODY_0e60:
0e67 e062 | b | Load 0x0,0x62
0e68 e403 | | Load 0x2,0x3
0e69 0217 | | Execute Heap_Access,All_Reference
0e6a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0e6b 0227 | ' | Execute Access,All_Reference
0e6c e402 | | Load 0x2,0x2
0e6d 0217 | | Execute Heap_Access,All_Reference
0e6e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0e6f 0227 | ' | Execute Access,All_Reference
0e70 e01a | | Load 0x0,0x1a
0e71 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0e72 6802 |h | Jump_Zero 0xe75
0e73 4801 |H | Short_Literal 0x1
0e74 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0e75 e062 | b | Load 0x0,0x62
0e76 e403 | | Load 0x2,0x3
0e77 0217 | | Execute Heap_Access,All_Reference
0e78 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0e79 0227 | ' | Execute Access,All_Reference
0e7a e402 | | Load 0x2,0x2
0e7b 0217 | | Execute Heap_Access,All_Reference
0e7c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0e7d 0227 | ' | Execute Access,All_Reference
0e7e e01a | | Load 0x0,0x1a
0e7f 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0e80 6802 |h | Jump_Zero 0xe83
0e81 4800 |H | Short_Literal 0x0
0e82 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0e83 e402 | | Load 0x2,0x2
0e84 0217 | | Execute Heap_Access,All_Reference
0e85 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0e86 e403 | | Load 0x2,0x3
0e87 0217 | | Execute Heap_Access,All_Reference
0e88 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0e89 027c | | | Execute Discrete,Less
0e8a 6802 |h | Jump_Zero 0xe8d
0e8b 4801 |H | Short_Literal 0x1
0e8c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0e8d e402 | | Load 0x2,0x2
0e8e 0217 | | Execute Heap_Access,All_Reference
0e8f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0e90 e403 | | Load 0x2,0x3
0e91 0217 | | Execute Heap_Access,All_Reference
0e92 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0e93 027d | } | Execute Discrete,Greater
0e94 6802 |h | Jump_Zero 0xe97
0e95 4800 |H | Short_Literal 0x0
0e96 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0e97 e402 | | Load 0x2,0x2
0e98 0217 | | Execute Heap_Access,All_Reference
0e99 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0e9a e403 | | Load 0x2,0x3
0e9b 0217 | | Execute Heap_Access,All_Reference
0e9c 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0e9d 027c | | | Execute Discrete,Less
0e9e 6802 |h | Jump_Zero 0xea1
0e9f 4801 |H | Short_Literal 0x1
0ea0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0ea1 e402 | | Load 0x2,0x2
0ea2 0217 | | Execute Heap_Access,All_Reference
0ea3 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0ea4 e403 | | Load 0x2,0x3
0ea5 0217 | | Execute Heap_Access,All_Reference
0ea6 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0ea7 027d | } | Execute Discrete,Greater
0ea8 6802 |h | Jump_Zero 0xeab
0ea9 4800 |H | Short_Literal 0x0
0eaa 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0eab e402 | | Load 0x2,0x2
0eac 0217 | | Execute Heap_Access,All_Reference
0ead 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0eae e403 | | Load 0x2,0x3
0eaf 0217 | | Execute Heap_Access,All_Reference
0eb0 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0eb1 0f00 | | Execute_Immediate Equal,0x0
0eb2 0279 | y | Execute Discrete,And
0eb3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0eb4 0000 0000 | | .BLANK 0000[0x4]
0eb8 ; --------------------------------------------------------------------------------------
0eb8 ; SUBPROGRAM
0eb8 ; --------------------------------------------------------------------------------------
0eb8 0ec2 | | .CONST 0x0ec2 ; Address of begin
0eb9 0004 | | .CONST 0x0004 ; Address of exception handler
0eba 0004 | | .CONST 0x0004 ; Number of locals
0ebb INIT_0eb8:
0ebb 00e2 | | Load_Encached Integer_Cache
0ebc 00e2 | | Load_Encached Integer_Cache
0ebd e5fe | | Load 0x2,-0x2
0ebe e5ff | | Load 0x2,-0x1
0ebf 0272 | r | Execute Discrete,Minus
0ec0 00e2 | | Load_Encached Integer_Cache
0ec1 03f1 | | Declare_Variable Discrete,With_Value
0ec2 BODY_0eb8:
0ec2 00cf | | Action Mark_Auxiliary
0ec3 7844 |xD | Jump 0xf08
0ec4 00cf | | Action Mark_Auxiliary
0ec5 e5fe | | Load 0x2,-0x2
0ec6 e404 | | Load 0x2,0x4
0ec7 e5ff | | Load 0x2,-0x1
0ec8 0273 | s | Execute Discrete,Plus
0ec9 00d8 | | Load_Top At_Offset_0
0eca 00e2 | | Load_Encached Integer_Cache
0ecb 0260 | ` | Execute Discrete,In_Type
0ecc 7001 |p | Jump_Nonzero 0xece
0ecd 0801 | | Execute_Immediate Raise,0x1
0ece 0263 | c | Execute Discrete,Above_Bound
0ecf 7033 |p3 | Jump_Nonzero 0xf03
0ed0 00d8 | | Load_Top At_Offset_0
0ed1 e404 | | Load 0x2,0x4
0ed2 0272 | r | Execute Discrete,Minus
0ed3 c402 | | Store 0x2,0x2
0ed4 00cf | | Action Mark_Auxiliary
0ed5 7826 |x& | Jump 0xefc
0ed6 e402 | | Load 0x2,0x2
0ed7 e404 | | Load 0x2,0x4
0ed8 0273 | s | Execute Discrete,Plus
0ed9 c403 | | Store 0x2,0x3
0eda e402 | | Load 0x2,0x2
0edb 00d8 | | Load_Top At_Offset_0
0edc 00e4 | | Load_Encached Positive_Cache
0edd 0260 | ` | Execute Discrete,In_Type
0ede 7001 |p | Jump_Nonzero 0xee0
0edf 0801 | | Execute_Immediate Raise,0x1
0ee0 e403 | | Load 0x2,0x3
0ee1 00d8 | | Load_Top At_Offset_0
0ee2 00e4 | | Load_Encached Positive_Cache
0ee3 0260 | ` | Execute Discrete,In_Type
0ee4 7001 |p | Jump_Nonzero 0xee6
0ee5 0801 | | Execute_Immediate Raise,0x1
0ee6 8260 | ` | Call 0x1,0x60
0ee7 6818 |h | Jump_Zero 0xf00
0ee8 e403 | | Load 0x2,0x3
0ee9 00d8 | | Load_Top At_Offset_0
0eea 00e4 | | Load_Encached Positive_Cache
0eeb 0260 | ` | Execute Discrete,In_Type
0eec 7001 |p | Jump_Nonzero 0xeee
0eed 0801 | | Execute_Immediate Raise,0x1
0eee e402 | | Load 0x2,0x2
0eef 00d8 | | Load_Top At_Offset_0
0ef0 00e4 | | Load_Encached Positive_Cache
0ef1 0260 | ` | Execute Discrete,In_Type
0ef2 7001 |p | Jump_Nonzero 0xef4
0ef3 0801 | | Execute_Immediate Raise,0x1
0ef4 e063 | c | Load 0x0,0x63
0ef5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ef6 7800 |x | Jump 0xef7
0ef7 e402 | | Load 0x2,0x2
0ef8 e404 | | Load 0x2,0x4
0ef9 0272 | r | Execute Discrete,Minus
0efa c402 | | Store 0x2,0x2
0efb 00c9 | | Action Pop_Auxiliary_Loop
0efc e402 | | Load 0x2,0x2
0efd e5ff | | Load 0x2,-0x1
0efe 027b | { | Execute Discrete,Greater_Equal
0eff 77d6 |w | Jump_Nonzero 0xed6
0f00 00ce | | Action Pop_Auxiliary
0f01 00c8 | | Action Pop_Auxiliary_Range
0f02 3fcd |? | Loop_Increasing 0xed0
0f03 00ce | | Action Pop_Auxiliary
0f04 e404 | | Load 0x2,0x4
0f05 09ff | | Execute_Immediate Binary_Scale,-0x1
0f06 a404 | | Store_Unchecked 0x2,0x4
0f07 00c9 | | Action Pop_Auxiliary_Loop
0f08 e404 | | Load 0x2,0x4
0f09 0c01 | | Execute_Immediate Greater_Equal,0x1
0f0a 77b9 |w | Jump_Nonzero 0xec4
0f0b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0f0c 0000 0000 | | .BLANK 0000[0x4]
0f10 ; --------------------------------------------------------------------------------------
0f10 ; SUBPROGRAM
0f10 ; --------------------------------------------------------------------------------------
0f10 0f28 | ( | .CONST 0x0f28 ; Address of begin
0f11 0004 | | .CONST 0x0004 ; Address of exception handler
0f12 0006 | | .CONST 0x0006 ; Number of locals
0f13 INIT_0f10:
0f13 e064 | d | Load 0x0,0x64
0f14 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f15 02ff | | Declare_Variable Variant_Record
0f16 00d8 | | Load_Top At_Offset_0
0f17 1c00 | | Execute_Immediate Run_Utility,0x0
0f18 e064 | d | Load 0x0,0x64
0f19 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
0f1a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0f1b 02c7 | | Declare_Variable Any
0f1c 00d8 | | Load_Top At_Offset_0
0f1d 1c00 | | Execute_Immediate Run_Utility,0x0
0f1e e064 | d | Load 0x0,0x64
0f1f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0f20 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0f21 e064 | d | Load 0x0,0x64
0f22 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f23 e065 | e | Load 0x0,0x65
0f24 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f25 02c7 | | Declare_Variable Any
0f26 00d8 | | Load_Top At_Offset_0
0f27 1c00 | | Execute_Immediate Run_Utility,0x0
0f28 BODY_0f10:
0f28 e064 | d | Load 0x0,0x64
0f29 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0f2a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0f2b e402 | | Load 0x2,0x2
0f2c 6047 |`G | Indirect_Literal Discrete,0xf74,{0x00000000, 0x00004000}
0f2d e066 | f | Load 0x0,0x66
0f2e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0f2f 4800 |H | Short_Literal 0x0
0f30 e067 | g | Load 0x0,0x67
0f31 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0f32 e064 | d | Load 0x0,0x64
0f33 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0f34 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0f35 e5ff | | Load 0x2,-0x1
0f36 e064 | d | Load 0x0,0x64
0f37 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0f38 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0f39 00d1 | | Pop_Control Pop_Count_1
0f3a c404 | | Store 0x2,0x4
0f3b e064 | d | Load 0x0,0x64
0f3c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f3d e403 | | Load 0x2,0x3
0f3e 0120 | | Execute Any,Is_Value
0f3f 6804 |h | Jump_Zero 0xf44
0f40 e064 | d | Load 0x0,0x64
0f41 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
0f42 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0f43 7801 |x | Jump 0xf45
0f44 e403 | | Load 0x2,0x3
0f45 602e |`. | Indirect_Literal Discrete,0xf74,{0x00000000, 0x00004000}
0f46 e066 | f | Load 0x0,0x66
0f47 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0f48 e402 | | Load 0x2,0x2
0f49 e064 | d | Load 0x0,0x64
0f4a 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
0f4b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0f4c c403 | | Store 0x2,0x3
0f4d c405 | | Store 0x2,0x5
0f4e e405 | | Load 0x2,0x5
0f4f 6812 |h | Jump_Zero 0xf62
0f50 4829 |H) | Short_Literal 0x29
0f51 0092 13e3 | | Action Push_String_Extended,0x13e3 ; "Cannot read the modification time data for "
0f53 e5ff | | Load 0x2,-0x1
0f54 01cc | | Execute Vector,Catenate
0f55 0092 13c5 | | Action Push_String_Extended,0x13c5 ; " ("
0f57 01cc | | Execute Vector,Catenate
0f58 e405 | | Load 0x2,0x5
0f59 e064 | d | Load 0x0,0x64
0f5a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f5b 011c | | Execute Any,Convert_Unchecked
0f5c 1c01 | | Execute_Immediate Run_Utility,0x1
0f5d 01cc | | Execute Vector,Catenate
0f5e 01cb | | Execute Vector,Append
0f5f e01c | | Load 0x0,0x1c
0f60 180f | | Execute Package,Field_Execute,Field_Number 0xf
0f61 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0f62 e403 | | Load 0x2,0x3
0f63 e064 | d | Load 0x0,0x64
0f64 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
0f65 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0f66 c406 | | Store 0x2,0x6
0f67 00d8 | | Load_Top At_Offset_0
0f68 e068 | h | Load 0x0,0x68
0f69 8069 | i | Call 0x0,0x69
0f6a 6808 |h | Jump_Zero 0xf73
0f6b 00d8 | | Load_Top At_Offset_0
0f6c c068 | h | Store 0x0,0x68
0f6d e06a | j | Load 0x0,0x6a
0f6e 6804 |h | Jump_Zero 0xf73
0f6f 0092 13e4 | | Action Push_String_Extended,0x13e4 ; "Please run Compose again; ~Value (LatestFileDate) changed"
0f71 e01c | | Load 0x0,0x1c
0f72 180e | | Execute Package,Field_Execute,Field_Number 0xe
0f73 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0f74 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0f78 ; --------------------------------------------------------------------------------------
0f78 ; SUBPROGRAM
0f78 ; --------------------------------------------------------------------------------------
0f78 0f7b | { | .CONST 0x0f7b ; Address of begin
0f79 0004 | | .CONST 0x0004 ; Address of exception handler
0f7a 0001 | | .CONST 0x0001 ; Number of locals
0f7b BODY_0f78:
0f7b INIT_0f78:
0f7b e020 | | Load 0x0,0x20
0f7c 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0f7d e021 | ! | Load 0x0,0x21
0f7e 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0f7f 00d8 | | Load_Top At_Offset_0
0f80 e021 | ! | Load 0x0,0x21
0f81 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0f82 7003 |p | Jump_Nonzero 0xf86
0f83 e022 | " | Load 0x0,0x22
0f84 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0f85 0257 | W | Execute Discrete,Raise
0f86 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0f87 00ca | | Action Exit_Nullary_Function
0f88 ; --------------------------------------------------------------------------------------
0f88 ; SUBPROGRAM
0f88 ; --------------------------------------------------------------------------------------
0f88 0f8f | | .CONST 0x0f8f ; Address of begin
0f89 0004 | | .CONST 0x0004 ; Address of exception handler
0f8a 0002 | | .CONST 0x0002 ; Number of locals
0f8b INIT_0f88:
0f8b e053 | S | Load 0x0,0x53
0f8c e055 | U | Load 0x0,0x55
0f8d 01d5 | | Execute Vector,Field_Reference
0f8e 0007 | | Action Break_Optional
0f8f BODY_0f88:
0f8f e017 | | Load 0x0,0x17
0f90 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0f91 e402 | | Load 0x2,0x2
0f92 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0f93 022f | / | Execute Access,Equal
0f94 7007 |p | Jump_Nonzero 0xf9c
0f95 e017 | | Load 0x0,0x17
0f96 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0f97 e011 | | Load 0x0,0x11
0f98 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f99 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0f9a e017 | | Load 0x0,0x17
0f9b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0f9c e017 | | Load 0x0,0x17
0f9d 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
0f9e e402 | | Load 0x2,0x2
0f9f 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
0fa0 022f | / | Execute Access,Equal
0fa1 7007 |p | Jump_Nonzero 0xfa9
0fa2 e017 | | Load 0x0,0x17
0fa3 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
0fa4 e011 | | Load 0x0,0x11
0fa5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0fa6 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0fa7 e017 | | Load 0x0,0x17
0fa8 380a |8 | Execute Record,Field_Write,Field_Number 0xa
0fa9 e017 | | Load 0x0,0x17
0faa 3c0f |< | Execute Record,Field_Read,Field_Number 0xf
0fab e402 | | Load 0x2,0x2
0fac 3c0f |< | Execute Record,Field_Read,Field_Number 0xf
0fad 022f | / | Execute Access,Equal
0fae 7007 |p | Jump_Nonzero 0xfb6
0faf e017 | | Load 0x0,0x17
0fb0 3c0f |< | Execute Record,Field_Read,Field_Number 0xf
0fb1 e011 | | Load 0x0,0x11
0fb2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0fb3 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0fb4 e017 | | Load 0x0,0x17
0fb5 380f |8 | Execute Record,Field_Write,Field_Number 0xf
0fb6 00cf | | Action Mark_Auxiliary
0fb7 e06b | k | Load 0x0,0x6b
0fb8 01d9 | | Execute Vector,Reverse_Bounds
0fb9 0007 | | Action Break_Optional
0fba 00d8 | | Load_Top At_Offset_0
0fbb e017 | | Load 0x0,0x17
0fbc 3424 |4$ | Execute Record,Field_Reference,Field_Number 0x24
0fbd 01d7 | | Execute Vector,Field_Read
0fbe e405 | | Load 0x2,0x5
0fbf e402 | | Load 0x2,0x2
0fc0 3424 |4$ | Execute Record,Field_Reference,Field_Number 0x24
0fc1 01d7 | | Execute Vector,Field_Read
0fc2 022f | / | Execute Access,Equal
0fc3 700d |p | Jump_Nonzero 0xfd1
0fc4 e017 | | Load 0x0,0x17
0fc5 3c24 |<$ | Execute Record,Field_Read,Field_Number 0x24
0fc6 e405 | | Load 0x2,0x5
0fc7 00d8 | | Load_Top At_Offset_0
0fc8 e406 | | Load 0x2,0x6
0fc9 01d7 | | Execute Vector,Field_Read
0fca e011 | | Load 0x0,0x11
0fcb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0fcc 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0fcd e407 | | Load 0x2,0x7
0fce e406 | | Load 0x2,0x6
0fcf 01d6 | | Execute Vector,Field_Write
0fd0 00d2 | | Pop_Control Pop_Count_2
0fd1 00d8 | | Load_Top At_Offset_0
0fd2 e017 | | Load 0x0,0x17
0fd3 3425 |4% | Execute Record,Field_Reference,Field_Number 0x25
0fd4 01d7 | | Execute Vector,Field_Read
0fd5 e405 | | Load 0x2,0x5
0fd6 e402 | | Load 0x2,0x2
0fd7 3425 |4% | Execute Record,Field_Reference,Field_Number 0x25
0fd8 01d7 | | Execute Vector,Field_Read
0fd9 022f | / | Execute Access,Equal
0fda 700d |p | Jump_Nonzero 0xfe8
0fdb e017 | | Load 0x0,0x17
0fdc 3c25 |<% | Execute Record,Field_Read,Field_Number 0x25
0fdd e405 | | Load 0x2,0x5
0fde 00d8 | | Load_Top At_Offset_0
0fdf e406 | | Load 0x2,0x6
0fe0 01d7 | | Execute Vector,Field_Read
0fe1 e011 | | Load 0x0,0x11
0fe2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0fe3 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0fe4 e407 | | Load 0x2,0x7
0fe5 e406 | | Load 0x2,0x6
0fe6 01d6 | | Execute Vector,Field_Write
0fe7 00d2 | | Pop_Control Pop_Count_2
0fe8 00c8 | | Action Pop_Auxiliary_Range
0fe9 3fd0 |? | Loop_Increasing 0xfba
0fea 00ce | | Action Pop_Auxiliary
0feb e017 | | Load 0x0,0x17
0fec 3c32 |<2 | Execute Record,Field_Read,Field_Number 0x32
0fed e402 | | Load 0x2,0x2
0fee 3c32 |<2 | Execute Record,Field_Read,Field_Number 0x32
0fef 022f | / | Execute Access,Equal
0ff0 7007 |p | Jump_Nonzero 0xff8
0ff1 e017 | | Load 0x0,0x17
0ff2 3c32 |<2 | Execute Record,Field_Read,Field_Number 0x32
0ff3 e011 | | Load 0x0,0x11
0ff4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ff5 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0ff6 e017 | | Load 0x0,0x17
0ff7 3832 |82 | Execute Record,Field_Write,Field_Number 0x32
0ff8 e017 | | Load 0x0,0x17
0ff9 3c3e |<> | Execute Record,Field_Read,Field_Number 0x3e
0ffa e402 | | Load 0x2,0x2
0ffb 3c3e |<> | Execute Record,Field_Read,Field_Number 0x3e
0ffc 022f | / | Execute Access,Equal
0ffd 7007 |p | Jump_Nonzero 0x1005
0ffe e017 | | Load 0x0,0x17
0fff 3c3e |<> | Execute Record,Field_Read,Field_Number 0x3e
1000 e011 | | Load 0x0,0x11
1001 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1002 1812 | | Execute Package,Field_Execute,Field_Number 0x12
1003 e017 | | Load 0x0,0x17
1004 383e |8> | Execute Record,Field_Write,Field_Number 0x3e
1005 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1006 0000 0000 | | .XXX[0x2]
1008 ; --------------------------------------------------------------------------------------
1008 ; SUBPROGRAM
1008 ; --------------------------------------------------------------------------------------
1008 1010 | | .CONST 0x1010 ; Address of begin
1009 0004 | | .CONST 0x0004 ; Address of exception handler
100a 0002 | | .CONST 0x0002 ; Number of locals
100b INIT_1008:
100b 4800 |H | Short_Literal 0x0
100c e7ff | | Load 0x3,-0x1
100d 480a |H | Short_Literal 0xa
100e e01a | | Load 0x0,0x1a
100f 181e | | Execute Package,Field_Execute,Field_Number 0x1e
1010 BODY_1008:
1010 00d8 | | Load_Top At_Offset_0
1011 7009 |p | Jump_Nonzero 0x101b
1012 e403 | | Load 0x2,0x3
1013 e7ff | | Load 0x3,-0x1
1014 e06c | l | Load 0x0,0x6c
1015 180d | | Execute Package,Field_Execute,Field_Number 0xd
1016 e011 | | Load 0x0,0x11
1017 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1018 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1019 c403 | | Store 0x2,0x3
101a 4502 |E | Exit_Suprogram New_Top_Offset 0x2
101b e403 | | Load 0x2,0x3
101c 480a |H | Short_Literal 0xa
101d e7ff | | Load 0x3,-0x1
101e 01dd | | Execute Vector,First
101f e602 | | Load 0x3,0x2
1020 0aff | | Execute_Immediate Plus,-0x1
1021 e7ff | | Load 0x3,-0x1
1022 01cf | | Execute Vector,Slice_Read
1023 e06c | l | Load 0x0,0x6c
1024 180d | | Execute Package,Field_Execute,Field_Number 0xd
1025 01cb | | Execute Vector,Append
1026 e011 | | Load 0x0,0x11
1027 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1028 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1029 c403 | | Store 0x2,0x3
102a 00d8 | | Load_Top At_Offset_0
102b 0a01 | | Execute_Immediate Plus,0x1
102c 00d8 | | Load_Top At_Offset_0
102d 00e2 | | Load_Encached Integer_Cache
102e 0260 | ` | Execute Discrete,In_Type
102f 7001 |p | Jump_Nonzero 0x1031
1030 0801 | | Execute_Immediate Raise,0x1
1031 e7ff | | Load 0x3,-0x1
1032 01dc | | Execute Vector,Last
1033 e7ff | | Load 0x3,-0x1
1034 01cf | | Execute Vector,Slice_Read
1035 8404 | | Call 0x2,0x4
1036 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1037 0000 | | .XXX[0x1]
1038 ; --------------------------------------------------------------------------------------
1038 ; SUBPROGRAM
1038 ; --------------------------------------------------------------------------------------
1038 103d | = | .CONST 0x103d ; Address of begin
1039 1043 | C | .CONST 0x1043 ; Address of exception handler
103a 0002 | | .CONST 0x0002 ; Number of locals
103b INIT_1038:
103b 029f 1263 | c| Declare_Subprogram INIT_1260,For_Call
103d BODY_1038:
103d 8602 | | Call 0x3,0x2
103e e403 | | Load 0x2,0x3
103f e015 | | Load 0x0,0x15
1040 1814 | | Execute Package,Field_Execute,Field_Number 0x14
1041 00cc | | Action Pop_Block
1042 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1043 TRAP_1038:
1043 0007 | | Action Break_Optional
1044 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1045 0000 0000 | | .XXX[0x3]
1047 0000 | |
1048 ; --------------------------------------------------------------------------------------
1048 ; SUBPROGRAM
1048 ; --------------------------------------------------------------------------------------
1048 106e | n | .CONST 0x106e ; Address of begin
1049 107c | | | .CONST 0x107c ; Address of exception handler
104a 0003 | | .CONST 0x0003 ; Number of locals
104b INIT_1048:
104b e020 | | Load 0x0,0x20
104c 1b12 | | Execute Package,Field_Read,Field_Number 0x12
104d e021 | ! | Load 0x0,0x21
104e 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
104f 00d8 | | Load_Top At_Offset_0
1050 e021 | ! | Load 0x0,0x21
1051 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
1052 7003 |p | Jump_Nonzero 0x1056
1053 e022 | " | Load 0x0,0x22
1054 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
1055 0257 | W | Execute Discrete,Raise
1056 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1057 e06d | m | Load 0x0,0x6d
1058 e011 | | Load 0x0,0x11
1059 1b0d | | Execute Package,Field_Read,Field_Number 0xd
105a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
105b e602 | | Load 0x3,0x2
105c 01dd | | Execute Vector,First
105d e602 | | Load 0x3,0x2
105e 01dd | | Execute Vector,First
105f e602 | | Load 0x3,0x2
1060 01db | | Execute Vector,Length
1061 0273 | s | Execute Discrete,Plus
1062 0afc | | Execute_Immediate Plus,-0x4
1063 00d8 | | Load_Top At_Offset_0
1064 00e2 | | Load_Encached Integer_Cache
1065 0260 | ` | Execute Discrete,In_Type
1066 7001 |p | Jump_Nonzero 0x1068
1067 0801 | | Execute_Immediate Raise,0x1
1068 e602 | | Load 0x3,0x2
1069 01cf | | Execute Vector,Slice_Read
106a 01cc | | Execute Vector,Catenate
106b e7ff | | Load 0x3,-0x1
106c 01cc | | Execute Vector,Catenate
106d 0007 | | Action Break_Optional
106e BODY_1048:
106e e027 | ' | Load 0x0,0x27
106f e403 | | Load 0x2,0x3
1070 00d8 | | Load_Top At_Offset_0
1071 e604 | | Load 0x3,0x4
1072 01d7 | | Execute Vector,Field_Read
1073 00ea | | Load_Encached Null_String_Cache
1074 e603 | | Load 0x3,0x3
1075 4801 |H | Short_Literal 0x1
1076 e028 | ( | Load 0x0,0x28
1077 1814 | | Execute Package,Field_Execute,Field_Number 0x14
1078 e605 | | Load 0x3,0x5
1079 e604 | | Load 0x3,0x4
107a 01d6 | | Execute Vector,Field_Write
107b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
107c TRAP_1048:
107c 0007 | | Action Break_Optional
107d 4829 |H) | Short_Literal 0x29
107e 0092 13e5 | | Action Push_String_Extended,0x13e5 ; "Cannot create "
1080 e403 | | Load 0x2,0x3
1081 e025 | % | Load 0x0,0x25
1082 011c | | Execute Any,Convert_Unchecked
1083 1c01 | | Execute_Immediate Run_Utility,0x1
1084 01cc | | Execute Vector,Catenate
1085 0092 13e6 | | Action Push_String_Extended,0x13e6 ; " => "
1087 01cc | | Execute Vector,Catenate
1088 e603 | | Load 0x3,0x3
1089 01cc | | Execute Vector,Catenate
108a 0092 13c5 | | Action Push_String_Extended,0x13c5 ; " ("
108c 01cc | | Execute Vector,Catenate
108d 4800 |H | Short_Literal 0x0
108e 4801 |H | Short_Literal 0x1
108f e036 | 6 | Load 0x0,0x36
1090 1815 | | Execute Package,Field_Execute,Field_Number 0x15
1091 01cc | | Execute Vector,Catenate
1092 01cb | | Execute Vector,Append
1093 e01c | | Load 0x0,0x1c
1094 180e | | Execute Package,Field_Execute,Field_Number 0xe
1095 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1096 0000 0000 | | .XXX[0x2]
1098 ; --------------------------------------------------------------------------------------
1098 ; SUBPROGRAM
1098 ; --------------------------------------------------------------------------------------
1098 10a6 | | .CONST 0x10a6 ; Address of begin
1099 0004 | | .CONST 0x0004 ; Address of exception handler
109a 0005 | | .CONST 0x0005 ; Number of locals
109b INIT_1098:
109b e402 | | Load 0x2,0x2
109c e011 | | Load 0x0,0x11
109d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
109e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
109f 00d8 | | Load_Top At_Offset_0
10a0 01dd | | Execute Vector,First
10a1 00e3 | | Load_Encached Natural_Cache
10a2 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
10a3 00e3 | | Load_Encached Natural_Cache
10a4 e011 | | Load 0x0,0x11
10a5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
10a6 BODY_1098:
10a6 00cf | | Action Mark_Auxiliary
10a7 4800 |H | Short_Literal 0x0
10a8 e603 | | Load 0x3,0x3
10a9 e602 | | Load 0x3,0x2
10aa 01dc | | Execute Vector,Last
10ab e602 | | Load 0x3,0x2
10ac 01cf | | Execute Vector,Slice_Read
10ad e01a | | Load 0x0,0x1a
10ae 1815 | | Execute Package,Field_Execute,Field_Number 0x15
10af 0092 13e7 | | Action Push_String_Extended,0x13e7 ; "~argument(text)"
10b1 e01a | | Load 0x0,0x1a
10b2 181d | | Execute Package,Field_Execute,Field_Number 0x1d
10b3 a604 | | Store_Unchecked 0x3,0x4
10b4 e604 | | Load 0x3,0x4
10b5 700b |p | Jump_Nonzero 0x10c1
10b6 e605 | | Load 0x3,0x5
10b7 e603 | | Load 0x3,0x3
10b8 e602 | | Load 0x3,0x2
10b9 01dc | | Execute Vector,Last
10ba e602 | | Load 0x3,0x2
10bb 01cf | | Execute Vector,Slice_Read
10bc e011 | | Load 0x0,0x11
10bd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
10be 181d | | Execute Package,Field_Execute,Field_Number 0x1d
10bf c605 | | Store 0x3,0x5
10c0 7815 |x | Jump 0x10d6
10c1 e605 | | Load 0x3,0x5
10c2 e603 | | Load 0x3,0x3
10c3 e604 | | Load 0x3,0x4
10c4 0aff | | Execute_Immediate Plus,-0x1
10c5 e602 | | Load 0x3,0x2
10c6 01cf | | Execute Vector,Slice_Read
10c7 e011 | | Load 0x0,0x11
10c8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
10c9 181d | | Execute Package,Field_Execute,Field_Number 0x1d
10ca c605 | | Store 0x3,0x5
10cb e605 | | Load 0x3,0x5
10cc e5fe | | Load 0x2,-0x2
10cd e011 | | Load 0x0,0x11
10ce 1b0d | | Execute Package,Field_Read,Field_Number 0xd
10cf 181c | | Execute Package,Field_Execute,Field_Number 0x1c
10d0 c605 | | Store 0x3,0x5
10d1 e604 | | Load 0x3,0x4
10d2 0a0f | | Execute_Immediate Plus,0xf
10d3 c603 | | Store 0x3,0x3
10d4 00c9 | | Action Pop_Auxiliary_Loop
10d5 7fd1 | | Jump 0x10a7
10d6 00ce | | Action Pop_Auxiliary
10d7 00d8 | | Load_Top At_Offset_0
10d8 e015 | | Load 0x0,0x15
10d9 180f | | Execute Package,Field_Execute,Field_Number 0xf
10da 00d8 | | Load_Top At_Offset_0
10db e011 | | Load 0x0,0x11
10dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
10dd 1812 | | Execute Package,Field_Execute,Field_Number 0x12
10de c605 | | Store 0x3,0x5
10df 4501 |E | Exit_Suprogram New_Top_Offset 0x1
10e0 ; --------------------------------------------------------------------------------------
10e0 ; SUBPROGRAM
10e0 ; --------------------------------------------------------------------------------------
10e0 10e3 | | .CONST 0x10e3 ; Address of begin
10e1 10ec | | .CONST 0x10ec ; Address of exception handler
10e2 0001 | | .CONST 0x0001 ; Number of locals
10e3 BODY_10e0:
10e3 INIT_10e0:
10e3 e403 | | Load 0x2,0x3
10e4 0092 13e8 | | Action Push_String_Extended,0x13e8 ; "synchronized"
10e6 e402 | | Load 0x2,0x2
10e7 4800 |H | Short_Literal 0x0
10e8 e028 | ( | Load 0x0,0x28
10e9 1815 | | Execute Package,Field_Execute,Field_Number 0x15
10ea c403 | | Store 0x2,0x3
10eb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
10ec TRAP_10e0:
10ec 0007 | | Action Break_Optional
10ed 4829 |H) | Short_Literal 0x29
10ee 0092 13e9 | | Action Push_String_Extended,0x13e9 ; "Cannot open Ada input file "
10f0 e402 | | Load 0x2,0x2
10f1 01cc | | Execute Vector,Catenate
10f2 0092 13c5 | | Action Push_String_Extended,0x13c5 ; " ("
10f4 01cc | | Execute Vector,Catenate
10f5 4800 |H | Short_Literal 0x0
10f6 4801 |H | Short_Literal 0x1
10f7 e036 | 6 | Load 0x0,0x36
10f8 1815 | | Execute Package,Field_Execute,Field_Number 0x15
10f9 01cc | | Execute Vector,Catenate
10fa 01cb | | Execute Vector,Append
10fb e01c | | Load 0x0,0x1c
10fc 180e | | Execute Package,Field_Execute,Field_Number 0xe
10fd 00cc | | Action Pop_Block
10fe 4502 |E | Exit_Suprogram New_Top_Offset 0x2
10ff 0000 | | .XXX[0x1]
1100 ; --------------------------------------------------------------------------------------
1100 ; SUBPROGRAM
1100 ; --------------------------------------------------------------------------------------
1100 1106 | | .CONST 0x1106 ; Address of begin
1101 0004 | | .CONST 0x0004 ; Address of exception handler
1102 0002 | | .CONST 0x0002 ; Number of locals
1103 INIT_1100:
1103 e403 | | Load 0x2,0x3
1104 e028 | ( | Load 0x0,0x28
1105 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
1106 BODY_1100:
1106 00d8 | | Load_Top At_Offset_0
1107 01db | | Execute Vector,Length
1108 0c01 | | Execute_Immediate Greater_Equal,0x1
1109 6813 |h | Jump_Zero 0x111d
110a e404 | | Load 0x2,0x4
110b 480a |H | Short_Literal 0xa
110c e602 | | Load 0x3,0x2
110d e06c | l | Load 0x0,0x6c
110e 180d | | Execute Package,Field_Execute,Field_Number 0xd
110f 01cb | | Execute Vector,Append
1110 e011 | | Load 0x0,0x11
1111 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1112 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1113 c404 | | Store 0x2,0x4
1114 e404 | | Load 0x2,0x4
1115 e015 | | Load 0x0,0x15
1116 180f | | Execute Package,Field_Execute,Field_Number 0xf
1117 e404 | | Load 0x2,0x4
1118 e011 | | Load 0x0,0x11
1119 1b0d | | Execute Package,Field_Read,Field_Number 0xd
111a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
111b c404 | | Store 0x2,0x4
111c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
111d e404 | | Load 0x2,0x4
111e 480a |H | Short_Literal 0xa
111f e011 | | Load 0x0,0x11
1120 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1121 181e | | Execute Package,Field_Execute,Field_Number 0x1e
1122 c404 | | Store 0x2,0x4
1123 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1124 0000 0000 | | .BLANK 0000[0x4]
1128 ; --------------------------------------------------------------------------------------
1128 ; SUBPROGRAM
1128 ; --------------------------------------------------------------------------------------
1128 112f | / | .CONST 0x112f ; Address of begin
1129 0004 | | .CONST 0x0004 ; Address of exception handler
112a 0002 | | .CONST 0x0002 ; Number of locals
112b INIT_1128:
112b 4800 |H | Short_Literal 0x0
112c e403 | | Load 0x2,0x3
112d e046 | F | Load 0x0,0x46
112e 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
112f BODY_1128:
112f 00d8 | | Load_Top At_Offset_0
1130 01db | | Execute Vector,Length
1131 7006 |p | Jump_Nonzero 0x1138
1132 0092 13ea | | Action Push_String_Extended,0x13ea ; "Macro requires a name=value pair. What was supplied was unrecognizable"
1134 e01c | | Load 0x0,0x1c
1135 180e | | Execute Package,Field_Execute,Field_Number 0xe
1136 00cc | | Action Pop_Block
1137 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1138 4800 |H | Short_Literal 0x0
1139 00ea | | Load_Encached Null_String_Cache
113a 4800 |H | Short_Literal 0x0
113b e602 | | Load 0x3,0x2
113c 4801 |H | Short_Literal 0x1
113d e046 | F | Load 0x0,0x46
113e 1819 | | Execute Package,Field_Execute,Field_Number 0x19
113f e5ff | | Load 0x2,-0x1
1140 e011 | | Load 0x0,0x11
1141 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1142 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1143 e046 | F | Load 0x0,0x46
1144 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1145 a403 | | Store_Unchecked 0x2,0x3
1146 e403 | | Load 0x2,0x3
1147 e046 | F | Load 0x0,0x46
1148 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
1149 700a |p | Jump_Nonzero 0x1154
114a 0092 13eb | | Action Push_String_Extended,0x13eb ; "Macro"
114c 4800 |H | Short_Literal 0x0
114d e403 | | Load 0x2,0x3
114e e046 | F | Load 0x0,0x46
114f 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
1150 01cc | | Execute Vector,Catenate
1151 e01c | | Load 0x0,0x1c
1152 180e | | Execute Package,Field_Execute,Field_Number 0xe
1153 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1154 e403 | | Load 0x2,0x3
1155 e046 | F | Load 0x0,0x46
1156 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
1157 4800 |H | Short_Literal 0x0
1158 e403 | | Load 0x2,0x3
1159 e046 | F | Load 0x0,0x46
115a 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
115b 0f00 | | Execute_Immediate Equal,0x0
115c 0278 | x | Execute Discrete,Or
115d 6805 |h | Jump_Zero 0x1163
115e 0092 13ec | | Action Push_String_Extended,0x13ec ; "Macro expects one argument of the form Name=Value"
1160 e01c | | Load 0x0,0x1c
1161 180e | | Execute Package,Field_Execute,Field_Number 0xe
1162 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1163 00ea | | Load_Encached Null_String_Cache
1164 4800 |H | Short_Literal 0x0
1165 e403 | | Load 0x2,0x3
1166 e046 | F | Load 0x0,0x46
1167 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1168 e011 | | Load 0x0,0x11
1169 1b0d | | Execute Package,Field_Read,Field_Number 0xd
116a 1817 | | Execute Package,Field_Execute,Field_Number 0x17
116b a402 | | Store_Unchecked 0x2,0x2
116c e250 | P | Load 0x1,0x50
116d 4800 |H | Short_Literal 0x0
116e e402 | | Load 0x2,0x2
116f 4800 |H | Short_Literal 0x0
1170 e403 | | Load 0x2,0x3
1171 e046 | F | Load 0x0,0x46
1172 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
1173 e24f | O | Load 0x1,0x4f
1174 1815 | | Execute Package,Field_Execute,Field_Number 0x15
1175 c250 | P | Store 0x1,0x50
1176 4801 |H | Short_Literal 0x1
1177 4866 |Hf | Short_Literal 0x66
1178 4800 |H | Short_Literal 0x0
1179 e403 | | Load 0x2,0x3
117a e046 | F | Load 0x0,0x46
117b 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
117c e06e | n | Load 0x0,0x6e
117d 1814 | | Execute Package,Field_Execute,Field_Number 0x14
117e e403 | | Load 0x2,0x3
117f e046 | F | Load 0x0,0x46
1180 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
1181 c403 | | Store 0x2,0x3
1182 e403 | | Load 0x2,0x3
1183 e046 | F | Load 0x0,0x46
1184 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
1185 7004 |p | Jump_Nonzero 0x118a
1186 0092 13ed | | Action Push_String_Extended,0x13ed ; "Macro expects one Name=Value pair. Extra arguments are ignored"
1188 e01c | | Load 0x0,0x1c
1189 180e | | Execute Package,Field_Execute,Field_Number 0xe
118a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
118b 0000 0000 | | .BLANK 0000[0x5]
1190 ; --------------------------------------------------------------------------------------
1190 ; SUBPROGRAM
1190 ; --------------------------------------------------------------------------------------
1190 1197 | | .CONST 0x1197 ; Address of begin
1191 0004 | | .CONST 0x0004 ; Address of exception handler
1192 0002 | | .CONST 0x0002 ; Number of locals
1193 INIT_1190:
1193 4800 |H | Short_Literal 0x0
1194 e403 | | Load 0x2,0x3
1195 e046 | F | Load 0x0,0x46
1196 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
1197 BODY_1190:
1197 00d8 | | Load_Top At_Offset_0
1198 01db | | Execute Vector,Length
1199 7006 |p | Jump_Nonzero 0x11a0
119a 0092 13ee | | Action Push_String_Extended,0x13ee ; "String_Macro requires a name=value pair. What was supplied was unrecognizable"
119c e01c | | Load 0x0,0x1c
119d 180e | | Execute Package,Field_Execute,Field_Number 0xe
119e 00cc | | Action Pop_Block
119f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
11a0 4800 |H | Short_Literal 0x0
11a1 00ea | | Load_Encached Null_String_Cache
11a2 4800 |H | Short_Literal 0x0
11a3 e602 | | Load 0x3,0x2
11a4 4801 |H | Short_Literal 0x1
11a5 e046 | F | Load 0x0,0x46
11a6 1819 | | Execute Package,Field_Execute,Field_Number 0x19
11a7 e5ff | | Load 0x2,-0x1
11a8 e011 | | Load 0x0,0x11
11a9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
11aa 1816 | | Execute Package,Field_Execute,Field_Number 0x16
11ab e046 | F | Load 0x0,0x46
11ac 1820 | | Execute Package,Field_Execute,Field_Number 0x20
11ad a403 | | Store_Unchecked 0x2,0x3
11ae e403 | | Load 0x2,0x3
11af e046 | F | Load 0x0,0x46
11b0 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
11b1 700a |p | Jump_Nonzero 0x11bc
11b2 0092 13ef | | Action Push_String_Extended,0x13ef ; "String_Macro"
11b4 4800 |H | Short_Literal 0x0
11b5 e403 | | Load 0x2,0x3
11b6 e046 | F | Load 0x0,0x46
11b7 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
11b8 01cc | | Execute Vector,Catenate
11b9 e01c | | Load 0x0,0x1c
11ba 180e | | Execute Package,Field_Execute,Field_Number 0xe
11bb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
11bc e403 | | Load 0x2,0x3
11bd e046 | F | Load 0x0,0x46
11be 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
11bf 4800 |H | Short_Literal 0x0
11c0 e403 | | Load 0x2,0x3
11c1 e046 | F | Load 0x0,0x46
11c2 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
11c3 0f00 | | Execute_Immediate Equal,0x0
11c4 0278 | x | Execute Discrete,Or
11c5 6805 |h | Jump_Zero 0x11cb
11c6 0092 13f0 | | Action Push_String_Extended,0x13f0 ; "String_Macro expects one argument of the form Name=Value"
11c8 e01c | | Load 0x0,0x1c
11c9 180e | | Execute Package,Field_Execute,Field_Number 0xe
11ca 4501 |E | Exit_Suprogram New_Top_Offset 0x1
11cb 00ea | | Load_Encached Null_String_Cache
11cc 4800 |H | Short_Literal 0x0
11cd e403 | | Load 0x2,0x3
11ce e046 | F | Load 0x0,0x46
11cf 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
11d0 e011 | | Load 0x0,0x11
11d1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
11d2 1817 | | Execute Package,Field_Execute,Field_Number 0x17
11d3 a402 | | Store_Unchecked 0x2,0x2
11d4 e250 | P | Load 0x1,0x50
11d5 4800 |H | Short_Literal 0x0
11d6 e402 | | Load 0x2,0x2
11d7 4800 |H | Short_Literal 0x0
11d8 e403 | | Load 0x2,0x3
11d9 e046 | F | Load 0x0,0x46
11da 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
11db e24f | O | Load 0x1,0x4f
11dc 1815 | | Execute Package,Field_Execute,Field_Number 0x15
11dd c250 | P | Store 0x1,0x50
11de 4800 |H | Short_Literal 0x0
11df 4865 |He | Short_Literal 0x65
11e0 4800 |H | Short_Literal 0x0
11e1 e403 | | Load 0x2,0x3
11e2 e046 | F | Load 0x0,0x46
11e3 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
11e4 e06e | n | Load 0x0,0x6e
11e5 1814 | | Execute Package,Field_Execute,Field_Number 0x14
11e6 e403 | | Load 0x2,0x3
11e7 e046 | F | Load 0x0,0x46
11e8 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
11e9 c403 | | Store 0x2,0x3
11ea e403 | | Load 0x2,0x3
11eb e046 | F | Load 0x0,0x46
11ec 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
11ed 7004 |p | Jump_Nonzero 0x11f2
11ee 0092 13f1 | | Action Push_String_Extended,0x13f1 ; "String_Macro expects one Name=Value pair. Extra arguments are ignored"
11f0 e01c | | Load 0x0,0x1c
11f1 180e | | Execute Package,Field_Execute,Field_Number 0xe
11f2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
11f3 0000 0000 | | .BLANK 0000[0x5]
11f8 ; --------------------------------------------------------------------------------------
11f8 ; SUBPROGRAM
11f8 ; --------------------------------------------------------------------------------------
11f8 11fd | | .CONST 0x11fd ; Address of begin
11f9 122a | * | .CONST 0x122a ; Address of exception handler
11fa 0002 | | .CONST 0x0002 ; Number of locals
11fb INIT_11f8:
11fb 029f 1283 | | Declare_Subprogram INIT_1280,For_Call
11fd BODY_11f8:
11fd 8602 | | Call 0x3,0x2
11fe 4856 |HV | Short_Literal 0x56
11ff 801f | | Call 0x0,0x1f
1200 e011 | | Load 0x0,0x11
1201 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
1202 0092 13af | | Action Push_String_Extended,0x13af ; "symbol"
1204 e020 | | Load 0x0,0x20
1205 1b12 | | Execute Package,Field_Read,Field_Number 0x12
1206 e021 | ! | Load 0x0,0x21
1207 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
1208 00d8 | | Load_Top At_Offset_0
1209 e021 | ! | Load 0x0,0x21
120a 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
120b 7003 |p | Jump_Nonzero 0x120f
120c e022 | " | Load 0x0,0x22
120d 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
120e 0257 | W | Execute Discrete,Raise
120f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
1210 c402 | | Store 0x2,0x2
1211 e402 | | Load 0x2,0x2
1212 7007 |p | Jump_Nonzero 0x121a
1213 0092 13b0 | | Action Push_String_Extended,0x13b0 ; "Symbols font family not available"
1215 e01c | | Load 0x0,0x1c
1216 180e | | Execute Package,Field_Execute,Field_Number 0xe
1217 4820 |H | Short_Literal 0x20
1218 a403 | | Store_Unchecked 0x2,0x3
1219 7803 |x | Jump 0x121d
121a e402 | | Load 0x2,0x2
121b e01d | | Load 0x0,0x1d
121c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
121d e403 | | Load 0x2,0x3
121e 00d8 | | Load_Top At_Offset_0
121f e011 | | Load 0x0,0x11
1220 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
1221 0260 | ` | Execute Discrete,In_Type
1222 7001 |p | Jump_Nonzero 0x1224
1223 0801 | | Execute_Immediate Raise,0x1
1224 e015 | | Load 0x0,0x15
1225 1814 | | Execute Package,Field_Execute,Field_Number 0x14
1226 4856 |HV | Short_Literal 0x56
1227 8023 | # | Call 0x0,0x23
1228 00cc | | Action Pop_Block
1229 4502 |E | Exit_Suprogram New_Top_Offset 0x2
122a TRAP_11f8:
122a 0007 | | Action Break_Optional
122b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
122c 0000 0000 | | .BLANK 0000[0x4]
1230 ; --------------------------------------------------------------------------------------
1230 ; SUBPROGRAM
1230 ; --------------------------------------------------------------------------------------
1230 1233 | 3 | .CONST 0x1233 ; Address of begin
1231 0004 | | .CONST 0x0004 ; Address of exception handler
1232 0001 | | .CONST 0x0001 ; Number of locals
1233 BODY_1230:
1233 INIT_1230:
1233 e403 | | Load 0x2,0x3
1234 6804 |h | Jump_Zero 0x1239
1235 482d |H- | Short_Literal 0x2d
1236 e7ff | | Load 0x3,-0x1
1237 01ca | | Execute Vector,Prepend
1238 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1239 e7ff | | Load 0x3,-0x1
123a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
123b 0000 0000 | | .BLANK 0000[0x5]
1240 ; --------------------------------------------------------------------------------------
1240 ; SUBPROGRAM
1240 ; --------------------------------------------------------------------------------------
1240 1243 | C | .CONST 0x1243 ; Address of begin
1241 0004 | | .CONST 0x0004 ; Address of exception handler
1242 0001 | | .CONST 0x0001 ; Number of locals
1243 BODY_1240:
1243 INIT_1240:
1243 e7fe | | Load 0x3,-0x2
1244 7008 |p | Jump_Nonzero 0x124d
1245 4820 |H | Short_Literal 0x20
1246 4800 |H | Short_Literal 0x0
1247 480a |H | Short_Literal 0xa
1248 e7ff | | Load 0x3,-0x1
1249 e01a | | Load 0x0,0x1a
124a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
124b 8408 | | Call 0x2,0x8
124c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
124d 482e |H. | Short_Literal 0x2e
124e 4820 |H | Short_Literal 0x20
124f 4800 |H | Short_Literal 0x0
1250 480a |H | Short_Literal 0xa
1251 e7ff | | Load 0x3,-0x1
1252 e01a | | Load 0x0,0x1a
1253 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1254 01cb | | Execute Vector,Append
1255 4830 |H0 | Short_Literal 0x30
1256 4803 |H | Short_Literal 0x3
1257 480a |H | Short_Literal 0xa
1258 e7fe | | Load 0x3,-0x2
1259 e01a | | Load 0x0,0x1a
125a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
125b 01cc | | Execute Vector,Catenate
125c 8408 | | Call 0x2,0x8
125d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
125e 0000 0000 | | .XXX[0x2]
1260 ; --------------------------------------------------------------------------------------
1260 ; SUBPROGRAM
1260 ; --------------------------------------------------------------------------------------
1260 1263 | c | .CONST 0x1263 ; Address of begin
1261 126c | l | .CONST 0x126c ; Address of exception handler
1262 0001 | | .CONST 0x0001 ; Number of locals
1263 BODY_1260:
1263 INIT_1260:
1263 e5ff | | Load 0x2,-0x1
1264 e011 | | Load 0x0,0x11
1265 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1266 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1267 e011 | | Load 0x0,0x11
1268 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
1269 1c02 | | Execute_Immediate Run_Utility,0x2
126a a403 | | Store_Unchecked 0x2,0x3
126b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
126c TRAP_1260:
126c 0007 | | Action Break_Optional
126d e5ff | | Load 0x2,-0x1
126e e011 | | Load 0x0,0x11
126f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1270 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1271 00e2 | | Load_Encached Integer_Cache
1272 00e0 | | Load_Encached Standard_Cache
1273 1819 | | Execute Package,Field_Execute,Field_Number 0x19
1274 00d8 | | Load_Top At_Offset_0
1275 e011 | | Load 0x0,0x11
1276 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
1277 0260 | ` | Execute Discrete,In_Type
1278 7001 |p | Jump_Nonzero 0x127a
1279 0801 | | Execute_Immediate Raise,0x1
127a a403 | | Store_Unchecked 0x2,0x3
127b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
127c 0000 0000 | | .BLANK 0000[0x4]
1280 ; --------------------------------------------------------------------------------------
1280 ; SUBPROGRAM
1280 ; --------------------------------------------------------------------------------------
1280 1283 | | .CONST 0x1283 ; Address of begin
1281 128b | | .CONST 0x128b ; Address of exception handler
1282 0001 | | .CONST 0x0001 ; Number of locals
1283 BODY_1280:
1283 INIT_1280:
1283 e5ff | | Load 0x2,-0x1
1284 e011 | | Load 0x0,0x11
1285 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1286 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1287 e254 | T | Load 0x1,0x54
1288 1c02 | | Execute_Immediate Run_Utility,0x2
1289 a403 | | Store_Unchecked 0x2,0x3
128a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
128b TRAP_1280:
128b 0007 | | Action Break_Optional
128c e5ff | | Load 0x2,-0x1
128d e011 | | Load 0x0,0x11
128e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
128f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1290 0f01 | | Execute_Immediate Equal,0x1
1291 680c |h | Jump_Zero 0x129e
1292 4801 |H | Short_Literal 0x1
1293 e5ff | | Load 0x2,-0x1
1294 e011 | | Load 0x0,0x11
1295 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1296 1814 | | Execute Package,Field_Execute,Field_Number 0x14
1297 00d8 | | Load_Top At_Offset_0
1298 e254 | T | Load 0x1,0x54
1299 0260 | ` | Execute Discrete,In_Type
129a 7001 |p | Jump_Nonzero 0x129c
129b 0801 | | Execute_Immediate Raise,0x1
129c a403 | | Store_Unchecked 0x2,0x3
129d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
129e e5ff | | Load 0x2,-0x1
129f e011 | | Load 0x0,0x11
12a0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
12a1 1816 | | Execute Package,Field_Execute,Field_Number 0x16
12a2 00e2 | | Load_Encached Integer_Cache
12a3 00e0 | | Load_Encached Standard_Cache
12a4 1819 | | Execute Package,Field_Execute,Field_Number 0x19
12a5 00d8 | | Load_Top At_Offset_0
12a6 e254 | T | Load 0x1,0x54
12a7 0260 | ` | Execute Discrete,In_Type
12a8 7001 |p | Jump_Nonzero 0x12aa
12a9 0801 | | Execute_Immediate Raise,0x1
12aa a403 | | Store_Unchecked 0x2,0x3
12ab 4501 |E | Exit_Suprogram New_Top_Offset 0x1
12ac ; --------------------------------------------------------------------------------------
12ac ; STRING TABLE
12ac ; --------------------------------------------------------------------------------------
12ac 028e | | .STRTAB 0x028e->0x13f3 ; "U_000"
12ad 0291 | | .STRTAB 0x0291->0x13f5 ; "U_001"
12ae 0294 | | .STRTAB 0x0294->0x13f8 ; "U_002"
12af 0297 | | .STRTAB 0x0297->0x13fa ; "U_003"
12b0 029a | | .STRTAB 0x029a->0x13fd ; "U_004"
12b1 029d | | .STRTAB 0x029d->0x13ff ; "U_005"
12b2 02a0 | | .STRTAB 0x02a0->0x1402 ; "U_006"
12b3 02a3 | | .STRTAB 0x02a3->0x1404 ; "U_007"
12b4 02a6 | | .STRTAB 0x02a6->0x1407 ; "U_010"
12b5 02a9 | | .STRTAB 0x02a9->0x1409 ; "U_011"
12b6 02ac | | .STRTAB 0x02ac->0x140c ; "U_012"
12b7 02af | | .STRTAB 0x02af->0x140e ; "U_013"
12b8 02b2 | | .STRTAB 0x02b2->0x1411 ; "U_014"
12b9 02b5 | | .STRTAB 0x02b5->0x1413 ; "U_015"
12ba 02b8 | | .STRTAB 0x02b8->0x1416 ; "U_016"
12bb 02bb | | .STRTAB 0x02bb->0x1418 ; "U_017"
12bc 02be | | .STRTAB 0x02be->0x141b ; "U_020"
12bd 02c1 | | .STRTAB 0x02c1->0x141d ; "U_021"
12be 02c4 | | .STRTAB 0x02c4->0x1420 ; "U_022"
12bf 02c7 | | .STRTAB 0x02c7->0x1422 ; "U_023"
12c0 02ca | | .STRTAB 0x02ca->0x1425 ; "U_024"
12c1 02cd | | .STRTAB 0x02cd->0x1427 ; "U_025"
12c2 02d0 | | .STRTAB 0x02d0->0x142a ; "U_026"
12c3 02d3 | | .STRTAB 0x02d3->0x142c ; "U_027"
12c4 02d6 | | .STRTAB 0x02d6->0x142f ; "U_030"
12c5 02d9 | | .STRTAB 0x02d9->0x1431 ; "U_031"
12c6 02dc | | .STRTAB 0x02dc->0x1434 ; "U_032"
12c7 02df | | .STRTAB 0x02df->0x1436 ; "U_033"
12c8 02e2 | | .STRTAB 0x02e2->0x1439 ; "U_034"
12c9 02e5 | | .STRTAB 0x02e5->0x143b ; "U_035"
12ca 02e8 | | .STRTAB 0x02e8->0x143e ; "U_036"
12cb 02eb | | .STRTAB 0x02eb->0x1440 ; "U_037"
12cc 02ee | | .STRTAB 0x02ee->0x1443 ; "SPACE"
12cd 02f1 | | .STRTAB 0x02f1->0x1445 ; "EXCLAM"
12ce 02f5 | | .STRTAB 0x02f5->0x1448 ; "UNIVERSAL"
12cf 02fc | | .STRTAB 0x02fc->0x144d ; "NUMBERSIGN"
12d0 0304 | | .STRTAB 0x0304->0x1452 ; "EXISTENTIAL"
12d1 030d | | .STRTAB 0x030d->0x1457 ; "PERCENT"
12d2 0312 | | .STRTAB 0x0312->0x145b ; "AMPERSAND"
12d3 0319 | | .STRTAB 0x0319->0x145f ; "SUCHTHAT"
12d4 031f | | .STRTAB 0x031f->0x1463 ; "PARENLEFT"
12d5 0326 | & | .STRTAB 0x0326->0x1468 ; "PARENRIGHT"
12d6 032e | . | .STRTAB 0x032e->0x146d ; "ASTERISKMATH"
12d7 0338 | 8 | .STRTAB 0x0338->0x1473 ; "PLUS"
12d8 033a | : | .STRTAB 0x033a->0x1475 ; "COMMA"
12d9 033d | = | .STRTAB 0x033d->0x1477 ; "MINUS"
12da 0340 | @ | .STRTAB 0x0340->0x147a ; "PERIOD"
12db 0344 | D | .STRTAB 0x0344->0x147d ; "SLASH"
12dc 0347 | G | .STRTAB 0x0347->0x147f ; "ZERO"
12dd 0349 | I | .STRTAB 0x0349->0x1481 ; "ONE"
12de 034a | J | .STRTAB 0x034a->0x1483 ; "TWO"
12df 034b | K | .STRTAB 0x034b->0x1484 ; "THREE"
12e0 034e | N | .STRTAB 0x034e->0x1487 ; "FOUR"
12e1 0350 | P | .STRTAB 0x0350->0x1489 ; "FIVE"
12e2 0352 | R | .STRTAB 0x0352->0x148b ; "SIX"
12e3 0353 | S | .STRTAB 0x0353->0x148c ; "SEVEN"
12e4 0356 | V | .STRTAB 0x0356->0x148f ; "EIGHT"
12e5 0359 | Y | .STRTAB 0x0359->0x1491 ; "NINE"
12e6 035b | [ | .STRTAB 0x035b->0x1493 ; "COLON"
12e7 035e | ^ | .STRTAB 0x035e->0x1496 ; "SEMICOLON"
12e8 0365 | e | .STRTAB 0x0365->0x149a ; "LESS"
12e9 0367 | g | .STRTAB 0x0367->0x149c ; "EQUAL"
12ea 036a | j | .STRTAB 0x036a->0x149f ; "GREATER"
12eb 036f | o | .STRTAB 0x036f->0x14a2 ; "QUESTION"
12ec 0375 | u | .STRTAB 0x0375->0x14a6 ; "CONGRUENT"
12ed 037c | | | .STRTAB 0x037c->0x14ab ; "CAP_ALPHA"
12ee 0383 | | .STRTAB 0x0383->0x14af ; "CAP_BETA"
12ef 0389 | | .STRTAB 0x0389->0x14b3 ; "CAP_CHI"
12f0 038e | | .STRTAB 0x038e->0x14b7 ; "CAP_DELTA"
12f1 0395 | | .STRTAB 0x0395->0x14bb ; "CAP_EPSILON"
12f2 039e | | .STRTAB 0x039e->0x14c1 ; "CAP_PHI"
12f3 03a3 | | .STRTAB 0x03a3->0x14c4 ; "CAP_GAMMA"
12f4 03aa | | .STRTAB 0x03aa->0x14c9 ; "CAP_ETA"
12f5 03af | | .STRTAB 0x03af->0x14cc ; "CAP_IOTA"
12f6 03b5 | | .STRTAB 0x03b5->0x14d0 ; "THETA1"
12f7 03b9 | | .STRTAB 0x03b9->0x14d3 ; "CAP_KAPPA"
12f8 03c0 | | .STRTAB 0x03c0->0x14d8 ; "CAP_LAMBDA"
12f9 03c8 | | .STRTAB 0x03c8->0x14dd ; "CAP_MU"
12fa 03cc | | .STRTAB 0x03cc->0x14e0 ; "CAP_NU"
12fb 03d0 | | .STRTAB 0x03d0->0x14e3 ; "CAP_OMICRON"
12fc 03d9 | | .STRTAB 0x03d9->0x14e8 ; "CAP_PI"
12fd 03dd | | .STRTAB 0x03dd->0x14eb ; "CAP_THETA"
12fe 03e4 | | .STRTAB 0x03e4->0x14f0 ; "CAP_RHO"
12ff 03e9 | | .STRTAB 0x03e9->0x14f3 ; "CAP_SIGMA"
1300 03f0 | | .STRTAB 0x03f0->0x14f8 ; "CAP_TAU"
1301 03f5 | | .STRTAB 0x03f5->0x14fb ; "CAP_UPSILON"
1302 03fe | | .STRTAB 0x03fe->0x1501 ; "SIGMA1"
1303 0402 | | .STRTAB 0x0402->0x1504 ; "CAP_OMEGA"
1304 0409 | | .STRTAB 0x0409->0x1508 ; "CAP_XI"
1305 040d | | .STRTAB 0x040d->0x150b ; "CAP_PSI"
1306 0412 | | .STRTAB 0x0412->0x150f ; "CAP_ZETA"
1307 0418 | | .STRTAB 0x0418->0x1513 ; "BRACKETLEFT"
1308 0421 | ! | .STRTAB 0x0421->0x1518 ; "THEREFORE"
1309 0428 | ( | .STRTAB 0x0428->0x151d ; "BRACKETRIGHT"
130a 0432 | 2 | .STRTAB 0x0432->0x1523 ; "PERPENDICULAR"
130b 043d | = | .STRTAB 0x043d->0x1529 ; "UNDERSCORE"
130c 0445 | E | .STRTAB 0x0445->0x152e ; "RADICALEX"
130d 044c | L | .STRTAB 0x044c->0x1533 ; "LOWER_ALPHA"
130e 0455 | U | .STRTAB 0x0455->0x1538 ; "LOWER_BETA"
130f 045d | ] | .STRTAB 0x045d->0x153d ; "LOWER_CHI"
1310 0464 | d | .STRTAB 0x0464->0x1542 ; "LOWER_DELTA"
1311 046d | m | .STRTAB 0x046d->0x1547 ; "LOWER_EPSILON"
1312 0478 | x | .STRTAB 0x0478->0x154e ; "LOWER_PHI"
1313 047f | | .STRTAB 0x047f->0x1552 ; "LOWER_GAMMA"
1314 0488 | | .STRTAB 0x0488->0x1558 ; "LOWER_ETA"
1315 048f | | .STRTAB 0x048f->0x155c ; "LOWER_IOTA"
1316 0497 | | .STRTAB 0x0497->0x1561 ; "PHI1"
1317 0499 | | .STRTAB 0x0499->0x1563 ; "LOWER_KAPPA"
1318 04a2 | | .STRTAB 0x04a2->0x1569 ; "LOWER_LAMBDA"
1319 04ac | | .STRTAB 0x04ac->0x156f ; "LOWER_MU"
131a 04b2 | | .STRTAB 0x04b2->0x1573 ; "LOWER_NU"
131b 04b8 | | .STRTAB 0x04b8->0x1577 ; "LOWER_OMICRON"
131c 04c3 | | .STRTAB 0x04c3->0x157d ; "LOWER_PI"
131d 04c9 | | .STRTAB 0x04c9->0x1581 ; "LOWER_THETA"
131e 04d2 | | .STRTAB 0x04d2->0x1587 ; "LOWER_RHO"
131f 04d9 | | .STRTAB 0x04d9->0x158b ; "LOWER_SIGMA"
1320 04e2 | | .STRTAB 0x04e2->0x1591 ; "LOWER_TAU"
1321 04e9 | | .STRTAB 0x04e9->0x1595 ; "LOWER_UPSILON"
1322 04f4 | | .STRTAB 0x04f4->0x159c ; "OMEGA1"
1323 04f8 | | .STRTAB 0x04f8->0x159f ; "LOWER_OMEGA"
1324 0501 | | .STRTAB 0x0501->0x15a4 ; "LOWER_XI"
1325 0507 | | .STRTAB 0x0507->0x15a8 ; "LOWER_PSI"
1326 050e | | .STRTAB 0x050e->0x15ad ; "LOWER_ZETA"
1327 0516 | | .STRTAB 0x0516->0x15b2 ; "BRACELEFT"
1328 051d | | .STRTAB 0x051d->0x15b6 ; "BAR"
1329 051e | | .STRTAB 0x051e->0x15b8 ; "BRACERIGHT"
132a 0526 | & | .STRTAB 0x0526->0x15bd ; "SIMILAR"
132b 052b | + | .STRTAB 0x052b->0x15c0 ; "U_177"
132c 052e | . | .STRTAB 0x052e->0x15c3 ; "U_200"
132d 0531 | 1 | .STRTAB 0x0531->0x15c5 ; "U_201"
132e 0534 | 4 | .STRTAB 0x0534->0x15c8 ; "U_202"
132f 0537 | 7 | .STRTAB 0x0537->0x15ca ; "U_203"
1330 053a | : | .STRTAB 0x053a->0x15cd ; "U_204"
1331 053d | = | .STRTAB 0x053d->0x15cf ; "U_205"
1332 0540 | @ | .STRTAB 0x0540->0x15d2 ; "U_206"
1333 0543 | C | .STRTAB 0x0543->0x15d4 ; "U_207"
1334 0546 | F | .STRTAB 0x0546->0x15d7 ; "U_210"
1335 0549 | I | .STRTAB 0x0549->0x15d9 ; "U_211"
1336 054c | L | .STRTAB 0x054c->0x15dc ; "U_212"
1337 054f | O | .STRTAB 0x054f->0x15de ; "U_213"
1338 0552 | R | .STRTAB 0x0552->0x15e1 ; "U_214"
1339 0555 | U | .STRTAB 0x0555->0x15e3 ; "U_215"
133a 0558 | X | .STRTAB 0x0558->0x15e6 ; "U_216"
133b 055b | [ | .STRTAB 0x055b->0x15e8 ; "U_217"
133c 055e | ^ | .STRTAB 0x055e->0x15eb ; "U_220"
133d 0561 | a | .STRTAB 0x0561->0x15ed ; "U_221"
133e 0564 | d | .STRTAB 0x0564->0x15f0 ; "U_222"
133f 0567 | g | .STRTAB 0x0567->0x15f2 ; "U_223"
1340 056a | j | .STRTAB 0x056a->0x15f5 ; "U_224"
1341 056d | m | .STRTAB 0x056d->0x15f7 ; "U_225"
1342 0570 | p | .STRTAB 0x0570->0x15fa ; "U_226"
1343 0573 | s | .STRTAB 0x0573->0x15fc ; "U_227"
1344 0576 | v | .STRTAB 0x0576->0x15ff ; "U_230"
1345 0579 | y | .STRTAB 0x0579->0x1601 ; "U_231"
1346 057c | | | .STRTAB 0x057c->0x1604 ; "U_232"
1347 057f | | .STRTAB 0x057f->0x1606 ; "U_233"
1348 0582 | | .STRTAB 0x0582->0x1609 ; "U_234"
1349 0585 | | .STRTAB 0x0585->0x160b ; "U_235"
134a 0588 | | .STRTAB 0x0588->0x160e ; "U_236"
134b 058b | | .STRTAB 0x058b->0x1610 ; "U_237"
134c 058e | | .STRTAB 0x058e->0x1613 ; "U_240"
134d 0591 | | .STRTAB 0x0591->0x1615 ; "UPSILON1"
134e 0597 | | .STRTAB 0x0597->0x1619 ; "MINUTE"
134f 059b | | .STRTAB 0x059b->0x161c ; "LESSEQUAL"
1350 05a2 | | .STRTAB 0x05a2->0x1621 ; "FRACTION"
1351 05a8 | | .STRTAB 0x05a8->0x1625 ; "INFINITY"
1352 05ae | | .STRTAB 0x05ae->0x1629 ; "FLORIN"
1353 05b2 | | .STRTAB 0x05b2->0x162c ; "CLUB"
1354 05b4 | | .STRTAB 0x05b4->0x162e ; "DIAMOND"
1355 05b9 | | .STRTAB 0x05b9->0x1631 ; "HEART"
1356 05bc | | .STRTAB 0x05bc->0x1634 ; "SPADE"
1357 05bf | | .STRTAB 0x05bf->0x1636 ; "ARROWBOTH"
1358 05c6 | | .STRTAB 0x05c6->0x163b ; "ARROWLEFT"
1359 05cd | | .STRTAB 0x05cd->0x163f ; "ARROWUP"
135a 05d2 | | .STRTAB 0x05d2->0x1643 ; "ARROWRIGHT"
135b 05da | | .STRTAB 0x05da->0x1648 ; "ARROWDOWN"
135c 05e1 | | .STRTAB 0x05e1->0x164c ; "DEGREE"
135d 05e5 | | .STRTAB 0x05e5->0x164f ; "PLUSMINUS"
135e 05ec | | .STRTAB 0x05ec->0x1654 ; "SECOND"
135f 05f0 | | .STRTAB 0x05f0->0x1657 ; "GREATEREQUAL"
1360 05fa | | .STRTAB 0x05fa->0x165d ; "MULTIPLY"
1361 0600 | | .STRTAB 0x0600->0x1661 ; "PROPORTIONAL"
1362 060a | | .STRTAB 0x060a->0x1667 ; "PARTIALDIFF"
1363 0613 | | .STRTAB 0x0613->0x166c ; "BULLET"
1364 0617 | | .STRTAB 0x0617->0x166f ; "DIVIDE"
1365 061b | | .STRTAB 0x061b->0x1672 ; "NOTEQUAL"
1366 0621 | ! | .STRTAB 0x0621->0x1676 ; "EQUIVALENCE"
1367 062a | * | .STRTAB 0x062a->0x167c ; "APPROXEQUAL"
1368 0633 | 3 | .STRTAB 0x0633->0x1681 ; "ELLIPSIS"
1369 0639 | 9 | .STRTAB 0x0639->0x1685 ; "ARROWVERTIX"
136a 0642 | B | .STRTAB 0x0642->0x168b ; "ARROWHORIZEX"
136b 064c | L | .STRTAB 0x064c->0x1691 ; "CARRIAGERETURN"
136c 0658 | X | .STRTAB 0x0658->0x1698 ; "ALEPH"
136d 065b | [ | .STRTAB 0x065b->0x169a ; "IFRACTUR"
136e 0661 | a | .STRTAB 0x0661->0x169e ; "RFRACTUR"
136f 0667 | g | .STRTAB 0x0667->0x16a2 ; "WEIERSTRASS"
1370 0670 | p | .STRTAB 0x0670->0x16a8 ; "CIRCLEMULTIPLY"
1371 067c | | | .STRTAB 0x067c->0x16af ; "CIRCLEPLUS"
1372 0684 | | .STRTAB 0x0684->0x16b4 ; "EMPTYSET"
1373 068a | | .STRTAB 0x068a->0x16b8 ; "INTERSECTION"
1374 0694 | | .STRTAB 0x0694->0x16be ; "UNION"
1375 0697 | | .STRTAB 0x0697->0x16c0 ; "PROPERSUPERSET"
1376 06a3 | | .STRTAB 0x06a3->0x16c7 ; "REFLEXSUPERSET"
1377 06af | | .STRTAB 0x06af->0x16ce ; "NOTSUBSET"
1378 06b6 | | .STRTAB 0x06b6->0x16d3 ; "PROPERSUBSET"
1379 06c0 | | .STRTAB 0x06c0->0x16d9 ; "REFLEXSUBSET"
137a 06ca | | .STRTAB 0x06ca->0x16df ; "ELEMENT"
137b 06cf | | .STRTAB 0x06cf->0x16e2 ; "NOTELEMENT"
137c 06d7 | | .STRTAB 0x06d7->0x16e7 ; "ANGLE"
137d 06da | | .STRTAB 0x06da->0x16ea ; "GRADIENT"
137e 06e0 | | .STRTAB 0x06e0->0x16ee ; "REGISTERSERIF"
137f 06eb | | .STRTAB 0x06eb->0x16f4 ; "COPYRIGHTSERIF"
1380 06f7 | | .STRTAB 0x06f7->0x16fb ; "TRADEMARKSERIF"
1381 0703 | | .STRTAB 0x0703->0x1702 ; "PRODUCT"
1382 0708 | | .STRTAB 0x0708->0x1706 ; "RADICAL"
1383 070d | | .STRTAB 0x070d->0x1709 ; "DOTMATH"
1384 0712 | | .STRTAB 0x0712->0x170d ; "LOGICALNOT"
1385 071a | | .STRTAB 0x071a->0x1712 ; "LOGICALAND"
1386 0722 | " | .STRTAB 0x0722->0x1717 ; "LOGICALOR"
1387 0729 | ) | .STRTAB 0x0729->0x171b ; "ARROWDBLBOTH"
1388 0733 | 3 | .STRTAB 0x0733->0x1721 ; "ARROWDBLLEFT"
1389 073d | = | .STRTAB 0x073d->0x1727 ; "ARROWDBLUP"
138a 0745 | E | .STRTAB 0x0745->0x172c ; "ARROWDBLRIGHT"
138b 0750 | P | .STRTAB 0x0750->0x1733 ; "ARROWDBLDOWN"
138c 075a | Z | .STRTAB 0x075a->0x1739 ; "LOZENGE"
138d 075f | _ | .STRTAB 0x075f->0x173c ; "ANGLELEFT"
138e 0766 | f | .STRTAB 0x0766->0x1741 ; "REGISTERSANS"
138f 0770 | p | .STRTAB 0x0770->0x1747 ; "COPYRIGHTSANS"
1390 077b | { | .STRTAB 0x077b->0x174d ; "TRADEMARKSANS"
1391 0786 | | .STRTAB 0x0786->0x1754 ; "SUMMATION"
1392 078d | | .STRTAB 0x078d->0x1758 ; "PARENLEFTTP"
1393 0796 | | .STRTAB 0x0796->0x175e ; "PARENLEFTEX"
1394 079f | | .STRTAB 0x079f->0x1763 ; "PARENLEFTBT"
1395 07a8 | | .STRTAB 0x07a8->0x1769 ; "BRACKETLEFTTP"
1396 07b3 | | .STRTAB 0x07b3->0x176f ; "BRACKETLEFTEX"
1397 07be | | .STRTAB 0x07be->0x1776 ; "BRACKETLEFTBT"
1398 07c9 | | .STRTAB 0x07c9->0x177c ; "BRACELEFTTP"
1399 07d2 | | .STRTAB 0x07d2->0x1782 ; "BRACELEFTMID"
139a 07dc | | .STRTAB 0x07dc->0x1788 ; "BRACELEFTBT"
139b 07e5 | | .STRTAB 0x07e5->0x178d ; "BRACEEX"
139c 07ea | | .STRTAB 0x07ea->0x1791 ; "U_360"
139d 07ed | | .STRTAB 0x07ed->0x1793 ; "ANGLERIGHT"
139e 07f5 | | .STRTAB 0x07f5->0x1798 ; "INTEGRAL"
139f 07fb | | .STRTAB 0x07fb->0x179c ; "INTEGRALTP"
13a0 0803 | | .STRTAB 0x0803->0x17a1 ; "INTEGRALEX"
13a1 080b | | .STRTAB 0x080b->0x17a6 ; "INTEGRALBT"
13a2 0813 | | .STRTAB 0x0813->0x17ab ; "PARENRIGHTTP"
13a3 081d | | .STRTAB 0x081d->0x17b1 ; "PARENRIGHTEX"
13a4 0827 | ' | .STRTAB 0x0827->0x17b7 ; "PARENRIGHTBT"
13a5 0831 | 1 | .STRTAB 0x0831->0x17bd ; "BRACKETRIGHTTP"
13a6 083d | = | .STRTAB 0x083d->0x17c4 ; "BRACKETRIGHTEX"
13a7 0849 | I | .STRTAB 0x0849->0x17cb ; "BRACKETRIGHTBT"
13a8 0855 | U | .STRTAB 0x0855->0x17d2 ; "BRACERIGHTTP"
13a9 085f | _ | .STRTAB 0x085f->0x17d8 ; "BRACERIGHTMID"
13aa 086a | j | .STRTAB 0x086a->0x17df ; "BRACERIGHTBT"
13ab 0874 | t | .STRTAB 0x0874->0x17e5 ; "U_377"
13ac 0877 | w | .STRTAB 0x0877->0x17e7 ; "lines"
13ad 087a | z | .STRTAB 0x087a->0x17ea ; "'"
13ae 0879 | y | .STRTAB 0x0879->0x17ea ; "' isn't a number. 1 assumed"
13af 0893 | | .STRTAB 0x0893->0x17f8 ; "symbol"
13b0 0897 | | .STRTAB 0x0897->0x17fb ; "Symbols font family not available"
13b1 08b6 | | .STRTAB 0x08b6->0x180c ; "' is not a valid character or symbol name"
13b2 08dd | | .STRTAB 0x08dd->0x1820 ; "Argument to Close was unrecognizable"
13b3 08ff | | .STRTAB 0x08ff->0x1832 ; "Close File"
13b4 0907 | | .STRTAB 0x0907->0x1837 ; "Close"
13b5 090a | | .STRTAB 0x090a->0x183a ; "Close missing File argument"
13b6 0923 | # | .STRTAB 0x0923->0x1847 ; " is not open"
13b7 092d | - | .STRTAB 0x092d->0x184d ; "Argument to Create was unrecognizable"
13b8 0950 | P | .STRTAB 0x0950->0x1860 ; "Create File"
13b9 0959 | Y | .STRTAB 0x0959->0x1865 ; "Create"
13ba 095d | ] | .STRTAB 0x095d->0x1868 ; "Create missing File argument"
13bb 0977 | w | .STRTAB 0x0977->0x1876 ; " is already open to "
13bc 0989 | | .STRTAB 0x0989->0x1880 ; "String Macro '"
13bd 0995 | | .STRTAB 0x0995->0x1887 ; "' is undefined"
13be 09a1 | | .STRTAB 0x09a1->0x188e ; "Macro '"
13bf 09a6 | | .STRTAB 0x09a6->0x1892 ; "End_Ip encountered with no matching Start_Ip"
13c0 09d0 | | .STRTAB 0x09d0->0x18a8 ; "End_Np encountered with no matching Start_Np"
13c1 09fa | | .STRTAB 0x09fa->0x18be ; "Including Ada input from "
13c2 0a11 | | .STRTAB 0x0a11->0x18ca ; "Finished Ada input from "
13c3 0a27 | ' | .STRTAB 0x0a27->0x18d6 ; "; resuming"
13c4 0a2f | / | .STRTAB 0x0a2f->0x18db ; "Error including Ada input file "
13c5 0a4c | L | .STRTAB 0x0a4c->0x18eb ; " ("
13c6 0a4c | L | .STRTAB 0x0a4c->0x18ec ; "Ignoring Ip that is not bracketed by Start_Ip and End_Ip"
13c7 0a82 | | .STRTAB 0x0a82->0x1908 ; "Tables can only be labelled once; ignoring label \x22"
13c8 0ab2 | | .STRTAB 0x0ab2->0x1921 ; "Please run Compose again; ~Ref ("
13c9 0ad0 | | .STRTAB 0x0ad0->0x1931 ; ") has changed value"
13ca 0ae1 | | .STRTAB 0x0ae1->0x193a ; "Please run Compose again; ~Page_Ref ("
13cb 0b04 | | .STRTAB 0x0b04->0x194d ; "Ignoring Np that is not bracketed by Start_Np and End_Np"
13cc 0b3a | : | .STRTAB 0x0b3a->0x1969 ; "~ "
13cd 0b3a | : | .STRTAB 0x0b3a->0x196a ; "Ignoring New_Page during Table input"
13ce 0b5c | \ | .STRTAB 0x0b5c->0x197c ; "New_Page must be ignored while buffering output"
13cf 0b89 | | .STRTAB 0x0b89->0x1993 ; "Overriding non-positive spacing for New_Page"
13d0 0bb3 | | .STRTAB 0x0bb3->0x19a9 ; "Ignoring Pop_Setup that has no corresponding Push_Setup"
13d1 0be8 | | .STRTAB 0x0be8->0x19c5 ; "Too many Push_Setups. The setup stack is full"
13d2 0c14 | | .STRTAB 0x0c14->0x19dc ; "Label "
13d3 0c18 | | .STRTAB 0x0c18->0x19df ; " references an unnumbered object"
13d4 0c36 | 6 | .STRTAB 0x0c36->0x19ef ; "UNNUMBERED"
13d5 0c3e | > | .STRTAB 0x0c3e->0x19f4 ; "Ignoring "
13d6 0c45 | E | .STRTAB 0x0c45->0x19f8 ; " that is nested too deeply"
13d7 0c5d | ] | .STRTAB 0x0c5d->0x1a05 ; "' is not a valid symbol or character name"
13d8 0c84 | | .STRTAB 0x0c84->0x1a1a ; "Ignoring Table_Title not bracketed by Begin(Table) and End(Table)"
13d9 0cc3 | | .STRTAB 0x0cc3->0x1a3a ; " (continued)"
13da 0ccd | | .STRTAB 0x0ccd->0x1a40 ; "No Title specified; using Repeat_Title"
13db 0cf1 | | .STRTAB 0x0cf1->0x1a53 ; " points = "
13dc 0cf9 | | .STRTAB 0x0cf9->0x1a58 ; " inches"
13dd 0cfe | | .STRTAB 0x0cfe->0x1a5c ; " = "
13de 0cff | | .STRTAB 0x0cff->0x1a5d ; " points"
13df 0d04 | | .STRTAB 0x0d04->0x1a61 ; " ="
13e0 0d04 | | .STRTAB 0x0d04->0x1a62 ; " = \x22"
13e1 0d06 | | .STRTAB 0x0d06->0x1a64 ; " = '"
13e2 0d08 | | .STRTAB 0x0d08->0x1a66 ; "~1~+.~|~1~+.~|~1~+.~|~1~+.~|~1~+.~|~1~+.~|"
13e3 0d30 | 0 | .STRTAB 0x0d30->0x1a7b ; "Cannot read the modification time data for "
13e4 0d59 | Y | .STRTAB 0x0d59->0x1a90 ; "Please run Compose again; ~Value (LatestFileDate) changed"
13e5 0d90 | | .STRTAB 0x0d90->0x1aad ; "Cannot create "
13e6 0d9c | | .STRTAB 0x0d9c->0x1ab4 ; " => "
13e7 0d9e | | .STRTAB 0x0d9e->0x1ab6 ; "~argument(text)"
13e8 0dab | | .STRTAB 0x0dab->0x1abd ; "synchronized"
13e9 0db5 | | .STRTAB 0x0db5->0x1ac3 ; "Cannot open Ada input file "
13ea 0dce | | .STRTAB 0x0dce->0x1ad1 ; "Macro requires a name=value pair. What was supplied was unrecognizable"
13eb 0e13 | | .STRTAB 0x0e13->0x1af4 ; "Macro"
13ec 0e16 | | .STRTAB 0x0e16->0x1af7 ; "Macro expects one argument of the form Name=Value"
13ed 0e45 | E | .STRTAB 0x0e45->0x1b0f ; "Macro expects one Name=Value pair. Extra arguments are ignored"
13ee 0e82 | | .STRTAB 0x0e82->0x1b2f ; "String_Macro requires a name=value pair. What was supplied was unrecognizable"
13ef 0ece | | .STRTAB 0x0ece->0x1b56 ; "String_Macro"
13f0 0ed8 | | .STRTAB 0x0ed8->0x1b5c ; "String_Macro expects one argument of the form Name=Value"
13f1 0f0e | | .STRTAB 0x0f0e->0x1b78 ; "String_Macro expects one Name=Value pair. Extra arguments are ignored"
13f2 0f52 | R | .STREND 0x0f52->0x1b9b
13f3 555f 3030 |U_00| .STRTAB_STRINGS
1b9b 0000 0000 | | .BLANK 0000[0x5]
1ba0 ; --------------------------------------------------------------------------------------
1ba0 ; Debug Table
1ba0 ; --------------------------------------------------------------------------------------
1ba0 0004 000f | | .DEBUG4 0x0004,0x000f,0x47f3,0x0000,0x0001,0x0000
1ba6 0000 0000 | | .BLANK 0000[0x5a]