|
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_043cfb
└─⟦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 02a8 | | .CONST 0x02a8 ; 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 007e | ~ | .CONST 0x007e ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0029 | ) | .CONST 0x0029 ; Number of locals 000b INIT_0008: 000b 029a 0083 | | Declare_Subprogram INIT_0080,For_Outer_Call,Visible,Unelaborated 000d 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated 000f 029a 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call,Visible,Unelaborated 0011 029a 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call,Visible,Unelaborated 0013 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated 0015 029a 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Visible,Unelaborated 0017 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated 0019 029a 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call,Visible,Unelaborated 001b 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated 001d 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated 001f 029a 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Visible,Unelaborated 0021 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated 0023 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated 0025 029a 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call,Visible,Unelaborated 0027 029a 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call,Visible,Unelaborated 0029 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated 002b 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated 002d 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated 002f 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated 0031 029a 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call,Visible,Unelaborated 0033 029a 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call,Visible,Unelaborated 0035 029a 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call,Visible,Unelaborated 0037 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated 0039 029a 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call,Visible,Unelaborated 003b 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated 003d 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated 003f 029a 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call,Visible,Unelaborated 0041 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated 0043 00bf | | Action Accept_Activation 0044 029d 024b | K| Declare_Subprogram INIT_0248,For_Outer_Call 0046 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0047 00c7 | | Action Elaborate_Subprogram 0048 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0049 00c7 | | Action Elaborate_Subprogram 004a 1d0f | | Execute_Immediate Reference_Lex_1,0xf 004b 00c7 | | Action Elaborate_Subprogram 004c 1d10 | | Execute_Immediate Reference_Lex_1,0x10 004d 00c7 | | Action Elaborate_Subprogram 004e 1d11 | | Execute_Immediate Reference_Lex_1,0x11 004f 00c7 | | Action Elaborate_Subprogram 0050 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0051 00c7 | | Action Elaborate_Subprogram 0052 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0053 00c7 | | Action Elaborate_Subprogram 0054 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0055 00c7 | | Action Elaborate_Subprogram 0056 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0057 00c7 | | Action Elaborate_Subprogram 0058 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0059 00c7 | | Action Elaborate_Subprogram 005a 1d17 | | Execute_Immediate Reference_Lex_1,0x17 005b 00c7 | | Action Elaborate_Subprogram 005c 1d18 | | Execute_Immediate Reference_Lex_1,0x18 005d 00c7 | | Action Elaborate_Subprogram 005e 1d19 | | Execute_Immediate Reference_Lex_1,0x19 005f 00c7 | | Action Elaborate_Subprogram 0060 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 0061 00c7 | | Action Elaborate_Subprogram 0062 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 0063 00c7 | | Action Elaborate_Subprogram 0064 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0065 00c7 | | Action Elaborate_Subprogram 0066 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 0067 00c7 | | Action Elaborate_Subprogram 0068 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 0069 00c7 | | Action Elaborate_Subprogram 006a 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 006b 00c7 | | Action Elaborate_Subprogram 006c 1d20 | | Execute_Immediate Reference_Lex_1,0x20 006d 00c7 | | Action Elaborate_Subprogram 006e 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 006f 00c7 | | Action Elaborate_Subprogram 0070 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 0071 00c7 | | Action Elaborate_Subprogram 0072 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 0073 00c7 | | Action Elaborate_Subprogram 0074 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 0075 00c7 | | Action Elaborate_Subprogram 0076 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 0077 00c7 | | Action Elaborate_Subprogram 0078 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 0079 00c7 | | Action Elaborate_Subprogram 007a 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 007b 00c7 | | Action Elaborate_Subprogram 007c 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 007d 00c7 | | Action Elaborate_Subprogram 007e BODY_0008: 007e 00bc | | Action Signal_Activated 007f 00bb | | Action Signal_Completion 0080 ; -------------------------------------------------------------------------------------- 0080 ; SUBPROGRAM 0080 ; -------------------------------------------------------------------------------------- 0080 0083 | | .CONST 0x0083 ; Address of begin 0081 0004 | | .CONST 0x0004 ; Address of exception handler 0082 0001 | | .CONST 0x0001 ; Number of locals 0083 BODY_0080: 0083 INIT_0080: 0083 e5fd | | Load 0x2,-0x3 0084 4800 |H | Short_Literal 0x0 0085 0092 0275 | u| Action Push_String_Extended,0x275 ; "[Cdb_Maintenance." 0087 e5ff | | Load 0x2,-0x1 0088 01cc | | Execute Vector,Catenate 0089 0092 0276 | v| Action Push_String_Extended,0x276 ; " (" 008b 01cc | | Execute Vector,Catenate 008c e5fe | | Load 0x2,-0x2 008d 01cc | | Execute Vector,Catenate 008e 0092 0277 | w| Action Push_String_Extended,0x277 ; ");]" 0090 01cc | | Execute Vector,Catenate 0091 e001 | | Load 0x0,0x1 0092 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0093 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0094 0000 0000 | | .BLANK 0000[0x4] 0098 ; -------------------------------------------------------------------------------------- 0098 ; SUBPROGRAM 0098 ; -------------------------------------------------------------------------------------- 0098 009b | | .CONST 0x009b ; Address of begin 0099 0004 | | .CONST 0x0004 ; Address of exception handler 009a 0001 | | .CONST 0x0001 ; Number of locals 009b BODY_0098: 009b INIT_0098: 009b 00db | | Load_Top At_Offset_3 009c 4800 |H | Short_Literal 0x0 009d 0092 0278 | x| Action Push_String_Extended,0x278 ; "[End of Cdb_Maintenance." 009f e5ff | | Load 0x2,-0x1 00a0 01cc | | Execute Vector,Catenate 00a1 0092 0279 | y| Action Push_String_Extended,0x279 ; " command]" 00a3 01cc | | Execute Vector,Catenate 00a4 e001 | | Load 0x0,0x1 00a5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00a6 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00a7 0000 | | .XXX[0x1] 00a8 ; -------------------------------------------------------------------------------------- 00a8 ; SUBPROGRAM 00a8 ; -------------------------------------------------------------------------------------- 00a8 00ab | | .CONST 0x00ab ; Address of begin 00a9 0004 | | .CONST 0x0004 ; Address of exception handler 00aa 0001 | | .CONST 0x0001 ; Number of locals 00ab BODY_00a8: 00ab INIT_00a8: 00ab 00db | | Load_Top At_Offset_3 00ac 4802 |H | Short_Literal 0x2 00ad e5ff | | Load 0x2,-0x1 00ae e001 | | Load 0x0,0x1 00af 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00b0 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00b1 0000 0000 | | .BLANK 0000[0x7] 00b8 ; -------------------------------------------------------------------------------------- 00b8 ; SUBPROGRAM 00b8 ; -------------------------------------------------------------------------------------- 00b8 00bb | | .CONST 0x00bb ; Address of begin 00b9 0004 | | .CONST 0x0004 ; Address of exception handler 00ba 0001 | | .CONST 0x0001 ; Number of locals 00bb BODY_00b8: 00bb INIT_00b8: 00bb 00db | | Load_Top At_Offset_3 00bc 480b |H | Short_Literal 0xb 00bd e002 | | Load 0x0,0x2 00be 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00bf 00ea | | Load_Encached Null_String_Cache 00c0 e5ff | | Load 0x2,-0x1 00c1 e001 | | Load 0x0,0x1 00c2 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 00c3 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00c4 0000 0000 | | .BLANK 0000[0x4] 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; SUBPROGRAM 00c8 ; -------------------------------------------------------------------------------------- 00c8 00cb | | .CONST 0x00cb ; Address of begin 00c9 0004 | | .CONST 0x0004 ; Address of exception handler 00ca 0001 | | .CONST 0x0001 ; Number of locals 00cb BODY_00c8: 00cb INIT_00c8: 00cb e5fd | | Load 0x2,-0x3 00cc 4802 |H | Short_Literal 0x2 00cd e002 | | Load 0x0,0x2 00ce 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00cf e5ff | | Load 0x2,-0x1 00d0 e5fe | | Load 0x2,-0x2 00d1 e001 | | Load 0x0,0x1 00d2 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 00d3 4504 |E | Exit_Suprogram New_Top_Offset 0x4 00d4 0000 0000 | | .BLANK 0000[0x4] 00d8 ; -------------------------------------------------------------------------------------- 00d8 ; SUBPROGRAM 00d8 ; -------------------------------------------------------------------------------------- 00d8 00db | | .CONST 0x00db ; Address of begin 00d9 0004 | | .CONST 0x0004 ; Address of exception handler 00da 0001 | | .CONST 0x0001 ; Number of locals 00db BODY_00d8: 00db INIT_00d8: 00db e5fc | | Load 0x2,-0x4 00dc 4802 |H | Short_Literal 0x2 00dd e5fd | | Load 0x2,-0x3 00de e5ff | | Load 0x2,-0x1 00df e5fe | | Load 0x2,-0x2 00e0 e001 | | Load 0x0,0x1 00e1 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 00e2 4505 |E | Exit_Suprogram New_Top_Offset 0x5 00e3 0000 0000 | | .BLANK 0000[0x5] 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; SUBPROGRAM 00e8 ; -------------------------------------------------------------------------------------- 00e8 00eb | | .CONST 0x00eb ; Address of begin 00e9 0004 | | .CONST 0x0004 ; Address of exception handler 00ea 0001 | | .CONST 0x0001 ; Number of locals 00eb BODY_00e8: 00eb INIT_00e8: 00eb 00db | | Load_Top At_Offset_3 00ec 4806 |H | Short_Literal 0x6 00ed e5ff | | Load 0x2,-0x1 00ee e001 | | Load 0x0,0x1 00ef 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00f0 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00f1 0000 0000 | | .BLANK 0000[0x7] 00f8 ; -------------------------------------------------------------------------------------- 00f8 ; SUBPROGRAM 00f8 ; -------------------------------------------------------------------------------------- 00f8 00fb | | .CONST 0x00fb ; Address of begin 00f9 0004 | | .CONST 0x0004 ; Address of exception handler 00fa 0001 | | .CONST 0x0001 ; Number of locals 00fb BODY_00f8: 00fb INIT_00f8: 00fb e5fd | | Load 0x2,-0x3 00fc 4806 |H | Short_Literal 0x6 00fd e002 | | Load 0x0,0x2 00fe 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00ff e5ff | | Load 0x2,-0x1 0100 e5fe | | Load 0x2,-0x2 0101 e001 | | Load 0x0,0x1 0102 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0103 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0104 0000 0000 | | .BLANK 0000[0x4] 0108 ; -------------------------------------------------------------------------------------- 0108 ; SUBPROGRAM 0108 ; -------------------------------------------------------------------------------------- 0108 010b | | .CONST 0x010b ; Address of begin 0109 0004 | | .CONST 0x0004 ; Address of exception handler 010a 0001 | | .CONST 0x0001 ; Number of locals 010b BODY_0108: 010b INIT_0108: 010b e5fc | | Load 0x2,-0x4 010c 4806 |H | Short_Literal 0x6 010d e5fd | | Load 0x2,-0x3 010e e5ff | | Load 0x2,-0x1 010f e5fe | | Load 0x2,-0x2 0110 e001 | | Load 0x0,0x1 0111 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0112 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0113 0000 0000 | | .BLANK 0000[0x5] 0118 ; -------------------------------------------------------------------------------------- 0118 ; SUBPROGRAM 0118 ; -------------------------------------------------------------------------------------- 0118 011b | | .CONST 0x011b ; Address of begin 0119 0004 | | .CONST 0x0004 ; Address of exception handler 011a 0001 | | .CONST 0x0001 ; Number of locals 011b BODY_0118: 011b INIT_0118: 011b 00db | | Load_Top At_Offset_3 011c 4807 |H | Short_Literal 0x7 011d e5ff | | Load 0x2,-0x1 011e e001 | | Load 0x0,0x1 011f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0120 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0121 0000 0000 | | .BLANK 0000[0x7] 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 e5fd | | Load 0x2,-0x3 012c 4807 |H | Short_Literal 0x7 012d e002 | | Load 0x0,0x2 012e 1810 | | Execute Package,Field_Execute,Field_Number 0x10 012f e5ff | | Load 0x2,-0x1 0130 e5fe | | Load 0x2,-0x2 0131 e001 | | Load 0x0,0x1 0132 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0133 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0134 0000 0000 | | .BLANK 0000[0x4] 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 e5fc | | Load 0x2,-0x4 013c 4807 |H | Short_Literal 0x7 013d e5fd | | Load 0x2,-0x3 013e e5ff | | Load 0x2,-0x1 013f e5fe | | Load 0x2,-0x2 0140 e001 | | Load 0x0,0x1 0141 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0142 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0143 0000 0000 | | .BLANK 0000[0x5] 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 014b | K | .CONST 0x014b ; Address of begin 0149 0004 | | .CONST 0x0004 ; Address of exception handler 014a 0001 | | .CONST 0x0001 ; Number of locals 014b BODY_0148: 014b INIT_0148: 014b e5fc | | Load 0x2,-0x4 014c 4807 |H | Short_Literal 0x7 014d e5fd | | Load 0x2,-0x3 014e e5ff | | Load 0x2,-0x1 014f e5fe | | Load 0x2,-0x2 0150 e001 | | Load 0x0,0x1 0151 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0152 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0153 0000 0000 | | .BLANK 0000[0x5] 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 4805 |H | Short_Literal 0x5 015d e5ff | | Load 0x2,-0x1 015e e001 | | Load 0x0,0x1 015f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0160 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0161 0000 0000 | | .BLANK 0000[0x7] 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 e5fd | | Load 0x2,-0x3 016c e5fe | | Load 0x2,-0x2 016d e5ff | | Load 0x2,-0x1 016e 8229 | ) | Call 0x1,0x29 016f 821a | | Call 0x1,0x1a 0170 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0171 0000 0000 | | .BLANK 0000[0x7] 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 e5fc | | Load 0x2,-0x4 017c e5fd | | Load 0x2,-0x3 017d e5fe | | Load 0x2,-0x2 017e e5ff | | Load 0x2,-0x1 017f 8229 | ) | Call 0x1,0x29 0180 821d | | Call 0x1,0x1d 0181 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0182 0000 0000 | | .BLANK 0000[0x6] 0188 ; -------------------------------------------------------------------------------------- 0188 ; SUBPROGRAM 0188 ; -------------------------------------------------------------------------------------- 0188 018b | | .CONST 0x018b ; Address of begin 0189 0004 | | .CONST 0x0004 ; Address of exception handler 018a 0001 | | .CONST 0x0001 ; Number of locals 018b BODY_0188: 018b INIT_0188: 018b e5fd | | Load 0x2,-0x3 018c 4805 |H | Short_Literal 0x5 018d e002 | | Load 0x0,0x2 018e 1810 | | Execute Package,Field_Execute,Field_Number 0x10 018f e5ff | | Load 0x2,-0x1 0190 e5fe | | Load 0x2,-0x2 0191 e001 | | Load 0x0,0x1 0192 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0193 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0194 0000 0000 | | .BLANK 0000[0x4] 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 019b | | .CONST 0x019b ; Address of begin 0199 0004 | | .CONST 0x0004 ; Address of exception handler 019a 0001 | | .CONST 0x0001 ; Number of locals 019b BODY_0198: 019b INIT_0198: 019b e5fc | | Load 0x2,-0x4 019c 4805 |H | Short_Literal 0x5 019d e5fd | | Load 0x2,-0x3 019e e5ff | | Load 0x2,-0x1 019f e5fe | | Load 0x2,-0x2 01a0 e001 | | Load 0x0,0x1 01a1 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 01a2 4505 |E | Exit_Suprogram New_Top_Offset 0x5 01a3 0000 0000 | | .BLANK 0000[0x5] 01a8 ; -------------------------------------------------------------------------------------- 01a8 ; SUBPROGRAM 01a8 ; -------------------------------------------------------------------------------------- 01a8 01ab | | .CONST 0x01ab ; Address of begin 01a9 0004 | | .CONST 0x0004 ; Address of exception handler 01aa 0001 | | .CONST 0x0001 ; Number of locals 01ab BODY_01a8: 01ab INIT_01a8: 01ab 00db | | Load_Top At_Offset_3 01ac 4803 |H | Short_Literal 0x3 01ad e5ff | | Load 0x2,-0x1 01ae e001 | | Load 0x0,0x1 01af 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01b0 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01b1 0000 0000 | | .BLANK 0000[0x7] 01b8 ; -------------------------------------------------------------------------------------- 01b8 ; SUBPROGRAM 01b8 ; -------------------------------------------------------------------------------------- 01b8 01bb | | .CONST 0x01bb ; Address of begin 01b9 0004 | | .CONST 0x0004 ; Address of exception handler 01ba 0001 | | .CONST 0x0001 ; Number of locals 01bb BODY_01b8: 01bb INIT_01b8: 01bb e5fd | | Load 0x2,-0x3 01bc 4803 |H | Short_Literal 0x3 01bd e002 | | Load 0x0,0x2 01be 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01bf e5ff | | Load 0x2,-0x1 01c0 e5fe | | Load 0x2,-0x2 01c1 e001 | | Load 0x0,0x1 01c2 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 01c3 4504 |E | Exit_Suprogram New_Top_Offset 0x4 01c4 0000 0000 | | .BLANK 0000[0x4] 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 e5fc | | Load 0x2,-0x4 01cc 4803 |H | Short_Literal 0x3 01cd e5fd | | Load 0x2,-0x3 01ce e5ff | | Load 0x2,-0x1 01cf e5fe | | Load 0x2,-0x2 01d0 e001 | | Load 0x0,0x1 01d1 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 01d2 4505 |E | Exit_Suprogram New_Top_Offset 0x5 01d3 0000 0000 | | .BLANK 0000[0x5] 01d8 ; -------------------------------------------------------------------------------------- 01d8 ; SUBPROGRAM 01d8 ; -------------------------------------------------------------------------------------- 01d8 01db | | .CONST 0x01db ; Address of begin 01d9 0004 | | .CONST 0x0004 ; Address of exception handler 01da 0001 | | .CONST 0x0001 ; Number of locals 01db BODY_01d8: 01db INIT_01d8: 01db 00db | | Load_Top At_Offset_3 01dc 4801 |H | Short_Literal 0x1 01dd e5ff | | Load 0x2,-0x1 01de e001 | | Load 0x0,0x1 01df 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01e0 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01e1 0000 0000 | | .BLANK 0000[0x7] 01e8 ; -------------------------------------------------------------------------------------- 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 INIT_01e8: 01eb e5fd | | Load 0x2,-0x3 01ec 4801 |H | Short_Literal 0x1 01ed e002 | | Load 0x0,0x2 01ee 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01ef e5ff | | Load 0x2,-0x1 01f0 e5fe | | Load 0x2,-0x2 01f1 e001 | | Load 0x0,0x1 01f2 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 01f3 4504 |E | Exit_Suprogram New_Top_Offset 0x4 01f4 0000 0000 | | .BLANK 0000[0x4] 01f8 ; -------------------------------------------------------------------------------------- 01f8 ; SUBPROGRAM 01f8 ; -------------------------------------------------------------------------------------- 01f8 01fb | | .CONST 0x01fb ; Address of begin 01f9 0004 | | .CONST 0x0004 ; Address of exception handler 01fa 0001 | | .CONST 0x0001 ; Number of locals 01fb BODY_01f8: 01fb INIT_01f8: 01fb e5fc | | Load 0x2,-0x4 01fc 4801 |H | Short_Literal 0x1 01fd e5fd | | Load 0x2,-0x3 01fe e5ff | | Load 0x2,-0x1 01ff e5fe | | Load 0x2,-0x2 0200 e001 | | Load 0x0,0x1 0201 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0202 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0203 0000 0000 | | .BLANK 0000[0x5] 0208 ; -------------------------------------------------------------------------------------- 0208 ; SUBPROGRAM 0208 ; -------------------------------------------------------------------------------------- 0208 020b | | .CONST 0x020b ; Address of begin 0209 0004 | | .CONST 0x0004 ; Address of exception handler 020a 0001 | | .CONST 0x0001 ; Number of locals 020b BODY_0208: 020b INIT_0208: 020b e5fc | | Load 0x2,-0x4 020c 4801 |H | Short_Literal 0x1 020d e5fd | | Load 0x2,-0x3 020e e5ff | | Load 0x2,-0x1 020f e5fe | | Load 0x2,-0x2 0210 e001 | | Load 0x0,0x1 0211 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0212 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0213 0000 0000 | | .BLANK 0000[0x5] 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 4801 |H | Short_Literal 0x1 021d e5fe | | Load 0x2,-0x2 021e e5ff | | Load 0x2,-0x1 021f 8229 | ) | Call 0x1,0x29 0220 e001 | | Load 0x0,0x1 0221 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0222 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0223 0000 0000 | | .BLANK 0000[0x5] 0228 ; -------------------------------------------------------------------------------------- 0228 ; SUBPROGRAM 0228 ; -------------------------------------------------------------------------------------- 0228 022b | + | .CONST 0x022b ; Address of begin 0229 0004 | | .CONST 0x0004 ; Address of exception handler 022a 0001 | | .CONST 0x0001 ; Number of locals 022b BODY_0228: 022b INIT_0228: 022b e5fc | | Load 0x2,-0x4 022c 4801 |H | Short_Literal 0x1 022d e002 | | Load 0x0,0x2 022e 1810 | | Execute Package,Field_Execute,Field_Number 0x10 022f e5fe | | Load 0x2,-0x2 0230 e5ff | | Load 0x2,-0x1 0231 8229 | ) | Call 0x1,0x29 0232 e5fd | | Load 0x2,-0x3 0233 e001 | | Load 0x0,0x1 0234 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0235 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0236 0000 0000 | | .XXX[0x2] 0238 ; -------------------------------------------------------------------------------------- 0238 ; SUBPROGRAM 0238 ; -------------------------------------------------------------------------------------- 0238 023b | ; | .CONST 0x023b ; Address of begin 0239 0004 | | .CONST 0x0004 ; Address of exception handler 023a 0001 | | .CONST 0x0001 ; Number of locals 023b BODY_0238: 023b INIT_0238: 023b 00da | | Load_Top At_Offset_2 023c 4808 |H | Short_Literal 0x8 023d 0092 027a | z| Action Push_String_Extended,0x27a ; "Unhandled exception " 023f e003 | | Load 0x0,0x3 0240 180d | | Execute Package,Field_Execute,Field_Number 0xd 0241 01cc | | Execute Vector,Catenate 0242 e001 | | Load 0x0,0x1 0243 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0244 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0245 0000 0000 | | .XXX[0x3] 0247 0000 | | 0248 ; -------------------------------------------------------------------------------------- 0248 ; SUBPROGRAM 0248 ; -------------------------------------------------------------------------------------- 0248 024b | K | .CONST 0x024b ; Address of begin 0249 0004 | | .CONST 0x0004 ; Address of exception handler 024a 0001 | | .CONST 0x0001 ; Number of locals 024b BODY_0248: 024b INIT_0248: 024b 00da | | Load_Top At_Offset_2 024c 0f01 | | Execute_Immediate Equal,0x1 024d 681c |h | Jump_Zero 0x26a 024e 00db | | Load_Top At_Offset_3 024f 01dc | | Execute Vector,Last 0250 e5fe | | Load 0x2,-0x2 0251 01d7 | | Execute Vector,Field_Read 0252 0f73 | s | Execute_Immediate Equal,0x73 0253 6816 |h | Jump_Zero 0x26a 0254 4820 |H | Short_Literal 0x20 0255 4820 |H | Short_Literal 0x20 0256 4803 |H | Short_Literal 0x3 0257 480a |H | Short_Literal 0xa 0258 e5ff | | Load 0x2,-0x1 0259 e004 | | Load 0x0,0x4 025a 1816 | | Execute Package,Field_Execute,Field_Number 0x16 025b 01cb | | Execute Vector,Append 025c e5fe | | Load 0x2,-0x2 025d 01dd | | Execute Vector,First 025e e5fe | | Load 0x2,-0x2 025f 01dc | | Execute Vector,Last 0260 0aff | | Execute_Immediate Plus,-0x1 0261 00d8 | | Load_Top At_Offset_0 0262 00e2 | | Load_Encached Integer_Cache 0263 0260 | ` | Execute Discrete,In_Type 0264 7001 |p | Jump_Nonzero 0x266 0265 0801 | | Execute_Immediate Raise,0x1 0266 e5fe | | Load 0x2,-0x2 0267 01cf | | Execute Vector,Slice_Read 0268 01cc | | Execute Vector,Catenate 0269 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 026a 4820 |H | Short_Literal 0x20 026b 4820 |H | Short_Literal 0x20 026c 4803 |H | Short_Literal 0x3 026d 480a |H | Short_Literal 0xa 026e e5ff | | Load 0x2,-0x1 026f e004 | | Load 0x0,0x4 0270 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0271 01cb | | Execute Vector,Append 0272 e5fe | | Load 0x2,-0x2 0273 01cc | | Execute Vector,Catenate 0274 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0275 ; -------------------------------------------------------------------------------------- 0275 ; STRING TABLE 0275 ; -------------------------------------------------------------------------------------- 0275 000e | | .STRTAB 0x000e->0x027c ; "[Cdb_Maintenance." 0276 001d | | .STRTAB 0x001d->0x0284 ; " (" 0277 001d | | .STRTAB 0x001d->0x0285 ; ");]" 0278 001e | | .STRTAB 0x001e->0x0287 ; "[End of Cdb_Maintenance." 0279 0034 | 4 | .STRTAB 0x0034->0x0293 ; " command]" 027a 003b | ; | .STRTAB 0x003b->0x0297 ; "Unhandled exception " 027b 004d | M | .STREND 0x004d->0x02a1 027c 5b43 6462 |[Cdb| .STRTAB_STRINGS 02a2 0000 0000 | | .BLANK 0000[0x6] 02a8 ; -------------------------------------------------------------------------------------- 02a8 ; Debug Table 02a8 ; -------------------------------------------------------------------------------------- 02a8 0004 000f | | .DEBUG4 0x0004,0x000f,0x4b38,0x0000,0x0001,0x0000 02ae 0000 0000 | | .BLANK 0000[0xa] 02b8 00c0 0002 | | .XXX[0x91] 02ba cc90 1803 | | 02bc 8e80 0000 | | 02be 0736 c970 | 6 p| 02c0 1000 8000 | | 02c2 0800 0000 | | 02c4 04a0 c000 | | 02c6 0400 0000 | | 02c8 1100 2800 | ( | 02ca 0000 0800 | | 02cc 0002 0000 | | 02ce 0011 0000 | | 02d0 0000 0800 | | 02d2 0000 5200 | R | 02d4 0008 0acd | | 02d6 9a00 0008 | | 02d8 0acd a200 | | 02da 0008 0a21 | !| 02dc 1a00 0008 | | 02de 0acd a800 | | 02e0 0000 0000 | | 02e2 0200 0008 | | 02e4 0acd b200 | | 02e6 0008 0acd | | 02e8 5a00 0008 |Z | 02ea 0a21 2200 | !" | 02ec 0008 0acd | | 02ee b800 0000 | | 02f0 0000 0008 | | 02f2 0000 4612 | F | 02f4 0300 71d2 | q | 02f6 0000 00e4 | | 02f8 a92e 0200 | . | 02fa 1000 0100 | | 02fc 0000 0094 | | 02fe 1800 00a0 | | 0300 0000 0220 | | 0302 0500 0000 | | 0304 0100 0000 | | 0306 4000 0002 |@ | 0308 2000 0000 | | 030a 0100 0000 | | 030c 0a40 0004 | @ | 030e 021c cf40 | @| 0310 0004 021c | | 0312 db40 0001 | @ | 0314 0144 2340 | D#@| 0316 0004 021c | | 0318 dc00 0000 | | 031a 0000 0040 | @| 031c 0004 021c | | 031e de40 0001 | @ | 0320 0159 ab40 | Y @| 0322 0001 0144 | D| 0324 2440 0004 |$@ | 0326 021c e000 | | 0328 0000 0000 | | 032a 0001 0000 | | 032c 08c2 4060 | @`| 032e 0e3a 8000 | : | 0330 001c db26 | &| 0332 4040 0200 |@@ | 0334 0148 0000 | H | 0336 000c 6100 | a | 0338 0008 0000 | | 033a 000c 00a0 | | 033c 0000 0020 | | 033e 0000 0800 | | 0340 0000 4400 | D | 0342 0000 0020 | | 0344 0000 0148 | H| 0346 0000 4043 | @C| 0348 9ce0 | | 0349 0000 0000 | | .BLANK 0000[0x1b] 0364 6000 0552 |` R| .XXX[0x1e] 0366 c80c 01c7 | | 0368 5800 0003 |X | 036a 9b44 c808 | D | 036c 0040 0029 | @ )| 036e 0000 0001 | | 0370 8c20 0002 | | 0372 0000 0001 | | 0374 8014 0000 | | 0376 0004 0000 | | 0378 0100 0000 | | 037a 0880 0000 | | 037c 0004 0000 | | 037e 0029 0000 | ) | 0380 0808 739c | s | 0382 0000 0000 | | .BLANK 0000[0x1b] 039d 0c00 00aa | | .XXX[0x1f] 039f 5d01 8038 |] 8| 03a1 ec00 0000 | | 03a3 7368 9901 |sh | 03a5 0008 0005 | | 03a7 2000 0000 | | 03a9 3184 0000 |1 | 03ab 4000 0000 |@ | 03ad 3002 8000 |0 | 03af 0000 8000 | | 03b1 0020 0000 | | 03b3 0110 0000 | | 03b5 0000 8000 | | 03b7 0005 2000 | | 03b9 0201 0e90 | | 03bb 8000 | | 03bc 0000 0000 | | .BLANK 0000[0x1a] 03d6 0180 0015 | | .XXX[0x3] 03d8 4b00 |K | 03d9 0000 0000 | | .BLANK 0000[0x27]