|
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_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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0290 | | .CONST 0x0290 ; 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 0052 | R | .CONST 0x0052 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0020 | | .CONST 0x0020 ; Number of locals
000b INIT_0008:
000b e001 | | Load 0x0,0x1
000c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
000d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
000e 0129 | ) | Execute Any,Make_Visible
000f e001 | | Load 0x0,0x1
0010 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0011 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0012 0129 | ) | Execute Any,Make_Visible
0013 e001 | | Load 0x0,0x1
0014 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0015 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0016 0129 | ) | Execute Any,Make_Visible
0017 e001 | | Load 0x0,0x1
0018 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0019 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
001a 0129 | ) | Execute Any,Make_Visible
001b 00d8 | | Load_Top At_Offset_0
001c 0129 | ) | Execute Any,Make_Visible
001d 00d9 | | Load_Top At_Offset_1
001e 0129 | ) | Execute Any,Make_Visible
001f 00d8 | | Load_Top At_Offset_0
0020 0129 | ) | Execute Any,Make_Visible
0021 00d9 | | Load_Top At_Offset_1
0022 0129 | ) | Execute Any,Make_Visible
0023 e001 | | Load 0x0,0x1
0024 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0025 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0026 0129 | ) | Execute Any,Make_Visible
0027 e001 | | Load 0x0,0x1
0028 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0029 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
002a 0129 | ) | Execute Any,Make_Visible
002b e001 | | Load 0x0,0x1
002c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
002d 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
002e 0129 | ) | Execute Any,Make_Visible
002f 029a 005b | [| Declare_Subprogram INIT_0058,For_Outer_Call,Visible,Unelaborated
0031 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated
0033 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated
0035 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated
0037 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated
0039 029a 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call,Visible,Unelaborated
003b 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated
003d 029a 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call,Visible,Unelaborated
003f 00bf | | Action Accept_Activation
0040 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0041 00c7 | | Action Elaborate_Subprogram
0042 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0043 00c7 | | Action Elaborate_Subprogram
0044 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0045 00c7 | | Action Elaborate_Subprogram
0046 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0047 00c7 | | Action Elaborate_Subprogram
0048 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
0049 00c7 | | Action Elaborate_Subprogram
004a 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
004b 00c7 | | Action Elaborate_Subprogram
004c 029d 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call
004e 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
004f 00c7 | | Action Elaborate_Subprogram
0050 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
0051 00c7 | | Action Elaborate_Subprogram
0052 BODY_0008:
0052 00bc | | Action Signal_Activated
0053 00bb | | Action Signal_Completion
0054 0000 0000 | | .BLANK 0000[0x4]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 006a | j | .CONST 0x006a ; Address of begin
0059 0098 | | .CONST 0x0098 ; Address of exception handler
005a 0005 | | .CONST 0x0005 ; Number of locals
005b INIT_0058:
005b e002 | | Load 0x0,0x2
005c 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
005d 02c7 | | Declare_Variable Any
005e 00d8 | | Load_Top At_Offset_0
005f 1c00 | | Execute_Immediate Run_Utility,0x0
0060 e001 | | Load 0x0,0x1
0061 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0062 02c7 | | Declare_Variable Any
0063 e003 | | Load 0x0,0x3
0064 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0065 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0066 a403 | | Store_Unchecked 0x2,0x3
0067 00e1 | | Load_Encached Boolean_Cache
0068 029f 01e3 | | Declare_Subprogram INIT_01e0,For_Call
006a BODY_0058:
006a e5ff | | Load 0x2,-0x1
006b e001 | | Load 0x0,0x1
006c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
006d 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
006e 7003 |p | Jump_Nonzero 0x72
006f e004 | | Load 0x0,0x4
0070 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0071 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0072 00db | | Load_Top At_Offset_3
0073 0120 | | Execute Any,Is_Value
0074 6803 |h | Jump_Zero 0x78
0075 e002 | | Load 0x0,0x2
0076 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
0077 7801 |x | Jump 0x79
0078 00db | | Load_Top At_Offset_3
0079 e5ff | | Load 0x2,-0x1
007a e003 | | Load 0x0,0x3
007b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
007c 1820 | | Execute Package,Field_Execute,Field_Number 0x20
007d 4802 |H | Short_Literal 0x2
007e 0092 028b | | Action Push_String_Extended,0x28b ; "@"
0080 0092 028c | | Action Push_String_Extended,0x28c ; "?"
0082 e002 | | Load 0x0,0x2
0083 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0084 c402 | | Store 0x2,0x2
0085 00cf | | Action Mark_Auxiliary
0086 7806 |x | Jump 0x8d
0087 8405 | | Call 0x2,0x5
0088 e402 | | Load 0x2,0x2
0089 e002 | | Load 0x0,0x2
008a 1820 | | Execute Package,Field_Execute,Field_Number 0x20
008b c402 | | Store 0x2,0x2
008c 00c9 | | Action Pop_Auxiliary_Loop
008d e402 | | Load 0x2,0x2
008e e002 | | Load 0x0,0x2
008f 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0090 6ff6 |o | Jump_Zero 0x87
0091 00ce | | Action Pop_Auxiliary
0092 00da | | Load_Top At_Offset_2
0093 e003 | | Load 0x0,0x3
0094 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0095 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0096 00da | | Load_Top At_Offset_2
0097 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0098 TRAP_0058:
0098 0007 | | Action Break_Optional
0099 e004 | | Load 0x0,0x4
009a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
009b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
009c 0000 0000 | | .BLANK 0000[0x4]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00b2 | | .CONST 0x00b2 ; Address of begin
00a1 00e4 | | .CONST 0x00e4 ; Address of exception handler
00a2 0005 | | .CONST 0x0005 ; Number of locals
00a3 INIT_00a0:
00a3 e002 | | Load 0x0,0x2
00a4 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
00a5 02c7 | | Declare_Variable Any
00a6 00d8 | | Load_Top At_Offset_0
00a7 1c00 | | Execute_Immediate Run_Utility,0x0
00a8 e001 | | Load 0x0,0x1
00a9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00aa 02c7 | | Declare_Variable Any
00ab e003 | | Load 0x0,0x3
00ac 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00ad 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
00ae a403 | | Store_Unchecked 0x2,0x3
00af 00e1 | | Load_Encached Boolean_Cache
00b0 029f 0213 | | Declare_Subprogram INIT_0210,For_Call
00b2 BODY_00a0:
00b2 e5ff | | Load 0x2,-0x1
00b3 e001 | | Load 0x0,0x1
00b4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00b5 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
00b6 7003 |p | Jump_Nonzero 0xba
00b7 e004 | | Load 0x0,0x4
00b8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00b9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00ba 00db | | Load_Top At_Offset_3
00bb 0120 | | Execute Any,Is_Value
00bc 6803 |h | Jump_Zero 0xc0
00bd e002 | | Load 0x0,0x2
00be 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
00bf 7801 |x | Jump 0xc1
00c0 00db | | Load_Top At_Offset_3
00c1 e5ff | | Load 0x2,-0x1
00c2 e003 | | Load 0x0,0x3
00c3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00c4 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00c5 4802 |H | Short_Literal 0x2
00c6 0092 028b | | Action Push_String_Extended,0x28b ; "@"
00c8 0092 028c | | Action Push_String_Extended,0x28c ; "?"
00ca e002 | | Load 0x0,0x2
00cb 181f | | Execute Package,Field_Execute,Field_Number 0x1f
00cc c402 | | Store 0x2,0x2
00cd 00cf | | Action Mark_Auxiliary
00ce 780a |x | Jump 0xd9
00cf e402 | | Load 0x2,0x2
00d0 e002 | | Load 0x0,0x2
00d1 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
00d2 7001 |p | Jump_Nonzero 0xd4
00d3 8405 | | Call 0x2,0x5
00d4 e402 | | Load 0x2,0x2
00d5 e002 | | Load 0x0,0x2
00d6 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00d7 c402 | | Store 0x2,0x2
00d8 00c9 | | Action Pop_Auxiliary_Loop
00d9 e402 | | Load 0x2,0x2
00da e002 | | Load 0x0,0x2
00db 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
00dc 6ff2 |o | Jump_Zero 0xcf
00dd 00ce | | Action Pop_Auxiliary
00de 00da | | Load_Top At_Offset_2
00df e003 | | Load 0x0,0x3
00e0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00e1 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
00e2 00da | | Load_Top At_Offset_2
00e3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00e4 TRAP_00a0:
00e4 0007 | | Action Break_Optional
00e5 e004 | | Load 0x0,0x4
00e6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00e7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00fa | | .CONST 0x00fa ; Address of begin
00e9 012d | - | .CONST 0x012d ; Address of exception handler
00ea 0005 | | .CONST 0x0005 ; Number of locals
00eb INIT_00e8:
00eb e002 | | Load 0x0,0x2
00ec 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
00ed 02c7 | | Declare_Variable Any
00ee 00d8 | | Load_Top At_Offset_0
00ef 1c00 | | Execute_Immediate Run_Utility,0x0
00f0 e001 | | Load 0x0,0x1
00f1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00f2 02c7 | | Declare_Variable Any
00f3 e003 | | Load 0x0,0x3
00f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00f5 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
00f6 a403 | | Store_Unchecked 0x2,0x3
00f7 00e1 | | Load_Encached Boolean_Cache
00f8 029f 0243 | C| Declare_Subprogram INIT_0240,For_Call
00fa BODY_00e8:
00fa e5ff | | Load 0x2,-0x1
00fb e001 | | Load 0x0,0x1
00fc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00fd 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
00fe 7003 |p | Jump_Nonzero 0x102
00ff e004 | | Load 0x0,0x4
0100 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0101 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0102 00db | | Load_Top At_Offset_3
0103 0120 | | Execute Any,Is_Value
0104 6803 |h | Jump_Zero 0x108
0105 e002 | | Load 0x0,0x2
0106 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
0107 7801 |x | Jump 0x109
0108 00db | | Load_Top At_Offset_3
0109 e5ff | | Load 0x2,-0x1
010a e003 | | Load 0x0,0x3
010b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
010c 1820 | | Execute Package,Field_Execute,Field_Number 0x20
010d 4802 |H | Short_Literal 0x2
010e 0092 028b | | Action Push_String_Extended,0x28b ; "@"
0110 0092 028c | | Action Push_String_Extended,0x28c ; "?"
0112 e002 | | Load 0x0,0x2
0113 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0114 c402 | | Store 0x2,0x2
0115 00cf | | Action Mark_Auxiliary
0116 780b |x | Jump 0x122
0117 e402 | | Load 0x2,0x2
0118 e002 | | Load 0x0,0x2
0119 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
011a 0f01 | | Execute_Immediate Equal,0x1
011b 6801 |h | Jump_Zero 0x11d
011c 8405 | | Call 0x2,0x5
011d e402 | | Load 0x2,0x2
011e e002 | | Load 0x0,0x2
011f 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0120 c402 | | Store 0x2,0x2
0121 00c9 | | Action Pop_Auxiliary_Loop
0122 e402 | | Load 0x2,0x2
0123 e002 | | Load 0x0,0x2
0124 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0125 6ff1 |o | Jump_Zero 0x117
0126 00ce | | Action Pop_Auxiliary
0127 00da | | Load_Top At_Offset_2
0128 e003 | | Load 0x0,0x3
0129 1b0d | | Execute Package,Field_Read,Field_Number 0xd
012a 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
012b 00da | | Load_Top At_Offset_2
012c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
012d TRAP_00e8:
012d 0007 | | Action Break_Optional
012e e004 | | Load 0x0,0x4
012f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0130 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0131 0000 0000 | | .BLANK 0000[0x7]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 0141 | A | .CONST 0x0141 ; Address of begin
0139 0142 | B | .CONST 0x0142 ; Address of exception handler
013a 0002 | | .CONST 0x0002 ; Number of locals
013b INIT_0138:
013b e212 | | Load 0x1,0x12
013c 02c7 | | Declare_Variable Any
013d e5fe | | Load 0x2,-0x2
013e e5ff | | Load 0x2,-0x1
013f 821a | | Call 0x1,0x1a
0140 a402 | | Store_Unchecked 0x2,0x2
0141 BODY_0138:
0141 0833 | 3 | Execute_Immediate Raise,0x33
0142 TRAP_0138:
0142 0007 | | Action Break_Optional
0143 e004 | | Load 0x0,0x4
0144 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0145 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0146 0000 0000 | | .XXX[0x2]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 0151 | Q | .CONST 0x0151 ; Address of begin
0149 0152 | R | .CONST 0x0152 ; Address of exception handler
014a 0002 | | .CONST 0x0002 ; Number of locals
014b INIT_0148:
014b e212 | | Load 0x1,0x12
014c 02c7 | | Declare_Variable Any
014d e5fe | | Load 0x2,-0x2
014e e5ff | | Load 0x2,-0x1
014f 821a | | Call 0x1,0x1a
0150 a402 | | Store_Unchecked 0x2,0x2
0151 BODY_0148:
0151 0833 | 3 | Execute_Immediate Raise,0x33
0152 TRAP_0148:
0152 0007 | | Action Break_Optional
0153 e004 | | Load 0x0,0x4
0154 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0155 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
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 00db | | Load_Top At_Offset_3
015c e001 | | Load 0x0,0x1
015d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
015e 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
015f 7002 |p | Jump_Nonzero 0x162
0160 4800 |H | Short_Literal 0x0
0161 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0162 00db | | Load_Top At_Offset_3
0163 e003 | | Load 0x0,0x3
0164 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0165 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0166 4802 |H | Short_Literal 0x2
0167 e5ff | | Load 0x2,-0x1
0168 e003 | | Load 0x0,0x3
0169 1b0e | | Execute Package,Field_Read,Field_Number 0xe
016a 1820 | | Execute Package,Field_Execute,Field_Number 0x20
016b 0092 028b | | Action Push_String_Extended,0x28b ; "@"
016d e002 | | Load 0x0,0x2
016e 181a | | Execute Package,Field_Execute,Field_Number 0x1a
016f e002 | | Load 0x0,0x2
0170 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0171 0f00 | | Execute_Immediate Equal,0x0
0172 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0173 0000 0000 | | .BLANK 0000[0x5]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 018a | | .CONST 0x018a ; Address of begin
0179 01b2 | | .CONST 0x01b2 ; Address of exception handler
017a 0005 | | .CONST 0x0005 ; Number of locals
017b INIT_0178:
017b e002 | | Load 0x0,0x2
017c 1b19 | | Execute Package,Field_Read,Field_Number 0x19
017d 02c7 | | Declare_Variable Any
017e 00d8 | | Load_Top At_Offset_0
017f 1c00 | | Execute_Immediate Run_Utility,0x0
0180 e001 | | Load 0x0,0x1
0181 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0182 02c7 | | Declare_Variable Any
0183 e003 | | Load 0x0,0x3
0184 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0185 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0186 a403 | | Store_Unchecked 0x2,0x3
0187 00e1 | | Load_Encached Boolean_Cache
0188 029f 0273 | s| Declare_Subprogram INIT_0270,For_Call
018a BODY_0178:
018a e5fe | | Load 0x2,-0x2
018b e001 | | Load 0x0,0x1
018c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
018d 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
018e 7002 |p | Jump_Nonzero 0x191
018f 00da | | Load_Top At_Offset_2
0190 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0191 e5fe | | Load 0x2,-0x2
0192 e003 | | Load 0x0,0x3
0193 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0194 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0195 4802 |H | Short_Literal 0x2
0196 e5ff | | Load 0x2,-0x1
0197 e003 | | Load 0x0,0x3
0198 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0199 1820 | | Execute Package,Field_Execute,Field_Number 0x20
019a 0092 028b | | Action Push_String_Extended,0x28b ; "@"
019c e002 | | Load 0x0,0x2
019d 181a | | Execute Package,Field_Execute,Field_Number 0x1a
019e c402 | | Store 0x2,0x2
019f 00cf | | Action Mark_Auxiliary
01a0 7806 |x | Jump 0x1a7
01a1 8405 | | Call 0x2,0x5
01a2 e402 | | Load 0x2,0x2
01a3 e002 | | Load 0x0,0x2
01a4 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01a5 c402 | | Store 0x2,0x2
01a6 00c9 | | Action Pop_Auxiliary_Loop
01a7 e402 | | Load 0x2,0x2
01a8 e002 | | Load 0x0,0x2
01a9 181d | | Execute Package,Field_Execute,Field_Number 0x1d
01aa 6ff6 |o | Jump_Zero 0x1a1
01ab 00ce | | Action Pop_Auxiliary
01ac 00da | | Load_Top At_Offset_2
01ad e003 | | Load 0x0,0x3
01ae 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01af 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
01b0 00da | | Load_Top At_Offset_2
01b1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01b2 TRAP_0178:
01b2 0007 | | Action Break_Optional
01b3 e004 | | Load 0x0,0x4
01b4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01b5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01b6 0000 0000 | | .XXX[0x2]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bb | | .CONST 0x01bb ; Address of begin
01b9 01bc | | .CONST 0x01bc ; Address of exception handler
01ba 0001 | | .CONST 0x0001 ; Number of locals
01bb BODY_01b8:
01bb INIT_01b8:
01bb 0833 | 3 | Execute_Immediate Raise,0x33
01bc TRAP_01b8:
01bc 0007 | | Action Break_Optional
01bd e004 | | Load 0x0,0x4
01be 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01bf 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c3 | | .CONST 0x01c3 ; Address of begin
01c1 0004 | | .CONST 0x0004 ; Address of exception handler
01c2 0001 | | .CONST 0x0001 ; Number of locals
01c3 BODY_01c0:
01c3 INIT_01c0:
01c3 e003 | | Load 0x0,0x3
01c4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01c5 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
01c6 180e | | Execute Package,Field_Execute,Field_Number 0xe
01c7 00eb | | Load_Encached Diana_Cache
01c8 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01c9 e5ff | | Load 0x2,-0x1
01ca e005 | | Load 0x0,0x5
01cb 181e | | Execute Package,Field_Execute,Field_Number 0x1e
01cc e005 | | Load 0x0,0x5
01cd 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01ce e005 | | Load 0x0,0x5
01cf 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01d0 e006 | | Load 0x0,0x6
01d1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01d2 e003 | | Load 0x0,0x3
01d3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d4 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
01d5 e003 | | Load 0x0,0x3
01d6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d7 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
01d8 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
01d9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01da 0000 0000 | | .BLANK 0000[0x6]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01f0 | | .CONST 0x01f0 ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0002 | | .CONST 0x0002 ; Number of locals
01e3 INIT_01e0:
01e3 e20f | | Load 0x1,0xf
01e4 02c7 | | Declare_Variable Any
01e5 4801 |H | Short_Literal 0x1
01e6 e003 | | Load 0x0,0x3
01e7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01e8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01e9 e402 | | Load 0x2,0x2
01ea e002 | | Load 0x0,0x2
01eb 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
01ec e003 | | Load 0x0,0x3
01ed 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01ee 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
01ef a602 | | Store_Unchecked 0x3,0x2
01f0 BODY_01e0:
01f0 e5fe | | Load 0x2,-0x2
01f1 680f |h | Jump_Zero 0x201
01f2 e5ff | | Load 0x2,-0x1
01f3 00d9 | | Load_Top At_Offset_1
01f4 821d | | Call 0x1,0x1d
01f5 680a |h | Jump_Zero 0x200
01f6 00e1 | | Load_Encached Boolean_Cache
01f7 e003 | | Load 0x0,0x3
01f8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01f9 180e | | Execute Package,Field_Execute,Field_Number 0xe
01fa 00da | | Load_Top At_Offset_2
01fb e403 | | Load 0x2,0x3
01fc e003 | | Load 0x0,0x3
01fd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01fe 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
01ff c404 | | Store 0x2,0x4
0200 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0201 00e1 | | Load_Encached Boolean_Cache
0202 e003 | | Load 0x0,0x3
0203 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0204 180e | | Execute Package,Field_Execute,Field_Number 0xe
0205 00da | | Load_Top At_Offset_2
0206 e403 | | Load 0x2,0x3
0207 e003 | | Load 0x0,0x3
0208 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0209 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
020a c404 | | Store 0x2,0x4
020b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
020c 0000 0000 | | .BLANK 0000[0x4]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0220 | | .CONST 0x0220 ; Address of begin
0211 0004 | | .CONST 0x0004 ; Address of exception handler
0212 0002 | | .CONST 0x0002 ; Number of locals
0213 INIT_0210:
0213 e20f | | Load 0x1,0xf
0214 02c7 | | Declare_Variable Any
0215 4801 |H | Short_Literal 0x1
0216 e003 | | Load 0x0,0x3
0217 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0218 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0219 e402 | | Load 0x2,0x2
021a e002 | | Load 0x0,0x2
021b 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
021c e003 | | Load 0x0,0x3
021d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
021e 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
021f a602 | | Store_Unchecked 0x3,0x2
0220 BODY_0210:
0220 e5fe | | Load 0x2,-0x2
0221 680f |h | Jump_Zero 0x231
0222 e5ff | | Load 0x2,-0x1
0223 00d9 | | Load_Top At_Offset_1
0224 821d | | Call 0x1,0x1d
0225 680a |h | Jump_Zero 0x230
0226 00e1 | | Load_Encached Boolean_Cache
0227 e003 | | Load 0x0,0x3
0228 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0229 180e | | Execute Package,Field_Execute,Field_Number 0xe
022a 00da | | Load_Top At_Offset_2
022b e403 | | Load 0x2,0x3
022c e003 | | Load 0x0,0x3
022d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
022e 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
022f c404 | | Store 0x2,0x4
0230 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0231 00e1 | | Load_Encached Boolean_Cache
0232 e003 | | Load 0x0,0x3
0233 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0234 180e | | Execute Package,Field_Execute,Field_Number 0xe
0235 00da | | Load_Top At_Offset_2
0236 e403 | | Load 0x2,0x3
0237 e003 | | Load 0x0,0x3
0238 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0239 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
023a c404 | | Store 0x2,0x4
023b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
023c 0000 0000 | | .BLANK 0000[0x4]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0250 | P | .CONST 0x0250 ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0002 | | .CONST 0x0002 ; Number of locals
0243 INIT_0240:
0243 e20f | | Load 0x1,0xf
0244 02c7 | | Declare_Variable Any
0245 4801 |H | Short_Literal 0x1
0246 e003 | | Load 0x0,0x3
0247 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0248 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0249 e402 | | Load 0x2,0x2
024a e002 | | Load 0x0,0x2
024b 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
024c e003 | | Load 0x0,0x3
024d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
024e 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
024f a602 | | Store_Unchecked 0x3,0x2
0250 BODY_0240:
0250 e5fe | | Load 0x2,-0x2
0251 680f |h | Jump_Zero 0x261
0252 e5ff | | Load 0x2,-0x1
0253 00d9 | | Load_Top At_Offset_1
0254 821d | | Call 0x1,0x1d
0255 680a |h | Jump_Zero 0x260
0256 00e1 | | Load_Encached Boolean_Cache
0257 e003 | | Load 0x0,0x3
0258 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0259 180e | | Execute Package,Field_Execute,Field_Number 0xe
025a 00da | | Load_Top At_Offset_2
025b e403 | | Load 0x2,0x3
025c e003 | | Load 0x0,0x3
025d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
025e 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
025f c404 | | Store 0x2,0x4
0260 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0261 00e1 | | Load_Encached Boolean_Cache
0262 e003 | | Load 0x0,0x3
0263 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0264 180e | | Execute Package,Field_Execute,Field_Number 0xe
0265 00da | | Load_Top At_Offset_2
0266 e403 | | Load 0x2,0x3
0267 e003 | | Load 0x0,0x3
0268 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0269 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
026a c404 | | Store 0x2,0x4
026b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
026c 0000 0000 | | .BLANK 0000[0x4]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 027a | z | .CONST 0x027a ; Address of begin
0271 0004 | | .CONST 0x0004 ; Address of exception handler
0272 0002 | | .CONST 0x0002 ; Number of locals
0273 INIT_0270:
0273 e216 | | Load 0x1,0x16
0274 02c7 | | Declare_Variable Any
0275 e402 | | Load 0x2,0x2
0276 e002 | | Load 0x0,0x2
0277 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0278 8220 | | Call 0x1,0x20
0279 a602 | | Store_Unchecked 0x3,0x2
027a BODY_0270:
027a 00d8 | | Load_Top At_Offset_0
027b e403 | | Load 0x2,0x3
027c e003 | | Load 0x0,0x3
027d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
027e 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
027f 700a |p | Jump_Nonzero 0x28a
0280 00e1 | | Load_Encached Boolean_Cache
0281 e003 | | Load 0x0,0x3
0282 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0283 180e | | Execute Package,Field_Execute,Field_Number 0xe
0284 00da | | Load_Top At_Offset_2
0285 e403 | | Load 0x2,0x3
0286 e003 | | Load 0x0,0x3
0287 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0288 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0289 c404 | | Store 0x2,0x4
028a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
028b ; --------------------------------------------------------------------------------------
028b ; STRING TABLE
028b ; --------------------------------------------------------------------------------------
028b 0006 | | .STRTAB 0x0006->0x028e ; "@"
028c 0005 | | .STRTAB 0x0005->0x028e ; "?"
028d 0004 | | .STREND 0x0004->0x028f
028e 403f |@? | .STRTAB_STRINGS
028f 0000 | | .XXX[0x1]
0290 ; --------------------------------------------------------------------------------------
0290 ; Debug Table
0290 ; --------------------------------------------------------------------------------------
0290 0004 0004 | | .DEBUG4 0x0004,0x0004,0x2c75,0x0000,0x0001,0x000f
0296 000b 02d2 | | .DBG4T 0x000b,0x02d2,0x0000,0x0000
029a 0040 02e7 | @ | .DBG4T 0x0040,0x02e7,0x0000,0x8000
029e 005b 02fb | [ | .DBG4T 0x005b,0x02fb,0x0002,0x4000
02a2 00a3 0312 | | .DBG4T 0x00a3,0x0312,0x0002,0x4000
02a6 00eb 032b | +| .DBG4T 0x00eb,0x032b,0x0002,0x4000
02aa 013b 0344 | ; D| .DBG4T 0x013b,0x0344,0x0002,0x0000
02ae 014b 0349 | K I| .DBG4T 0x014b,0x0349,0x0002,0x0000
02b2 015b 034e | [ N| .DBG4T 0x015b,0x034e,0x0002,0x0000
02b6 017b 0353 | { S| .DBG4T 0x017b,0x0353,0x0002,0x4000
02ba 01bb 036a | j| .DBG4T 0x01bb,0x036a,0x0002,0x0000
02be 01c3 036e | n| .DBG4T 0x01c3,0x036e,0x0002,0x0000
02c2 01e3 0371 | q| .DBG4T 0x01e3,0x0371,0x0004,0x0000
02c6 0213 0378 | x| .DBG4T 0x0213,0x0378,0x0004,0x0000
02ca 0243 037f | C | .DBG4T 0x0243,0x037f,0x0004,0x0000
02ce 0273 0386 | s | .DBG4T 0x0273,0x0386,0x0004,0x0000
02d2 ; --------------------------------------------------------------------------------------
02d2 ; Debug chain
02d2 ; --------------------------------------------------------------------------------------
02d2 0013 0000 | | .DBGLEN 0x0013,0x0000
02d4 000b 000f | | .DBGLNO 0x000b,0x000f,0x0013,0x0017,0x001b,0x001d,0x001f,0x0021,0x0023,0x0027,0x002b,0x002f,0x0031,0x0033,0x0035,0x0037,0x0039,0x003b,0x003d
02e7 ; --------------------------------------------------------------------------------------
02e7 ; Debug chain
02e7 ; --------------------------------------------------------------------------------------
02e7 0009 0000 | | .DBGLEN 0x0009,0x0000
02e9 0040 0042 | @ B| .DBGLNO 0x0040,0x0042,0x0044,0x0046,0x0048,0x004a,0x004c,0x004e,0x0050
02f2 0002 0003 | | .XXX[0x9]
02f4 0004 0005 | |
02f6 0006 0007 | |
02f8 0008 0009 | |
02fa 000a | |
02fb ; --------------------------------------------------------------------------------------
02fb ; Debug chain
02fb ; --------------------------------------------------------------------------------------
02fb 0003 0009 | | .DBGLEN 0x0003,0x0009
02fd 005b 0060 | [ `| .DBGLNO 0x005b,0x0060,0x0067,0x006a,0x006f,0x0072,0x0087,0x0088,0x008d,0x0092,0x0096,0x0099
0309 0001 0002 | | .XXX[0x9]
030b 0003 0005 | |
030d 0006 0004 | |
030f 0007 0008 | |
0311 0009 | |
0312 ; --------------------------------------------------------------------------------------
0312 ; Debug chain
0312 ; --------------------------------------------------------------------------------------
0312 0003 000a | | .DBGLEN 0x0003,0x000a
0314 00a3 00a8 | | .DBGLNO 0x00a3,0x00a8,0x00af,0x00b2,0x00b7,0x00ba,0x00cf,0x00d3,0x00d4,0x00d9,0x00de,0x00e2,0x00e5
0321 0001 0002 | | .XXX[0xa]
0323 0003 0005 | |
0325 0006 0007 | |
0327 0004 0008 | |
0329 0009 000a | |
032b ; --------------------------------------------------------------------------------------
032b ; Debug chain
032b ; --------------------------------------------------------------------------------------
032b 0003 000a | | .DBGLEN 0x0003,0x000a
032d 00eb 00f0 | | .DBGLNO 0x00eb,0x00f0,0x00f7,0x00fa,0x00ff,0x0102,0x0117,0x011c,0x011d,0x0122,0x0127,0x012b,0x012e
033a 0001 0002 | | .XXX[0xa]
033c 0003 0005 | |
033e 0006 0007 | |
0340 0004 0008 | |
0342 0009 000a | |
0344 ; --------------------------------------------------------------------------------------
0344 ; Debug chain
0344 ; --------------------------------------------------------------------------------------
0344 0001 0002 | | .DBGLEN 0x0001,0x0002
0346 013b 0141 | ; A| .DBGLNO 0x013b,0x0141,0x0143
0349 ; --------------------------------------------------------------------------------------
0349 ; Debug chain
0349 ; --------------------------------------------------------------------------------------
0349 0001 0002 | | .DBGLEN 0x0001,0x0002
034b 014b 0151 | K Q| .DBGLNO 0x014b,0x0151,0x0153
034e ; --------------------------------------------------------------------------------------
034e ; Debug chain
034e ; --------------------------------------------------------------------------------------
034e 0000 0003 | | .DBGLEN 0x0000,0x0003
0350 015b 0160 | [ `| .DBGLNO 0x015b,0x0160,0x0162
0353 ; --------------------------------------------------------------------------------------
0353 ; Debug chain
0353 ; --------------------------------------------------------------------------------------
0353 0003 0009 | | .DBGLEN 0x0003,0x0009
0355 017b 0180 | { | .DBGLNO 0x017b,0x0180,0x0187,0x018a,0x018f,0x0191,0x01a1,0x01a2,0x01a7,0x01ac,0x01b0,0x01b3
0361 0001 0002 | | .XXX[0x9]
0363 0003 0005 | |
0365 0006 0004 | |
0367 0007 0008 | |
0369 0009 | |
036a ; --------------------------------------------------------------------------------------
036a ; Debug chain
036a ; --------------------------------------------------------------------------------------
036a 0000 0002 | | .DBGLEN 0x0000,0x0002
036c 01bb 01bd | | .DBGLNO 0x01bb,0x01bd
036e ; --------------------------------------------------------------------------------------
036e ; Debug chain
036e ; --------------------------------------------------------------------------------------
036e 0000 0001 | | .DBGLEN 0x0000,0x0001
0370 01c3 | | .DBGLNO 0x01c3
0371 ; --------------------------------------------------------------------------------------
0371 ; Debug chain
0371 ; --------------------------------------------------------------------------------------
0371 0001 0004 | | .DBGLEN 0x0001,0x0004
0373 01e3 01f0 | | .DBGLNO 0x01e3,0x01f0,0x01f2,0x01f6,0x0201
0378 ; --------------------------------------------------------------------------------------
0378 ; Debug chain
0378 ; --------------------------------------------------------------------------------------
0378 0001 0004 | | .DBGLEN 0x0001,0x0004
037a 0213 0220 | | .DBGLNO 0x0213,0x0220,0x0222,0x0226,0x0231
037f ; --------------------------------------------------------------------------------------
037f ; Debug chain
037f ; --------------------------------------------------------------------------------------
037f 0001 0004 | | .DBGLEN 0x0001,0x0004
0381 0243 0250 | C P| .DBGLNO 0x0243,0x0250,0x0252,0x0256,0x0261
0386 ; --------------------------------------------------------------------------------------
0386 ; Debug chain
0386 ; --------------------------------------------------------------------------------------
0386 0001 0002 | | .DBGLEN 0x0001,0x0002
0388 0273 027a | s z| .DBGLNO 0x0273,0x027a,0x0280
038b 0000 0000 | | .BLANK 0000[0x75]