|
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, 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 0168 | h | .CONST 0x0168 ; 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 0053 | S | .CONST 0x0053 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0020 | | .CONST 0x0020 ; Number of locals
000b INIT_0008:
000b 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x0 = .DEBUG 0x000b,0x01e2,0x0000,0x0000,0x005a,0x3c25,0x0000,0x056c
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0129 | ) | Execute Any,Make_Visible
000d 0007 | | Action Break_Optional ; Debug Table 0x0.0x1 = 0xd,0xfffe
000e 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x0.0x2 = 0xe,0xfffd
000f 0129 | ) | Execute Any,Make_Visible
0010 0007 | | Action Break_Optional ; Debug Table 0x0.0x3 = 0x10,0xfffc
0011 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x4 = 0x11,0xfffb
0012 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0013 00da | | Load_Top At_Offset_2
0014 02a0 | | Declare_Subprogram Null_Subprogram
0015 4802 |H | Short_Literal 0x2
0016 032e | . | Declare_Type Record,Defined,Visible
0017 029a 005b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0058 ; Debug Table 0x0.0x5 = 0x17,0xfffa
0019 029a 006b | k| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0068 ; Debug Table 0x0.0x6 = 0x19,0xfff9
001b 029a 007b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0078 ; Debug Table 0x0.0x7 = 0x1b,0xfff8
001d 029a 0083 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0080 ; Debug Table 0x0.0x8 = 0x1d,0xfff7
001f 029a 0093 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0090 ; Debug Table 0x0.0x9 = 0x1f,0xfff6
0021 029a 00a3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00a0 ; Debug Table 0x0.0xa = 0x21,0xfff5
0023 029a 00ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00a8 ; Debug Table 0x0.0xb = 0x23,0xfff4
0025 00e5 | | Load_Encached Long_Integer_Cache ; Debug Table 0x0.0xc = 0x25,0xfff3
0026 0129 | ) | Execute Any,Make_Visible
0027 029a 00b3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00b0 ; Debug Table 0x0.0xd = 0x27,0xfff2
0029 e20e | | Load 0x1,0xe ; Debug Table 0x0.0xe = 0x29,0xfff1
002a 0266 | f | Execute Discrete,Bounds
002b 00db | | Load_Top At_Offset_3
002c 02a0 | | Declare_Subprogram Null_Subprogram
002d 4801 |H | Short_Literal 0x1
002e 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
002f 029a 00e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00e0 ; Debug Table 0x0.0xf = 0x2f,0xfff0
0031 00bf | | Action Accept_Activation
0032 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0032,0x0204,0x0000,0x0000,0x005a,0x4025,0x0000,0x0004
; Debug Table 0x1.0x0 = 0x32,0xffff
0033 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x1 = 0x33,0xfffe
0034 0007 | | Action Break_Optional
0035 e003 | | Load 0x0,0x3 ; Debug Table 0x1.0x2 = 0x35,0xfffd
0036 0007 | | Action Break_Optional
0037 e004 | | Load 0x0,0x4 ; Debug Table 0x1.0x3 = 0x37,0xfffc
0038 0007 | | Action Break_Optional
0039 0007 | | Action Break_Optional ; Debug Table 0x1.0x4 = 0x39,0xfffb
003a 0007 | | Action Break_Optional ; Debug Table 0x1.0x5 = 0x3a,0xfffa
003b 029d 0103 | | Declare_Subprogram For_Outer_Call,INIT_0100 ; Debug Table 0x1.0x6 = 0x3b,0xfff9
003d 029d 0113 | | Declare_Subprogram For_Outer_Call,INIT_0110 ; Debug Table 0x1.0x7 = 0x3d,0xfff8
003f 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x8 = 0x3f,0xfff7
0040 00c7 | | Action Elaborate_Subprogram
0041 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x9 = 0x41,0xfff6
0042 00c7 | | Action Elaborate_Subprogram
0043 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0xa = 0x43,0xfff5
0044 00c7 | | Action Elaborate_Subprogram
0045 029d 0123 | #| Declare_Subprogram For_Outer_Call,INIT_0120 ; Debug Table 0x1.0xb = 0x45,0xfff4
0047 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0xc = 0x47,0xfff3
0048 00c7 | | Action Elaborate_Subprogram
0049 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0xd = 0x49,0xfff2
004a 00c7 | | Action Elaborate_Subprogram
004b 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0xe = 0x4b,0xfff1
004c 00c7 | | Action Elaborate_Subprogram
004d 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0xf = 0x4d,0xfff0
004e 00c7 | | Action Elaborate_Subprogram
004f 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0x10 = 0x4f,0xffef
0050 00c7 | | Action Elaborate_Subprogram
0051 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0x11 = 0x51,0xffee
0052 00c7 | | Action Elaborate_Subprogram
0053 BODY_0008:
0053 00bc | | Action Signal_Activated
0054 00bb | | Action Signal_Completion
0055 0000 0000 | | .XXX[0x3]
0057 0000 | |
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005f | _ | .CONST 0x005f ; Address of begin
0059 0004 | | .CONST 0x0004 ; Address of exception handler
005a 0002 | | .CONST 0x0002 ; Number of locals
005b INIT_0058:
005b e21b | | Load 0x1,0x1b ; Debug Table 0x2 = .DEBUG 0x005b,0x022a,0x0002,0x0000,0x005a,0x3c25,0x0000,0x0593
; Debug Table 0x2.0x0 = 0x5b,0xffff
005c 00db | | Load_Top At_Offset_3
005d 821e | | Call 0x1,0x1e
005e 0031 | 1 | Store_Top Heap_Access,At_Offset_1
005f BODY_0058:
005f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x1 = 0x5f,0x1
0060 6804 |h | Jump_Zero 0x65
0061 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x2 = 0x61,0x2
0062 0217 | | Execute Heap_Access,All_Reference
0063 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0064 4401 |D | Exit_Subprogram With_Result,0x1
0065 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0x3 = 0x65,0x3
0066 4401 |D | Exit_Subprogram With_Result,0x1
0067 0000 | | .XXX[0x1]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006f | o | .CONST 0x006f ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0002 | | .CONST 0x0002 ; Number of locals
006b INIT_0068:
006b e21b | | Load 0x1,0x1b ; Debug Table 0x3 = .DEBUG 0x006b,0x0234,0x0002,0x0000,0x005a,0x3c25,0x0000,0x059c
; Debug Table 0x3.0x0 = 0x6b,0xffff
006c 00db | | Load_Top At_Offset_3
006d 821e | | Call 0x1,0x1e
006e 0031 | 1 | Store_Top Heap_Access,At_Offset_1
006f BODY_0068:
006f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x1 = 0x6f,0x1
0070 6804 |h | Jump_Zero 0x75
0071 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x2 = 0x71,0x2
0072 0217 | | Execute Heap_Access,All_Reference
0073 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0074 4401 |D | Exit_Subprogram With_Result,0x1
0075 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x3 = 0x75,0x3
0076 4401 |D | Exit_Subprogram With_Result,0x1
0077 0000 | | .XXX[0x1]
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 0x4 = .DEBUG 0x007b,0x023e,0x0002,0x0000,0x005a,0x3c25,0x0000,0x05a5
; Debug Table 0x4.0x0 = 0x7b,0x1
007c 821f | | Call 0x1,0x1f
007d 0217 | | Execute Heap_Access,All_Reference
007e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
007f 4401 |D | Exit_Subprogram With_Result,0x1
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 0083 | | .CONST 0x0083 ; Address of begin
0081 0004 | | .CONST 0x0004 ; Address of exception handler
0082 0001 | | .CONST 0x0001 ; Number of locals
0083 BODY_0080:
0083 INIT_0080:
0083 00db | | Load_Top At_Offset_3 ; Debug Table 0x5 = .DEBUG 0x0083,0x0242,0x0002,0x0000,0x005a,0x3c25,0x0000,0x05ae
; Debug Table 0x5.0x0 = 0x83,0x1
0084 00db | | Load_Top At_Offset_3
0085 821e | | Call 0x1,0x1e
0086 0217 | | Execute Heap_Access,All_Reference
0087 2506 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x6
0088 01d5 | | Execute Vector,Field_Reference
0089 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
008a 8220 | | Call 0x1,0x20
008b 4402 |D | Exit_Subprogram With_Result,0x2
008c 0000 0000 | | .BLANK 0000[0x4]
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 00db | | Load_Top At_Offset_3 ; Debug Table 0x6 = .DEBUG 0x0093,0x0246,0x0002,0x0000,0x005a,0x3c25,0x0000,0x05bb
; Debug Table 0x6.0x0 = 0x93,0x1
0094 00db | | Load_Top At_Offset_3
0095 821f | | Call 0x1,0x1f
0096 0217 | | Execute Heap_Access,All_Reference
0097 2505 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x5
0098 01d5 | | Execute Vector,Field_Reference
0099 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
009a 8220 | | Call 0x1,0x20
009b 4402 |D | Exit_Subprogram With_Result,0x2
009c 0000 0000 | | .BLANK 0000[0x4]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a3 | | .CONST 0x00a3 ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0001 | | .CONST 0x0001 ; Number of locals
00a3 BODY_00a0:
00a3 INIT_00a0:
00a3 00da | | Load_Top At_Offset_2 ; Debug Table 0x7 = .DEBUG 0x00a3,0x024a,0x0002,0x0000,0x005a,0x3c25,0x0000,0x05c8
; Debug Table 0x7.0x0 = 0xa3,0x1
00a4 821f | | Call 0x1,0x1f
00a5 0217 | | Execute Heap_Access,All_Reference
00a6 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00a7 4401 |D | Exit_Subprogram With_Result,0x1
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ab | | .CONST 0x00ab ; Address of begin
00a9 0004 | | .CONST 0x0004 ; Address of exception handler
00aa 0001 | | .CONST 0x0001 ; Number of locals
00ab BODY_00a8:
00ab INIT_00a8:
00ab 00da | | Load_Top At_Offset_2 ; Debug Table 0x8 = .DEBUG 0x00ab,0x024e,0x0002,0x0000,0x005a,0x3c25,0x0000,0x05d1
; Debug Table 0x8.0x0 = 0xab,0x1
00ac 821f | | Call 0x1,0x1f
00ad 0217 | | Execute Heap_Access,All_Reference
00ae 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
00af 4401 |D | Exit_Subprogram With_Result,0x1
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00bf | | .CONST 0x00bf ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0005 | | .CONST 0x0005 ; Number of locals
00b3 INIT_00b0:
00b3 e21b | | Load 0x1,0x1b ; Debug Table 0x9 = .DEBUG 0x00b3,0x0252,0x0001,0x0000,0x005a,0x3c25,0x0000,0x05e0
; Debug Table 0x9.0x0 = 0xb3,0xffff
00b4 00db | | Load_Top At_Offset_3
00b5 821e | | Call 0x1,0x1e
00b6 0031 | 1 | Store_Top Heap_Access,At_Offset_1
00b7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x1 = 0xb7,0xfffe
00b8 0217 | | Execute Heap_Access,All_Reference
00b9 2505 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x5
00ba 0007 | | Action Break_Optional
00bb 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x9.0x2 = 0xbb,0xfffd
00bc 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00bd 029f 014b | K| Declare_Subprogram For_Call,INIT_0148 ; Debug Table 0x9.0x3 = 0xbd,0xfffc
00bf BODY_00b0:
00bf 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x4 = 0xbf,0x1
00c0 0217 | | Execute Heap_Access,All_Reference
00c1 2506 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x6
00c2 4800 |H | Short_Literal 0x0
00c3 8405 | | Call 0x2,0x5
00c4 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x5 = 0xc4,0x2
00c5 6801 |h | Jump_Zero 0xc7
00c6 4503 |E | Exit_Subprogram 0x3 ; Debug Table 0x9.0x6 = 0xc6,0x3
00c7 00cf | | Action Mark_Auxiliary
00c8 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x7 = 0xc8,0x4
00c9 01d9 | | Execute Vector,Reverse_Bounds
00ca 0263 | c | Execute Discrete,Above_Bound
00cb 700c |p | Jump_Nonzero 0xd8
00cc 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x8 = 0xcc,0x5
00cd e403 | | Load 0x2,0x3
00ce 01d7 | | Execute Vector,Field_Read
00cf 0217 | | Execute Heap_Access,All_Reference
00d0 2505 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x5
00d1 00d9 | | Load_Top At_Offset_1
00d2 8405 | | Call 0x2,0x5
00d3 e404 | | Load 0x2,0x4 ; Debug Table 0x9.0x9 = 0xd3,0x6
00d4 6801 |h | Jump_Zero 0xd6
00d5 4503 |E | Exit_Subprogram 0x3 ; Debug Table 0x9.0xa = 0xd5,0x7
00d6 00c8 | | Action Pop_Auxiliary_Range
00d7 3ff4 |? | Loop_Increasing 0xcc
00d8 00ce | | Action Pop_Auxiliary
00d9 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0xb = 0xd9,0x8
00da a5fd | | Store_Unchecked 0x2,-0x3
00db 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0xc = 0xdb,0x9
00dc a5fc | | Store_Unchecked 0x2,-0x4
00dd 4503 |E | Exit_Subprogram 0x3
00de 0000 0000 | | .XXX[0x2]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00ed | | .CONST 0x00ed ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0003 | | .CONST 0x0003 ; Number of locals
00e3 INIT_00e0:
00e3 e21b | | Load 0x1,0x1b ; Debug Table 0xa = .DEBUG 0x00e3,0x026e,0x0002,0x0000,0x005a,0x3c25,0x0000,0x05fd
; Debug Table 0xa.0x0 = 0xe3,0xffff
00e4 00db | | Load_Top At_Offset_3
00e5 821e | | Call 0x1,0x1e
00e6 0031 | 1 | Store_Top Heap_Access,At_Offset_1
00e7 4801 |H | Short_Literal 0x1 ; Debug Table 0xa.0x1 = 0xe7,0xfffe
00e8 00d9 | | Load_Top At_Offset_1
00e9 0217 | | Execute Heap_Access,All_Reference
00ea 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00eb e219 | | Load 0x1,0x19
00ec 0334 | 4 | Declare_Variable Array,With_Constraint
00ed BODY_00e0:
00ed 00cf | | Action Mark_Auxiliary
00ee 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0x2 = 0xee,0x1
00ef 01d9 | | Execute Vector,Reverse_Bounds
00f0 0263 | c | Execute Discrete,Above_Bound
00f1 700b |p | Jump_Nonzero 0xfd
00f2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x3 = 0xf2,0x2
00f3 e402 | | Load 0x2,0x2
00f4 0217 | | Execute Heap_Access,All_Reference
00f5 2506 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x6
00f6 01d5 | | Execute Vector,Field_Reference
00f7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00f8 00d9 | | Load_Top At_Offset_1
00f9 e403 | | Load 0x2,0x3
00fa 01d6 | | Execute Vector,Field_Write
00fb 00c8 | | Action Pop_Auxiliary_Range
00fc 3ff5 |? | Loop_Increasing 0xf2
00fd 00ce | | Action Pop_Auxiliary
00fe 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x4 = 0xfe,0x3
00ff 4401 |D | Exit_Subprogram With_Result,0x1
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0103 | | .CONST 0x0103 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0001 | | .CONST 0x0001 ; Number of locals
0103 BODY_0100:
0103 INIT_0100:
0103 4800 |H | Short_Literal 0x0 ; Debug Table 0xb = .DEBUG 0x0103,0x027a,0x0002,0x0000,0x005a,0x4025,0x0000,0x0039
; Debug Table 0xb.0x0 = 0x103,0x1
0104 00db | | Load_Top At_Offset_3
0105 8005 | | Call 0x0,0x5
0106 00db | | Load_Top At_Offset_3
0107 8006 | | Call 0x0,0x6
0108 4401 |D | Exit_Subprogram With_Result,0x1
0109 0000 0000 | | .BLANK 0000[0x7]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0113 | | .CONST 0x0113 ; Address of begin
0111 0004 | | .CONST 0x0004 ; Address of exception handler
0112 0001 | | .CONST 0x0001 ; Number of locals
0113 BODY_0110:
0113 INIT_0110:
0113 00da | | Load_Top At_Offset_2 ; Debug Table 0xc = .DEBUG 0x0113,0x027e,0x0002,0x0000,0x005a,0x4025,0x0000,0x0051
; Debug Table 0xc.0x0 = 0x113,0x1
0114 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0115 00db | | Load_Top At_Offset_3
0116 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0117 821e | | Call 0x1,0x1e
0118 0217 | | Execute Heap_Access,All_Reference
0119 2505 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x5
011a 01d7 | | Execute Vector,Field_Read
011b 4401 |D | Exit_Subprogram With_Result,0x1
011c 0000 0000 | | .BLANK 0000[0x4]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0128 | ( | .CONST 0x0128 ; Address of begin
0121 0004 | | .CONST 0x0004 ; Address of exception handler
0122 0002 | | .CONST 0x0002 ; Number of locals
0123 INIT_0120:
0123 00da | | Load_Top At_Offset_2 ; Debug Table 0xd = .DEBUG 0x0123,0x0282,0x0002,0x0000,0x005a,0x4025,0x0000,0x00cc
; Debug Table 0xd.0x0 = 0x123,0xffff
0124 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0125 821e | | Call 0x1,0x1e
0126 0217 | | Execute Heap_Access,All_Reference
0127 2505 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x5
0128 BODY_0120:
0128 00cf | | Action Mark_Auxiliary
0129 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xd.0x1 = 0x129,0x1
012a 01d9 | | Execute Vector,Reverse_Bounds
012b 0263 | c | Execute Discrete,Above_Bound
012c 7015 |p | Jump_Nonzero 0x142
012d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x2 = 0x12d,0x2
012e e402 | | Load 0x2,0x2
012f 01d7 | | Execute Vector,Field_Read
0130 0217 | | Execute Heap_Access,All_Reference
0131 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
0132 e5ff | | Load 0x2,-0x1
0133 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0134 027f | | Execute Discrete,Equal
0135 680a |h | Jump_Zero 0x140
0136 e20f | | Load 0x1,0xf ; Debug Table 0xd.0x3 = 0x136,0x3
0137 0322 | " | Declare_Variable Record
0138 e5ff | | Load 0x2,-0x1
0139 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
013a 00d9 | | Load_Top At_Offset_1
013b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
013c 00d9 | | Load_Top At_Offset_1
013d 00d9 | | Load_Top At_Offset_1
013e 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
013f 4401 |D | Exit_Subprogram With_Result,0x1
0140 00c8 | | Action Pop_Auxiliary_Range
0141 3feb |? | Loop_Increasing 0x12d
0142 00ce | | Action Pop_Auxiliary
0143 4831 |H1 | Short_Literal 0x31
0144 0257 | W | Execute Discrete,Raise
0145 0000 0000 | | .XXX[0x3]
0147 0000 | |
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b | K | .CONST 0x014b ; Address of begin
0149 0004 | | .CONST 0x0004 ; Address of exception handler
014a 0001 | | .CONST 0x0001 ; Number of locals
014b BODY_0148:
014b INIT_0148:
014b 00cf | | Action Mark_Auxiliary ; Debug Table 0xe = .DEBUG 0x014b,0x028c,0x0001,0x0000,0x005a,0x4025,0x0000,0x01a2
014c e7fe | | Load 0x3,-0x2 ; Debug Table 0xe.0x0 = 0x14c,0x1
014d 01d9 | | Execute Vector,Reverse_Bounds
014e 0263 | c | Execute Discrete,Above_Bound
014f 7011 |p | Jump_Nonzero 0x161
0150 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x1 = 0x150,0x2
0151 e7fe | | Load 0x3,-0x2
0152 01d5 | | Execute Vector,Field_Reference
0153 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0154 e5fe | | Load 0x2,-0x2
0155 027f | | Execute Discrete,Equal
0156 6808 |h | Jump_Zero 0x15f
0157 e7ff | | Load 0x3,-0x1 ; Debug Table 0xe.0x2 = 0x157,0x3
0158 a5fd | | Store_Unchecked 0x2,-0x3
0159 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x3 = 0x159,0x4
015a a5fc | | Store_Unchecked 0x2,-0x4
015b 4801 |H | Short_Literal 0x1 ; Debug Table 0xe.0x4 = 0x15b,0x5
015c a404 | | Store_Unchecked 0x2,0x4
015d 00d2 | | Pop_Control Pop_Count_2 ; Debug Table 0xe.0x5 = 0x15d,0x6
015e 4503 |E | Exit_Subprogram 0x3
015f 00c8 | | Action Pop_Auxiliary_Range
0160 3fef |? | Loop_Increasing 0x150
0161 4503 |E | Exit_Subprogram 0x3
0162 0000 0000 | | .BLANK 0000[0x6]
0168 ; --------------------------------------------------------------------------------------
0168 ; Debug Table
0168 ; --------------------------------------------------------------------------------------
0168 0003 000f | | .CONST 0x0003,0x000f
016a 000b 01e2 | | .DEBUG 0x000b,0x01e2,0x0000,0x0000,0x005a,0x3c25,0x0000,0x056c
0172 0032 0204 | 2 | .DEBUG 0x0032,0x0204,0x0000,0x0000,0x005a,0x4025,0x0000,0x0004
017a 005b 022a | [ *| .DEBUG 0x005b,0x022a,0x0002,0x0000,0x005a,0x3c25,0x0000,0x0593
0182 006b 0234 | k 4| .DEBUG 0x006b,0x0234,0x0002,0x0000,0x005a,0x3c25,0x0000,0x059c
018a 007b 023e | { >| .DEBUG 0x007b,0x023e,0x0002,0x0000,0x005a,0x3c25,0x0000,0x05a5
0192 0083 0242 | B| .DEBUG 0x0083,0x0242,0x0002,0x0000,0x005a,0x3c25,0x0000,0x05ae
019a 0093 0246 | F| .DEBUG 0x0093,0x0246,0x0002,0x0000,0x005a,0x3c25,0x0000,0x05bb
01a2 00a3 024a | J| .DEBUG 0x00a3,0x024a,0x0002,0x0000,0x005a,0x3c25,0x0000,0x05c8
01aa 00ab 024e | N| .DEBUG 0x00ab,0x024e,0x0002,0x0000,0x005a,0x3c25,0x0000,0x05d1
01b2 00b3 0252 | R| .DEBUG 0x00b3,0x0252,0x0001,0x0000,0x005a,0x3c25,0x0000,0x05e0
01ba 00e3 026e | n| .DEBUG 0x00e3,0x026e,0x0002,0x0000,0x005a,0x3c25,0x0000,0x05fd
01c2 0103 027a | z| .DEBUG 0x0103,0x027a,0x0002,0x0000,0x005a,0x4025,0x0000,0x0039
01ca 0113 027e | ~| .DEBUG 0x0113,0x027e,0x0002,0x0000,0x005a,0x4025,0x0000,0x0051
01d2 0123 0282 | # | .DEBUG 0x0123,0x0282,0x0002,0x0000,0x005a,0x4025,0x0000,0x00cc
01da 014b 028c | K | .DEBUG 0x014b,0x028c,0x0001,0x0000,0x005a,0x4025,0x0000,0x01a2
01e2 ; --------------------------------------------------------------------------------------
01e2 ; Debug3 Subtable 0x0
01e2 ; --------------------------------------------------------------------------------------
01e2 0010 0000 | | .DBG3TAB 0x0010,0x0000
01e4 000b ffff | | .CONST 0x000b,0xffff
01e6 000d fffe | | .CONST 0x000d,0xfffe
01e8 000e fffd | | .CONST 0x000e,0xfffd
01ea 0010 fffc | | .CONST 0x0010,0xfffc
01ec 0011 fffb | | .CONST 0x0011,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 0025 fff3 | % | .CONST 0x0025,0xfff3
01fe 0027 fff2 | ' | .CONST 0x0027,0xfff2
0200 0029 fff1 | ) | .CONST 0x0029,0xfff1
0202 002f fff0 | / | .CONST 0x002f,0xfff0
0204 ; --------------------------------------------------------------------------------------
0204 ; Debug3 Subtable 0x1
0204 ; --------------------------------------------------------------------------------------
0204 0012 0000 | | .DBG3TAB 0x0012,0x0000
0206 0032 ffff | 2 | .CONST 0x0032,0xffff
0208 0033 fffe | 3 | .CONST 0x0033,0xfffe
020a 0035 fffd | 5 | .CONST 0x0035,0xfffd
020c 0037 fffc | 7 | .CONST 0x0037,0xfffc
020e 0039 fffb | 9 | .CONST 0x0039,0xfffb
0210 003a fffa | : | .CONST 0x003a,0xfffa
0212 003b fff9 | ; | .CONST 0x003b,0xfff9
0214 003d fff8 | = | .CONST 0x003d,0xfff8
0216 003f fff7 | ? | .CONST 0x003f,0xfff7
0218 0041 fff6 | A | .CONST 0x0041,0xfff6
021a 0043 fff5 | C | .CONST 0x0043,0xfff5
021c 0045 fff4 | E | .CONST 0x0045,0xfff4
021e 0047 fff3 | G | .CONST 0x0047,0xfff3
0220 0049 fff2 | I | .CONST 0x0049,0xfff2
0222 004b fff1 | K | .CONST 0x004b,0xfff1
0224 004d fff0 | M | .CONST 0x004d,0xfff0
0226 004f ffef | O | .CONST 0x004f,0xffef
0228 0051 ffee | Q | .CONST 0x0051,0xffee
022a ; --------------------------------------------------------------------------------------
022a ; Debug3 Subtable 0x2
022a ; --------------------------------------------------------------------------------------
022a 0001 0003 | | .DBG3TAB 0x0001,0x0003
022c 005b ffff | [ | .CONST 0x005b,0xffff
022e 005f 0001 | _ | .CONST 0x005f,0x0001
0230 0061 0002 | a | .CONST 0x0061,0x0002
0232 0065 0003 | e | .CONST 0x0065,0x0003
0234 ; --------------------------------------------------------------------------------------
0234 ; Debug3 Subtable 0x3
0234 ; --------------------------------------------------------------------------------------
0234 0001 0003 | | .DBG3TAB 0x0001,0x0003
0236 006b ffff | k | .CONST 0x006b,0xffff
0238 006f 0001 | o | .CONST 0x006f,0x0001
023a 0071 0002 | q | .CONST 0x0071,0x0002
023c 0075 0003 | u | .CONST 0x0075,0x0003
023e ; --------------------------------------------------------------------------------------
023e ; Debug3 Subtable 0x4
023e ; --------------------------------------------------------------------------------------
023e 0000 0001 | | .DBG3TAB 0x0000,0x0001
0240 007b 0001 | { | .CONST 0x007b,0x0001
0242 ; --------------------------------------------------------------------------------------
0242 ; Debug3 Subtable 0x5
0242 ; --------------------------------------------------------------------------------------
0242 0000 0001 | | .DBG3TAB 0x0000,0x0001
0244 0083 0001 | | .CONST 0x0083,0x0001
0246 ; --------------------------------------------------------------------------------------
0246 ; Debug3 Subtable 0x6
0246 ; --------------------------------------------------------------------------------------
0246 0000 0001 | | .DBG3TAB 0x0000,0x0001
0248 0093 0001 | | .CONST 0x0093,0x0001
024a ; --------------------------------------------------------------------------------------
024a ; Debug3 Subtable 0x7
024a ; --------------------------------------------------------------------------------------
024a 0000 0001 | | .DBG3TAB 0x0000,0x0001
024c 00a3 0001 | | .CONST 0x00a3,0x0001
024e ; --------------------------------------------------------------------------------------
024e ; Debug3 Subtable 0x8
024e ; --------------------------------------------------------------------------------------
024e 0000 0001 | | .DBG3TAB 0x0000,0x0001
0250 00ab 0001 | | .CONST 0x00ab,0x0001
0252 ; --------------------------------------------------------------------------------------
0252 ; Debug3 Subtable 0x9
0252 ; --------------------------------------------------------------------------------------
0252 0004 0009 | | .DBG3TAB 0x0004,0x0009
0254 00b3 ffff | | .CONST 0x00b3,0xffff
0256 00b7 fffe | | .CONST 0x00b7,0xfffe
0258 00bb fffd | | .CONST 0x00bb,0xfffd
025a 00bd fffc | | .CONST 0x00bd,0xfffc
025c 00bf 0001 | | .CONST 0x00bf,0x0001
025e 00c4 0002 | | .CONST 0x00c4,0x0002
0260 00c6 0003 | | .CONST 0x00c6,0x0003
0262 00c8 0004 | | .CONST 0x00c8,0x0004
0264 00cc 0005 | | .CONST 0x00cc,0x0005
0266 00d3 0006 | | .CONST 0x00d3,0x0006
0268 00d5 0007 | | .CONST 0x00d5,0x0007
026a 00d9 0008 | | .CONST 0x00d9,0x0008
026c 00db 0009 | | .CONST 0x00db,0x0009
026e ; --------------------------------------------------------------------------------------
026e ; Debug3 Subtable 0xa
026e ; --------------------------------------------------------------------------------------
026e 0002 0003 | | .DBG3TAB 0x0002,0x0003
0270 00e3 ffff | | .CONST 0x00e3,0xffff
0272 00e7 fffe | | .CONST 0x00e7,0xfffe
0274 00ee 0001 | | .CONST 0x00ee,0x0001
0276 00f2 0002 | | .CONST 0x00f2,0x0002
0278 00fe 0003 | | .CONST 0x00fe,0x0003
027a ; --------------------------------------------------------------------------------------
027a ; Debug3 Subtable 0xb
027a ; --------------------------------------------------------------------------------------
027a 0000 0001 | | .DBG3TAB 0x0000,0x0001
027c 0103 0001 | | .CONST 0x0103,0x0001
027e ; --------------------------------------------------------------------------------------
027e ; Debug3 Subtable 0xc
027e ; --------------------------------------------------------------------------------------
027e 0000 0001 | | .DBG3TAB 0x0000,0x0001
0280 0113 0001 | | .CONST 0x0113,0x0001
0282 ; --------------------------------------------------------------------------------------
0282 ; Debug3 Subtable 0xd
0282 ; --------------------------------------------------------------------------------------
0282 0001 0003 | | .DBG3TAB 0x0001,0x0003
0284 0123 ffff | # | .CONST 0x0123,0xffff
0286 0129 0001 | ) | .CONST 0x0129,0x0001
0288 012d 0002 | - | .CONST 0x012d,0x0002
028a 0136 0003 | 6 | .CONST 0x0136,0x0003
028c ; --------------------------------------------------------------------------------------
028c ; Debug3 Subtable 0xe
028c ; --------------------------------------------------------------------------------------
028c 0000 0006 | | .DBG3TAB 0x0000,0x0006
028e 014c 0001 | L | .CONST 0x014c,0x0001
0290 0150 0002 | P | .CONST 0x0150,0x0002
0292 0157 0003 | W | .CONST 0x0157,0x0003
0294 0159 0004 | Y | .CONST 0x0159,0x0004
0296 015b 0005 | [ | .CONST 0x015b,0x0005
0298 015d 0006 | ] | .CONST 0x015d,0x0006
029a 0000 0000 | | .BLANK 0000[0x166]