|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_06e8fd
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0250 | P | .CONST 0x0250 ; 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 8001 | | .CONST 0x8001 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00a7 | | .CONST 0x00a7 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 003a | : | .CONST 0x003a ; Number of locals
000b INIT_0008:
000b 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated
000d 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated
000f 029a 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call,Visible,Unelaborated
0011 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated
0013 00bf | | Action Accept_Activation
0014 0092 0234 | 4| Action Push_String_Extended,0x234 ; "Task not stopped inside debugger"
0016 4800 |H | Short_Literal 0x0
0017 e002 | | Load 0x0,0x2
0018 0a01 | | Execute_Immediate Plus,0x1
0019 e001 | | Load 0x0,0x1
001a 01d7 | | Execute Vector,Field_Read
001b 00f5 | | Load_Encached Unused21
001c 037d | } | Declare_Type Task,Defined
001d 036f | o | Declare_Variable Task
001e 029d 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call
0020 029d 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call
0022 a003 | | Store_Unchecked 0x0,0x3
0023 00c6 | | Action Check_Subprogram_Elaborated
0024 e004 | | Load 0x0,0x4
0025 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0026 4800 |H | Short_Literal 0x0
0027 0093 0000 | | push_full_address 0x0
0029 60e6 |` | Indirect_Literal Discrete,0x110,{0x80000000, 0x00050000}
002a 0273 | s | Execute Discrete,Plus
002b e005 | | Load 0x0,0x5
002c 0273 | s | Execute Discrete,Plus
002d e006 | | Load 0x0,0x6
002e 0273 | s | Execute Discrete,Plus
002f 4800 |H | Short_Literal 0x0
0030 0007 | | Action Break_Optional
0031 029d 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call
0033 029d 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call
0035 a003 | | Store_Unchecked 0x0,0x3
0036 00c6 | | Action Check_Subprogram_Elaborated
0037 e007 | | Load 0x0,0x7
0038 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0039 4800 |H | Short_Literal 0x0
003a 0093 0000 | | push_full_address 0x0
003c 60cf |` | Indirect_Literal Discrete,0x10c,{0x80000000, 0x00040000}
003d 0273 | s | Execute Discrete,Plus
003e e005 | | Load 0x0,0x5
003f 0273 | s | Execute Discrete,Plus
0040 e008 | | Load 0x0,0x8
0041 0273 | s | Execute Discrete,Plus
0042 4800 |H | Short_Literal 0x0
0043 0007 | | Action Break_Optional
0044 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0045 00c7 | | Action Elaborate_Subprogram
0046 029d 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call
0048 029d 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call
004a 029d 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call
004c 029d 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call
004e 029d 0203 | | Declare_Subprogram INIT_0200,For_Outer_Call
0050 a009 | | Store_Unchecked 0x0,0x9
0051 00c6 | | Action Check_Subprogram_Elaborated
0052 00e2 | | Load_Encached Integer_Cache
0053 e004 | | Load 0x0,0x4
0054 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
0055 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
0056 0093 0000 | | push_full_address 0x0
0058 60af |` | Indirect_Literal Discrete,0x108,{0x80000000, 0x00030000}
0059 0273 | s | Execute Discrete,Plus
005a e005 | | Load 0x0,0x5
005b 0273 | s | Execute Discrete,Plus
005c e00a | | Load 0x0,0xa
005d 0273 | s | Execute Discrete,Plus
005e 4800 |H | Short_Literal 0x0
005f 0007 | | Action Break_Optional
0060 029d 021b | | Declare_Subprogram INIT_0218,For_Outer_Call
0062 029d 0203 | | Declare_Subprogram INIT_0200,For_Outer_Call
0064 a009 | | Store_Unchecked 0x0,0x9
0065 00c6 | | Action Check_Subprogram_Elaborated
0066 00e2 | | Load_Encached Integer_Cache
0067 00e2 | | Load_Encached Integer_Cache
0068 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
0069 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d
006a 0093 0000 | | push_full_address 0x0
006c 6097 |` | Indirect_Literal Discrete,0x104,{0x80000000, 0x00020000}
006d 0273 | s | Execute Discrete,Plus
006e e005 | | Load 0x0,0x5
006f 0273 | s | Execute Discrete,Plus
0070 e00b | | Load 0x0,0xb
0071 0273 | s | Execute Discrete,Plus
0072 4800 |H | Short_Literal 0x0
0073 0007 | | Action Break_Optional
0074 029d 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call
0076 a003 | | Store_Unchecked 0x0,0x3
0077 00c6 | | Action Check_Subprogram_Elaborated
0078 e004 | | Load 0x0,0x4
0079 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34
007a 4800 |H | Short_Literal 0x0
007b 0093 0000 | | push_full_address 0x0
007d 6082 |` | Indirect_Literal Discrete,0x100,{0x80000000, 0x00010000}
007e 0273 | s | Execute Discrete,Plus
007f e005 | | Load 0x0,0x5
0080 0273 | s | Execute Discrete,Plus
0081 e00c | | Load 0x0,0xc
0082 0273 | s | Execute Discrete,Plus
0083 4800 |H | Short_Literal 0x0
0084 0007 | | Action Break_Optional
0085 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0086 00c7 | | Action Elaborate_Subprogram
0087 e00d | | Load 0x0,0xd
0088 e00e | | Load 0x0,0xe
0089 e00f | | Load 0x0,0xf
008a e010 | | Load 0x0,0x10
008b e011 | | Load 0x0,0x11
008c a012 | | Store_Unchecked 0x0,0x12
008d e013 | | Load 0x0,0x13
008e e014 | | Load 0x0,0x14
008f a015 | | Store_Unchecked 0x0,0x15
0090 a016 | | Store_Unchecked 0x0,0x16
0091 a017 | | Store_Unchecked 0x0,0x17
0092 a018 | | Store_Unchecked 0x0,0x18
0093 a019 | | Store_Unchecked 0x0,0x19
0094 a01a | | Store_Unchecked 0x0,0x1a
0095 e01b | | Load 0x0,0x1b
0096 e01c | | Load 0x0,0x1c
0097 a01d | | Store_Unchecked 0x0,0x1d
0098 a01e | | Store_Unchecked 0x0,0x1e
0099 a01f | | Store_Unchecked 0x0,0x1f
009a a020 | | Store_Unchecked 0x0,0x20
009b a021 | ! | Store_Unchecked 0x0,0x21
009c a022 | " | Store_Unchecked 0x0,0x22
009d 4816 |H | Short_Literal 0x16
009e e212 | | Load 0x1,0x12
009f 020e | | Execute Module,Augment_Imports
00a0 0007 | | Action Break_Optional
00a1 1d10 | | Execute_Immediate Reference_Lex_1,0x10
00a2 00c7 | | Action Elaborate_Subprogram
00a3 1d0f | | Execute_Immediate Reference_Lex_1,0xf
00a4 00c7 | | Action Elaborate_Subprogram
00a5 029d 0233 | 3| Declare_Subprogram INIT_0230,For_Outer_Call
00a7 BODY_0008:
00a7 00be | | Action Activate_Tasks
00a8 00bc | | Action Signal_Activated
00a9 00bb | | Action Signal_Completion
00aa 0000 0000 | | .BLANK 0000[0x6]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b9 | | .CONST 0x00b9 ; Address of begin
00b1 00f7 | | .CONST 0x00f7 ; Address of exception handler
00b2 0005 | | .CONST 0x0005 ; Number of locals
00b3 INIT_00b0:
00b3 e004 | | Load 0x0,0x4
00b4 0007 | | Action Break_Optional
00b5 e007 | | Load 0x0,0x7
00b6 0007 | | Action Break_Optional
00b7 00e1 | | Load_Encached Boolean_Cache
00b8 00e1 | | Load_Encached Boolean_Cache
00b9 BODY_00b0:
00b9 4800 |H | Short_Literal 0x0
00ba a5fd | | Store_Unchecked 0x2,-0x3
00bb e5fe | | Load 0x2,-0x2
00bc 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
00bd 00da | | Load_Top At_Offset_2
00be e5ff | | Load 0x2,-0x1
00bf e21c | | Load 0x1,0x1c
00c0 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
00c1 e21e | | Load 0x1,0x1e
00c2 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
00c3 8003 | | Call 0x0,0x3
00c4 005b | [ | Store_Top Discrete,At_Offset_3
00c5 e5fe | | Load 0x2,-0x2
00c6 0f00 | | Execute_Immediate Equal,0x0
00c7 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
00c8 00e1 | | Load_Encached Boolean_Cache
00c9 00da | | Load_Top At_Offset_2
00ca e5ff | | Load 0x2,-0x1
00cb 8023 | # | Call 0x0,0x23
00cc e5ff | | Load 0x2,-0x1
00cd 4804 |H | Short_Literal 0x4
00ce e212 | | Load 0x1,0x12
00cf 170d | | Execute Task,Entry_Call,Field_Number 0xd
00d0 0059 | Y | Store_Top Discrete,At_Offset_1
00d1 00d8 | | Load_Top At_Offset_0
00d2 6820 |h | Jump_Zero 0xf3
00d3 00cf | | Action Mark_Auxiliary
00d4 e024 | $ | Load 0x0,0x24
00d5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00d6 4802 |H | Short_Literal 0x2
00d7 a402 | | Store_Unchecked 0x2,0x2
00d8 e402 | | Load 0x2,0x2
00d9 e5ff | | Load 0x2,-0x1
00da e215 | | Load 0x1,0x15
00db 1d16 | | Execute_Immediate Reference_Lex_1,0x16
00dc e217 | | Load 0x1,0x17
00dd 1d18 | | Execute_Immediate Reference_Lex_1,0x18
00de 8003 | | Call 0x0,0x3
00df c402 | | Store 0x2,0x2
00e0 e402 | | Load 0x2,0x2
00e1 4602 |F | Jump_Case 0x3
00e2 7806 |x | Jump 0xe9 ; case 0x0
00e3 7802 |x | Jump 0xe6 ; case 0x1
00e4 7807 |x | Jump 0xec ; case 0x2
00e5 7806 |x | .XXX[0x1]
00e6 4801 |H | Short_Literal 0x1
00e7 a5fd | | Store_Unchecked 0x2,-0x3
00e8 7809 |x | Jump 0xf2
00e9 4800 |H | Short_Literal 0x0
00ea a5fd | | Store_Unchecked 0x2,-0x3
00eb 7806 |x | Jump 0xf2
00ec 600f |` | Indirect_Literal Discrete,0xfc,{0x00000000, 0x00960000}
00ed 4824 |H$ | Short_Literal 0x24
00ee e024 | $ | Load 0x0,0x24
00ef 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00f0 00c9 | | Action Pop_Auxiliary_Loop
00f1 7fe2 | | Jump 0xd4
00f2 00ce | | Action Pop_Auxiliary
00f3 4801 |H | Short_Literal 0x1
00f4 e5ff | | Load 0x2,-0x1
00f5 8025 | % | Call 0x0,0x25
00f6 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00f7 TRAP_00b0:
00f7 0007 | | Action Break_Optional
00f8 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00f9 0000 0000 | | .XXX[0x3]
00fb 0000 | |
00fc 0000 0000 | | .LITERAL {0x00000000, 0x00960000}
0100 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
0104 8000 0000 | | .LITERAL {0x80000000, 0x00020000}
0108 8000 0000 | | .LITERAL {0x80000000, 0x00030000}
010c 8000 0000 | | .LITERAL {0x80000000, 0x00040000}
0110 8000 0000 | | .LITERAL {0x80000000, 0x00050000}
0114 0000 0000 | | .BLANK 0000[0x4]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011d | | .CONST 0x011d ; Address of begin
0119 014b | K | .CONST 0x014b ; Address of exception handler
011a 0002 | | .CONST 0x0002 ; Number of locals
011b INIT_0118:
011b e004 | | Load 0x0,0x4
011c 0007 | | Action Break_Optional
011d BODY_0118:
011d e5fe | | Load 0x2,-0x2
011e 6803 |h | Jump_Zero 0x122
011f 4801 |H | Short_Literal 0x1
0120 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0121 7802 |x | Jump 0x124
0122 4800 |H | Short_Literal 0x0
0123 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0124 00db | | Load_Top At_Offset_3
0125 8026 | & | Call 0x0,0x26
0126 6813 |h | Jump_Zero 0x13a
0127 00d8 | | Load_Top At_Offset_0
0128 e027 | ' | Load 0x0,0x27
0129 e226 | & | Load 0x1,0x26
012a e227 | ' | Load 0x1,0x27
012b 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
012c 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
012d 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
012e 8009 | | Call 0x0,0x9
012f 0059 | Y | Store_Top Discrete,At_Offset_1
0130 e027 | ' | Load 0x0,0x27
0131 00d8 | | Load_Top At_Offset_0
0132 e22e | . | Load 0x1,0x2e
0133 e22f | / | Load 0x1,0x2f
0134 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
0135 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31
0136 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32
0137 8009 | | Call 0x0,0x9
0138 c027 | ' | Store 0x0,0x27
0139 780c |x | Jump 0x146
013a 00d8 | | Load_Top At_Offset_0
013b e5ff | | Load 0x2,-0x1
013c e235 | 5 | Load 0x1,0x35
013d 1d36 | 6 | Execute_Immediate Reference_Lex_1,0x36
013e e237 | 7 | Load 0x1,0x37
013f 1d38 | 8 | Execute_Immediate Reference_Lex_1,0x38
0140 8003 | | Call 0x0,0x3
0141 0059 | Y | Store_Top Discrete,At_Offset_1
0142 4824 |H$ | Short_Literal 0x24
0143 e5ff | | Load 0x2,-0x1
0144 e024 | $ | Load 0x0,0x24
0145 180f | | Execute Package,Field_Execute,Field_Number 0xf
0146 e5fd | | Load 0x2,-0x3
0147 e00d | | Load 0x0,0xd
0148 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0149 c5fd | | Store 0x2,-0x3
014a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
014b TRAP_0118:
014b 0007 | | Action Break_Optional
014c e5fd | | Load 0x2,-0x3
014d 00ea | | Load_Encached Null_String_Cache
014e e028 | ( | Load 0x0,0x28
014f 180d | | Execute Package,Field_Execute,Field_Number 0xd
0150 0092 0235 | 5| Action Push_String_Extended,0x235 ; "Exception raised:"
0152 e00d | | Load 0x0,0xd
0153 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0154 c5fd | | Store 0x2,-0x3
0155 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0156 0000 0000 | | .XXX[0x2]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015b | [ | .CONST 0x015b ; Address of begin
0159 0004 | | .CONST 0x0004 ; Address of exception handler
015a 0001 | | .CONST 0x0001 ; Number of locals
015b BODY_0158:
015b INIT_0158:
015b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
015c 0000 0000 | | .BLANK 0000[0x4]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163 | c | .CONST 0x0163 ; Address of begin
0161 0004 | | .CONST 0x0004 ; Address of exception handler
0162 0001 | | .CONST 0x0001 ; Number of locals
0163 BODY_0160:
0163 INIT_0160:
0163 4800 |H | Short_Literal 0x0
0164 e212 | | Load 0x1,0x12
0165 170e | | Execute Task,Entry_Call,Field_Number 0xe
0166 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0167 0000 | | .XXX[0x1]
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 00db | | Load_Top At_Offset_3
016c 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
016d 6807 |h | Jump_Zero 0x175
016e 00db | | Load_Top At_Offset_3
016f 3c14 |< | Execute Record,Field_Read,Field_Number 0x14
0170 a5fd | | Store_Unchecked 0x2,-0x3
0171 4800 |H | Short_Literal 0x0
0172 e5fe | | Load 0x2,-0x2
0173 3812 |8 | Execute Record,Field_Write,Field_Number 0x12
0174 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0175 4802 |H | Short_Literal 0x2
0176 a5fd | | Store_Unchecked 0x2,-0x3
0177 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017b | { | .CONST 0x017b ; Address of begin
0179 0004 | | .CONST 0x0004 ; Address of exception handler
017a 0001 | | .CONST 0x0001 ; Number of locals
017b BODY_0178:
017b INIT_0178:
017b e5fd | | Load 0x2,-0x3
017c e004 | | Load 0x0,0x4
017d 025e | ^ | Execute Discrete,Convert
017e e5fe | | Load 0x2,-0x2
017f e5ff | | Load 0x2,-0x1
0180 e029 | ) | Load 0x0,0x29
0181 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0182 00d9 | | Load_Top At_Offset_1
0183 00d0 | | Action Swap_Control
0184 0260 | ` | Execute Discrete,In_Type
0185 7001 |p | Jump_Nonzero 0x187
0186 0801 | | Execute_Immediate Raise,0x1
0187 8213 | | Call 0x1,0x13
0188 00d1 | | Pop_Control Pop_Count_1
0189 c5fd | | Store 0x2,-0x3
018a 4502 |E | Exit_Suprogram New_Top_Offset 0x2
018b 0000 0000 | | .BLANK 0000[0x5]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0193 | | .CONST 0x0193 ; Address of begin
0191 0004 | | .CONST 0x0004 ; Address of exception handler
0192 0001 | | .CONST 0x0001 ; Number of locals
0193 BODY_0190:
0193 INIT_0190:
0193 e5fd | | Load 0x2,-0x3
0194 e5fe | | Load 0x2,-0x2
0195 3813 |8 | Execute Record,Field_Write,Field_Number 0x13
0196 e5fd | | Load 0x2,-0x3
0197 4800 |H | Short_Literal 0x0
0198 4801 |H | Short_Literal 0x1
0199 0262 | b | Execute Discrete,In_Range
019a 7007 |p | Jump_Nonzero 0x1a2
019b 4800 |H | Short_Literal 0x0
019c e5fe | | Load 0x2,-0x2
019d 3811 |8 | Execute Record,Field_Write,Field_Number 0x11
019e 4800 |H | Short_Literal 0x0
019f e5fe | | Load 0x2,-0x2
01a0 3812 |8 | Execute Record,Field_Write,Field_Number 0x12
01a1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01a2 4801 |H | Short_Literal 0x1
01a3 e5fe | | Load 0x2,-0x2
01a4 3811 |8 | Execute Record,Field_Write,Field_Number 0x11
01a5 4801 |H | Short_Literal 0x1
01a6 e5fe | | Load 0x2,-0x2
01a7 3810 |8 | Execute Record,Field_Write,Field_Number 0x10
01a8 4800 |H | Short_Literal 0x0
01a9 e5fe | | Load 0x2,-0x2
01aa 3812 |8 | Execute Record,Field_Write,Field_Number 0x12
01ab 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01ac 0000 0000 | | .BLANK 0000[0x4]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b3 | | .CONST 0x01b3 ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 0001 | | .CONST 0x0001 ; Number of locals
01b3 BODY_01b0:
01b3 INIT_01b0:
01b3 e5fd | | Load 0x2,-0x3
01b4 e007 | | Load 0x0,0x7
01b5 025e | ^ | Execute Discrete,Convert
01b6 e5fe | | Load 0x2,-0x2
01b7 e5ff | | Load 0x2,-0x1
01b8 e029 | ) | Load 0x0,0x29
01b9 1b15 | | Execute Package,Field_Read,Field_Number 0x15
01ba 00d9 | | Load_Top At_Offset_1
01bb 00d0 | | Action Swap_Control
01bc 0260 | ` | Execute Discrete,In_Type
01bd 7001 |p | Jump_Nonzero 0x1bf
01be 0801 | | Execute_Immediate Raise,0x1
01bf 821a | | Call 0x1,0x1a
01c0 00d1 | | Pop_Control Pop_Count_1
01c1 c5fd | | Store 0x2,-0x3
01c2 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01c3 0000 0000 | | .BLANK 0000[0x5]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01cb | | .CONST 0x01cb ; Address of begin
01c9 0004 | | .CONST 0x0004 ; Address of exception handler
01ca 0001 | | .CONST 0x0001 ; Number of locals
01cb BODY_01c8:
01cb INIT_01c8:
01cb 00db | | Load_Top At_Offset_3
01cc 3c10 |< | Execute Record,Field_Read,Field_Number 0x10
01cd 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
01ce 0000 0000 | | .XXX[0x2]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3 | | .CONST 0x01d3 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0001 | | .CONST 0x0001 ; Number of locals
01d3 BODY_01d0:
01d3 INIT_01d0:
01d3 e5fd | | Load 0x2,-0x3
01d4 e5fe | | Load 0x2,-0x2
01d5 3814 |8 | Execute Record,Field_Write,Field_Number 0x14
01d6 4801 |H | Short_Literal 0x1
01d7 e5fe | | Load 0x2,-0x2
01d8 3812 |8 | Execute Record,Field_Write,Field_Number 0x12
01d9 4800 |H | Short_Literal 0x0
01da e5fe | | Load 0x2,-0x2
01db 3810 |8 | Execute Record,Field_Write,Field_Number 0x10
01dc 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01dd 0000 0000 | | .XXX[0x3]
01df 0000 | |
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e3 | | .CONST 0x01e3 ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0001 | | .CONST 0x0001 ; Number of locals
01e3 BODY_01e0:
01e3 INIT_01e0:
01e3 4824 |H$ | Short_Literal 0x24
01e4 00db | | Load_Top At_Offset_3
01e5 e024 | $ | Load 0x0,0x24
01e6 180f | | Execute Package,Field_Execute,Field_Number 0xf
01e7 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb | | .CONST 0x01eb ; Address of begin
01e9 0004 | | .CONST 0x0004 ; Address of exception handler
01ea 0001 | | .CONST 0x0001 ; Number of locals
01eb BODY_01e8:
01eb BODY_01e8:
01eb INIT_01e8:
01eb INIT_01e8:
01eb e5fd | | Load 0x2,-0x3
01ec e004 | | Load 0x0,0x4
01ed 025e | ^ | Execute Discrete,Convert
01ee e5fe | | Load 0x2,-0x2
01ef e5ff | | Load 0x2,-0x1
01f0 e029 | ) | Load 0x0,0x29
01f1 1b15 | | Execute Package,Field_Read,Field_Number 0x15
01f2 00d9 | | Load_Top At_Offset_1
01f3 00d0 | | Action Swap_Control
01f4 0260 | ` | Execute Discrete,In_Type
01f5 7001 |p | Jump_Nonzero 0x1f7
01f6 0801 | | Execute_Immediate Raise,0x1
01f7 8222 | " | Call 0x1,0x22
01f8 00d1 | | Pop_Control Pop_Count_1
01f9 c5fd | | Store 0x2,-0x3
01fa 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01fb 0000 0000 | | .BLANK 0000[0x5]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0203 | | .CONST 0x0203 ; Address of begin
0201 0004 | | .CONST 0x0004 ; Address of exception handler
0202 0001 | | .CONST 0x0001 ; Number of locals
0203 BODY_0200:
0203 BODY_0200:
0203 INIT_0200:
0203 INIT_0200:
0203 e5fd | | Load 0x2,-0x3
0204 00d8 | | Load_Top At_Offset_0
0205 00e2 | | Load_Encached Integer_Cache
0206 0260 | ` | Execute Discrete,In_Type
0207 7001 |p | Jump_Nonzero 0x209
0208 0801 | | Execute_Immediate Raise,0x1
0209 e5fe | | Load 0x2,-0x2
020a e5ff | | Load 0x2,-0x1
020b e029 | ) | Load 0x0,0x29
020c 1b15 | | Execute Package,Field_Read,Field_Number 0x15
020d 00d9 | | Load_Top At_Offset_1
020e 00d0 | | Action Swap_Control
020f 0260 | ` | Execute Discrete,In_Type
0210 7001 |p | Jump_Nonzero 0x212
0211 0801 | | Execute_Immediate Raise,0x1
0212 8221 | ! | Call 0x1,0x21
0213 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0214 0000 0000 | | .BLANK 0000[0x4]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 021b | | .CONST 0x021b ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0001 | | .CONST 0x0001 ; Number of locals
021b BODY_0218:
021b INIT_0218:
021b e5fd | | Load 0x2,-0x3
021c 00e2 | | Load_Encached Integer_Cache
021d 025e | ^ | Execute Discrete,Convert
021e e5fe | | Load 0x2,-0x2
021f e5ff | | Load 0x2,-0x1
0220 e029 | ) | Load 0x0,0x29
0221 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0222 00d9 | | Load_Top At_Offset_1
0223 00d0 | | Action Swap_Control
0224 0260 | ` | Execute Discrete,In_Type
0225 7001 |p | Jump_Nonzero 0x227
0226 0801 | | Execute_Immediate Raise,0x1
0227 8223 | # | Call 0x1,0x23
0228 00d1 | | Pop_Control Pop_Count_1
0229 c5fd | | Store 0x2,-0x3
022a 4502 |E | Exit_Suprogram New_Top_Offset 0x2
022b 0000 0000 | | .BLANK 0000[0x5]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0233 | 3 | .CONST 0x0233 ; Address of begin
0231 0004 | | .CONST 0x0004 ; Address of exception handler
0232 0001 | | .CONST 0x0001 ; Number of locals
0233 BODY_0230:
0233 INIT_0230:
0233 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0234 ; --------------------------------------------------------------------------------------
0234 ; STRING TABLE
0234 ; --------------------------------------------------------------------------------------
0234 0006 | | .STRTAB 0x0006->0x0237 ; "Task not stopped inside debugger"
0235 0024 | $ | .STRTAB 0x0024->0x0247 ; "Exception raised:"
0236 0033 | 3 | .STREND 0x0033->0x024f
0237 5461 736b |Task| .STRTAB_STRINGS
0250 ; --------------------------------------------------------------------------------------
0250 ; Debug Table
0250 ; --------------------------------------------------------------------------------------
0250 0004 0009 | | .DEBUG4 0x0004,0x0009,0x128d,0x0000,0x0001,0x0000
0256 0000 0000 | | .BLANK 0000[0x1aa]