|
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: 2048 (0x800)
Notes: 00_class, 5811_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 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0178 | x | .CONST 0x0178 ; 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 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0038 | 8 | .CONST 0x0038 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0017 | | .CONST 0x0017 ; Number of locals
000b INIT_0008:
000b e001 | | Load 0x0,0x1 ; Debug Table 0x0 = .DEBUG 0x000b,0x01e2,0x8000,0x0000,0x0037,0xdf94,0x0000,0x000d
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
000d 0129 | ) | Execute Any,Make_Visible
000e 029a 0043 | C| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0040 ; Debug Table 0x0.0x1 = 0xe,0xfffe
0010 029a 0053 | S| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0050 ; Debug Table 0x0.0x2 = 0x10,0xfffd
0012 e002 | | Load 0x0,0x2 ; Debug Table 0x0.0x3 = 0x12,0xfffc
0013 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0014 0129 | ) | Execute Any,Make_Visible
0015 029a 005b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0058 ; Debug Table 0x0.0x4 = 0x15,0xfffb
0017 029a 006b | k| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0068 ; Debug Table 0x0.0x5 = 0x17,0xfffa
0019 029a 007b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0078 ; Debug Table 0x0.0x6 = 0x19,0xfff9
001b 029a 008b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0088 ; Debug Table 0x0.0x7 = 0x1b,0xfff8
001d 029a 0093 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0090 ; Debug Table 0x0.0x8 = 0x1d,0xfff7
001f 029a 00a3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00a0 ; Debug Table 0x0.0x9 = 0x1f,0xfff6
0021 029a 00d3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00d0 ; Debug Table 0x0.0xa = 0x21,0xfff5
0023 00bf | | Action Accept_Activation ; Debug Table 0x0.0xb = 0x23,0xfff4
0024 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0024,0x01fc,0x8000,0x0000,0x0037,0xdfd4,0x0000,0x0015
; Debug Table 0x1.0x0 = 0x24,0xffff
0025 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x25,0xfffe
0026 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x2 = 0x26,0xfffd
0027 00c7 | | Action Elaborate_Subprogram
0028 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x3 = 0x28,0xfffc
0029 00c7 | | Action Elaborate_Subprogram
002a 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x4 = 0x2a,0xfffb
002b 00c7 | | Action Elaborate_Subprogram
002c 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x5 = 0x2c,0xfffa
002d 00c7 | | Action Elaborate_Subprogram
002e 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x6 = 0x2e,0xfff9
002f 00c7 | | Action Elaborate_Subprogram
0030 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x7 = 0x30,0xfff8
0031 00c7 | | Action Elaborate_Subprogram
0032 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x8 = 0x32,0xfff7
0033 00c7 | | Action Elaborate_Subprogram
0034 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x9 = 0x34,0xfff6
0035 00c7 | | Action Elaborate_Subprogram
0036 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0xa = 0x36,0xfff5
0037 00c7 | | Action Elaborate_Subprogram
0038 BODY_0008:
0038 00bc | | Action Signal_Activated
0039 00bb | | Action Signal_Completion
003a 0000 0000 | | .BLANK 0000[0x6]
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 0045 | E | .CONST 0x0045 ; Address of begin
0041 0004 | | .CONST 0x0004 ; Address of exception handler
0042 0002 | | .CONST 0x0002 ; Number of locals
0043 INIT_0040:
0043 029f 010b | | Declare_Subprogram For_Call,INIT_0108 ; Debug Table 0x2 = .DEBUG 0x0043,0x0214,0x0002,0x0000,0x0037,0xdf94,0x0000,0x0014
0045 BODY_0040:
0045 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0x0 = 0x45,0x1
0046 e5ff | | Load 0x2,-0x1
0047 e003 | | Load 0x0,0x3
0048 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0049 8402 | | Call 0x2,0x2 ; Debug Table 0x2.0x1 = 0x49,0x2
004a 48e2 |H | Short_Literal 0xe2 ; Debug Table 0x2.0x2 = 0x4a,0x3
004b 0257 | W | Execute Discrete,Raise
004c 0000 0000 | | .BLANK 0000[0x4]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0055 | U | .CONST 0x0055 ; Address of begin
0051 0004 | | .CONST 0x0004 ; Address of exception handler
0052 0002 | | .CONST 0x0002 ; Number of locals
0053 INIT_0050:
0053 029f 0153 | S| Declare_Subprogram For_Call,INIT_0150 ; Debug Table 0x3 = .DEBUG 0x0053,0x021c,0x0002,0x0000,0x0037,0xdf94,0x0000,0x0021
0055 BODY_0050:
0055 8402 | | Call 0x2,0x2 ; Debug Table 0x3.0x0 = 0x55,0x1
0056 48e2 |H | Short_Literal 0xe2 ; Debug Table 0x3.0x1 = 0x56,0x2
0057 0257 | W | Execute Discrete,Raise
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005b | [ | .CONST 0x005b ; Address of begin
0059 0004 | | .CONST 0x0004 ; Address of exception handler
005a 0001 | | .CONST 0x0001 ; Number of locals
005b BODY_0058:
005b INIT_0058:
005b 00da | | Load_Top At_Offset_2 ; Debug Table 0x4 = .DEBUG 0x005b,0x0222,0x0002,0x0000,0x0037,0xdf94,0x0000,0x0032
; Debug Table 0x4.0x0 = 0x5b,0x1
005c e004 | | Load 0x0,0x4
005d 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
005e e002 | | Load 0x0,0x2
005f 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0060 4401 |D | Exit_Subprogram With_Result,0x1
0061 0000 0000 | | .BLANK 0000[0x7]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b | k | .CONST 0x006b ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0001 | | .CONST 0x0001 ; Number of locals
006b BODY_0068:
006b INIT_0068:
006b 00da | | Load_Top At_Offset_2 ; Debug Table 0x5 = .DEBUG 0x006b,0x0226,0x0002,0x0000,0x0037,0xdf94,0x0000,0x003d
; Debug Table 0x5.0x0 = 0x6b,0x1
006c 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
006d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
006e 00db | | Load_Top At_Offset_3
006f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0070 e002 | | Load 0x0,0x2
0071 1848 | H | Execute Package,Field_Execute,Field_Number 0x48
0072 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0073 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0074 027d | } | Execute Discrete,Greater
0075 4401 |D | Exit_Subprogram With_Result,0x1
0076 0000 0000 | | .XXX[0x2]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007b | { | .CONST 0x007b ; Address of begin
0079 0004 | | .CONST 0x0004 ; Address of exception handler
007a 0001 | | .CONST 0x0001 ; Number of locals
007b BODY_0078:
007b INIT_0078:
007b 00da | | Load_Top At_Offset_2 ; Debug Table 0x6 = .DEBUG 0x007b,0x022a,0x0002,0x0000,0x0037,0xdf94,0x0000,0x0046
; Debug Table 0x6.0x0 = 0x7b,0x1
007c e002 | | Load 0x0,0x2
007d 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
007e 00db | | Load_Top At_Offset_3
007f e002 | | Load 0x0,0x2
0080 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0081 4401 |D | Exit_Subprogram With_Result,0x1
0082 0000 0000 | | .BLANK 0000[0x6]
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 00da | | Load_Top At_Offset_2 ; Debug Table 0x7 = .DEBUG 0x008b,0x022e,0x0002,0x0000,0x0037,0xdf94,0x0000,0x004f
; Debug Table 0x7.0x0 = 0x8b,0x1
008c 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
008d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
008e 4401 |D | Exit_Subprogram With_Result,0x1
008f 0000 | | .XXX[0x1]
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 00da | | Load_Top At_Offset_2 ; Debug Table 0x8 = .DEBUG 0x0093,0x0232,0x0001,0x0000,0x0037,0xdf94,0x0000,0x0058
; Debug Table 0x8.0x0 = 0x93,0x1
0094 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0095 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0096 0a01 | | Execute_Immediate Plus,0x1
0097 00db | | Load_Top At_Offset_3
0098 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0099 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
009a 4501 |E | Exit_Subprogram 0x1
009b 0000 0000 | | .BLANK 0000[0x5]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a8 | | .CONST 0x00a8 ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0003 | | .CONST 0x0003 ; Number of locals
00a3 INIT_00a0:
00a3 e005 | | Load 0x0,0x5 ; Debug Table 0x9 = .DEBUG 0x00a3,0x0236,0x0001,0x0000,0x0037,0xdf94,0x0000,0x0060
; Debug Table 0x9.0x0 = 0xa3,0xffff
00a4 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00a5 0322 | " | Declare_Variable Record
00a6 e004 | | Load 0x0,0x4 ; Debug Table 0x9.0x1 = 0xa6,0xfffe
00a7 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00a8 BODY_00a0:
00a8 e005 | | Load 0x0,0x5 ; Debug Table 0x9.0x2 = 0xa8,0x1
00a9 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00aa 0322 | " | Declare_Variable Record
00ab 00d8 | | Load_Top At_Offset_0
00ac 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
00ad e5ff | | Load 0x2,-0x1
00ae 00d9 | | Load_Top At_Offset_1
00af 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00b0 e5fe | | Load 0x2,-0x2
00b1 00d0 | | Action Swap_Control
00b2 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00b3 e005 | | Load 0x0,0x5
00b4 1b11 | | Execute Package,Field_Read,Field_Number 0x11
00b5 00d9 | | Load_Top At_Offset_1
00b6 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00b7 00da | | Load_Top At_Offset_2
00b8 017d | } | Execute Record,Structure_Write
00b9 e004 | | Load 0x0,0x4 ; Debug Table 0x9.0x3 = 0xb9,0x2
00ba 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00bb e006 | | Load 0x0,0x6
00bc 180e | | Execute Package,Field_Execute,Field_Number 0xe
00bd 4801 |H | Short_Literal 0x1
00be 4800 |H | Short_Literal 0x0
00bf e402 | | Load 0x2,0x2
00c0 e5fd | | Load 0x2,-0x3
00c1 e004 | | Load 0x0,0x4
00c2 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
00c3 0059 | Y | Store_Top Discrete,At_Offset_1
00c4 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x4 = 0xc4,0x3
00c5 6802 |h | Jump_Zero 0xc8
00c6 48e2 |H | Short_Literal 0xe2 ; Debug Table 0x9.0x5 = 0xc6,0x4
00c7 0257 | W | Execute Discrete,Raise
00c8 4504 |E | Exit_Subprogram 0x4
00c9 0000 0000 | | .BLANK 0000[0x7]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00e1 | | .CONST 0x00e1 ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 0004 | | .CONST 0x0004 ; Number of locals
00d3 INIT_00d0:
00d3 e005 | | Load 0x0,0x5 ; Debug Table 0xa = .DEBUG 0x00d3,0x0244,0x0001,0x0000,0x0037,0xdf94,0x0000,0x0073
; Debug Table 0xa.0x0 = 0xd3,0xffff
00d4 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00d5 0322 | " | Declare_Variable Record
00d6 e004 | | Load 0x0,0x4 ; Debug Table 0xa.0x1 = 0xd6,0xfffe
00d7 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00d8 e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0x2 = 0xd8,0xfffd
00d9 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00da e5ff | | Load 0x2,-0x1
00db 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00dc 0272 | r | Execute Discrete,Minus
00dd 0248 | H | Execute Discrete,Check_In_Integer
00de 0a01 | | Execute_Immediate Plus,0x1
00df 00e3 | | Load_Encached Natural_Cache
00e0 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
00e1 BODY_00d0:
00e1 e005 | | Load 0x0,0x5 ; Debug Table 0xa.0x3 = 0xe1,0x1
00e2 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00e3 0322 | " | Declare_Variable Record
00e4 00d8 | | Load_Top At_Offset_0
00e5 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
00e6 e5ff | | Load 0x2,-0x1
00e7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00e8 00d9 | | Load_Top At_Offset_1
00e9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00ea e5ff | | Load 0x2,-0x1
00eb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00ec 00d0 | | Action Swap_Control
00ed 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00ee 00d8 | | Load_Top At_Offset_0
00ef 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
00f0 00da | | Load_Top At_Offset_2
00f1 00d9 | | Load_Top At_Offset_1
00f2 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00f3 4800 |H | Short_Literal 0x0
00f4 00d0 | | Action Swap_Control
00f5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00f6 00db | | Load_Top At_Offset_3
00f7 017d | } | Execute Record,Structure_Write
00f8 e004 | | Load 0x0,0x4 ; Debug Table 0xa.0x4 = 0xf8,0x2
00f9 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00fa e006 | | Load 0x0,0x6
00fb 180e | | Execute Package,Field_Execute,Field_Number 0xe
00fc 4801 |H | Short_Literal 0x1
00fd e5fd | | Load 0x2,-0x3
00fe e402 | | Load 0x2,0x2
00ff e5fe | | Load 0x2,-0x2
0100 e004 | | Load 0x0,0x4
0101 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0102 005a | Z | Store_Top Discrete,At_Offset_2
0103 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0x5 = 0x103,0x3
0104 6802 |h | Jump_Zero 0x107
0105 48e2 |H | Short_Literal 0xe2 ; Debug Table 0xa.0x6 = 0x105,0x4
0106 0257 | W | Execute Discrete,Raise
0107 4504 |E | Exit_Subprogram 0x4
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 011d | | .CONST 0x011d ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 0005 | | .CONST 0x0005 ; Number of locals
010b INIT_0108:
010b e006 | | Load 0x0,0x6 ; Debug Table 0xb = .DEBUG 0x010b,0x0254,0x0004,0x0000,0x0037,0xdfd4,0x0000,0x00ad
; Debug Table 0xb.0x0 = 0x10b,0xffff
010c 180e | | Execute Package,Field_Execute,Field_Number 0xe
010d e006 | | Load 0x0,0x6
010e 180e | | Execute Package,Field_Execute,Field_Number 0xe
010f e004 | | Load 0x0,0x4
0110 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0111 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0112 e004 | | Load 0x0,0x4
0113 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
0114 e004 | | Load 0x0,0x4 ; Debug Table 0xb.0x1 = 0x114,0xfffe
0115 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0116 e007 | | Load 0x0,0x7 ; Debug Table 0xb.0x2 = 0x116,0xfffd
0117 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0118 02c7 | | Declare_Variable Any
0119 00d8 | | Load_Top At_Offset_0
011a 1c00 | | Execute_Immediate Run_Utility,0x0
011b e008 | | Load 0x0,0x8 ; Debug Table 0xb.0x3 = 0x11b,0xfffc
011c 1b12 | | Execute Package,Field_Read,Field_Number 0x12
011d BODY_0108:
011d 00cf | | Action Mark_Auxiliary
011e e602 | | Load 0x3,0x2 ; Debug Table 0xb.0x4 = 0x11e,0x1
011f 01d9 | | Execute Vector,Reverse_Bounds
0120 0263 | c | Execute Discrete,Above_Bound
0121 7027 |p' | Jump_Nonzero 0x149
0122 e006 | | Load 0x0,0x6 ; Debug Table 0xb.0x5 = 0x122,0x2
0123 180e | | Execute Package,Field_Execute,Field_Number 0xe
0124 00d9 | | Load_Top At_Offset_1
0125 e602 | | Load 0x3,0x2
0126 01d7 | | Execute Vector,Field_Read
0127 e009 | | Load 0x0,0x9
0128 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0129 e5ff | | Load 0x2,-0x1
012a 016f | o | Execute Variant_Record,Equal
012b 681b |h | Jump_Zero 0x147
012c e004 | | Load 0x0,0x4 ; Debug Table 0xb.0x6 = 0x12c,0x3
012d 1b12 | | Execute Package,Field_Read,Field_Number 0x12
012e e008 | | Load 0x0,0x8
012f 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0130 e604 | | Load 0x3,0x4
0131 0120 | | Execute Any,Is_Value
0132 6803 |h | Jump_Zero 0x136
0133 e007 | | Load 0x0,0x7
0134 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0135 7801 |x | Jump 0x137
0136 e604 | | Load 0x3,0x4
0137 4801 |H | Short_Literal 0x1
0138 e608 | | Load 0x3,0x8
0139 e602 | | Load 0x3,0x2
013a 01d7 | | Execute Vector,Field_Read
013b e004 | | Load 0x0,0x4
013c 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
013d c604 | | Store 0x3,0x4
013e c605 | | Store 0x3,0x5
013f c603 | | Store 0x3,0x3
0140 e603 | | Load 0x3,0x3 ; Debug Table 0xb.0x7 = 0x140,0x4
0141 6803 |h | Jump_Zero 0x145
0142 e604 | | Load 0x3,0x4 ; Debug Table 0xb.0x8 = 0x142,0x5
0143 00cb | | Action Pop_Block_With_Result
0144 4401 |D | Exit_Subprogram With_Result,0x1
0145 48e2 |H | Short_Literal 0xe2 ; Debug Table 0xb.0x9 = 0x145,0x6
0146 0257 | W | Execute Discrete,Raise
0147 00c8 | | Action Pop_Auxiliary_Range
0148 3fd9 |? | Loop_Increasing 0x122
0149 4501 |E | Exit_Subprogram 0x1
014a 0000 0000 | | .BLANK 0000[0x6]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 015c | \ | .CONST 0x015c ; Address of begin
0151 0004 | | .CONST 0x0004 ; Address of exception handler
0152 0002 | | .CONST 0x0002 ; Number of locals
0153 INIT_0150:
0153 e006 | | Load 0x0,0x6 ; Debug Table 0xc = .DEBUG 0x0153,0x026a,0x0004,0x0000,0x0037,0xdfd4,0x0000,0x00f1
; Debug Table 0xc.0x0 = 0x153,0xffff
0154 180e | | Execute Package,Field_Execute,Field_Number 0xe
0155 e006 | | Load 0x0,0x6
0156 180e | | Execute Package,Field_Execute,Field_Number 0xe
0157 e004 | | Load 0x0,0x4
0158 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0159 1810 | | Execute Package,Field_Execute,Field_Number 0x10
015a e004 | | Load 0x0,0x4
015b 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
015c BODY_0150:
015c 00cf | | Action Mark_Auxiliary
015d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xc.0x1 = 0x15d,0x1
015e 01d9 | | Execute Vector,Reverse_Bounds
015f 0263 | c | Execute Discrete,Above_Bound
0160 7011 |p | Jump_Nonzero 0x172
0161 e006 | | Load 0x0,0x6 ; Debug Table 0xc.0x2 = 0x161,0x2
0162 180e | | Execute Package,Field_Execute,Field_Number 0xe
0163 00d9 | | Load_Top At_Offset_1
0164 e602 | | Load 0x3,0x2
0165 01d7 | | Execute Vector,Field_Read
0166 e009 | | Load 0x0,0x9
0167 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0168 e5ff | | Load 0x2,-0x1
0169 016f | o | Execute Variant_Record,Equal
016a 6805 |h | Jump_Zero 0x170
016b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x3 = 0x16b,0x3
016c e602 | | Load 0x3,0x2
016d 01d7 | | Execute Vector,Field_Read
016e 00cb | | Action Pop_Block_With_Result
016f 4401 |D | Exit_Subprogram With_Result,0x1
0170 00c8 | | Action Pop_Auxiliary_Range
0171 3fef |? | Loop_Increasing 0x161
0172 4501 |E | Exit_Subprogram 0x1
0173 0000 0000 | | .BLANK 0000[0x5]
0178 ; --------------------------------------------------------------------------------------
0178 ; Debug Table
0178 ; --------------------------------------------------------------------------------------
0178 0003 000d | | .CONST 0x0003,0x000d
017a 000b 01e2 | | .DEBUG 0x000b,0x01e2,0x8000,0x0000,0x0037,0xdf94,0x0000,0x000d
0182 0024 01fc | $ | .DEBUG 0x0024,0x01fc,0x8000,0x0000,0x0037,0xdfd4,0x0000,0x0015
018a 0043 0214 | C | .DEBUG 0x0043,0x0214,0x0002,0x0000,0x0037,0xdf94,0x0000,0x0014
0192 0053 021c | S | .DEBUG 0x0053,0x021c,0x0002,0x0000,0x0037,0xdf94,0x0000,0x0021
019a 005b 0222 | [ "| .DEBUG 0x005b,0x0222,0x0002,0x0000,0x0037,0xdf94,0x0000,0x0032
01a2 006b 0226 | k &| .DEBUG 0x006b,0x0226,0x0002,0x0000,0x0037,0xdf94,0x0000,0x003d
01aa 007b 022a | { *| .DEBUG 0x007b,0x022a,0x0002,0x0000,0x0037,0xdf94,0x0000,0x0046
01b2 008b 022e | .| .DEBUG 0x008b,0x022e,0x0002,0x0000,0x0037,0xdf94,0x0000,0x004f
01ba 0093 0232 | 2| .DEBUG 0x0093,0x0232,0x0001,0x0000,0x0037,0xdf94,0x0000,0x0058
01c2 00a3 0236 | 6| .DEBUG 0x00a3,0x0236,0x0001,0x0000,0x0037,0xdf94,0x0000,0x0060
01ca 00d3 0244 | D| .DEBUG 0x00d3,0x0244,0x0001,0x0000,0x0037,0xdf94,0x0000,0x0073
01d2 010b 0254 | T| .DEBUG 0x010b,0x0254,0x0004,0x0000,0x0037,0xdfd4,0x0000,0x00ad
01da 0153 026a | S j| .DEBUG 0x0153,0x026a,0x0004,0x0000,0x0037,0xdfd4,0x0000,0x00f1
01e2 ; --------------------------------------------------------------------------------------
01e2 ; Debug3 Subtable 0x0
01e2 ; --------------------------------------------------------------------------------------
01e2 000c 0000 | | .DBG3TAB 0x000c,0x0000
01e4 000b ffff | | .CONST 0x000b,0xffff
01e6 000e fffe | | .CONST 0x000e,0xfffe
01e8 0010 fffd | | .CONST 0x0010,0xfffd
01ea 0012 fffc | | .CONST 0x0012,0xfffc
01ec 0015 fffb | | .CONST 0x0015,0xfffb
01ee 0017 fffa | | .CONST 0x0017,0xfffa
01f0 0019 fff9 | | .CONST 0x0019,0xfff9
01f2 001b fff8 | | .CONST 0x001b,0xfff8
01f4 001d fff7 | | .CONST 0x001d,0xfff7
01f6 001f fff6 | | .CONST 0x001f,0xfff6
01f8 0021 fff5 | ! | .CONST 0x0021,0xfff5
01fa 0023 fff4 | # | .CONST 0x0023,0xfff4
01fc ; --------------------------------------------------------------------------------------
01fc ; Debug3 Subtable 0x1
01fc ; --------------------------------------------------------------------------------------
01fc 000b 0000 | | .DBG3TAB 0x000b,0x0000
01fe 0024 ffff | $ | .CONST 0x0024,0xffff
0200 0025 fffe | % | .CONST 0x0025,0xfffe
0202 0026 fffd | & | .CONST 0x0026,0xfffd
0204 0028 fffc | ( | .CONST 0x0028,0xfffc
0206 002a fffb | * | .CONST 0x002a,0xfffb
0208 002c fffa | , | .CONST 0x002c,0xfffa
020a 002e fff9 | . | .CONST 0x002e,0xfff9
020c 0030 fff8 | 0 | .CONST 0x0030,0xfff8
020e 0032 fff7 | 2 | .CONST 0x0032,0xfff7
0210 0034 fff6 | 4 | .CONST 0x0034,0xfff6
0212 0036 fff5 | 6 | .CONST 0x0036,0xfff5
0214 ; --------------------------------------------------------------------------------------
0214 ; Debug3 Subtable 0x2
0214 ; --------------------------------------------------------------------------------------
0214 0000 0003 | | .DBG3TAB 0x0000,0x0003
0216 0045 0001 | E | .CONST 0x0045,0x0001
0218 0049 0002 | I | .CONST 0x0049,0x0002
021a 004a 0003 | J | .CONST 0x004a,0x0003
021c ; --------------------------------------------------------------------------------------
021c ; Debug3 Subtable 0x3
021c ; --------------------------------------------------------------------------------------
021c 0000 0002 | | .DBG3TAB 0x0000,0x0002
021e 0055 0001 | U | .CONST 0x0055,0x0001
0220 0056 0002 | V | .CONST 0x0056,0x0002
0222 ; --------------------------------------------------------------------------------------
0222 ; Debug3 Subtable 0x4
0222 ; --------------------------------------------------------------------------------------
0222 0000 0001 | | .DBG3TAB 0x0000,0x0001
0224 005b 0001 | [ | .CONST 0x005b,0x0001
0226 ; --------------------------------------------------------------------------------------
0226 ; Debug3 Subtable 0x5
0226 ; --------------------------------------------------------------------------------------
0226 0000 0001 | | .DBG3TAB 0x0000,0x0001
0228 006b 0001 | k | .CONST 0x006b,0x0001
022a ; --------------------------------------------------------------------------------------
022a ; Debug3 Subtable 0x6
022a ; --------------------------------------------------------------------------------------
022a 0000 0001 | | .DBG3TAB 0x0000,0x0001
022c 007b 0001 | { | .CONST 0x007b,0x0001
022e ; --------------------------------------------------------------------------------------
022e ; Debug3 Subtable 0x7
022e ; --------------------------------------------------------------------------------------
022e 0000 0001 | | .DBG3TAB 0x0000,0x0001
0230 008b 0001 | | .CONST 0x008b,0x0001
0232 ; --------------------------------------------------------------------------------------
0232 ; Debug3 Subtable 0x8
0232 ; --------------------------------------------------------------------------------------
0232 0000 0001 | | .DBG3TAB 0x0000,0x0001
0234 0093 0001 | | .CONST 0x0093,0x0001
0236 ; --------------------------------------------------------------------------------------
0236 ; Debug3 Subtable 0x9
0236 ; --------------------------------------------------------------------------------------
0236 0002 0004 | | .DBG3TAB 0x0002,0x0004
0238 00a3 ffff | | .CONST 0x00a3,0xffff
023a 00a6 fffe | | .CONST 0x00a6,0xfffe
023c 00a8 0001 | | .CONST 0x00a8,0x0001
023e 00b9 0002 | | .CONST 0x00b9,0x0002
0240 00c4 0003 | | .CONST 0x00c4,0x0003
0242 00c6 0004 | | .CONST 0x00c6,0x0004
0244 ; --------------------------------------------------------------------------------------
0244 ; Debug3 Subtable 0xa
0244 ; --------------------------------------------------------------------------------------
0244 0003 0004 | | .DBG3TAB 0x0003,0x0004
0246 00d3 ffff | | .CONST 0x00d3,0xffff
0248 00d6 fffe | | .CONST 0x00d6,0xfffe
024a 00d8 fffd | | .CONST 0x00d8,0xfffd
024c 00e1 0001 | | .CONST 0x00e1,0x0001
024e 00f8 0002 | | .CONST 0x00f8,0x0002
0250 0103 0003 | | .CONST 0x0103,0x0003
0252 0105 0004 | | .CONST 0x0105,0x0004
0254 ; --------------------------------------------------------------------------------------
0254 ; Debug3 Subtable 0xb
0254 ; --------------------------------------------------------------------------------------
0254 0004 0006 | | .DBG3TAB 0x0004,0x0006
0256 010b ffff | | .CONST 0x010b,0xffff
0258 0114 fffe | | .CONST 0x0114,0xfffe
025a 0116 fffd | | .CONST 0x0116,0xfffd
025c 011b fffc | | .CONST 0x011b,0xfffc
025e 011e 0001 | | .CONST 0x011e,0x0001
0260 0122 0002 | " | .CONST 0x0122,0x0002
0262 012c 0003 | , | .CONST 0x012c,0x0003
0264 0140 0004 | @ | .CONST 0x0140,0x0004
0266 0142 0005 | B | .CONST 0x0142,0x0005
0268 0145 0006 | E | .CONST 0x0145,0x0006
026a ; --------------------------------------------------------------------------------------
026a ; Debug3 Subtable 0xc
026a ; --------------------------------------------------------------------------------------
026a 0001 0003 | | .DBG3TAB 0x0001,0x0003
026c 0153 ffff | S | .CONST 0x0153,0xffff
026e 015d 0001 | ] | .CONST 0x015d,0x0001
0270 0161 0002 | a | .CONST 0x0161,0x0002
0272 016b 0003 | k | .CONST 0x016b,0x0003
0274 0000 0000 | | .BLANK 0000[0x18c]