|
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_1e5cd8
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 05d8 | | .CONST 0x05d8 ; 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 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0474 | t | .CONST 0x0474 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 001b | | .CONST 0x001b ; Number of locals
000b INIT_0008:
000b e001 | | Load 0x0,0x1
000c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
000d 0337 | 7 | Declare_Variable Array
000e 00d8 | | Load_Top At_Offset_0
000f 0335 | 5 | Declare_Variable Array,Duplicate
0010 00cd | | Action Spare6_Action
0011 4800 |H | Short_Literal 0x0
0012 4800 |H | Short_Literal 0x0
0013 00da | | Load_Top At_Offset_2
0014 01d6 | | Execute Vector,Field_Write
0015 4800 |H | Short_Literal 0x0
0016 4801 |H | Short_Literal 0x1
0017 00da | | Load_Top At_Offset_2
0018 01d6 | | Execute Vector,Field_Write
0019 4800 |H | Short_Literal 0x0
001a 4802 |H | Short_Literal 0x2
001b 00da | | Load_Top At_Offset_2
001c 01d6 | | Execute Vector,Field_Write
001d 4801 |H | Short_Literal 0x1
001e 4803 |H | Short_Literal 0x3
001f 00da | | Load_Top At_Offset_2
0020 01d6 | | Execute Vector,Field_Write
0021 4800 |H | Short_Literal 0x0
0022 4804 |H | Short_Literal 0x4
0023 00da | | Load_Top At_Offset_2
0024 01d6 | | Execute Vector,Field_Write
0025 00d9 | | Load_Top At_Offset_1
0026 01d4 | | Execute Vector,Structure_Write
0027 e013 | | Load 0x0,0x13
0028 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0029 e013 | | Load 0x0,0x13
002a 1b22 | " | Execute Package,Field_Read,Field_Number 0x22
002b e013 | | Load 0x0,0x13
002c 1b2d | - | Execute Package,Field_Read,Field_Number 0x2d
002d e013 | | Load 0x0,0x13
002e 1b3e | > | Execute Package,Field_Read,Field_Number 0x3e
002f e013 | | Load 0x0,0x13
0030 1b50 | P | Execute Package,Field_Read,Field_Number 0x50
0031 e013 | | Load 0x0,0x13
0032 1b51 | Q | Execute Package,Field_Read,Field_Number 0x51
0033 e013 | | Load 0x0,0x13
0034 1b52 | R | Execute Package,Field_Read,Field_Number 0x52
0035 e013 | | Load 0x0,0x13
0036 1b53 | S | Execute Package,Field_Read,Field_Number 0x53
0037 e013 | | Load 0x0,0x13
0038 1b43 | C | Execute Package,Field_Read,Field_Number 0x43
0039 e013 | | Load 0x0,0x13
003a 1b54 | T | Execute Package,Field_Read,Field_Number 0x54
003b e013 | | Load 0x0,0x13
003c 1b45 | E | Execute Package,Field_Read,Field_Number 0x45
003d e013 | | Load 0x0,0x13
003e 1b4b | K | Execute Package,Field_Read,Field_Number 0x4b
003f e013 | | Load 0x0,0x13
0040 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
0041 e013 | | Load 0x0,0x13
0042 1b55 | U | Execute Package,Field_Read,Field_Number 0x55
0043 e013 | | Load 0x0,0x13
0044 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0045 e013 | | Load 0x0,0x13
0046 1b26 | & | Execute Package,Field_Read,Field_Number 0x26
0047 e013 | | Load 0x0,0x13
0048 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
0049 e013 | | Load 0x0,0x13
004a 1b4d | M | Execute Package,Field_Read,Field_Number 0x4d
004b e013 | | Load 0x0,0x13
004c 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
004d e013 | | Load 0x0,0x13
004e 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
004f e013 | | Load 0x0,0x13
0050 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
0051 e013 | | Load 0x0,0x13
0052 1b4e | N | Execute Package,Field_Read,Field_Number 0x4e
0053 4800 |H | Short_Literal 0x0
0054 4818 |H | Short_Literal 0x18
0055 e001 | | Load 0x0,0x1
0056 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0057 035b | [ | Declare_Type Array,Constrained
0058 0337 | 7 | Declare_Variable Array
0059 e210 | | Load 0x1,0x10
005a 00ea | | Load_Encached Null_String_Cache
005b 4801 |H | Short_Literal 0x1
005c 4800 |H | Short_Literal 0x0
005d 00ea | | Load_Encached Null_String_Cache
005e 00ea | | Load_Encached Null_String_Cache
005f 4800 |H | Short_Literal 0x0
0060 e001 | | Load 0x0,0x1
0061 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0062 0337 | 7 | Declare_Variable Array
0063 4801 |H | Short_Literal 0x1
0064 4801 |H | Short_Literal 0x1
0065 00da | | Load_Top At_Offset_2
0066 01d6 | | Execute Vector,Field_Write
0067 4801 |H | Short_Literal 0x1
0068 4803 |H | Short_Literal 0x3
0069 00da | | Load_Top At_Offset_2
006a 01d6 | | Execute Vector,Field_Write
006b 4800 |H | Short_Literal 0x0
006c 4800 |H | Short_Literal 0x0
006d 00da | | Load_Top At_Offset_2
006e 01d6 | | Execute Vector,Field_Write
006f 4800 |H | Short_Literal 0x0
0070 4802 |H | Short_Literal 0x2
0071 00da | | Load_Top At_Offset_2
0072 01d6 | | Execute Vector,Field_Write
0073 e001 | | Load 0x0,0x1
0074 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0075 01c3 | | Execute Vector,Check_In_Type
0076 0092 047c | || Action Push_String_Extended,0x47c ; "library=adalib"
0078 e001 | | Load 0x0,0x1
0079 181e | | Execute Package,Field_Execute,Field_Number 0x1e
007a e001 | | Load 0x0,0x1
007b 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
007c 0119 | | Execute Any,Check_In_Formal_Type
007d 4800 |H | Short_Literal 0x0
007e 00da | | Load_Top At_Offset_2
007f 01d6 | | Execute Vector,Field_Write
0080 e210 | | Load 0x1,0x10
0081 e404 | | Load 0x2,0x4
0082 4801 |H | Short_Literal 0x1
0083 4801 |H | Short_Literal 0x1
0084 00ea | | Load_Encached Null_String_Cache
0085 0092 047d | }| Action Push_String_Extended,0x47d ; "Run_Time_Checks"
0087 4801 |H | Short_Literal 0x1
0088 e001 | | Load 0x0,0x1
0089 1b0e | | Execute Package,Field_Read,Field_Number 0xe
008a 0337 | 7 | Declare_Variable Array
008b 4801 |H | Short_Literal 0x1
008c 4801 |H | Short_Literal 0x1
008d 00da | | Load_Top At_Offset_2
008e 01d6 | | Execute Vector,Field_Write
008f 4800 |H | Short_Literal 0x0
0090 4800 |H | Short_Literal 0x0
0091 00da | | Load_Top At_Offset_2
0092 01d6 | | Execute Vector,Field_Write
0093 4800 |H | Short_Literal 0x0
0094 4802 |H | Short_Literal 0x2
0095 00da | | Load_Top At_Offset_2
0096 01d6 | | Execute Vector,Field_Write
0097 4800 |H | Short_Literal 0x0
0098 4803 |H | Short_Literal 0x3
0099 00da | | Load_Top At_Offset_2
009a 01d6 | | Execute Vector,Field_Write
009b e001 | | Load 0x0,0x1
009c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
009d 01c3 | | Execute Vector,Check_In_Type
009e 0092 047e | ~| Action Push_String_Extended,0x47e ; "checks="
00a0 e001 | | Load 0x0,0x1
00a1 181e | | Execute Package,Field_Execute,Field_Number 0x1e
00a2 e001 | | Load 0x0,0x1
00a3 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
00a4 0119 | | Execute Any,Check_In_Formal_Type
00a5 4801 |H | Short_Literal 0x1
00a6 00da | | Load_Top At_Offset_2
00a7 01d6 | | Execute Vector,Field_Write
00a8 e210 | | Load 0x1,0x10
00a9 e412 | | Load 0x2,0x12
00aa 4801 |H | Short_Literal 0x1
00ab 4801 |H | Short_Literal 0x1
00ac 00ea | | Load_Encached Null_String_Cache
00ad 0092 047f | | Action Push_String_Extended,0x47f ; "Shared_Memory_Size"
00af 4801 |H | Short_Literal 0x1
00b0 e001 | | Load 0x0,0x1
00b1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00b2 0337 | 7 | Declare_Variable Array
00b3 4801 |H | Short_Literal 0x1
00b4 4801 |H | Short_Literal 0x1
00b5 00da | | Load_Top At_Offset_2
00b6 01d6 | | Execute Vector,Field_Write
00b7 4800 |H | Short_Literal 0x0
00b8 4800 |H | Short_Literal 0x0
00b9 00da | | Load_Top At_Offset_2
00ba 01d6 | | Execute Vector,Field_Write
00bb 4800 |H | Short_Literal 0x0
00bc 4802 |H | Short_Literal 0x2
00bd 00da | | Load_Top At_Offset_2
00be 01d6 | | Execute Vector,Field_Write
00bf 4800 |H | Short_Literal 0x0
00c0 4803 |H | Short_Literal 0x3
00c1 00da | | Load_Top At_Offset_2
00c2 01d6 | | Execute Vector,Field_Write
00c3 e001 | | Load 0x0,0x1
00c4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00c5 01c3 | | Execute Vector,Check_In_Type
00c6 0092 0480 | | Action Push_String_Extended,0x480 ; "memory="
00c8 e001 | | Load 0x0,0x1
00c9 181e | | Execute Package,Field_Execute,Field_Number 0x1e
00ca e001 | | Load 0x0,0x1
00cb 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
00cc 0119 | | Execute Any,Check_In_Formal_Type
00cd 4802 |H | Short_Literal 0x2
00ce 00da | | Load_Top At_Offset_2
00cf 01d6 | | Execute Vector,Field_Write
00d0 e210 | | Load 0x1,0x10
00d1 00da | | Load_Top At_Offset_2
00d2 4801 |H | Short_Literal 0x1
00d3 4801 |H | Short_Literal 0x1
00d4 0092 0481 | | Action Push_String_Extended,0x481 ; "yes"
00d6 0092 0482 | | Action Push_String_Extended,0x482 ; "Display_Text"
00d8 4801 |H | Short_Literal 0x1
00d9 e001 | | Load 0x0,0x1
00da 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00db 0337 | 7 | Declare_Variable Array
00dc 4801 |H | Short_Literal 0x1
00dd 4801 |H | Short_Literal 0x1
00de 00da | | Load_Top At_Offset_2
00df 01d6 | | Execute Vector,Field_Write
00e0 4800 |H | Short_Literal 0x0
00e1 4800 |H | Short_Literal 0x0
00e2 00da | | Load_Top At_Offset_2
00e3 01d6 | | Execute Vector,Field_Write
00e4 4800 |H | Short_Literal 0x0
00e5 4802 |H | Short_Literal 0x2
00e6 00da | | Load_Top At_Offset_2
00e7 01d6 | | Execute Vector,Field_Write
00e8 4800 |H | Short_Literal 0x0
00e9 4803 |H | Short_Literal 0x3
00ea 00da | | Load_Top At_Offset_2
00eb 01d6 | | Execute Vector,Field_Write
00ec e001 | | Load 0x0,0x1
00ed 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00ee 01c3 | | Execute Vector,Check_In_Type
00ef 0092 0483 | | Action Push_String_Extended,0x483 ; "text="
00f1 e001 | | Load 0x0,0x1
00f2 181e | | Execute Package,Field_Execute,Field_Number 0x1e
00f3 e001 | | Load 0x0,0x1
00f4 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
00f5 0119 | | Execute Any,Check_In_Formal_Type
00f6 4803 |H | Short_Literal 0x3
00f7 00da | | Load_Top At_Offset_2
00f8 01d6 | | Execute Vector,Field_Write
00f9 e210 | | Load 0x1,0x10
00fa e414 | | Load 0x2,0x14
00fb 4801 |H | Short_Literal 0x1
00fc 4801 |H | Short_Literal 0x1
00fd 0092 0484 | | Action Push_String_Extended,0x484 ; "all"
00ff 0092 0485 | | Action Push_String_Extended,0x485 ; "Display_Show"
0101 4801 |H | Short_Literal 0x1
0102 e001 | | Load 0x0,0x1
0103 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0104 0337 | 7 | Declare_Variable Array
0105 4801 |H | Short_Literal 0x1
0106 4801 |H | Short_Literal 0x1
0107 00da | | Load_Top At_Offset_2
0108 01d6 | | Execute Vector,Field_Write
0109 4800 |H | Short_Literal 0x0
010a 4800 |H | Short_Literal 0x0
010b 00da | | Load_Top At_Offset_2
010c 01d6 | | Execute Vector,Field_Write
010d 4800 |H | Short_Literal 0x0
010e 4802 |H | Short_Literal 0x2
010f 00da | | Load_Top At_Offset_2
0110 01d6 | | Execute Vector,Field_Write
0111 4800 |H | Short_Literal 0x0
0112 4803 |H | Short_Literal 0x3
0113 00da | | Load_Top At_Offset_2
0114 01d6 | | Execute Vector,Field_Write
0115 e001 | | Load 0x0,0x1
0116 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0117 01c3 | | Execute Vector,Check_In_Type
0118 0092 0486 | | Action Push_String_Extended,0x486 ; "show="
011a e001 | | Load 0x0,0x1
011b 181e | | Execute Package,Field_Execute,Field_Number 0x1e
011c e001 | | Load 0x0,0x1
011d 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
011e 0119 | | Execute Any,Check_In_Formal_Type
011f 4804 |H | Short_Literal 0x4
0120 00da | | Load_Top At_Offset_2
0121 01d6 | | Execute Vector,Field_Write
0122 e210 | | Load 0x1,0x10
0123 e403 | | Load 0x2,0x3
0124 4801 |H | Short_Literal 0x1
0125 4801 |H | Short_Literal 0x1
0126 00ea | | Load_Encached Null_String_Cache
0127 0092 0487 | | Action Push_String_Extended,0x487 ; "Display_Assembly"
0129 4801 |H | Short_Literal 0x1
012a e001 | | Load 0x0,0x1
012b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
012c 0337 | 7 | Declare_Variable Array
012d 4801 |H | Short_Literal 0x1
012e 4801 |H | Short_Literal 0x1
012f 00da | | Load_Top At_Offset_2
0130 01d6 | | Execute Vector,Field_Write
0131 4800 |H | Short_Literal 0x0
0132 4800 |H | Short_Literal 0x0
0133 00da | | Load_Top At_Offset_2
0134 01d6 | | Execute Vector,Field_Write
0135 4800 |H | Short_Literal 0x0
0136 4802 |H | Short_Literal 0x2
0137 00da | | Load_Top At_Offset_2
0138 01d6 | | Execute Vector,Field_Write
0139 4800 |H | Short_Literal 0x0
013a 4803 |H | Short_Literal 0x3
013b 00da | | Load_Top At_Offset_2
013c 01d6 | | Execute Vector,Field_Write
013d e001 | | Load 0x0,0x1
013e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
013f 01c3 | | Execute Vector,Check_In_Type
0140 0092 0488 | | Action Push_String_Extended,0x488 ; "assembly="
0142 e001 | | Load 0x0,0x1
0143 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0144 e001 | | Load 0x0,0x1
0145 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0146 0119 | | Execute Any,Check_In_Formal_Type
0147 4805 |H | Short_Literal 0x5
0148 00da | | Load_Top At_Offset_2
0149 01d6 | | Execute Vector,Field_Write
014a e210 | | Load 0x1,0x10
014b e416 | | Load 0x2,0x16
014c 4801 |H | Short_Literal 0x1
014d 4801 |H | Short_Literal 0x1
014e 00ea | | Load_Encached Null_String_Cache
014f 0092 0489 | | Action Push_String_Extended,0x489 ; "Stack_Object_Size"
0151 4801 |H | Short_Literal 0x1
0152 e001 | | Load 0x0,0x1
0153 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0154 0337 | 7 | Declare_Variable Array
0155 4801 |H | Short_Literal 0x1
0156 4801 |H | Short_Literal 0x1
0157 00da | | Load_Top At_Offset_2
0158 01d6 | | Execute Vector,Field_Write
0159 4800 |H | Short_Literal 0x0
015a 4800 |H | Short_Literal 0x0
015b 00da | | Load_Top At_Offset_2
015c 01d6 | | Execute Vector,Field_Write
015d 4800 |H | Short_Literal 0x0
015e 4802 |H | Short_Literal 0x2
015f 00da | | Load_Top At_Offset_2
0160 01d6 | | Execute Vector,Field_Write
0161 4800 |H | Short_Literal 0x0
0162 4803 |H | Short_Literal 0x3
0163 00da | | Load_Top At_Offset_2
0164 01d6 | | Execute Vector,Field_Write
0165 e001 | | Load 0x0,0x1
0166 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0167 01c3 | | Execute Vector,Check_In_Type
0168 0092 048a | | Action Push_String_Extended,0x48a ; "stack="
016a e001 | | Load 0x0,0x1
016b 181e | | Execute Package,Field_Execute,Field_Number 0x1e
016c e001 | | Load 0x0,0x1
016d 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
016e 0119 | | Execute Any,Check_In_Formal_Type
016f 4806 |H | Short_Literal 0x6
0170 00da | | Load_Top At_Offset_2
0171 01d6 | | Execute Vector,Field_Write
0172 e210 | | Load 0x1,0x10
0173 e40e | | Load 0x2,0xe
0174 4801 |H | Short_Literal 0x1
0175 4801 |H | Short_Literal 0x1
0176 00ea | | Load_Encached Null_String_Cache
0177 0092 048b | | Action Push_String_Extended,0x48b ; "Improve_Calls"
0179 4801 |H | Short_Literal 0x1
017a e001 | | Load 0x0,0x1
017b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
017c 0337 | 7 | Declare_Variable Array
017d 4801 |H | Short_Literal 0x1
017e 4801 |H | Short_Literal 0x1
017f 00da | | Load_Top At_Offset_2
0180 01d6 | | Execute Vector,Field_Write
0181 4800 |H | Short_Literal 0x0
0182 4800 |H | Short_Literal 0x0
0183 00da | | Load_Top At_Offset_2
0184 01d6 | | Execute Vector,Field_Write
0185 4800 |H | Short_Literal 0x0
0186 4802 |H | Short_Literal 0x2
0187 00da | | Load_Top At_Offset_2
0188 01d6 | | Execute Vector,Field_Write
0189 4800 |H | Short_Literal 0x0
018a 4803 |H | Short_Literal 0x3
018b 00da | | Load_Top At_Offset_2
018c 01d6 | | Execute Vector,Field_Write
018d e001 | | Load 0x0,0x1
018e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
018f 01c3 | | Execute Vector,Check_In_Type
0190 0092 048c | | Action Push_String_Extended,0x48c ; "calls="
0192 e001 | | Load 0x0,0x1
0193 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0194 e001 | | Load 0x0,0x1
0195 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0196 0119 | | Execute Any,Check_In_Formal_Type
0197 4807 |H | Short_Literal 0x7
0198 00da | | Load_Top At_Offset_2
0199 01d6 | | Execute Vector,Field_Write
019a e210 | | Load 0x1,0x10
019b e413 | | Load 0x2,0x13
019c 4801 |H | Short_Literal 0x1
019d 4801 |H | Short_Literal 0x1
019e 00ea | | Load_Encached Null_String_Cache
019f 0092 048d | | Action Push_String_Extended,0x48d ; "Improve_Reduction"
01a1 4801 |H | Short_Literal 0x1
01a2 e001 | | Load 0x0,0x1
01a3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01a4 0337 | 7 | Declare_Variable Array
01a5 4801 |H | Short_Literal 0x1
01a6 4801 |H | Short_Literal 0x1
01a7 00da | | Load_Top At_Offset_2
01a8 01d6 | | Execute Vector,Field_Write
01a9 4800 |H | Short_Literal 0x0
01aa 4800 |H | Short_Literal 0x0
01ab 00da | | Load_Top At_Offset_2
01ac 01d6 | | Execute Vector,Field_Write
01ad 4800 |H | Short_Literal 0x0
01ae 4802 |H | Short_Literal 0x2
01af 00da | | Load_Top At_Offset_2
01b0 01d6 | | Execute Vector,Field_Write
01b1 4800 |H | Short_Literal 0x0
01b2 4803 |H | Short_Literal 0x3
01b3 00da | | Load_Top At_Offset_2
01b4 01d6 | | Execute Vector,Field_Write
01b5 e001 | | Load 0x0,0x1
01b6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01b7 01c3 | | Execute Vector,Check_In_Type
01b8 0092 048e | | Action Push_String_Extended,0x48e ; "reduction="
01ba e001 | | Load 0x0,0x1
01bb 181e | | Execute Package,Field_Execute,Field_Number 0x1e
01bc e001 | | Load 0x0,0x1
01bd 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
01be 0119 | | Execute Any,Check_In_Formal_Type
01bf 4808 |H | Short_Literal 0x8
01c0 00da | | Load_Top At_Offset_2
01c1 01d6 | | Execute Vector,Field_Write
01c2 e210 | | Load 0x1,0x10
01c3 e406 | | Load 0x2,0x6
01c4 4801 |H | Short_Literal 0x1
01c5 4801 |H | Short_Literal 0x1
01c6 00ea | | Load_Encached Null_String_Cache
01c7 0092 048f | | Action Push_String_Extended,0x48f ; "Improve_Expressions"
01c9 4801 |H | Short_Literal 0x1
01ca e001 | | Load 0x0,0x1
01cb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01cc 0337 | 7 | Declare_Variable Array
01cd 4801 |H | Short_Literal 0x1
01ce 4801 |H | Short_Literal 0x1
01cf 00da | | Load_Top At_Offset_2
01d0 01d6 | | Execute Vector,Field_Write
01d1 4800 |H | Short_Literal 0x0
01d2 4800 |H | Short_Literal 0x0
01d3 00da | | Load_Top At_Offset_2
01d4 01d6 | | Execute Vector,Field_Write
01d5 4800 |H | Short_Literal 0x0
01d6 4802 |H | Short_Literal 0x2
01d7 00da | | Load_Top At_Offset_2
01d8 01d6 | | Execute Vector,Field_Write
01d9 4800 |H | Short_Literal 0x0
01da 4803 |H | Short_Literal 0x3
01db 00da | | Load_Top At_Offset_2
01dc 01d6 | | Execute Vector,Field_Write
01dd e001 | | Load 0x0,0x1
01de 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01df 01c3 | | Execute Vector,Check_In_Type
01e0 0092 0490 | | Action Push_String_Extended,0x490 ; "expressions="
01e2 e001 | | Load 0x0,0x1
01e3 181e | | Execute Package,Field_Execute,Field_Number 0x1e
01e4 e001 | | Load 0x0,0x1
01e5 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
01e6 0119 | | Execute Any,Check_In_Formal_Type
01e7 4809 |H | Short_Literal 0x9
01e8 00da | | Load_Top At_Offset_2
01e9 01d6 | | Execute Vector,Field_Write
01ea e210 | | Load 0x1,0x10
01eb e410 | | Load 0x2,0x10
01ec 4801 |H | Short_Literal 0x1
01ed 4801 |H | Short_Literal 0x1
01ee 00ea | | Load_Encached Null_String_Cache
01ef 0092 0491 | | Action Push_String_Extended,0x491 ; "Keep_Debug"
01f1 4801 |H | Short_Literal 0x1
01f2 e001 | | Load 0x0,0x1
01f3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01f4 0337 | 7 | Declare_Variable Array
01f5 4801 |H | Short_Literal 0x1
01f6 4801 |H | Short_Literal 0x1
01f7 00da | | Load_Top At_Offset_2
01f8 01d6 | | Execute Vector,Field_Write
01f9 4801 |H | Short_Literal 0x1
01fa 4803 |H | Short_Literal 0x3
01fb 00da | | Load_Top At_Offset_2
01fc 01d6 | | Execute Vector,Field_Write
01fd 4800 |H | Short_Literal 0x0
01fe 4800 |H | Short_Literal 0x0
01ff 00da | | Load_Top At_Offset_2
0200 01d6 | | Execute Vector,Field_Write
0201 4800 |H | Short_Literal 0x0
0202 4802 |H | Short_Literal 0x2
0203 00da | | Load_Top At_Offset_2
0204 01d6 | | Execute Vector,Field_Write
0205 e001 | | Load 0x0,0x1
0206 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0207 01c3 | | Execute Vector,Check_In_Type
0208 0092 0492 | | Action Push_String_Extended,0x492 ; "debug="
020a e001 | | Load 0x0,0x1
020b 181e | | Execute Package,Field_Execute,Field_Number 0x1e
020c e001 | | Load 0x0,0x1
020d 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
020e 0119 | | Execute Any,Check_In_Formal_Type
020f 480a |H | Short_Literal 0xa
0210 00da | | Load_Top At_Offset_2
0211 01d6 | | Execute Vector,Field_Write
0212 e210 | | Load 0x1,0x10
0213 00ea | | Load_Encached Null_String_Cache
0214 4801 |H | Short_Literal 0x1
0215 4800 |H | Short_Literal 0x0
0216 00ea | | Load_Encached Null_String_Cache
0217 00ea | | Load_Encached Null_String_Cache
0218 4800 |H | Short_Literal 0x0
0219 e001 | | Load 0x0,0x1
021a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
021b 0337 | 7 | Declare_Variable Array
021c 4801 |H | Short_Literal 0x1
021d 4801 |H | Short_Literal 0x1
021e 00da | | Load_Top At_Offset_2
021f 01d6 | | Execute Vector,Field_Write
0220 4800 |H | Short_Literal 0x0
0221 4800 |H | Short_Literal 0x0
0222 00da | | Load_Top At_Offset_2
0223 01d6 | | Execute Vector,Field_Write
0224 4800 |H | Short_Literal 0x0
0225 4802 |H | Short_Literal 0x2
0226 00da | | Load_Top At_Offset_2
0227 01d6 | | Execute Vector,Field_Write
0228 4800 |H | Short_Literal 0x0
0229 4803 |H | Short_Literal 0x3
022a 00da | | Load_Top At_Offset_2
022b 01d6 | | Execute Vector,Field_Write
022c e001 | | Load 0x0,0x1
022d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
022e 01c3 | | Execute Vector,Check_In_Type
022f 0092 0493 | | Action Push_String_Extended,0x493 ; "source="
0231 e001 | | Load 0x0,0x1
0232 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0233 e001 | | Load 0x0,0x1
0234 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0235 0119 | | Execute Any,Check_In_Formal_Type
0236 480b |H | Short_Literal 0xb
0237 00da | | Load_Top At_Offset_2
0238 01d6 | | Execute Vector,Field_Write
0239 e210 | | Load 0x1,0x10
023a e411 | | Load 0x2,0x11
023b 4801 |H | Short_Literal 0x1
023c 4801 |H | Short_Literal 0x1
023d 00ea | | Load_Encached Null_String_Cache
023e 0092 0494 | | Action Push_String_Extended,0x494 ; "Stack_Main_Size"
0240 4801 |H | Short_Literal 0x1
0241 e001 | | Load 0x0,0x1
0242 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0243 0337 | 7 | Declare_Variable Array
0244 4801 |H | Short_Literal 0x1
0245 4803 |H | Short_Literal 0x3
0246 00da | | Load_Top At_Offset_2
0247 01d6 | | Execute Vector,Field_Write
0248 4802 |H | Short_Literal 0x2
0249 4800 |H | Short_Literal 0x0
024a 4800 |H | Short_Literal 0x0
024b 00d9 | | Load_Top At_Offset_1
024c e421 | ! | Load 0x2,0x21
024d 01d6 | | Execute Vector,Field_Write
024e 3ffb |? | Loop_Increasing 0x24a
024f e001 | | Load 0x0,0x1
0250 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0251 01c3 | | Execute Vector,Check_In_Type
0252 0092 0495 | | Action Push_String_Extended,0x495 ; "main="
0254 e001 | | Load 0x0,0x1
0255 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0256 e001 | | Load 0x0,0x1
0257 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0258 0119 | | Execute Any,Check_In_Formal_Type
0259 480c |H | Short_Literal 0xc
025a 00da | | Load_Top At_Offset_2
025b 01d6 | | Execute Vector,Field_Write
025c e210 | | Load 0x1,0x10
025d 00db | | Load_Top At_Offset_3
025e 4801 |H | Short_Literal 0x1
025f 4801 |H | Short_Literal 0x1
0260 00ea | | Load_Encached Null_String_Cache
0261 0092 0496 | | Action Push_String_Extended,0x496 ; "Stack_Task_Size"
0263 4801 |H | Short_Literal 0x1
0264 e001 | | Load 0x0,0x1
0265 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0266 0337 | 7 | Declare_Variable Array
0267 4801 |H | Short_Literal 0x1
0268 4803 |H | Short_Literal 0x3
0269 00da | | Load_Top At_Offset_2
026a 01d6 | | Execute Vector,Field_Write
026b 4802 |H | Short_Literal 0x2
026c 4800 |H | Short_Literal 0x0
026d 4800 |H | Short_Literal 0x0
026e 00d9 | | Load_Top At_Offset_1
026f e421 | ! | Load 0x2,0x21
0270 01d6 | | Execute Vector,Field_Write
0271 3ffb |? | Loop_Increasing 0x26d
0272 e001 | | Load 0x0,0x1
0273 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0274 01c3 | | Execute Vector,Check_In_Type
0275 0092 0497 | | Action Push_String_Extended,0x497 ; "task="
0277 e001 | | Load 0x0,0x1
0278 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0279 e001 | | Load 0x0,0x1
027a 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
027b 0119 | | Execute Any,Check_In_Formal_Type
027c 480d |H | Short_Literal 0xd
027d 00da | | Load_Top At_Offset_2
027e 01d6 | | Execute Vector,Field_Write
027f e210 | | Load 0x1,0x10
0280 e40d | | Load 0x2,0xd
0281 4801 |H | Short_Literal 0x1
0282 4801 |H | Short_Literal 0x1
0283 00ea | | Load_Encached Null_String_Cache
0284 0092 0498 | | Action Push_String_Extended,0x498 ; "Stack_Trace_History"
0286 4801 |H | Short_Literal 0x1
0287 e001 | | Load 0x0,0x1
0288 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0289 0337 | 7 | Declare_Variable Array
028a 4801 |H | Short_Literal 0x1
028b 4803 |H | Short_Literal 0x3
028c 00da | | Load_Top At_Offset_2
028d 01d6 | | Execute Vector,Field_Write
028e 4802 |H | Short_Literal 0x2
028f 4800 |H | Short_Literal 0x0
0290 4800 |H | Short_Literal 0x0
0291 00d9 | | Load_Top At_Offset_1
0292 e421 | ! | Load 0x2,0x21
0293 01d6 | | Execute Vector,Field_Write
0294 3ffb |? | Loop_Increasing 0x290
0295 e001 | | Load 0x0,0x1
0296 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0297 01c3 | | Execute Vector,Check_In_Type
0298 0092 0499 | | Action Push_String_Extended,0x499 ; "history="
029a e001 | | Load 0x0,0x1
029b 181e | | Execute Package,Field_Execute,Field_Number 0x1e
029c e001 | | Load 0x0,0x1
029d 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
029e 0119 | | Execute Any,Check_In_Formal_Type
029f 480e |H | Short_Literal 0xe
02a0 00da | | Load_Top At_Offset_2
02a1 01d6 | | Execute Vector,Field_Write
02a2 e210 | | Load 0x1,0x10
02a3 e415 | | Load 0x2,0x15
02a4 4801 |H | Short_Literal 0x1
02a5 4801 |H | Short_Literal 0x1
02a6 00ea | | Load_Encached Null_String_Cache
02a7 0092 049a | | Action Push_String_Extended,0x49a ; "Heap_Initial_Size"
02a9 4801 |H | Short_Literal 0x1
02aa e001 | | Load 0x0,0x1
02ab 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02ac 0337 | 7 | Declare_Variable Array
02ad 4801 |H | Short_Literal 0x1
02ae 4803 |H | Short_Literal 0x3
02af 00da | | Load_Top At_Offset_2
02b0 01d6 | | Execute Vector,Field_Write
02b1 4802 |H | Short_Literal 0x2
02b2 4800 |H | Short_Literal 0x0
02b3 4800 |H | Short_Literal 0x0
02b4 00d9 | | Load_Top At_Offset_1
02b5 e421 | ! | Load 0x2,0x21
02b6 01d6 | | Execute Vector,Field_Write
02b7 3ffb |? | Loop_Increasing 0x2b3
02b8 e001 | | Load 0x0,0x1
02b9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02ba 01c3 | | Execute Vector,Check_In_Type
02bb 0092 049b | | Action Push_String_Extended,0x49b ; "size="
02bd e001 | | Load 0x0,0x1
02be 181e | | Execute Package,Field_Execute,Field_Number 0x1e
02bf e001 | | Load 0x0,0x1
02c0 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
02c1 0119 | | Execute Any,Check_In_Formal_Type
02c2 480f |H | Short_Literal 0xf
02c3 00da | | Load_Top At_Offset_2
02c4 01d6 | | Execute Vector,Field_Write
02c5 e210 | | Load 0x1,0x10
02c6 e40f | | Load 0x2,0xf
02c7 4801 |H | Short_Literal 0x1
02c8 4801 |H | Short_Literal 0x1
02c9 00ea | | Load_Encached Null_String_Cache
02ca 0092 049c | | Action Push_String_Extended,0x49c ; "Heap_Increment_Size"
02cc 4801 |H | Short_Literal 0x1
02cd e001 | | Load 0x0,0x1
02ce 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02cf 0337 | 7 | Declare_Variable Array
02d0 4801 |H | Short_Literal 0x1
02d1 4803 |H | Short_Literal 0x3
02d2 00da | | Load_Top At_Offset_2
02d3 01d6 | | Execute Vector,Field_Write
02d4 4802 |H | Short_Literal 0x2
02d5 4800 |H | Short_Literal 0x0
02d6 4800 |H | Short_Literal 0x0
02d7 00d9 | | Load_Top At_Offset_1
02d8 e421 | ! | Load 0x2,0x21
02d9 01d6 | | Execute Vector,Field_Write
02da 3ffb |? | Loop_Increasing 0x2d6
02db e001 | | Load 0x0,0x1
02dc 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02dd 01c3 | | Execute Vector,Check_In_Type
02de 0092 049d | | Action Push_String_Extended,0x49d ; "increment="
02e0 e001 | | Load 0x0,0x1
02e1 181e | | Execute Package,Field_Execute,Field_Number 0x1e
02e2 e001 | | Load 0x0,0x1
02e3 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
02e4 0119 | | Execute Any,Check_In_Formal_Type
02e5 4810 |H | Short_Literal 0x10
02e6 00da | | Load_Top At_Offset_2
02e7 01d6 | | Execute Vector,Field_Write
02e8 e210 | | Load 0x1,0x10
02e9 e405 | | Load 0x2,0x5
02ea 4801 |H | Short_Literal 0x1
02eb 4801 |H | Short_Literal 0x1
02ec 00ea | | Load_Encached Null_String_Cache
02ed 0092 049e | | Action Push_String_Extended,0x49e ; "Display_Map_Data"
02ef 4801 |H | Short_Literal 0x1
02f0 e001 | | Load 0x0,0x1
02f1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02f2 0337 | 7 | Declare_Variable Array
02f3 4801 |H | Short_Literal 0x1
02f4 4803 |H | Short_Literal 0x3
02f5 00da | | Load_Top At_Offset_2
02f6 01d6 | | Execute Vector,Field_Write
02f7 4802 |H | Short_Literal 0x2
02f8 4800 |H | Short_Literal 0x0
02f9 4800 |H | Short_Literal 0x0
02fa 00d9 | | Load_Top At_Offset_1
02fb e421 | ! | Load 0x2,0x21
02fc 01d6 | | Execute Vector,Field_Write
02fd 3ffb |? | Loop_Increasing 0x2f9
02fe e001 | | Load 0x0,0x1
02ff 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0300 01c3 | | Execute Vector,Check_In_Type
0301 0092 049f | | Action Push_String_Extended,0x49f ; "data="
0303 e001 | | Load 0x0,0x1
0304 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0305 e001 | | Load 0x0,0x1
0306 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0307 0119 | | Execute Any,Check_In_Formal_Type
0308 4811 |H | Short_Literal 0x11
0309 00da | | Load_Top At_Offset_2
030a 01d6 | | Execute Vector,Field_Write
030b e210 | | Load 0x1,0x10
030c 00ea | | Load_Encached Null_String_Cache
030d 4801 |H | Short_Literal 0x1
030e 4800 |H | Short_Literal 0x0
030f 00ea | | Load_Encached Null_String_Cache
0310 00ea | | Load_Encached Null_String_Cache
0311 4800 |H | Short_Literal 0x0
0312 e001 | | Load 0x0,0x1
0313 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0314 0337 | 7 | Declare_Variable Array
0315 4801 |H | Short_Literal 0x1
0316 4803 |H | Short_Literal 0x3
0317 00da | | Load_Top At_Offset_2
0318 01d6 | | Execute Vector,Field_Write
0319 4802 |H | Short_Literal 0x2
031a 4800 |H | Short_Literal 0x0
031b 4800 |H | Short_Literal 0x0
031c 00d9 | | Load_Top At_Offset_1
031d e421 | ! | Load 0x2,0x21
031e 01d6 | | Execute Vector,Field_Write
031f 3ffb |? | Loop_Increasing 0x31b
0320 e001 | | Load 0x0,0x1
0321 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0322 01c3 | | Execute Vector,Check_In_Type
0323 0092 04a0 | | Action Push_String_Extended,0x4a0 ; "program="
0325 e001 | | Load 0x0,0x1
0326 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0327 e001 | | Load 0x0,0x1
0328 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0329 0119 | | Execute Any,Check_In_Formal_Type
032a 4812 |H | Short_Literal 0x12
032b 00da | | Load_Top At_Offset_2
032c 01d6 | | Execute Vector,Field_Write
032d e210 | | Load 0x1,0x10
032e e409 | | Load 0x2,0x9
032f 4800 |H | Short_Literal 0x0
0330 4800 |H | Short_Literal 0x0
0331 0092 04a1 | | Action Push_String_Extended,0x4a1 ; "True"
0333 0092 04a2 | | Action Push_String_Extended,0x4a2 ; "Get_Compiler_Listing"
0335 4801 |H | Short_Literal 0x1
0336 e001 | | Load 0x0,0x1
0337 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0338 0337 | 7 | Declare_Variable Array
0339 4801 |H | Short_Literal 0x1
033a 4801 |H | Short_Literal 0x1
033b 00da | | Load_Top At_Offset_2
033c 01d6 | | Execute Vector,Field_Write
033d 4800 |H | Short_Literal 0x0
033e 4800 |H | Short_Literal 0x0
033f 00da | | Load_Top At_Offset_2
0340 01d6 | | Execute Vector,Field_Write
0341 4800 |H | Short_Literal 0x0
0342 4802 |H | Short_Literal 0x2
0343 00da | | Load_Top At_Offset_2
0344 01d6 | | Execute Vector,Field_Write
0345 4800 |H | Short_Literal 0x0
0346 4803 |H | Short_Literal 0x3
0347 00da | | Load_Top At_Offset_2
0348 01d6 | | Execute Vector,Field_Write
0349 e001 | | Load 0x0,0x1
034a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
034b 01c3 | | Execute Vector,Check_In_Type
034c 00ea | | Load_Encached Null_String_Cache
034d e001 | | Load 0x0,0x1
034e 181e | | Execute Package,Field_Execute,Field_Number 0x1e
034f e001 | | Load 0x0,0x1
0350 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0351 0119 | | Execute Any,Check_In_Formal_Type
0352 4813 |H | Short_Literal 0x13
0353 00da | | Load_Top At_Offset_2
0354 01d6 | | Execute Vector,Field_Write
0355 e210 | | Load 0x1,0x10
0356 e408 | | Load 0x2,0x8
0357 4800 |H | Short_Literal 0x0
0358 4800 |H | Short_Literal 0x0
0359 0092 04a1 | | Action Push_String_Extended,0x4a1 ; "True"
035b 0092 04a3 | | Action Push_String_Extended,0x4a3 ; "Get_Binder_Listing"
035d 4801 |H | Short_Literal 0x1
035e e001 | | Load 0x0,0x1
035f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0360 0337 | 7 | Declare_Variable Array
0361 4801 |H | Short_Literal 0x1
0362 4803 |H | Short_Literal 0x3
0363 00da | | Load_Top At_Offset_2
0364 01d6 | | Execute Vector,Field_Write
0365 4802 |H | Short_Literal 0x2
0366 4800 |H | Short_Literal 0x0
0367 4800 |H | Short_Literal 0x0
0368 00d9 | | Load_Top At_Offset_1
0369 e421 | ! | Load 0x2,0x21
036a 01d6 | | Execute Vector,Field_Write
036b 3ffb |? | Loop_Increasing 0x367
036c e001 | | Load 0x0,0x1
036d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
036e 01c3 | | Execute Vector,Check_In_Type
036f 00ea | | Load_Encached Null_String_Cache
0370 e001 | | Load 0x0,0x1
0371 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0372 e001 | | Load 0x0,0x1
0373 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0374 0119 | | Execute Any,Check_In_Formal_Type
0375 4814 |H | Short_Literal 0x14
0376 00da | | Load_Top At_Offset_2
0377 01d6 | | Execute Vector,Field_Write
0378 e210 | | Load 0x1,0x10
0379 e40a | | Load 0x2,0xa
037a 4800 |H | Short_Literal 0x0
037b 4800 |H | Short_Literal 0x0
037c 0092 04a4 | | Action Push_String_Extended,0x4a4 ; "False"
037e 0092 04a5 | | Action Push_String_Extended,0x4a5 ; "Get_Cui_File"
0380 4801 |H | Short_Literal 0x1
0381 e001 | | Load 0x0,0x1
0382 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0383 0337 | 7 | Declare_Variable Array
0384 4801 |H | Short_Literal 0x1
0385 4803 |H | Short_Literal 0x3
0386 00da | | Load_Top At_Offset_2
0387 01d6 | | Execute Vector,Field_Write
0388 4802 |H | Short_Literal 0x2
0389 4800 |H | Short_Literal 0x0
038a 4800 |H | Short_Literal 0x0
038b 00d9 | | Load_Top At_Offset_1
038c e421 | ! | Load 0x2,0x21
038d 01d6 | | Execute Vector,Field_Write
038e 3ffb |? | Loop_Increasing 0x38a
038f e001 | | Load 0x0,0x1
0390 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0391 01c3 | | Execute Vector,Check_In_Type
0392 00ea | | Load_Encached Null_String_Cache
0393 e001 | | Load 0x0,0x1
0394 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0395 e001 | | Load 0x0,0x1
0396 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0397 0119 | | Execute Any,Check_In_Formal_Type
0398 4815 |H | Short_Literal 0x15
0399 00da | | Load_Top At_Offset_2
039a 01d6 | | Execute Vector,Field_Write
039b e210 | | Load 0x1,0x10
039c e40c | | Load 0x2,0xc
039d 4800 |H | Short_Literal 0x0
039e 4800 |H | Short_Literal 0x0
039f 0092 04a4 | | Action Push_String_Extended,0x4a4 ; "False"
03a1 0092 04a6 | | Action Push_String_Extended,0x4a6 ; "Get_Lnk_File"
03a3 4801 |H | Short_Literal 0x1
03a4 e001 | | Load 0x0,0x1
03a5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03a6 0337 | 7 | Declare_Variable Array
03a7 4801 |H | Short_Literal 0x1
03a8 4803 |H | Short_Literal 0x3
03a9 00da | | Load_Top At_Offset_2
03aa 01d6 | | Execute Vector,Field_Write
03ab 4802 |H | Short_Literal 0x2
03ac 4800 |H | Short_Literal 0x0
03ad 4800 |H | Short_Literal 0x0
03ae 00d9 | | Load_Top At_Offset_1
03af e421 | ! | Load 0x2,0x21
03b0 01d6 | | Execute Vector,Field_Write
03b1 3ffb |? | Loop_Increasing 0x3ad
03b2 e001 | | Load 0x0,0x1
03b3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03b4 01c3 | | Execute Vector,Check_In_Type
03b5 00ea | | Load_Encached Null_String_Cache
03b6 e001 | | Load 0x0,0x1
03b7 181e | | Execute Package,Field_Execute,Field_Number 0x1e
03b8 e001 | | Load 0x0,0x1
03b9 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
03ba 0119 | | Execute Any,Check_In_Formal_Type
03bb 4816 |H | Short_Literal 0x16
03bc 00da | | Load_Top At_Offset_2
03bd 01d6 | | Execute Vector,Field_Write
03be e210 | | Load 0x1,0x10
03bf e40b | | Load 0x2,0xb
03c0 4800 |H | Short_Literal 0x0
03c1 4800 |H | Short_Literal 0x0
03c2 0092 04a4 | | Action Push_String_Extended,0x4a4 ; "False"
03c4 0092 04a7 | | Action Push_String_Extended,0x4a7 ; "Get_Executable_File"
03c6 4801 |H | Short_Literal 0x1
03c7 e001 | | Load 0x0,0x1
03c8 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03c9 0337 | 7 | Declare_Variable Array
03ca 4801 |H | Short_Literal 0x1
03cb 4803 |H | Short_Literal 0x3
03cc 00da | | Load_Top At_Offset_2
03cd 01d6 | | Execute Vector,Field_Write
03ce 4802 |H | Short_Literal 0x2
03cf 4800 |H | Short_Literal 0x0
03d0 4800 |H | Short_Literal 0x0
03d1 00d9 | | Load_Top At_Offset_1
03d2 e421 | ! | Load 0x2,0x21
03d3 01d6 | | Execute Vector,Field_Write
03d4 3ffb |? | Loop_Increasing 0x3d0
03d5 e001 | | Load 0x0,0x1
03d6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03d7 01c3 | | Execute Vector,Check_In_Type
03d8 00ea | | Load_Encached Null_String_Cache
03d9 e001 | | Load 0x0,0x1
03da 181e | | Execute Package,Field_Execute,Field_Number 0x1e
03db e001 | | Load 0x0,0x1
03dc 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
03dd 0119 | | Execute Any,Check_In_Formal_Type
03de 4817 |H | Short_Literal 0x17
03df 00da | | Load_Top At_Offset_2
03e0 01d6 | | Execute Vector,Field_Write
03e1 e210 | | Load 0x1,0x10
03e2 e407 | | Load 0x2,0x7
03e3 4800 |H | Short_Literal 0x0
03e4 4801 |H | Short_Literal 0x1
03e5 00ea | | Load_Encached Null_String_Cache
03e6 0092 04a8 | | Action Push_String_Extended,0x4a8 ; "User_Set_Family_Name"
03e8 4801 |H | Short_Literal 0x1
03e9 e001 | | Load 0x0,0x1
03ea 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03eb 0337 | 7 | Declare_Variable Array
03ec 4803 |H | Short_Literal 0x3
03ed 4800 |H | Short_Literal 0x0
03ee 4800 |H | Short_Literal 0x0
03ef 00d9 | | Load_Top At_Offset_1
03f0 e421 | ! | Load 0x2,0x21
03f1 01d6 | | Execute Vector,Field_Write
03f2 3ffb |? | Loop_Increasing 0x3ee
03f3 e001 | | Load 0x0,0x1
03f4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03f5 01c3 | | Execute Vector,Check_In_Type
03f6 00ea | | Load_Encached Null_String_Cache
03f7 e001 | | Load 0x0,0x1
03f8 181e | | Execute Package,Field_Execute,Field_Number 0x1e
03f9 e001 | | Load 0x0,0x1
03fa 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
03fb 0119 | | Execute Any,Check_In_Formal_Type
03fc 4818 |H | Short_Literal 0x18
03fd 00da | | Load_Top At_Offset_2
03fe 01d6 | | Execute Vector,Field_Write
03ff 4800 |H | Short_Literal 0x0
0400 4801 |H | Short_Literal 0x1
0401 e001 | | Load 0x0,0x1
0402 1b37 | 7 | Execute Package,Field_Read,Field_Number 0x37
0403 035b | [ | Declare_Type Array,Constrained
0404 0337 | 7 | Declare_Variable Array
0405 e210 | | Load 0x1,0x10
0406 0092 04a9 | | Action Push_String_Extended,0x4a9 ; "lis"
0408 00ea | | Load_Encached Null_String_Cache
0409 4800 |H | Short_Literal 0x0
040a 4801 |H | Short_Literal 0x1
040b 0092 04a9 | | Action Push_String_Extended,0x4a9 ; "lis"
040d 0092 04a2 | | Action Push_String_Extended,0x4a2 ; "Get_Compiler_Listing"
040f 4801 |H | Short_Literal 0x1
0410 4801 |H | Short_Literal 0x1
0411 4803 |H | Short_Literal 0x3
0412 4800 |H | Short_Literal 0x0
0413 e001 | | Load 0x0,0x1
0414 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0415 e001 | | Load 0x0,0x1
0416 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
0417 0119 | | Execute Any,Check_In_Formal_Type
0418 4800 |H | Short_Literal 0x0
0419 00da | | Load_Top At_Offset_2
041a 01d6 | | Execute Vector,Field_Write
041b e210 | | Load 0x1,0x10
041c 0092 04aa | | Action Push_String_Extended,0x4aa ; "map"
041e 00ea | | Load_Encached Null_String_Cache
041f 4800 |H | Short_Literal 0x0
0420 4800 |H | Short_Literal 0x0
0421 0092 04ab | | Action Push_String_Extended,0x4ab ; "MAP"
0423 0092 04a3 | | Action Push_String_Extended,0x4a3 ; "Get_Binder_Listing"
0425 4801 |H | Short_Literal 0x1
0426 4803 |H | Short_Literal 0x3
0427 4801 |H | Short_Literal 0x1
0428 4800 |H | Short_Literal 0x0
0429 e001 | | Load 0x0,0x1
042a 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
042b e001 | | Load 0x0,0x1
042c 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
042d 0119 | | Execute Any,Check_In_Formal_Type
042e 4801 |H | Short_Literal 0x1
042f 00da | | Load_Top At_Offset_2
0430 01d6 | | Execute Vector,Field_Write
0431 e001 | | Load 0x0,0x1
0432 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0433 02c7 | | Declare_Variable Any
0434 e210 | | Load 0x1,0x10
0435 00ea | | Load_Encached Null_String_Cache
0436 00ea | | Load_Encached Null_String_Cache
0437 00ea | | Load_Encached Null_String_Cache
0438 00ea | | Load_Encached Null_String_Cache
0439 0092 04ac | | Action Push_String_Extended,0x4ac ; "cp"
043b 0092 04ad | | Action Push_String_Extended,0x4ad ; "sh -ex"
043d 4800 |H | Short_Literal 0x0
043e e211 | | Load 0x1,0x11
043f e41a | | Load 0x2,0x1a
0440 4801 |H | Short_Literal 0x1
0441 00ea | | Load_Encached Null_String_Cache
0442 00ea | | Load_Encached Null_String_Cache
0443 0092 04ae | | Action Push_String_Extended,0x4ae ; "."
0445 e419 | | Load 0x2,0x19
0446 00ea | | Load_Encached Null_String_Cache
0447 00ea | | Load_Encached Null_String_Cache
0448 0092 04af | | Action Push_String_Extended,0x4af ; " "
044a 8212 | | Call 0x1,0x12
044b 480b |H | Short_Literal 0xb
044c 00ea | | Load_Encached Null_String_Cache
044d 4800 |H | Short_Literal 0x0
044e 4800 |H | Short_Literal 0x0
044f 0092 04b0 | | Action Push_String_Extended,0x4b0 ; "adalib"
0451 00ea | | Load_Encached Null_String_Cache
0452 0092 04b1 | | Action Push_String_Extended,0x4b1 ; "cd"
0454 4800 |H | Short_Literal 0x0
0455 0092 04b2 | | Action Push_String_Extended,0x4b2 ; "object="
0457 00ea | | Load_Encached Null_String_Cache
0458 00ea | | Load_Encached Null_String_Cache
0459 0092 04b3 | | Action Push_String_Extended,0x4b3 ; "ada bind"
045b 00ea | | Load_Encached Null_String_Cache
045c 00ea | | Load_Encached Null_String_Cache
045d 0092 04b4 | | Action Push_String_Extended,0x4b4 ; "ada compile"
045f 48ff |H | Short_Literal 0xff
0460 4801 |H | Short_Literal 0x1
0461 4801 |H | Short_Literal 0x1
0462 0092 04b5 | | Action Push_String_Extended,0x4b5 ; "/"
0464 00ea | | Load_Encached Null_String_Cache
0465 00ea | | Load_Encached Null_String_Cache
0466 0092 04b5 | | Action Push_String_Extended,0x4b5 ; "/"
0468 0092 04ae | | Action Push_String_Extended,0x4ae ; "."
046a 0092 04b6 | | Action Push_String_Extended,0x4b6 ; "adb"
046c 0092 04b7 | | Action Push_String_Extended,0x4b7 ; "ads"
046e 6009 |` | Indirect_Literal Discrete,0x478,{0x00000000, 0x00000400}
046f 48ff |H | Short_Literal 0xff
0470 e402 | | Load 0x2,0x2
0471 e001 | | Load 0x0,0x1
0472 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
0473 a41b | | Store_Unchecked 0x2,0x1b
0474 BODY_0008:
0474 00d8 | | Load_Top At_Offset_0
0475 00ca | | Action Exit_Nullary_Function
0476 0000 0000 | | .XXX[0x2]
0478 0000 0000 | | .LITERAL {0x00000000, 0x00000400}
047c ; --------------------------------------------------------------------------------------
047c ; STRING TABLE
047c ; --------------------------------------------------------------------------------------
047c 007a | z | .STRTAB 0x007a->0x04b9 ; "library=adalib"
047d 0086 | | .STRTAB 0x0086->0x04c0 ; "Run_Time_Checks"
047e 0093 | | .STRTAB 0x0093->0x04c7 ; "checks="
047f 0098 | | .STRTAB 0x0098->0x04cb ; "Shared_Memory_Size"
0480 00a8 | | .STRTAB 0x00a8->0x04d4 ; "memory="
0481 00ad | | .STRTAB 0x00ad->0x04d7 ; "yes"
0482 00ae | | .STRTAB 0x00ae->0x04d9 ; "Display_Text"
0483 00b8 | | .STRTAB 0x00b8->0x04df ; "text="
0484 00bb | | .STRTAB 0x00bb->0x04e1 ; "all"
0485 00bc | | .STRTAB 0x00bc->0x04e3 ; "Display_Show"
0486 00c6 | | .STRTAB 0x00c6->0x04e9 ; "show="
0487 00c9 | | .STRTAB 0x00c9->0x04eb ; "Display_Assembly"
0488 00d7 | | .STRTAB 0x00d7->0x04f3 ; "assembly="
0489 00de | | .STRTAB 0x00de->0x04f8 ; "Stack_Object_Size"
048a 00ed | | .STRTAB 0x00ed->0x0500 ; "stack="
048b 00f1 | | .STRTAB 0x00f1->0x0503 ; "Improve_Calls"
048c 00fc | | .STRTAB 0x00fc->0x050a ; "calls="
048d 0100 | | .STRTAB 0x0100->0x050d ; "Improve_Reduction"
048e 010f | | .STRTAB 0x010f->0x0515 ; "reduction="
048f 0117 | | .STRTAB 0x0117->0x051a ; "Improve_Expressions"
0490 0128 | ( | .STRTAB 0x0128->0x0524 ; "expressions="
0491 0132 | 2 | .STRTAB 0x0132->0x052a ; "Keep_Debug"
0492 013a | : | .STRTAB 0x013a->0x052f ; "debug="
0493 013e | > | .STRTAB 0x013e->0x0532 ; "source="
0494 0143 | C | .STRTAB 0x0143->0x0535 ; "Stack_Main_Size"
0495 0150 | P | .STRTAB 0x0150->0x053d ; "main="
0496 0153 | S | .STRTAB 0x0153->0x053f ; "Stack_Task_Size"
0497 0160 | ` | .STRTAB 0x0160->0x0547 ; "task="
0498 0163 | c | .STRTAB 0x0163->0x0549 ; "Stack_Trace_History"
0499 0174 | t | .STRTAB 0x0174->0x0553 ; "history="
049a 017a | z | .STRTAB 0x017a->0x0557 ; "Heap_Initial_Size"
049b 0189 | | .STRTAB 0x0189->0x055f ; "size="
049c 018c | | .STRTAB 0x018c->0x0562 ; "Heap_Increment_Size"
049d 019d | | .STRTAB 0x019d->0x056b ; "increment="
049e 01a5 | | .STRTAB 0x01a5->0x0570 ; "Display_Map_Data"
049f 01b3 | | .STRTAB 0x01b3->0x0578 ; "data="
04a0 01b6 | | .STRTAB 0x01b6->0x057b ; "program="
04a1 01bc | | .STRTAB 0x01bc->0x057f ; "True"
04a2 01be | | .STRTAB 0x01be->0x0581 ; "Get_Compiler_Listing"
04a3 01d0 | | .STRTAB 0x01d0->0x058b ; "Get_Binder_Listing"
04a4 01e0 | | .STRTAB 0x01e0->0x0594 ; "False"
04a5 01e3 | | .STRTAB 0x01e3->0x0596 ; "Get_Cui_File"
04a6 01ed | | .STRTAB 0x01ed->0x059c ; "Get_Lnk_File"
04a7 01f7 | | .STRTAB 0x01f7->0x05a2 ; "Get_Executable_File"
04a8 0208 | | .STRTAB 0x0208->0x05ac ; "User_Set_Family_Name"
04a9 021a | | .STRTAB 0x021a->0x05b6 ; "lis"
04aa 021b | | .STRTAB 0x021b->0x05b7 ; "map"
04ab 021c | | .STRTAB 0x021c->0x05b9 ; "MAP"
04ac 021d | | .STRTAB 0x021d->0x05ba ; "cp"
04ad 021d | | .STRTAB 0x021d->0x05bb ; "sh -ex"
04ae 0221 | ! | .STRTAB 0x0221->0x05be ; "."
04af 0220 | | .STRTAB 0x0220->0x05bf ; " "
04b0 021f | | .STRTAB 0x021f->0x05bf ; "adalib"
04b1 0223 | # | .STRTAB 0x0223->0x05c2 ; "cd"
04b2 0223 | # | .STRTAB 0x0223->0x05c3 ; "object="
04b3 0228 | ( | .STRTAB 0x0228->0x05c7 ; "ada bind"
04b4 022e | . | .STRTAB 0x022e->0x05cb ; "ada compile"
04b5 0237 | 7 | .STRTAB 0x0237->0x05d0 ; "/"
04b6 0236 | 6 | .STRTAB 0x0236->0x05d1 ; "adb"
04b7 0237 | 7 | .STRTAB 0x0237->0x05d2 ; "ads"
04b8 0238 | 8 | .STREND 0x0238->0x05d4
04b9 6c69 6272 |libr| .STRTAB_STRINGS
05d4 0000 0000 | | .BLANK 0000[0x4]
05d8 ; --------------------------------------------------------------------------------------
05d8 ; Debug Table
05d8 ; --------------------------------------------------------------------------------------
05d8 0004 0003 | | .DEBUG4 0x0004,0x0003,0xb91c,0x0000,0x0001,0x0001
05de 000b 05e2 | | .DBG4T 0x000b,0x05e2,0x0002,0x0000
05e2 ; --------------------------------------------------------------------------------------
05e2 ; Debug chain
05e2 ; --------------------------------------------------------------------------------------
05e2 001a 0001 | | .DBGLEN 0x001a,0x0001
05e4 000b 0027 | '| .DBGLNO 0x000b,0x0027,0x0029,0x002b,0x002d,0x002f,0x0031,0x0033,0x0035,0x0037,0x0039,0x003b,0x003d,0x003f,0x0041,0x0043,0x0045,0x0047,0x0049,0x004b,0x004d,0x004f,0x0051,0x0053,0x03ff,0x0431,0x0474
05ff 0000 | | .XXX[0x1]