|
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, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_779ce4
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦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 0338 | 8 | .CONST 0x0338 ; 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 8002 | | .CONST 0x8002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00b7 | | .CONST 0x00b7 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 002b | + | .CONST 0x002b ; Number of locals
000b INIT_0008:
000b 00e3 | | Load_Encached Natural_Cache
000c 00e3 | | Load_Encached Natural_Cache
000d 00e3 | | Load_Encached Natural_Cache
000e 00e3 | | Load_Encached Natural_Cache
000f 029f 02eb | | Declare_Subprogram For_Call,INIT_02e8
0011 4804 |H | Short_Literal 0x4
0012 032e | . | Declare_Type Record,Defined,Visible
0013 029a 00c3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00c0
0015 029a 00cb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00c8
0017 029a 010b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0108
0019 029a 0113 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0110
001b 029a 013b | ;| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0138
001d 029a 014b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0148
001f 029a 015b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0158
0021 029a 0163 | c| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0160
0023 029a 016b | k| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0168
0025 029a 017b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0178
0027 029a 018b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0188
0029 029a 0193 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0190
002b 029a 019b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0198
002d 029a 01b3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01b0
002f 029a 01bb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01b8
0031 029a 01db | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01d8
0033 4800 |H | Short_Literal 0x0
0034 4804 |H | Short_Literal 0x4
0035 029f 020b | | Declare_Subprogram For_Call,INIT_0208
0037 03fe | | Declare_Type Discrete,Defined,Visible
0038 e20d | | Load 0x1,0xd
0039 00e1 | | Load_Encached Boolean_Cache
003a 00da | | Load_Top At_Offset_2
003b 00e1 | | Load_Encached Boolean_Cache
003c 029f 02d3 | | Declare_Subprogram For_Call,INIT_02d0
003e 4804 |H | Short_Literal 0x4
003f 032e | . | Declare_Type Record,Defined,Visible
0040 00bf | | Action Accept_Activation
0041 00d9 | | Load_Top At_Offset_1
0042 0266 | f | Execute Discrete,Bounds
0043 00e1 | | Load_Encached Boolean_Cache
0044 02a0 | | Declare_Subprogram Null_Subprogram
0045 4801 |H | Short_Literal 0x1
0046 035d | ] | Declare_Type Array,Defined
0047 00d8 | | Load_Top At_Offset_0
0048 0337 | 7 | Declare_Variable Array
0049 00d8 | | Load_Top At_Offset_0
004a 0335 | 5 | Declare_Variable Array,Duplicate
004b 00cd | | Action Spare6_Action
004c 4804 |H | Short_Literal 0x4
004d 4800 |H | Short_Literal 0x0
004e 4800 |H | Short_Literal 0x0
004f 00d9 | | Load_Top At_Offset_1
0050 e222 | " | Load 0x1,0x22
0051 01d6 | | Execute Vector,Field_Write
0052 3ffb |? | Loop_Increasing 0x4e
0053 00d9 | | Load_Top At_Offset_1
0054 01d4 | | Execute Vector,Structure_Write
0055 4800 |H | Short_Literal 0x0
0056 4804 |H | Short_Literal 0x4
0057 029f 0233 | 3| Declare_Subprogram For_Call,INIT_0230
0059 03fd | | Declare_Type Discrete,Defined
005a e21e | | Load 0x1,0x1e
005b 0266 | f | Execute Discrete,Bounds
005c 00da | | Load_Top At_Offset_2
005d 02a0 | | Declare_Subprogram Null_Subprogram
005e 4801 |H | Short_Literal 0x1
005f 035d | ] | Declare_Type Array,Defined
0060 00d8 | | Load_Top At_Offset_0
0061 0337 | 7 | Declare_Variable Array
0062 00d8 | | Load_Top At_Offset_0
0063 0335 | 5 | Declare_Variable Array,Duplicate
0064 00cd | | Action Spare6_Action
0065 4800 |H | Short_Literal 0x0
0066 4800 |H | Short_Literal 0x0
0067 00da | | Load_Top At_Offset_2
0068 01d6 | | Execute Vector,Field_Write
0069 4801 |H | Short_Literal 0x1
006a 4801 |H | Short_Literal 0x1
006b 00da | | Load_Top At_Offset_2
006c 01d6 | | Execute Vector,Field_Write
006d 4802 |H | Short_Literal 0x2
006e 4802 |H | Short_Literal 0x2
006f 00da | | Load_Top At_Offset_2
0070 01d6 | | Execute Vector,Field_Write
0071 4803 |H | Short_Literal 0x3
0072 4803 |H | Short_Literal 0x3
0073 00da | | Load_Top At_Offset_2
0074 01d6 | | Execute Vector,Field_Write
0075 4804 |H | Short_Literal 0x4
0076 4804 |H | Short_Literal 0x4
0077 00da | | Load_Top At_Offset_2
0078 01d6 | | Execute Vector,Field_Write
0079 00d9 | | Load_Top At_Offset_1
007a 01d4 | | Execute Vector,Structure_Write
007b e002 | | Load 0x0,0x2
007c e003 | | Load 0x0,0x3
007d e222 | " | Load 0x1,0x22
007e 4800 |H | Short_Literal 0x0
007f 4801 |H | Short_Literal 0x1
0080 4804 |H | Short_Literal 0x4
0081 0092 0305 | | Action Push_String_Extended,0x305 ; "others => Unspecified"
0083 00ea | | Load_Encached Null_String_Cache
0084 00ea | | Load_Encached Null_String_Cache
0085 4801 |H | Short_Literal 0x1
0086 4804 |H | Short_Literal 0x4
0087 e004 | | Load 0x0,0x4
0088 0387 | | Declare_Variable Package
0089 00d8 | | Load_Top At_Offset_0
008a 020f | | Execute Module,Activate
008b 029d 025b | [| Declare_Subprogram For_Outer_Call,INIT_0258
008d 1d0e | | Execute_Immediate Reference_Lex_1,0xe
008e 00c7 | | Action Elaborate_Subprogram
008f 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0090 00c7 | | Action Elaborate_Subprogram
0091 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0092 00c7 | | Action Elaborate_Subprogram
0093 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0094 00c7 | | Action Elaborate_Subprogram
0095 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0096 00c7 | | Action Elaborate_Subprogram
0097 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0098 00c7 | | Action Elaborate_Subprogram
0099 1d14 | | Execute_Immediate Reference_Lex_1,0x14
009a 00c7 | | Action Elaborate_Subprogram
009b 1d15 | | Execute_Immediate Reference_Lex_1,0x15
009c 00c7 | | Action Elaborate_Subprogram
009d 1d16 | | Execute_Immediate Reference_Lex_1,0x16
009e 00c7 | | Action Elaborate_Subprogram
009f 1d17 | | Execute_Immediate Reference_Lex_1,0x17
00a0 00c7 | | Action Elaborate_Subprogram
00a1 1d18 | | Execute_Immediate Reference_Lex_1,0x18
00a2 00c7 | | Action Elaborate_Subprogram
00a3 1d19 | | Execute_Immediate Reference_Lex_1,0x19
00a4 00c7 | | Action Elaborate_Subprogram
00a5 029d 0273 | s| Declare_Subprogram For_Outer_Call,INIT_0270
00a7 029d 027b | {| Declare_Subprogram For_Outer_Call,INIT_0278
00a9 029d 0283 | | Declare_Subprogram For_Outer_Call,INIT_0280
00ab 029d 028b | | Declare_Subprogram For_Outer_Call,INIT_0288
00ad 029d 02b3 | | Declare_Subprogram For_Outer_Call,INIT_02b0
00af 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
00b0 00c7 | | Action Elaborate_Subprogram
00b1 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
00b2 00c7 | | Action Elaborate_Subprogram
00b3 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
00b4 00c7 | | Action Elaborate_Subprogram
00b5 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
00b6 00c7 | | Action Elaborate_Subprogram
00b7 BODY_0008:
00b7 00bc | | Action Signal_Activated
00b8 00bb | | Action Signal_Completion
00b9 0000 0000 | | .BLANK 0000[0x7]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3 | | .CONST 0x00c3 ; Address of begin
00c1 0004 | | .CONST 0x0004 ; Address of exception handler
00c2 0001 | | .CONST 0x0001 ; Number of locals
00c3 BODY_00c0:
00c3 INIT_00c0:
00c3 8226 | & | Call 0x1,0x26
00c4 4401 |D | Exit_Subprogram With_Result,0x1
00c5 0000 0000 | | .XXX[0x3]
00c7 0000 | |
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00d3 | | .CONST 0x00d3 ; Address of begin
00c9 0004 | | .CONST 0x0004 ; Address of exception handler
00ca 0003 | | .CONST 0x0003 ; Number of locals
00cb INIT_00c8:
00cb e20d | | Load 0x1,0xd
00cc 0322 | " | Declare_Variable Record
00cd 8226 | & | Call 0x1,0x26
00ce 00d9 | | Load_Top At_Offset_1
00cf 017d | } | Execute Record,Structure_Write
00d0 00db | | Load_Top At_Offset_3
00d1 e225 | % | Load 0x1,0x25
00d2 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00d3 BODY_00c8:
00d3 00d8 | | Load_Top At_Offset_0
00d4 e225 | % | Load 0x1,0x25
00d5 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
00d6 7002 |p | Jump_Nonzero 0xd9
00d7 e005 | | Load 0x0,0x5
00d8 0257 | W | Execute Discrete,Raise
00d9 6026 |`& | Indirect_Literal Discrete,0x100,{0x00000000, 0x7fffffff}
00da 4801 |H | Short_Literal 0x1
00db e224 | $ | Load 0x1,0x24
00dc 01d7 | | Execute Vector,Field_Read
00dd 00da | | Load_Top At_Offset_2
00de e225 | % | Load 0x1,0x25
00df 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
00e0 00da | | Load_Top At_Offset_2
00e1 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00e2 601d |` | Indirect_Literal Discrete,0x100,{0x00000000, 0x7fffffff}
00e3 4802 |H | Short_Literal 0x2
00e4 e224 | $ | Load 0x1,0x24
00e5 01d7 | | Execute Vector,Field_Read
00e6 00da | | Load_Top At_Offset_2
00e7 e225 | % | Load 0x1,0x25
00e8 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
00e9 00da | | Load_Top At_Offset_2
00ea 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00eb 6014 |` | Indirect_Literal Discrete,0x100,{0x00000000, 0x7fffffff}
00ec 4803 |H | Short_Literal 0x3
00ed e224 | $ | Load 0x1,0x24
00ee 01d7 | | Execute Vector,Field_Read
00ef 00da | | Load_Top At_Offset_2
00f0 e225 | % | Load 0x1,0x25
00f1 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
00f2 00da | | Load_Top At_Offset_2
00f3 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
00f4 600b |` | Indirect_Literal Discrete,0x100,{0x00000000, 0x7fffffff}
00f5 4804 |H | Short_Literal 0x4
00f6 e224 | $ | Load 0x1,0x24
00f7 01d7 | | Execute Vector,Field_Read
00f8 00da | | Load_Top At_Offset_2
00f9 e225 | % | Load 0x1,0x25
00fa 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
00fb 00da | | Load_Top At_Offset_2
00fc 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
00fd 00d9 | | Load_Top At_Offset_1
00fe 4402 |D | Exit_Subprogram With_Result,0x2
00ff 0000 | | .XXX[0x1]
0100 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
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 8226 | & | Call 0x1,0x26
010c 00db | | Load_Top At_Offset_3
010d 017d | } | Execute Record,Structure_Write
010e 4501 |E | Exit_Subprogram 0x1
010f 0000 | | .XXX[0x1]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0113 | | .CONST 0x0113 ; Address of begin
0111 0004 | | .CONST 0x0004 ; Address of exception handler
0112 0001 | | .CONST 0x0001 ; Number of locals
0113 BODY_0110:
0113 INIT_0110:
0113 e20d | | Load 0x1,0xd
0114 0322 | " | Declare_Variable Record
0115 00db | | Load_Top At_Offset_3
0116 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0117 e5fe | | Load 0x2,-0x2
0118 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0119 0273 | s | Execute Discrete,Plus
011a 00d9 | | Load_Top At_Offset_1
011b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
011c 00db | | Load_Top At_Offset_3
011d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
011e e5fe | | Load 0x2,-0x2
011f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0120 0273 | s | Execute Discrete,Plus
0121 00d9 | | Load_Top At_Offset_1
0122 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0123 00db | | Load_Top At_Offset_3
0124 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0125 e5fe | | Load 0x2,-0x2
0126 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0127 0273 | s | Execute Discrete,Plus
0128 00d9 | | Load_Top At_Offset_1
0129 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
012a 00db | | Load_Top At_Offset_3
012b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
012c e5fe | | Load 0x2,-0x2
012d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
012e 0273 | s | Execute Discrete,Plus
012f 00d9 | | Load_Top At_Offset_1
0130 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0131 4402 |D | Exit_Subprogram With_Result,0x2
0132 0000 0000 | | .BLANK 0000[0x6]
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 00da | | Load_Top At_Offset_2
013c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
013d 0a01 | | Execute_Immediate Plus,0x1
013e 00db | | Load_Top At_Offset_3
013f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0140 4501 |E | Exit_Subprogram 0x1
0141 0000 0000 | | .BLANK 0000[0x7]
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 00da | | Load_Top At_Offset_2
014c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
014d 0a01 | | Execute_Immediate Plus,0x1
014e 00db | | Load_Top At_Offset_3
014f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0150 00da | | Load_Top At_Offset_2
0151 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0152 0a01 | | Execute_Immediate Plus,0x1
0153 00db | | Load_Top At_Offset_3
0154 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0155 4501 |E | Exit_Subprogram 0x1
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 00da | | Load_Top At_Offset_2
015c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
015d 4401 |D | Exit_Subprogram With_Result,0x1
015e 0000 0000 | | .XXX[0x2]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163 | c | .CONST 0x0163 ; Address of begin
0161 0004 | | .CONST 0x0004 ; Address of exception handler
0162 0001 | | .CONST 0x0001 ; Number of locals
0163 BODY_0160:
0163 INIT_0160:
0163 00da | | Load_Top At_Offset_2
0164 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0165 4401 |D | Exit_Subprogram With_Result,0x1
0166 0000 0000 | | .XXX[0x2]
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 00da | | Load_Top At_Offset_2
016c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
016d 0a01 | | Execute_Immediate Plus,0x1
016e 00db | | Load_Top At_Offset_3
016f 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0170 4501 |E | Exit_Subprogram 0x1
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 00da | | Load_Top At_Offset_2
017c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
017d 0a01 | | Execute_Immediate Plus,0x1
017e 00db | | Load_Top At_Offset_3
017f 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0180 00da | | Load_Top At_Offset_2
0181 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0182 0a01 | | Execute_Immediate Plus,0x1
0183 00db | | Load_Top At_Offset_3
0184 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0185 4501 |E | Exit_Subprogram 0x1
0186 0000 0000 | | .XXX[0x2]
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 00da | | Load_Top At_Offset_2
018c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
018d 4401 |D | Exit_Subprogram With_Result,0x1
018e 0000 0000 | | .XXX[0x2]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0193 | | .CONST 0x0193 ; Address of begin
0191 0004 | | .CONST 0x0004 ; Address of exception handler
0192 0001 | | .CONST 0x0001 ; Number of locals
0193 BODY_0190:
0193 INIT_0190:
0193 00da | | Load_Top At_Offset_2
0194 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0195 4401 |D | Exit_Subprogram With_Result,0x1
0196 0000 0000 | | .XXX[0x2]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019f | | .CONST 0x019f ; Address of begin
0199 0004 | | .CONST 0x0004 ; Address of exception handler
019a 0002 | | .CONST 0x0002 ; Number of locals
019b INIT_0198:
019b e21f | | Load 0x1,0x1f
019c 0322 | " | Declare_Variable Record
019d 00d8 | | Load_Top At_Offset_0
019e 1c00 | | Execute_Immediate Run_Utility,0x0
019f BODY_0198:
019f 00db | | Load_Top At_Offset_3
01a0 00d9 | | Load_Top At_Offset_1
01a1 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01a2 4801 |H | Short_Literal 0x1
01a3 00d9 | | Load_Top At_Offset_1
01a4 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
01a5 00d8 | | Load_Top At_Offset_0
01a6 00d9 | | Load_Top At_Offset_1
01a7 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01a8 8227 | ' | Call 0x1,0x27
01a9 00d1 | | Pop_Control Pop_Count_1
01aa 00d8 | | Load_Top At_Offset_0
01ab 4401 |D | Exit_Subprogram With_Result,0x1
01ac 0000 0000 | | .BLANK 0000[0x4]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b3 | | .CONST 0x01b3 ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 0001 | | .CONST 0x0001 ; Number of locals
01b3 BODY_01b0:
01b3 INIT_01b0:
01b3 00da | | Load_Top At_Offset_2
01b4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01b5 4401 |D | Exit_Subprogram With_Result,0x1
01b6 0000 0000 | | .XXX[0x2]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01c7 | | .CONST 0x01c7 ; Address of begin
01b9 0004 | | .CONST 0x0004 ; Address of exception handler
01ba 0003 | | .CONST 0x0003 ; Number of locals
01bb INIT_01b8:
01bb 00da | | Load_Top At_Offset_2
01bc 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01bd e224 | $ | Load 0x1,0x24
01be 01d7 | | Execute Vector,Field_Read
01bf e222 | " | Load 0x1,0x22
01c0 011c | | Execute Any,Convert_Unchecked
01c1 1c01 | | Execute_Immediate Run_Utility,0x1
01c2 0092 0306 | | Action Push_String_Extended,0x306 ; "=>"
01c4 01cc | | Execute Vector,Catenate
01c5 029f 02bb | | Declare_Subprogram For_Call,INIT_02b8
01c7 BODY_01b8:
01c7 e5ff | | Load 0x2,-0x1
01c8 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01c9 e221 | ! | Load 0x1,0x21
01ca 01d7 | | Execute Vector,Field_Read
01cb 6802 |h | Jump_Zero 0x1ce
01cc 8403 | | Call 0x2,0x3
01cd 7807 |x | Jump 0x1d5
01ce 00d9 | | Load_Top At_Offset_1
01cf e5ff | | Load 0x2,-0x1
01d0 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01d1 e5ff | | Load 0x2,-0x1
01d2 822a | * | Call 0x1,0x2a
01d3 01cc | | Execute Vector,Catenate
01d4 4401 |D | Exit_Subprogram With_Result,0x1
01d5 0831 | 1 | Execute_Immediate Raise,0x31
01d6 0000 0000 | | .XXX[0x2]
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 00da | | Load_Top At_Offset_2
01dc 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01dd 7023 |p# | Jump_Nonzero 0x201
01de 00da | | Load_Top At_Offset_2
01df 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01e0 e221 | ! | Load 0x1,0x21
01e1 01d7 | | Execute Vector,Field_Read
01e2 680b |h | Jump_Zero 0x1ee
01e3 00da | | Load_Top At_Offset_2
01e4 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01e5 00db | | Load_Top At_Offset_3
01e6 8229 | ) | Call 0x1,0x29
01e7 7006 |p | Jump_Nonzero 0x1ee
01e8 00da | | Load_Top At_Offset_2
01e9 00db | | Load_Top At_Offset_3
01ea 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01eb 8228 | ( | Call 0x1,0x28
01ec 00d1 | | Pop_Control Pop_Count_1
01ed 4501 |E | Exit_Subprogram 0x1
01ee 00da | | Load_Top At_Offset_2
01ef 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01f0 0f04 | | Execute_Immediate Equal,0x4
01f1 6804 |h | Jump_Zero 0x1f6
01f2 4801 |H | Short_Literal 0x1
01f3 00db | | Load_Top At_Offset_3
01f4 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01f5 4501 |E | Exit_Subprogram 0x1
01f6 e21e | | Load 0x1,0x1e
01f7 00db | | Load_Top At_Offset_3
01f8 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01f9 0268 | h | Execute Discrete,Successor
01fa 00db | | Load_Top At_Offset_3
01fb 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
01fc 00da | | Load_Top At_Offset_2
01fd 00db | | Load_Top At_Offset_3
01fe 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01ff 8227 | ' | Call 0x1,0x27
0200 00d1 | | Pop_Control Pop_Count_1
0201 4501 |E | Exit_Subprogram 0x1
0202 0000 0000 | | .BLANK 0000[0x6]
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 4607 |F | Jump_Case 0x7
020c 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
020d 7807 |x | Jump 0x215 ; case 0x1
020e 780a |x | Jump 0x219 ; case 0x2
020f 780e |x | Jump 0x21e ; case 0x3
0210 7811 |x | Jump 0x222 ; case 0x4
0211 7812 |x | Jump 0x224 ; case 0x5
0212 7813 |x | Jump 0x226 ; case 0x6
0213 7816 |x | Jump 0x22a ; case 0x7
0214 4302 |C | .XXX[0x1]
0215 00da | | Load_Top At_Offset_2
0216 0091 02fb | | Action Push_String_Extended_Indexed,0x2fb ; "NONE"
0218 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0219 00db | | Load_Top At_Offset_3
021a 00db | | Load_Top At_Offset_3
021b 00e0 | | Load_Encached Standard_Cache
021c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
021d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
021e 00da | | Load_Top At_Offset_2
021f 00e0 | | Load_Encached Standard_Cache
0220 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0221 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0222 00db | | Load_Top At_Offset_3
0223 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0224 00db | | Load_Top At_Offset_3
0225 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0226 e21e | | Load 0x1,0x1e
0227 00dc | | Load_Top At_Offset_4
0228 0267 | g | Execute Discrete,Predecessor
0229 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
022a e21e | | Load 0x1,0x1e
022b 00dc | | Load_Top At_Offset_4
022c 0268 | h | Execute Discrete,Successor
022d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
022e 0000 0000 | | .XXX[0x2]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0233 | 3 | .CONST 0x0233 ; Address of begin
0231 0004 | | .CONST 0x0004 ; Address of exception handler
0232 0001 | | .CONST 0x0001 ; Number of locals
0233 BODY_0230:
0233 INIT_0230:
0233 4607 |F | Jump_Case 0x7
0234 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
0235 7807 |x | Jump 0x23d ; case 0x1
0236 780a |x | Jump 0x241 ; case 0x2
0237 780e |x | Jump 0x246 ; case 0x3
0238 7811 |x | Jump 0x24a ; case 0x4
0239 7812 |x | Jump 0x24c ; case 0x5
023a 7813 |x | Jump 0x24e ; case 0x6
023b 7816 |x | Jump 0x252 ; case 0x7
023c 4302 |C | .XXX[0x1]
023d 00da | | Load_Top At_Offset_2
023e 0091 0300 | | Action Push_String_Extended_Indexed,0x300 ; "N"
0240 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0241 00db | | Load_Top At_Offset_3
0242 00db | | Load_Top At_Offset_3
0243 00e0 | | Load_Encached Standard_Cache
0244 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0245 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0246 00da | | Load_Top At_Offset_2
0247 00e0 | | Load_Encached Standard_Cache
0248 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0249 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
024a 00db | | Load_Top At_Offset_3
024b 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
024c 00db | | Load_Top At_Offset_3
024d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
024e e222 | " | Load 0x1,0x22
024f 00dc | | Load_Top At_Offset_4
0250 0267 | g | Execute Discrete,Predecessor
0251 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0252 e222 | " | Load 0x1,0x22
0253 00dc | | Load_Top At_Offset_4
0254 0268 | h | Execute Discrete,Successor
0255 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0256 0000 0000 | | .XXX[0x2]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 025b | [ | .CONST 0x025b ; Address of begin
0259 0004 | | .CONST 0x0004 ; Address of exception handler
025a 0001 | | .CONST 0x0001 ; Number of locals
025b BODY_0258:
025b INIT_0258:
025b e20d | | Load 0x1,0xd
025c 0322 | " | Declare_Variable Record
025d 4800 |H | Short_Literal 0x0
025e 00d9 | | Load_Top At_Offset_1
025f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0260 4800 |H | Short_Literal 0x0
0261 00d9 | | Load_Top At_Offset_1
0262 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0263 4800 |H | Short_Literal 0x0
0264 00d9 | | Load_Top At_Offset_1
0265 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0266 4800 |H | Short_Literal 0x0
0267 00d9 | | Load_Top At_Offset_1
0268 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0269 00ca | | Action Exit_Nullary_Function
026a 0000 0000 | | .BLANK 0000[0x6]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273 | s | .CONST 0x0273 ; Address of begin
0271 0004 | | .CONST 0x0004 ; Address of exception handler
0272 0001 | | .CONST 0x0001 ; Number of locals
0273 BODY_0270:
0273 INIT_0270:
0273 4502 |E | Exit_Subprogram 0x2
0274 0000 0000 | | .BLANK 0000[0x4]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027b | { | .CONST 0x027b ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 0001 | | .CONST 0x0001 ; Number of locals
027b BODY_0278:
027b INIT_0278:
027b 4502 |E | Exit_Subprogram 0x2
027c 0000 0000 | | .BLANK 0000[0x4]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0283 | | .CONST 0x0283 ; Address of begin
0281 0004 | | .CONST 0x0004 ; Address of exception handler
0282 0001 | | .CONST 0x0001 ; Number of locals
0283 BODY_0280:
0283 INIT_0280:
0283 4801 |H | Short_Literal 0x1
0284 4402 |D | Exit_Subprogram With_Result,0x2
0285 0000 0000 | | .XXX[0x3]
0287 0000 | |
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028b | | .CONST 0x028b ; Address of begin
0289 0004 | | .CONST 0x0004 ; Address of exception handler
028a 0001 | | .CONST 0x0001 ; Number of locals
028b BODY_0288:
028b INIT_0288:
028b 00db | | Load_Top At_Offset_3
028c 4604 |F | Jump_Case 0x4
028d 780a |x | Jump 0x298 ; case 0x0
028e 780a |x | Jump 0x299 ; case 0x1
028f 780f |x | Jump 0x29f ; case 0x2
0290 7814 |x | Jump 0x2a5 ; case 0x3
0291 7800 |x | Jump 0x292 ; case 0x4
0292 00da | | Load_Top At_Offset_2
0293 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0294 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0295 00e0 | | Load_Encached Standard_Cache
0296 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0297 4402 |D | Exit_Subprogram With_Result,0x2
0298 0833 | 3 | Execute_Immediate Raise,0x33
0299 00da | | Load_Top At_Offset_2
029a 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
029b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
029c 00e0 | | Load_Encached Standard_Cache
029d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
029e 4402 |D | Exit_Subprogram With_Result,0x2
029f 00da | | Load_Top At_Offset_2
02a0 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02a1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02a2 00e0 | | Load_Encached Standard_Cache
02a3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02a4 4402 |D | Exit_Subprogram With_Result,0x2
02a5 00da | | Load_Top At_Offset_2
02a6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02a7 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
02a8 00e0 | | Load_Encached Standard_Cache
02a9 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02aa 4402 |D | Exit_Subprogram With_Result,0x2
02ab 0000 0000 | | .BLANK 0000[0x5]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b3 | | .CONST 0x02b3 ; Address of begin
02b1 0004 | | .CONST 0x0004 ; Address of exception handler
02b2 0001 | | .CONST 0x0001 ; Number of locals
02b3 BODY_02b0:
02b3 INIT_02b0:
02b3 00ea | | Load_Encached Null_String_Cache
02b4 4402 |D | Exit_Subprogram With_Result,0x2
02b5 0000 0000 | | .XXX[0x3]
02b7 0000 | |
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bf | | .CONST 0x02bf ; Address of begin
02b9 0004 | | .CONST 0x0004 ; Address of exception handler
02ba 0002 | | .CONST 0x0002 ; Number of locals
02bb INIT_02b8:
02bb e5ff | | Load 0x2,-0x1
02bc 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
02bd e5ff | | Load 0x2,-0x1
02be 822b | + | Call 0x1,0x2b
02bf BODY_02b8:
02bf e5ff | | Load 0x2,-0x1
02c0 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
02c1 6808 |h | Jump_Zero 0x2ca
02c2 e402 | | Load 0x2,0x2
02c3 0092 0307 | | Action Push_String_Extended,0x307 ; "("
02c5 01cc | | Execute Vector,Catenate
02c6 00d9 | | Load_Top At_Offset_1
02c7 01cc | | Execute Vector,Catenate
02c8 00cb | | Action Pop_Block_With_Result
02c9 4401 |D | Exit_Subprogram With_Result,0x1
02ca 00d8 | | Load_Top At_Offset_0
02cb 00cb | | Action Pop_Block_With_Result
02cc 4401 |D | Exit_Subprogram With_Result,0x1
02cd 0000 0000 | | .XXX[0x3]
02cf 0000 | |
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02d3 | | .CONST 0x02d3 ; Address of begin
02d1 0004 | | .CONST 0x0004 ; Address of exception handler
02d2 0001 | | .CONST 0x0001 ; Number of locals
02d3 BODY_02d0:
02d3 INIT_02d0:
02d3 4601 |F | Jump_Case 0x1
02d4 7801 |x | Jump 0x2d6 ; case 0x0
02d5 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
02d6 00da | | Load_Top At_Offset_2
02d7 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02d8 1c00 | | Execute_Immediate Run_Utility,0x0
02d9 4800 |H | Short_Literal 0x0
02da 00db | | Load_Top At_Offset_3
02db 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
02dc 4800 |H | Short_Literal 0x0
02dd 00db | | Load_Top At_Offset_3
02de 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
02df 4801 |H | Short_Literal 0x1
02e0 00db | | Load_Top At_Offset_3
02e1 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
02e2 4302 |C | Exit_Subprogram From_Utility,0x2
02e3 0000 0000 | | .BLANK 0000[0x5]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02eb | | .CONST 0x02eb ; Address of begin
02e9 0004 | | .CONST 0x0004 ; Address of exception handler
02ea 0001 | | .CONST 0x0001 ; Number of locals
02eb BODY_02e8:
02eb INIT_02e8:
02eb 4601 |F | Jump_Case 0x1
02ec 7801 |x | Jump 0x2ee ; case 0x0
02ed 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
02ee 4800 |H | Short_Literal 0x0
02ef 00db | | Load_Top At_Offset_3
02f0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02f1 4800 |H | Short_Literal 0x0
02f2 00db | | Load_Top At_Offset_3
02f3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
02f4 4800 |H | Short_Literal 0x0
02f5 00db | | Load_Top At_Offset_3
02f6 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
02f7 4800 |H | Short_Literal 0x0
02f8 00db | | Load_Top At_Offset_3
02f9 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
02fa 4302 |C | Exit_Subprogram From_Utility,0x2
02fb ; --------------------------------------------------------------------------------------
02fb ; STRING TABLE
02fb ; --------------------------------------------------------------------------------------
02fb 001c | | .STRTAB 0x001c->0x0309 ; "NONE"
02fc 001e | | .STRTAB 0x001e->0x030b ; "TOTAL_SEGMENTS"
02fd 002a | * | .STRTAB 0x002a->0x0312 ; "HIT_SEGMENTS"
02fe 0034 | 4 | .STRTAB 0x0034->0x0318 ; "TOTAL_DECISIONS"
02ff 0041 | A | .STRTAB 0x0041->0x031f ; "HIT_DECISIONS"
0300 004c | L | .STRTAB 0x004c->0x0326 ; "N"
0301 004b | K | .STRTAB 0x004b->0x0326 ; "TS"
0302 004b | K | .STRTAB 0x004b->0x0327 ; "HS"
0303 004b | K | .STRTAB 0x004b->0x0328 ; "TD"
0304 004b | K | .STRTAB 0x004b->0x0329 ; "HD"
0305 004b | K | .STRTAB 0x004b->0x032a ; "others => Unspecified"
0306 005e | ^ | .STRTAB 0x005e->0x0335 ; "=>"
0307 005e | ^ | .STRTAB 0x005e->0x0336 ; "("
0308 005d | ] | .STREND 0x005d->0x0336
0309 4e4f 4e45 |NONE| .STRTAB_STRINGS
0337 0000 | | .XXX[0x1]
0338 ; --------------------------------------------------------------------------------------
0338 ; Debug Table
0338 ; --------------------------------------------------------------------------------------
0338 0004 000a | | .DEBUG4 0x0004,0x000a,0x4459,0x0000,0x0001,0x0000
033e 0000 0000 | | .BLANK 0000[0xc2]