|
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_ccb0b3
└─⟦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 0320 | | .CONST 0x0320 ; 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 007f | | .CONST 0x007f ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 001c | | .CONST 0x001c ; Number of locals
000b INIT_0008:
000b 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated
000d 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated
000f 00bf | | Action Accept_Activation
0010 e001 | | Load 0x0,0x1
0011 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0012 02a0 | | Declare_Subprogram Null_Subprogram
0013 03ad | | Declare_Type Heap_Access,Defined
0014 e002 | | Load 0x0,0x2
0015 e003 | | Load 0x0,0x3
0016 e001 | | Load 0x0,0x1
0017 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0018 00db | | Load_Top At_Offset_3
0019 e004 | | Load 0x0,0x4
001a 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
001b 0387 | | Declare_Variable Package
001c 00d8 | | Load_Top At_Offset_0
001d 020f | | Execute Module,Activate
001e e005 | | Load 0x0,0x5
001f e006 | | Load 0x0,0x6
0020 e001 | | Load 0x0,0x1
0021 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0022 e20f | | Load 0x1,0xf
0023 e007 | | Load 0x0,0x7
0024 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0025 0387 | | Declare_Variable Package
0026 00d8 | | Load_Top At_Offset_0
0027 020f | | Execute Module,Activate
0028 e008 | | Load 0x0,0x8
0029 e009 | | Load 0x0,0x9
002a e001 | | Load 0x0,0x1
002b 1b17 | | Execute Package,Field_Read,Field_Number 0x17
002c e004 | | Load 0x0,0x4
002d 1b2d | - | Execute Package,Field_Read,Field_Number 0x2d
002e 0387 | | Declare_Variable Package
002f 00d8 | | Load_Top At_Offset_0
0030 020f | | Execute Module,Activate
0031 4800 |H | Short_Literal 0x0
0032 48ff |H | Short_Literal 0xff
0033 e004 | | Load 0x0,0x4
0034 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0035 029f 00f3 | | Declare_Subprogram INIT_00f0,For_Call
0037 4801 |H | Short_Literal 0x1
0038 035d | ] | Declare_Type Array,Defined
0039 00d8 | | Load_Top At_Offset_0
003a 0337 | 7 | Declare_Variable Array
003b 00d8 | | Load_Top At_Offset_0
003c 1c00 | | Execute_Immediate Run_Utility,0x0
003d e00a | | Load 0x0,0xa
003e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
003f 4801 |H | Short_Literal 0x1
0040 4828 |H( | Short_Literal 0x28
0041 00e9 | | Load_Encached String_Cache
0042 035b | [ | Declare_Type Array,Constrained
0043 00e3 | | Load_Encached Natural_Cache
0044 e001 | | Load 0x0,0x1
0045 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
0046 029f 010b | | Declare_Subprogram INIT_0108,For_Call
0048 4804 |H | Short_Literal 0x4
0049 032d | - | Declare_Type Record,Defined
004a 00d8 | | Load_Top At_Offset_0
004b 0322 | " | Declare_Variable Record
004c 4800 |H | Short_Literal 0x0
004d 00d9 | | Load_Top At_Offset_1
004e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
004f e001 | | Load 0x0,0x1
0050 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
0051 00d9 | | Load_Top At_Offset_1
0052 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0053 00d9 | | Load_Top At_Offset_1
0054 3001 |0 | Execute Record,Field_Type,Field_Number 0x1
0055 0337 | 7 | Declare_Variable Array
0056 4828 |H( | Short_Literal 0x28
0057 4801 |H | Short_Literal 0x1
0058 4820 |H | Short_Literal 0x20
0059 00d9 | | Load_Top At_Offset_1
005a e217 | | Load 0x1,0x17
005b 01d6 | | Execute Vector,Field_Write
005c 3ffb |? | Loop_Increasing 0x58
005d 00da | | Load_Top At_Offset_2
005e 3001 |0 | Execute Record,Field_Type,Field_Number 0x1
005f 0119 | | Execute Any,Check_In_Formal_Type
0060 00d9 | | Load_Top At_Offset_1
0061 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0062 4800 |H | Short_Literal 0x0
0063 00d9 | | Load_Top At_Offset_1
0064 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0065 029d 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call
0067 029d 020b | | Declare_Subprogram INIT_0208,For_Outer_Call
0069 029d 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call
006b 029d 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call
006d 029d 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call
006f e00b | | Load 0x0,0xb
0070 e00c | | Load 0x0,0xc
0071 e215 | | Load 0x1,0x15
0072 e216 | | Load 0x1,0x16
0073 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0074 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0075 0092 02e0 | | Action Push_String_Extended,0x2e0 ; "UNKNOWN"
0077 e00d | | Load 0x0,0xd
0078 0387 | | Declare_Variable Package
0079 00d8 | | Load_Top At_Offset_0
007a 020f | | Execute Module,Activate
007b 1d0d | | Execute_Immediate Reference_Lex_1,0xd
007c 00c7 | | Action Elaborate_Subprogram
007d 1d0e | | Execute_Immediate Reference_Lex_1,0xe
007e 00c7 | | Action Elaborate_Subprogram
007f BODY_0008:
007f 00be | | Action Activate_Tasks
0080 00bc | | Action Signal_Activated
0081 00bb | | Action Signal_Completion
0082 0000 0000 | | .BLANK 0000[0x6]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 0095 | | .CONST 0x0095 ; Address of begin
0089 00a5 | | .CONST 0x00a5 ; Address of exception handler
008a 0003 | | .CONST 0x0003 ; Number of locals
008b INIT_0088:
008b e215 | | Load 0x1,0x15
008c 0322 | " | Declare_Variable Record
008d e216 | | Load 0x1,0x16
008e 00d9 | | Load_Top At_Offset_1
008f 017d | } | Execute Record,Structure_Write
0090 e00a | | Load 0x0,0xa
0091 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0092 e00a | | Load 0x0,0xa
0093 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0094 03f1 | | Declare_Variable Discrete,With_Value
0095 BODY_0088:
0095 e00a | | Load 0x0,0xa
0096 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0097 e00e | | Load 0x0,0xe
0098 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0099 00ca | | Action Exit_Nullary_Function
009a 02e1 e00a | | .XXX[0xb]
009c 1811 00e0 | |
009e 1818 01cc | |
00a0 e010 1813 | |
00a2 00d9 3c03 | < |
00a4 00ca | |
00a5 TRAP_0088:
00a5 0007 | | Action Break_Optional
00a6 4801 |H | Short_Literal 0x1
00a7 4802 |H | Short_Literal 0x2
00a8 e011 | | Load 0x0,0x11
00a9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00aa 035b | [ | Declare_Type Array,Constrained
00ab 0337 | 7 | Declare_Variable Array
00ac 4800 |H | Short_Literal 0x0
00ad 4801 |H | Short_Literal 0x1
00ae e012 | | Load 0x0,0x12
00af 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00b0 e011 | | Load 0x0,0x11
00b1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00b2 4801 |H | Short_Literal 0x1
00b3 00da | | Load_Top At_Offset_2
00b4 01d6 | | Execute Vector,Field_Write
00b5 0092 02e2 | | Action Push_String_Extended,0x2e2 ; "Get"
00b7 e011 | | Load 0x0,0x11
00b8 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00b9 4802 |H | Short_Literal 0x2
00ba 00da | | Load_Top At_Offset_2
00bb 01d6 | | Execute Vector,Field_Write
00bc 6003 |` | Indirect_Literal Discrete,0xc0,{0x00000000, 0x00006803}
00bd e013 | | Load 0x0,0x13
00be 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
00bf 0831 | 1 | Execute_Immediate Raise,0x31
00c0 0000 0000 | | .LITERAL {0x00000000, 0x00006803}
00c4 0000 0000 | | .BLANK 0000[0x4]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb | | .CONST 0x00cb ; Address of begin
00c9 00d0 | | .CONST 0x00d0 ; Address of exception handler
00ca 0001 | | .CONST 0x0001 ; Number of locals
00cb BODY_00c8:
00cb INIT_00c8:
00cb e00a | | Load 0x0,0xa
00cc 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00cd e21c | | Load 0x1,0x1c
00ce 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00cf 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00d0 TRAP_00c8:
00d0 0007 | | Action Break_Optional
00d1 4801 |H | Short_Literal 0x1
00d2 4802 |H | Short_Literal 0x2
00d3 e011 | | Load 0x0,0x11
00d4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00d5 035b | [ | Declare_Type Array,Constrained
00d6 0337 | 7 | Declare_Variable Array
00d7 4800 |H | Short_Literal 0x0
00d8 4801 |H | Short_Literal 0x1
00d9 e012 | | Load 0x0,0x12
00da 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00db e011 | | Load 0x0,0x11
00dc 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00dd 4801 |H | Short_Literal 0x1
00de 00da | | Load_Top At_Offset_2
00df 01d6 | | Execute Vector,Field_Write
00e0 0092 02e3 | | Action Push_String_Extended,0x2e3 ; "Destroy"
00e2 e011 | | Load 0x0,0x11
00e3 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00e4 4802 |H | Short_Literal 0x2
00e5 00da | | Load_Top At_Offset_2
00e6 01d6 | | Execute Vector,Field_Write
00e7 67d8 |g | Indirect_Literal Discrete,0xc0,{0x00000000, 0x00006803}
00e8 e013 | | Load 0x0,0x13
00e9 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
00ea 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00eb 0000 0000 | | .BLANK 0000[0x5]
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 00d1 | | Pop_Control Pop_Count_1
00f4 00da | | Load_Top At_Offset_2
00f5 01dc | | Execute Vector,Last
00f6 00db | | Load_Top At_Offset_3
00f7 01dd | | Execute Vector,First
00f8 0263 | c | Execute Discrete,Above_Bound
00f9 700a |p | Jump_Nonzero 0x104
00fa 00d8 | | Load_Top At_Offset_0
00fb e5ff | | Load 0x2,-0x1
00fc 01d5 | | Execute Vector,Field_Reference
00fd 0125 | % | Execute Any,Set_Constraint
00fe 00d8 | | Load_Top At_Offset_0
00ff e5ff | | Load 0x2,-0x1
0100 01d5 | | Execute Vector,Field_Reference
0101 1c00 | | Execute_Immediate Run_Utility,0x0
0102 0a01 | | Execute_Immediate Plus,0x1
0103 7ff4 | | Jump 0xf8
0104 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0105 0000 0000 | | .XXX[0x3]
0107 0000 | |
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 4608 |F | Jump_Case 0x9
010c 7808 |x | Jump 0x115 ; case 0x0
010d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
010e 780a |x | Jump 0x119 ; case 0x2
010f 7809 |x | Jump 0x119 ; case 0x3
0110 7808 |x | Jump 0x119 ; case 0x4
0111 7807 |x | Jump 0x119 ; case 0x5
0112 7806 |x | Jump 0x119 ; case 0x6
0113 7805 |x | Jump 0x119 ; case 0x7
0114 7804 |x | Jump 0x119 ; case 0x8
0115 4800 |H | Short_Literal 0x0
0116 00db | | Load_Top At_Offset_3
0117 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0118 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0119 0869 | i | Execute_Immediate Raise,0x69
011a 0000 0000 | | .BLANK 0000[0x6]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 013b | ; | .CONST 0x013b ; Address of begin
0121 0004 | | .CONST 0x0004 ; Address of exception handler
0122 0006 | | .CONST 0x0006 ; Number of locals
0123 INIT_0120:
0123 e014 | | Load 0x0,0x14
0124 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0125 02c7 | | Declare_Variable Any
0126 00d8 | | Load_Top At_Offset_0
0127 1c00 | | Execute_Immediate Run_Utility,0x0
0128 e015 | | Load 0x0,0x15
0129 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
012a 1b17 | | Execute Package,Field_Read,Field_Number 0x17
012b 02c7 | | Declare_Variable Any
012c 00d8 | | Load_Top At_Offset_0
012d 1c00 | | Execute_Immediate Run_Utility,0x0
012e e015 | | Load 0x0,0x15
012f 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0130 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0131 02c7 | | Declare_Variable Any
0132 00d8 | | Load_Top At_Offset_0
0133 1c00 | | Execute_Immediate Run_Utility,0x0
0134 e015 | | Load 0x0,0x15
0135 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0136 e015 | | Load 0x0,0x15
0137 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0138 02ff | | Declare_Variable Variant_Record
0139 00d8 | | Load_Top At_Offset_0
013a 1c00 | | Execute_Immediate Run_Utility,0x0
013b BODY_0120:
013b e004 | | Load 0x0,0x4
013c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
013d e5fd | | Load 0x2,-0x3
013e 4800 |H | Short_Literal 0x0
013f 60c4 |` | Indirect_Literal Discrete,0x204,{0x00000000, 0x00004000}
0140 e016 | | Load 0x0,0x16
0141 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0142 e00a | | Load 0x0,0xa
0143 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0144 e015 | | Load 0x0,0x15
0145 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0146 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0147 4800 |H | Short_Literal 0x0
0148 e5fe | | Load 0x2,-0x2
0149 e5ff | | Load 0x2,-0x1
014a e004 | | Load 0x0,0x4
014b 1820 | | Execute Package,Field_Execute,Field_Number 0x20
014c c5fd | | Store 0x2,-0x3
014d 005a | Z | Store_Top Discrete,At_Offset_2
014e 00d9 | | Load_Top At_Offset_1
014f 460e |F | Jump_Case 0xf
0150 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x0
0151 780d |x | Jump 0x15f ; case 0x1
0152 780c |x | Jump 0x15f ; case 0x2
0153 780b |x | Jump 0x15f ; case 0x3
0154 780a |x | Jump 0x15f ; case 0x4
0155 7809 |x | Jump 0x15f ; case 0x5
0156 7808 |x | Jump 0x15f ; case 0x6
0157 7807 |x | Jump 0x15f ; case 0x7
0158 7806 |x | Jump 0x15f ; case 0x8
0159 781e |x | Jump 0x178 ; case 0x9
015a 7804 |x | Jump 0x15f ; case 0xa
015b 7803 |x | Jump 0x15f ; case 0xb
015c 7802 |x | Jump 0x15f ; case 0xc
015d 7801 |x | Jump 0x15f ; case 0xd
015e 7800 |x | Jump 0x15f ; case 0xe
015f e013 | | Load 0x0,0x13
0160 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0161 4801 |H | Short_Literal 0x1
0162 4802 |H | Short_Literal 0x2
0163 e011 | | Load 0x0,0x11
0164 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0165 035b | [ | Declare_Type Array,Constrained
0166 0337 | 7 | Declare_Variable Array
0167 e5fe | | Load 0x2,-0x2
0168 e011 | | Load 0x0,0x11
0169 1810 | | Execute Package,Field_Execute,Field_Number 0x10
016a 4801 |H | Short_Literal 0x1
016b 00da | | Load_Top At_Offset_2
016c 01d6 | | Execute Vector,Field_Write
016d 00db | | Load_Top At_Offset_3
016e e011 | | Load 0x0,0x11
016f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0170 4802 |H | Short_Literal 0x2
0171 00da | | Load_Top At_Offset_2
0172 01d6 | | Execute Vector,Field_Write
0173 608c |` | Indirect_Literal Discrete,0x200,{0x00000000, 0x00005001}
0174 e013 | | Load 0x0,0x13
0175 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0176 c5fc | | Store 0x2,-0x4
0177 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0178 e015 | | Load 0x0,0x15
0179 1b0d | | Execute Package,Field_Read,Field_Number 0xd
017a 00db | | Load_Top At_Offset_3
017b 0120 | | Execute Any,Is_Value
017c 6802 |h | Jump_Zero 0x17f
017d 00f1 | | Load_Encached Diana_Temp_Seq
017e 7801 |x | Jump 0x180
017f 00db | | Load_Top At_Offset_3
0180 e403 | | Load 0x2,0x3
0181 0120 | | Execute Any,Is_Value
0182 6804 |h | Jump_Zero 0x187
0183 e015 | | Load 0x0,0x15
0184 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0185 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0186 7801 |x | Jump 0x188
0187 e403 | | Load 0x2,0x3
0188 e402 | | Load 0x2,0x2
0189 0120 | | Execute Any,Is_Value
018a 6803 |h | Jump_Zero 0x18e
018b e014 | | Load 0x0,0x14
018c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
018d 7801 |x | Jump 0x18f
018e e402 | | Load 0x2,0x2
018f e406 | | Load 0x2,0x6
0190 6073 |`s | Indirect_Literal Discrete,0x204,{0x00000000, 0x00004000}
0191 e016 | | Load 0x0,0x16
0192 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0193 4800 |H | Short_Literal 0x0
0194 e015 | | Load 0x0,0x15
0195 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0196 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0197 e015 | | Load 0x0,0x15
0198 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0199 6062 |`b | Indirect_Literal Discrete,0x1fc,{0x00000000, 0x7fffffff}
019a 4ffc |O | Short_Literal -0x4
019b 4ffd |O | Short_Literal -0x3
019c e00a | | Load 0x0,0xa
019d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
019e e015 | | Load 0x0,0x15
019f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01a0 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01a1 e015 | | Load 0x0,0x15
01a2 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
01a3 e004 | | Load 0x0,0x4
01a4 180f | | Execute Package,Field_Execute,Field_Number 0xf
01a5 e5fe | | Load 0x2,-0x2
01a6 e015 | | Load 0x0,0x15
01a7 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
01a8 180f | | Execute Package,Field_Execute,Field_Number 0xf
01a9 00d1 | | Pop_Control Pop_Count_1
01aa c402 | | Store 0x2,0x2
01ab c403 | | Store 0x2,0x3
01ac c404 | | Store 0x2,0x4
01ad 005a | Z | Store_Top Discrete,At_Offset_2
01ae 00d9 | | Load_Top At_Offset_1
01af 6819 |h | Jump_Zero 0x1c9
01b0 e013 | | Load 0x0,0x13
01b1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01b2 4801 |H | Short_Literal 0x1
01b3 4802 |H | Short_Literal 0x2
01b4 e011 | | Load 0x0,0x11
01b5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01b6 035b | [ | Declare_Type Array,Constrained
01b7 0337 | 7 | Declare_Variable Array
01b8 e5fe | | Load 0x2,-0x2
01b9 e011 | | Load 0x0,0x11
01ba 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01bb 4801 |H | Short_Literal 0x1
01bc 00da | | Load_Top At_Offset_2
01bd 01d6 | | Execute Vector,Field_Write
01be 00db | | Load_Top At_Offset_3
01bf e011 | | Load 0x0,0x11
01c0 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
01c1 4802 |H | Short_Literal 0x2
01c2 00da | | Load_Top At_Offset_2
01c3 01d6 | | Execute Vector,Field_Write
01c4 6033 |`3 | Indirect_Literal Discrete,0x1f8,{0x00000000, 0x00005002}
01c5 e013 | | Load 0x0,0x13
01c6 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
01c7 c5fc | | Store 0x2,-0x4
01c8 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01c9 e004 | | Load 0x0,0x4
01ca 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01cb 00d9 | | Load_Top At_Offset_1
01cc e5fd | | Load 0x2,-0x3
01cd 4801 |H | Short_Literal 0x1
01ce 6035 |`5 | Indirect_Literal Discrete,0x204,{0x00000000, 0x00004000}
01cf e016 | | Load 0x0,0x16
01d0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01d1 e5ff | | Load 0x2,-0x1
01d2 e004 | | Load 0x0,0x4
01d3 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
01d4 c5fd | | Store 0x2,-0x3
01d5 00d1 | | Pop_Control Pop_Count_1
01d6 005a | Z | Store_Top Discrete,At_Offset_2
01d7 00d9 | | Load_Top At_Offset_1
01d8 6818 |h | Jump_Zero 0x1f1
01d9 e013 | | Load 0x0,0x13
01da 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01db 4801 |H | Short_Literal 0x1
01dc 4802 |H | Short_Literal 0x2
01dd e011 | | Load 0x0,0x11
01de 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01df 035b | [ | Declare_Type Array,Constrained
01e0 0337 | 7 | Declare_Variable Array
01e1 00da | | Load_Top At_Offset_2
01e2 e011 | | Load 0x0,0x11
01e3 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01e4 4801 |H | Short_Literal 0x1
01e5 00da | | Load_Top At_Offset_2
01e6 01d6 | | Execute Vector,Field_Write
01e7 00db | | Load_Top At_Offset_3
01e8 e011 | | Load 0x0,0x11
01e9 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
01ea 4802 |H | Short_Literal 0x2
01eb 00da | | Load_Top At_Offset_2
01ec 01d6 | | Execute Vector,Field_Write
01ed 6006 |` | Indirect_Literal Discrete,0x1f4,{0x00000000, 0x00005004}
01ee e013 | | Load 0x0,0x13
01ef 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
01f0 c5fc | | Store 0x2,-0x4
01f1 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01f2 0000 0000 | | .XXX[0x2]
01f4 0000 0000 | | .LITERAL {0x00000000, 0x00005004}
01f8 0000 0000 | | .LITERAL {0x00000000, 0x00005002}
01fc 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
0200 0000 0000 | | .LITERAL {0x00000000, 0x00005001}
0204 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 0212 | | .CONST 0x0212 ; Address of begin
0209 0004 | | .CONST 0x0004 ; Address of exception handler
020a 0004 | | .CONST 0x0004 ; Number of locals
020b INIT_0208:
020b e001 | | Load 0x0,0x1
020c 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
020d e20f | | Load 0x1,0xf
020e 0007 | | Action Break_Optional
020f e013 | | Load 0x0,0x13
0210 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0211 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0212 BODY_0208:
0212 00d8 | | Load_Top At_Offset_0
0213 e5fe | | Load 0x2,-0x2
0214 e5ff | | Load 0x2,-0x1
0215 4802 |H | Short_Literal 0x2
0216 8217 | | Call 0x1,0x17
0217 c5fe | | Store 0x2,-0x2
0218 0059 | Y | Store_Top Discrete,At_Offset_1
0219 4800 |H | Short_Literal 0x0
021a 00d9 | | Load_Top At_Offset_1
021b e013 | | Load 0x0,0x13
021c 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
021d 6820 |h | Jump_Zero 0x23e
021e 4800 |H | Short_Literal 0x0
021f e004 | | Load 0x0,0x4
0220 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0221 e5fe | | Load 0x2,-0x2
0222 e212 | | Load 0x1,0x12
0223 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0224 e004 | | Load 0x0,0x4
0225 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0226 e5fe | | Load 0x2,-0x2
0227 e210 | | Load 0x1,0x10
0228 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0229 e211 | | Load 0x1,0x11
022a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
022b 0033 | 3 | Store_Top Heap_Access,At_Offset_3
022c e004 | | Load 0x0,0x4
022d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
022e e5fe | | Load 0x2,-0x2
022f e210 | | Load 0x1,0x10
0230 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0231 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0232 00d9 | | Load_Top At_Offset_1
0233 e211 | | Load 0x1,0x11
0234 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0235 00db | | Load_Top At_Offset_3
0236 e007 | | Load 0x0,0x7
0237 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0238 4800 |H | Short_Literal 0x0
0239 e004 | | Load 0x0,0x4
023a 1817 | | Execute Package,Field_Execute,Field_Number 0x17
023b e5fe | | Load 0x2,-0x2
023c e212 | | Load 0x1,0x12
023d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
023e 4502 |E | Exit_Suprogram New_Top_Offset 0x2
023f 0000 | | .XXX[0x1]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0245 | E | .CONST 0x0245 ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0002 | | .CONST 0x0002 ; Number of locals
0243 INIT_0240:
0243 e20f | | Load 0x1,0xf
0244 0007 | | Action Break_Optional
0245 BODY_0240:
0245 e004 | | Load 0x0,0x4
0246 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0247 e5ff | | Load 0x2,-0x1
0248 e210 | | Load 0x1,0x10
0249 1811 | | Execute Package,Field_Execute,Field_Number 0x11
024a 0031 | 1 | Store_Top Heap_Access,At_Offset_1
024b 00d8 | | Load_Top At_Offset_0
024c e211 | | Load 0x1,0x11
024d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
024e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
024f 0000 | | .XXX[0x1]
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 026c | l | .CONST 0x026c ; Address of begin
0251 0004 | | .CONST 0x0004 ; Address of exception handler
0252 0004 | | .CONST 0x0004 ; Number of locals
0253 INIT_0250:
0253 e00a | | Load 0x0,0xa
0254 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0255 00e0 | | Load_Encached Standard_Cache
0256 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0257 0092 02e4 | | Action Push_String_Extended,0x2e4 ; "!machine.temporary.rcf_heap_for_job_"
0259 00d9 | | Load_Top At_Offset_1
025a 01dd | | Execute Vector,First
025b 0a01 | | Execute_Immediate Plus,0x1
025c 00d8 | | Load_Top At_Offset_0
025d 00e2 | | Load_Encached Integer_Cache
025e 0260 | ` | Execute Discrete,In_Type
025f 7001 |p | Jump_Nonzero 0x261
0260 0801 | | Execute_Immediate Raise,0x1
0261 00da | | Load_Top At_Offset_2
0262 01dc | | Execute Vector,Last
0263 00db | | Load_Top At_Offset_3
0264 01cf | | Execute Vector,Slice_Read
0265 01cc | | Execute Vector,Catenate
0266 0007 | | Action Break_Optional
0267 e00a | | Load 0x0,0xa
0268 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0269 e00a | | Load 0x0,0xa
026a 1b10 | | Execute Package,Field_Read,Field_Number 0x10
026b 03f1 | | Declare_Variable Discrete,With_Value
026c BODY_0250:
026c 00d8 | | Load_Top At_Offset_0
026d e5ff | | Load 0x2,-0x1
026e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
026f e214 | | Load 0x1,0x14
0270 00d9 | | Load_Top At_Offset_1
0271 00d8 | | Load_Top At_Offset_0
0272 00da | | Load_Top At_Offset_2
0273 01d7 | | Execute Vector,Field_Read
0274 e403 | | Load 0x2,0x3
0275 8218 | | Call 0x1,0x18
0276 00d9 | | Load_Top At_Offset_1
0277 00db | | Load_Top At_Offset_3
0278 01d6 | | Execute Vector,Field_Write
0279 00d2 | | Pop_Control Pop_Count_2
027a 4800 |H | Short_Literal 0x0
027b e004 | | Load 0x0,0x4
027c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
027d 00da | | Load_Top At_Offset_2
027e e214 | | Load 0x1,0x14
027f 01d7 | | Execute Vector,Field_Read
0280 e212 | | Load 0x1,0x12
0281 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0282 00d8 | | Load_Top At_Offset_0
0283 e214 | | Load 0x1,0x14
0284 01d7 | | Execute Vector,Field_Read
0285 8219 | | Call 0x1,0x19
0286 e5ff | | Load 0x2,-0x1
0287 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0288 00d9 | | Load_Top At_Offset_1
0289 01db | | Execute Vector,Length
028a e5ff | | Load 0x2,-0x1
028b 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
028c 00d9 | | Load_Top At_Offset_1
028d 4801 |H | Short_Literal 0x1
028e 00db | | Load_Top At_Offset_3
028f 01db | | Execute Vector,Length
0290 00d8 | | Load_Top At_Offset_0
0291 00e2 | | Load_Encached Integer_Cache
0292 0260 | ` | Execute Discrete,In_Type
0293 7001 |p | Jump_Nonzero 0x295
0294 0801 | | Execute_Immediate Raise,0x1
0295 e5ff | | Load 0x2,-0x1
0296 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0297 01ce | | Execute Vector,Slice_Write
0298 e00f | | Load 0x0,0xf
0299 180e | | Execute Package,Field_Execute,Field_Number 0xe
029a 4801 |H | Short_Literal 0x1
029b 0092 02e5 | | Action Push_String_Extended,0x2e5 ; "Created Heap for Job"
029d e402 | | Load 0x2,0x2
029e 01cc | | Execute Vector,Catenate
029f e010 | | Load 0x0,0x10
02a0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02a1 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02a2 0000 0000 | | .BLANK 0000[0x6]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ad | | .CONST 0x02ad ; Address of begin
02a9 0004 | | .CONST 0x0004 ; Address of exception handler
02aa 0002 | | .CONST 0x0002 ; Number of locals
02ab INIT_02a8:
02ab e015 | | Load 0x0,0x15
02ac 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02ad BODY_02a8:
02ad e214 | | Load 0x1,0x14
02ae e5ff | | Load 0x2,-0x1
02af 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02b0 e004 | | Load 0x0,0x4
02b1 1b10 | | Execute Package,Field_Read,Field_Number 0x10
02b2 00d9 | | Load_Top At_Offset_1
02b3 00db | | Load_Top At_Offset_3
02b4 01d7 | | Execute Vector,Field_Read
02b5 e004 | | Load 0x0,0x4
02b6 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
02b7 00da | | Load_Top At_Offset_2
02b8 e403 | | Load 0x2,0x3
02b9 01d6 | | Execute Vector,Field_Write
02ba 005b | [ | Store_Top Discrete,At_Offset_3
02bb 00d2 | | Pop_Control Pop_Count_2
02bc 00d8 | | Load_Top At_Offset_0
02bd 681a |h | Jump_Zero 0x2d8
02be 4801 |H | Short_Literal 0x1
02bf 4802 |H | Short_Literal 0x2
02c0 e011 | | Load 0x0,0x11
02c1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02c2 035b | [ | Declare_Type Array,Constrained
02c3 0337 | 7 | Declare_Variable Array
02c4 00d9 | | Load_Top At_Offset_1
02c5 e011 | | Load 0x0,0x11
02c6 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
02c7 4801 |H | Short_Literal 0x1
02c8 00da | | Load_Top At_Offset_2
02c9 01d6 | | Execute Vector,Field_Write
02ca 4801 |H | Short_Literal 0x1
02cb e5ff | | Load 0x2,-0x1
02cc 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
02cd e5ff | | Load 0x2,-0x1
02ce 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
02cf 01cf | | Execute Vector,Slice_Read
02d0 e011 | | Load 0x0,0x11
02d1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02d2 4802 |H | Short_Literal 0x2
02d3 00da | | Load_Top At_Offset_2
02d4 01d6 | | Execute Vector,Field_Write
02d5 6006 |` | Indirect_Literal Discrete,0x2dc,{0x00000000, 0x00006804}
02d6 e013 | | Load 0x0,0x13
02d7 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
02d8 4502 |E | Exit_Suprogram New_Top_Offset 0x2
02d9 0000 0000 | | .XXX[0x3]
02db 0000 | |
02dc 0000 0000 | | .LITERAL {0x00000000, 0x00006804}
02e0 ; --------------------------------------------------------------------------------------
02e0 ; STRING TABLE
02e0 ; --------------------------------------------------------------------------------------
02e0 000e | | .STRTAB 0x000e->0x02e7 ; "UNKNOWN"
02e1 0013 | | .STRTAB 0x0013->0x02ea ; "Returned Null_Segment for process"
02e2 0032 | 2 | .STRTAB 0x0032->0x02fb ; "Get"
02e3 0033 | 3 | .STRTAB 0x0033->0x02fc ; "Destroy"
02e4 0038 | 8 | .STRTAB 0x0038->0x0300 ; "!machine.temporary.rcf_heap_for_job_"
02e5 005a | Z | .STRTAB 0x005a->0x0312 ; "Created Heap for Job"
02e6 006c | l | .STREND 0x006c->0x031c
02e7 554e 4b4e |UNKN| .STRTAB_STRINGS
031c 0000 0000 | | .BLANK 0000[0x4]
0320 ; --------------------------------------------------------------------------------------
0320 ; Debug Table
0320 ; --------------------------------------------------------------------------------------
0320 0004 000d | | .DEBUG4 0x0004,0x000d,0xd9e4,0x0000,0x0001,0x0000
0326 0000 0000 | | .BLANK 0000[0xda]