|
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 - metrics - download
Length: 3072 (0xc00)
Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 02e8 | | .CONST 0x02e8 ; 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 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0071 | q | .CONST 0x0071 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0022 | " | .CONST 0x0022 ; Number of locals
000b INIT_0008:
000b 03a9 | | Declare_Type Heap_Access,Incomplete,Visible ; Debug Table 0x0 = .DEBUG 0x000b,0x03b2,0x0000,0x0000,0x0057,0x2995,0x0000,0x0b54
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 00e5 | | Load_Encached Long_Integer_Cache ; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 0129 | ) | Execute Any,Make_Visible
000e 029a 007b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0078 ; Debug Table 0x0.0x2 = 0xe,0xfffd
0010 029a 008b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0088 ; Debug Table 0x0.0x3 = 0x10,0xfffc
0012 029a 0093 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0090 ; Debug Table 0x0.0x4 = 0x12,0xfffb
0014 029a 00a3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00a0 ; Debug Table 0x0.0x5 = 0x14,0xfffa
0016 029a 00b3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00b0 ; Debug Table 0x0.0x6 = 0x16,0xfff9
0018 029a 00d3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00d0 ; Debug Table 0x0.0x7 = 0x18,0xfff8
001a 029a 00e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00e0 ; Debug Table 0x0.0x8 = 0x1a,0xfff7
001c 029a 00fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00f8 ; Debug Table 0x0.0x9 = 0x1c,0xfff6
001e 029a 010b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0108 ; Debug Table 0x0.0xa = 0x1e,0xfff5
0020 029a 011b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0118 ; Debug Table 0x0.0xb = 0x20,0xfff4
0022 029a 0133 | 3| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0130 ; Debug Table 0x0.0xc = 0x22,0xfff3
0024 029a 0153 | S| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0150 ; Debug Table 0x0.0xd = 0x24,0xfff2
0026 029a 017b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0178 ; Debug Table 0x0.0xe = 0x26,0xfff1
0028 029a 0183 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0180 ; Debug Table 0x0.0xf = 0x28,0xfff0
002a 029a 018b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0188 ; Debug Table 0x0.0x10 = 0x2a,0xffef
002c 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x11 = 0x2c,0xffee
002d 4804 |H | Short_Literal 0x4
002e 029f 01bb | | Declare_Subprogram For_Call,INIT_01b8
0030 03fd | | Declare_Type Discrete,Defined
0031 625a |bZ | Indirect_Literal Discrete,0x28c,{0x00000000, 0x00572995} ; Debug Table 0x0.0x12 = 0x31,0xffed
0032 6255 |bU | Indirect_Literal Discrete,0x288,{0x00000000, 0x00000c35}
0033 00da | | Load_Top At_Offset_2
0034 4800 |H | Short_Literal 0x0
0035 4801 |H | Short_Literal 0x1
0036 4804 |H | Short_Literal 0x4
0037 0092 0299 | | Action Push_String_Extended,0x299 ; "primary => Boolean_Valued, others => Unspecified"
0039 00ea | | Load_Encached Null_String_Cache
003a 00ea | | Load_Encached Null_String_Cache
003b 4801 |H | Short_Literal 0x1
003c 4804 |H | Short_Literal 0x4
003d e001 | | Load 0x0,0x1
003e 0387 | | Declare_Variable Package
003f 00d8 | | Load_Top At_Offset_0
0040 020f | | Execute Module,Activate
0041 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x13 = 0x41,0xffec
0042 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
0043 e20d | | Load 0x1,0xd
0044 03a2 | | Complete_Type Heap_Access,By_Renaming
0045 00bf | | Action Accept_Activation
0046 4801 |H | Short_Literal 0x1 ; Debug Table 0x1 = .DEBUG 0x0046,0x03dc,0x0000,0x0000,0x0059,0x7565,0x0000,0x0008
; Debug Table 0x1.0x0 = 0x46,0xffff
0047 4806 |H | Short_Literal 0x6
0048 e002 | | Load 0x0,0x2
0049 1b0d | | Execute Package,Field_Read,Field_Number 0xd
004a 0334 | 4 | Declare_Variable Array,With_Constraint
004b 5244 |RD | Indirect_Literal Any,0x290,{0x7463702f, 0x69702020}
004c e20d | | Load 0x1,0xd ; Debug Table 0x1.0x1 = 0x4c,0xfffe
004d 00ea | | Load_Encached Null_String_Cache
004e 00db | | Load_Top At_Offset_3
004f 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0050 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0051 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x2 = 0x51,0xfffd
0052 00c7 | | Action Elaborate_Subprogram
0053 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x3 = 0x53,0xfffc
0054 00c7 | | Action Elaborate_Subprogram
0055 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x4 = 0x55,0xfffb
0056 00c7 | | Action Elaborate_Subprogram
0057 1d1b | | Execute_Immediate Reference_Lex_1,0x1b ; Debug Table 0x1.0x5 = 0x57,0xfffa
0058 00c7 | | Action Elaborate_Subprogram
0059 1d1c | | Execute_Immediate Reference_Lex_1,0x1c ; Debug Table 0x1.0x6 = 0x59,0xfff9
005a 00c7 | | Action Elaborate_Subprogram
005b 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x7 = 0x5b,0xfff8
005c 00c7 | | Action Elaborate_Subprogram
005d 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x8 = 0x5d,0xfff7
005e 00c7 | | Action Elaborate_Subprogram
005f 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x9 = 0x5f,0xfff6
0060 00c7 | | Action Elaborate_Subprogram
0061 029d 01d3 | | Declare_Subprogram For_Outer_Call,INIT_01d0 ; Debug Table 0x1.0xa = 0x61,0xfff5
0063 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0xb = 0x63,0xfff4
0064 00c7 | | Action Elaborate_Subprogram
0065 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0xc = 0x65,0xfff3
0066 00c7 | | Action Elaborate_Subprogram
0067 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0xd = 0x67,0xfff2
0068 00c7 | | Action Elaborate_Subprogram
0069 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0xe = 0x69,0xfff1
006a 00c7 | | Action Elaborate_Subprogram
006b 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0xf = 0x6b,0xfff0
006c 00c7 | | Action Elaborate_Subprogram
006d 1d1d | | Execute_Immediate Reference_Lex_1,0x1d ; Debug Table 0x1.0x10 = 0x6d,0xffef
006e 00c7 | | Action Elaborate_Subprogram
006f 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0x11 = 0x6f,0xffee
0070 00c7 | | Action Elaborate_Subprogram
0071 BODY_0008:
0071 00bc | | Action Signal_Activated
0072 00bb | | Action Signal_Completion
0073 0000 0000 | | .BLANK 0000[0x5]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007b | { | .CONST 0x007b ; Address of begin
0079 007f | | .CONST 0x007f ; Address of exception handler
007a 0001 | | .CONST 0x0001 ; Number of locals
007b BODY_0078:
007b INIT_0078:
007b e220 | | Load 0x1,0x20 ; Debug Table 0x2 = .DEBUG 0x007b,0x0402,0x0002,0x0000,0x0057,0x2995,0x0000,0x0b5d
; Debug Table 0x2.0x0 = 0x7b,0x1
007c e003 | | Load 0x0,0x3
007d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
007e 00ca | | Action Exit_Nullary_Function
007f TRAP_0078:
007f e003 | | Load 0x0,0x3
0080 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0081 010f | | Execute Exception,Equal
0082 6802 |h | Jump_Zero 0x85
0083 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x2.0x1 = 0x83,0x2
0084 00ca | | Action Exit_Nullary_Function
0085 0100 | | Execute Exception,Raise
0086 0000 0000 | | .XXX[0x2]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008b | | .CONST 0x008b ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0001 | | .CONST 0x0001 ; Number of locals
008b BODY_0088:
008b INIT_0088:
008b 0092 029a | | Action Push_String_Extended,0x29a ; "State.Compatibility.State"
; Debug Table 0x3 = .DEBUG 0x008b,0x0408,0x0002,0x0000,0x0057,0x2995,0x0000,0x0b62
; Debug Table 0x3.0x0 = 0x8b,0x1
008d 00ca | | Action Exit_Nullary_Function
008e 0000 0000 | | .XXX[0x2]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0093 | | .CONST 0x0093 ; Address of begin
0091 0004 | | .CONST 0x0004 ; Address of exception handler
0092 0001 | | .CONST 0x0001 ; Number of locals
0093 BODY_0090:
0093 INIT_0090:
0093 482e |H. | Short_Literal 0x2e ; Debug Table 0x4 = .DEBUG 0x0093,0x040c,0x0002,0x0000,0x0057,0x2995,0x0000,0x0b67
; Debug Table 0x4.0x0 = 0x93,0x1
0094 00db | | Load_Top At_Offset_3
0095 e004 | | Load 0x0,0x4
0096 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0097 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0098 01cb | | Execute Vector,Append
0099 8210 | | Call 0x1,0x10
009a 01cc | | Execute Vector,Catenate
009b 4401 |D | Exit_Subprogram With_Result,0x1
009c 0000 0000 | | .BLANK 0000[0x4]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a7 | | .CONST 0x00a7 ; Address of begin
00a1 00ac | | .CONST 0x00ac ; Address of exception handler
00a2 0003 | | .CONST 0x0003 ; Number of locals
00a3 INIT_00a0:
00a3 029f 020b | | Declare_Subprogram For_Call,INIT_0208 ; Debug Table 0x5 = .DEBUG 0x00a3,0x0410,0x0002,0x0000,0x0057,0x2995,0x0000,0x0b72
; Debug Table 0x5.0x0 = 0xa3,0xffff
00a5 029f 0223 | #| Declare_Subprogram For_Call,INIT_0220 ; Debug Table 0x5.0x1 = 0xa5,0xfffe
00a7 BODY_00a0:
00a7 e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x2 = 0xa7,0x1
00a8 8403 | | Call 0x2,0x3
00a9 e21f | | Load 0x1,0x1f
00aa 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00ab 4401 |D | Exit_Subprogram With_Result,0x1
00ac TRAP_00a0:
00ac 0007 | | Action Break_Optional
00ad e221 | ! | Load 0x1,0x21 ; Debug Table 0x5.0x3 = 0xad,0x2
00ae 4401 |D | Exit_Subprogram With_Result,0x1
00af 0000 | | .XXX[0x1]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00ba | | .CONST 0x00ba ; Address of begin
00b1 00cc | | .CONST 0x00cc ; Address of exception handler
00b2 0003 | | .CONST 0x0003 ; Number of locals
00b3 INIT_00b0:
00b3 e005 | | Load 0x0,0x5 ; Debug Table 0x6 = .DEBUG 0x00b3,0x041a,0x0002,0x0000,0x0057,0x2995,0x0000,0x0b7d
; Debug Table 0x6.0x0 = 0xb3,0xffff
00b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00b5 02c7 | | Declare_Variable Any
00b6 00d8 | | Load_Top At_Offset_0
00b7 1c00 | | Execute_Immediate Run_Utility,0x0
00b8 e20d | | Load 0x1,0xd ; Debug Table 0x6.0x1 = 0xb8,0xfffe
00b9 0007 | | Action Break_Optional
00ba BODY_00b0:
00ba 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x2 = 0xba,0x1
00bb e5fe | | Load 0x2,-0x2
00bc 00ea | | Load_Encached Null_String_Cache
00bd e5ff | | Load 0x2,-0x1
00be 8211 | | Call 0x1,0x11
00bf 4800 |H | Short_Literal 0x0
00c0 e005 | | Load 0x0,0x5
00c1 1883 | | Execute Package,Field_Execute,Field_Number 0x83
00c2 c402 | | Store 0x2,0x2
00c3 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x3 = 0xc3,0x2
00c4 8212 | | Call 0x1,0x12
00c5 0031 | 1 | Store_Top Heap_Access,At_Offset_1
00c6 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x4 = 0xc6,0x3
00c7 e005 | | Load 0x0,0x5
00c8 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00c9 c402 | | Store 0x2,0x2
00ca 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x5 = 0xca,0x4
00cb 4402 |D | Exit_Subprogram With_Result,0x2
00cc TRAP_00b0:
00cc 0007 | | Action Break_Optional
00cd e221 | ! | Load 0x1,0x21 ; Debug Table 0x6.0x6 = 0xcd,0x5
00ce 4402 |D | Exit_Subprogram With_Result,0x2
00cf 0000 | | .XXX[0x1]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d3 | | .CONST 0x00d3 ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 0001 | | .CONST 0x0001 ; Number of locals
00d3 BODY_00d0:
00d3 INIT_00d0:
00d3 4801 |H | Short_Literal 0x1 ; Debug Table 0x7 = .DEBUG 0x00d3,0x042a,0x0002,0x0000,0x0057,0x2995,0x0000,0x0b91
; Debug Table 0x7.0x0 = 0xd3,0x1
00d4 4801 |H | Short_Literal 0x1
00d5 e5ff | | Load 0x2,-0x1
00d6 e21f | | Load 0x1,0x1f
00d7 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
00d8 4401 |D | Exit_Subprogram With_Result,0x1
00d9 0000 0000 | | .BLANK 0000[0x7]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3 | | .CONST 0x00e3 ; Address of begin
00e1 00eb | | .CONST 0x00eb ; Address of exception handler
00e2 0001 | | .CONST 0x0001 ; Number of locals
00e3 BODY_00e0:
00e3 INIT_00e0:
00e3 0092 029b | | Action Push_String_Extended,0x29b ; "0"
; Debug Table 0x8 = .DEBUG 0x00e3,0x042e,0x0002,0x0000,0x0057,0x2995,0x0000,0x0b9a
; Debug Table 0x8.0x0 = 0xe3,0x1
00e5 4802 |H | Short_Literal 0x2
00e6 e5ff | | Load 0x2,-0x1
00e7 e21f | | Load 0x1,0x1f
00e8 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
00e9 8222 | " | Call 0x1,0x22
00ea 4401 |D | Exit_Subprogram With_Result,0x1
00eb TRAP_00e0:
00eb 010e | | Execute Exception,Is_Constraint_Error
00ec 7002 |p | Jump_Nonzero 0xef
00ed 010d | | Execute Exception,Is_Numeric_Error
00ee 6802 |h | Jump_Zero 0xf1
00ef 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x1 = 0xef,0x2
00f0 4401 |D | Exit_Subprogram With_Result,0x1
00f1 0100 | | Execute Exception,Raise
00f2 0000 0000 | | .BLANK 0000[0x6]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00fb | | .CONST 0x00fb ; Address of begin
00f9 0004 | | .CONST 0x0004 ; Address of exception handler
00fa 0001 | | .CONST 0x0001 ; Number of locals
00fb BODY_00f8:
00fb INIT_00f8:
00fb 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x9 = .DEBUG 0x00fb,0x0434,0x0002,0x0000,0x0057,0x2995,0x0000,0x0ba3
; Debug Table 0x9.0x0 = 0xfb,0x1
00fc 4803 |H | Short_Literal 0x3
00fd e5ff | | Load 0x2,-0x1
00fe e21f | | Load 0x1,0x1f
00ff 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0100 4401 |D | Exit_Subprogram With_Result,0x1
0101 0000 0000 | | .BLANK 0000[0x7]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010b | | .CONST 0x010b ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 0001 | | .CONST 0x0001 ; Number of locals
010b BODY_0108:
010b INIT_0108:
010b 00ea | | Load_Encached Null_String_Cache ; Debug Table 0xa = .DEBUG 0x010b,0x0438,0x0002,0x0000,0x0057,0x2995,0x0000,0x0bac
; Debug Table 0xa.0x0 = 0x10b,0x1
010c 4804 |H | Short_Literal 0x4
010d e5ff | | Load 0x2,-0x1
010e e21f | | Load 0x1,0x1f
010f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0110 4401 |D | Exit_Subprogram With_Result,0x1
0111 0000 0000 | | .BLANK 0000[0x7]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 0124 | $ | .CONST 0x0124 ; Address of begin
0119 012b | + | .CONST 0x012b ; Address of exception handler
011a 0004 | | .CONST 0x0004 ; Number of locals
011b INIT_0118:
011b e005 | | Load 0x0,0x5 ; Debug Table 0xb = .DEBUG 0x011b,0x043c,0x0001,0x0000,0x0057,0x2995,0x0000,0x0bb5
; Debug Table 0xb.0x0 = 0x11b,0xffff
011c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
011d 02c7 | | Declare_Variable Any
011e 00d8 | | Load_Top At_Offset_0
011f 1c00 | | Execute_Immediate Run_Utility,0x0
0120 029f 0233 | 3| Declare_Subprogram For_Call,INIT_0230
0122 029f 0243 | C| Declare_Subprogram For_Call,INIT_0240
0124 BODY_0118:
0124 8403 | | Call 0x2,0x3 ; Debug Table 0xb.0x1 = 0x124,0x1
0125 8404 | | Call 0x2,0x4 ; Debug Table 0xb.0x2 = 0x125,0x2
0126 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x3 = 0x126,0x3
0127 e005 | | Load 0x0,0x5
0128 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0129 c402 | | Store 0x2,0x2
012a 4507 |E | Exit_Subprogram 0x7
012b TRAP_0118:
012b 0007 | | Action Break_Optional
012c 4507 |E | Exit_Subprogram 0x7 ; Debug Table 0xb.0x4 = 0x12c,0x4
012d 0000 0000 | | .XXX[0x3]
012f 0000 | |
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0135 | 5 | .CONST 0x0135 ; Address of begin
0131 0004 | | .CONST 0x0004 ; Address of exception handler
0132 0002 | | .CONST 0x0002 ; Number of locals
0133 INIT_0130:
0133 029f 025b | [| Declare_Subprogram For_Call,INIT_0258 ; Debug Table 0xc = .DEBUG 0x0133,0x0448,0x0001,0x0000,0x0057,0x2995,0x0000,0x0bd8
; Debug Table 0xc.0x0 = 0x133,0xffff
0135 BODY_0130:
0135 e5fe | | Load 0x2,-0x2 ; Debug Table 0xc.0x1 = 0x135,0x1
0136 00e1 | | Load_Encached Boolean_Cache
0137 025e | ^ | Execute Discrete,Convert
0138 1c01 | | Execute_Immediate Run_Utility,0x1
0139 4801 |H | Short_Literal 0x1
013a e5ff | | Load 0x2,-0x1
013b 8402 | | Call 0x2,0x2
013c e5fd | | Load 0x2,-0x3 ; Debug Table 0xc.0x2 = 0x13c,0x2
013d 00e0 | | Load_Encached Standard_Cache
013e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
013f 4802 |H | Short_Literal 0x2
0140 e5ff | | Load 0x2,-0x1
0141 8402 | | Call 0x2,0x2
0142 e5fc | | Load 0x2,-0x4 ; Debug Table 0xc.0x3 = 0x142,0x3
0143 4803 |H | Short_Literal 0x3
0144 e5ff | | Load 0x2,-0x1
0145 8402 | | Call 0x2,0x2
0146 e5fb | | Load 0x2,-0x5 ; Debug Table 0xc.0x4 = 0x146,0x4
0147 4804 |H | Short_Literal 0x4
0148 e5ff | | Load 0x2,-0x1
0149 8402 | | Call 0x2,0x2
014a 4506 |E | Exit_Subprogram 0x6
014b 0000 0000 | | .BLANK 0000[0x5]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 015e | ^ | .CONST 0x015e ; Address of begin
0151 0004 | | .CONST 0x0004 ; Address of exception handler
0152 0003 | | .CONST 0x0003 ; Number of locals
0153 INIT_0150:
0153 e20d | | Load 0x1,0xd ; Debug Table 0xd = .DEBUG 0x0153,0x0454,0x0001,0x0000,0x0057,0x2995,0x0000,0x0bf2
; Debug Table 0xd.0x0 = 0x153,0xffff
0154 e5fe | | Load 0x2,-0x2
0155 e21f | | Load 0x1,0x1f
0156 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0157 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0158 e5fd | | Load 0x2,-0x3 ; Debug Table 0xd.0x1 = 0x158,0xfffe
0159 e5ff | | Load 0x2,-0x1
015a e006 | | Load 0x0,0x6
015b 1819 | | Execute Package,Field_Execute,Field_Number 0x19
015c e20e | | Load 0x1,0xe
015d 03f1 | | Declare_Variable Discrete,With_Value
015e BODY_0150:
015e e5fd | | Load 0x2,-0x3 ; Debug Table 0xd.0x2 = 0x15e,0x1
015f e5ff | | Load 0x2,-0x1
0160 e006 | | Load 0x0,0x6
0161 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0162 680b |h | Jump_Zero 0x16e
0163 e5fd | | Load 0x2,-0x3 ; Debug Table 0xd.0x3 = 0x163,0x2
0164 820f | | Call 0x1,0xf
0165 e5ff | | Load 0x2,-0x1
0166 e004 | | Load 0x0,0x4
0167 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0168 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0169 00db | | Load_Top At_Offset_3
016a 4801 |H | Short_Literal 0x1
016b e5ff | | Load 0x2,-0x1
016c 8218 | | Call 0x1,0x18
016d 4504 |E | Exit_Subprogram 0x4
016e e5fd | | Load 0x2,-0x3 ; Debug Table 0xd.0x4 = 0x16e,0x3
016f 00da | | Load_Top At_Offset_2
0170 8217 | | Call 0x1,0x17
0171 00db | | Load_Top At_Offset_3
0172 8216 | | Call 0x1,0x16
0173 00db | | Load_Top At_Offset_3
0174 4800 |H | Short_Literal 0x0
0175 e5ff | | Load 0x2,-0x1
0176 8218 | | Call 0x1,0x18
0177 4504 |E | Exit_Subprogram 0x4
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017b | { | .CONST 0x017b ; Address of begin
0179 0004 | | .CONST 0x0004 ; Address of exception handler
017a 0001 | | .CONST 0x0001 ; Number of locals
017b BODY_0178:
017b INIT_0178:
017b e221 | ! | Load 0x1,0x21 ; Debug Table 0xe = .DEBUG 0x017b,0x0460,0x0002,0x0000,0x0057,0x2995,0x0000,0x0c09
; Debug Table 0xe.0x0 = 0x17b,0x1
017c 00ca | | Action Exit_Nullary_Function
017d 0000 0000 | | .XXX[0x3]
017f 0000 | |
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0183 | | .CONST 0x0183 ; Address of begin
0181 0004 | | .CONST 0x0004 ; Address of exception handler
0182 0001 | | .CONST 0x0001 ; Number of locals
0183 BODY_0180:
0183 INIT_0180:
0183 00da | | Load_Top At_Offset_2 ; Debug Table 0xf = .DEBUG 0x0183,0x0464,0x0002,0x0000,0x0057,0x2995,0x0000,0x0c0e
; Debug Table 0xf.0x0 = 0x183,0x1
0184 e21f | | Load 0x1,0x1f
0185 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0186 4401 |D | Exit_Subprogram With_Result,0x1
0187 0000 | | .XXX[0x1]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 0194 | | .CONST 0x0194 ; Address of begin
0189 0004 | | .CONST 0x0004 ; Address of exception handler
018a 0004 | | .CONST 0x0004 ; Number of locals
018b INIT_0188:
018b e20d | | Load 0x1,0xd ; Debug Table 0x10 = .DEBUG 0x018b,0x0468,0x0002,0x0000,0x0057,0x2995,0x0000,0x0c17
; Debug Table 0x10.0x0 = 0x18b,0xffff
018c e5fe | | Load 0x2,-0x2
018d e5ff | | Load 0x2,-0x1
018e 8213 | | Call 0x1,0x13
018f 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0190 0092 029c | | Action Push_String_Extended,0x29c ; ", "
; Debug Table 0x10.0x1 = 0x190,0xfffe
0192 029f 0273 | s| Declare_Subprogram For_Call,INIT_0270 ; Debug Table 0x10.0x2 = 0x192,0xfffd
0194 BODY_0188:
0194 00da | | Load_Top At_Offset_2 ; Debug Table 0x10.0x3 = 0x194,0x1
0195 8214 | | Call 0x1,0x14
0196 00e1 | | Load_Encached Boolean_Cache
0197 025e | ^ | Execute Discrete,Convert
0198 1c01 | | Execute_Immediate Run_Utility,0x1
0199 4801 |H | Short_Literal 0x1
019a 8404 | | Call 0x2,0x4
019b 00da | | Load_Top At_Offset_2
019c 01cc | | Execute Vector,Catenate
019d 00db | | Load_Top At_Offset_3
019e 8215 | | Call 0x1,0x15
019f 00e0 | | Load_Encached Standard_Cache
01a0 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01a1 4802 |H | Short_Literal 0x2
01a2 8404 | | Call 0x2,0x4
01a3 01cc | | Execute Vector,Catenate
01a4 00da | | Load_Top At_Offset_2
01a5 01cc | | Execute Vector,Catenate
01a6 00db | | Load_Top At_Offset_3
01a7 8216 | | Call 0x1,0x16
01a8 4803 |H | Short_Literal 0x3
01a9 8404 | | Call 0x2,0x4
01aa 01cc | | Execute Vector,Catenate
01ab 00da | | Load_Top At_Offset_2
01ac 01cc | | Execute Vector,Catenate
01ad 00db | | Load_Top At_Offset_3
01ae 8217 | | Call 0x1,0x17
01af 4804 |H | Short_Literal 0x4
01b0 8404 | | Call 0x2,0x4
01b1 01cc | | Execute Vector,Catenate
01b2 4402 |D | Exit_Subprogram With_Result,0x2
01b3 0000 0000 | | .BLANK 0000[0x5]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bb | | .CONST 0x01bb ; Address of begin
01b9 0004 | | .CONST 0x0004 ; Address of exception handler
01ba 0001 | | .CONST 0x0001 ; Number of locals
01bb BODY_01b8:
01bb INIT_01b8:
01bb 4603 |F | Jump_Case 0x3 ; Debug Table 0x11 = .DEBUG 0x01bb,0x0472,0x0005,0x0000,0x0057,0x2995,0x0000,0x0c2c
01bc 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
01bd 7802 |x | Jump 0x1c0 ; case 0x1
01be 7805 |x | Jump 0x1c4 ; case 0x2
01bf 7809 |x | Jump 0x1c9 ; case 0x3
01c0 00da | | Load_Top At_Offset_2
01c1 0091 0294 | | Action Push_String_Extended_Indexed,0x294 ; "NIL"
01c3 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
01c4 00db | | Load_Top At_Offset_3
01c5 00db | | Load_Top At_Offset_3
01c6 00e0 | | Load_Encached Standard_Cache
01c7 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01c8 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
01c9 00da | | Load_Top At_Offset_2
01ca 00e0 | | Load_Encached Standard_Cache
01cb 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01cc 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
01cd 0000 0000 | | .XXX[0x3]
01cf 0000 | |
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d8 | | .CONST 0x01d8 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0003 | | .CONST 0x0003 ; Number of locals
01d3 INIT_01d0:
01d3 0007 | | Action Break_Optional ; Debug Table 0x12 = .DEBUG 0x01d3,0x0474,0x0002,0x0000,0x0059,0x7565,0x0000,0x0178
; Debug Table 0x12.0x0 = 0x1d3,0xffff
01d4 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x12.0x1 = 0x1d4,0xfffe
01d5 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
01d6 00e5 | | Load_Encached Long_Integer_Cache ; Debug Table 0x12.0x2 = 0x1d6,0xfffd
01d7 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01d8 BODY_01d0:
01d8 00cf | | Action Mark_Auxiliary
01d9 e5ff | | Load 0x2,-0x1 ; Debug Table 0x12.0x3 = 0x1d9,0x1
01da 01dc | | Execute Vector,Last
01db e5ff | | Load 0x2,-0x1
01dc 01dd | | Execute Vector,First
01dd 0263 | c | Execute Discrete,Above_Bound
01de 701f |p | Jump_Nonzero 0x1fe
01df 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x4 = 0x1df,0x2
01e0 e5ff | | Load 0x2,-0x1
01e1 01d7 | | Execute Vector,Field_Read
01e2 0b20 | | Execute_Immediate Case_Compare,0x20
01e3 7017 |p | Jump_Nonzero 0x1fb
01e4 0b5f | _ | Execute_Immediate Case_Compare,0x5f
01e5 7015 |p | Jump_Nonzero 0x1fb
01e6 0b2d | - | Execute_Immediate Case_Compare,0x2d
01e7 7007 |p | Jump_Nonzero 0x1ef
01e8 00d8 | | Load_Top At_Offset_0
01e9 4830 |H0 | Short_Literal 0x30
01ea 4839 |H9 | Short_Literal 0x39
01eb 0262 | b | Execute Discrete,In_Range
01ec 7005 |p | Jump_Nonzero 0x1f2
01ed 48e0 |H | Short_Literal 0xe0 ; Debug Table 0x12.0x5 = 0x1ed,0x6
01ee 0257 | W | Execute Discrete,Raise
01ef 4800 |H | Short_Literal 0x0 ; Debug Table 0x12.0x6 = 0x1ef,0x4
01f0 a402 | | Store_Unchecked 0x2,0x2
01f1 7809 |x | Jump 0x1fb
01f2 e403 | | Load 0x2,0x3 ; Debug Table 0x12.0x7 = 0x1f2,0x5
01f3 480a |H | Short_Literal 0xa
01f4 0271 | q | Execute Discrete,Times
01f5 00da | | Load_Top At_Offset_2
01f6 e5ff | | Load 0x2,-0x1
01f7 01d7 | | Execute Vector,Field_Read
01f8 0ad0 | | Execute_Immediate Plus,-0x30
01f9 0273 | s | Execute Discrete,Plus
01fa a403 | | Store_Unchecked 0x2,0x3
01fb 00d1 | | Pop_Control Pop_Count_1
01fc 00c8 | | Action Pop_Auxiliary_Range
01fd 3fe1 |? | Loop_Increasing 0x1df
01fe 00ce | | Action Pop_Auxiliary
01ff 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x12.0x8 = 0x1ff,0x7
0200 6802 |h | Jump_Zero 0x203
0201 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x9 = 0x201,0x8
0202 4401 |D | Exit_Subprogram With_Result,0x1
0203 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0xa = 0x203,0x9
0204 0275 | u | Execute Discrete,Unary_Minus
0205 4401 |D | Exit_Subprogram With_Result,0x1
0206 0000 0000 | | .XXX[0x2]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020e | | .CONST 0x020e ; Address of begin
0209 0004 | | .CONST 0x0004 ; Address of exception handler
020a 0002 | | .CONST 0x0002 ; Number of locals
020b INIT_0208:
020b 00da | | Load_Top At_Offset_2 ; Debug Table 0x13 = .DEBUG 0x020b,0x048c,0x0002,0x0000,0x0059,0x7565,0x0000,0x00de
; Debug Table 0x13.0x0 = 0x20b,0xffff
020c e005 | | Load 0x0,0x5
020d 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
020e BODY_0208:
020e 00db | | Load_Top At_Offset_3 ; Debug Table 0x13.0x1 = 0x20e,0x1
020f e005 | | Load 0x0,0x5
0210 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0211 6802 |h | Jump_Zero 0x214
0212 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x2 = 0x212,0x2
0213 4401 |D | Exit_Subprogram With_Result,0x1
0214 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x3 = 0x214,0x3
0215 01dc | | Execute Vector,Last
0216 00d9 | | Load_Top At_Offset_1
0217 01d7 | | Execute Vector,Field_Read
0218 0e2c | , | Execute_Immediate Not_Equal,0x2c
0219 6804 |h | Jump_Zero 0x21e
021a 482c |H, | Short_Literal 0x2c ; Debug Table 0x13.0x4 = 0x21a,0x4
021b 00d9 | | Load_Top At_Offset_1
021c 01cb | | Execute Vector,Append
021d 4401 |D | Exit_Subprogram With_Result,0x1
021e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x5 = 0x21e,0x5
021f 4401 |D | Exit_Subprogram With_Result,0x1
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223 | # | .CONST 0x0223 ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0001 | | .CONST 0x0001 ; Number of locals
0223 BODY_0220:
0223 INIT_0220:
0223 00da | | Load_Top At_Offset_2 ; Debug Table 0x14 = .DEBUG 0x0223,0x049a,0x0002,0x0000,0x0059,0x7565,0x0000,0x0119
; Debug Table 0x14.0x0 = 0x223,0x1
0224 e005 | | Load 0x0,0x5
0225 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0226 6802 |h | Jump_Zero 0x229
0227 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x14.0x1 = 0x227,0x2
0228 4401 |D | Exit_Subprogram With_Result,0x1
0229 00da | | Load_Top At_Offset_2 ; Debug Table 0x14.0x2 = 0x229,0x3
022a 8402 | | Call 0x2,0x2
022b 00db | | Load_Top At_Offset_3
022c 8403 | | Call 0x2,0x3
022d 01cc | | Execute Vector,Catenate
022e 4401 |D | Exit_Subprogram With_Result,0x1
022f 0000 | | .XXX[0x1]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0233 | 3 | .CONST 0x0233 ; Address of begin
0231 023d | = | .CONST 0x023d ; Address of exception handler
0232 0001 | | .CONST 0x0001 ; Number of locals
0233 BODY_0230:
0233 INIT_0230:
0233 e402 | | Load 0x2,0x2 ; Debug Table 0x15 = .DEBUG 0x0233,0x04a2,0x0004,0x0000,0x0059,0x7565,0x0000,0x0290
; Debug Table 0x15.0x0 = 0x233,0x1
0234 e5fa | | Load 0x2,-0x6
0235 00ea | | Load_Encached Null_String_Cache
0236 e5ff | | Load 0x2,-0x1
0237 8211 | | Call 0x1,0x11
0238 4801 |H | Short_Literal 0x1
0239 e005 | | Load 0x0,0x5
023a 1882 | | Execute Package,Field_Execute,Field_Number 0x82
023b c402 | | Store 0x2,0x2
023c 4501 |E | Exit_Subprogram 0x1
023d TRAP_0230:
023d 0007 | | Action Break_Optional
023e 00cc | | Action Pop_Block ; Debug Table 0x15.0x1 = 0x23e,0x2
023f 4507 |E | Exit_Subprogram 0x7
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0243 | C | .CONST 0x0243 ; Address of begin
0241 024a | J | .CONST 0x024a ; Address of exception handler
0242 0001 | | .CONST 0x0001 ; Number of locals
0243 BODY_0240:
0243 INIT_0240:
0243 e5fb | | Load 0x2,-0x5 ; Debug Table 0x16 = .DEBUG 0x0243,0x04a8,0x0004,0x0000,0x0059,0x7565,0x0000,0x02a7
; Debug Table 0x16.0x0 = 0x243,0x1
0244 e5fc | | Load 0x2,-0x4
0245 e5fd | | Load 0x2,-0x3
0246 e5fe | | Load 0x2,-0x2
0247 e402 | | Load 0x2,0x2
0248 8219 | | Call 0x1,0x19
0249 4501 |E | Exit_Subprogram 0x1
024a TRAP_0240:
024a 0007 | | Action Break_Optional
024b e402 | | Load 0x2,0x2 ; Debug Table 0x16.0x1 = 0x24b,0x2
024c e005 | | Load 0x0,0x5
024d 181b | | Execute Package,Field_Execute,Field_Number 0x1b
024e c402 | | Store 0x2,0x2
024f 00cc | | Action Pop_Block ; Debug Table 0x16.0x2 = 0x24f,0x3
0250 4507 |E | Exit_Subprogram 0x7
0251 0000 0000 | | .BLANK 0000[0x7]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 025b | [ | .CONST 0x025b ; Address of begin
0259 0004 | | .CONST 0x0004 ; Address of exception handler
025a 0001 | | .CONST 0x0001 ; Number of locals
025b BODY_0258:
025b INIT_0258:
025b e7fd | | Load 0x3,-0x3 ; Debug Table 0x17 = .DEBUG 0x025b,0x04b0,0x0001,0x0000,0x0059,0x7565,0x0000,0x02d0
; Debug Table 0x17.0x0 = 0x25b,0x1
025c 01db | | Execute Vector,Length
025d 680c |h | Jump_Zero 0x26a
025e 00db | | Load_Top At_Offset_3 ; Debug Table 0x17.0x1 = 0x25e,0x2
025f e21e | | Load 0x1,0x1e
0260 025e | ^ | Execute Discrete,Convert
0261 1c01 | | Execute_Immediate Run_Utility,0x1
0262 0092 029d | | Action Push_String_Extended,0x29d ; " => "
0264 01cc | | Execute Vector,Catenate
0265 e7fd | | Load 0x3,-0x3
0266 01cc | | Execute Vector,Catenate
0267 00db | | Load_Top At_Offset_3
0268 e005 | | Load 0x0,0x5
0269 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
026a 4504 |E | Exit_Subprogram 0x4
026b 0000 0000 | | .BLANK 0000[0x5]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273 | s | .CONST 0x0273 ; Address of begin
0271 0004 | | .CONST 0x0004 ; Address of exception handler
0272 0001 | | .CONST 0x0001 ; Number of locals
0273 BODY_0270:
0273 INIT_0270:
0273 00db | | Load_Top At_Offset_3 ; Debug Table 0x18 = .DEBUG 0x0273,0x04b6,0x0002,0x0000,0x0059,0x7565,0x0000,0x0349
; Debug Table 0x18.0x0 = 0x273,0x1
0274 01db | | Execute Vector,Length
0275 680a |h | Jump_Zero 0x280
0276 00da | | Load_Top At_Offset_2 ; Debug Table 0x18.0x1 = 0x276,0x2
0277 e21e | | Load 0x1,0x1e
0278 025e | ^ | Execute Discrete,Convert
0279 1c01 | | Execute_Immediate Run_Utility,0x1
027a 0092 029d | | Action Push_String_Extended,0x29d ; " => "
027c 01cc | | Execute Vector,Catenate
027d e7fe | | Load 0x3,-0x2
027e 01cc | | Execute Vector,Catenate
027f 4402 |D | Exit_Subprogram With_Result,0x2
0280 00da | | Load_Top At_Offset_2 ; Debug Table 0x18.0x2 = 0x280,0x3
0281 e21e | | Load 0x1,0x1e
0282 025e | ^ | Execute Discrete,Convert
0283 1c01 | | Execute_Immediate Run_Utility,0x1
0284 0092 029e | | Action Push_String_Extended,0x29e ; " => ()"
0286 01cc | | Execute Vector,Catenate
0287 4402 |D | Exit_Subprogram With_Result,0x2
0288 0000 0000 | | .LITERAL {0x00000000, 0x00000c35}
028c 0000 0000 | | .LITERAL {0x00000000, 0x00572995}
0290 7463 702f |tcp/| .LITERAL {0x7463702f, 0x69702020}
0294 ; --------------------------------------------------------------------------------------
0294 ; STRING TABLE
0294 ; --------------------------------------------------------------------------------------
0294 0018 | | .STRTAB 0x0018->0x02a0 ; "NIL"
0295 0019 | | .STRTAB 0x0019->0x02a1 ; "PRIMARY"
0296 001e | | .STRTAB 0x001e->0x02a5 ; "SUBSYSTEM"
0297 0025 | % | .STRTAB 0x0025->0x02a9 ; "PRIMARY_NAME"
0298 002f | / | .STRTAB 0x002f->0x02af ; "PRIMARY_MACHINE"
0299 003c | < | .STRTAB 0x003c->0x02b7 ; "primary => Boolean_Valued, others => Unspecified"
029a 006a | j | .STRTAB 0x006a->0x02cf ; "State.Compatibility.State"
029b 0081 | | .STRTAB 0x0081->0x02db ; "0"
029c 0080 | | .STRTAB 0x0080->0x02dc ; ", "
029d 0080 | | .STRTAB 0x0080->0x02dd ; " => "
; " => "
029e 0082 | | .STRTAB 0x0082->0x02df ; " => ()"
029f 0086 | | .STREND 0x0086->0x02e2
02a0 4e49 4c50 |NILP| .STRTAB_STRINGS
02e2 0000 0000 | | .BLANK 0000[0x6]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; Debug Table
02e8 ; --------------------------------------------------------------------------------------
02e8 0003 0019 | | .CONST 0x0003,0x0019
02ea 000b 03b2 | | .DEBUG 0x000b,0x03b2,0x0000,0x0000,0x0057,0x2995,0x0000,0x0b54
02f2 0046 03dc | F | .DEBUG 0x0046,0x03dc,0x0000,0x0000,0x0059,0x7565,0x0000,0x0008
02fa 007b 0402 | { | .DEBUG 0x007b,0x0402,0x0002,0x0000,0x0057,0x2995,0x0000,0x0b5d
0302 008b 0408 | | .DEBUG 0x008b,0x0408,0x0002,0x0000,0x0057,0x2995,0x0000,0x0b62
030a 0093 040c | | .DEBUG 0x0093,0x040c,0x0002,0x0000,0x0057,0x2995,0x0000,0x0b67
0312 00a3 0410 | | .DEBUG 0x00a3,0x0410,0x0002,0x0000,0x0057,0x2995,0x0000,0x0b72
031a 00b3 041a | | .DEBUG 0x00b3,0x041a,0x0002,0x0000,0x0057,0x2995,0x0000,0x0b7d
0322 00d3 042a | *| .DEBUG 0x00d3,0x042a,0x0002,0x0000,0x0057,0x2995,0x0000,0x0b91
032a 00e3 042e | .| .DEBUG 0x00e3,0x042e,0x0002,0x0000,0x0057,0x2995,0x0000,0x0b9a
0332 00fb 0434 | 4| .DEBUG 0x00fb,0x0434,0x0002,0x0000,0x0057,0x2995,0x0000,0x0ba3
033a 010b 0438 | 8| .DEBUG 0x010b,0x0438,0x0002,0x0000,0x0057,0x2995,0x0000,0x0bac
0342 011b 043c | <| .DEBUG 0x011b,0x043c,0x0001,0x0000,0x0057,0x2995,0x0000,0x0bb5
034a 0133 0448 | 3 H| .DEBUG 0x0133,0x0448,0x0001,0x0000,0x0057,0x2995,0x0000,0x0bd8
0352 0153 0454 | S T| .DEBUG 0x0153,0x0454,0x0001,0x0000,0x0057,0x2995,0x0000,0x0bf2
035a 017b 0460 | { `| .DEBUG 0x017b,0x0460,0x0002,0x0000,0x0057,0x2995,0x0000,0x0c09
0362 0183 0464 | d| .DEBUG 0x0183,0x0464,0x0002,0x0000,0x0057,0x2995,0x0000,0x0c0e
036a 018b 0468 | h| .DEBUG 0x018b,0x0468,0x0002,0x0000,0x0057,0x2995,0x0000,0x0c17
0372 01bb 0472 | r| .DEBUG 0x01bb,0x0472,0x0005,0x0000,0x0057,0x2995,0x0000,0x0c2c
037a 01d3 0474 | t| .DEBUG 0x01d3,0x0474,0x0002,0x0000,0x0059,0x7565,0x0000,0x0178
0382 020b 048c | | .DEBUG 0x020b,0x048c,0x0002,0x0000,0x0059,0x7565,0x0000,0x00de
038a 0223 049a | # | .DEBUG 0x0223,0x049a,0x0002,0x0000,0x0059,0x7565,0x0000,0x0119
0392 0233 04a2 | 3 | .DEBUG 0x0233,0x04a2,0x0004,0x0000,0x0059,0x7565,0x0000,0x0290
039a 0243 04a8 | C | .DEBUG 0x0243,0x04a8,0x0004,0x0000,0x0059,0x7565,0x0000,0x02a7
03a2 025b 04b0 | [ | .DEBUG 0x025b,0x04b0,0x0001,0x0000,0x0059,0x7565,0x0000,0x02d0
03aa 0273 04b6 | s | .DEBUG 0x0273,0x04b6,0x0002,0x0000,0x0059,0x7565,0x0000,0x0349
03b2 ; --------------------------------------------------------------------------------------
03b2 ; Debug3 Subtable 0x0
03b2 ; --------------------------------------------------------------------------------------
03b2 0014 0000 | | .DBG3TAB 0x0014,0x0000
03b4 000b ffff | | .CONST 0x000b,0xffff
03b6 000c fffe | | .CONST 0x000c,0xfffe
03b8 000e fffd | | .CONST 0x000e,0xfffd
03ba 0010 fffc | | .CONST 0x0010,0xfffc
03bc 0012 fffb | | .CONST 0x0012,0xfffb
03be 0014 fffa | | .CONST 0x0014,0xfffa
03c0 0016 fff9 | | .CONST 0x0016,0xfff9
03c2 0018 fff8 | | .CONST 0x0018,0xfff8
03c4 001a fff7 | | .CONST 0x001a,0xfff7
03c6 001c fff6 | | .CONST 0x001c,0xfff6
03c8 001e fff5 | | .CONST 0x001e,0xfff5
03ca 0020 fff4 | | .CONST 0x0020,0xfff4
03cc 0022 fff3 | " | .CONST 0x0022,0xfff3
03ce 0024 fff2 | $ | .CONST 0x0024,0xfff2
03d0 0026 fff1 | & | .CONST 0x0026,0xfff1
03d2 0028 fff0 | ( | .CONST 0x0028,0xfff0
03d4 002a ffef | * | .CONST 0x002a,0xffef
03d6 002c ffee | , | .CONST 0x002c,0xffee
03d8 0031 ffed | 1 | .CONST 0x0031,0xffed
03da 0041 ffec | A | .CONST 0x0041,0xffec
03dc ; --------------------------------------------------------------------------------------
03dc ; Debug3 Subtable 0x1
03dc ; --------------------------------------------------------------------------------------
03dc 0012 0000 | | .DBG3TAB 0x0012,0x0000
03de 0046 ffff | F | .CONST 0x0046,0xffff
03e0 004c fffe | L | .CONST 0x004c,0xfffe
03e2 0051 fffd | Q | .CONST 0x0051,0xfffd
03e4 0053 fffc | S | .CONST 0x0053,0xfffc
03e6 0055 fffb | U | .CONST 0x0055,0xfffb
03e8 0057 fffa | W | .CONST 0x0057,0xfffa
03ea 0059 fff9 | Y | .CONST 0x0059,0xfff9
03ec 005b fff8 | [ | .CONST 0x005b,0xfff8
03ee 005d fff7 | ] | .CONST 0x005d,0xfff7
03f0 005f fff6 | _ | .CONST 0x005f,0xfff6
03f2 0061 fff5 | a | .CONST 0x0061,0xfff5
03f4 0063 fff4 | c | .CONST 0x0063,0xfff4
03f6 0065 fff3 | e | .CONST 0x0065,0xfff3
03f8 0067 fff2 | g | .CONST 0x0067,0xfff2
03fa 0069 fff1 | i | .CONST 0x0069,0xfff1
03fc 006b fff0 | k | .CONST 0x006b,0xfff0
03fe 006d ffef | m | .CONST 0x006d,0xffef
0400 006f ffee | o | .CONST 0x006f,0xffee
0402 ; --------------------------------------------------------------------------------------
0402 ; Debug3 Subtable 0x2
0402 ; --------------------------------------------------------------------------------------
0402 0000 0002 | | .DBG3TAB 0x0000,0x0002
0404 007b 0001 | { | .CONST 0x007b,0x0001
0406 0083 0002 | | .CONST 0x0083,0x0002
0408 ; --------------------------------------------------------------------------------------
0408 ; Debug3 Subtable 0x3
0408 ; --------------------------------------------------------------------------------------
0408 0000 0001 | | .DBG3TAB 0x0000,0x0001
040a 008b 0001 | | .CONST 0x008b,0x0001
040c ; --------------------------------------------------------------------------------------
040c ; Debug3 Subtable 0x4
040c ; --------------------------------------------------------------------------------------
040c 0000 0001 | | .DBG3TAB 0x0000,0x0001
040e 0093 0001 | | .CONST 0x0093,0x0001
0410 ; --------------------------------------------------------------------------------------
0410 ; Debug3 Subtable 0x5
0410 ; --------------------------------------------------------------------------------------
0410 0002 0002 | | .DBG3TAB 0x0002,0x0002
0412 00a3 ffff | | .CONST 0x00a3,0xffff
0414 00a5 fffe | | .CONST 0x00a5,0xfffe
0416 00a7 0001 | | .CONST 0x00a7,0x0001
0418 00ad 0002 | | .CONST 0x00ad,0x0002
041a ; --------------------------------------------------------------------------------------
041a ; Debug3 Subtable 0x6
041a ; --------------------------------------------------------------------------------------
041a 0002 0005 | | .DBG3TAB 0x0002,0x0005
041c 00b3 ffff | | .CONST 0x00b3,0xffff
041e 00b8 fffe | | .CONST 0x00b8,0xfffe
0420 00ba 0001 | | .CONST 0x00ba,0x0001
0422 00c3 0002 | | .CONST 0x00c3,0x0002
0424 00c6 0003 | | .CONST 0x00c6,0x0003
0426 00ca 0004 | | .CONST 0x00ca,0x0004
0428 00cd 0005 | | .CONST 0x00cd,0x0005
042a ; --------------------------------------------------------------------------------------
042a ; Debug3 Subtable 0x7
042a ; --------------------------------------------------------------------------------------
042a 0000 0001 | | .DBG3TAB 0x0000,0x0001
042c 00d3 0001 | | .CONST 0x00d3,0x0001
042e ; --------------------------------------------------------------------------------------
042e ; Debug3 Subtable 0x8
042e ; --------------------------------------------------------------------------------------
042e 0000 0002 | | .DBG3TAB 0x0000,0x0002
0430 00e3 0001 | | .CONST 0x00e3,0x0001
0432 00ef 0002 | | .CONST 0x00ef,0x0002
0434 ; --------------------------------------------------------------------------------------
0434 ; Debug3 Subtable 0x9
0434 ; --------------------------------------------------------------------------------------
0434 0000 0001 | | .DBG3TAB 0x0000,0x0001
0436 00fb 0001 | | .CONST 0x00fb,0x0001
0438 ; --------------------------------------------------------------------------------------
0438 ; Debug3 Subtable 0xa
0438 ; --------------------------------------------------------------------------------------
0438 0000 0001 | | .DBG3TAB 0x0000,0x0001
043a 010b 0001 | | .CONST 0x010b,0x0001
043c ; --------------------------------------------------------------------------------------
043c ; Debug3 Subtable 0xb
043c ; --------------------------------------------------------------------------------------
043c 0001 0004 | | .DBG3TAB 0x0001,0x0004
043e 011b ffff | | .CONST 0x011b,0xffff
0440 0124 0001 | $ | .CONST 0x0124,0x0001
0442 0125 0002 | % | .CONST 0x0125,0x0002
0444 0126 0003 | & | .CONST 0x0126,0x0003
0446 012c 0004 | , | .CONST 0x012c,0x0004
0448 ; --------------------------------------------------------------------------------------
0448 ; Debug3 Subtable 0xc
0448 ; --------------------------------------------------------------------------------------
0448 0001 0004 | | .DBG3TAB 0x0001,0x0004
044a 0133 ffff | 3 | .CONST 0x0133,0xffff
044c 0135 0001 | 5 | .CONST 0x0135,0x0001
044e 013c 0002 | < | .CONST 0x013c,0x0002
0450 0142 0003 | B | .CONST 0x0142,0x0003
0452 0146 0004 | F | .CONST 0x0146,0x0004
0454 ; --------------------------------------------------------------------------------------
0454 ; Debug3 Subtable 0xd
0454 ; --------------------------------------------------------------------------------------
0454 0002 0003 | | .DBG3TAB 0x0002,0x0003
0456 0153 ffff | S | .CONST 0x0153,0xffff
0458 0158 fffe | X | .CONST 0x0158,0xfffe
045a 015e 0001 | ^ | .CONST 0x015e,0x0001
045c 0163 0002 | c | .CONST 0x0163,0x0002
045e 016e 0003 | n | .CONST 0x016e,0x0003
0460 ; --------------------------------------------------------------------------------------
0460 ; Debug3 Subtable 0xe
0460 ; --------------------------------------------------------------------------------------
0460 0000 0001 | | .DBG3TAB 0x0000,0x0001
0462 017b 0001 | { | .CONST 0x017b,0x0001
0464 ; --------------------------------------------------------------------------------------
0464 ; Debug3 Subtable 0xf
0464 ; --------------------------------------------------------------------------------------
0464 0000 0001 | | .DBG3TAB 0x0000,0x0001
0466 0183 0001 | | .CONST 0x0183,0x0001
0468 ; --------------------------------------------------------------------------------------
0468 ; Debug3 Subtable 0x10
0468 ; --------------------------------------------------------------------------------------
0468 0003 0001 | | .DBG3TAB 0x0003,0x0001
046a 018b ffff | | .CONST 0x018b,0xffff
046c 0190 fffe | | .CONST 0x0190,0xfffe
046e 0192 fffd | | .CONST 0x0192,0xfffd
0470 0194 0001 | | .CONST 0x0194,0x0001
0472 ; --------------------------------------------------------------------------------------
0472 ; Debug3 Subtable 0x11
0472 ; --------------------------------------------------------------------------------------
0472 0000 0000 | | .DBG3TAB 0x0000,0x0000
0474 ; --------------------------------------------------------------------------------------
0474 ; Debug3 Subtable 0x12
0474 ; --------------------------------------------------------------------------------------
0474 0003 0008 | | .DBG3TAB 0x0003,0x0008
0476 01d3 ffff | | .CONST 0x01d3,0xffff
0478 01d4 fffe | | .CONST 0x01d4,0xfffe
047a 01d6 fffd | | .CONST 0x01d6,0xfffd
047c 01d9 0001 | | .CONST 0x01d9,0x0001
047e 01df 0002 | | .CONST 0x01df,0x0002
0480 01ed 0006 | | .CONST 0x01ed,0x0006
0482 01ef 0004 | | .CONST 0x01ef,0x0004
0484 01f2 0005 | | .CONST 0x01f2,0x0005
0486 01ff 0007 | | .CONST 0x01ff,0x0007
0488 0201 0008 | | .CONST 0x0201,0x0008
048a 0203 0009 | | .CONST 0x0203,0x0009
048c ; --------------------------------------------------------------------------------------
048c ; Debug3 Subtable 0x13
048c ; --------------------------------------------------------------------------------------
048c 0001 0005 | | .DBG3TAB 0x0001,0x0005
048e 020b ffff | | .CONST 0x020b,0xffff
0490 020e 0001 | | .CONST 0x020e,0x0001
0492 0212 0002 | | .CONST 0x0212,0x0002
0494 0214 0003 | | .CONST 0x0214,0x0003
0496 021a 0004 | | .CONST 0x021a,0x0004
0498 021e 0005 | | .CONST 0x021e,0x0005
049a ; --------------------------------------------------------------------------------------
049a ; Debug3 Subtable 0x14
049a ; --------------------------------------------------------------------------------------
049a 0000 0003 | | .DBG3TAB 0x0000,0x0003
049c 0223 0001 | # | .CONST 0x0223,0x0001
049e 0227 0002 | ' | .CONST 0x0227,0x0002
04a0 0229 0003 | ) | .CONST 0x0229,0x0003
04a2 ; --------------------------------------------------------------------------------------
04a2 ; Debug3 Subtable 0x15
04a2 ; --------------------------------------------------------------------------------------
04a2 0000 0002 | | .DBG3TAB 0x0000,0x0002
04a4 0233 0001 | 3 | .CONST 0x0233,0x0001
04a6 023e 0002 | > | .CONST 0x023e,0x0002
04a8 ; --------------------------------------------------------------------------------------
04a8 ; Debug3 Subtable 0x16
04a8 ; --------------------------------------------------------------------------------------
04a8 0000 0003 | | .DBG3TAB 0x0000,0x0003
04aa 0243 0001 | C | .CONST 0x0243,0x0001
04ac 024b 0002 | K | .CONST 0x024b,0x0002
04ae 024f 0003 | O | .CONST 0x024f,0x0003
04b0 ; --------------------------------------------------------------------------------------
04b0 ; Debug3 Subtable 0x17
04b0 ; --------------------------------------------------------------------------------------
04b0 0000 0002 | | .DBG3TAB 0x0000,0x0002
04b2 025b 0001 | [ | .CONST 0x025b,0x0001
04b4 025e 0002 | ^ | .CONST 0x025e,0x0002
04b6 ; --------------------------------------------------------------------------------------
04b6 ; Debug3 Subtable 0x18
04b6 ; --------------------------------------------------------------------------------------
04b6 0000 0003 | | .DBG3TAB 0x0000,0x0003
04b8 0273 0001 | s | .CONST 0x0273,0x0001
04ba 0276 0002 | v | .CONST 0x0276,0x0002
04bc 0280 0003 | | .CONST 0x0280,0x0003
04be 0000 0000 | | .BLANK 0000[0x142]