|
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_0a7cf5
└─⟦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 04e8 | | .CONST 0x04e8 ; 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 8003 | | .CONST 0x8003 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 002d | - | .CONST 0x002d ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000c | | .CONST 0x000c ; Number of locals 000b INIT_0008: 000b 00e1 | | Load_Encached Boolean_Cache 000c 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 000d e020 | | Load 0x0,0x20 000e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 000f 02c7 | | Declare_Variable Any 0010 00d8 | | Load_Top At_Offset_0 0011 1c00 | | Execute_Immediate Run_Utility,0x0 0012 e020 | | Load 0x0,0x20 0013 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0014 02c7 | | Declare_Variable Any 0015 00d8 | | Load_Top At_Offset_0 0016 1c00 | | Execute_Immediate Run_Utility,0x0 0017 e020 | | Load 0x0,0x20 0018 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0019 02c7 | | Declare_Variable Any 001a 00d8 | | Load_Top At_Offset_0 001b 1c00 | | Execute_Immediate Run_Utility,0x0 001c 00e1 | | Load_Encached Boolean_Cache 001d 029f 006b | k| Declare_Subprogram INIT_0068,For_Call 001f 029f 00cb | | Declare_Subprogram INIT_00c8,For_Call 0021 029e 01db | | Declare_Subprogram INIT_01d8,For_Call,Unelaborated 0023 029f 01eb | | Declare_Subprogram INIT_01e8,For_Call 0025 4809 |H | Short_Literal 0x9 0026 4802 |H | Short_Literal 0x2 0027 0099 | | Action Reference_Dynamic 0028 00c7 | | Action Elaborate_Subprogram 0029 029f 0223 | #| Declare_Subprogram INIT_0220,For_Call 002b 029f 0333 | 3| Declare_Subprogram INIT_0330,For_Call 002d BODY_0008: 002d e5ff | | Load 0x2,-0x1 002e 0f02 | | Execute_Immediate Equal,0x2 002f 7001 |p | Jump_Nonzero 0x31 0030 08e2 | | Execute_Immediate Raise,0xe2 0031 e5fe | | Load 0x2,-0x2 0032 e022 | " | Load 0x0,0x22 0033 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0034 700b |p | Jump_Nonzero 0x40 0035 e023 | # | Load 0x0,0x23 0036 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 0037 e023 | # | Load 0x0,0x23 0038 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0039 e5fb | | Load 0x2,-0x5 003a e022 | " | Load 0x0,0x22 003b 1819 | | Execute Package,Field_Execute,Field_Number 0x19 003c e023 | # | Load 0x0,0x23 003d 1b32 | 2 | Execute Package,Field_Read,Field_Number 0x32 003e 1815 | | Execute Package,Field_Execute,Field_Number 0x15 003f 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0040 00cf | | Action Mark_Auxiliary 0041 e5fe | | Load 0x2,-0x2 0042 e022 | " | Load 0x0,0x22 0043 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 0044 e5fe | | Load 0x2,-0x2 0045 e022 | " | Load 0x0,0x22 0046 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0047 0263 | c | Execute Discrete,Above_Bound 0048 7007 |p | Jump_Nonzero 0x50 0049 00d8 | | Load_Top At_Offset_0 004a e5fe | | Load 0x2,-0x2 004b e022 | " | Load 0x0,0x22 004c 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 004d 840c | | Call 0x2,0xc 004e 00c8 | | Action Pop_Auxiliary_Range 004f 3ff9 |? | Loop_Increasing 0x49 0050 00ce | | Action Pop_Auxiliary 0051 e402 | | Load 0x2,0x2 0052 680b |h | Jump_Zero 0x5e 0053 e023 | # | Load 0x0,0x23 0054 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 0055 e023 | # | Load 0x0,0x23 0056 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0057 e5fb | | Load 0x2,-0x5 0058 e022 | " | Load 0x0,0x22 0059 1819 | | Execute Package,Field_Execute,Field_Number 0x19 005a e023 | # | Load 0x0,0x23 005b 1b32 | 2 | Execute Package,Field_Read,Field_Number 0x32 005c 1815 | | Execute Package,Field_Execute,Field_Number 0x15 005d 4506 |E | Exit_Suprogram New_Top_Offset 0x6 005e e023 | # | Load 0x0,0x23 005f 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 0060 e023 | # | Load 0x0,0x23 0061 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0062 8210 | | Call 0x1,0x10 0063 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0064 0000 0000 | | .BLANK 0000[0x4] 0068 ; -------------------------------------------------------------------------------------- 0068 ; SUBPROGRAM 0068 ; -------------------------------------------------------------------------------------- 0068 006b | k | .CONST 0x006b ; Address of begin 0069 0004 | | .CONST 0x0004 ; Address of exception handler 006a 0001 | | .CONST 0x0001 ; Number of locals 006b BODY_0068: 006b INIT_0068: 006b 480a |H | Short_Literal 0xa 006c e022 | " | Load 0x0,0x22 006d 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 006e e023 | # | Load 0x0,0x23 006f 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0070 4800 |H | Short_Literal 0x0 0071 e5fc | | Load 0x2,-0x4 0072 e5fd | | Load 0x2,-0x3 0073 820d | | Call 0x1,0xd 0074 480b |H | Short_Literal 0xb 0075 e022 | " | Load 0x0,0x22 0076 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0077 e023 | # | Load 0x0,0x23 0078 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0079 584a |XJ | Indirect_Literal Float,0xc4,20.0 007a 4800 |H | Short_Literal 0x0 007b 0092 04a1 | | Action Push_String_Extended,0x4a1 ; "Name/\x0aDescription" 007d 820e | | Call 0x1,0xe 007e 480b |H | Short_Literal 0xb 007f e022 | " | Load 0x0,0x22 0080 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0081 e023 | # | Load 0x0,0x23 0082 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0083 583c |X< | Indirect_Literal Float,0xc0,10.0 0084 4802 |H | Short_Literal 0x2 0085 0092 04a2 | | Action Push_String_Extended,0x4a2 ; "Unique\x0aIdentifier" 0087 820e | | Call 0x1,0xe 0088 480b |H | Short_Literal 0xb 0089 e022 | " | Load 0x0,0x22 008a 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 008b e023 | # | Load 0x0,0x23 008c 1b16 | | Execute Package,Field_Read,Field_Number 0x16 008d 582e |X. | Indirect_Literal Float,0xbc,15.0 008e 4802 |H | Short_Literal 0x2 008f 0092 04a3 | | Action Push_String_Extended,0x4a3 ; "Units of\x0aMeasure" 0091 820e | | Call 0x1,0xe 0092 480b |H | Short_Literal 0xb 0093 e022 | " | Load 0x0,0x22 0094 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0095 e023 | # | Load 0x0,0x23 0096 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0097 5824 |X$ | Indirect_Literal Float,0xbc,15.0 0098 4802 |H | Short_Literal 0x2 0099 0092 04a4 | | Action Push_String_Extended,0x4a4 ; "Limit/\x0aRange" 009b 820e | | Call 0x1,0xe 009c 480b |H | Short_Literal 0xb 009d e022 | " | Load 0x0,0x22 009e 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 009f e023 | # | Load 0x0,0x23 00a0 1b16 | | Execute Package,Field_Read,Field_Number 0x16 00a1 581e |X | Indirect_Literal Float,0xc0,10.0 00a2 4802 |H | Short_Literal 0x2 00a3 0092 04a5 | | Action Push_String_Extended,0x4a5 ; "Accuracy/\x0aPrecision" 00a5 820e | | Call 0x1,0xe 00a6 480b |H | Short_Literal 0xb 00a7 e022 | " | Load 0x0,0x22 00a8 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 00a9 e023 | # | Load 0x0,0x23 00aa 1b16 | | Execute Package,Field_Read,Field_Number 0x16 00ab 5810 |X | Indirect_Literal Float,0xbc,15.0 00ac 4802 |H | Short_Literal 0x2 00ad 0092 04a6 | | Action Push_String_Extended,0x4a6 ; "Source\x0aCapability" 00af 820e | | Call 0x1,0xe 00b0 480b |H | Short_Literal 0xb 00b1 e022 | " | Load 0x0,0x22 00b2 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 00b3 e023 | # | Load 0x0,0x23 00b4 1b16 | | Execute Package,Field_Read,Field_Number 0x16 00b5 5806 |X | Indirect_Literal Float,0xbc,15.0 00b6 4802 |H | Short_Literal 0x2 00b7 0092 04a7 | | Action Push_String_Extended,0x4a7 ; "Destination\x0aCapability" 00b9 820e | | Call 0x1,0xe 00ba 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00bb 0000 | | .XXX[0x1] 00bc 402e 0000 |@. | .DBL 15.0 00be 0000 0000 | | 00c0 4024 0000 |@$ | .DBL 10.0 00c2 0000 0000 | | 00c4 4034 0000 |@4 | .DBL 20.0 00c6 0000 0000 | | 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; SUBPROGRAM 00c8 ; -------------------------------------------------------------------------------------- 00c8 00f3 | | .CONST 0x00f3 ; Address of begin 00c9 0004 | | .CONST 0x0004 ; Address of exception handler 00ca 0009 | | .CONST 0x0009 ; Number of locals 00cb INIT_00c8: 00cb e027 | ' | Load 0x0,0x27 00cc 1b20 | | Execute Package,Field_Read,Field_Number 0x20 00cd 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 00ce e020 | | Load 0x0,0x20 00cf 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 00d0 02c7 | | Declare_Variable Any 00d1 e7ff | | Load 0x3,-0x1 00d2 e026 | & | Load 0x0,0x26 00d3 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 00d4 a603 | | Store_Unchecked 0x3,0x3 00d5 00e1 | | Load_Encached Boolean_Cache 00d6 e020 | | Load 0x0,0x20 00d7 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00d8 02c7 | | Declare_Variable Any 00d9 00d8 | | Load_Top At_Offset_0 00da 1c00 | | Execute_Immediate Run_Utility,0x0 00db e020 | | Load 0x0,0x20 00dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00dd 02c7 | | Declare_Variable Any 00de 00d8 | | Load_Top At_Offset_0 00df 1c00 | | Execute_Immediate Run_Utility,0x0 00e0 e020 | | Load 0x0,0x20 00e1 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00e2 02c7 | | Declare_Variable Any 00e3 00d8 | | Load_Top At_Offset_0 00e4 1c00 | | Execute_Immediate Run_Utility,0x0 00e5 e023 | # | Load 0x0,0x23 00e6 1b15 | | Execute Package,Field_Read,Field_Number 0x15 00e7 02ff | | Declare_Variable Variant_Record 00e8 00d8 | | Load_Top At_Offset_0 00e9 1c00 | | Execute_Immediate Run_Utility,0x0 00ea e027 | ' | Load 0x0,0x27 00eb 1b20 | | Execute Package,Field_Read,Field_Number 0x20 00ec 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b 00ed 0322 | " | Declare_Variable Record 00ee e7ff | | Load 0x3,-0x1 00ef e028 | ( | Load 0x0,0x28 00f0 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00f1 00d9 | | Load_Top At_Offset_1 00f2 017d | } | Execute Record,Structure_Write 00f3 BODY_00c8: 00f3 e603 | | Load 0x3,0x3 00f4 823a | : | Call 0x1,0x3a 00f5 c603 | | Store 0x3,0x3 00f6 00da | | Load_Top At_Offset_2 00f7 e606 | | Load 0x3,0x6 00f8 e605 | | Load 0x3,0x5 00f9 00e1 | | Load_Encached Boolean_Cache 00fa e603 | | Load 0x3,0x3 00fb 822e | . | Call 0x1,0x2e 00fc c604 | | Store 0x3,0x4 00fd c605 | | Store 0x3,0x5 00fe c606 | | Store 0x3,0x6 00ff c607 | | Store 0x3,0x7 0100 00ea | | Load_Encached Null_String_Cache 0101 4801 |H | Short_Literal 0x1 0102 e607 | | Load 0x3,0x7 0103 8234 | 4 | Call 0x1,0x34 0104 00da | | Load_Top At_Offset_2 0105 016d | m | Execute Variant_Record,Structure_Write 0106 4801 |H | Short_Literal 0x1 0107 480d |H | Short_Literal 0xd 0108 e022 | " | Load 0x0,0x22 0109 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 010a 00ea | | Load_Encached Null_String_Cache 010b 4800 |H | Short_Literal 0x0 010c e7ff | | Load 0x3,-0x1 010d e022 | " | Load 0x0,0x22 010e 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 010f 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0110 4801 |H | Short_Literal 0x1 0111 e7fe | | Load 0x3,-0x2 0112 e22d | - | Load 0x1,0x2d 0113 01cf | | Execute Vector,Slice_Read 0114 4801 |H | Short_Literal 0x1 0115 e7ff | | Load 0x3,-0x1 0116 e022 | " | Load 0x0,0x22 0117 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 0118 180e | | Execute Package,Field_Execute,Field_Number 0xe 0119 01cc | | Execute Vector,Catenate 011a 820f | | Call 0x1,0xf 011b 4801 |H | Short_Literal 0x1 011c 480d |H | Short_Literal 0xd 011d e022 | " | Load 0x0,0x22 011e 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 011f 00ea | | Load_Encached Null_String_Cache 0120 4804 |H | Short_Literal 0x4 0121 e7ff | | Load 0x3,-0x1 0122 e022 | " | Load 0x0,0x22 0123 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 0124 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0125 4804 |H | Short_Literal 0x4 0126 e7ff | | Load 0x3,-0x1 0127 e022 | " | Load 0x0,0x22 0128 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 0129 180e | | Execute Package,Field_Execute,Field_Number 0xe 012a 820f | | Call 0x1,0xf 012b e604 | | Load 0x3,0x4 012c 6819 |h | Jump_Zero 0x146 012d 4801 |H | Short_Literal 0x1 012e 480d |H | Short_Literal 0xd 012f e022 | " | Load 0x0,0x22 0130 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0131 e023 | # | Load 0x0,0x23 0132 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0133 e238 | 8 | Load 0x1,0x38 0134 820f | | Call 0x1,0xf 0135 4801 |H | Short_Literal 0x1 0136 480d |H | Short_Literal 0xd 0137 e022 | " | Load 0x0,0x22 0138 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0139 e023 | # | Load 0x0,0x23 013a 1b16 | | Execute Package,Field_Read,Field_Number 0x16 013b e238 | 8 | Load 0x1,0x38 013c 820f | | Call 0x1,0xf 013d 4801 |H | Short_Literal 0x1 013e 480d |H | Short_Literal 0xd 013f e022 | " | Load 0x0,0x22 0140 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0141 e023 | # | Load 0x0,0x23 0142 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0143 e238 | 8 | Load 0x1,0x38 0144 820f | | Call 0x1,0xf 0145 7878 |xx | Jump 0x1be 0146 e7ff | | Load 0x3,-0x1 0147 e028 | ( | Load 0x0,0x28 0148 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0149 4838 |H8 | Short_Literal 0x38 014a e01f | | Load 0x0,0x1f 014b 1b10 | | Execute Package,Field_Read,Field_Number 0x10 014c 180e | | Execute Package,Field_Execute,Field_Number 0xe 014d a602 | | Store_Unchecked 0x3,0x2 014e e602 | | Load 0x3,0x2 014f e027 | ' | Load 0x0,0x27 0150 1b20 | | Execute Package,Field_Read,Field_Number 0x20 0151 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0152 680d |h | Jump_Zero 0x160 0153 4801 |H | Short_Literal 0x1 0154 480d |H | Short_Literal 0xd 0155 e022 | " | Load 0x0,0x22 0156 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0157 00ea | | Load_Encached Null_String_Cache 0158 480f |H | Short_Literal 0xf 0159 e605 | | Load 0x3,0x5 015a 8234 | 4 | Call 0x1,0x34 015b 480f |H | Short_Literal 0xf 015c e603 | | Load 0x3,0x3 015d 8232 | 2 | Call 0x1,0x32 015e 820f | | Call 0x1,0xf 015f 7810 |x | Jump 0x170 0160 4801 |H | Short_Literal 0x1 0161 480d |H | Short_Literal 0xd 0162 e022 | " | Load 0x0,0x22 0163 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0164 00ea | | Load_Encached Null_String_Cache 0165 4800 |H | Short_Literal 0x0 0166 e7ff | | Load 0x3,-0x1 0167 e022 | " | Load 0x0,0x22 0168 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 0169 181c | | Execute Package,Field_Execute,Field_Number 0x1c 016a 00ea | | Load_Encached Null_String_Cache 016b e602 | | Load 0x3,0x2 016c e01f | | Load 0x0,0x1f 016d 1b10 | | Execute Package,Field_Read,Field_Number 0x10 016e 180f | | Execute Package,Field_Execute,Field_Number 0xf 016f 820f | | Call 0x1,0xf 0170 e7ff | | Load 0x3,-0x1 0171 e028 | ( | Load 0x0,0x28 0172 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0173 4839 |H9 | Short_Literal 0x39 0174 e01f | | Load 0x0,0x1f 0175 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0176 180e | | Execute Package,Field_Execute,Field_Number 0xe 0177 a602 | | Store_Unchecked 0x3,0x2 0178 e602 | | Load 0x3,0x2 0179 e027 | ' | Load 0x0,0x27 017a 1b20 | | Execute Package,Field_Read,Field_Number 0x20 017b 181f | | Execute Package,Field_Execute,Field_Number 0x1f 017c 680a |h | Jump_Zero 0x187 017d 4801 |H | Short_Literal 0x1 017e 480d |H | Short_Literal 0xd 017f e022 | " | Load 0x0,0x22 0180 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0181 00db | | Load_Top At_Offset_3 0182 480d |H | Short_Literal 0xd 0183 e603 | | Load 0x3,0x3 0184 8232 | 2 | Call 0x1,0x32 0185 820f | | Call 0x1,0xf 0186 7810 |x | Jump 0x197 0187 4801 |H | Short_Literal 0x1 0188 480d |H | Short_Literal 0xd 0189 e022 | " | Load 0x0,0x22 018a 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 018b 00ea | | Load_Encached Null_String_Cache 018c 4800 |H | Short_Literal 0x0 018d e7ff | | Load 0x3,-0x1 018e e022 | " | Load 0x0,0x22 018f 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 0190 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0191 00ea | | Load_Encached Null_String_Cache 0192 e602 | | Load 0x3,0x2 0193 e01f | | Load 0x0,0x1f 0194 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0195 180f | | Execute Package,Field_Execute,Field_Number 0xf 0196 820f | | Call 0x1,0xf 0197 e7ff | | Load 0x3,-0x1 0198 e028 | ( | Load 0x0,0x28 0199 1810 | | Execute Package,Field_Execute,Field_Number 0x10 019a 483a |H: | Short_Literal 0x3a 019b e01f | | Load 0x0,0x1f 019c 1b10 | | Execute Package,Field_Read,Field_Number 0x10 019d 180e | | Execute Package,Field_Execute,Field_Number 0xe 019e a602 | | Store_Unchecked 0x3,0x2 019f e602 | | Load 0x3,0x2 01a0 e027 | ' | Load 0x0,0x27 01a1 1b20 | | Execute Package,Field_Read,Field_Number 0x20 01a2 181f | | Execute Package,Field_Execute,Field_Number 0x1f 01a3 680a |h | Jump_Zero 0x1ae 01a4 4801 |H | Short_Literal 0x1 01a5 480d |H | Short_Literal 0xd 01a6 e022 | " | Load 0x0,0x22 01a7 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 01a8 00db | | Load_Top At_Offset_3 01a9 480e |H | Short_Literal 0xe 01aa e603 | | Load 0x3,0x3 01ab 8232 | 2 | Call 0x1,0x32 01ac 820f | | Call 0x1,0xf 01ad 7810 |x | Jump 0x1be 01ae 4801 |H | Short_Literal 0x1 01af 480d |H | Short_Literal 0xd 01b0 e022 | " | Load 0x0,0x22 01b1 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 01b2 00ea | | Load_Encached Null_String_Cache 01b3 4800 |H | Short_Literal 0x0 01b4 e7ff | | Load 0x3,-0x1 01b5 e022 | " | Load 0x0,0x22 01b6 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 01b7 181c | | Execute Package,Field_Execute,Field_Number 0x1c 01b8 00ea | | Load_Encached Null_String_Cache 01b9 e602 | | Load 0x3,0x2 01ba e01f | | Load 0x0,0x1f 01bb 1b10 | | Execute Package,Field_Read,Field_Number 0x10 01bc 180f | | Execute Package,Field_Execute,Field_Number 0xf 01bd 820f | | Call 0x1,0xf 01be 4801 |H | Short_Literal 0x1 01bf 480d |H | Short_Literal 0xd 01c0 e022 | " | Load 0x0,0x22 01c1 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 01c2 e023 | # | Load 0x0,0x23 01c3 1b16 | | Execute Package,Field_Read,Field_Number 0x16 01c4 4826 |H& | Short_Literal 0x26 01c5 e7ff | | Load 0x3,-0x1 01c6 e022 | " | Load 0x0,0x22 01c7 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 01c8 180d | | Execute Package,Field_Execute,Field_Number 0xd 01c9 820f | | Call 0x1,0xf 01ca 4801 |H | Short_Literal 0x1 01cb 480d |H | Short_Literal 0xd 01cc e022 | " | Load 0x0,0x22 01cd 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 01ce e023 | # | Load 0x0,0x23 01cf 1b16 | | Execute Package,Field_Read,Field_Number 0x16 01d0 4827 |H' | Short_Literal 0x27 01d1 e7ff | | Load 0x3,-0x1 01d2 e022 | " | Load 0x0,0x22 01d3 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 01d4 180d | | Execute Package,Field_Execute,Field_Number 0xd 01d5 820f | | Call 0x1,0xf 01d6 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01d7 0000 | | .XXX[0x1] 01d8 ; -------------------------------------------------------------------------------------- 01d8 ; SUBPROGRAM 01d8 ; -------------------------------------------------------------------------------------- 01d8 01dd | | .CONST 0x01dd ; Address of begin 01d9 0004 | | .CONST 0x0004 ; Address of exception handler 01da 0002 | | .CONST 0x0002 ; Number of locals 01db INIT_01d8: 01db 029f 0353 | S| Declare_Subprogram INIT_0350,For_Call 01dd BODY_01d8: 01dd 00db | | Load_Top At_Offset_3 01de e031 | 1 | Load 0x0,0x31 01df 1819 | | Execute Package,Field_Execute,Field_Number 0x19 01e0 0f06 | | Execute_Immediate Equal,0x6 01e1 6801 |h | Jump_Zero 0x1e3 01e2 8602 | | Call 0x3,0x2 01e3 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01e4 0000 0000 | | .BLANK 0000[0x4] 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 020a | | .CONST 0x020a ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 0007 | | .CONST 0x0007 ; Number of locals 01eb INIT_01e8: 01eb e020 | | Load 0x0,0x20 01ec 1b19 | | Execute Package,Field_Read,Field_Number 0x19 01ed 02c7 | | Declare_Variable Any 01ee 00d8 | | Load_Top At_Offset_0 01ef 1c00 | | Execute_Immediate Run_Utility,0x0 01f0 e020 | | Load 0x0,0x20 01f1 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01f2 02c7 | | Declare_Variable Any 01f3 e7ff | | Load 0x3,-0x1 01f4 a603 | | Store_Unchecked 0x3,0x3 01f5 e020 | | Load 0x0,0x20 01f6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01f7 02c7 | | Declare_Variable Any 01f8 00d9 | | Load_Top At_Offset_1 01f9 e031 | 1 | Load 0x0,0x31 01fa 1854 | T | Execute Package,Field_Execute,Field_Number 0x54 01fb a604 | | Store_Unchecked 0x3,0x4 01fc e020 | | Load 0x0,0x20 01fd 1b13 | | Execute Package,Field_Read,Field_Number 0x13 01fe 02c7 | | Declare_Variable Any 01ff 00da | | Load_Top At_Offset_2 0200 e031 | 1 | Load 0x0,0x31 0201 1855 | U | Execute Package,Field_Execute,Field_Number 0x55 0202 a605 | | Store_Unchecked 0x3,0x5 0203 e020 | | Load 0x0,0x20 0204 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0205 02c7 | | Declare_Variable Any 0206 00d8 | | Load_Top At_Offset_0 0207 1c00 | | Execute_Immediate Run_Utility,0x0 0208 029f 03bb | | Declare_Subprogram INIT_03b8,For_Call 020a BODY_01e8: 020a e7fe | | Load 0x3,-0x2 020b e604 | | Load 0x3,0x4 020c 8408 | | Call 0x2,0x8 020d 00cf | | Action Mark_Auxiliary 020e 780a |x | Jump 0x219 020f 00db | | Load_Top At_Offset_3 0210 e020 | | Load 0x0,0x20 0211 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0212 c606 | | Store 0x3,0x6 0213 8607 | | Call 0x3,0x7 0214 00db | | Load_Top At_Offset_3 0215 e020 | | Load 0x0,0x20 0216 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0217 c605 | | Store 0x3,0x5 0218 00c9 | | Action Pop_Auxiliary_Loop 0219 00db | | Load_Top At_Offset_3 021a e020 | | Load 0x0,0x20 021b 1816 | | Execute Package,Field_Execute,Field_Number 0x16 021c 6ff2 |o | Jump_Zero 0x20f 021d 4503 |E | Exit_Suprogram New_Top_Offset 0x3 021e 0000 0000 | | .XXX[0x2] 0220 ; -------------------------------------------------------------------------------------- 0220 ; SUBPROGRAM 0220 ; -------------------------------------------------------------------------------------- 0220 0249 | I | .CONST 0x0249 ; Address of begin 0221 0004 | | .CONST 0x0004 ; Address of exception handler 0222 0009 | | .CONST 0x0009 ; Number of locals 0223 INIT_0220: 0223 e027 | ' | Load 0x0,0x27 0224 1b20 | | Execute Package,Field_Read,Field_Number 0x20 0225 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 0226 e02d | - | Load 0x0,0x2d 0227 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0228 02c7 | | Declare_Variable Any 0229 e7ff | | Load 0x3,-0x1 022a e02d | - | Load 0x0,0x2d 022b 181e | | Execute Package,Field_Execute,Field_Number 0x1e 022c a603 | | Store_Unchecked 0x3,0x3 022d e020 | | Load 0x0,0x20 022e 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 022f 02c7 | | Declare_Variable Any 0230 00d9 | | Load_Top At_Offset_1 0231 e026 | & | Load 0x0,0x26 0232 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0233 a604 | | Store_Unchecked 0x3,0x4 0234 00e1 | | Load_Encached Boolean_Cache 0235 e020 | | Load 0x0,0x20 0236 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0237 02c7 | | Declare_Variable Any 0238 00d8 | | Load_Top At_Offset_0 0239 1c00 | | Execute_Immediate Run_Utility,0x0 023a e020 | | Load 0x0,0x20 023b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 023c 02c7 | | Declare_Variable Any 023d 00d8 | | Load_Top At_Offset_0 023e 1c00 | | Execute_Immediate Run_Utility,0x0 023f e020 | | Load 0x0,0x20 0240 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0241 02c7 | | Declare_Variable Any 0242 00d8 | | Load_Top At_Offset_0 0243 1c00 | | Execute_Immediate Run_Utility,0x0 0244 e023 | # | Load 0x0,0x23 0245 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0246 02ff | | Declare_Variable Variant_Record 0247 00d8 | | Load_Top At_Offset_0 0248 1c00 | | Execute_Immediate Run_Utility,0x0 0249 BODY_0220: 0249 e604 | | Load 0x3,0x4 024a 823a | : | Call 0x1,0x3a 024b c604 | | Store 0x3,0x4 024c 00d9 | | Load_Top At_Offset_1 024d 00db | | Load_Top At_Offset_3 024e e606 | | Load 0x3,0x6 024f 00e1 | | Load_Encached Boolean_Cache 0250 e604 | | Load 0x3,0x4 0251 822e | . | Call 0x1,0x2e 0252 c605 | | Store 0x3,0x5 0253 c606 | | Store 0x3,0x6 0254 c607 | | Store 0x3,0x7 0255 c608 | | Store 0x3,0x8 0256 00ea | | Load_Encached Null_String_Cache 0257 4801 |H | Short_Literal 0x1 0258 00db | | Load_Top At_Offset_3 0259 8234 | 4 | Call 0x1,0x34 025a 00d9 | | Load_Top At_Offset_1 025b 016d | m | Execute Variant_Record,Structure_Write 025c 4801 |H | Short_Literal 0x1 025d 480d |H | Short_Literal 0xd 025e e022 | " | Load 0x0,0x22 025f 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0260 00ea | | Load_Encached Null_String_Cache 0261 4800 |H | Short_Literal 0x0 0262 e7ff | | Load 0x3,-0x1 0263 e022 | " | Load 0x0,0x22 0264 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 0265 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0266 482e |H. | Short_Literal 0x2e 0267 4801 |H | Short_Literal 0x1 0268 e7ff | | Load 0x3,-0x1 0269 e022 | " | Load 0x0,0x22 026a 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 026b 1815 | | Execute Package,Field_Execute,Field_Number 0x15 026c 01ca | | Execute Vector,Prepend 026d 820f | | Call 0x1,0xf 026e 4801 |H | Short_Literal 0x1 026f 480d |H | Short_Literal 0xd 0270 e022 | " | Load 0x0,0x22 0271 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0272 e023 | # | Load 0x0,0x23 0273 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0274 4804 |H | Short_Literal 0x4 0275 e7ff | | Load 0x3,-0x1 0276 e022 | " | Load 0x0,0x22 0277 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 0278 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0279 820f | | Call 0x1,0xf 027a e605 | | Load 0x3,0x5 027b 6819 |h | Jump_Zero 0x295 027c 4801 |H | Short_Literal 0x1 027d 480d |H | Short_Literal 0xd 027e e022 | " | Load 0x0,0x22 027f 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0280 e023 | # | Load 0x0,0x23 0281 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0282 e238 | 8 | Load 0x1,0x38 0283 820f | | Call 0x1,0xf 0284 4801 |H | Short_Literal 0x1 0285 480d |H | Short_Literal 0xd 0286 e022 | " | Load 0x0,0x22 0287 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0288 e023 | # | Load 0x0,0x23 0289 1b16 | | Execute Package,Field_Read,Field_Number 0x16 028a e238 | 8 | Load 0x1,0x38 028b 820f | | Call 0x1,0xf 028c 4801 |H | Short_Literal 0x1 028d 480d |H | Short_Literal 0xd 028e e022 | " | Load 0x0,0x22 028f 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0290 e023 | # | Load 0x0,0x23 0291 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0292 e238 | 8 | Load 0x1,0x38 0293 820f | | Call 0x1,0xf 0294 7878 |xx | Jump 0x30d 0295 e7ff | | Load 0x3,-0x1 0296 e02d | - | Load 0x0,0x2d 0297 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0298 4838 |H8 | Short_Literal 0x38 0299 e01f | | Load 0x0,0x1f 029a 1b10 | | Execute Package,Field_Read,Field_Number 0x10 029b 180e | | Execute Package,Field_Execute,Field_Number 0xe 029c a602 | | Store_Unchecked 0x3,0x2 029d e602 | | Load 0x3,0x2 029e e027 | ' | Load 0x0,0x27 029f 1b20 | | Execute Package,Field_Read,Field_Number 0x20 02a0 181f | | Execute Package,Field_Execute,Field_Number 0x1f 02a1 680d |h | Jump_Zero 0x2af 02a2 4801 |H | Short_Literal 0x1 02a3 480d |H | Short_Literal 0xd 02a4 e022 | " | Load 0x0,0x22 02a5 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 02a6 00ea | | Load_Encached Null_String_Cache 02a7 480f |H | Short_Literal 0xf 02a8 e606 | | Load 0x3,0x6 02a9 8234 | 4 | Call 0x1,0x34 02aa 480f |H | Short_Literal 0xf 02ab e604 | | Load 0x3,0x4 02ac 8232 | 2 | Call 0x1,0x32 02ad 820f | | Call 0x1,0xf 02ae 7810 |x | Jump 0x2bf 02af 4801 |H | Short_Literal 0x1 02b0 480d |H | Short_Literal 0xd 02b1 e022 | " | Load 0x0,0x22 02b2 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 02b3 00ea | | Load_Encached Null_String_Cache 02b4 4800 |H | Short_Literal 0x0 02b5 e7ff | | Load 0x3,-0x1 02b6 e022 | " | Load 0x0,0x22 02b7 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 02b8 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 02b9 00ea | | Load_Encached Null_String_Cache 02ba e602 | | Load 0x3,0x2 02bb e01f | | Load 0x0,0x1f 02bc 1b10 | | Execute Package,Field_Read,Field_Number 0x10 02bd 180f | | Execute Package,Field_Execute,Field_Number 0xf 02be 820f | | Call 0x1,0xf 02bf e7ff | | Load 0x3,-0x1 02c0 e02d | - | Load 0x0,0x2d 02c1 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 02c2 4839 |H9 | Short_Literal 0x39 02c3 e01f | | Load 0x0,0x1f 02c4 1b10 | | Execute Package,Field_Read,Field_Number 0x10 02c5 180e | | Execute Package,Field_Execute,Field_Number 0xe 02c6 a602 | | Store_Unchecked 0x3,0x2 02c7 e602 | | Load 0x3,0x2 02c8 e027 | ' | Load 0x0,0x27 02c9 1b20 | | Execute Package,Field_Read,Field_Number 0x20 02ca 181f | | Execute Package,Field_Execute,Field_Number 0x1f 02cb 680a |h | Jump_Zero 0x2d6 02cc 4801 |H | Short_Literal 0x1 02cd 480d |H | Short_Literal 0xd 02ce e022 | " | Load 0x0,0x22 02cf 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 02d0 00da | | Load_Top At_Offset_2 02d1 480d |H | Short_Literal 0xd 02d2 e604 | | Load 0x3,0x4 02d3 8232 | 2 | Call 0x1,0x32 02d4 820f | | Call 0x1,0xf 02d5 7810 |x | Jump 0x2e6 02d6 4801 |H | Short_Literal 0x1 02d7 480d |H | Short_Literal 0xd 02d8 e022 | " | Load 0x0,0x22 02d9 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 02da 00ea | | Load_Encached Null_String_Cache 02db 4800 |H | Short_Literal 0x0 02dc e7ff | | Load 0x3,-0x1 02dd e022 | " | Load 0x0,0x22 02de 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 02df 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 02e0 00ea | | Load_Encached Null_String_Cache 02e1 e602 | | Load 0x3,0x2 02e2 e01f | | Load 0x0,0x1f 02e3 1b10 | | Execute Package,Field_Read,Field_Number 0x10 02e4 180f | | Execute Package,Field_Execute,Field_Number 0xf 02e5 820f | | Call 0x1,0xf 02e6 e7ff | | Load 0x3,-0x1 02e7 e02d | - | Load 0x0,0x2d 02e8 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 02e9 483a |H: | Short_Literal 0x3a 02ea e01f | | Load 0x0,0x1f 02eb 1b10 | | Execute Package,Field_Read,Field_Number 0x10 02ec 180e | | Execute Package,Field_Execute,Field_Number 0xe 02ed a602 | | Store_Unchecked 0x3,0x2 02ee e602 | | Load 0x3,0x2 02ef e027 | ' | Load 0x0,0x27 02f0 1b20 | | Execute Package,Field_Read,Field_Number 0x20 02f1 181f | | Execute Package,Field_Execute,Field_Number 0x1f 02f2 680a |h | Jump_Zero 0x2fd 02f3 4801 |H | Short_Literal 0x1 02f4 480d |H | Short_Literal 0xd 02f5 e022 | " | Load 0x0,0x22 02f6 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 02f7 00da | | Load_Top At_Offset_2 02f8 480e |H | Short_Literal 0xe 02f9 e604 | | Load 0x3,0x4 02fa 8232 | 2 | Call 0x1,0x32 02fb 820f | | Call 0x1,0xf 02fc 7810 |x | Jump 0x30d 02fd 4801 |H | Short_Literal 0x1 02fe 480d |H | Short_Literal 0xd 02ff e022 | " | Load 0x0,0x22 0300 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0301 00ea | | Load_Encached Null_String_Cache 0302 4800 |H | Short_Literal 0x0 0303 e7ff | | Load 0x3,-0x1 0304 e022 | " | Load 0x0,0x22 0305 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 0306 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0307 00ea | | Load_Encached Null_String_Cache 0308 e602 | | Load 0x3,0x2 0309 e01f | | Load 0x0,0x1f 030a 1b10 | | Execute Package,Field_Read,Field_Number 0x10 030b 180f | | Execute Package,Field_Execute,Field_Number 0xf 030c 820f | | Call 0x1,0xf 030d 4801 |H | Short_Literal 0x1 030e 480d |H | Short_Literal 0xd 030f e022 | " | Load 0x0,0x22 0310 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0311 e023 | # | Load 0x0,0x23 0312 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0313 4826 |H& | Short_Literal 0x26 0314 e7ff | | Load 0x3,-0x1 0315 e022 | " | Load 0x0,0x22 0316 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 0317 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0318 820f | | Call 0x1,0xf 0319 4801 |H | Short_Literal 0x1 031a 480d |H | Short_Literal 0xd 031b e022 | " | Load 0x0,0x22 031c 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 031d e023 | # | Load 0x0,0x23 031e 1b16 | | Execute Package,Field_Read,Field_Number 0x16 031f 4827 |H' | Short_Literal 0x27 0320 e7ff | | Load 0x3,-0x1 0321 e022 | " | Load 0x0,0x22 0322 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 0323 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0324 820f | | Call 0x1,0xf 0325 4802 |H | Short_Literal 0x2 0326 00db | | Load_Top At_Offset_3 0327 8409 | | Call 0x2,0x9 0328 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0329 0000 0000 | | .BLANK 0000[0x7] 0330 ; -------------------------------------------------------------------------------------- 0330 ; SUBPROGRAM 0330 ; -------------------------------------------------------------------------------------- 0330 0342 | B | .CONST 0x0342 ; Address of begin 0331 0004 | | .CONST 0x0004 ; Address of exception handler 0332 0005 | | .CONST 0x0005 ; Number of locals 0333 INIT_0330: 0333 00da | | Load_Top At_Offset_2 0334 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0335 e024 | $ | Load 0x0,0x24 0336 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0337 011e | | Execute Any,Convert 0338 482e |H. | Short_Literal 0x2e 0339 e022 | " | Load 0x0,0x22 033a 1b8d | | Execute Package,Field_Read,Field_Number 0x8d 033b 00da | | Load_Top At_Offset_2 033c e02d | - | Load 0x0,0x2d 033d 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 033e 029f 0403 | | Declare_Subprogram INIT_0400,For_Call 0340 029f 044b | K| Declare_Subprogram INIT_0448,For_Call 0342 BODY_0330: 0342 00da | | Load_Top At_Offset_2 0343 01db | | Execute Vector,Length 0344 6802 |h | Jump_Zero 0x347 0345 8604 | | Call 0x3,0x4 0346 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0347 8605 | | Call 0x3,0x5 0348 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0349 0000 0000 | | .BLANK 0000[0x7] 0350 ; -------------------------------------------------------------------------------------- 0350 ; SUBPROGRAM 0350 ; -------------------------------------------------------------------------------------- 0350 0369 | i | .CONST 0x0369 ; Address of begin 0351 0004 | | .CONST 0x0004 ; Address of exception handler 0352 0005 | | .CONST 0x0005 ; Number of locals 0353 INIT_0350: 0353 e020 | | Load 0x0,0x20 0354 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0355 02c7 | | Declare_Variable Any 0356 e7ff | | Load 0x3,-0x1 0357 e031 | 1 | Load 0x0,0x31 0358 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51 0359 a802 | | Store_Unchecked 0x4,0x2 035a e023 | # | Load 0x0,0x23 035b 1b15 | | Execute Package,Field_Read,Field_Number 0x15 035c 02ff | | Declare_Variable Variant_Record 035d 00d8 | | Load_Top At_Offset_0 035e 1c00 | | Execute_Immediate Run_Utility,0x0 035f e020 | | Load 0x0,0x20 0360 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0361 02c7 | | Declare_Variable Any 0362 00d8 | | Load_Top At_Offset_0 0363 1c00 | | Execute_Immediate Run_Utility,0x0 0364 e020 | | Load 0x0,0x20 0365 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0366 02c7 | | Declare_Variable Any 0367 00d8 | | Load_Top At_Offset_0 0368 1c00 | | Execute_Immediate Run_Utility,0x0 0369 BODY_0350: 0369 00cf | | Action Mark_Auxiliary 036a 7841 |xA | Jump 0x3ac 036b e802 | | Load 0x4,0x2 036c e020 | | Load 0x0,0x20 036d 1817 | | Execute Package,Field_Execute,Field_Number 0x17 036e c805 | | Store 0x4,0x5 036f 00d9 | | Load_Top At_Offset_1 0370 e031 | 1 | Load 0x0,0x31 0371 1853 | S | Execute Package,Field_Execute,Field_Number 0x53 0372 4603 |F | Jump_Case 0x4 0373 780d |x | Jump 0x381 ; case 0x0 0374 7802 |x | Jump 0x377 ; case 0x1 0375 7806 |x | Jump 0x37c ; case 0x2 0376 780a |x | Jump 0x381 ; case 0x3 0377 00d9 | | Load_Top At_Offset_1 0378 e026 | & | Load 0x0,0x26 0379 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 037a c804 | | Store 0x4,0x4 037b 7805 |x | Jump 0x381 037c e7fe | | Load 0x3,-0x2 037d 00da | | Load_Top At_Offset_2 037e 840a | | Call 0x2,0xa 037f 00cc | | Action Pop_Block 0380 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0381 00cf | | Action Mark_Auxiliary 0382 780a |x | Jump 0x38d 0383 e7fe | | Load 0x3,-0x2 0384 e804 | | Load 0x4,0x4 0385 e020 | | Load 0x0,0x20 0386 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0387 8408 | | Call 0x2,0x8 0388 00db | | Load_Top At_Offset_3 0389 e020 | | Load 0x0,0x20 038a 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 038b c804 | | Store 0x4,0x4 038c 00c9 | | Action Pop_Auxiliary_Loop 038d 00db | | Load_Top At_Offset_3 038e e020 | | Load 0x0,0x20 038f 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0390 6ff2 |o | Jump_Zero 0x383 0391 00ce | | Action Pop_Auxiliary 0392 e403 | | Load 0x2,0x3 0393 e404 | | Load 0x2,0x4 0394 e405 | | Load 0x2,0x5 0395 00e1 | | Load_Encached Boolean_Cache 0396 e802 | | Load 0x4,0x2 0397 e020 | | Load 0x0,0x20 0398 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0399 822e | . | Call 0x1,0x2e 039a c406 | | Store 0x2,0x6 039b c405 | | Store 0x2,0x5 039c c404 | | Store 0x2,0x4 039d c403 | | Store 0x2,0x3 039e e7fe | | Load 0x3,-0x2 039f 0a01 | | Execute_Immediate Plus,0x1 03a0 00d8 | | Load_Top At_Offset_0 03a1 00e3 | | Load_Encached Natural_Cache 03a2 0260 | ` | Execute Discrete,In_Type 03a3 7001 |p | Jump_Nonzero 0x3a5 03a4 0801 | | Execute_Immediate Raise,0x1 03a5 e404 | | Load 0x2,0x4 03a6 8409 | | Call 0x2,0x9 03a7 e802 | | Load 0x4,0x2 03a8 e020 | | Load 0x0,0x20 03a9 1815 | | Execute Package,Field_Execute,Field_Number 0x15 03aa c802 | | Store 0x4,0x2 03ab 00c9 | | Action Pop_Auxiliary_Loop 03ac e802 | | Load 0x4,0x2 03ad e020 | | Load 0x0,0x20 03ae 1816 | | Execute Package,Field_Execute,Field_Number 0x16 03af 6fbb |o | Jump_Zero 0x36b 03b0 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03b1 0000 0000 | | .BLANK 0000[0x7] 03b8 ; -------------------------------------------------------------------------------------- 03b8 ; SUBPROGRAM 03b8 ; -------------------------------------------------------------------------------------- 03b8 03c2 | | .CONST 0x03c2 ; Address of begin 03b9 0004 | | .CONST 0x0004 ; Address of exception handler 03ba 0002 | | .CONST 0x0002 ; Number of locals 03bb INIT_03b8: 03bb e020 | | Load 0x0,0x20 03bc 1b13 | | Execute Package,Field_Read,Field_Number 0x13 03bd 02c7 | | Declare_Variable Any 03be e606 | | Load 0x3,0x6 03bf e031 | 1 | Load 0x0,0x31 03c0 1857 | W | Execute Package,Field_Execute,Field_Number 0x57 03c1 a802 | | Store_Unchecked 0x4,0x2 03c2 BODY_03b8: 03c2 00cf | | Action Mark_Auxiliary 03c3 7831 |x1 | Jump 0x3f5 03c4 00d9 | | Load_Top At_Offset_1 03c5 e020 | | Load 0x0,0x20 03c6 1817 | | Execute Package,Field_Execute,Field_Number 0x17 03c7 c603 | | Store 0x3,0x3 03c8 e603 | | Load 0x3,0x3 03c9 e026 | & | Load 0x0,0x26 03ca 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 03cb c602 | | Store 0x3,0x2 03cc 00cf | | Action Mark_Auxiliary 03cd 780a |x | Jump 0x3d8 03ce e7fe | | Load 0x3,-0x2 03cf e602 | | Load 0x3,0x2 03d0 e020 | | Load 0x0,0x20 03d1 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 03d2 8408 | | Call 0x2,0x8 03d3 e602 | | Load 0x3,0x2 03d4 e020 | | Load 0x0,0x20 03d5 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 03d6 c602 | | Store 0x3,0x2 03d7 00c9 | | Action Pop_Auxiliary_Loop 03d8 e602 | | Load 0x3,0x2 03d9 e020 | | Load 0x0,0x20 03da 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 03db 6ff2 |o | Jump_Zero 0x3ce 03dc 00ce | | Action Pop_Auxiliary 03dd e403 | | Load 0x2,0x3 03de e404 | | Load 0x2,0x4 03df e405 | | Load 0x2,0x5 03e0 00e1 | | Load_Encached Boolean_Cache 03e1 e603 | | Load 0x3,0x3 03e2 822e | . | Call 0x1,0x2e 03e3 c406 | | Store 0x2,0x6 03e4 c405 | | Store 0x2,0x5 03e5 c404 | | Store 0x2,0x4 03e6 c403 | | Store 0x2,0x3 03e7 e7fe | | Load 0x3,-0x2 03e8 0a01 | | Execute_Immediate Plus,0x1 03e9 00d8 | | Load_Top At_Offset_0 03ea 00e3 | | Load_Encached Natural_Cache 03eb 0260 | ` | Execute Discrete,In_Type 03ec 7001 |p | Jump_Nonzero 0x3ee 03ed 0801 | | Execute_Immediate Raise,0x1 03ee e404 | | Load 0x2,0x4 03ef 8409 | | Call 0x2,0x9 03f0 00d9 | | Load_Top At_Offset_1 03f1 e020 | | Load 0x0,0x20 03f2 1815 | | Execute Package,Field_Execute,Field_Number 0x15 03f3 c802 | | Store 0x4,0x2 03f4 00c9 | | Action Pop_Auxiliary_Loop 03f5 00d9 | | Load_Top At_Offset_1 03f6 e020 | | Load 0x0,0x20 03f7 1816 | | Execute Package,Field_Execute,Field_Number 0x16 03f8 6fcb |o | Jump_Zero 0x3c4 03f9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03fa 0000 0000 | | .BLANK 0000[0x6] 0400 ; -------------------------------------------------------------------------------------- 0400 ; SUBPROGRAM 0400 ; -------------------------------------------------------------------------------------- 0400 0403 | | .CONST 0x0403 ; Address of begin 0401 0004 | | .CONST 0x0004 ; Address of exception handler 0402 0001 | | .CONST 0x0001 ; Number of locals 0403 BODY_0400: 0403 INIT_0400: 0403 e402 | | Load 0x2,0x2 0404 6803 |h | Jump_Zero 0x408 0405 8407 | | Call 0x2,0x7 0406 4800 |H | Short_Literal 0x0 0407 a402 | | Store_Unchecked 0x2,0x2 0408 4801 |H | Short_Literal 0x1 0409 480c |H | Short_Literal 0xc 040a e022 | " | Load 0x0,0x22 040b 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 040c 00ea | | Load_Encached Null_String_Cache 040d 4800 |H | Short_Literal 0x0 040e e602 | | Load 0x3,0x2 040f e022 | " | Load 0x0,0x22 0410 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 0411 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0412 4801 |H | Short_Literal 0x1 0413 e602 | | Load 0x3,0x2 0414 e022 | " | Load 0x0,0x22 0415 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 0416 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0417 820f | | Call 0x1,0xf 0418 4801 |H | Short_Literal 0x1 0419 480c |H | Short_Literal 0xc 041a e022 | " | Load 0x0,0x22 041b 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 041c 00ea | | Load_Encached Null_String_Cache 041d 4804 |H | Short_Literal 0x4 041e e602 | | Load 0x3,0x2 041f e022 | " | Load 0x0,0x22 0420 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 0421 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0422 4804 |H | Short_Literal 0x4 0423 e602 | | Load 0x3,0x2 0424 e022 | " | Load 0x0,0x22 0425 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 0426 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0427 820f | | Call 0x1,0xf 0428 00cf | | Action Mark_Auxiliary 0429 4805 |H | Short_Literal 0x5 042a 4801 |H | Short_Literal 0x1 042b 0007 | | Action Break_Optional 042c 4801 |H | Short_Literal 0x1 042d 480d |H | Short_Literal 0xd 042e e022 | " | Load 0x0,0x22 042f 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0430 e023 | # | Load 0x0,0x23 0431 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0432 00ea | | Load_Encached Null_String_Cache 0433 820f | | Call 0x1,0xf 0434 00c8 | | Action Pop_Auxiliary_Range 0435 3ff6 |? | Loop_Increasing 0x42c 0436 00c9 | | Action Pop_Auxiliary_Loop 0437 e603 | | Load 0x3,0x3 0438 01d9 | | Execute Vector,Reverse_Bounds 0439 0263 | c | Execute Discrete,Above_Bound 043a 7006 |p | Jump_Nonzero 0x441 043b 00d8 | | Load_Top At_Offset_0 043c e603 | | Load 0x3,0x3 043d 01d7 | | Execute Vector,Field_Read 043e 840b | | Call 0x2,0xb 043f 00c8 | | Action Pop_Auxiliary_Range 0440 3ffa |? | Loop_Increasing 0x43b 0441 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0442 0000 0000 | | .BLANK 0000[0x6] 0448 ; -------------------------------------------------------------------------------------- 0448 ; SUBPROGRAM 0448 ; -------------------------------------------------------------------------------------- 0448 045e | ^ | .CONST 0x045e ; Address of begin 0449 0004 | | .CONST 0x0004 ; Address of exception handler 044a 0005 | | .CONST 0x0005 ; Number of locals 044b INIT_0448: 044b e020 | | Load 0x0,0x20 044c 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 044d 02c7 | | Declare_Variable Any 044e e602 | | Load 0x3,0x2 044f e024 | $ | Load 0x0,0x24 0450 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 0451 e026 | & | Load 0x0,0x26 0452 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0453 a802 | | Store_Unchecked 0x4,0x2 0454 00d8 | | Load_Top At_Offset_0 0455 e026 | & | Load 0x0,0x26 0456 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0457 e026 | & | Load 0x0,0x26 0458 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0459 03f1 | | Declare_Variable Discrete,With_Value 045a 029f 0473 | s| Declare_Subprogram INIT_0470,For_Call 045c 029f 0483 | | Declare_Subprogram INIT_0480,For_Call 045e BODY_0448: 045e 00da | | Load_Top At_Offset_2 045f 0f05 | | Execute_Immediate Equal,0x5 0460 6803 |h | Jump_Zero 0x464 0461 8604 | | Call 0x3,0x4 0462 8804 | | Call 0x4,0x4 0463 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0464 00da | | Load_Top At_Offset_2 0465 7002 |p | Jump_Nonzero 0x468 0466 8604 | | Call 0x3,0x4 0467 8805 | | Call 0x4,0x5 0468 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0469 0000 0000 | | .BLANK 0000[0x7] 0470 ; -------------------------------------------------------------------------------------- 0470 ; SUBPROGRAM 0470 ; -------------------------------------------------------------------------------------- 0470 047a | z | .CONST 0x047a ; Address of begin 0471 0004 | | .CONST 0x0004 ; Address of exception handler 0472 0002 | | .CONST 0x0002 ; Number of locals 0473 INIT_0470: 0473 e026 | & | Load 0x0,0x26 0474 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0475 02c7 | | Declare_Variable Any 0476 e802 | | Load 0x4,0x2 0477 e026 | & | Load 0x0,0x26 0478 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 0479 aa02 | | Store_Unchecked 0x5,0x2 047a BODY_0470: 047a 4801 |H | Short_Literal 0x1 047b 00d9 | | Load_Top At_Offset_1 047c 8409 | | Call 0x2,0x9 047d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 047e 0000 0000 | | .XXX[0x2] 0480 ; -------------------------------------------------------------------------------------- 0480 ; SUBPROGRAM 0480 ; -------------------------------------------------------------------------------------- 0480 0493 | | .CONST 0x0493 ; Address of begin 0481 0004 | | .CONST 0x0004 ; Address of exception handler 0482 0005 | | .CONST 0x0005 ; Number of locals 0483 INIT_0480: 0483 00e1 | | Load_Encached Boolean_Cache 0484 e020 | | Load 0x0,0x20 0485 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0486 02c7 | | Declare_Variable Any 0487 00d8 | | Load_Top At_Offset_0 0488 1c00 | | Execute_Immediate Run_Utility,0x0 0489 e020 | | Load 0x0,0x20 048a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 048b 02c7 | | Declare_Variable Any 048c 00d8 | | Load_Top At_Offset_0 048d 1c00 | | Execute_Immediate Run_Utility,0x0 048e e020 | | Load 0x0,0x20 048f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0490 02c7 | | Declare_Variable Any 0491 00d8 | | Load_Top At_Offset_0 0492 1c00 | | Execute_Immediate Run_Utility,0x0 0493 BODY_0480: 0493 00d8 | | Load_Top At_Offset_0 0494 00da | | Load_Top At_Offset_2 0495 ea03 | | Load 0x5,0x3 0496 00e1 | | Load_Encached Boolean_Cache 0497 e802 | | Load 0x4,0x2 0498 822e | . | Call 0x1,0x2e 0499 ca02 | | Store 0x5,0x2 049a ca03 | | Store 0x5,0x3 049b ca04 | | Store 0x5,0x4 049c ca05 | | Store 0x5,0x5 049d 4801 |H | Short_Literal 0x1 049e 00da | | Load_Top At_Offset_2 049f 8409 | | Call 0x2,0x9 04a0 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04a1 ; -------------------------------------------------------------------------------------- 04a1 ; STRING TABLE 04a1 ; -------------------------------------------------------------------------------------- 04a1 0010 | | .STRTAB 0x0010->0x04a9 ; "Name/\x0aDescription" 04a2 001f | | .STRTAB 0x001f->0x04b1 ; "Unique\x0aIdentifier" 04a3 002e | . | .STRTAB 0x002e->0x04ba ; "Units of\x0aMeasure" 04a4 003c | < | .STRTAB 0x003c->0x04c2 ; "Limit/\x0aRange" 04a5 0046 | F | .STRTAB 0x0046->0x04c8 ; "Accuracy/\x0aPrecision" 04a6 0057 | W | .STRTAB 0x0057->0x04d1 ; "Source\x0aCapability" 04a7 0066 | f | .STRTAB 0x0066->0x04da ; "Destination\x0aCapability" 04a8 007a | z | .STREND 0x007a->0x04e5 04a9 4e61 6d65 |Name| .STRTAB_STRINGS 04e5 0000 0000 | | .XXX[0x3] 04e7 0000 | | 04e8 ; -------------------------------------------------------------------------------------- 04e8 ; Debug Table 04e8 ; -------------------------------------------------------------------------------------- 04e8 0004 0012 | | .DEBUG4 0x0004,0x0012,0xfc92,0x0000,0x0001,0x0000 04ee 8e02 3a89 | : | .XXX[0x112] 04f0 4a38 049b |J8 | 04f2 01c9 803c | <| 04f4 c002 69a4 | i | 04f6 fc40 3be2 | @; | 04f8 dff4 0054 | T| 04fa e025 b014 | % | 04fc 8908 f800 | | 04fe 38f0 cf73 |8 s| 0500 6d1b 2f98 |m / | 0502 d942 14ba | B | 0504 df03 9a0a | | 0506 51be 9e90 |Q | 0508 aef1 56e9 | V | 050a 0f76 94ec | v | 050c 19c2 ebb8 | | 050e 007d c0e6 | } | 0510 1601 8b02 | | 0512 a94f 5234 | OR4| 0514 049f 01c9 | | 0516 8007 e185 | | 0518 f100 1ec3 | | 051a aaca 0435 | 5| 051c 6e2a a280 |n* | 051e d849 17b8 | I | 0520 31c3 a878 |1 x| 0522 ca82 68f0 | h | 0524 803b 2151 | ;!Q| 0526 b052 2845 | R(E| 0528 6d48 369c |mH6 | 052a 081f 18b7 | | 052c 000f b001 | | 052e 602f 62e6 |`/b | 0530 d5b2 bbd3 | | 0532 9376 b55c | v \| 0534 2454 7280 |$Tr | 0536 2d92 e42e |- .| 0538 5409 8379 |T y| 053a 0a38 0300 | 8 | 053c 14c3 9699 | | 053e 0eb7 a2cd | | 0540 24f4 0853 |$ S| 0542 588d 6a23 |X j#| 0544 97f8 0d68 | h| 0546 b827 e73d | ' =| 0548 c6e6 b306 | | 054a 5c2c 1a12 |\, | 054c e724 bbaf | $ | 054e 582a 5001 |X*P | 0550 98ba 6aaf | j | 0552 9928 92fb | ( | 0554 b958 079c | X | 0556 49fe 7d94 |I } | 0558 8885 6ac8 | j | 055a 05de bb4a | J| 055c 9f9e 9a59 | Y| 055e f5ba 4c6b | Lk| 0560 a03a e851 | : Q| 0562 8ebb ed54 | T| 0564 82ea 8001 | | 0566 09e4 2ea2 | . | 0568 ee38 ba93 | 8 | 056a 6faf 8803 |o | 056c 6042 c3ec |`B | 056e 5d72 ea67 |]r g| 0570 ba9b 2eeb | . | 0572 a407 6772 | gr| 0574 f08f a98a | | 0576 5297 b95d |R ]| 0578 c7aa 8809 | | 057a f202 ab2f | /| 057c aaea eac1 | | 057e b8df c434 | 4| 0580 a2e4 1a52 | R| 0582 b66c 0d42 | l B| 0584 5ca6 94ee |\ | 0586 0543 9803 | C | 0588 1dba bdec | | 058a 0f02 40c8 | @ | 058c be3c 87b0 | < | 058e 4aef 1b69 |J i| 0590 d343 c3c8 | C | 0592 620d 296b |b )k| 0594 1d8c d2ed | | 0596 7f16 cf2c | ,| 0598 2d12 ef4c |- L| 059a b89d c3fd | | 059c 340a 3816 |4 8 | 059e db2e a9aa | . | 05a0 ec33 03f3 | 3 | 05a2 47b6 080c |G | 05a4 9547 4bad | GK | 05a6 6242 ec8c |bB | 05a8 43bc 043e |C >| 05aa a00e cd99 | | 05ac 62af af88 |b | 05ae 00c3 92ef | | 05b0 6eb6 f292 |n | 05b2 8316 f12f | /| 05b4 c35a efdc | Z | 05b6 ba6c 8b94 | l | 05b8 4a1f a440 |J @| 05ba 5080 1ec1 |P | 05bc ddc0 0077 | w| 05be c3be c804 | | 05c0 05bc 9e44 | D| 05c2 4fb0 0ea3 |O | 05c4 0392 2c31 | ,1| 05c6 32fb 4303 |2 C | 05c8 902c 3932 | ,92| 05ca f9ed 8906 | | 05cc 0039 32fa | 92 | 05ce 7dbd 0600 |} | 05d0 3532 fa43 |52 C| 05d2 0392 2c26 | ,&| 05d4 02fa 4fbd | O | 05d6 f6e8 3e12 | > | 05d8 f977 2b92 | w+ | 05da 2c2f f290 |,/ | 05dc 1900 3340 | 3@| 05de 1132 1963 | 2 c| 05e0 0416 0032 | 2| 05e2 423e 714d |B>qM| 05e4 3042 78d0 |0Bx | 05e6 0300 6872 | hr| 05e8 4191 4a3f |A J?| 05ea d870 a8c4 | p | 05ec 1ad2 0e81 | | 05ee 0284 182b | +| 05f0 a0a1 f201 | | 05f2 df5b b7c4 | [ | 05f4 0220 019f | | 05f6 d069 c448 | i H| 05f8 0b02 2d5c | -\| 05fa d7a8 ab34 | 4| 05fc bde6 05fe | | 05fe 485f 25bf |H_% |