|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 4096 (0x1000)
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 0778 | x | .CONST 0x0778 ; 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 8004 | | .CONST 0x8004 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 006a | j | .CONST 0x006a ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0015 | | .CONST 0x0015 ; Number of locals
000b INIT_0008:
000b 029a 0073 | s| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0070
000d 029a 02eb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_02e8
000f 029a 03eb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03e8
0011 029a 0633 | 3| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0630
0013 00bf | | Action Accept_Activation
0014 0092 066e | n| Action Push_String_Extended,0x66e ; "I386_Unix_Als_Xt"
0016 0092 066e | n| Action Push_String_Extended,0x66e ; "I386_Unix_Als_Xt"
0018 4801 |H | Short_Literal 0x1
0019 4807 |H | Short_Literal 0x7
001a 4801 |H | Short_Literal 0x1
001b 4810 |H | Short_Literal 0x10
001c 00e9 | | Load_Encached String_Cache
001d 035b | [ | Declare_Type Array,Constrained
001e 02a0 | | Declare_Subprogram Null_Subprogram
001f 4801 |H | Short_Literal 0x1
0020 035d | ] | Declare_Type Array,Defined
0021 00d8 | | Load_Top At_Offset_0
0022 0337 | 7 | Declare_Variable Array
0023 00d8 | | Load_Top At_Offset_0
0024 0335 | 5 | Declare_Variable Array,Duplicate
0025 00cd | | Action Spare6_Action
0026 0092 066f | o| Action Push_String_Extended,0x66f ; "Rs6000_Aix_Ibm "
0028 00da | | Load_Top At_Offset_2
0029 01d8 | | Execute Vector,Element_Type
002a 0119 | | Execute Any,Check_In_Formal_Type
002b 4801 |H | Short_Literal 0x1
002c 00da | | Load_Top At_Offset_2
002d 01d6 | | Execute Vector,Field_Write
002e 0092 0670 | p| Action Push_String_Extended,0x670 ; "Vax_Vms_Dec_Xt "
0030 00da | | Load_Top At_Offset_2
0031 01d8 | | Execute Vector,Element_Type
0032 0119 | | Execute Any,Check_In_Formal_Type
0033 4802 |H | Short_Literal 0x2
0034 00da | | Load_Top At_Offset_2
0035 01d6 | | Execute Vector,Field_Write
0036 0092 066e | n| Action Push_String_Extended,0x66e ; "I386_Unix_Als_Xt"
0038 00da | | Load_Top At_Offset_2
0039 01d8 | | Execute Vector,Element_Type
003a 0119 | | Execute Any,Check_In_Formal_Type
003b 4803 |H | Short_Literal 0x3
003c 00da | | Load_Top At_Offset_2
003d 01d6 | | Execute Vector,Field_Write
003e 0092 0671 | q| Action Push_String_Extended,0x671 ; "I486_Iux_Als_Xt "
0040 00da | | Load_Top At_Offset_2
0041 01d8 | | Execute Vector,Element_Type
0042 0119 | | Execute Any,Check_In_Formal_Type
0043 4804 |H | Short_Literal 0x4
0044 00da | | Load_Top At_Offset_2
0045 01d6 | | Execute Vector,Field_Write
0046 0092 0672 | r| Action Push_String_Extended,0x672 ; "I960_Vms_Tar_Xt "
0048 00da | | Load_Top At_Offset_2
0049 01d8 | | Execute Vector,Element_Type
004a 0119 | | Execute Any,Check_In_Formal_Type
004b 4805 |H | Short_Literal 0x5
004c 00da | | Load_Top At_Offset_2
004d 01d6 | | Execute Vector,Field_Write
004e 0092 0673 | s| Action Push_String_Extended,0x673 ; "IC30_Vms_Tar_Xt "
0050 00da | | Load_Top At_Offset_2
0051 01d8 | | Execute Vector,Element_Type
0052 0119 | | Execute Any,Check_In_Formal_Type
0053 4806 |H | Short_Literal 0x6
0054 00da | | Load_Top At_Offset_2
0055 01d6 | | Execute Vector,Field_Write
0056 0092 0674 | t| Action Push_String_Extended,0x674 ; "Sparc_Sun_Xt "
0058 00da | | Load_Top At_Offset_2
0059 01d8 | | Execute Vector,Element_Type
005a 0119 | | Execute Any,Check_In_Formal_Type
005b 4807 |H | Short_Literal 0x7
005c 00da | | Load_Top At_Offset_2
005d 01d6 | | Execute Vector,Field_Write
005e 00d9 | | Load_Top At_Offset_1
005f 01d4 | | Execute Vector,Structure_Write
0060 029d 0653 | S| Declare_Subprogram For_Outer_Call,INIT_0650
0062 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0063 00c7 | | Action Elaborate_Subprogram
0064 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0065 00c7 | | Action Elaborate_Subprogram
0066 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0067 00c7 | | Action Elaborate_Subprogram
0068 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0069 00c7 | | Action Elaborate_Subprogram
006a BODY_0008:
006a 00bc | | Action Signal_Activated
006b 00bb | | Action Signal_Completion
006c 0000 0000 | | .BLANK 0000[0x4]
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 02ce | | .CONST 0x02ce ; Address of begin
0071 0004 | | .CONST 0x0004 ; Address of exception handler
0072 0018 | | .CONST 0x0018 ; Number of locals
0073 INIT_0070:
0073 e001 | | Load 0x0,0x1
0074 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0075 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0076 02c7 | | Declare_Variable Any
0077 e212 | | Load 0x1,0x12
0078 e001 | | Load 0x0,0x1
0079 1b12 | | Execute Package,Field_Read,Field_Number 0x12
007a 1b19 | | Execute Package,Field_Read,Field_Number 0x19
007b e001 | | Load 0x0,0x1
007c 1b12 | | Execute Package,Field_Read,Field_Number 0x12
007d 1b19 | | Execute Package,Field_Read,Field_Number 0x19
007e e001 | | Load 0x0,0x1
007f 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0080 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0081 e001 | | Load 0x0,0x1
0082 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0083 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0084 e001 | | Load 0x0,0x1
0085 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0086 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0087 e001 | | Load 0x0,0x1
0088 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0089 181d | | Execute Package,Field_Execute,Field_Number 0x1d
008a a402 | | Store_Unchecked 0x2,0x2
008b e001 | | Load 0x0,0x1
008c 1b15 | | Execute Package,Field_Read,Field_Number 0x15
008d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
008e 02c7 | | Declare_Variable Any
008f e212 | | Load 0x1,0x12
0090 00da | | Load_Top At_Offset_2
0091 e001 | | Load 0x0,0x1
0092 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0093 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
0094 e001 | | Load 0x0,0x1
0095 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0096 1845 | E | Execute Package,Field_Execute,Field_Number 0x45
0097 e001 | | Load 0x0,0x1
0098 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0099 1810 | | Execute Package,Field_Execute,Field_Number 0x10
009a a403 | | Store_Unchecked 0x2,0x3
009b e001 | | Load 0x0,0x1
009c 1b15 | | Execute Package,Field_Read,Field_Number 0x15
009d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
009e 02c7 | | Declare_Variable Any
009f e212 | | Load 0x1,0x12
00a0 0092 0675 | u| Action Push_String_Extended,0x675 ; "Boolean"
00a2 e001 | | Load 0x0,0x1
00a3 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00a4 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00a5 a404 | | Store_Unchecked 0x2,0x4
00a6 e212 | | Load 0x1,0x12
00a7 e001 | | Load 0x0,0x1
00a8 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00a9 181f | | Execute Package,Field_Execute,Field_Number 0x1f
00aa 00da | | Load_Top At_Offset_2
00ab e403 | | Load 0x2,0x3
00ac 0092 0676 | v| Action Push_String_Extended,0x676 ; "is_array"
00ae e001 | | Load 0x0,0x1
00af 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00b0 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
00b1 e001 | | Load 0x0,0x1
00b2 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00b3 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
00b4 011e | | Execute Any,Convert
00b5 e001 | | Load 0x0,0x1
00b6 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00b7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00b8 02c7 | | Declare_Variable Any
00b9 e212 | | Load 0x1,0x12
00ba e001 | | Load 0x0,0x1
00bb 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00bc 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00bd e212 | | Load 0x1,0x12
00be e001 | | Load 0x0,0x1
00bf 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00c0 1b19 | | Execute Package,Field_Read,Field_Number 0x19
00c1 e001 | | Load 0x0,0x1
00c2 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00c3 1b19 | | Execute Package,Field_Read,Field_Number 0x19
00c4 4801 |H | Short_Literal 0x1
00c5 e001 | | Load 0x0,0x1
00c6 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00c7 1b41 | A | Execute Package,Field_Read,Field_Number 0x41
00c8 0337 | 7 | Declare_Variable Array
00c9 4801 |H | Short_Literal 0x1
00ca 4807 |H | Short_Literal 0x7
00cb 00da | | Load_Top At_Offset_2
00cc 01d6 | | Execute Vector,Field_Write
00cd 4806 |H | Short_Literal 0x6
00ce 4800 |H | Short_Literal 0x0
00cf 4800 |H | Short_Literal 0x0
00d0 00d9 | | Load_Top At_Offset_1
00d1 e40d | | Load 0x2,0xd
00d2 01d6 | | Execute Vector,Field_Write
00d3 3ffb |? | Loop_Increasing 0xcf
00d4 480e |H | Short_Literal 0xe
00d5 4808 |H | Short_Literal 0x8
00d6 4800 |H | Short_Literal 0x0
00d7 00d9 | | Load_Top At_Offset_1
00d8 e40d | | Load 0x2,0xd
00d9 01d6 | | Execute Vector,Field_Write
00da 3ffb |? | Loop_Increasing 0xd6
00db e001 | | Load 0x0,0x1
00dc 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00dd 1b41 | A | Execute Package,Field_Read,Field_Number 0x41
00de 01c3 | | Execute Vector,Check_In_Type
00df e001 | | Load 0x0,0x1
00e0 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00e1 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
00e2 e001 | | Load 0x0,0x1
00e3 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00e4 1845 | E | Execute Package,Field_Execute,Field_Number 0x45
00e5 e001 | | Load 0x0,0x1
00e6 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00e7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00e8 a406 | | Store_Unchecked 0x2,0x6
00e9 e001 | | Load 0x0,0x1
00ea 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00eb 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00ec 02c7 | | Declare_Variable Any
00ed e212 | | Load 0x1,0x12
00ee e001 | | Load 0x0,0x1
00ef 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00f0 181a | | Execute Package,Field_Execute,Field_Number 0x1a
00f1 a407 | | Store_Unchecked 0x2,0x7
00f2 e212 | | Load 0x1,0x12
00f3 e001 | | Load 0x0,0x1
00f4 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00f5 181f | | Execute Package,Field_Execute,Field_Number 0x1f
00f6 00da | | Load_Top At_Offset_2
00f7 e406 | | Load 0x2,0x6
00f8 0092 0677 | w| Action Push_String_Extended,0x677 ; "Record_Descriptor"
00fa e001 | | Load 0x0,0x1
00fb 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00fc 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
00fd e001 | | Load 0x0,0x1
00fe 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00ff 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0100 011e | | Execute Any,Convert
0101 e001 | | Load 0x0,0x1
0102 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0103 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0104 02c7 | | Declare_Variable Any
0105 e212 | | Load 0x1,0x12
0106 e001 | | Load 0x0,0x1
0107 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0108 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0109 e212 | | Load 0x1,0x12
010a e001 | | Load 0x0,0x1
010b 1b12 | | Execute Package,Field_Read,Field_Number 0x12
010c 1b19 | | Execute Package,Field_Read,Field_Number 0x19
010d e001 | | Load 0x0,0x1
010e 1b12 | | Execute Package,Field_Read,Field_Number 0x12
010f 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0110 4801 |H | Short_Literal 0x1
0111 e001 | | Load 0x0,0x1
0112 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0113 1b41 | A | Execute Package,Field_Read,Field_Number 0x41
0114 0337 | 7 | Declare_Variable Array
0115 4801 |H | Short_Literal 0x1
0116 4807 |H | Short_Literal 0x7
0117 00da | | Load_Top At_Offset_2
0118 01d6 | | Execute Vector,Field_Write
0119 4806 |H | Short_Literal 0x6
011a 4800 |H | Short_Literal 0x0
011b 4800 |H | Short_Literal 0x0
011c 00d9 | | Load_Top At_Offset_1
011d e410 | | Load 0x2,0x10
011e 01d6 | | Execute Vector,Field_Write
011f 3ffb |? | Loop_Increasing 0x11b
0120 480e |H | Short_Literal 0xe
0121 4808 |H | Short_Literal 0x8
0122 4800 |H | Short_Literal 0x0
0123 00d9 | | Load_Top At_Offset_1
0124 e410 | | Load 0x2,0x10
0125 01d6 | | Execute Vector,Field_Write
0126 3ffb |? | Loop_Increasing 0x122
0127 e001 | | Load 0x0,0x1
0128 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0129 1b41 | A | Execute Package,Field_Read,Field_Number 0x41
012a 01c3 | | Execute Vector,Check_In_Type
012b e001 | | Load 0x0,0x1
012c 1b12 | | Execute Package,Field_Read,Field_Number 0x12
012d 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
012e e001 | | Load 0x0,0x1
012f 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0130 1845 | E | Execute Package,Field_Execute,Field_Number 0x45
0131 e001 | | Load 0x0,0x1
0132 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0133 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0134 a409 | | Store_Unchecked 0x2,0x9
0135 e001 | | Load 0x0,0x1
0136 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0137 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0138 02c7 | | Declare_Variable Any
0139 e212 | | Load 0x1,0x12
013a e001 | | Load 0x0,0x1
013b 1b15 | | Execute Package,Field_Read,Field_Number 0x15
013c 181a | | Execute Package,Field_Execute,Field_Number 0x1a
013d a40a | | Store_Unchecked 0x2,0xa
013e e212 | | Load 0x1,0x12
013f e001 | | Load 0x0,0x1
0140 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0141 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0142 00da | | Load_Top At_Offset_2
0143 e409 | | Load 0x2,0x9
0144 0092 0678 | x| Action Push_String_Extended,0x678 ; "Array_Descriptor"
0146 e001 | | Load 0x0,0x1
0147 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0148 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0149 e001 | | Load 0x0,0x1
014a 1b15 | | Execute Package,Field_Read,Field_Number 0x15
014b 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
014c 011e | | Execute Any,Convert
014d e001 | | Load 0x0,0x1
014e 1b15 | | Execute Package,Field_Read,Field_Number 0x15
014f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0150 02c7 | | Declare_Variable Any
0151 e212 | | Load 0x1,0x12
0152 e001 | | Load 0x0,0x1
0153 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0154 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0155 e212 | | Load 0x1,0x12
0156 e001 | | Load 0x0,0x1
0157 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0158 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0159 e001 | | Load 0x0,0x1
015a 1b12 | | Execute Package,Field_Read,Field_Number 0x12
015b 1b19 | | Execute Package,Field_Read,Field_Number 0x19
015c 4801 |H | Short_Literal 0x1
015d e001 | | Load 0x0,0x1
015e 1b12 | | Execute Package,Field_Read,Field_Number 0x12
015f 1b41 | A | Execute Package,Field_Read,Field_Number 0x41
0160 0337 | 7 | Declare_Variable Array
0161 4801 |H | Short_Literal 0x1
0162 4805 |H | Short_Literal 0x5
0163 00da | | Load_Top At_Offset_2
0164 01d6 | | Execute Vector,Field_Write
0165 4804 |H | Short_Literal 0x4
0166 4800 |H | Short_Literal 0x0
0167 4800 |H | Short_Literal 0x0
0168 00d9 | | Load_Top At_Offset_1
0169 e413 | | Load 0x2,0x13
016a 01d6 | | Execute Vector,Field_Write
016b 3ffb |? | Loop_Increasing 0x167
016c 480e |H | Short_Literal 0xe
016d 4806 |H | Short_Literal 0x6
016e 4800 |H | Short_Literal 0x0
016f 00d9 | | Load_Top At_Offset_1
0170 e413 | | Load 0x2,0x13
0171 01d6 | | Execute Vector,Field_Write
0172 3ffb |? | Loop_Increasing 0x16e
0173 e001 | | Load 0x0,0x1
0174 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0175 1b41 | A | Execute Package,Field_Read,Field_Number 0x41
0176 01c3 | | Execute Vector,Check_In_Type
0177 e001 | | Load 0x0,0x1
0178 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0179 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
017a e001 | | Load 0x0,0x1
017b 1b12 | | Execute Package,Field_Read,Field_Number 0x12
017c 1845 | E | Execute Package,Field_Execute,Field_Number 0x45
017d e001 | | Load 0x0,0x1
017e 1b15 | | Execute Package,Field_Read,Field_Number 0x15
017f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0180 a40c | | Store_Unchecked 0x2,0xc
0181 e001 | | Load 0x0,0x1
0182 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0183 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0184 02c7 | | Declare_Variable Any
0185 e212 | | Load 0x1,0x12
0186 0092 0679 | y| Action Push_String_Extended,0x679 ; "integer"
0188 e001 | | Load 0x0,0x1
0189 1b15 | | Execute Package,Field_Read,Field_Number 0x15
018a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
018b a40d | | Store_Unchecked 0x2,0xd
018c e212 | | Load 0x1,0x12
018d e001 | | Load 0x0,0x1
018e 1b15 | | Execute Package,Field_Read,Field_Number 0x15
018f 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0190 00da | | Load_Top At_Offset_2
0191 e40c | | Load 0x2,0xc
0192 0092 067a | z| Action Push_String_Extended,0x67a ; "Exception_Code"
0194 e001 | | Load 0x0,0x1
0195 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0196 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0197 e001 | | Load 0x0,0x1
0198 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0199 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
019a 011e | | Execute Any,Convert
019b e001 | | Load 0x0,0x1
019c 1b15 | | Execute Package,Field_Read,Field_Number 0x15
019d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
019e 02c7 | | Declare_Variable Any
019f e212 | | Load 0x1,0x12
01a0 e001 | | Load 0x0,0x1
01a1 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01a2 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01a3 e212 | | Load 0x1,0x12
01a4 e001 | | Load 0x0,0x1
01a5 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01a6 1b19 | | Execute Package,Field_Read,Field_Number 0x19
01a7 e001 | | Load 0x0,0x1
01a8 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01a9 1b19 | | Execute Package,Field_Read,Field_Number 0x19
01aa 4801 |H | Short_Literal 0x1
01ab e001 | | Load 0x0,0x1
01ac 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01ad 1b41 | A | Execute Package,Field_Read,Field_Number 0x41
01ae 0337 | 7 | Declare_Variable Array
01af 4801 |H | Short_Literal 0x1
01b0 4807 |H | Short_Literal 0x7
01b1 00da | | Load_Top At_Offset_2
01b2 01d6 | | Execute Vector,Field_Write
01b3 4806 |H | Short_Literal 0x6
01b4 4800 |H | Short_Literal 0x0
01b5 4800 |H | Short_Literal 0x0
01b6 00d9 | | Load_Top At_Offset_1
01b7 e416 | | Load 0x2,0x16
01b8 01d6 | | Execute Vector,Field_Write
01b9 3ffb |? | Loop_Increasing 0x1b5
01ba 480e |H | Short_Literal 0xe
01bb 4808 |H | Short_Literal 0x8
01bc 4800 |H | Short_Literal 0x0
01bd 00d9 | | Load_Top At_Offset_1
01be e416 | | Load 0x2,0x16
01bf 01d6 | | Execute Vector,Field_Write
01c0 3ffb |? | Loop_Increasing 0x1bc
01c1 e001 | | Load 0x0,0x1
01c2 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01c3 1b41 | A | Execute Package,Field_Read,Field_Number 0x41
01c4 01c3 | | Execute Vector,Check_In_Type
01c5 e001 | | Load 0x0,0x1
01c6 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01c7 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
01c8 e001 | | Load 0x0,0x1
01c9 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01ca 1845 | E | Execute Package,Field_Execute,Field_Number 0x45
01cb e001 | | Load 0x0,0x1
01cc 1b15 | | Execute Package,Field_Read,Field_Number 0x15
01cd 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01ce a40f | | Store_Unchecked 0x2,0xf
01cf e001 | | Load 0x0,0x1
01d0 1b15 | | Execute Package,Field_Read,Field_Number 0x15
01d1 1b14 | | Execute Package,Field_Read,Field_Number 0x14
01d2 02c7 | | Declare_Variable Any
01d3 e212 | | Load 0x1,0x12
01d4 0092 0679 | y| Action Push_String_Extended,0x679 ; "integer"
01d6 e001 | | Load 0x0,0x1
01d7 1b15 | | Execute Package,Field_Read,Field_Number 0x15
01d8 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01d9 a410 | | Store_Unchecked 0x2,0x10
01da e212 | | Load 0x1,0x12
01db e001 | | Load 0x0,0x1
01dc 1b15 | | Execute Package,Field_Read,Field_Number 0x15
01dd 181f | | Execute Package,Field_Execute,Field_Number 0x1f
01de 00da | | Load_Top At_Offset_2
01df e40f | | Load 0x2,0xf
01e0 0092 067b | {| Action Push_String_Extended,0x67b ; "Offset"
01e2 e001 | | Load 0x0,0x1
01e3 1b15 | | Execute Package,Field_Read,Field_Number 0x15
01e4 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
01e5 e001 | | Load 0x0,0x1
01e6 1b15 | | Execute Package,Field_Read,Field_Number 0x15
01e7 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
01e8 011e | | Execute Any,Convert
01e9 e001 | | Load 0x0,0x1
01ea 1b15 | | Execute Package,Field_Read,Field_Number 0x15
01eb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01ec 02c7 | | Declare_Variable Any
01ed e212 | | Load 0x1,0x12
01ee 00d8 | | Load_Top At_Offset_0
01ef e001 | | Load 0x0,0x1
01f0 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01f1 1b19 | | Execute Package,Field_Read,Field_Number 0x19
01f2 e001 | | Load 0x0,0x1
01f3 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01f4 1b19 | | Execute Package,Field_Read,Field_Number 0x19
01f5 e001 | | Load 0x0,0x1
01f6 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01f7 1b17 | | Execute Package,Field_Read,Field_Number 0x17
01f8 e001 | | Load 0x0,0x1
01f9 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01fa 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01fb 0337 | 7 | Declare_Variable Array
01fc 4801 |H | Short_Literal 0x1
01fd 480a |H | Short_Literal 0xa
01fe 00da | | Load_Top At_Offset_2
01ff 01d6 | | Execute Vector,Field_Write
0200 4809 |H | Short_Literal 0x9
0201 4800 |H | Short_Literal 0x0
0202 4800 |H | Short_Literal 0x0
0203 00d9 | | Load_Top At_Offset_1
0204 e418 | | Load 0x2,0x18
0205 01d6 | | Execute Vector,Field_Write
0206 3ffb |? | Loop_Increasing 0x202
0207 480e |H | Short_Literal 0xe
0208 480b |H | Short_Literal 0xb
0209 4800 |H | Short_Literal 0x0
020a 00d9 | | Load_Top At_Offset_1
020b e418 | | Load 0x2,0x18
020c 01d6 | | Execute Vector,Field_Write
020d 3ffb |? | Loop_Increasing 0x209
020e e001 | | Load 0x0,0x1
020f 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0210 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0211 01c3 | | Execute Vector,Check_In_Type
0212 e001 | | Load 0x0,0x1
0213 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0214 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0215 e001 | | Load 0x0,0x1
0216 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0217 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0218 e001 | | Load 0x0,0x1
0219 1b12 | | Execute Package,Field_Read,Field_Number 0x12
021a 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
021b e001 | | Load 0x0,0x1
021c 1b12 | | Execute Package,Field_Read,Field_Number 0x12
021d 1845 | E | Execute Package,Field_Execute,Field_Number 0x45
021e e001 | | Load 0x0,0x1
021f 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0220 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0221 a412 | | Store_Unchecked 0x2,0x12
0222 e001 | | Load 0x0,0x1
0223 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0224 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0225 02c7 | | Declare_Variable Any
0226 e212 | | Load 0x1,0x12
0227 0092 0679 | y| Action Push_String_Extended,0x679 ; "integer"
0229 e001 | | Load 0x0,0x1
022a 1b15 | | Execute Package,Field_Read,Field_Number 0x15
022b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
022c a413 | | Store_Unchecked 0x2,0x13
022d e212 | | Load 0x1,0x12
022e e001 | | Load 0x0,0x1
022f 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0230 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0231 00da | | Load_Top At_Offset_2
0232 e412 | | Load 0x2,0x12
0233 0092 067c | || Action Push_String_Extended,0x67c ; "Record_Size"
0235 e001 | | Load 0x0,0x1
0236 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0237 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0238 e001 | | Load 0x0,0x1
0239 1b15 | | Execute Package,Field_Read,Field_Number 0x15
023a 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
023b 011e | | Execute Any,Convert
023c e001 | | Load 0x0,0x1
023d 1b15 | | Execute Package,Field_Read,Field_Number 0x15
023e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
023f 02c7 | | Declare_Variable Any
0240 e212 | | Load 0x1,0x12
0241 00d8 | | Load_Top At_Offset_0
0242 e001 | | Load 0x0,0x1
0243 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0244 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0245 e001 | | Load 0x0,0x1
0246 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0247 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0248 e001 | | Load 0x0,0x1
0249 1b12 | | Execute Package,Field_Read,Field_Number 0x12
024a 1b17 | | Execute Package,Field_Read,Field_Number 0x17
024b e001 | | Load 0x0,0x1
024c 1b12 | | Execute Package,Field_Read,Field_Number 0x12
024d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
024e 0337 | 7 | Declare_Variable Array
024f 4801 |H | Short_Literal 0x1
0250 480a |H | Short_Literal 0xa
0251 00da | | Load_Top At_Offset_2
0252 01d6 | | Execute Vector,Field_Write
0253 4809 |H | Short_Literal 0x9
0254 4800 |H | Short_Literal 0x0
0255 4800 |H | Short_Literal 0x0
0256 00d9 | | Load_Top At_Offset_1
0257 e41b | | Load 0x2,0x1b
0258 01d6 | | Execute Vector,Field_Write
0259 3ffb |? | Loop_Increasing 0x255
025a 480e |H | Short_Literal 0xe
025b 480b |H | Short_Literal 0xb
025c 4800 |H | Short_Literal 0x0
025d 00d9 | | Load_Top At_Offset_1
025e e41b | | Load 0x2,0x1b
025f 01d6 | | Execute Vector,Field_Write
0260 3ffb |? | Loop_Increasing 0x25c
0261 e001 | | Load 0x0,0x1
0262 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0263 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0264 01c3 | | Execute Vector,Check_In_Type
0265 e001 | | Load 0x0,0x1
0266 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0267 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0268 e001 | | Load 0x0,0x1
0269 1b12 | | Execute Package,Field_Read,Field_Number 0x12
026a 181d | | Execute Package,Field_Execute,Field_Number 0x1d
026b e001 | | Load 0x0,0x1
026c 1b12 | | Execute Package,Field_Read,Field_Number 0x12
026d 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
026e e001 | | Load 0x0,0x1
026f 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0270 1845 | E | Execute Package,Field_Execute,Field_Number 0x45
0271 e001 | | Load 0x0,0x1
0272 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0273 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0274 a415 | | Store_Unchecked 0x2,0x15
0275 e001 | | Load 0x0,0x1
0276 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0277 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0278 02c7 | | Declare_Variable Any
0279 e212 | | Load 0x1,0x12
027a 0092 0679 | y| Action Push_String_Extended,0x679 ; "integer"
027c e001 | | Load 0x0,0x1
027d 1b15 | | Execute Package,Field_Read,Field_Number 0x15
027e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
027f a416 | | Store_Unchecked 0x2,0x16
0280 e212 | | Load 0x1,0x12
0281 e001 | | Load 0x0,0x1
0282 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0283 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0284 00da | | Load_Top At_Offset_2
0285 e415 | | Load 0x2,0x15
0286 0092 067d | }| Action Push_String_Extended,0x67d ; "Variant_Index"
0288 e001 | | Load 0x0,0x1
0289 1b15 | | Execute Package,Field_Read,Field_Number 0x15
028a 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
028b e001 | | Load 0x0,0x1
028c 1b15 | | Execute Package,Field_Read,Field_Number 0x15
028d 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
028e 011e | | Execute Any,Convert
028f 4801 |H | Short_Literal 0x1
0290 4807 |H | Short_Literal 0x7
0291 e001 | | Load 0x0,0x1
0292 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0293 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
0294 035b | [ | Declare_Type Array,Constrained
0295 0337 | 7 | Declare_Variable Array
0296 e405 | | Load 0x2,0x5
0297 e001 | | Load 0x0,0x1
0298 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0299 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
029a 0119 | | Execute Any,Check_In_Formal_Type
029b 4801 |H | Short_Literal 0x1
029c 00da | | Load_Top At_Offset_2
029d 01d6 | | Execute Vector,Field_Write
029e e408 | | Load 0x2,0x8
029f e001 | | Load 0x0,0x1
02a0 1b15 | | Execute Package,Field_Read,Field_Number 0x15
02a1 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
02a2 0119 | | Execute Any,Check_In_Formal_Type
02a3 4802 |H | Short_Literal 0x2
02a4 00da | | Load_Top At_Offset_2
02a5 01d6 | | Execute Vector,Field_Write
02a6 e40b | | Load 0x2,0xb
02a7 e001 | | Load 0x0,0x1
02a8 1b15 | | Execute Package,Field_Read,Field_Number 0x15
02a9 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
02aa 0119 | | Execute Any,Check_In_Formal_Type
02ab 4803 |H | Short_Literal 0x3
02ac 00da | | Load_Top At_Offset_2
02ad 01d6 | | Execute Vector,Field_Write
02ae e40e | | Load 0x2,0xe
02af e001 | | Load 0x0,0x1
02b0 1b15 | | Execute Package,Field_Read,Field_Number 0x15
02b1 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
02b2 0119 | | Execute Any,Check_In_Formal_Type
02b3 4804 |H | Short_Literal 0x4
02b4 00da | | Load_Top At_Offset_2
02b5 01d6 | | Execute Vector,Field_Write
02b6 e411 | | Load 0x2,0x11
02b7 e001 | | Load 0x0,0x1
02b8 1b15 | | Execute Package,Field_Read,Field_Number 0x15
02b9 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
02ba 0119 | | Execute Any,Check_In_Formal_Type
02bb 4805 |H | Short_Literal 0x5
02bc 00da | | Load_Top At_Offset_2
02bd 01d6 | | Execute Vector,Field_Write
02be e414 | | Load 0x2,0x14
02bf e001 | | Load 0x0,0x1
02c0 1b15 | | Execute Package,Field_Read,Field_Number 0x15
02c1 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
02c2 0119 | | Execute Any,Check_In_Formal_Type
02c3 4806 |H | Short_Literal 0x6
02c4 00da | | Load_Top At_Offset_2
02c5 01d6 | | Execute Vector,Field_Write
02c6 00d9 | | Load_Top At_Offset_1
02c7 e001 | | Load 0x0,0x1
02c8 1b15 | | Execute Package,Field_Read,Field_Number 0x15
02c9 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
02ca 0119 | | Execute Any,Check_In_Formal_Type
02cb 4807 |H | Short_Literal 0x7
02cc 00da | | Load_Top At_Offset_2
02cd 01d6 | | Execute Vector,Field_Write
02ce BODY_0070:
02ce e211 | | Load 0x1,0x11
02cf 8215 | | Call 0x1,0x15
02d0 7008 |p | Jump_Nonzero 0x2d9
02d1 e002 | | Load 0x0,0x2
02d2 180e | | Execute Package,Field_Execute,Field_Number 0xe
02d3 4807 |H | Short_Literal 0x7
02d4 0092 067e | ~| Action Push_String_Extended,0x67e ; "The I386_Unix_Als_Xt target has not been authorized on this machine."
02d6 e003 | | Load 0x0,0x3
02d7 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02d8 08e2 | | Execute_Immediate Raise,0xe2
02d9 e212 | | Load 0x1,0x12
02da 00d9 | | Load_Top At_Offset_1
02db e001 | | Load 0x0,0x1
02dc 1b15 | | Execute Package,Field_Read,Field_Number 0x15
02dd 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
02de e001 | | Load 0x0,0x1
02df 1b15 | | Execute Package,Field_Read,Field_Number 0x15
02e0 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
02e1 011d | | Execute Any,Convert_To_Formal
02e2 4401 |D | Exit_Subprogram With_Result,0x1
02e3 0000 0000 | | .BLANK 0000[0x5]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 03ac | | .CONST 0x03ac ; Address of begin
02e9 0004 | | .CONST 0x0004 ; Address of exception handler
02ea 000c | | .CONST 0x000c ; Number of locals
02eb INIT_02e8:
02eb e212 | | Load 0x1,0x12
02ec 487f |H | Short_Literal 0x7f
02ed e004 | | Load 0x0,0x4
02ee 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
02ef 4f80 |O | Short_Literal 0x780
02f0 e004 | | Load 0x0,0x4
02f1 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
02f2 4808 |H | Short_Literal 0x8
02f3 0092 067f | | Action Push_String_Extended,0x67f ; "SHORT_SHORT_INTEGER"
02f5 e001 | | Load 0x0,0x1
02f6 1b13 | | Execute Package,Field_Read,Field_Number 0x13
02f7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02f8 e001 | | Load 0x0,0x1
02f9 1b13 | | Execute Package,Field_Read,Field_Number 0x13
02fa 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02fb 011e | | Execute Any,Convert
02fc e212 | | Load 0x1,0x12
02fd 60e2 |` | Indirect_Literal Discrete,0x3e0,{0x00000000, 0x00007fff}
02fe e004 | | Load 0x0,0x4
02ff 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0300 60db |` | Indirect_Literal Discrete,0x3dc,{0xffffffff, 0xffff8000}
0301 e004 | | Load 0x0,0x4
0302 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0303 4810 |H | Short_Literal 0x10
0304 0092 0680 | | Action Push_String_Extended,0x680 ; "SHORT_INTEGER"
0306 e001 | | Load 0x0,0x1
0307 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0308 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0309 e001 | | Load 0x0,0x1
030a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
030b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
030c 011e | | Execute Any,Convert
030d e212 | | Load 0x1,0x12
030e 60c9 |` | Indirect_Literal Discrete,0x3d8,{0x00000000, 0x7fffffff}
030f e004 | | Load 0x0,0x4
0310 1845 | E | Execute Package,Field_Execute,Field_Number 0x45
0311 60c2 |` | Indirect_Literal Discrete,0x3d4,{0xffffffff, 0x80000000}
0312 e004 | | Load 0x0,0x4
0313 1845 | E | Execute Package,Field_Execute,Field_Number 0x45
0314 4820 |H | Short_Literal 0x20
0315 0092 0681 | | Action Push_String_Extended,0x681 ; "INTEGER"
0317 e001 | | Load 0x0,0x1
0318 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0319 1810 | | Execute Package,Field_Execute,Field_Number 0x10
031a e001 | | Load 0x0,0x1
031b 1b13 | | Execute Package,Field_Read,Field_Number 0x13
031c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
031d 011e | | Execute Any,Convert
031e 4801 |H | Short_Literal 0x1
031f 4803 |H | Short_Literal 0x3
0320 e001 | | Load 0x0,0x1
0321 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0322 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0323 035b | [ | Declare_Type Array,Constrained
0324 0337 | 7 | Declare_Variable Array
0325 00db | | Load_Top At_Offset_3
0326 e001 | | Load 0x0,0x1
0327 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0328 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0329 0119 | | Execute Any,Check_In_Formal_Type
032a 4801 |H | Short_Literal 0x1
032b 00da | | Load_Top At_Offset_2
032c 01d6 | | Execute Vector,Field_Write
032d 00da | | Load_Top At_Offset_2
032e e001 | | Load 0x0,0x1
032f 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0330 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0331 0119 | | Execute Any,Check_In_Formal_Type
0332 4802 |H | Short_Literal 0x2
0333 00da | | Load_Top At_Offset_2
0334 01d6 | | Execute Vector,Field_Write
0335 00d9 | | Load_Top At_Offset_1
0336 e001 | | Load 0x0,0x1
0337 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0338 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0339 0119 | | Execute Any,Check_In_Formal_Type
033a 4803 |H | Short_Literal 0x3
033b 00da | | Load_Top At_Offset_2
033c 01d6 | | Execute Vector,Field_Write
033d 5892 |X | Indirect_Literal Float,0x3d0,3.4028199999999998e+38
033e e004 | | Load 0x0,0x4
033f 185e | ^ | Execute Package,Field_Execute,Field_Number 0x5e
0340 e004 | | Load 0x0,0x4
0341 1b49 | I | Execute Package,Field_Read,Field_Number 0x49
0342 011e | | Execute Any,Convert
0343 5888 |X | Indirect_Literal Float,0x3cc,1.7976899999999999e+308
0344 e004 | | Load 0x0,0x4
0345 185e | ^ | Execute Package,Field_Execute,Field_Number 0x5e
0346 e004 | | Load 0x0,0x4
0347 1b49 | I | Execute Package,Field_Read,Field_Number 0x49
0348 011e | | Execute Any,Convert
0349 e212 | | Load 0x1,0x12
034a 4800 |H | Short_Literal 0x0
034b 4801 |H | Short_Literal 0x1
034c 4815 |H | Short_Literal 0x15
034d 4802 |H | Short_Literal 0x2
034e 4f83 |O | Short_Literal 0x783
034f 4880 |H | Short_Literal 0x80
0350 487d |H} | Short_Literal 0x7d
0351 e406 | | Load 0x2,0x6
0352 00d8 | | Load_Top At_Offset_0
0353 e004 | | Load 0x0,0x4
0354 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0355 4820 |H | Short_Literal 0x20
0356 4806 |H | Short_Literal 0x6
0357 0092 0682 | | Action Push_String_Extended,0x682 ; "FLOAT"
0359 e001 | | Load 0x0,0x1
035a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
035b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
035c e001 | | Load 0x0,0x1
035d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
035e 1b16 | | Execute Package,Field_Read,Field_Number 0x16
035f 011e | | Execute Any,Convert
0360 e212 | | Load 0x1,0x12
0361 4800 |H | Short_Literal 0x0
0362 4801 |H | Short_Literal 0x1
0363 4833 |H3 | Short_Literal 0x33
0364 4802 |H | Short_Literal 0x2
0365 4c03 |L | Short_Literal 0x403
0366 6061 |`a | Indirect_Literal Discrete,0x3c8,{0x00000000, 0x00000400}
0367 4bfd |K | Short_Literal 0x3fd
0368 e407 | | Load 0x2,0x7
0369 00d8 | | Load_Top At_Offset_0
036a e004 | | Load 0x0,0x4
036b 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
036c 4840 |H@ | Short_Literal 0x40
036d 480f |H | Short_Literal 0xf
036e 0092 0683 | | Action Push_String_Extended,0x683 ; "LONG_FLOAT"
0370 e001 | | Load 0x0,0x1
0371 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0372 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0373 e001 | | Load 0x0,0x1
0374 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0375 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0376 011e | | Execute Any,Convert
0377 4801 |H | Short_Literal 0x1
0378 4802 |H | Short_Literal 0x2
0379 e001 | | Load 0x0,0x1
037a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
037b 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
037c 035b | [ | Declare_Type Array,Constrained
037d 0337 | 7 | Declare_Variable Array
037e 00da | | Load_Top At_Offset_2
037f e001 | | Load 0x0,0x1
0380 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0381 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0382 0119 | | Execute Any,Check_In_Formal_Type
0383 4801 |H | Short_Literal 0x1
0384 00da | | Load_Top At_Offset_2
0385 01d6 | | Execute Vector,Field_Write
0386 00d9 | | Load_Top At_Offset_1
0387 e001 | | Load 0x0,0x1
0388 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0389 1b16 | | Execute Package,Field_Read,Field_Number 0x16
038a 0119 | | Execute Any,Check_In_Formal_Type
038b 4802 |H | Short_Literal 0x2
038c 00da | | Load_Top At_Offset_2
038d 01d6 | | Execute Vector,Field_Write
038e e212 | | Load 0x1,0x12
038f 5834 |X4 | Indirect_Literal Float,0x3c4,131072.0
0390 e004 | | Load 0x0,0x4
0391 185e | ^ | Execute Package,Field_Execute,Field_Number 0x5e
0392 582d |X- | Indirect_Literal Float,0x3c0,-131072.0
0393 e004 | | Load 0x0,0x4
0394 185e | ^ | Execute Package,Field_Execute,Field_Number 0x5e
0395 4ff2 |O | Short_Literal 0x7f2
0396 4820 |H | Short_Literal 0x20
0397 0092 0684 | | Action Push_String_Extended,0x684 ; "DURATION"
0399 e001 | | Load 0x0,0x1
039a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
039b 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
039c e001 | | Load 0x0,0x1
039d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
039e 1b26 | & | Execute Package,Field_Read,Field_Number 0x26
039f 011e | | Execute Any,Convert
03a0 e212 | | Load 0x1,0x12
03a1 00d9 | | Load_Top At_Offset_1
03a2 00db | | Load_Top At_Offset_3
03a3 e405 | | Load 0x2,0x5
03a4 4803 |H | Short_Literal 0x3
03a5 e001 | | Load 0x0,0x1
03a6 1b13 | | Execute Package,Field_Read,Field_Number 0x13
03a7 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
03a8 e001 | | Load 0x0,0x1
03a9 1b13 | | Execute Package,Field_Read,Field_Number 0x13
03aa 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31
03ab 011e | | Execute Any,Convert
03ac BODY_02e8:
03ac e211 | | Load 0x1,0x11
03ad 8215 | | Call 0x1,0x15
03ae 7008 |p | Jump_Nonzero 0x3b7
03af e002 | | Load 0x0,0x2
03b0 180e | | Execute Package,Field_Execute,Field_Number 0xe
03b1 4807 |H | Short_Literal 0x7
03b2 0092 067e | ~| Action Push_String_Extended,0x67e ; "The I386_Unix_Als_Xt target has not been authorized on this machine."
03b4 e003 | | Load 0x0,0x3
03b5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03b6 08e2 | | Execute_Immediate Raise,0xe2
03b7 00d8 | | Load_Top At_Offset_0
03b8 e001 | | Load 0x0,0x1
03b9 1b13 | | Execute Package,Field_Read,Field_Number 0x13
03ba 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31
03bb 011d | | Execute Any,Convert_To_Formal
03bc 4401 |D | Exit_Subprogram With_Result,0x1
03bd 0000 0000 | | .XXX[0x3]
03bf 0000 | |
03c0 c100 0000 | | .DBL -131072.0
03c2 0000 0000 | |
03c4 4100 0000 |A | .DBL 131072.0
03c6 0000 0000 | |
03c8 0000 0000 | | .LITERAL {0x00000000, 0x00000400}
03cc 7fef fffc | | .DBL 1.7976899999999999e+308
03ce 57ca 82ad |W |
03d0 47ef fffd |G | .DBL 3.4028199999999998e+38
03d2 bd19 d02b | +|
03d4 ffff ffff | | .LITERAL {0xffffffff, 0x80000000}
03d8 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
03dc ffff ffff | | .LITERAL {0xffffffff, 0xffff8000}
03e0 0000 0000 | | .LITERAL {0x00000000, 0x00007fff}
03e4 0000 0000 | | .BLANK 0000[0x4]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 061e | | .CONST 0x061e ; Address of begin
03e9 0004 | | .CONST 0x0004 ; Address of exception handler
03ea 000f | | .CONST 0x000f ; Number of locals
03eb INIT_03e8:
03eb e212 | | Load 0x1,0x12
03ec e001 | | Load 0x0,0x1
03ed 1b12 | | Execute Package,Field_Read,Field_Number 0x12
03ee 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
03ef e001 | | Load 0x0,0x1
03f0 1b12 | | Execute Package,Field_Read,Field_Number 0x12
03f1 181b | | Execute Package,Field_Execute,Field_Number 0x1b
03f2 e212 | | Load 0x1,0x12
03f3 e001 | | Load 0x0,0x1
03f4 1b12 | | Execute Package,Field_Read,Field_Number 0x12
03f5 1b19 | | Execute Package,Field_Read,Field_Number 0x19
03f6 4801 |H | Short_Literal 0x1
03f7 4801 |H | Short_Literal 0x1
03f8 e001 | | Load 0x0,0x1
03f9 1b11 | | Execute Package,Field_Read,Field_Number 0x11
03fa 1b10 | | Execute Package,Field_Read,Field_Number 0x10
03fb 035b | [ | Declare_Type Array,Constrained
03fc 0337 | 7 | Declare_Variable Array
03fd e212 | | Load 0x1,0x12
03fe 0092 0685 | | Action Push_String_Extended,0x685 ; "Interface"
0400 e001 | | Load 0x0,0x1
0401 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0402 180e | | Execute Package,Field_Execute,Field_Number 0xe
0403 e001 | | Load 0x0,0x1
0404 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0405 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0406 0119 | | Execute Any,Check_In_Formal_Type
0407 4801 |H | Short_Literal 0x1
0408 00da | | Load_Top At_Offset_2
0409 01d6 | | Execute Vector,Field_Write
040a 4800 |H | Short_Literal 0x0
040b e001 | | Load 0x0,0x1
040c 1b12 | | Execute Package,Field_Read,Field_Number 0x12
040d 1b41 | A | Execute Package,Field_Read,Field_Number 0x41
040e 0337 | 7 | Declare_Variable Array
040f 4801 |H | Short_Literal 0x1
0410 4800 |H | Short_Literal 0x0
0411 00da | | Load_Top At_Offset_2
0412 01d6 | | Execute Vector,Field_Write
0413 4801 |H | Short_Literal 0x1
0414 4802 |H | Short_Literal 0x2
0415 00da | | Load_Top At_Offset_2
0416 01d6 | | Execute Vector,Field_Write
0417 4800 |H | Short_Literal 0x0
0418 4801 |H | Short_Literal 0x1
0419 00da | | Load_Top At_Offset_2
041a 01d6 | | Execute Vector,Field_Write
041b 480e |H | Short_Literal 0xe
041c 4803 |H | Short_Literal 0x3
041d 4800 |H | Short_Literal 0x0
041e 00d9 | | Load_Top At_Offset_1
041f e409 | | Load 0x2,0x9
0420 01d6 | | Execute Vector,Field_Write
0421 3ffb |? | Loop_Increasing 0x41d
0422 e001 | | Load 0x0,0x1
0423 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0424 1b41 | A | Execute Package,Field_Read,Field_Number 0x41
0425 01c3 | | Execute Vector,Check_In_Type
0426 e001 | | Load 0x0,0x1
0427 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0428 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0429 e001 | | Load 0x0,0x1
042a 1b12 | | Execute Package,Field_Read,Field_Number 0x12
042b 1845 | E | Execute Package,Field_Execute,Field_Number 0x45
042c 0092 0686 | | Action Push_String_Extended,0x686 ; "Subprogram_Name"
042e e001 | | Load 0x0,0x1
042f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0430 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0431 e001 | | Load 0x0,0x1
0432 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0433 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0434 011e | | Execute Any,Convert
0435 e212 | | Load 0x1,0x12
0436 00d8 | | Load_Top At_Offset_0
0437 e212 | | Load 0x1,0x12
0438 e001 | | Load 0x0,0x1
0439 1b12 | | Execute Package,Field_Read,Field_Number 0x12
043a 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
043b e212 | | Load 0x1,0x12
043c 0092 0687 | | Action Push_String_Extended,0x687 ; "String"
043e e001 | | Load 0x0,0x1
043f 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0440 180e | | Execute Package,Field_Execute,Field_Number 0xe
0441 e001 | | Load 0x0,0x1
0442 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0443 180f | | Execute Package,Field_Execute,Field_Number 0xf
0444 e001 | | Load 0x0,0x1
0445 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0446 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
0447 0092 0688 | | Action Push_String_Extended,0x688 ; "String_Literal"
0449 e001 | | Load 0x0,0x1
044a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
044b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
044c e001 | | Load 0x0,0x1
044d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
044e 1b15 | | Execute Package,Field_Read,Field_Number 0x15
044f 011e | | Execute Any,Convert
0450 4801 |H | Short_Literal 0x1
0451 4802 |H | Short_Literal 0x2
0452 e001 | | Load 0x0,0x1
0453 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0454 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0455 035b | [ | Declare_Type Array,Constrained
0456 0337 | 7 | Declare_Variable Array
0457 00da | | Load_Top At_Offset_2
0458 e001 | | Load 0x0,0x1
0459 1b14 | | Execute Package,Field_Read,Field_Number 0x14
045a 1b15 | | Execute Package,Field_Read,Field_Number 0x15
045b 0119 | | Execute Any,Check_In_Formal_Type
045c 4801 |H | Short_Literal 0x1
045d 00da | | Load_Top At_Offset_2
045e 01d6 | | Execute Vector,Field_Write
045f 00d9 | | Load_Top At_Offset_1
0460 e001 | | Load 0x0,0x1
0461 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0462 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0463 0119 | | Execute Any,Check_In_Formal_Type
0464 4802 |H | Short_Literal 0x2
0465 00da | | Load_Top At_Offset_2
0466 01d6 | | Execute Vector,Field_Write
0467 e212 | | Load 0x1,0x12
0468 4802 |H | Short_Literal 0x2
0469 00da | | Load_Top At_Offset_2
046a e001 | | Load 0x0,0x1
046b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
046c 1b12 | | Execute Package,Field_Read,Field_Number 0x12
046d 0337 | 7 | Declare_Variable Array
046e 4801 |H | Short_Literal 0x1
046f 4803 |H | Short_Literal 0x3
0470 00da | | Load_Top At_Offset_2
0471 01d6 | | Execute Vector,Field_Write
0472 4802 |H | Short_Literal 0x2
0473 4800 |H | Short_Literal 0x0
0474 4800 |H | Short_Literal 0x0
0475 00d9 | | Load_Top At_Offset_1
0476 e408 | | Load 0x2,0x8
0477 01d6 | | Execute Vector,Field_Write
0478 3ffb |? | Loop_Increasing 0x474
0479 4800 |H | Short_Literal 0x0
047a 4804 |H | Short_Literal 0x4
047b 00da | | Load_Top At_Offset_2
047c 01d6 | | Execute Vector,Field_Write
047d e001 | | Load 0x0,0x1
047e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
047f 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0480 01c3 | | Execute Vector,Check_In_Type
0481 0092 0689 | | Action Push_String_Extended,0x689 ; "Interface_Name"
0483 e001 | | Load 0x0,0x1
0484 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0485 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0486 e001 | | Load 0x0,0x1
0487 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0488 1b22 | " | Execute Package,Field_Read,Field_Number 0x22
0489 011e | | Execute Any,Convert
048a e212 | | Load 0x1,0x12
048b 4801 |H | Short_Literal 0x1
048c 4802 |H | Short_Literal 0x2
048d e001 | | Load 0x0,0x1
048e 1b11 | | Execute Package,Field_Read,Field_Number 0x11
048f 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0490 035b | [ | Declare_Type Array,Constrained
0491 0337 | 7 | Declare_Variable Array
0492 e212 | | Load 0x1,0x12
0493 0092 068a | | Action Push_String_Extended,0x68a ; "on"
0495 e001 | | Load 0x0,0x1
0496 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0497 180e | | Execute Package,Field_Execute,Field_Number 0xe
0498 e001 | | Load 0x0,0x1
0499 1b11 | | Execute Package,Field_Read,Field_Number 0x11
049a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
049b 0119 | | Execute Any,Check_In_Formal_Type
049c 4801 |H | Short_Literal 0x1
049d 00da | | Load_Top At_Offset_2
049e 01d6 | | Execute Vector,Field_Write
049f e212 | | Load 0x1,0x12
04a0 0092 068b | | Action Push_String_Extended,0x68b ; "off"
04a2 e001 | | Load 0x0,0x1
04a3 1b11 | | Execute Package,Field_Read,Field_Number 0x11
04a4 180e | | Execute Package,Field_Execute,Field_Number 0xe
04a5 e001 | | Load 0x0,0x1
04a6 1b11 | | Execute Package,Field_Read,Field_Number 0x11
04a7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04a8 0119 | | Execute Any,Check_In_Formal_Type
04a9 4802 |H | Short_Literal 0x2
04aa 00da | | Load_Top At_Offset_2
04ab 01d6 | | Execute Vector,Field_Write
04ac e001 | | Load 0x0,0x1
04ad 1b12 | | Execute Package,Field_Read,Field_Number 0x12
04ae 181b | | Execute Package,Field_Execute,Field_Number 0x1b
04af e001 | | Load 0x0,0x1
04b0 1b12 | | Execute Package,Field_Read,Field_Number 0x12
04b1 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
04b2 e001 | | Load 0x0,0x1
04b3 1b12 | | Execute Package,Field_Read,Field_Number 0x12
04b4 1845 | E | Execute Package,Field_Execute,Field_Number 0x45
04b5 00ea | | Load_Encached Null_String_Cache
04b6 e001 | | Load 0x0,0x1
04b7 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04b8 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04b9 e001 | | Load 0x0,0x1
04ba 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04bb 1b15 | | Execute Package,Field_Read,Field_Number 0x15
04bc 011e | | Execute Any,Convert
04bd 4801 |H | Short_Literal 0x1
04be 4801 |H | Short_Literal 0x1
04bf e001 | | Load 0x0,0x1
04c0 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04c1 1b20 | | Execute Package,Field_Read,Field_Number 0x20
04c2 035b | [ | Declare_Type Array,Constrained
04c3 0337 | 7 | Declare_Variable Array
04c4 00d9 | | Load_Top At_Offset_1
04c5 e001 | | Load 0x0,0x1
04c6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04c7 1b15 | | Execute Package,Field_Read,Field_Number 0x15
04c8 0119 | | Execute Any,Check_In_Formal_Type
04c9 4801 |H | Short_Literal 0x1
04ca 00da | | Load_Top At_Offset_2
04cb 01d6 | | Execute Vector,Field_Write
04cc e212 | | Load 0x1,0x12
04cd 4801 |H | Short_Literal 0x1
04ce 00da | | Load_Top At_Offset_2
04cf e001 | | Load 0x0,0x1
04d0 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04d1 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04d2 0092 068c | | Action Push_String_Extended,0x68c ; "Indent"
04d4 e001 | | Load 0x0,0x1
04d5 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04d6 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
04d7 e001 | | Load 0x0,0x1
04d8 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04d9 1b22 | " | Execute Package,Field_Read,Field_Number 0x22
04da 011e | | Execute Any,Convert
04db e212 | | Load 0x1,0x12
04dc 4801 |H | Short_Literal 0x1
04dd 4802 |H | Short_Literal 0x2
04de e001 | | Load 0x0,0x1
04df 1b11 | | Execute Package,Field_Read,Field_Number 0x11
04e0 1b10 | | Execute Package,Field_Read,Field_Number 0x10
04e1 035b | [ | Declare_Type Array,Constrained
04e2 0337 | 7 | Declare_Variable Array
04e3 e212 | | Load 0x1,0x12
04e4 0092 068d | | Action Push_String_Extended,0x68d ; "time"
04e6 e001 | | Load 0x0,0x1
04e7 1b11 | | Execute Package,Field_Read,Field_Number 0x11
04e8 180e | | Execute Package,Field_Execute,Field_Number 0xe
04e9 e001 | | Load 0x0,0x1
04ea 1b11 | | Execute Package,Field_Read,Field_Number 0x11
04eb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04ec 0119 | | Execute Any,Check_In_Formal_Type
04ed 4801 |H | Short_Literal 0x1
04ee 00da | | Load_Top At_Offset_2
04ef 01d6 | | Execute Vector,Field_Write
04f0 e212 | | Load 0x1,0x12
04f1 0092 068e | | Action Push_String_Extended,0x68e ; "space"
04f3 e001 | | Load 0x0,0x1
04f4 1b11 | | Execute Package,Field_Read,Field_Number 0x11
04f5 180e | | Execute Package,Field_Execute,Field_Number 0xe
04f6 e001 | | Load 0x0,0x1
04f7 1b11 | | Execute Package,Field_Read,Field_Number 0x11
04f8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04f9 0119 | | Execute Any,Check_In_Formal_Type
04fa 4802 |H | Short_Literal 0x2
04fb 00da | | Load_Top At_Offset_2
04fc 01d6 | | Execute Vector,Field_Write
04fd e001 | | Load 0x0,0x1
04fe 1b12 | | Execute Package,Field_Read,Field_Number 0x12
04ff 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0500 e001 | | Load 0x0,0x1
0501 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0502 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
0503 e001 | | Load 0x0,0x1
0504 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0505 1845 | E | Execute Package,Field_Execute,Field_Number 0x45
0506 00ea | | Load_Encached Null_String_Cache
0507 e001 | | Load 0x0,0x1
0508 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0509 1817 | | Execute Package,Field_Execute,Field_Number 0x17
050a e001 | | Load 0x0,0x1
050b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
050c 1b15 | | Execute Package,Field_Read,Field_Number 0x15
050d 011e | | Execute Any,Convert
050e e212 | | Load 0x1,0x12
050f e001 | | Load 0x0,0x1
0510 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0511 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
0512 e212 | | Load 0x1,0x12
0513 e001 | | Load 0x0,0x1
0514 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0515 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0516 e001 | | Load 0x0,0x1
0517 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0518 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0519 e001 | | Load 0x0,0x1
051a 1b12 | | Execute Package,Field_Read,Field_Number 0x12
051b 1b17 | | Execute Package,Field_Read,Field_Number 0x17
051c e001 | | Load 0x0,0x1
051d 1b12 | | Execute Package,Field_Read,Field_Number 0x12
051e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
051f 0337 | 7 | Declare_Variable Array
0520 4801 |H | Short_Literal 0x1
0521 480a |H | Short_Literal 0xa
0522 00da | | Load_Top At_Offset_2
0523 01d6 | | Execute Vector,Field_Write
0524 4809 |H | Short_Literal 0x9
0525 4800 |H | Short_Literal 0x0
0526 4800 |H | Short_Literal 0x0
0527 00d9 | | Load_Top At_Offset_1
0528 e410 | | Load 0x2,0x10
0529 01d6 | | Execute Vector,Field_Write
052a 3ffb |? | Loop_Increasing 0x526
052b 480e |H | Short_Literal 0xe
052c 480b |H | Short_Literal 0xb
052d 4800 |H | Short_Literal 0x0
052e 00d9 | | Load_Top At_Offset_1
052f e410 | | Load 0x2,0x10
0530 01d6 | | Execute Vector,Field_Write
0531 3ffb |? | Loop_Increasing 0x52d
0532 e001 | | Load 0x0,0x1
0533 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0534 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0535 01c3 | | Execute Vector,Check_In_Type
0536 e001 | | Load 0x0,0x1
0537 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0538 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0539 e001 | | Load 0x0,0x1
053a 1b12 | | Execute Package,Field_Read,Field_Number 0x12
053b 181d | | Execute Package,Field_Execute,Field_Number 0x1d
053c e001 | | Load 0x0,0x1
053d 1b12 | | Execute Package,Field_Read,Field_Number 0x12
053e 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
053f e001 | | Load 0x0,0x1
0540 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0541 1845 | E | Execute Package,Field_Execute,Field_Number 0x45
0542 0092 068f | | Action Push_String_Extended,0x68f ; "On"
0544 e001 | | Load 0x0,0x1
0545 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0546 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0547 e001 | | Load 0x0,0x1
0548 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0549 1b15 | | Execute Package,Field_Read,Field_Number 0x15
054a 011e | | Execute Any,Convert
054b 4801 |H | Short_Literal 0x1
054c 4802 |H | Short_Literal 0x2
054d e001 | | Load 0x0,0x1
054e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
054f 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0550 035b | [ | Declare_Type Array,Constrained
0551 0337 | 7 | Declare_Variable Array
0552 00da | | Load_Top At_Offset_2
0553 e001 | | Load 0x0,0x1
0554 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0555 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0556 0119 | | Execute Any,Check_In_Formal_Type
0557 4801 |H | Short_Literal 0x1
0558 00da | | Load_Top At_Offset_2
0559 01d6 | | Execute Vector,Field_Write
055a 00d9 | | Load_Top At_Offset_1
055b e001 | | Load 0x0,0x1
055c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
055d 1b15 | | Execute Package,Field_Read,Field_Number 0x15
055e 0119 | | Execute Any,Check_In_Formal_Type
055f 4802 |H | Short_Literal 0x2
0560 00da | | Load_Top At_Offset_2
0561 01d6 | | Execute Vector,Field_Write
0562 e212 | | Load 0x1,0x12
0563 4802 |H | Short_Literal 0x2
0564 00da | | Load_Top At_Offset_2
0565 e001 | | Load 0x0,0x1
0566 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0567 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0568 0337 | 7 | Declare_Variable Array
0569 4801 |H | Short_Literal 0x1
056a 4803 |H | Short_Literal 0x3
056b 00da | | Load_Top At_Offset_2
056c 01d6 | | Execute Vector,Field_Write
056d 4802 |H | Short_Literal 0x2
056e 4800 |H | Short_Literal 0x0
056f 4800 |H | Short_Literal 0x0
0570 00d9 | | Load_Top At_Offset_1
0571 e40f | | Load 0x2,0xf
0572 01d6 | | Execute Vector,Field_Write
0573 3ffb |? | Loop_Increasing 0x56f
0574 4800 |H | Short_Literal 0x0
0575 4804 |H | Short_Literal 0x4
0576 00da | | Load_Top At_Offset_2
0577 01d6 | | Execute Vector,Field_Write
0578 e001 | | Load 0x0,0x1
0579 1b14 | | Execute Package,Field_Read,Field_Number 0x14
057a 1b12 | | Execute Package,Field_Read,Field_Number 0x12
057b 01c3 | | Execute Vector,Check_In_Type
057c 0092 0690 | | Action Push_String_Extended,0x690 ; "Improve"
057e e001 | | Load 0x0,0x1
057f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0580 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0581 e001 | | Load 0x0,0x1
0582 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0583 1b22 | " | Execute Package,Field_Read,Field_Number 0x22
0584 011e | | Execute Any,Convert
0585 e001 | | Load 0x0,0x1
0586 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0587 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0588 0337 | 7 | Declare_Variable Array
0589 00d8 | | Load_Top At_Offset_0
058a 0335 | 5 | Declare_Variable Array,Duplicate
058b 00cd | | Action Spare6_Action
058c 4800 |H | Short_Literal 0x0
058d 4800 |H | Short_Literal 0x0
058e 00da | | Load_Top At_Offset_2
058f 01d6 | | Execute Vector,Field_Write
0590 4801 |H | Short_Literal 0x1
0591 4801 |H | Short_Literal 0x1
0592 00da | | Load_Top At_Offset_2
0593 01d6 | | Execute Vector,Field_Write
0594 4801 |H | Short_Literal 0x1
0595 4802 |H | Short_Literal 0x2
0596 00da | | Load_Top At_Offset_2
0597 01d6 | | Execute Vector,Field_Write
0598 4801 |H | Short_Literal 0x1
0599 4803 |H | Short_Literal 0x3
059a 00da | | Load_Top At_Offset_2
059b 01d6 | | Execute Vector,Field_Write
059c 4801 |H | Short_Literal 0x1
059d 4804 |H | Short_Literal 0x4
059e 00da | | Load_Top At_Offset_2
059f 01d6 | | Execute Vector,Field_Write
05a0 4801 |H | Short_Literal 0x1
05a1 4805 |H | Short_Literal 0x5
05a2 00da | | Load_Top At_Offset_2
05a3 01d6 | | Execute Vector,Field_Write
05a4 4800 |H | Short_Literal 0x0
05a5 4806 |H | Short_Literal 0x6
05a6 00da | | Load_Top At_Offset_2
05a7 01d6 | | Execute Vector,Field_Write
05a8 4801 |H | Short_Literal 0x1
05a9 4807 |H | Short_Literal 0x7
05aa 00da | | Load_Top At_Offset_2
05ab 01d6 | | Execute Vector,Field_Write
05ac 4801 |H | Short_Literal 0x1
05ad 4808 |H | Short_Literal 0x8
05ae 00da | | Load_Top At_Offset_2
05af 01d6 | | Execute Vector,Field_Write
05b0 4801 |H | Short_Literal 0x1
05b1 4809 |H | Short_Literal 0x9
05b2 00da | | Load_Top At_Offset_2
05b3 01d6 | | Execute Vector,Field_Write
05b4 4801 |H | Short_Literal 0x1
05b5 480a |H | Short_Literal 0xa
05b6 00da | | Load_Top At_Offset_2
05b7 01d6 | | Execute Vector,Field_Write
05b8 4801 |H | Short_Literal 0x1
05b9 480b |H | Short_Literal 0xb
05ba 00da | | Load_Top At_Offset_2
05bb 01d6 | | Execute Vector,Field_Write
05bc 4801 |H | Short_Literal 0x1
05bd 480c |H | Short_Literal 0xc
05be 00da | | Load_Top At_Offset_2
05bf 01d6 | | Execute Vector,Field_Write
05c0 4801 |H | Short_Literal 0x1
05c1 480d |H | Short_Literal 0xd
05c2 00da | | Load_Top At_Offset_2
05c3 01d6 | | Execute Vector,Field_Write
05c4 00d9 | | Load_Top At_Offset_1
05c5 01d4 | | Execute Vector,Structure_Write
05c6 4801 |H | Short_Literal 0x1
05c7 4803 |H | Short_Literal 0x3
05c8 e001 | | Load 0x0,0x1
05c9 1b14 | | Execute Package,Field_Read,Field_Number 0x14
05ca 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
05cb 035b | [ | Declare_Type Array,Constrained
05cc 0337 | 7 | Declare_Variable Array
05cd e405 | | Load 0x2,0x5
05ce e001 | | Load 0x0,0x1
05cf 1b14 | | Execute Package,Field_Read,Field_Number 0x14
05d0 1b22 | " | Execute Package,Field_Read,Field_Number 0x22
05d1 0119 | | Execute Any,Check_In_Formal_Type
05d2 4801 |H | Short_Literal 0x1
05d3 00da | | Load_Top At_Offset_2
05d4 01d6 | | Execute Vector,Field_Write
05d5 e408 | | Load 0x2,0x8
05d6 e001 | | Load 0x0,0x1
05d7 1b14 | | Execute Package,Field_Read,Field_Number 0x14
05d8 1b22 | " | Execute Package,Field_Read,Field_Number 0x22
05d9 0119 | | Execute Any,Check_In_Formal_Type
05da 4802 |H | Short_Literal 0x2
05db 00da | | Load_Top At_Offset_2
05dc 01d6 | | Execute Vector,Field_Write
05dd 00da | | Load_Top At_Offset_2
05de e001 | | Load 0x0,0x1
05df 1b14 | | Execute Package,Field_Read,Field_Number 0x14
05e0 1b22 | " | Execute Package,Field_Read,Field_Number 0x22
05e1 0119 | | Execute Any,Check_In_Formal_Type
05e2 4803 |H | Short_Literal 0x3
05e3 00da | | Load_Top At_Offset_2
05e4 01d6 | | Execute Vector,Field_Write
05e5 e001 | | Load 0x0,0x1
05e6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
05e7 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
05e8 02c7 | | Declare_Variable Any
05e9 e212 | | Load 0x1,0x12
05ea 4801 |H | Short_Literal 0x1
05eb 4803 |H | Short_Literal 0x3
05ec e001 | | Load 0x0,0x1
05ed 1b11 | | Execute Package,Field_Read,Field_Number 0x11
05ee 1b10 | | Execute Package,Field_Read,Field_Number 0x10
05ef 035b | [ | Declare_Type Array,Constrained
05f0 0337 | 7 | Declare_Variable Array
05f1 e212 | | Load 0x1,0x12
05f2 0092 0691 | | Action Push_String_Extended,0x691 ; "Assembler"
05f4 e001 | | Load 0x0,0x1
05f5 1b11 | | Execute Package,Field_Read,Field_Number 0x11
05f6 180e | | Execute Package,Field_Execute,Field_Number 0xe
05f7 e001 | | Load 0x0,0x1
05f8 1b11 | | Execute Package,Field_Read,Field_Number 0x11
05f9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05fa 0119 | | Execute Any,Check_In_Formal_Type
05fb 4801 |H | Short_Literal 0x1
05fc 00da | | Load_Top At_Offset_2
05fd 01d6 | | Execute Vector,Field_Write
05fe e212 | | Load 0x1,0x12
05ff 0092 0692 | | Action Push_String_Extended,0x692 ; "C"
0601 e001 | | Load 0x0,0x1
0602 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0603 180e | | Execute Package,Field_Execute,Field_Number 0xe
0604 e001 | | Load 0x0,0x1
0605 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0606 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0607 0119 | | Execute Any,Check_In_Formal_Type
0608 4802 |H | Short_Literal 0x2
0609 00da | | Load_Top At_Offset_2
060a 01d6 | | Execute Vector,Field_Write
060b e212 | | Load 0x1,0x12
060c 0092 0693 | | Action Push_String_Extended,0x693 ; "Ada"
060e e001 | | Load 0x0,0x1
060f 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0610 180e | | Execute Package,Field_Execute,Field_Number 0xe
0611 e001 | | Load 0x0,0x1
0612 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0613 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0614 0119 | | Execute Any,Check_In_Formal_Type
0615 4803 |H | Short_Literal 0x3
0616 00da | | Load_Top At_Offset_2
0617 01d6 | | Execute Vector,Field_Write
0618 00db | | Load_Top At_Offset_3
0619 e40d | | Load 0x2,0xd
061a e001 | | Load 0x0,0x1
061b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
061c 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
061d a40f | | Store_Unchecked 0x2,0xf
061e BODY_03e8:
061e e211 | | Load 0x1,0x11
061f 8215 | | Call 0x1,0x15
0620 7008 |p | Jump_Nonzero 0x629
0621 e002 | | Load 0x0,0x2
0622 180e | | Execute Package,Field_Execute,Field_Number 0xe
0623 4807 |H | Short_Literal 0x7
0624 0092 067e | ~| Action Push_String_Extended,0x67e ; "The I386_Unix_Als_Xt target has not been authorized on this machine."
0626 e003 | | Load 0x0,0x3
0627 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0628 08e2 | | Execute_Immediate Raise,0xe2
0629 00d8 | | Load_Top At_Offset_0
062a 4401 |D | Exit_Subprogram With_Result,0x1
062b 0000 0000 | | .BLANK 0000[0x5]
0630 ; --------------------------------------------------------------------------------------
0630 ; SUBPROGRAM
0630 ; --------------------------------------------------------------------------------------
0630 0633 | 3 | .CONST 0x0633 ; Address of begin
0631 0004 | | .CONST 0x0004 ; Address of exception handler
0632 0001 | | .CONST 0x0001 ; Number of locals
0633 BODY_0630:
0633 INIT_0630:
0633 e211 | | Load 0x1,0x11
0634 8215 | | Call 0x1,0x15
0635 7008 |p | Jump_Nonzero 0x63e
0636 e002 | | Load 0x0,0x2
0637 180e | | Execute Package,Field_Execute,Field_Number 0xe
0638 4807 |H | Short_Literal 0x7
0639 0092 067e | ~| Action Push_String_Extended,0x67e ; "The I386_Unix_Als_Xt target has not been authorized on this machine."
063b e003 | | Load 0x0,0x3
063c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
063d 08e2 | | Execute_Immediate Raise,0xe2
063e 00da | | Load_Top At_Offset_2
063f e001 | | Load 0x0,0x1
0640 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0641 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0642 e001 | | Load 0x0,0x1
0643 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0644 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0645 e001 | | Load 0x0,0x1
0646 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0647 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0648 4401 |D | Exit_Subprogram With_Result,0x1
0649 0000 0000 | | .BLANK 0000[0x7]
0650 ; --------------------------------------------------------------------------------------
0650 ; SUBPROGRAM
0650 ; --------------------------------------------------------------------------------------
0650 0653 | S | .CONST 0x0653 ; Address of begin
0651 0004 | | .CONST 0x0004 ; Address of exception handler
0652 0001 | | .CONST 0x0001 ; Number of locals
0653 BODY_0650:
0653 INIT_0650:
0653 00cf | | Action Mark_Auxiliary
0654 4807 |H | Short_Literal 0x7
0655 4801 |H | Short_Literal 0x1
0656 0007 | | Action Break_Optional
0657 4801 |H | Short_Literal 0x1
0658 4820 |H | Short_Literal 0x20
0659 00da | | Load_Top At_Offset_2
065a e214 | | Load 0x1,0x14
065b 01d5 | | Execute Vector,Field_Reference
065c e005 | | Load 0x0,0x5
065d 181c | | Execute Package,Field_Execute,Field_Number 0x1c
065e 4820 |H | Short_Literal 0x20
065f e5ff | | Load 0x2,-0x1
0660 e005 | | Load 0x0,0x5
0661 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0662 e005 | | Load 0x0,0x5
0663 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0664 6804 |h | Jump_Zero 0x669
0665 e5ff | | Load 0x2,-0x1
0666 e006 | | Load 0x0,0x6
0667 180e | | Execute Package,Field_Execute,Field_Number 0xe
0668 4401 |D | Exit_Subprogram With_Result,0x1
0669 00c8 | | Action Pop_Auxiliary_Range
066a 3fec |? | Loop_Increasing 0x657
066b 00ce | | Action Pop_Auxiliary
066c 4801 |H | Short_Literal 0x1
066d 4401 |D | Exit_Subprogram With_Result,0x1
066e ; --------------------------------------------------------------------------------------
066e ; STRING TABLE
066e ; --------------------------------------------------------------------------------------
066e 004e | N | .STRTAB 0x004e->0x0695 ; "I386_Unix_Als_Xt"
; "I386_Unix_Als_Xt"
; "I386_Unix_Als_Xt"
066f 005c | \ | .STRTAB 0x005c->0x069d ; "Rs6000_Aix_Ibm "
0670 006a | j | .STRTAB 0x006a->0x06a5 ; "Vax_Vms_Dec_Xt "
0671 0078 | x | .STRTAB 0x0078->0x06ad ; "I486_Iux_Als_Xt "
0672 0086 | | .STRTAB 0x0086->0x06b5 ; "I960_Vms_Tar_Xt "
0673 0094 | | .STRTAB 0x0094->0x06bd ; "IC30_Vms_Tar_Xt "
0674 00a2 | | .STRTAB 0x00a2->0x06c5 ; "Sparc_Sun_Xt "
0675 00b0 | | .STRTAB 0x00b0->0x06cd ; "Boolean"
0676 00b5 | | .STRTAB 0x00b5->0x06d0 ; "is_array"
0677 00bb | | .STRTAB 0x00bb->0x06d4 ; "Record_Descriptor"
0678 00ca | | .STRTAB 0x00ca->0x06dd ; "Array_Descriptor"
0679 00d8 | | .STRTAB 0x00d8->0x06e5 ; "integer"
; "integer"
; "integer"
; "integer"
067a 00dd | | .STRTAB 0x00dd->0x06e8 ; "Exception_Code"
067b 00e9 | | .STRTAB 0x00e9->0x06ef ; "Offset"
067c 00ed | | .STRTAB 0x00ed->0x06f2 ; "Record_Size"
067d 00f6 | | .STRTAB 0x00f6->0x06f8 ; "Variant_Index"
067e 0101 | | .STRTAB 0x0101->0x06fe ; "The I386_Unix_Als_Xt target has not been authorized on this machine."
; "The I386_Unix_Als_Xt target has not been authorized on this machine."
; "The I386_Unix_Als_Xt target has not been authorized on this machine."
; "The I386_Unix_Als_Xt target has not been authorized on this machine."
067f 0143 | C | .STRTAB 0x0143->0x0720 ; "SHORT_SHORT_INTEGER"
0680 0154 | T | .STRTAB 0x0154->0x072a ; "SHORT_INTEGER"
0681 015f | _ | .STRTAB 0x015f->0x0730 ; "INTEGER"
0682 0164 | d | .STRTAB 0x0164->0x0734 ; "FLOAT"
0683 0167 | g | .STRTAB 0x0167->0x0736 ; "LONG_FLOAT"
0684 016f | o | .STRTAB 0x016f->0x073b ; "DURATION"
0685 0175 | u | .STRTAB 0x0175->0x073f ; "Interface"
0686 017c | | | .STRTAB 0x017c->0x0744 ; "Subprogram_Name"
0687 0189 | | .STRTAB 0x0189->0x074b ; "String"
0688 018d | | .STRTAB 0x018d->0x074e ; "String_Literal"
0689 0199 | | .STRTAB 0x0199->0x0755 ; "Interface_Name"
068a 01a5 | | .STRTAB 0x01a5->0x075c ; "on"
068b 01a5 | | .STRTAB 0x01a5->0x075d ; "off"
068c 01a6 | | .STRTAB 0x01a6->0x075f ; "Indent"
068d 01aa | | .STRTAB 0x01aa->0x0762 ; "time"
068e 01ac | | .STRTAB 0x01ac->0x0764 ; "space"
068f 01af | | .STRTAB 0x01af->0x0766 ; "On"
0690 01af | | .STRTAB 0x01af->0x0767 ; "Improve"
0691 01b4 | | .STRTAB 0x01b4->0x076b ; "Assembler"
0692 01bb | | .STRTAB 0x01bb->0x076f ; "C"
0693 01ba | | .STRTAB 0x01ba->0x0770 ; "Ada"
0694 01bb | | .STREND 0x01bb->0x0771
0695 4933 3836 |I386| .STRTAB_STRINGS
0772 0000 0000 | | .BLANK 0000[0x6]
0778 ; --------------------------------------------------------------------------------------
0778 ; Debug Table
0778 ; --------------------------------------------------------------------------------------
0778 0004 000e | | .DEBUG4 0x0004,0x000e,0xb427,0x0000,0x0001,0x0000
077e 0000 0000 | | .BLANK 0000[0x7a]
07f8 f5f0 0000 | | .XXX[0x8]
07fa 0000 7003 | p |
07fc 001c 0fa0 | |
07fe 0000 0000 | |