|
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: 1024 (0x400) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5850da
└─⟦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 01f8 | | .CONST 0x01f8 ; 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 0056 | V | .CONST 0x0056 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 001e | | .CONST 0x001e ; Number of locals 000b INIT_0008: 000b 4800 |H | Short_Literal 0x0 000c 4801 |H | Short_Literal 0x1 000d 029f 005b | [| Declare_Subprogram INIT_0058,For_Call 000f 03fe | | Declare_Type Discrete,Defined,Visible 0010 4800 |H | Short_Literal 0x0 0011 4803 |H | Short_Literal 0x3 0012 029f 0083 | | Declare_Subprogram INIT_0080,For_Call 0014 03fe | | Declare_Type Discrete,Defined,Visible 0015 00c4 | | Action Make_Default 0016 00c4 | | Action Make_Default 0017 00c4 | | Action Make_Default 0018 00c4 | | Action Make_Default 0019 00c4 | | Action Make_Default 001a 00c4 | | Action Make_Default 001b 00c4 | | Action Make_Default 001c 00c4 | | Action Make_Default 001d 00c4 | | Action Make_Default 001e 00c4 | | Action Make_Default 001f 00c4 | | Action Make_Default 0020 00c4 | | Action Make_Default 0021 029a 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call,Visible,Unelaborated 0023 c218 | | Store 0x1,0x18 0024 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated 0026 c219 | | Store 0x1,0x19 0027 029a 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Visible,Unelaborated 0029 c21a | | Store 0x1,0x1a 002a 00bf | | Action Accept_Activation 002b 4800 |H | Short_Literal 0x0 002c 4804 |H | Short_Literal 0x4 002d e20e | | Load 0x1,0xe 002e 02a0 | | Declare_Subprogram Null_Subprogram 002f 4801 |H | Short_Literal 0x1 0030 035d | ] | Declare_Type Array,Defined 0031 00d8 | | Load_Top At_Offset_0 0032 0337 | 7 | Declare_Variable Array 0033 00d8 | | Load_Top At_Offset_0 0034 0335 | 5 | Declare_Variable Array,Duplicate 0035 00cd | | Action Spare6_Action 0036 4801 |H | Short_Literal 0x1 0037 4800 |H | Short_Literal 0x0 0038 00da | | Load_Top At_Offset_2 0039 01d6 | | Execute Vector,Field_Write 003a 4800 |H | Short_Literal 0x0 003b 4801 |H | Short_Literal 0x1 003c 00da | | Load_Top At_Offset_2 003d 01d6 | | Execute Vector,Field_Write 003e 4802 |H | Short_Literal 0x2 003f 4802 |H | Short_Literal 0x2 0040 00da | | Load_Top At_Offset_2 0041 01d6 | | Execute Vector,Field_Write 0042 4801 |H | Short_Literal 0x1 0043 4803 |H | Short_Literal 0x3 0044 00da | | Load_Top At_Offset_2 0045 01d6 | | Execute Vector,Field_Write 0046 4803 |H | Short_Literal 0x3 0047 4804 |H | Short_Literal 0x4 0048 00da | | Load_Top At_Offset_2 0049 01d6 | | Execute Vector,Field_Write 004a 00d9 | | Load_Top At_Offset_1 004b 01d4 | | Execute Vector,Structure_Write 004c 029d 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call 004e 029d 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call 0050 1d18 | | Execute_Immediate Reference_Lex_1,0x18 0051 00c7 | | Action Elaborate_Subprogram 0052 1d19 | | Execute_Immediate Reference_Lex_1,0x19 0053 00c7 | | Action Elaborate_Subprogram 0054 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 0055 00c7 | | Action Elaborate_Subprogram 0056 BODY_0008: 0056 00bc | | Action Signal_Activated 0057 00bb | | Action Signal_Completion 0058 ; -------------------------------------------------------------------------------------- 0058 ; SUBPROGRAM 0058 ; -------------------------------------------------------------------------------------- 0058 005b | [ | .CONST 0x005b ; Address of begin 0059 0004 | | .CONST 0x0004 ; Address of exception handler 005a 0001 | | .CONST 0x0001 ; Number of locals 005b BODY_0058: 005b INIT_0058: 005b 4607 |F | Jump_Case 0x8 005c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 005d 7806 |x | Jump 0x64 ; case 0x1 005e 7809 |x | Jump 0x68 ; case 0x2 005f 780d |x | Jump 0x6d ; case 0x3 0060 7810 |x | Jump 0x71 ; case 0x4 0061 7811 |x | Jump 0x73 ; case 0x5 0062 7812 |x | Jump 0x75 ; case 0x6 0063 7815 |x | Jump 0x79 ; case 0x7 0064 00da | | Load_Top At_Offset_2 0065 0091 01b5 | | Action Push_String_Extended_Indexed,0x1b5 ; "STATUS_COMMAND" 0067 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0068 00db | | Load_Top At_Offset_3 0069 00db | | Load_Top At_Offset_3 006a 00e0 | | Load_Encached Standard_Cache 006b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 006c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 006d 00da | | Load_Top At_Offset_2 006e 00e0 | | Load_Encached Standard_Cache 006f 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0070 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0071 00db | | Load_Top At_Offset_3 0072 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0073 00db | | Load_Top At_Offset_3 0074 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0075 e20d | | Load 0x1,0xd 0076 00dc | | Load_Top At_Offset_4 0077 0267 | g | Execute Discrete,Predecessor 0078 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0079 e20d | | Load 0x1,0xd 007a 00dc | | Load_Top At_Offset_4 007b 0268 | h | Execute Discrete,Successor 007c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 007d 0000 0000 | | .XXX[0x3] 007f 0000 | | 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 4607 |F | Jump_Case 0x8 0084 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0085 7806 |x | Jump 0x8c ; case 0x1 0086 7809 |x | Jump 0x90 ; case 0x2 0087 780d |x | Jump 0x95 ; case 0x3 0088 7810 |x | Jump 0x99 ; case 0x4 0089 7811 |x | Jump 0x9b ; case 0x5 008a 7812 |x | Jump 0x9d ; case 0x6 008b 7815 |x | Jump 0xa1 ; case 0x7 008c 00da | | Load_Top At_Offset_2 008d 0091 01b7 | | Action Push_String_Extended_Indexed,0x1b7 ; "SUCCESS" 008f 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0090 00db | | Load_Top At_Offset_3 0091 00db | | Load_Top At_Offset_3 0092 00e0 | | Load_Encached Standard_Cache 0093 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0094 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0095 00da | | Load_Top At_Offset_2 0096 00e0 | | Load_Encached Standard_Cache 0097 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0098 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0099 00db | | Load_Top At_Offset_3 009a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 009b 00db | | Load_Top At_Offset_3 009c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 009d e20e | | Load 0x1,0xe 009e 00dc | | Load_Top At_Offset_4 009f 0267 | g | Execute Discrete,Predecessor 00a0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00a1 e20e | | Load 0x1,0xe 00a2 00dc | | Load_Top At_Offset_4 00a3 0268 | h | Execute Discrete,Successor 00a4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00a5 0000 0000 | | .XXX[0x3] 00a7 0000 | | 00a8 ; -------------------------------------------------------------------------------------- 00a8 ; SUBPROGRAM 00a8 ; -------------------------------------------------------------------------------------- 00a8 00b7 | | .CONST 0x00b7 ; Address of begin 00a9 0004 | | .CONST 0x0004 ; Address of exception handler 00aa 0004 | | .CONST 0x0004 ; Number of locals 00ab INIT_00a8: 00ab e20e | | Load 0x1,0xe 00ac 0007 | | Action Break_Optional 00ad 00e3 | | Load_Encached Natural_Cache 00ae 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 00af 0092 01bb | | Action Push_String_Extended,0x1bb ; " " 00b1 4820 |H | Short_Literal 0x20 00b2 e5ff | | Load 0x2,-0x1 00b3 e001 | | Load 0x0,0x1 00b4 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00b5 01cc | | Execute Vector,Catenate 00b6 0007 | | Action Break_Optional 00b7 BODY_00a8: 00b7 e5fd | | Load 0x2,-0x3 00b8 e5fe | | Load 0x2,-0x2 00b9 e5ff | | Load 0x2,-0x1 00ba 821d | | Call 0x1,0x1d 00bb 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 00bc 00da | | Load_Top At_Offset_2 00bd 7005 |p | Jump_Nonzero 0xc3 00be e5fd | | Load 0x2,-0x3 00bf e5fe | | Load 0x2,-0x2 00c0 e5ff | | Load 0x2,-0x1 00c1 821e | | Call 0x1,0x1e 00c2 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 00c3 00da | | Load_Top At_Offset_2 00c4 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 00c5 0000 0000 | | .XXX[0x3] 00c7 0000 | | 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 00db | | Load_Top At_Offset_3 00cc 0f01 | | Execute_Immediate Equal,0x1 00cd 7005 |p | Jump_Nonzero 0xd3 00ce e5fc | | Load 0x2,-0x4 00cf e5fd | | Load 0x2,-0x3 00d0 e5ff | | Load 0x2,-0x1 00d1 821a | | Call 0x1,0x1a 00d2 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 00d3 e5fc | | Load 0x2,-0x4 00d4 e5fd | | Load 0x2,-0x3 00d5 e5ff | | Load 0x2,-0x1 00d6 8218 | | Call 0x1,0x18 00d7 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 00d8 ; -------------------------------------------------------------------------------------- 00d8 ; SUBPROGRAM 00d8 ; -------------------------------------------------------------------------------------- 00d8 00e6 | | .CONST 0x00e6 ; Address of begin 00d9 0147 | G | .CONST 0x0147 ; Address of exception handler 00da 0007 | | .CONST 0x0007 ; Number of locals 00db INIT_00d8: 00db 00e3 | | Load_Encached Natural_Cache 00dc 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 00dd 480a |H | Short_Literal 0xa 00de e5ff | | Load 0x2,-0x1 00df e001 | | Load 0x0,0x1 00e0 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00e1 00e3 | | Load_Encached Natural_Cache 00e2 00e1 | | Load_Encached Boolean_Cache 00e3 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 00e4 00e2 | | Load_Encached Integer_Cache 00e5 00e2 | | Load_Encached Integer_Cache 00e6 BODY_00d8: 00e6 e5fe | | Load 0x2,-0x2 00e7 e002 | | Load 0x0,0x2 00e8 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 00e9 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 00ea e5fe | | Load 0x2,-0x2 00eb e002 | | Load 0x0,0x2 00ec 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 00ed 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 00ee 00d8 | | Load_Top At_Offset_0 00ef 7002 |p | Jump_Nonzero 0xf2 00f0 4801 |H | Short_Literal 0x1 00f1 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 00f2 e403 | | Load 0x2,0x3 00f3 01db | | Execute Vector,Length 00f4 00da | | Load_Top At_Offset_2 00f5 00da | | Load_Top At_Offset_2 00f6 0273 | s | Execute Discrete,Plus 00f7 0aff | | Execute_Immediate Plus,-0x1 00f8 027c | | | Execute Discrete,Less 00f9 6802 |h | Jump_Zero 0xfc 00fa 4800 |H | Short_Literal 0x0 00fb 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 00fc e5fd | | Load 0x2,-0x3 00fd 0f00 | | Execute_Immediate Equal,0x0 00fe e5fd | | Load 0x2,-0x3 00ff 0e01 | | Execute_Immediate Not_Equal,0x1 0100 0278 | x | Execute Discrete,Or 0101 681d |h | Jump_Zero 0x11f 0102 00e1 | | Load_Encached Boolean_Cache 0103 00e2 | | Load_Encached Integer_Cache 0104 480a |H | Short_Literal 0xa 0105 e406 | | Load 0x2,0x6 0106 00d8 | | Load_Top At_Offset_0 0107 e407 | | Load 0x2,0x7 0108 0273 | s | Execute Discrete,Plus 0109 0aff | | Execute_Immediate Plus,-0x1 010a 00d8 | | Load_Top At_Offset_0 010b 00e2 | | Load_Encached Integer_Cache 010c 0260 | ` | Execute Discrete,In_Type 010d 7001 |p | Jump_Nonzero 0x10f 010e 0801 | | Execute_Immediate Raise,0x1 010f e5ff | | Load 0x2,-0x1 0110 01cf | | Execute Vector,Slice_Read 0111 e001 | | Load 0x0,0x1 0112 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0113 c404 | | Store 0x2,0x4 0114 005b | [ | Store_Top Discrete,At_Offset_3 0115 00da | | Load_Top At_Offset_2 0116 6806 |h | Jump_Zero 0x11d 0117 00db | | Load_Top At_Offset_3 0118 7002 |p | Jump_Nonzero 0x11b 0119 4800 |H | Short_Literal 0x0 011a 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 011b 4802 |H | Short_Literal 0x2 011c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 011d 4800 |H | Short_Literal 0x0 011e 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 011f e5fd | | Load 0x2,-0x3 0120 0f01 | | Execute_Immediate Equal,0x1 0121 6823 |h# | Jump_Zero 0x145 0122 00e1 | | Load_Encached Boolean_Cache 0123 00e2 | | Load_Encached Integer_Cache 0124 480a |H | Short_Literal 0xa 0125 e406 | | Load 0x2,0x6 0126 00d8 | | Load_Top At_Offset_0 0127 e407 | | Load 0x2,0x7 0128 0273 | s | Execute Discrete,Plus 0129 0aff | | Execute_Immediate Plus,-0x1 012a 00d8 | | Load_Top At_Offset_0 012b 00e2 | | Load_Encached Integer_Cache 012c 0260 | ` | Execute Discrete,In_Type 012d 7001 |p | Jump_Nonzero 0x12f 012e 0801 | | Execute_Immediate Raise,0x1 012f e5ff | | Load 0x2,-0x1 0130 01cf | | Execute Vector,Slice_Read 0131 e001 | | Load 0x0,0x1 0132 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0133 c404 | | Store 0x2,0x4 0134 005b | [ | Store_Top Discrete,At_Offset_3 0135 00da | | Load_Top At_Offset_2 0136 680c |h | Jump_Zero 0x143 0137 00db | | Load_Top At_Offset_3 0138 0c00 | | Execute_Immediate Greater_Equal,0x0 0139 e404 | | Load 0x2,0x4 013a 0d05 | | Execute_Immediate Less,0x5 013b 0279 | y | Execute Discrete,And 013c 6804 |h | Jump_Zero 0x141 013d 00db | | Load_Top At_Offset_3 013e e21c | | Load 0x1,0x1c 013f 01d7 | | Execute Vector,Field_Read 0140 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0141 4802 |H | Short_Literal 0x2 0142 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0143 4800 |H | Short_Literal 0x0 0144 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0145 4800 |H | Short_Literal 0x0 0146 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0147 TRAP_00d8: 0147 010e | | Execute Exception,Is_Constraint_Error 0148 6809 |h | Jump_Zero 0x152 0149 e003 | | Load 0x0,0x3 014a 180e | | Execute Package,Field_Execute,Field_Number 0xe 014b 4806 |H | Short_Literal 0x6 014c 0092 01bc | | Action Push_String_Extended,0x1bc ; "Unexpected output for compilation success check" 014e e004 | | Load 0x0,0x4 014f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0150 4801 |H | Short_Literal 0x1 0151 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0152 0100 | | Execute Exception,Raise 0153 0000 0000 | | .BLANK 0000[0x5] 0158 ; -------------------------------------------------------------------------------------- 0158 ; SUBPROGRAM 0158 ; -------------------------------------------------------------------------------------- 0158 015d | ] | .CONST 0x015d ; Address of begin 0159 0004 | | .CONST 0x0004 ; Address of exception handler 015a 0002 | | .CONST 0x0002 ; Number of locals 015b INIT_0158: 015b 029f 017b | {| Declare_Subprogram INIT_0178,For_Call 015d BODY_0158: 015d e5fe | | Load 0x2,-0x2 015e e002 | | Load 0x0,0x2 015f 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0160 6801 |h | Jump_Zero 0x162 0161 8402 | | Call 0x2,0x2 0162 4800 |H | Short_Literal 0x0 0163 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0164 0000 0000 | | .BLANK 0000[0x4] 0168 ; -------------------------------------------------------------------------------------- 0168 ; SUBPROGRAM 0168 ; -------------------------------------------------------------------------------------- 0168 016d | m | .CONST 0x016d ; Address of begin 0169 0004 | | .CONST 0x0004 ; Address of exception handler 016a 0002 | | .CONST 0x0002 ; Number of locals 016b INIT_0168: 016b 029f 019b | | Declare_Subprogram INIT_0198,For_Call 016d BODY_0168: 016d e5fe | | Load 0x2,-0x2 016e e002 | | Load 0x0,0x2 016f 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0170 6801 |h | Jump_Zero 0x172 0171 8402 | | Call 0x2,0x2 0172 4800 |H | Short_Literal 0x0 0173 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0174 0000 0000 | | .BLANK 0000[0x4] 0178 ; -------------------------------------------------------------------------------------- 0178 ; SUBPROGRAM 0178 ; -------------------------------------------------------------------------------------- 0178 017e | ~ | .CONST 0x017e ; Address of begin 0179 0004 | | .CONST 0x0004 ; Address of exception handler 017a 0002 | | .CONST 0x0002 ; Number of locals 017b INIT_0178: 017b e5fe | | Load 0x2,-0x2 017c e002 | | Load 0x0,0x2 017d 181c | | Execute Package,Field_Execute,Field_Number 0x1c 017e BODY_0178: 017e 00cf | | Action Mark_Auxiliary 017f 00d9 | | Load_Top At_Offset_1 0180 01dc | | Execute Vector,Last 0181 00da | | Load_Top At_Offset_2 0182 01dd | | Execute Vector,First 0183 0263 | c | Execute Discrete,Above_Bound 0184 700f |p | Jump_Nonzero 0x194 0185 4801 |H | Short_Literal 0x1 0186 e5ff | | Load 0x2,-0x1 0187 00da | | Load_Top At_Offset_2 0188 e602 | | Load 0x3,0x2 0189 01d7 | | Execute Vector,Field_Read 018a e002 | | Load 0x0,0x2 018b 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 018c e001 | | Load 0x0,0x1 018d 181d | | Execute Package,Field_Execute,Field_Number 0x1d 018e 6803 |h | Jump_Zero 0x192 018f 4802 |H | Short_Literal 0x2 0190 00cb | | Action Pop_Block_With_Result 0191 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0192 00c8 | | Action Pop_Auxiliary_Range 0193 3ff1 |? | Loop_Increasing 0x185 0194 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0195 0000 0000 | | .XXX[0x3] 0197 0000 | | 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 019e | | .CONST 0x019e ; Address of begin 0199 0004 | | .CONST 0x0004 ; Address of exception handler 019a 0002 | | .CONST 0x0002 ; Number of locals 019b INIT_0198: 019b e5fe | | Load 0x2,-0x2 019c e002 | | Load 0x0,0x2 019d 181e | | Execute Package,Field_Execute,Field_Number 0x1e 019e BODY_0198: 019e 00cf | | Action Mark_Auxiliary 019f 00d9 | | Load_Top At_Offset_1 01a0 01dc | | Execute Vector,Last 01a1 00da | | Load_Top At_Offset_2 01a2 01dd | | Execute Vector,First 01a3 0263 | c | Execute Discrete,Above_Bound 01a4 700f |p | Jump_Nonzero 0x1b4 01a5 4801 |H | Short_Literal 0x1 01a6 e5ff | | Load 0x2,-0x1 01a7 00da | | Load_Top At_Offset_2 01a8 e602 | | Load 0x3,0x2 01a9 01d7 | | Execute Vector,Field_Read 01aa e002 | | Load 0x0,0x2 01ab 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 01ac e001 | | Load 0x0,0x1 01ad 181d | | Execute Package,Field_Execute,Field_Number 0x1d 01ae 6803 |h | Jump_Zero 0x1b2 01af 4801 |H | Short_Literal 0x1 01b0 00cb | | Action Pop_Block_With_Result 01b1 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 01b2 00c8 | | Action Pop_Auxiliary_Range 01b3 3ff1 |? | Loop_Increasing 0x1a5 01b4 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01b5 ; -------------------------------------------------------------------------------------- 01b5 ; STRING TABLE 01b5 ; -------------------------------------------------------------------------------------- 01b5 0012 | | .STRTAB 0x0012->0x01be ; "STATUS_COMMAND" 01b6 001e | | .STRTAB 0x001e->0x01c5 ; "REMOTE_COMMAND" 01b7 002a | * | .STRTAB 0x002a->0x01cc ; "SUCCESS" 01b8 002f | / | .STRTAB 0x002f->0x01cf ; "WARNING" 01b9 0034 | 4 | .STRTAB 0x0034->0x01d3 ; "ERROR" 01ba 0037 | 7 | .STRTAB 0x0037->0x01d5 ; "FATAL_ERROR" 01bb 0040 | @ | .STRTAB 0x0040->0x01db ; " " 01bc 003f | ? | .STRTAB 0x003f->0x01db ; "Unexpected output for compilation success check" 01bd 006c | l | .STREND 0x006c->0x01f3 01be 5354 4154 |STAT| .STRTAB_STRINGS 01f3 0000 0000 | | .BLANK 0000[0x5] 01f8 ; -------------------------------------------------------------------------------------- 01f8 ; Debug Table 01f8 ; -------------------------------------------------------------------------------------- 01f8 0004 000c | | .DEBUG4 0x0004,0x000c,0xc980,0x0000,0x0001,0x0000 01fe 360f 4000 |6 @ | .XXX[0x2]