|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 2048 (0x800)
Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_9c60c7
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 01f0 | | .CONST 0x01f0 ; 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 003f | ? | .CONST 0x003f ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0019 | | .CONST 0x0019 ; Number of locals
000b INIT_0008:
000b 029a 004b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0048
000d 029a 005b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0058
000f 029a 006b | k| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0068
0011 029a 007b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0078
0013 029a 008b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0088
0015 029a 00ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00a8
0017 029a 00cb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00c8
0019 029a 00f3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00f0
001b 029a 0103 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0100
001d 029a 012b | +| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0128
001f 029a 0133 | 3| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0130
0021 0093 0000 | | PushFullAddress InMicrocode
0023 6030 |`0 | Indirect_Literal Discrete,0x54,{0x80000000, 0x00010000}
0024 0273 | s | Execute Discrete,Plus
0025 0129 | ) | Execute Any,Make_Visible
0026 00bf | | Action Accept_Activation
0027 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0028 00c7 | | Action Elaborate_Subprogram
0029 1d0e | | Execute_Immediate Reference_Lex_1,0xe
002a 00c7 | | Action Elaborate_Subprogram
002b 1d0f | | Execute_Immediate Reference_Lex_1,0xf
002c 00c7 | | Action Elaborate_Subprogram
002d 1d10 | | Execute_Immediate Reference_Lex_1,0x10
002e 00c7 | | Action Elaborate_Subprogram
002f 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0030 00c7 | | Action Elaborate_Subprogram
0031 029d 0163 | c| Declare_Subprogram For_Outer_Call,INIT_0160
0033 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0034 00c7 | | Action Elaborate_Subprogram
0035 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0036 00c7 | | Action Elaborate_Subprogram
0037 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0038 00c7 | | Action Elaborate_Subprogram
0039 1d13 | | Execute_Immediate Reference_Lex_1,0x13
003a 00c7 | | Action Elaborate_Subprogram
003b 1d14 | | Execute_Immediate Reference_Lex_1,0x14
003c 00c7 | | Action Elaborate_Subprogram
003d 1d17 | | Execute_Immediate Reference_Lex_1,0x17
003e 00c7 | | Action Elaborate_Subprogram
003f BODY_0008:
003f 00bc | | Action Signal_Activated
0040 00bb | | Action Signal_Completion
0041 0000 0000 | | .BLANK 0000[0x7]
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 004b | K | .CONST 0x004b ; Address of begin
0049 0004 | | .CONST 0x0004 ; Address of exception handler
004a 0001 | | .CONST 0x0001 ; Number of locals
004b BODY_0048:
004b INIT_0048:
004b 00da | | Load_Top At_Offset_2
004c 00d8 | | Load_Top At_Offset_0
004d e002 | | Load 0x0,0x2
004e 0260 | ` | Execute Discrete,In_Type
004f 7001 |p | Jump_Nonzero 0x51
0050 0801 | | Execute_Immediate Raise,0x1
0051 4401 |D | Exit_Subprogram With_Result,0x1
0052 0000 0000 | | .XXX[0x2]
0054 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
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 00da | | Load_Top At_Offset_2
005c 00d8 | | Load_Top At_Offset_0
005d 00e8 | | Load_Encached Character_Cache
005e 0260 | ` | Execute Discrete,In_Type
005f 7001 |p | Jump_Nonzero 0x61
0060 0801 | | Execute_Immediate Raise,0x1
0061 4401 |D | Exit_Subprogram With_Result,0x1
0062 0000 0000 | | .BLANK 0000[0x6]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b | k | .CONST 0x006b ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0001 | | .CONST 0x0001 ; Number of locals
006b BODY_0068:
006b INIT_0068:
006b 00da | | Load_Top At_Offset_2
006c 48ff |H | Short_Literal 0xff
006d 027d | } | Execute Discrete,Greater
006e 6802 |h | Jump_Zero 0x71
006f e218 | | Load 0x1,0x18
0070 0257 | W | Execute Discrete,Raise
0071 00da | | Load_Top At_Offset_2
0072 00d8 | | Load_Top At_Offset_0
0073 e002 | | Load 0x0,0x2
0074 0260 | ` | Execute Discrete,In_Type
0075 7001 |p | Jump_Nonzero 0x77
0076 0801 | | Execute_Immediate Raise,0x1
0077 4401 |D | Exit_Subprogram With_Result,0x1
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007b | { | .CONST 0x007b ; Address of begin
0079 0004 | | .CONST 0x0004 ; Address of exception handler
007a 0001 | | .CONST 0x0001 ; Number of locals
007b BODY_0078:
007b INIT_0078:
007b 00da | | Load_Top At_Offset_2
007c 00d8 | | Load_Top At_Offset_0
007d 00e3 | | Load_Encached Natural_Cache
007e 0260 | ` | Execute Discrete,In_Type
007f 7001 |p | Jump_Nonzero 0x81
0080 0801 | | Execute_Immediate Raise,0x1
0081 4401 |D | Exit_Subprogram With_Result,0x1
0082 0000 0000 | | .BLANK 0000[0x6]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 0092 | | .CONST 0x0092 ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0002 | | .CONST 0x0002 ; Number of locals
008b INIT_0088:
008b 00da | | Load_Top At_Offset_2
008c 01dd | | Execute Vector,First
008d 00db | | Load_Top At_Offset_3
008e 01dc | | Execute Vector,Last
008f 00e9 | | Load_Encached String_Cache
0090 035b | [ | Declare_Type Array,Constrained
0091 0337 | 7 | Declare_Variable Array
0092 BODY_0088:
0092 00cf | | Action Mark_Auxiliary
0093 e5ff | | Load 0x2,-0x1
0094 01d9 | | Execute Vector,Reverse_Bounds
0095 0263 | c | Execute Discrete,Above_Bound
0096 7009 |p | Jump_Nonzero 0xa0
0097 00d8 | | Load_Top At_Offset_0
0098 e5ff | | Load 0x2,-0x1
0099 01d7 | | Execute Vector,Field_Read
009a 820e | | Call 0x1,0xe
009b 00d9 | | Load_Top At_Offset_1
009c e402 | | Load 0x2,0x2
009d 01d6 | | Execute Vector,Field_Write
009e 00c8 | | Action Pop_Auxiliary_Range
009f 3ff7 |? | Loop_Increasing 0x97
00a0 00ce | | Action Pop_Auxiliary
00a1 00d8 | | Load_Top At_Offset_0
00a2 00e9 | | Load_Encached String_Cache
00a3 01c6 | | Execute Vector,Convert_To_Formal
00a4 4401 |D | Exit_Subprogram With_Result,0x1
00a5 0000 0000 | | .XXX[0x3]
00a7 0000 | |
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00b2 | | .CONST 0x00b2 ; Address of begin
00a9 0004 | | .CONST 0x0004 ; Address of exception handler
00aa 0002 | | .CONST 0x0002 ; Number of locals
00ab INIT_00a8:
00ab 00da | | Load_Top At_Offset_2
00ac 01dd | | Execute Vector,First
00ad 00db | | Load_Top At_Offset_3
00ae 01dc | | Execute Vector,Last
00af e003 | | Load 0x0,0x3
00b0 035b | [ | Declare_Type Array,Constrained
00b1 0337 | 7 | Declare_Variable Array
00b2 BODY_00a8:
00b2 00cf | | Action Mark_Auxiliary
00b3 e5ff | | Load 0x2,-0x1
00b4 01d9 | | Execute Vector,Reverse_Bounds
00b5 0263 | c | Execute Discrete,Above_Bound
00b6 7009 |p | Jump_Nonzero 0xc0
00b7 00d8 | | Load_Top At_Offset_0
00b8 e5ff | | Load 0x2,-0x1
00b9 01d7 | | Execute Vector,Field_Read
00ba 820d | | Call 0x1,0xd
00bb 00d9 | | Load_Top At_Offset_1
00bc e402 | | Load 0x2,0x2
00bd 01d6 | | Execute Vector,Field_Write
00be 00c8 | | Action Pop_Auxiliary_Range
00bf 3ff7 |? | Loop_Increasing 0xb7
00c0 00ce | | Action Pop_Auxiliary
00c1 00d8 | | Load_Top At_Offset_0
00c2 e003 | | Load 0x0,0x3
00c3 01c6 | | Execute Vector,Convert_To_Formal
00c4 4401 |D | Exit_Subprogram With_Result,0x1
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 00da | | Load_Top At_Offset_2
00cc 01dd | | Execute Vector,First
00cd 00db | | Load_Top At_Offset_3
00ce 01dc | | Execute Vector,Last
00cf 027f | | Execute Discrete,Equal
00d0 6806 |h | Jump_Zero 0xd7
00d1 00da | | Load_Top At_Offset_2
00d2 01dd | | Execute Vector,First
00d3 00db | | Load_Top At_Offset_3
00d4 01d7 | | Execute Vector,Field_Read
00d5 8214 | | Call 0x1,0x14
00d6 4401 |D | Exit_Subprogram With_Result,0x1
00d7 487c |H| | Short_Literal 0x7c
00d8 00db | | Load_Top At_Offset_3
00d9 01dd | | Execute Vector,First
00da e5ff | | Load 0x2,-0x1
00db 01d7 | | Execute Vector,Field_Read
00dc 8214 | | Call 0x1,0x14
00dd 01cb | | Execute Vector,Append
00de 00db | | Load_Top At_Offset_3
00df 01dd | | Execute Vector,First
00e0 0a01 | | Execute_Immediate Plus,0x1
00e1 00d8 | | Load_Top At_Offset_0
00e2 00e2 | | Load_Encached Integer_Cache
00e3 0260 | ` | Execute Discrete,In_Type
00e4 7001 |p | Jump_Nonzero 0xe6
00e5 0801 | | Execute_Immediate Raise,0x1
00e6 e5ff | | Load 0x2,-0x1
00e7 01dc | | Execute Vector,Last
00e8 e5ff | | Load 0x2,-0x1
00e9 01cf | | Execute Vector,Slice_Read
00ea 8213 | | Call 0x1,0x13
00eb 01cc | | Execute Vector,Catenate
00ec 4401 |D | Exit_Subprogram With_Result,0x1
00ed 0000 0000 | | .XXX[0x3]
00ef 0000 | |
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f3 | | .CONST 0x00f3 ; Address of begin
00f1 0004 | | .CONST 0x0004 ; Address of exception handler
00f2 0001 | | .CONST 0x0001 ; Number of locals
00f3 BODY_00f0:
00f3 INIT_00f0:
00f3 00da | | Load_Top At_Offset_2
00f4 00d8 | | Load_Top At_Offset_0
00f5 00e2 | | Load_Encached Integer_Cache
00f6 0260 | ` | Execute Discrete,In_Type
00f7 7001 |p | Jump_Nonzero 0xf9
00f8 0801 | | Execute_Immediate Raise,0x1
00f9 00e0 | | Load_Encached Standard_Cache
00fa 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00fb 8004 | | Call 0x0,0x4
00fc 4401 |D | Exit_Subprogram With_Result,0x1
00fd 0000 0000 | | .XXX[0x3]
00ff 0000 | |
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0103 | | .CONST 0x0103 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0001 | | .CONST 0x0001 ; Number of locals
0103 BODY_0100:
0103 INIT_0100:
0103 00da | | Load_Top At_Offset_2
0104 01dd | | Execute Vector,First
0105 00db | | Load_Top At_Offset_3
0106 01dc | | Execute Vector,Last
0107 027f | | Execute Discrete,Equal
0108 6806 |h | Jump_Zero 0x10f
0109 00da | | Load_Top At_Offset_2
010a 01dd | | Execute Vector,First
010b 00db | | Load_Top At_Offset_3
010c 01d7 | | Execute Vector,Field_Read
010d 8219 | | Call 0x1,0x19
010e 4401 |D | Exit_Subprogram With_Result,0x1
010f 487c |H| | Short_Literal 0x7c
0110 00db | | Load_Top At_Offset_3
0111 01dd | | Execute Vector,First
0112 e5ff | | Load 0x2,-0x1
0113 01d7 | | Execute Vector,Field_Read
0114 8219 | | Call 0x1,0x19
0115 01cb | | Execute Vector,Append
0116 00db | | Load_Top At_Offset_3
0117 01dd | | Execute Vector,First
0118 0a01 | | Execute_Immediate Plus,0x1
0119 00d8 | | Load_Top At_Offset_0
011a 00e2 | | Load_Encached Integer_Cache
011b 0260 | ` | Execute Discrete,In_Type
011c 7001 |p | Jump_Nonzero 0x11e
011d 0801 | | Execute_Immediate Raise,0x1
011e e5ff | | Load 0x2,-0x1
011f 01dc | | Execute Vector,Last
0120 e5ff | | Load 0x2,-0x1
0121 01cf | | Execute Vector,Slice_Read
0122 8215 | | Call 0x1,0x15
0123 01cc | | Execute Vector,Catenate
0124 4401 |D | Exit_Subprogram With_Result,0x1
0125 0000 0000 | | .XXX[0x3]
0127 0000 | |
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b | + | .CONST 0x012b ; Address of begin
0129 0004 | | .CONST 0x0004 ; Address of exception handler
012a 0001 | | .CONST 0x0001 ; Number of locals
012b BODY_0128:
012b INIT_0128:
012b 00da | | Load_Top At_Offset_2
012c 8219 | | Call 0x1,0x19
012d 4401 |D | Exit_Subprogram With_Result,0x1
012e 0000 0000 | | .XXX[0x2]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0141 | A | .CONST 0x0141 ; Address of begin
0131 0004 | | .CONST 0x0004 ; Address of exception handler
0132 0002 | | .CONST 0x0002 ; Number of locals
0133 INIT_0130:
0133 4801 |H | Short_Literal 0x1
0134 00db | | Load_Top At_Offset_3
0135 01db | | Execute Vector,Length
0136 e5fe | | Load 0x2,-0x2
0137 01db | | Execute Vector,Length
0138 0273 | s | Execute Discrete,Plus
0139 00d8 | | Load_Top At_Offset_0
013a 00e2 | | Load_Encached Integer_Cache
013b 0260 | ` | Execute Discrete,In_Type
013c 7001 |p | Jump_Nonzero 0x13e
013d 0801 | | Execute_Immediate Raise,0x1
013e e003 | | Load 0x0,0x3
013f 035b | [ | Declare_Type Array,Constrained
0140 0337 | 7 | Declare_Variable Array
0141 BODY_0130:
0141 00db | | Load_Top At_Offset_3
0142 4801 |H | Short_Literal 0x1
0143 e5ff | | Load 0x2,-0x1
0144 01db | | Execute Vector,Length
0145 00d8 | | Load_Top At_Offset_0
0146 00e2 | | Load_Encached Integer_Cache
0147 0260 | ` | Execute Discrete,In_Type
0148 7001 |p | Jump_Nonzero 0x14a
0149 0801 | | Execute_Immediate Raise,0x1
014a 00db | | Load_Top At_Offset_3
014b 01ce | | Execute Vector,Slice_Write
014c e5fe | | Load 0x2,-0x2
014d e5ff | | Load 0x2,-0x1
014e 01db | | Execute Vector,Length
014f 0a01 | | Execute_Immediate Plus,0x1
0150 00d8 | | Load_Top At_Offset_0
0151 00e2 | | Load_Encached Integer_Cache
0152 0260 | ` | Execute Discrete,In_Type
0153 7001 |p | Jump_Nonzero 0x155
0154 0801 | | Execute_Immediate Raise,0x1
0155 00da | | Load_Top At_Offset_2
0156 01dc | | Execute Vector,Last
0157 00db | | Load_Top At_Offset_3
0158 01ce | | Execute Vector,Slice_Write
0159 00d8 | | Load_Top At_Offset_0
015a e003 | | Load 0x0,0x3
015b 01c6 | | Execute Vector,Convert_To_Formal
015c 4402 |D | Exit_Subprogram With_Result,0x2
015d 0000 0000 | | .XXX[0x3]
015f 0000 | |
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0169 | i | .CONST 0x0169 ; Address of begin
0161 0004 | | .CONST 0x0004 ; Address of exception handler
0162 0003 | | .CONST 0x0003 ; Number of locals
0163 INIT_0160:
0163 00e3 | | Load_Encached Natural_Cache
0164 4801 |H | Short_Literal 0x1
0165 4802 |H | Short_Literal 0x2
0166 00e9 | | Load_Encached String_Cache
0167 035b | [ | Declare_Type Array,Constrained
0168 0337 | 7 | Declare_Variable Array
0169 BODY_0160:
0169 e5ff | | Load 0x2,-0x1
016a 480f |H | Short_Literal 0xf
016b 0279 | y | Execute Discrete,And
016c 005a | Z | Store_Top Discrete,At_Offset_2
016d 00d9 | | Load_Top At_Offset_1
016e 00d8 | | Load_Top At_Offset_0
016f 0c10 | | Execute_Immediate Greater_Equal,0x10
0170 7016 |p | Jump_Nonzero 0x187
0171 460f |F | Jump_Case 0xf
0172 782f |x/ | Jump 0x1a2 ; case 0x0
0173 782e |x. | Jump 0x1a2 ; case 0x1
0174 782d |x- | Jump 0x1a2 ; case 0x2
0175 782c |x, | Jump 0x1a2 ; case 0x3
0176 782b |x+ | Jump 0x1a2 ; case 0x4
0177 782a |x* | Jump 0x1a2 ; case 0x5
0178 7829 |x) | Jump 0x1a2 ; case 0x6
0179 7828 |x( | Jump 0x1a2 ; case 0x7
017a 7827 |x' | Jump 0x1a2 ; case 0x8
017b 7826 |x& | Jump 0x1a2 ; case 0x9
017c 780c |x | Jump 0x189 ; case 0xa
017d 7810 |x | Jump 0x18e ; case 0xb
017e 7814 |x | Jump 0x193 ; case 0xc
017f 7818 |x | Jump 0x198 ; case 0xd
0180 781c |x | Jump 0x19d ; case 0xe
0181 7800 |x | Jump 0x182 ; case 0xf
0182 4846 |HF | Short_Literal 0x46
0183 4802 |H | Short_Literal 0x2
0184 00da | | Load_Top At_Offset_2
0185 01d6 | | Execute Vector,Field_Write
0186 7823 |x# | Jump 0x1aa
0187 00d1 | | Pop_Control Pop_Count_1
0188 7821 |x! | Jump 0x1aa
0189 4841 |HA | Short_Literal 0x41
018a 4802 |H | Short_Literal 0x2
018b 00da | | Load_Top At_Offset_2
018c 01d6 | | Execute Vector,Field_Write
018d 781c |x | Jump 0x1aa
018e 4842 |HB | Short_Literal 0x42
018f 4802 |H | Short_Literal 0x2
0190 00da | | Load_Top At_Offset_2
0191 01d6 | | Execute Vector,Field_Write
0192 7817 |x | Jump 0x1aa
0193 4843 |HC | Short_Literal 0x43
0194 4802 |H | Short_Literal 0x2
0195 00da | | Load_Top At_Offset_2
0196 01d6 | | Execute Vector,Field_Write
0197 7812 |x | Jump 0x1aa
0198 4844 |HD | Short_Literal 0x44
0199 4802 |H | Short_Literal 0x2
019a 00da | | Load_Top At_Offset_2
019b 01d6 | | Execute Vector,Field_Write
019c 780d |x | Jump 0x1aa
019d 4845 |HE | Short_Literal 0x45
019e 4802 |H | Short_Literal 0x2
019f 00da | | Load_Top At_Offset_2
01a0 01d6 | | Execute Vector,Field_Write
01a1 7808 |x | Jump 0x1aa
01a2 00d9 | | Load_Top At_Offset_1
01a3 00e0 | | Load_Encached Standard_Cache
01a4 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01a5 8004 | | Call 0x0,0x4
01a6 4802 |H | Short_Literal 0x2
01a7 4802 |H | Short_Literal 0x2
01a8 00db | | Load_Top At_Offset_3
01a9 01ce | | Execute Vector,Slice_Write
01aa e5ff | | Load 0x2,-0x1
01ab 09fc | | Execute_Immediate Binary_Scale,-0x4
01ac 005a | Z | Store_Top Discrete,At_Offset_2
01ad 00d9 | | Load_Top At_Offset_1
01ae 00d8 | | Load_Top At_Offset_0
01af 0c10 | | Execute_Immediate Greater_Equal,0x10
01b0 7016 |p | Jump_Nonzero 0x1c7
01b1 460f |F | Jump_Case 0xf
01b2 782f |x/ | Jump 0x1e2 ; case 0x0
01b3 782e |x. | Jump 0x1e2 ; case 0x1
01b4 782d |x- | Jump 0x1e2 ; case 0x2
01b5 782c |x, | Jump 0x1e2 ; case 0x3
01b6 782b |x+ | Jump 0x1e2 ; case 0x4
01b7 782a |x* | Jump 0x1e2 ; case 0x5
01b8 7829 |x) | Jump 0x1e2 ; case 0x6
01b9 7828 |x( | Jump 0x1e2 ; case 0x7
01ba 7827 |x' | Jump 0x1e2 ; case 0x8
01bb 7826 |x& | Jump 0x1e2 ; case 0x9
01bc 780c |x | Jump 0x1c9 ; case 0xa
01bd 7810 |x | Jump 0x1ce ; case 0xb
01be 7814 |x | Jump 0x1d3 ; case 0xc
01bf 7818 |x | Jump 0x1d8 ; case 0xd
01c0 781c |x | Jump 0x1dd ; case 0xe
01c1 7800 |x | Jump 0x1c2 ; case 0xf
01c2 4846 |HF | Short_Literal 0x46
01c3 4801 |H | Short_Literal 0x1
01c4 00da | | Load_Top At_Offset_2
01c5 01d6 | | Execute Vector,Field_Write
01c6 7823 |x# | Jump 0x1ea
01c7 00d1 | | Pop_Control Pop_Count_1
01c8 7821 |x! | Jump 0x1ea
01c9 4841 |HA | Short_Literal 0x41
01ca 4801 |H | Short_Literal 0x1
01cb 00da | | Load_Top At_Offset_2
01cc 01d6 | | Execute Vector,Field_Write
01cd 781c |x | Jump 0x1ea
01ce 4842 |HB | Short_Literal 0x42
01cf 4801 |H | Short_Literal 0x1
01d0 00da | | Load_Top At_Offset_2
01d1 01d6 | | Execute Vector,Field_Write
01d2 7817 |x | Jump 0x1ea
01d3 4843 |HC | Short_Literal 0x43
01d4 4801 |H | Short_Literal 0x1
01d5 00da | | Load_Top At_Offset_2
01d6 01d6 | | Execute Vector,Field_Write
01d7 7812 |x | Jump 0x1ea
01d8 4844 |HD | Short_Literal 0x44
01d9 4801 |H | Short_Literal 0x1
01da 00da | | Load_Top At_Offset_2
01db 01d6 | | Execute Vector,Field_Write
01dc 780d |x | Jump 0x1ea
01dd 4845 |HE | Short_Literal 0x45
01de 4801 |H | Short_Literal 0x1
01df 00da | | Load_Top At_Offset_2
01e0 01d6 | | Execute Vector,Field_Write
01e1 7808 |x | Jump 0x1ea
01e2 00d9 | | Load_Top At_Offset_1
01e3 00e0 | | Load_Encached Standard_Cache
01e4 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01e5 8004 | | Call 0x0,0x4
01e6 4801 |H | Short_Literal 0x1
01e7 4801 |H | Short_Literal 0x1
01e8 00db | | Load_Top At_Offset_3
01e9 01ce | | Execute Vector,Slice_Write
01ea 4848 |HH | Short_Literal 0x48
01eb 00d9 | | Load_Top At_Offset_1
01ec 01ca | | Execute Vector,Prepend
01ed 00e9 | | Load_Encached String_Cache
01ee 01c6 | | Execute Vector,Convert_To_Formal
01ef 4401 |D | Exit_Subprogram With_Result,0x1
01f0 ; --------------------------------------------------------------------------------------
01f0 ; Debug Table
01f0 ; --------------------------------------------------------------------------------------
01f0 0004 0009 | | .DEBUG4 0x0004,0x0009,0x72fc,0x0000,0x0001,0x000e
01f6 000b 022e | .| .DBG4T 0x000b,0x022e,0x8000,0x8000
01fa 0027 0248 | ' H| .DBG4T 0x0027,0x0248,0x8000,0x8000
01fe 004b 0262 | K b| .DBG4T 0x004b,0x0262,0x0002,0x0000
0202 005b 0265 | [ e| .DBG4T 0x005b,0x0265,0x0002,0x0000
0206 006b 0268 | k h| .DBG4T 0x006b,0x0268,0x0002,0x0000
020a 007b 026d | { m| .DBG4T 0x007b,0x026d,0x0002,0x0000
020e 008b 0270 | p| .DBG4T 0x008b,0x0270,0x0002,0x0000
0212 00ab 0276 | v| .DBG4T 0x00ab,0x0276,0x0002,0x0000
0216 00cb 027c | || .DBG4T 0x00cb,0x027c,0x0002,0x0000
021a 00f3 0281 | | .DBG4T 0x00f3,0x0281,0x0002,0x0000
021e 0103 0284 | | .DBG4T 0x0103,0x0284,0x0002,0x0000
0222 012b 0289 | + | .DBG4T 0x012b,0x0289,0x0002,0x0000
0226 0133 028c | 3 | .DBG4T 0x0133,0x028c,0x0002,0x0000
022a 0163 0292 | c | .DBG4T 0x0163,0x0292,0x0002,0x4000
022e ; --------------------------------------------------------------------------------------
022e ; Debug chain
022e ; --------------------------------------------------------------------------------------
022e 000c 0000 | | .DBGLEN 0x000c,0x0000
0230 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d,0x001f,0x0021
023c 0002 0003 | | .XXX[0xc]
023e 0004 0005 | |
0240 0006 0007 | |
0242 0008 0009 | |
0244 000a 000b | |
0246 000c 000d | |
0248 ; --------------------------------------------------------------------------------------
0248 ; Debug chain
0248 ; --------------------------------------------------------------------------------------
0248 000c 0000 | | .DBGLEN 0x000c,0x0000
024a 0027 0029 | ' )| .DBGLNO 0x0027,0x0029,0x002b,0x002d,0x002f,0x0031,0x0033,0x0035,0x0037,0x0039,0x003b,0x003d
0256 0002 0003 | | .XXX[0xc]
0258 0004 0005 | |
025a 0006 0007 | |
025c 0008 0009 | |
025e 000a 000b | |
0260 000c 000d | |
0262 ; --------------------------------------------------------------------------------------
0262 ; Debug chain
0262 ; --------------------------------------------------------------------------------------
0262 0000 0001 | | .DBGLEN 0x0000,0x0001
0264 004b | K | .DBGLNO 0x004b
0265 ; --------------------------------------------------------------------------------------
0265 ; Debug chain
0265 ; --------------------------------------------------------------------------------------
0265 0000 0001 | | .DBGLEN 0x0000,0x0001
0267 005b | [ | .DBGLNO 0x005b
0268 ; --------------------------------------------------------------------------------------
0268 ; Debug chain
0268 ; --------------------------------------------------------------------------------------
0268 0000 0003 | | .DBGLEN 0x0000,0x0003
026a 006b 006f | k o| .DBGLNO 0x006b,0x006f,0x0071
026d ; --------------------------------------------------------------------------------------
026d ; Debug chain
026d ; --------------------------------------------------------------------------------------
026d 0000 0001 | | .DBGLEN 0x0000,0x0001
026f 007b | { | .DBGLNO 0x007b
0270 ; --------------------------------------------------------------------------------------
0270 ; Debug chain
0270 ; --------------------------------------------------------------------------------------
0270 0001 0003 | | .DBGLEN 0x0001,0x0003
0272 008b 0093 | | .DBGLNO 0x008b,0x0093,0x0097,0x00a1
0276 ; --------------------------------------------------------------------------------------
0276 ; Debug chain
0276 ; --------------------------------------------------------------------------------------
0276 0001 0003 | | .DBGLEN 0x0001,0x0003
0278 00ab 00b3 | | .DBGLNO 0x00ab,0x00b3,0x00b7,0x00c1
027c ; --------------------------------------------------------------------------------------
027c ; Debug chain
027c ; --------------------------------------------------------------------------------------
027c 0000 0003 | | .DBGLEN 0x0000,0x0003
027e 00cb 00d1 | | .DBGLNO 0x00cb,0x00d1,0x00d7
0281 ; --------------------------------------------------------------------------------------
0281 ; Debug chain
0281 ; --------------------------------------------------------------------------------------
0281 0000 0001 | | .DBGLEN 0x0000,0x0001
0283 00f3 | | .DBGLNO 0x00f3
0284 ; --------------------------------------------------------------------------------------
0284 ; Debug chain
0284 ; --------------------------------------------------------------------------------------
0284 0000 0003 | | .DBGLEN 0x0000,0x0003
0286 0103 0109 | | .DBGLNO 0x0103,0x0109,0x010f
0289 ; --------------------------------------------------------------------------------------
0289 ; Debug chain
0289 ; --------------------------------------------------------------------------------------
0289 0000 0001 | | .DBGLEN 0x0000,0x0001
028b 012b | + | .DBGLNO 0x012b
028c ; --------------------------------------------------------------------------------------
028c ; Debug chain
028c ; --------------------------------------------------------------------------------------
028c 0001 0003 | | .DBGLEN 0x0001,0x0003
028e 0133 0141 | 3 A| .DBGLNO 0x0133,0x0141,0x014c,0x0159
0292 ; --------------------------------------------------------------------------------------
0292 ; Debug chain
0292 ; --------------------------------------------------------------------------------------
0292 0002 0013 | | .DBGLEN 0x0002,0x0013
0294 0163 0164 | c d| .DBGLNO 0x0163,0x0164,0x0169,0x016d,0x0182,0x0189,0x018e,0x0193,0x0198,0x019d,0x01a2,0x01aa,0x01ad,0x01c2,0x01c9,0x01ce,0x01d3,0x01d8,0x01dd,0x01e2,0x01ea
02a9 0001 0002 | | .XXX[0x13]
02ab 0009 0004 | |
02ad 0005 0006 | |
02af 0007 0008 | |
02b1 0003 000b | |
02b3 000c 0013 | |
02b5 000e 000f | |
02b7 0010 0011 | |
02b9 0012 000d | |
02bb 0015 | |
02bc 0000 0000 | | .BLANK 0000[0x144]