|
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_0500e0
└─⟦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 01d8 | | .CONST 0x01d8 ; 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 004b | K | .CONST 0x004b ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0018 | | .CONST 0x0018 ; Number of locals
000b INIT_0008:
000b 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible ; Debug Table 0x0 = .DEBUG 0x000b,0x022a,0x0000,0x0000,0x0057,0x79c5,0x0000,0x05bb
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 00e3 | | Load_Encached Natural_Cache
000e 00e3 | | Load_Encached Natural_Cache
000f 00e3 | | Load_Encached Natural_Cache
0010 02a0 | | Declare_Subprogram Null_Subprogram
0011 4804 |H | Short_Literal 0x4
0012 032e | . | Declare_Type Record,Defined,Visible
0013 029a 0053 | S| Declare_Subprogram INIT_0050,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0x13,0xfffd
0015 029a 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x15,0xfffc
0017 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x17,0xfffb
0019 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x19,0xfffa
001b 029a 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x1b,0xfff9
001d 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x1d,0xfff8
001f 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x1f,0xfff7
0021 4805 |H | Short_Literal 0x5 ; Debug Table 0x0.0x9 = 0x21,0xfff6
0022 032a | * | Declare_Type Record,Incomplete
0023 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0xa = 0x23,0xfff5
0024 02a0 | | Declare_Subprogram Null_Subprogram
0025 e20d | | Load 0x1,0xd
0026 03a3 | | Complete_Type Heap_Access,By_Defining
0027 00bf | | Action Accept_Activation ; Debug Table 0x0.0xb = 0x27,0xfff4
0028 4802 |H | Short_Literal 0x2 ; Debug Table 0x1 = .DEBUG 0x0028,0x0244,0x0000,0x0000,0x0057,0x7e65,0x0000,0x0006
; Debug Table 0x1.0x0 = 0x28,0xffff
0029 032a | * | Declare_Type Record,Incomplete
002a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x1 = 0x2a,0xfffe
002b 02a0 | | Declare_Subprogram Null_Subprogram
002c 03ad | | Declare_Type Heap_Access,Defined
002d e20e | | Load 0x1,0xe ; Debug Table 0x1.0x2 = 0x2d,0xfffd
; Debug Table 0x1.0x3 = 0x2d,0xfffc
002e 00d9 | | Load_Top At_Offset_1
002f 02a0 | | Declare_Subprogram Null_Subprogram
0030 e217 | | Load 0x1,0x17
0031 0326 | & | Complete_Type Record,By_Defining
0032 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x4 = 0x32,0xfffb
0033 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0034 e002 | | Load 0x0,0x2
0035 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0036 e002 | | Load 0x0,0x2
0037 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0038 00e3 | | Load_Encached Natural_Cache
0039 e218 | | Load 0x1,0x18
003a 02a0 | | Declare_Subprogram Null_Subprogram
003b e216 | | Load 0x1,0x16
003c 0326 | & | Complete_Type Record,By_Defining
003d 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x5 = 0x3d,0xfffa
003e 00c7 | | Action Elaborate_Subprogram
003f 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x6 = 0x3f,0xfff9
0040 00c7 | | Action Elaborate_Subprogram
0041 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x7 = 0x41,0xfff8
0042 00c7 | | Action Elaborate_Subprogram
0043 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x8 = 0x43,0xfff7
0044 00c7 | | Action Elaborate_Subprogram
0045 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x9 = 0x45,0xfff6
0046 00c7 | | Action Elaborate_Subprogram
0047 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0xa = 0x47,0xfff5
0048 00c7 | | Action Elaborate_Subprogram
0049 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0xb = 0x49,0xfff4
004a 00c7 | | Action Elaborate_Subprogram
004b BODY_0008:
004b 00bc | | Action Signal_Activated
004c 00bb | | Action Signal_Completion
004d 0000 0000 | | .XXX[0x3]
004f 0000 | |
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 006d | m | .CONST 0x006d ; Address of begin
0051 0004 | | .CONST 0x0004 ; Address of exception handler
0052 000b | | .CONST 0x000b ; Number of locals
0053 INIT_0050:
0053 e003 | | Load 0x0,0x3 ; Debug Table 0x2 = .DEBUG 0x0053,0x025e,0x0001,0x0000,0x0057,0x79c5,0x0000,0x05d8
; Debug Table 0x2.0x0 = 0x53,0xffff
0054 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0055 02c7 | | Declare_Variable Any
0056 00d8 | | Load_Top At_Offset_0
0057 1c00 | | Execute_Immediate Run_Utility,0x0
0058 e003 | | Load 0x0,0x3 ; Debug Table 0x2.0x1 = 0x58,0xfffe
0059 1b16 | | Execute Package,Field_Read,Field_Number 0x16
005a 0322 | " | Declare_Variable Record
005b 00d8 | | Load_Top At_Offset_0
005c 1c00 | | Execute_Immediate Run_Utility,0x0
005d e20d | | Load 0x1,0xd ; Debug Table 0x2.0x2 = 0x5d,0xfffd
005e e004 | | Load 0x0,0x4 ; Debug Table 0x2.0x3 = 0x5e,0xfffc
005f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0060 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x2.0x4 = 0x60,0xfffb
0061 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0062 029f 01ab | | Declare_Subprogram INIT_01a8,For_Call ; Debug Table 0x2.0x5 = 0x62,0xfffa
0064 e002 | | Load 0x0,0x2 ; Debug Table 0x2.0x6 = 0x64,0xfff9
0065 1921 | ! | Execute Package,Field_Reference,Field_Number 0x21
0066 00c6 | | Action Check_Subprogram_Elaborated
0067 4807 |H | Short_Literal 0x7
0068 4802 |H | Short_Literal 0x2
0069 0099 | | Action Reference_Dynamic
006a 6169 |ai | Indirect_Literal Discrete,0x1d4,{0x00000000, 0x00577e65}
006b 48c8 |H | Short_Literal 0xc8
006c 480b |H | Short_Literal 0xb
006d BODY_0050:
006d e20d | | Load 0x1,0xd ; Debug Table 0x2.0x7 = 0x6d,0x1
006e a5fd | | Store_Unchecked 0x2,-0x3
006f e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0x8 = 0x6f,0x2
0070 7003 |p | Jump_Nonzero 0x74
0071 4818 |H | Short_Literal 0x18 ; Debug Table 0x2.0x9 = 0x71,0x3
0072 a5fc | | Store_Unchecked 0x2,-0x4
0073 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x2.0xa = 0x73,0x4
0074 e5fe | | Load 0x2,-0x2 ; Debug Table 0x2.0xb = 0x74,0x5
0075 7003 |p | Jump_Nonzero 0x79
0076 4823 |H# | Short_Literal 0x23 ; Debug Table 0x2.0xc = 0x76,0x6
0077 a5fc | | Store_Unchecked 0x2,-0x4
0078 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x2.0xd = 0x78,0x7
0079 e20d | | Load 0x1,0xd ; Debug Table 0x2.0xe = 0x79,0x8
007a e5ff | | Load 0x2,-0x1
007b 039c | | Declare_Variable Heap_Access,By_Allocation
007c a404 | | Store_Unchecked 0x2,0x4
007d e002 | | Load 0x0,0x2 ; Debug Table 0x2.0x10 = 0x7d,0xa
; Debug Table 0x2.0xf = 0x7d,0x9
007e 180e | | Execute Package,Field_Execute,Field_Number 0xe
007f e404 | | Load 0x2,0x4
0080 0217 | | Execute Heap_Access,All_Reference
0081 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0082 e404 | | Load 0x2,0x4 ; Debug Table 0x2.0x11 = 0x82,0xb
0083 0219 | | Execute Heap_Access,All_Read
0084 e004 | | Load 0x0,0x4
0085 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0086 00d9 | | Load_Top At_Offset_1
0087 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0088 e5ff | | Load 0x2,-0x1
0089 0217 | | Execute Heap_Access,All_Reference
008a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
008b e5fe | | Load 0x2,-0x2
008c e5ff | | Load 0x2,-0x1
008d 0217 | | Execute Heap_Access,All_Reference
008e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
008f 0217 | | Execute Heap_Access,All_Reference
0090 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0091 8005 | | Call 0x0,0x5
0092 00da | | Load_Top At_Offset_2
0093 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0094 c405 | | Store 0x2,0x5
0095 00d1 | | Pop_Control Pop_Count_1
0096 e405 | | Load 0x2,0x5 ; Debug Table 0x2.0x12 = 0x96,0xc
0097 e006 | | Load 0x0,0x6
0098 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0099 6803 |h | Jump_Zero 0x9d
009a e405 | | Load 0x2,0x5 ; Debug Table 0x2.0x13 = 0x9a,0xd
009b a5fc | | Store_Unchecked 0x2,-0x4
009c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x2.0x14 = 0x9c,0xe
009d e004 | | Load 0x0,0x4 ; Debug Table 0x2.0x15 = 0x9d,0xf
009e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
009f e402 | | Load 0x2,0x2
00a0 0120 | | Execute Any,Is_Value
00a1 6803 |h | Jump_Zero 0xa5
00a2 e003 | | Load 0x0,0x3
00a3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00a4 7801 |x | Jump 0xa6
00a5 e402 | | Load 0x2,0x2
00a6 e5ff | | Load 0x2,-0x1
00a7 0217 | | Execute Heap_Access,All_Reference
00a8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00a9 e5fe | | Load 0x2,-0x2
00aa e5ff | | Load 0x2,-0x1
00ab 0217 | | Execute Heap_Access,All_Reference
00ac 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00ad 0217 | | Execute Heap_Access,All_Reference
00ae 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00af e003 | | Load 0x0,0x3
00b0 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00b1 c402 | | Store 0x2,0x2
00b2 c405 | | Store 0x2,0x5
00b3 e405 | | Load 0x2,0x5 ; Debug Table 0x2.0x16 = 0xb3,0x10
00b4 e006 | | Load 0x0,0x6
00b5 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00b6 6803 |h | Jump_Zero 0xba
00b7 e405 | | Load 0x2,0x5 ; Debug Table 0x2.0x17 = 0xb7,0x11
00b8 a5fc | | Store_Unchecked 0x2,-0x4
00b9 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x2.0x18 = 0xb9,0x12
00ba e403 | | Load 0x2,0x3 ; Debug Table 0x2.0x19 = 0xba,0x13
00bb e402 | | Load 0x2,0x2
00bc e5ff | | Load 0x2,-0x1
00bd 0217 | | Execute Heap_Access,All_Reference
00be 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00bf 0217 | | Execute Heap_Access,All_Reference
00c0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00c1 e003 | | Load 0x0,0x3
00c2 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
00c3 00d1 | | Pop_Control Pop_Count_1
00c4 e004 | | Load 0x0,0x4 ; Debug Table 0x2.0x1a = 0xc4,0x14
00c5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00c6 e402 | | Load 0x2,0x2
00c7 0120 | | Execute Any,Is_Value
00c8 6803 |h | Jump_Zero 0xcc
00c9 e003 | | Load 0x0,0x3
00ca 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00cb 7801 |x | Jump 0xcd
00cc e402 | | Load 0x2,0x2
00cd e5ff | | Load 0x2,-0x1
00ce 0217 | | Execute Heap_Access,All_Reference
00cf 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00d0 e403 | | Load 0x2,0x3
00d1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00d2 0aff | | Execute_Immediate Plus,-0x1
00d3 00e3 | | Load_Encached Natural_Cache
00d4 025b | [ | Execute Discrete,Check_In_Type
00d5 e5ff | | Load 0x2,-0x1
00d6 0217 | | Execute Heap_Access,All_Reference
00d7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00d8 0217 | | Execute Heap_Access,All_Reference
00d9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00da e003 | | Load 0x0,0x3
00db 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00dc c402 | | Store 0x2,0x2
00dd c405 | | Store 0x2,0x5
00de e405 | | Load 0x2,0x5 ; Debug Table 0x2.0x1b = 0xde,0x15
00df e006 | | Load 0x0,0x6
00e0 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00e1 6803 |h | Jump_Zero 0xe5
00e2 e405 | | Load 0x2,0x5 ; Debug Table 0x2.0x1c = 0xe2,0x16
00e3 a5fc | | Store_Unchecked 0x2,-0x4
00e4 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x2.0x1d = 0xe4,0x17
00e5 e403 | | Load 0x2,0x3 ; Debug Table 0x2.0x1e = 0xe5,0x18
00e6 e402 | | Load 0x2,0x2
00e7 e5ff | | Load 0x2,-0x1
00e8 0217 | | Execute Heap_Access,All_Reference
00e9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00ea 0217 | | Execute Heap_Access,All_Reference
00eb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00ec e003 | | Load 0x0,0x3
00ed 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
00ee 00d1 | | Pop_Control Pop_Count_1
00ef e404 | | Load 0x2,0x4 ; Debug Table 0x2.0x1f = 0xef,0x19
00f0 0217 | | Execute Heap_Access,All_Reference
00f1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00f2 e002 | | Load 0x0,0x2
00f3 181f | | Execute Package,Field_Execute,Field_Number 0x1f
00f4 e404 | | Load 0x2,0x4
00f5 0217 | | Execute Heap_Access,All_Reference
00f6 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
00f7 e404 | | Load 0x2,0x4 ; Debug Table 0x2.0x20 = 0xf7,0x1a
00f8 0219 | | Execute Heap_Access,All_Read
00f9 e002 | | Load 0x0,0x2
00fa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00fb e403 | | Load 0x2,0x3
00fc 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00fd e5ff | | Load 0x2,-0x1
00fe 0217 | | Execute Heap_Access,All_Reference
00ff 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0100 0217 | | Execute Heap_Access,All_Reference
0101 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0102 e002 | | Load 0x0,0x2
0103 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0104 00d9 | | Load_Top At_Offset_1
0105 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0106 00d1 | | Pop_Control Pop_Count_1
0107 e218 | | Load 0x1,0x18 ; Debug Table 0x2.0x21 = 0x107,0x1b
0108 e404 | | Load 0x2,0x4
0109 0217 | | Execute Heap_Access,All_Reference
010a 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
010b e403 | | Load 0x2,0x3 ; Debug Table 0x2.0x22 = 0x10b,0x1c
010c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
010d e5ff | | Load 0x2,-0x1
010e 0217 | | Execute Heap_Access,All_Reference
010f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0110 0217 | | Execute Heap_Access,All_Reference
0111 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0112 4808 |H | Short_Literal 0x8
0113 4802 |H | Short_Literal 0x2
0114 0099 | | Action Reference_Dynamic
0115 4809 |H | Short_Literal 0x9
0116 4802 |H | Short_Literal 0x2
0117 0099 | | Action Reference_Dynamic
0118 e002 | | Load 0x0,0x2
0119 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
011a e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0x23 = 0x11a,0x1d
011b 0217 | | Execute Heap_Access,All_Reference
011c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
011d 0217 | | Execute Heap_Access,All_Reference
011e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
011f e404 | | Load 0x2,0x4
0120 0217 | | Execute Heap_Access,All_Reference
0121 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0122 e404 | | Load 0x2,0x4 ; Debug Table 0x2.0x24 = 0x122,0x1e
0123 a5fd | | Store_Unchecked 0x2,-0x3
0124 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0x25 = 0x124,0x1f
0125 a5fc | | Store_Unchecked 0x2,-0x4
0126 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0127 0000 | | .XXX[0x1]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b | + | .CONST 0x012b ; Address of begin
0129 0004 | | .CONST 0x0004 ; Address of exception handler
012a 0001 | | .CONST 0x0001 ; Number of locals
012b BODY_0128:
012b INIT_0128:
012b 00da | | Load_Top At_Offset_2 ; Debug Table 0x3 = .DEBUG 0x012b,0x02ac,0x0002,0x0000,0x0057,0x79c5,0x0000,0x05ed
; Debug Table 0x3.0x0 = 0x12b,0x1
012c 7003 |p | Jump_Nonzero 0x130
012d e006 | | Load 0x0,0x6 ; Debug Table 0x3.0x1 = 0x12d,0x2
012e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
012f 0257 | W | Execute Discrete,Raise
0130 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x2 = 0x130,0x3
0131 0217 | | Execute Heap_Access,All_Reference
0132 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0133 7002 |p | Jump_Nonzero 0x136
0134 4801 |H | Short_Literal 0x1 ; Debug Table 0x3.0x3 = 0x134,0x4
0135 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0136 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x4 = 0x136,0x5
0137 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013b | ; | .CONST 0x013b ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0001 | | .CONST 0x0001 ; Number of locals
013b BODY_0138:
013b INIT_0138:
013b 00da | | Load_Top At_Offset_2 ; Debug Table 0x4 = .DEBUG 0x013b,0x02b8,0x0002,0x0000,0x0057,0x79c5,0x0000,0x05f6
; Debug Table 0x4.0x0 = 0x13b,0x1
013c 7003 |p | Jump_Nonzero 0x140
013d e006 | | Load 0x0,0x6 ; Debug Table 0x4.0x1 = 0x13d,0x2
013e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
013f 0257 | W | Execute Discrete,Raise
0140 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x2 = 0x140,0x3
0141 0217 | | Execute Heap_Access,All_Reference
0142 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0143 7003 |p | Jump_Nonzero 0x147
0144 e006 | | Load 0x0,0x6 ; Debug Table 0x4.0x3 = 0x144,0x4
0145 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0146 0257 | W | Execute Discrete,Raise
0147 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x4 = 0x147,0x5
0148 0217 | | Execute Heap_Access,All_Reference
0149 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
014a 0217 | | Execute Heap_Access,All_Reference
014b 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
014c 0320 | | Declare_Variable Record,Duplicate
014d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
014e 0000 0000 | | .XXX[0x2]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0153 | S | .CONST 0x0153 ; Address of begin
0151 0004 | | .CONST 0x0004 ; Address of exception handler
0152 0001 | | .CONST 0x0001 ; Number of locals
0153 BODY_0150:
0153 INIT_0150:
0153 00da | | Load_Top At_Offset_2 ; Debug Table 0x5 = .DEBUG 0x0153,0x02c4,0x0001,0x0000,0x0057,0x79c5,0x0000,0x05ff
; Debug Table 0x5.0x0 = 0x153,0x1
0154 7003 |p | Jump_Nonzero 0x158
0155 e006 | | Load 0x0,0x6 ; Debug Table 0x5.0x1 = 0x155,0x2
0156 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0157 0257 | W | Execute Discrete,Raise
0158 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x2 = 0x158,0x3
0159 0217 | | Execute Heap_Access,All_Reference
015a 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
015b 7001 |p | Jump_Nonzero 0x15d
015c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x5.0x3 = 0x15c,0x4
015d 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x4 = 0x15d,0x5
015e 0217 | | Execute Heap_Access,All_Reference
015f 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0160 0217 | | Execute Heap_Access,All_Reference
0161 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0162 00db | | Load_Top At_Offset_3
0163 0217 | | Execute Heap_Access,All_Reference
0164 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0165 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0166 0000 0000 | | .XXX[0x2]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016b | k | .CONST 0x016b ; Address of begin
0169 0004 | | .CONST 0x0004 ; Address of exception handler
016a 0001 | | .CONST 0x0001 ; Number of locals
016b BODY_0168:
016b INIT_0168:
016b 00da | | Load_Top At_Offset_2 ; Debug Table 0x6 = .DEBUG 0x016b,0x02d0,0x0002,0x0000,0x0057,0x79c5,0x0000,0x0607
; Debug Table 0x6.0x0 = 0x16b,0x1
016c 7003 |p | Jump_Nonzero 0x170
016d e006 | | Load 0x0,0x6 ; Debug Table 0x6.0x1 = 0x16d,0x2
016e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
016f 0257 | W | Execute Discrete,Raise
0170 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x2 = 0x170,0x3
0171 0217 | | Execute Heap_Access,All_Reference
0172 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0173 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0174 0000 0000 | | .BLANK 0000[0x4]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017d | } | .CONST 0x017d ; Address of begin
0179 0004 | | .CONST 0x0004 ; Address of exception handler
017a 0002 | | .CONST 0x0002 ; Number of locals
017b INIT_0178:
017b e004 | | Load 0x0,0x4 ; Debug Table 0x7 = .DEBUG 0x017b,0x02d8,0x0002,0x0000,0x0057,0x79c5,0x0000,0x0610
; Debug Table 0x7.0x0 = 0x17b,0xffff
017c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
017d BODY_0178:
017d 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x1 = 0x17d,0x1
017e 7003 |p | Jump_Nonzero 0x182
017f e006 | | Load 0x0,0x6 ; Debug Table 0x7.0x2 = 0x17f,0x2
0180 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0181 0257 | W | Execute Discrete,Raise
0182 e5fe | | Load 0x2,-0x2 ; Debug Table 0x7.0x3 = 0x182,0x3
0183 e5ff | | Load 0x2,-0x1
0184 0217 | | Execute Heap_Access,All_Reference
0185 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0186 e002 | | Load 0x0,0x2
0187 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0188 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0189 0000 0000 | | .BLANK 0000[0x7]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0195 | | .CONST 0x0195 ; Address of begin
0191 0004 | | .CONST 0x0004 ; Address of exception handler
0192 0002 | | .CONST 0x0002 ; Number of locals
0193 INIT_0190:
0193 e004 | | Load 0x0,0x4 ; Debug Table 0x8 = .DEBUG 0x0193,0x02e2,0x0002,0x0000,0x0057,0x79c5,0x0000,0x061d
; Debug Table 0x8.0x0 = 0x193,0xffff
0194 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0195 BODY_0190:
0195 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x1 = 0x195,0x1
0196 7003 |p | Jump_Nonzero 0x19a
0197 e006 | | Load 0x0,0x6 ; Debug Table 0x8.0x2 = 0x197,0x2
0198 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0199 0257 | W | Execute Discrete,Raise
019a e5fe | | Load 0x2,-0x2 ; Debug Table 0x8.0x3 = 0x19a,0x3
019b e5ff | | Load 0x2,-0x1
019c 0217 | | Execute Heap_Access,All_Reference
019d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
019e e002 | | Load 0x0,0x2
019f 1820 | | Execute Package,Field_Execute,Field_Number 0x20
01a0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01a1 0000 0000 | | .BLANK 0000[0x7]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ac | | .CONST 0x01ac ; Address of begin
01a9 0004 | | .CONST 0x0004 ; Address of exception handler
01aa 0002 | | .CONST 0x0002 ; Number of locals
01ab INIT_01a8:
01ab e218 | | Load 0x1,0x18 ; Debug Table 0x9 = .DEBUG 0x01ab,0x02ec,0x0001,0x0000,0x0057,0x7e65,0x0000,0x0079
; Debug Table 0x9.0x0 = 0x1ab,0xffff
01ac BODY_01a8:
01ac e218 | | Load 0x1,0x18 ; Debug Table 0x9.0x1 = 0x1ac,0x1
01ad e404 | | Load 0x2,0x4
01ae 039c | | Declare_Variable Heap_Access,By_Allocation
01af 0031 | 1 | Store_Top Heap_Access,At_Offset_1
01b0 e404 | | Load 0x2,0x4 ; Debug Table 0x9.0x2 = 0x1b0,0x2
; Debug Table 0x9.0x3 = 0x1b0,0x3
01b1 0217 | | Execute Heap_Access,All_Reference
01b2 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
01b3 00d9 | | Load_Top At_Offset_1
01b4 0217 | | Execute Heap_Access,All_Reference
01b5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01b6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x4 = 0x1b6,0x4
01b7 e404 | | Load 0x2,0x4
01b8 0217 | | Execute Heap_Access,All_Reference
01b9 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
01ba 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x5 = 0x1ba,0x5
01bb 00d9 | | Load_Top At_Offset_1
01bc 0217 | | Execute Heap_Access,All_Reference
01bd 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01be 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01bf e7fe | | Load 0x3,-0x2 ; Debug Table 0x9.0x6 = 0x1bf,0x6
01c0 00d9 | | Load_Top At_Offset_1
01c1 0217 | | Execute Heap_Access,All_Reference
01c2 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01c3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01c4 e406 | | Load 0x2,0x6 ; Debug Table 0x9.0x7 = 0x1c4,0x7
01c5 00d9 | | Load_Top At_Offset_1
01c6 0217 | | Execute Heap_Access,All_Reference
01c7 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01c8 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
01c9 e406 | | Load 0x2,0x6 ; Debug Table 0x9.0x8 = 0x1c9,0x8
01ca e7fd | | Load 0x3,-0x3
01cb 0273 | s | Execute Discrete,Plus
01cc c406 | | Store 0x2,0x6
01cd e406 | | Load 0x2,0x6 ; Debug Table 0x9.0x9 = 0x1cd,0x9
01ce 0aff | | Execute_Immediate Plus,-0x1
01cf 00d9 | | Load_Top At_Offset_1
01d0 0217 | | Execute Heap_Access,All_Reference
01d1 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01d2 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
01d3 4504 |E | Exit_Suprogram New_Top_Offset 0x4
01d4 0000 0000 | | .LITERAL {0x00000000, 0x00577e65}
01d8 ; --------------------------------------------------------------------------------------
01d8 ; Debug Table
01d8 ; --------------------------------------------------------------------------------------
01d8 0003 000a | | .CONST 0x0003,0x000a
01da 000b 022a | *| .DEBUG 0x000b,0x022a,0x0000,0x0000,0x0057,0x79c5,0x0000,0x05bb
01e2 0028 0244 | ( D| .DEBUG 0x0028,0x0244,0x0000,0x0000,0x0057,0x7e65,0x0000,0x0006
01ea 0053 025e | S ^| .DEBUG 0x0053,0x025e,0x0001,0x0000,0x0057,0x79c5,0x0000,0x05d8
01f2 012b 02ac | + | .DEBUG 0x012b,0x02ac,0x0002,0x0000,0x0057,0x79c5,0x0000,0x05ed
01fa 013b 02b8 | ; | .DEBUG 0x013b,0x02b8,0x0002,0x0000,0x0057,0x79c5,0x0000,0x05f6
0202 0153 02c4 | S | .DEBUG 0x0153,0x02c4,0x0001,0x0000,0x0057,0x79c5,0x0000,0x05ff
020a 016b 02d0 | k | .DEBUG 0x016b,0x02d0,0x0002,0x0000,0x0057,0x79c5,0x0000,0x0607
0212 017b 02d8 | { | .DEBUG 0x017b,0x02d8,0x0002,0x0000,0x0057,0x79c5,0x0000,0x0610
021a 0193 02e2 | | .DEBUG 0x0193,0x02e2,0x0002,0x0000,0x0057,0x79c5,0x0000,0x061d
0222 01ab 02ec | | .DEBUG 0x01ab,0x02ec,0x0001,0x0000,0x0057,0x7e65,0x0000,0x0079
022a ; --------------------------------------------------------------------------------------
022a ; Debug3 Subtable 0x0
022a ; --------------------------------------------------------------------------------------
022a 000c 0000 | | .DBG3TAB 0x000c,0x0000
022c 000b ffff | | .CONST 0x000b,0xffff
022e 000c fffe | | .CONST 0x000c,0xfffe
0230 0013 fffd | | .CONST 0x0013,0xfffd
0232 0015 fffc | | .CONST 0x0015,0xfffc
0234 0017 fffb | | .CONST 0x0017,0xfffb
0236 0019 fffa | | .CONST 0x0019,0xfffa
0238 001b fff9 | | .CONST 0x001b,0xfff9
023a 001d fff8 | | .CONST 0x001d,0xfff8
023c 001f fff7 | | .CONST 0x001f,0xfff7
023e 0021 fff6 | ! | .CONST 0x0021,0xfff6
0240 0023 fff5 | # | .CONST 0x0023,0xfff5
0242 0027 fff4 | ' | .CONST 0x0027,0xfff4
0244 ; --------------------------------------------------------------------------------------
0244 ; Debug3 Subtable 0x1
0244 ; --------------------------------------------------------------------------------------
0244 000c 0000 | | .DBG3TAB 0x000c,0x0000
0246 0028 ffff | ( | .CONST 0x0028,0xffff
0248 002a fffe | * | .CONST 0x002a,0xfffe
024a 002d fffd | - | .CONST 0x002d,0xfffd
024c 002d fffc | - | .CONST 0x002d,0xfffc
024e 0032 fffb | 2 | .CONST 0x0032,0xfffb
0250 003d fffa | = | .CONST 0x003d,0xfffa
0252 003f fff9 | ? | .CONST 0x003f,0xfff9
0254 0041 fff8 | A | .CONST 0x0041,0xfff8
0256 0043 fff7 | C | .CONST 0x0043,0xfff7
0258 0045 fff6 | E | .CONST 0x0045,0xfff6
025a 0047 fff5 | G | .CONST 0x0047,0xfff5
025c 0049 fff4 | I | .CONST 0x0049,0xfff4
025e ; --------------------------------------------------------------------------------------
025e ; Debug3 Subtable 0x2
025e ; --------------------------------------------------------------------------------------
025e 0007 001f | | .DBG3TAB 0x0007,0x001f
0260 0053 ffff | S | .CONST 0x0053,0xffff
0262 0058 fffe | X | .CONST 0x0058,0xfffe
0264 005d fffd | ] | .CONST 0x005d,0xfffd
0266 005e fffc | ^ | .CONST 0x005e,0xfffc
0268 0060 fffb | ` | .CONST 0x0060,0xfffb
026a 0062 fffa | b | .CONST 0x0062,0xfffa
026c 0064 fff9 | d | .CONST 0x0064,0xfff9
026e 006d 0001 | m | .CONST 0x006d,0x0001
0270 006f 0002 | o | .CONST 0x006f,0x0002
0272 0071 0003 | q | .CONST 0x0071,0x0003
0274 0073 0004 | s | .CONST 0x0073,0x0004
0276 0074 0005 | t | .CONST 0x0074,0x0005
0278 0076 0006 | v | .CONST 0x0076,0x0006
027a 0078 0007 | x | .CONST 0x0078,0x0007
027c 0079 0008 | y | .CONST 0x0079,0x0008
027e 007d 0009 | } | .CONST 0x007d,0x0009
0280 007d 000a | } | .CONST 0x007d,0x000a
0282 0082 000b | | .CONST 0x0082,0x000b
0284 0096 000c | | .CONST 0x0096,0x000c
0286 009a 000d | | .CONST 0x009a,0x000d
0288 009c 000e | | .CONST 0x009c,0x000e
028a 009d 000f | | .CONST 0x009d,0x000f
028c 00b3 0010 | | .CONST 0x00b3,0x0010
028e 00b7 0011 | | .CONST 0x00b7,0x0011
0290 00b9 0012 | | .CONST 0x00b9,0x0012
0292 00ba 0013 | | .CONST 0x00ba,0x0013
0294 00c4 0014 | | .CONST 0x00c4,0x0014
0296 00de 0015 | | .CONST 0x00de,0x0015
0298 00e2 0016 | | .CONST 0x00e2,0x0016
029a 00e4 0017 | | .CONST 0x00e4,0x0017
029c 00e5 0018 | | .CONST 0x00e5,0x0018
029e 00ef 0019 | | .CONST 0x00ef,0x0019
02a0 00f7 001a | | .CONST 0x00f7,0x001a
02a2 0107 001b | | .CONST 0x0107,0x001b
02a4 010b 001c | | .CONST 0x010b,0x001c
02a6 011a 001d | | .CONST 0x011a,0x001d
02a8 0122 001e | " | .CONST 0x0122,0x001e
02aa 0124 001f | $ | .CONST 0x0124,0x001f
02ac ; --------------------------------------------------------------------------------------
02ac ; Debug3 Subtable 0x3
02ac ; --------------------------------------------------------------------------------------
02ac 0000 0005 | | .DBG3TAB 0x0000,0x0005
02ae 012b 0001 | + | .CONST 0x012b,0x0001
02b0 012d 0002 | - | .CONST 0x012d,0x0002
02b2 0130 0003 | 0 | .CONST 0x0130,0x0003
02b4 0134 0004 | 4 | .CONST 0x0134,0x0004
02b6 0136 0005 | 6 | .CONST 0x0136,0x0005
02b8 ; --------------------------------------------------------------------------------------
02b8 ; Debug3 Subtable 0x4
02b8 ; --------------------------------------------------------------------------------------
02b8 0000 0005 | | .DBG3TAB 0x0000,0x0005
02ba 013b 0001 | ; | .CONST 0x013b,0x0001
02bc 013d 0002 | = | .CONST 0x013d,0x0002
02be 0140 0003 | @ | .CONST 0x0140,0x0003
02c0 0144 0004 | D | .CONST 0x0144,0x0004
02c2 0147 0005 | G | .CONST 0x0147,0x0005
02c4 ; --------------------------------------------------------------------------------------
02c4 ; Debug3 Subtable 0x5
02c4 ; --------------------------------------------------------------------------------------
02c4 0000 0005 | | .DBG3TAB 0x0000,0x0005
02c6 0153 0001 | S | .CONST 0x0153,0x0001
02c8 0155 0002 | U | .CONST 0x0155,0x0002
02ca 0158 0003 | X | .CONST 0x0158,0x0003
02cc 015c 0004 | \ | .CONST 0x015c,0x0004
02ce 015d 0005 | ] | .CONST 0x015d,0x0005
02d0 ; --------------------------------------------------------------------------------------
02d0 ; Debug3 Subtable 0x6
02d0 ; --------------------------------------------------------------------------------------
02d0 0000 0003 | | .DBG3TAB 0x0000,0x0003
02d2 016b 0001 | k | .CONST 0x016b,0x0001
02d4 016d 0002 | m | .CONST 0x016d,0x0002
02d6 0170 0003 | p | .CONST 0x0170,0x0003
02d8 ; --------------------------------------------------------------------------------------
02d8 ; Debug3 Subtable 0x7
02d8 ; --------------------------------------------------------------------------------------
02d8 0001 0003 | | .DBG3TAB 0x0001,0x0003
02da 017b ffff | { | .CONST 0x017b,0xffff
02dc 017d 0001 | } | .CONST 0x017d,0x0001
02de 017f 0002 | | .CONST 0x017f,0x0002
02e0 0182 0003 | | .CONST 0x0182,0x0003
02e2 ; --------------------------------------------------------------------------------------
02e2 ; Debug3 Subtable 0x8
02e2 ; --------------------------------------------------------------------------------------
02e2 0001 0003 | | .DBG3TAB 0x0001,0x0003
02e4 0193 ffff | | .CONST 0x0193,0xffff
02e6 0195 0001 | | .CONST 0x0195,0x0001
02e8 0197 0002 | | .CONST 0x0197,0x0002
02ea 019a 0003 | | .CONST 0x019a,0x0003
02ec ; --------------------------------------------------------------------------------------
02ec ; Debug3 Subtable 0x9
02ec ; --------------------------------------------------------------------------------------
02ec 0001 0009 | | .DBG3TAB 0x0001,0x0009
02ee 01ab ffff | | .CONST 0x01ab,0xffff
02f0 01ac 0001 | | .CONST 0x01ac,0x0001
02f2 01b0 0002 | | .CONST 0x01b0,0x0002
02f4 01b0 0003 | | .CONST 0x01b0,0x0003
02f6 01b6 0004 | | .CONST 0x01b6,0x0004
02f8 01ba 0005 | | .CONST 0x01ba,0x0005
02fa 01bf 0006 | | .CONST 0x01bf,0x0006
02fc 01c4 0007 | | .CONST 0x01c4,0x0007
02fe 01c9 0008 | | .CONST 0x01c9,0x0008
0300 01cd 0009 | | .CONST 0x01cd,0x0009
0302 0000 0000 | | .BLANK 0000[0xfe]