|
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: 3072 (0xc00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03b8fe
└─⟦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 0410 | | .CONST 0x0410 ; 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 0146 | F | .CONST 0x0146 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0048 | H | .CONST 0x0048 ; Number of locals
000b INIT_0008:
000b 4801 |H | Short_Literal 0x1
000c 6183 |a | Indirect_Literal Discrete,0x190,{0x00000000, 0x00002000}
000d 00e1 | | Load_Encached Boolean_Cache
000e 02a0 | | Declare_Subprogram Null_Subprogram
000f 4801 |H | Short_Literal 0x1
0010 035e | ^ | Declare_Type Array,Defined,Visible
0011 4800 |H | Short_Literal 0x0
0012 48ff |H | Short_Literal 0xff
0013 00e3 | | Load_Encached Natural_Cache
0014 03f9 | | Declare_Type Discrete,Constrained,Visible
0015 00d8 | | Load_Top At_Offset_0
0016 0129 | ) | Execute Any,Make_Visible
0017 6174 |at | Indirect_Literal Discrete,0x18c,{0xffffffff, 0xffff8000}
0018 616f |ao | Indirect_Literal Discrete,0x188,{0x00000000, 0x00007fff}
0019 00e2 | | Load_Encached Integer_Cache
001a 03f9 | | Declare_Type Discrete,Constrained,Visible
001b 4800 |H | Short_Literal 0x0
001c 6167 |ag | Indirect_Literal Discrete,0x184,{0x00000000, 0x0000ffff}
001d 00e3 | | Load_Encached Natural_Cache
001e 03f9 | | Declare_Type Discrete,Constrained,Visible
001f 4800 |H | Short_Literal 0x0
0020 615f |a_ | Indirect_Literal Discrete,0x180,{0x00000000, 0xffffffff}
0021 00e5 | | Load_Encached Long_Integer_Cache
0022 03f9 | | Declare_Type Discrete,Constrained,Visible
0023 4800 |H | Short_Literal 0x0
0024 6157 |aW | Indirect_Literal Discrete,0x17c,{0x0000ffff, 0xffffffff}
0025 00e5 | | Load_Encached Long_Integer_Cache
0026 03f9 | | Declare_Type Discrete,Constrained,Visible
0027 00e5 | | Load_Encached Long_Integer_Cache
0028 0129 | ) | Execute Any,Make_Visible
0029 e001 | | Load 0x0,0x1
002a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
002b 0129 | ) | Execute Any,Make_Visible
002c 4800 |H | Short_Literal 0x0
002d 487f |H | Short_Literal 0x7f
002e 00e3 | | Load_Encached Natural_Cache
002f 03f9 | | Declare_Type Discrete,Constrained,Visible
0030 4800 |H | Short_Literal 0x0
0031 483f |H? | Short_Literal 0x3f
0032 00e3 | | Load_Encached Natural_Cache
0033 03f9 | | Declare_Type Discrete,Constrained,Visible
0034 4800 |H | Short_Literal 0x0
0035 6142 |aB | Indirect_Literal Discrete,0x178,{0x00000000, 0x0007ffff}
0036 00e3 | | Load_Encached Natural_Cache
0037 03f9 | | Declare_Type Discrete,Constrained,Visible
0038 4800 |H | Short_Literal 0x0
0039 613a |a: | Indirect_Literal Discrete,0x174,{0x00000000, 0x00003fff}
003a 00e3 | | Load_Encached Natural_Cache
003b 03f9 | | Declare_Type Discrete,Constrained,Visible
003c 00d9 | | Load_Top At_Offset_1
003d 00db | | Load_Top At_Offset_3
003e e216 | | Load 0x1,0x16
003f 02a0 | | Declare_Subprogram Null_Subprogram
0040 4803 |H | Short_Literal 0x3
0041 032e | . | Declare_Type Record,Defined,Visible
0042 00d8 | | Load_Top At_Offset_0
0043 012c | , | Execute Any,Size
0044 0f20 | | Execute_Immediate Equal,0x20
0045 7001 |p | Jump_Nonzero 0x47
0046 0887 | | Execute_Immediate Raise,0x87
0047 4800 |H | Short_Literal 0x0
0048 4802 |H | Short_Literal 0x2
0049 00da | | Load_Top At_Offset_2
004a 012c | , | Execute Any,Size
004b 026d | m | Execute Discrete,Exponentiate
004c 0aff | | Execute_Immediate Plus,-0x1
004d 00e5 | | Load_Encached Long_Integer_Cache
004e 03f9 | | Declare_Type Discrete,Constrained,Visible
004f a002 | | Store_Unchecked 0x0,0x2
0050 00c6 | | Action Check_Subprogram_Elaborated
0051 00d8 | | Load_Top At_Offset_0
0052 0129 | ) | Execute Any,Make_Visible
0053 00da | | Load_Top At_Offset_2
0054 0129 | ) | Execute Any,Make_Visible
0055 e003 | | Load 0x0,0x3
0056 0129 | ) | Execute Any,Make_Visible
0057 e004 | | Load 0x0,0x4
0058 0129 | ) | Execute Any,Make_Visible
0059 4800 |H | Short_Literal 0x0
005a 0129 | ) | Execute Any,Make_Visible
005b 4800 |H | Short_Literal 0x0
005c 6123 |a# | Indirect_Literal Discrete,0x180,{0x00000000, 0xffffffff}
005d 00e5 | | Load_Encached Long_Integer_Cache
005e 03f9 | | Declare_Type Discrete,Constrained,Visible
005f 4800 |H | Short_Literal 0x0
0060 610f |a | Indirect_Literal Discrete,0x170,{0x00000000, 0x00ffffff}
0061 00e5 | | Load_Encached Long_Integer_Cache
0062 03f9 | | Declare_Type Discrete,Constrained,Visible
0063 00d9 | | Load_Top At_Offset_1
0064 e21a | | Load 0x1,0x1a
0065 02a0 | | Declare_Subprogram Null_Subprogram
0066 4802 |H | Short_Literal 0x2
0067 032e | . | Declare_Type Record,Defined,Visible
0068 00e5 | | Load_Encached Long_Integer_Cache
0069 0129 | ) | Execute Any,Make_Visible
006a 00d8 | | Load_Top At_Offset_0
006b 012c | , | Execute Any,Size
006c 00da | | Load_Top At_Offset_2
006d 012c | , | Execute Any,Size
006e 027f | | Execute Discrete,Equal
006f 7001 |p | Jump_Nonzero 0x71
0070 0887 | | Execute_Immediate Raise,0x87
0071 a002 | | Store_Unchecked 0x0,0x2
0072 00c6 | | Action Check_Subprogram_Elaborated
0073 00d8 | | Load_Top At_Offset_0
0074 0129 | ) | Execute Any,Make_Visible
0075 00da | | Load_Top At_Offset_2
0076 0129 | ) | Execute Any,Make_Visible
0077 e005 | | Load 0x0,0x5
0078 0129 | ) | Execute Any,Make_Visible
0079 e006 | | Load 0x0,0x6
007a 0129 | ) | Execute Any,Make_Visible
007b 4800 |H | Short_Literal 0x0
007c 0129 | ) | Execute Any,Make_Visible
007d 4800 |H | Short_Literal 0x0
007e 60f5 |` | Indirect_Literal Discrete,0x174,{0x00000000, 0x00003fff}
007f 00e3 | | Load_Encached Natural_Cache
0080 03f9 | | Declare_Type Discrete,Constrained,Visible
0081 00e1 | | Load_Encached Boolean_Cache
0082 00e1 | | Load_Encached Boolean_Cache
0083 00da | | Load_Top At_Offset_2
0084 02a0 | | Declare_Subprogram Null_Subprogram
0085 4803 |H | Short_Literal 0x3
0086 032e | . | Declare_Type Record,Defined,Visible
0087 e211 | | Load 0x1,0x11
0088 0129 | ) | Execute Any,Make_Visible
0089 4800 |H | Short_Literal 0x0
008a 4807 |H | Short_Literal 0x7
008b 00da | | Load_Top At_Offset_2
008c 02a0 | | Declare_Subprogram Null_Subprogram
008d 4801 |H | Short_Literal 0x1
008e 035e | ^ | Declare_Type Array,Defined,Visible
008f 4800 |H | Short_Literal 0x0
0090 480f |H | Short_Literal 0xf
0091 e22b | + | Load 0x1,0x2b
0092 02a0 | | Declare_Subprogram Null_Subprogram
0093 4801 |H | Short_Literal 0x1
0094 035e | ^ | Declare_Type Array,Defined,Visible
0095 4800 |H | Short_Literal 0x0
0096 480f |H | Short_Literal 0xf
0097 e223 | # | Load 0x1,0x23
0098 02a0 | | Declare_Subprogram Null_Subprogram
0099 4801 |H | Short_Literal 0x1
009a 035e | ^ | Declare_Type Array,Defined,Visible
009b 4800 |H | Short_Literal 0x0
009c 480f |H | Short_Literal 0xf
009d 00e5 | | Load_Encached Long_Integer_Cache
009e 03f9 | | Declare_Type Discrete,Constrained,Visible
009f 4800 |H | Short_Literal 0x0
00a0 480f |H | Short_Literal 0xf
00a1 00e1 | | Load_Encached Boolean_Cache
00a2 02a0 | | Declare_Subprogram Null_Subprogram
00a3 4801 |H | Short_Literal 0x1
00a4 035e | ^ | Declare_Type Array,Defined,Visible
00a5 4800 |H | Short_Literal 0x0
00a6 4802 |H | Short_Literal 0x2
00a7 029f 014b | K| Declare_Subprogram INIT_0148,For_Call
00a9 03fe | | Declare_Type Discrete,Defined,Visible
00aa 4800 |H | Short_Literal 0x0
00ab 4801 |H | Short_Literal 0x1
00ac 029f 019b | | Declare_Subprogram INIT_0198,For_Call
00ae 03fe | | Declare_Type Discrete,Defined,Visible
00af 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated
00b1 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated
00b3 029a 0203 | | Declare_Subprogram INIT_0200,For_Outer_Call,Visible,Unelaborated
00b5 029a 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call,Visible,Unelaborated
00b7 029a 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call,Visible,Unelaborated
00b9 029a 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call,Visible,Unelaborated
00bb 029a 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call,Visible,Unelaborated
00bd 029a 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call,Visible,Unelaborated
00bf 029a 02d3 | | Declare_Subprogram INIT_02d0,For_Outer_Call,Visible,Unelaborated
00c1 4803 |H | Short_Literal 0x3
00c2 0093 0353 | S| push_full_address INIT_0350
00c4 02a0 | | Declare_Subprogram Null_Subprogram
00c5 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated
00c6 029a 02fb | | Declare_Subprogram INIT_02f8,For_Outer_Call,Visible,Unelaborated
00c8 00bf | | Action Accept_Activation
00c9 4800 |H | Short_Literal 0x0
00ca 480f |H | Short_Literal 0xf
00cb 00e2 | | Load_Encached Integer_Cache
00cc 03f8 | | Declare_Type Discrete,Constrained
00cd 4801 |H | Short_Literal 0x1
00ce 4810 |H | Short_Literal 0x10
00cf 00da | | Load_Top At_Offset_2
00d0 02a0 | | Declare_Subprogram Null_Subprogram
00d1 4801 |H | Short_Literal 0x1
00d2 035d | ] | Declare_Type Array,Defined
00d3 a002 | | Store_Unchecked 0x0,0x2
00d4 00c6 | | Action Check_Subprogram_Elaborated
00d5 00e5 | | Load_Encached Long_Integer_Cache
00d6 00d9 | | Load_Top At_Offset_1
00d7 e007 | | Load 0x0,0x7
00d8 e008 | | Load 0x0,0x8
00d9 4800 |H | Short_Literal 0x0
00da 0007 | | Action Break_Optional
00db 4800 |H | Short_Literal 0x0
00dc 480f |H | Short_Literal 0xf
00dd 00e8 | | Load_Encached Character_Cache
00de 02a0 | | Declare_Subprogram Null_Subprogram
00df 4801 |H | Short_Literal 0x1
00e0 035d | ] | Declare_Type Array,Defined
00e1 00d8 | | Load_Top At_Offset_0
00e2 0337 | 7 | Declare_Variable Array
00e3 00d8 | | Load_Top At_Offset_0
00e4 0335 | 5 | Declare_Variable Array,Duplicate
00e5 00cd | | Action Spare6_Action
00e6 4830 |H0 | Short_Literal 0x30
00e7 4800 |H | Short_Literal 0x0
00e8 00da | | Load_Top At_Offset_2
00e9 01d6 | | Execute Vector,Field_Write
00ea 4831 |H1 | Short_Literal 0x31
00eb 4801 |H | Short_Literal 0x1
00ec 00da | | Load_Top At_Offset_2
00ed 01d6 | | Execute Vector,Field_Write
00ee 4832 |H2 | Short_Literal 0x32
00ef 4802 |H | Short_Literal 0x2
00f0 00da | | Load_Top At_Offset_2
00f1 01d6 | | Execute Vector,Field_Write
00f2 4833 |H3 | Short_Literal 0x33
00f3 4803 |H | Short_Literal 0x3
00f4 00da | | Load_Top At_Offset_2
00f5 01d6 | | Execute Vector,Field_Write
00f6 4834 |H4 | Short_Literal 0x34
00f7 4804 |H | Short_Literal 0x4
00f8 00da | | Load_Top At_Offset_2
00f9 01d6 | | Execute Vector,Field_Write
00fa 4835 |H5 | Short_Literal 0x35
00fb 4805 |H | Short_Literal 0x5
00fc 00da | | Load_Top At_Offset_2
00fd 01d6 | | Execute Vector,Field_Write
00fe 4836 |H6 | Short_Literal 0x36
00ff 4806 |H | Short_Literal 0x6
0100 00da | | Load_Top At_Offset_2
0101 01d6 | | Execute Vector,Field_Write
0102 4837 |H7 | Short_Literal 0x37
0103 4807 |H | Short_Literal 0x7
0104 00da | | Load_Top At_Offset_2
0105 01d6 | | Execute Vector,Field_Write
0106 4838 |H8 | Short_Literal 0x38
0107 4808 |H | Short_Literal 0x8
0108 00da | | Load_Top At_Offset_2
0109 01d6 | | Execute Vector,Field_Write
010a 4839 |H9 | Short_Literal 0x39
010b 4809 |H | Short_Literal 0x9
010c 00da | | Load_Top At_Offset_2
010d 01d6 | | Execute Vector,Field_Write
010e 4841 |HA | Short_Literal 0x41
010f 480a |H | Short_Literal 0xa
0110 00da | | Load_Top At_Offset_2
0111 01d6 | | Execute Vector,Field_Write
0112 4842 |HB | Short_Literal 0x42
0113 480b |H | Short_Literal 0xb
0114 00da | | Load_Top At_Offset_2
0115 01d6 | | Execute Vector,Field_Write
0116 4843 |HC | Short_Literal 0x43
0117 480c |H | Short_Literal 0xc
0118 00da | | Load_Top At_Offset_2
0119 01d6 | | Execute Vector,Field_Write
011a 4844 |HD | Short_Literal 0x44
011b 480d |H | Short_Literal 0xd
011c 00da | | Load_Top At_Offset_2
011d 01d6 | | Execute Vector,Field_Write
011e 4845 |HE | Short_Literal 0x45
011f 480e |H | Short_Literal 0xe
0120 00da | | Load_Top At_Offset_2
0121 01d6 | | Execute Vector,Field_Write
0122 4846 |HF | Short_Literal 0x46
0123 480f |H | Short_Literal 0xf
0124 00da | | Load_Top At_Offset_2
0125 01d6 | | Execute Vector,Field_Write
0126 00d9 | | Load_Top At_Offset_1
0127 01d4 | | Execute Vector,Structure_Write
0128 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34
0129 00c7 | | Action Elaborate_Subprogram
012a 029d 031b | | Declare_Subprogram INIT_0318,For_Outer_Call
012c 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35
012d 00c7 | | Action Elaborate_Subprogram
012e 1d36 | 6 | Execute_Immediate Reference_Lex_1,0x36
012f 00c7 | | Action Elaborate_Subprogram
0130 1d37 | 7 | Execute_Immediate Reference_Lex_1,0x37
0131 00c7 | | Action Elaborate_Subprogram
0132 1d38 | 8 | Execute_Immediate Reference_Lex_1,0x38
0133 00c7 | | Action Elaborate_Subprogram
0134 1d39 | 9 | Execute_Immediate Reference_Lex_1,0x39
0135 00c7 | | Action Elaborate_Subprogram
0136 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a
0137 00c7 | | Action Elaborate_Subprogram
0138 1d3b | ; | Execute_Immediate Reference_Lex_1,0x3b
0139 00c7 | | Action Elaborate_Subprogram
013a 1d3c | < | Execute_Immediate Reference_Lex_1,0x3c
013b 00c7 | | Action Elaborate_Subprogram
013c e009 | | Load 0x0,0x9
013d e00a | | Load 0x0,0xa
013e 4802 |H | Short_Literal 0x2
013f e23d | = | Load 0x1,0x3d
0140 020e | | Execute Module,Augment_Imports
0141 e23d | = | Load 0x1,0x3d
0142 020d | | Execute Module,Elaborate
0143 0007 | | Action Break_Optional
0144 1d3e | > | Execute_Immediate Reference_Lex_1,0x3e
0145 00c7 | | Action Elaborate_Subprogram
0146 BODY_0008:
0146 00bc | | Action Signal_Activated
0147 00bb | | Action Signal_Completion
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 4607 |F | Jump_Case 0x8
014c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
014d 7806 |x | Jump 0x154 ; case 0x1
014e 7809 |x | Jump 0x158 ; case 0x2
014f 780d |x | Jump 0x15d ; case 0x3
0150 7810 |x | Jump 0x161 ; case 0x4
0151 7811 |x | Jump 0x163 ; case 0x5
0152 7812 |x | Jump 0x165 ; case 0x6
0153 7815 |x | Jump 0x169 ; case 0x7
0154 00da | | Load_Top At_Offset_2
0155 0091 03ca | | Action Push_String_Extended_Indexed,0x3ca ; "HEX"
0157 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0158 00db | | Load_Top At_Offset_3
0159 00db | | Load_Top At_Offset_3
015a 00e0 | | Load_Encached Standard_Cache
015b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
015c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
015d 00da | | Load_Top At_Offset_2
015e 00e0 | | Load_Encached Standard_Cache
015f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0160 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0161 00db | | Load_Top At_Offset_3
0162 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0163 00db | | Load_Top At_Offset_3
0164 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0165 e232 | 2 | Load 0x1,0x32
0166 00dc | | Load_Top At_Offset_4
0167 0267 | g | Execute Discrete,Predecessor
0168 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0169 e232 | 2 | Load 0x1,0x32
016a 00dc | | Load_Top At_Offset_4
016b 0268 | h | Execute Discrete,Successor
016c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
016d 0000 0000 | | .XXX[0x3]
016f 0000 | |
0170 0000 0000 | | .LITERAL {0x00000000, 0x00ffffff}
0174 0000 0000 | | .LITERAL {0x00000000, 0x00003fff}
0178 0000 0000 | | .LITERAL {0x00000000, 0x0007ffff}
017c 0000 ffff | | .LITERAL {0x0000ffff, 0xffffffff}
0180 0000 0000 | | .LITERAL {0x00000000, 0xffffffff}
0184 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff}
0188 0000 0000 | | .LITERAL {0x00000000, 0x00007fff}
018c ffff ffff | | .LITERAL {0xffffffff, 0xffff8000}
0190 0000 0000 | | .LITERAL {0x00000000, 0x00002000}
0194 0000 0000 | | .BLANK 0000[0x4]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b | | .CONST 0x019b ; Address of begin
0199 0004 | | .CONST 0x0004 ; Address of exception handler
019a 0001 | | .CONST 0x0001 ; Number of locals
019b BODY_0198:
019b INIT_0198:
019b 4607 |F | Jump_Case 0x8
019c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
019d 7806 |x | Jump 0x1a4 ; case 0x1
019e 7809 |x | Jump 0x1a8 ; case 0x2
019f 780d |x | Jump 0x1ad ; case 0x3
01a0 7810 |x | Jump 0x1b1 ; case 0x4
01a1 7811 |x | Jump 0x1b3 ; case 0x5
01a2 7812 |x | Jump 0x1b5 ; case 0x6
01a3 7815 |x | Jump 0x1b9 ; case 0x7
01a4 00da | | Load_Top At_Offset_2
01a5 0091 03cd | | Action Push_String_Extended_Indexed,0x3cd ; "FULL"
01a7 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
01a8 00db | | Load_Top At_Offset_3
01a9 00db | | Load_Top At_Offset_3
01aa 00e0 | | Load_Encached Standard_Cache
01ab 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01ac 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01ad 00da | | Load_Top At_Offset_2
01ae 00e0 | | Load_Encached Standard_Cache
01af 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01b0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
01b1 00db | | Load_Top At_Offset_3
01b2 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01b3 00db | | Load_Top At_Offset_3
01b4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01b5 e233 | 3 | Load 0x1,0x33
01b6 00dc | | Load_Top At_Offset_4
01b7 0267 | g | Execute Discrete,Predecessor
01b8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01b9 e233 | 3 | Load 0x1,0x33
01ba 00dc | | Load_Top At_Offset_4
01bb 0268 | h | Execute Discrete,Successor
01bc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01bd 0000 0000 | | .XXX[0x3]
01bf 0000 | |
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c3 | | .CONST 0x01c3 ; Address of begin
01c1 0004 | | .CONST 0x0004 ; Address of exception handler
01c2 0001 | | .CONST 0x0001 ; Number of locals
01c3 BODY_01c0:
01c3 INIT_01c0:
01c3 00da | | Load_Top At_Offset_2
01c4 6804 |h | Jump_Zero 0x1c9
01c5 00db | | Load_Top At_Offset_3
01c6 0335 | 5 | Declare_Variable Array,Duplicate
01c7 00cd | | Action Spare6_Action
01c8 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
01c9 e5fd | | Load 0x2,-0x3
01ca 0335 | 5 | Declare_Variable Array,Duplicate
01cb 00cd | | Action Spare6_Action
01cc 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
01cd 0000 0000 | | .XXX[0x3]
01cf 0000 | |
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3 | | .CONST 0x01d3 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0001 | | .CONST 0x0001 ; Number of locals
01d3 BODY_01d0:
01d3 INIT_01d0:
01d3 00db | | Load_Top At_Offset_3
01d4 4602 |F | Jump_Case 0x3
01d5 7815 |x | Jump 0x1eb ; case 0x0
01d6 781b |x | Jump 0x1f2 ; case 0x1
01d7 7800 |x | Jump 0x1d8 ; case 0x2
01d8 4829 |H) | Short_Literal 0x29
01d9 e5fc | | Load 0x2,-0x4
01da e5fd | | Load 0x2,-0x3
01db 4810 |H | Short_Literal 0x10
01dc e5ff | | Load 0x2,-0x1
01dd e00b | | Load 0x0,0xb
01de 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01df 0092 03cf | | Action Push_String_Extended,0x3cf ; " ("
01e1 01cc | | Execute Vector,Catenate
01e2 4820 |H | Short_Literal 0x20
01e3 4800 |H | Short_Literal 0x0
01e4 480a |H | Short_Literal 0xa
01e5 e5ff | | Load 0x2,-0x1
01e6 e00b | | Load 0x0,0xb
01e7 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01e8 01cc | | Execute Vector,Catenate
01e9 01cb | | Execute Vector,Append
01ea 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
01eb e5fc | | Load 0x2,-0x4
01ec e5fd | | Load 0x2,-0x3
01ed 4810 |H | Short_Literal 0x10
01ee e5ff | | Load 0x2,-0x1
01ef e00b | | Load 0x0,0xb
01f0 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01f1 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
01f2 e5fc | | Load 0x2,-0x4
01f3 e5fd | | Load 0x2,-0x3
01f4 480a |H | Short_Literal 0xa
01f5 e5ff | | Load 0x2,-0x1
01f6 e00b | | Load 0x0,0xb
01f7 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01f8 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
01f9 0000 0000 | | .BLANK 0000[0x7]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0203 | | .CONST 0x0203 ; Address of begin
0201 0004 | | .CONST 0x0004 ; Address of exception handler
0202 0001 | | .CONST 0x0001 ; Number of locals
0203 BODY_0200:
0203 INIT_0200:
0203 00db | | Load_Top At_Offset_3
0204 4602 |F | Jump_Case 0x3
0205 7812 |x | Jump 0x218 ; case 0x0
0206 7815 |x | Jump 0x21c ; case 0x1
0207 7800 |x | Jump 0x208 ; case 0x2
0208 4829 |H) | Short_Literal 0x29
0209 e5fd | | Load 0x2,-0x3
020a e5ff | | Load 0x2,-0x1
020b 8248 | H | Call 0x1,0x48
020c 0092 03cf | | Action Push_String_Extended,0x3cf ; " ("
020e 01cc | | Execute Vector,Catenate
020f 4820 |H | Short_Literal 0x20
0210 4800 |H | Short_Literal 0x0
0211 480a |H | Short_Literal 0xa
0212 e5ff | | Load 0x2,-0x1
0213 e00b | | Load 0x0,0xb
0214 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0215 01cc | | Execute Vector,Catenate
0216 01cb | | Execute Vector,Append
0217 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0218 e5fd | | Load 0x2,-0x3
0219 00db | | Load_Top At_Offset_3
021a 8248 | H | Call 0x1,0x48
021b 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
021c e5fc | | Load 0x2,-0x4
021d e5fd | | Load 0x2,-0x3
021e 480a |H | Short_Literal 0xa
021f e5ff | | Load 0x2,-0x1
0220 e00b | | Load 0x0,0xb
0221 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0222 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0223 0000 0000 | | .BLANK 0000[0x5]
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 023c | < | .CONST 0x023c ; Address of begin
0229 0004 | | .CONST 0x0004 ; Address of exception handler
022a 0002 | | .CONST 0x0002 ; Number of locals
022b INIT_0228:
022b 4808 |H | Short_Literal 0x8
022c 00db | | Load_Top At_Offset_3
022d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
022e 090d | | Execute_Immediate Binary_Scale,0xd
022f e5ff | | Load 0x2,-0x1
0230 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0231 0907 | | Execute_Immediate Binary_Scale,0x7
0232 0273 | s | Execute Discrete,Plus
0233 e5ff | | Load 0x2,-0x1
0234 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0235 0273 | s | Execute Discrete,Plus
0236 00d8 | | Load_Top At_Offset_0
0237 00e5 | | Load_Encached Long_Integer_Cache
0238 0260 | ` | Execute Discrete,In_Type
0239 7001 |p | Jump_Nonzero 0x23b
023a 0801 | | Execute_Immediate Raise,0x1
023b 8248 | H | Call 0x1,0x48
023c BODY_0228:
023c 00d8 | | Load_Top At_Offset_0
023d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
023e 0000 0000 | | .XXX[0x2]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0243 | C | .CONST 0x0243 ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0001 | | .CONST 0x0001 ; Number of locals
0243 BODY_0240:
0243 INIT_0240:
0243 4820 |H | Short_Literal 0x20
0244 4808 |H | Short_Literal 0x8
0245 e5ff | | Load 0x2,-0x1
0246 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0247 8248 | H | Call 0x1,0x48
0248 01cb | | Execute Vector,Append
0249 e5fe | | Load 0x2,-0x2
024a e5ff | | Load 0x2,-0x1
024b 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
024c 8237 | 7 | Call 0x1,0x37
024d 01cc | | Execute Vector,Catenate
024e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
024f 0000 | | .XXX[0x1]
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0255 | U | .CONST 0x0255 ; Address of begin
0251 0004 | | .CONST 0x0004 ; Address of exception handler
0252 0003 | | .CONST 0x0003 ; Number of locals
0253 INIT_0250:
0253 00e5 | | Load_Encached Long_Integer_Cache
0254 03e9 | | Declare_Variable Discrete,Duplicate
0255 BODY_0250:
0255 00e5 | | Load_Encached Long_Integer_Cache
0256 00e5 | | Load_Encached Long_Integer_Cache
0257 e5ff | | Load 0x2,-0x1
0258 e001 | | Load 0x0,0x1
0259 1815 | | Execute Package,Field_Execute,Field_Number 0x15
025a 005a | Z | Store_Top Discrete,At_Offset_2
025b 005a | Z | Store_Top Discrete,At_Offset_2
025c 4820 |H | Short_Literal 0x20
025d 4810 |H | Short_Literal 0x10
025e 00da | | Load_Top At_Offset_2
025f 8248 | H | Call 0x1,0x48
0260 01cb | | Execute Vector,Append
0261 4810 |H | Short_Literal 0x10
0262 00db | | Load_Top At_Offset_3
0263 8248 | H | Call 0x1,0x48
0264 01cc | | Execute Vector,Catenate
0265 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0266 0000 0000 | | .XXX[0x2]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 0271 | q | .CONST 0x0271 ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 0004 | | .CONST 0x0004 ; Number of locals
026b INIT_0268:
026b 00da | | Load_Top At_Offset_2
026c 01dc | | Execute Vector,Last
026d 00e3 | | Load_Encached Natural_Cache
026e 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
026f 00e1 | | Load_Encached Boolean_Cache
0270 00e2 | | Load_Encached Integer_Cache
0271 BODY_0268:
0271 00da | | Load_Top At_Offset_2
0272 e5ff | | Load 0x2,-0x1
0273 01d7 | | Execute Vector,Field_Read
0274 0d20 | | Execute_Immediate Less,0x20
0275 6803 |h | Jump_Zero 0x279
0276 00da | | Load_Top At_Offset_2
0277 0aff | | Execute_Immediate Plus,-0x1
0278 005b | [ | Store_Top Discrete,At_Offset_3
0279 00e1 | | Load_Encached Boolean_Cache
027a 00e2 | | Load_Encached Integer_Cache
027b e5fe | | Load 0x2,-0x2
027c e5ff | | Load 0x2,-0x1
027d 01dd | | Execute Vector,First
027e e402 | | Load 0x2,0x2
027f e5ff | | Load 0x2,-0x1
0280 01cf | | Execute Vector,Slice_Read
0281 e00b | | Load 0x0,0xb
0282 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0283 005a | Z | Store_Top Discrete,At_Offset_2
0284 005a | Z | Store_Top Discrete,At_Offset_2
0285 00d9 | | Load_Top At_Offset_1
0286 7015 |p | Jump_Nonzero 0x29c
0287 0092 03d0 | | Action Push_String_Extended,0x3d0 ; "Error converting string '"
0289 e5ff | | Load 0x2,-0x1
028a 01dd | | Execute Vector,First
028b e402 | | Load 0x2,0x2
028c e5ff | | Load 0x2,-0x1
028d 01cf | | Execute Vector,Slice_Read
028e 01cc | | Execute Vector,Catenate
028f 0092 03d1 | | Action Push_String_Extended,0x3d1 ; "' to base"
0291 01cc | | Execute Vector,Catenate
0292 e5fe | | Load 0x2,-0x2
0293 00e0 | | Load_Encached Standard_Cache
0294 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0295 01cc | | Execute Vector,Catenate
0296 0092 03d2 | | Action Push_String_Extended,0x3d2 ; " number."
0298 01cc | | Execute Vector,Catenate
0299 e009 | | Load 0x0,0x9
029a 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
029b 08e2 | | Execute_Immediate Raise,0xe2
029c 00d8 | | Load_Top At_Offset_0
029d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
029e 0000 0000 | | .XXX[0x2]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02ae | | .CONST 0x02ae ; Address of begin
02a1 0004 | | .CONST 0x0004 ; Address of exception handler
02a2 0003 | | .CONST 0x0003 ; Number of locals
02a3 INIT_02a0:
02a3 00da | | Load_Top At_Offset_2
02a4 01dd | | Execute Vector,First
02a5 00db | | Load_Top At_Offset_3
02a6 01dc | | Execute Vector,Last
02a7 00e9 | | Load_Encached String_Cache
02a8 035b | [ | Declare_Type Array,Constrained
02a9 0337 | 7 | Declare_Variable Array
02aa 00db | | Load_Top At_Offset_3
02ab 01dd | | Execute Vector,First
02ac 00e3 | | Load_Encached Natural_Cache
02ad 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
02ae BODY_02a0:
02ae 00cf | | Action Mark_Auxiliary
02af 00d9 | | Load_Top At_Offset_1
02b0 e5ff | | Load 0x2,-0x1
02b1 01dc | | Execute Vector,Last
02b2 027b | { | Execute Discrete,Greater_Equal
02b3 7013 |p | Jump_Nonzero 0x2c7
02b4 00d9 | | Load_Top At_Offset_1
02b5 0a01 | | Execute_Immediate Plus,0x1
02b6 e5ff | | Load 0x2,-0x1
02b7 01d7 | | Execute Vector,Field_Read
02b8 00da | | Load_Top At_Offset_2
02b9 e402 | | Load 0x2,0x2
02ba 01d6 | | Execute Vector,Field_Write
02bb 00d9 | | Load_Top At_Offset_1
02bc e5ff | | Load 0x2,-0x1
02bd 01d7 | | Execute Vector,Field_Read
02be 00da | | Load_Top At_Offset_2
02bf 0a01 | | Execute_Immediate Plus,0x1
02c0 e402 | | Load 0x2,0x2
02c1 01d6 | | Execute Vector,Field_Write
02c2 00d9 | | Load_Top At_Offset_1
02c3 0a02 | | Execute_Immediate Plus,0x2
02c4 005a | Z | Store_Top Discrete,At_Offset_2
02c5 00c9 | | Action Pop_Auxiliary_Loop
02c6 7fe8 | | Jump 0x2af
02c7 00ce | | Action Pop_Auxiliary
02c8 00d9 | | Load_Top At_Offset_1
02c9 00e9 | | Load_Encached String_Cache
02ca 01c6 | | Execute Vector,Convert_To_Formal
02cb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02cc 0000 0000 | | .BLANK 0000[0x4]
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02dd | | .CONST 0x02dd ; Address of begin
02d1 0004 | | .CONST 0x0004 ; Address of exception handler
02d2 0002 | | .CONST 0x0002 ; Number of locals
02d3 INIT_02d0:
02d3 e5fd | | Load 0x2,-0x3
02d4 01dd | | Execute Vector,First
02d5 e5fd | | Load 0x2,-0x3
02d6 01dc | | Execute Vector,Last
02d7 00e9 | | Load_Encached String_Cache
02d8 035b | [ | Declare_Type Array,Constrained
02d9 0337 | 7 | Declare_Variable Array
02da e5fd | | Load 0x2,-0x3
02db 00d9 | | Load_Top At_Offset_1
02dc 01d4 | | Execute Vector,Structure_Write
02dd BODY_02d0:
02dd 00cf | | Action Mark_Auxiliary
02de 00d9 | | Load_Top At_Offset_1
02df 01d9 | | Execute Vector,Reverse_Bounds
02e0 0263 | c | Execute Discrete,Above_Bound
02e1 700c |p | Jump_Nonzero 0x2ee
02e2 00d8 | | Load_Top At_Offset_0
02e3 e402 | | Load 0x2,0x2
02e4 01d7 | | Execute Vector,Field_Read
02e5 e5ff | | Load 0x2,-0x1
02e6 027f | | Execute Discrete,Equal
02e7 6804 |h | Jump_Zero 0x2ec
02e8 e5fe | | Load 0x2,-0x2
02e9 00d9 | | Load_Top At_Offset_1
02ea e402 | | Load 0x2,0x2
02eb 01d6 | | Execute Vector,Field_Write
02ec 00c8 | | Action Pop_Auxiliary_Range
02ed 3ff4 |? | Loop_Increasing 0x2e2
02ee 00ce | | Action Pop_Auxiliary
02ef 00d8 | | Load_Top At_Offset_0
02f0 00e9 | | Load_Encached String_Cache
02f1 01c6 | | Execute Vector,Convert_To_Formal
02f2 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
02f3 0000 0000 | | .BLANK 0000[0x5]
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 02fb | | .CONST 0x02fb ; Address of begin
02f9 0004 | | .CONST 0x0004 ; Address of exception handler
02fa 0001 | | .CONST 0x0001 ; Number of locals
02fb BODY_02f8:
02fb INIT_02f8:
02fb 4801 |H | Short_Literal 0x1
02fc 482e |H. | Short_Literal 0x2e
02fd e5fc | | Load 0x2,-0x4
02fe 0092 03d3 | | Action Push_String_Extended,0x3d3 ; " produced on "
0300 01cc | | Execute Vector,Catenate
0301 4800 |H | Short_Literal 0x0
0302 4800 |H | Short_Literal 0x0
0303 4800 |H | Short_Literal 0x0
0304 e00c | | Load 0x0,0xc
0305 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0306 e00c | | Load 0x0,0xc
0307 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0308 01cc | | Execute Vector,Catenate
0309 01cb | | Execute Vector,Append
030a 85fd | | Call 0x2,-0x3
030b 4801 |H | Short_Literal 0x1
030c 482e |H. | Short_Literal 0x2e
030d 0092 03d4 | | Action Push_String_Extended,0x3d4 ; "This file is "
030f 85fe | | Call 0x2,-0x2
0310 01cc | | Execute Vector,Catenate
0311 01cb | | Execute Vector,Append
0312 85fd | | Call 0x2,-0x3
0313 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0314 0000 0000 | | .BLANK 0000[0x4]
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; --------------------------------------------------------------------------------------
0318 0329 | ) | .CONST 0x0329 ; Address of begin
0319 0004 | | .CONST 0x0004 ; Address of exception handler
031a 0003 | | .CONST 0x0003 ; Number of locals
031b INIT_0318:
031b e240 | @ | Load 0x1,0x40
031c 0337 | 7 | Declare_Variable Array
031d 00db | | Load_Top At_Offset_3
031e e241 | A | Load 0x1,0x41
031f e242 | B | Load 0x1,0x42
0320 1d43 | C | Execute_Immediate Reference_Lex_1,0x43
0321 8002 | | Call 0x0,0x2
0322 00d9 | | Load_Top At_Offset_1
0323 01d4 | | Execute Vector,Structure_Write
0324 4801 |H | Short_Literal 0x1
0325 4810 |H | Short_Literal 0x10
0326 00e9 | | Load_Encached String_Cache
0327 035b | [ | Declare_Type Array,Constrained
0328 0337 | 7 | Declare_Variable Array
0329 BODY_0318:
0329 00cf | | Action Mark_Auxiliary
032a 00d9 | | Load_Top At_Offset_1
032b 01d9 | | Execute Vector,Reverse_Bounds
032c 0007 | | Action Break_Optional
032d 00d8 | | Load_Top At_Offset_0
032e e402 | | Load 0x2,0x2
032f 01d7 | | Execute Vector,Field_Read
0330 e247 | G | Load 0x1,0x47
0331 01d7 | | Execute Vector,Field_Read
0332 00d9 | | Load_Top At_Offset_1
0333 e403 | | Load 0x2,0x3
0334 01d6 | | Execute Vector,Field_Write
0335 00c8 | | Action Pop_Auxiliary_Range
0336 3ff6 |? | Loop_Increasing 0x32d
0337 00ce | | Action Pop_Auxiliary
0338 e5fe | | Load 0x2,-0x2
0339 7007 |p | Jump_Nonzero 0x341
033a 4820 |H | Short_Literal 0x20
033b 00d9 | | Load_Top At_Offset_1
033c e00b | | Load 0x0,0xb
033d 181a | | Execute Package,Field_Execute,Field_Number 0x1a
033e 00e9 | | Load_Encached String_Cache
033f 01c6 | | Execute Vector,Convert_To_Formal
0340 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0341 4810 |H | Short_Literal 0x10
0342 e5fe | | Load 0x2,-0x2
0343 0272 | r | Execute Discrete,Minus
0344 0a01 | | Execute_Immediate Plus,0x1
0345 00d8 | | Load_Top At_Offset_0
0346 00e2 | | Load_Encached Integer_Cache
0347 0260 | ` | Execute Discrete,In_Type
0348 7001 |p | Jump_Nonzero 0x34a
0349 0801 | | Execute_Immediate Raise,0x1
034a 4810 |H | Short_Literal 0x10
034b 00da | | Load_Top At_Offset_2
034c 01cf | | Execute Vector,Slice_Read
034d 00e9 | | Load_Encached String_Cache
034e 01c6 | | Execute Vector,Convert_To_Formal
034f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0350 ; --------------------------------------------------------------------------------------
0350 ; SUBPROGRAM
0350 ; --------------------------------------------------------------------------------------
0350 036d | m | .CONST 0x036d ; Address of begin
0351 0004 | | .CONST 0x0004 ; Address of exception handler
0352 0015 | | .CONST 0x0015 ; Number of locals
0353 INIT_0350:
0353 029a 037b | {| Declare_Subprogram INIT_0378,For_Outer_Call,Visible,Unelaborated
0355 029a 039b | | Declare_Subprogram INIT_0398,For_Outer_Call,Visible,Unelaborated
0357 029a 03b3 | | Declare_Subprogram INIT_03b0,For_Outer_Call,Visible,Unelaborated
0359 029a 03c3 | | Declare_Subprogram INIT_03c0,For_Outer_Call,Visible,Unelaborated
035b 00bf | | Action Accept_Activation
035c e20f | | Load 0x1,0xf
035d 01db | | Execute Vector,Length
035e 0f00 | | Execute_Immediate Equal,0x0
035f 0007 | | Action Break_Optional
0360 e001 | | Load 0x0,0x1
0361 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0362 02c7 | | Declare_Variable Any
0363 00d8 | | Load_Top At_Offset_0
0364 1c00 | | Execute_Immediate Run_Utility,0x0
0365 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0366 00c7 | | Action Elaborate_Subprogram
0367 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0368 00c7 | | Action Elaborate_Subprogram
0369 1d12 | | Execute_Immediate Reference_Lex_1,0x12
036a 00c7 | | Action Elaborate_Subprogram
036b 1d13 | | Execute_Immediate Reference_Lex_1,0x13
036c 00c7 | | Action Elaborate_Subprogram
036d BODY_0350:
036d 00be | | Action Activate_Tasks
036e 00d9 | | Load_Top At_Offset_1
036f 7005 |p | Jump_Nonzero 0x375
0370 00d8 | | Load_Top At_Offset_0
0371 e20f | | Load 0x1,0xf
0372 e002 | | Load 0x0,0x2
0373 180e | | Execute Package,Field_Execute,Field_Number 0xe
0374 c215 | | Store 0x1,0x15
0375 00bc | | Action Signal_Activated
0376 00bb | | Action Signal_Completion
0377 0000 | | .XXX[0x1]
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 037b | { | .CONST 0x037b ; Address of begin
0379 0004 | | .CONST 0x0004 ; Address of exception handler
037a 0001 | | .CONST 0x0001 ; Number of locals
037b BODY_0378:
037b INIT_0378:
037b e214 | | Load 0x1,0x14
037c 6804 |h | Jump_Zero 0x381
037d 00da | | Load_Top At_Offset_2
037e e001 | | Load 0x0,0x1
037f 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0380 7804 |x | Jump 0x385
0381 00da | | Load_Top At_Offset_2
0382 e215 | | Load 0x1,0x15
0383 e001 | | Load 0x0,0x1
0384 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
0385 00db | | Load_Top At_Offset_3
0386 680a |h | Jump_Zero 0x391
0387 e214 | | Load 0x1,0x14
0388 6804 |h | Jump_Zero 0x38d
0389 4801 |H | Short_Literal 0x1
038a e001 | | Load 0x0,0x1
038b 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
038c 4503 |E | Exit_Suprogram New_Top_Offset 0x3
038d 4801 |H | Short_Literal 0x1
038e e215 | | Load 0x1,0x15
038f e001 | | Load 0x0,0x1
0390 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0391 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0392 0000 0000 | | .BLANK 0000[0x6]
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 039b | | .CONST 0x039b ; Address of begin
0399 0004 | | .CONST 0x0004 ; Address of exception handler
039a 0001 | | .CONST 0x0001 ; Number of locals
039b BODY_0398:
039b INIT_0398:
039b 00cf | | Action Mark_Auxiliary
039c 00db | | Load_Top At_Offset_3
039d 4801 |H | Short_Literal 0x1
039e 0263 | c | Execute Discrete,Above_Bound
039f 700c |p | Jump_Nonzero 0x3ac
03a0 e214 | | Load 0x1,0x14
03a1 6804 |h | Jump_Zero 0x3a6
03a2 4801 |H | Short_Literal 0x1
03a3 e001 | | Load 0x0,0x1
03a4 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
03a5 7804 |x | Jump 0x3aa
03a6 4801 |H | Short_Literal 0x1
03a7 e215 | | Load 0x1,0x15
03a8 e001 | | Load 0x0,0x1
03a9 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
03aa 00c8 | | Action Pop_Auxiliary_Range
03ab 3ff4 |? | Loop_Increasing 0x3a0
03ac 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03ad 0000 0000 | | .XXX[0x3]
03af 0000 | |
03b0 ; --------------------------------------------------------------------------------------
03b0 ; SUBPROGRAM
03b0 ; --------------------------------------------------------------------------------------
03b0 03b3 | | .CONST 0x03b3 ; Address of begin
03b1 0004 | | .CONST 0x0004 ; Address of exception handler
03b2 0001 | | .CONST 0x0001 ; Number of locals
03b3 BODY_03b0:
03b3 INIT_03b0:
03b3 e214 | | Load 0x1,0x14
03b4 7004 |p | Jump_Nonzero 0x3b9
03b5 e215 | | Load 0x1,0x15
03b6 e001 | | Load 0x0,0x1
03b7 181b | | Execute Package,Field_Execute,Field_Number 0x1b
03b8 00ca | | Action Exit_Nullary_Function
03b9 0092 03d5 | | Action Push_String_Extended,0x3d5 ; "a text window"
03bb 00ca | | Action Exit_Nullary_Function
03bc 0000 0000 | | .BLANK 0000[0x4]
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03c3 | | .CONST 0x03c3 ; Address of begin
03c1 0004 | | .CONST 0x0004 ; Address of exception handler
03c2 0001 | | .CONST 0x0001 ; Number of locals
03c3 BODY_03c0:
03c3 INIT_03c0:
03c3 e214 | | Load 0x1,0x14
03c4 7004 |p | Jump_Nonzero 0x3c9
03c5 e215 | | Load 0x1,0x15
03c6 e001 | | Load 0x0,0x1
03c7 1816 | | Execute Package,Field_Execute,Field_Number 0x16
03c8 c215 | | Store 0x1,0x15
03c9 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03ca ; --------------------------------------------------------------------------------------
03ca ; STRING TABLE
03ca ; --------------------------------------------------------------------------------------
03ca 001a | | .STRTAB 0x001a->0x03d7 ; "HEX"
03cb 001b | | .STRTAB 0x001b->0x03d8 ; "DEC"
03cc 001c | | .STRTAB 0x001c->0x03da ; "HEX_DEC"
03cd 0021 | ! | .STRTAB 0x0021->0x03dd ; "FULL"
03ce 0023 | # | .STRTAB 0x0023->0x03df ; "CODE"
03cf 0025 | % | .STRTAB 0x0025->0x03e1 ; " ("
03d0 0025 | % | .STRTAB 0x0025->0x03e2 ; "Error converting string '"
03d1 003c | < | .STRTAB 0x003c->0x03ef ; "' to base"
03d2 0043 | C | .STRTAB 0x0043->0x03f3 ; " number."
03d3 0049 | I | .STRTAB 0x0049->0x03f7 ; " produced on "
03d4 0054 | T | .STRTAB 0x0054->0x03fe ; "This file is "
03d5 005f | _ | .STRTAB 0x005f->0x0404 ; "a text window"
03d6 006a | j | .STREND 0x006a->0x040b
03d7 4845 5844 |HEXD| .STRTAB_STRINGS
040b 0000 0000 | | .BLANK 0000[0x5]
0410 ; --------------------------------------------------------------------------------------
0410 ; Debug Table
0410 ; --------------------------------------------------------------------------------------
0410 0004 000e | | .DEBUG4 0x0004,0x000e,0x1ec7,0x0000,0x0001,0x0000
0416 0c2e 4cad | .L | .XXX[0x12c]
0418 ce84 0dec | |
041a c40c 2000 | |
041c 0004 a000 | |
041e 0009 040a | |
0420 6f2e 6e8c |o.n |
0422 ada4 0caf | |
0424 0cac 6eae | n |
0426 8d2d edc4 | - |
0428 0e4d 2ced | M, |
042a 0e85 c404 | |
042c 0a0c ae4d | M|
042e ad2e 8e64 | . d|
0430 0c24 0cee | $ |
0432 4dee ae04 |M |
0434 0e8d e40d | |
0436 ac2d 6ca4 | -l |
0438 0c24 0e6f | $ o|
043a 2e6e 8cad |.n |
043c a40c 240e | $ |
043e 0c2e 4cad | .L |
0440 ce84 0dec | |
0442 c40c 2000 | |
0444 0004 a000 | |
0446 0009 040a | |
0448 6f2e 6e8c |o.n |
044a ada4 0caf | |
044c 0cac 6eae | n |
044e 8d2d edc4 | - |
0450 0e4d 2ced | M, |
0452 0e85 c404 | |
0454 0a0c ae4d | M|
0456 ad2e 8e64 | . d|
0458 0c24 0cee | $ |
045a 4dee ae04 |M |
045c 0e8d e40d | |
045e ac2d 6ca4 | -l |
0460 0c24 0e6f | $ o|
0462 2e6e 8cad |.n |
0464 a40c 240e | $ |
0466 0c2e 4cad | .L |
0468 ce84 0dec | |
046a c40c 2000 | |
046c 000d e000 | |
046e 0009 2e6e | .n|
0470 ac4e 6f2e | No.|
0472 6e8c ada4 |n |
0474 0dee 440c | D |
0476 2dcd ee8d |- |
0478 0cae 440e | D |
047a 6f2e 6e8c |o.n |
047c ada4 050e | |
047e 8d0c 2e84 | . |
0480 0d2e 6584 | .e |
0482 0e8d e40d | |
0484 cc2d aca4 | - |
0486 0e8d 0ca4 | |
0488 0e6f 2e6e | o.n|
048a 8cad a40d | |
048c 2dc4 0e8d |- |
048e 0ca4 0a8d | |
0490 ebea 6f2e | o.|
0492 6e8c ada0 |n |
0494 0000 0dc0 | |
0496 0000 0944 | D|
0498 0e6e ac4e | n N|
049a 6f2e 6e8c |o.n |
049c ada4 0dee | |
049e 440c 2dcd |D - |
04a0 ee8d 0cae | |
04a2 440e 6f2e |D o.|
04a4 6e8c ada4 |n |
04a6 050e 8d0c | |
04a8 2e84 0d2e |. .|
04aa 6584 0e8d |e |
04ac e40d cc2d | -|
04ae aca4 0e8d | |
04b0 0ca4 0e6f | o|
04b2 2e6e 8cad |.n |
04b4 a40d 2dc4 | - |
04b6 0e8d 0ca4 | |
04b8 0a8d ebea | |
04ba 6f2e 6e8c |o.n |
04bc ada0 0000 | |
04be 0dc0 0000 | |
04c0 0944 0e6e | D n|
04c2 ac4e 6f2e | No.|
04c4 6e8c ada4 |n |
04c6 0dee 440c | D |
04c8 2dcd ee8d |- |
04ca 0cae 440e | D |
04cc 6f2e 6e8c |o.n |
04ce ada4 050e | |
04d0 8d0c 2e84 | . |
04d2 0d2e 6584 | .e |
04d4 0e8d e40d | |
04d6 cc2d aca4 | - |
04d8 0e8d 0ca4 | |
04da 0e6f 2e6e | o.n|
04dc 8cad a40d | |
04de 2dc4 0e8d |- |
04e0 0ca4 0a8d | |
04e2 ebea 6f2e | o.|
04e4 6e8c ada0 |n |
04e6 0000 0740 | @|
04e8 0000 066e | n|
04ea 0c2e 4c2d | .L-|
04ec acae 8cae | |
04ee 440d ecc4 |D |
04f0 0e8d 0ca4 | |
04f2 086d aecc | m |
04f4 6be9 0d2c |k ,|
04f6 ae4c 2e4c | L.L|
04f8 6d0f 25c8 |m % |
04fa 2c8c 8be8 |, |
04fc 6d0d 2d8c |m - |
04fe 840c 6ded | m |
0500 adac 2dcc | - |
0502 8525 c000 | % |
0504 0007 2000 | |
0506 0006 840e | |
0508 0c2e 4c2d | .L-|
050a acae 8cae | |
050c 440d ecc4 |D |
050e 0e8d 0ca4 | |
0510 086d aecc | m |
0512 6be9 0d2c |k ,|
0514 ae4c 2e4c | L.L|
0516 6d0f 25c8 |m % |
0518 2c8c 8be8 |, |
051a 6d0d 2d8c |m - |
051c 840c 6ded | m |
051e adac 2dcc | - |
0520 8525 c000 | % |
0522 0007 2000 | |
0524 0006 840e | |
0526 0c2e 4c2d | .L-|
0528 acae 8cae | |
052a 440d ecc4 |D |
052c 0e8d 0ca4 | |
052e 086d aecc | m |
0530 6be9 0d2c |k ,|
0532 ae4c 2e4c | L.L|
0534 6d0f 25c8 |m % |
0536 2c8c 8be8 |, |
0538 6d0d 2d8c |m - |
053a 840c 6ded | m |
053c adac 2dcc | - |
053e 8525 c000 | % |
0540 0000 2000 | |
0542 0000 0000 | | .BLANK 0000[0x4]
0546 000d c000 | | .XXX[0x55]
0548 0000 0000 | |
054a 000d a000 | |
054c 000e 2000 | |
054e 0005 49ad | I |
0550 2dcd 2dae |- - |
0552 ada4 0c2c | ,|
0554 6c6c ae6e |ll n|
0556 640c 6d8c |d m |
0558 2e6e 640c |.nd |
055a cdee 440e | D |
055c 6f2e 6e8c |o.n |
055e ada7 4408 | D |
0560 8cae ccad | |
0562 8dee 0cae | |
0564 4000 000d |@ |
0566 e000 0005 | |
0568 8404 09ad | |
056a 2dcd 2dae |- - |
056c ada4 0c2c | ,|
056e 6c6c ae6e |ll n|
0570 640c 6d8c |d m |
0572 2e6e 640c |.nd |
0574 cdee 440e | D |
0576 6f2e 6e8c |o.n |
0578 ada7 4408 | D |
057a 8cae ccad | |
057c 8dee 0cae | |
057e 4000 000d |@ |
0580 e000 0005 | |
0582 8404 09ad | |
0584 2dcd 2dae |- - |
0586 ada4 0c2c | ,|
0588 6c6c ae6e |ll n|
058a 640c 6d8c |d m |
058c 2e6e 640c |.nd |
058e cdee 440e | D |
0590 6f2e 6e8c |o.n |
0592 ada7 4408 | D |
0594 8cae ccad | |
0596 8dee 0cae | |
0598 4000 0000 |@ |
059a 2000 | |
059b 0000 0000 | | .BLANK 0000[0x4]
059f 0003 8000 | | .XXX[0x55]
05a1 0000 0000 | |
05a3 0003 6000 | ` |
05a5 0003 c000 | |
05a7 0005 682d | h-|
05a9 8d8b ea4d | M|
05ab 2ced 0e8e |, |
05ad 6407 440c |d D |
05af 6ded ce6e |m n|
05b1 8c2d ce84 | - |
05b3 08af 0cac | |
05b5 6eae 8d2d |n -|
05b7 edcb ea4d | M|
05b9 2ced 0e84 |, |
05bb 0747 a406 | G |
05bd 0760 0000 | ` |
05bf 03a0 0000 | |
05c1 0584 082d | -|
05c3 8d8b ea4d | M|
05c5 2ced 0e8e |, |
05c7 6407 440c |d D |
05c9 6ded ce6e |m n|
05cb 8c2d ce84 | - |
05cd 08af 0cac | |
05cf 6eae 8d2d |n -|
05d1 edcb ea4d | M|
05d3 2ced 0e84 |, |
05d5 0747 a406 | G |
05d7 0760 0000 | ` |
05d9 03a0 0000 | |
05db 0584 082d | -|
05dd 8d8b ea4d | M|
05df 2ced 0e8e |, |
05e1 6407 440c |d D |
05e3 6ded ce6e |m n|
05e5 8c2d ce84 | - |
05e7 08af 0cac | |
05e9 6eae 8d2d |n -|
05eb edcb ea4d | M|
05ed 2ced 0e84 |, |
05ef 0747 a406 | G |
05f1 0760 0000 | ` |
05f3 0020 | |
05f4 0000 0000 | | .BLANK 0000[0x5]
05f9 0940 0000 | @ | .XXX[0x7]
05fb 0000 0000 | |
05fd 0920 0000 | |
05ff 0980 | |