|
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_0694fc
└─⟦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 0580 | | .CONST 0x0580 ; 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 00e5 | | .CONST 0x00e5 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 003b | ; | .CONST 0x003b ; Number of locals 000b INIT_0008: 000b 00e3 | | Load_Encached Natural_Cache 000c 0129 | ) | Execute Any,Make_Visible 000d 00e9 | | Load_Encached String_Cache 000e 0129 | ) | Execute Any,Make_Visible 000f 00e9 | | Load_Encached String_Cache 0010 02a0 | | Declare_Subprogram Null_Subprogram 0011 4818 |H | Short_Literal 0x18 0012 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected 0013 00c4 | | Action Make_Default 0014 00c4 | | Action Make_Default 0015 00c4 | | Action Make_Default 0016 00c4 | | Action Make_Default 0017 00c4 | | Action Make_Default 0018 00c4 | | Action Make_Default 0019 00c4 | | Action Make_Default 001a 00c4 | | Action Make_Default 001b 00c4 | | Action Make_Default 001c 00c4 | | Action Make_Default 001d 00c4 | | Action Make_Default 001e 00c4 | | Action Make_Default 001f 00c4 | | Action Make_Default 0020 00c4 | | Action Make_Default 0021 00c4 | | Action Make_Default 0022 00c4 | | Action Make_Default 0023 00c4 | | Action Make_Default 0024 00c4 | | Action Make_Default 0025 00c4 | | Action Make_Default 0026 00c4 | | Action Make_Default 0027 00c4 | | Action Make_Default 0028 00c4 | | Action Make_Default 0029 00c4 | | Action Make_Default 002a 00c4 | | Action Make_Default 002b 00c4 | | Action Make_Default 002c 00c4 | | Action Make_Default 002d 00c4 | | Action Make_Default 002e 00c4 | | Action Make_Default 002f 00c4 | | Action Make_Default 0030 00c4 | | Action Make_Default 0031 00c4 | | Action Make_Default 0032 00c4 | | Action Make_Default 0033 00c4 | | Action Make_Default 0034 00c4 | | Action Make_Default 0035 00c4 | | Action Make_Default 0036 e001 | | Load 0x0,0x1 0037 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0038 0129 | ) | Execute Any,Make_Visible 0039 c225 | % | Store 0x1,0x25 003a 4800 |H | Short_Literal 0x0 003b 4815 |H | Short_Literal 0x15 003c 029f 00eb | | Declare_Subprogram INIT_00e8,For_Call 003e 03fe | | Declare_Type Discrete,Defined,Visible 003f c231 | 1 | Store 0x1,0x31 0040 4800 |H | Short_Literal 0x0 0041 4805 |H | Short_Literal 0x5 0042 029f 0113 | | Declare_Subprogram INIT_0110,For_Call 0044 03fe | | Declare_Type Discrete,Defined,Visible 0045 c232 | 2 | Store 0x1,0x32 0046 4818 |H | Short_Literal 0x18 0047 03cd | | Declare_Type Access,Incomplete,Visible,Accesses_Protected 0048 c212 | | Store 0x1,0x12 0049 4800 |H | Short_Literal 0x0 004a 4803 |H | Short_Literal 0x3 004b 00e3 | | Load_Encached Natural_Cache 004c 03f9 | | Declare_Type Discrete,Constrained,Visible 004d c213 | | Store 0x1,0x13 004e 4801 |H | Short_Literal 0x1 004f 4803 |H | Short_Literal 0x3 0050 e20f | | Load 0x1,0xf 0051 02a0 | | Declare_Subprogram Null_Subprogram 0052 4801 |H | Short_Literal 0x1 0053 035e | ^ | Declare_Type Array,Defined,Visible 0054 c214 | | Store 0x1,0x14 0055 e002 | | Load 0x0,0x2 0056 0129 | ) | Execute Any,Make_Visible 0057 c229 | ) | Store 0x1,0x29 0058 e003 | | Load 0x0,0x3 0059 0129 | ) | Execute Any,Make_Visible 005a c22a | * | Store 0x1,0x2a 005b e004 | | Load 0x0,0x4 005c 0129 | ) | Execute Any,Make_Visible 005d c22b | + | Store 0x1,0x2b 005e 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated 0060 c220 | | Store 0x1,0x20 0061 029a 0183 | | Declare_Subprogram INIT_0180,For_Outer_Call,Visible,Unelaborated 0063 c22c | , | Store 0x1,0x2c 0064 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated 0066 c22e | . | Store 0x1,0x2e 0067 029a 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call,Visible,Unelaborated 0069 c230 | 0 | Store 0x1,0x30 006a 029a 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call,Visible,Unelaborated 006c c228 | ( | Store 0x1,0x28 006d 029a 028b | | Declare_Subprogram INIT_0288,For_Outer_Call,Visible,Unelaborated 006f c22f | / | Store 0x1,0x2f 0070 029a 029b | | Declare_Subprogram INIT_0298,For_Outer_Call,Visible,Unelaborated 0072 c21e | | Store 0x1,0x1e 0073 029a 02b3 | | Declare_Subprogram INIT_02b0,For_Outer_Call,Visible,Unelaborated 0075 c21f | | Store 0x1,0x1f 0076 029a 0363 | c| Declare_Subprogram INIT_0360,For_Outer_Call,Visible,Unelaborated 0078 c222 | " | Store 0x1,0x22 0079 029a 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call,Visible,Unelaborated 007b c223 | # | Store 0x1,0x23 007c 4809 |H | Short_Literal 0x9 007d 032a | * | Declare_Type Record,Incomplete 007e c21c | | Store 0x1,0x1c 007f e21c | | Load 0x1,0x1c 0080 02a0 | | Declare_Subprogram Null_Subprogram 0081 e212 | | Load 0x1,0x12 0082 03c7 | | Complete_Type Access,By_Defining 0083 00bf | | Action Accept_Activation 0084 00e3 | | Load_Encached Natural_Cache 0085 e225 | % | Load 0x1,0x25 0086 00e1 | | Load_Encached Boolean_Cache 0087 e20f | | Load 0x1,0xf 0088 00d8 | | Load_Top At_Offset_0 0089 e20f | | Load 0x1,0xf 008a e231 | 1 | Load 0x1,0x31 008b e20d | | Load 0x1,0xd 008c 00d8 | | Load_Top At_Offset_0 008d e001 | | Load 0x0,0x1 008e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 008f 029f 0373 | s| Declare_Subprogram INIT_0370,For_Call 0091 4809 |H | Short_Literal 0x9 0092 032d | - | Declare_Type Record,Defined 0093 00da | | Load_Top At_Offset_2 0094 00da | | Load_Top At_Offset_2 0095 00db | | Load_Top At_Offset_3 0096 02a0 | | Declare_Subprogram Null_Subprogram 0097 4803 |H | Short_Literal 0x3 0098 032d | - | Declare_Type Record,Defined 0099 e005 | | Load 0x0,0x5 009a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 009b 00db | | Load_Top At_Offset_3 009c 029f 039b | | Declare_Subprogram INIT_0398,For_Call 009e 4802 |H | Short_Literal 0x2 009f 032d | - | Declare_Type Record,Defined 00a0 e001 | | Load 0x0,0x1 00a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00a2 02c7 | | Declare_Variable Any 00a3 e006 | | Load 0x0,0x6 00a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00a5 180e | | Execute Package,Field_Execute,Field_Number 0xe 00a6 a237 | 7 | Store_Unchecked 0x1,0x37 00a7 e007 | | Load 0x0,0x7 00a8 e008 | | Load 0x0,0x8 00a9 49f4 |I | Short_Literal 0x1f4 00aa e236 | 6 | Load 0x1,0x36 00ab 4800 |H | Short_Literal 0x0 00ac e009 | | Load 0x0,0x9 00ad 0387 | | Declare_Variable Package 00ae 00d8 | | Load_Top At_Offset_0 00af 020f | | Execute Module,Activate 00b0 e00a | | Load 0x0,0xa 00b1 e00b | | Load 0x0,0xb 00b2 e234 | 4 | Load 0x1,0x34 00b3 e00c | | Load 0x0,0xc 00b4 0387 | | Declare_Variable Package 00b5 00d8 | | Load_Top At_Offset_0 00b6 020f | | Execute Module,Activate 00b7 e00d | | Load 0x0,0xd 00b8 e00e | | Load 0x0,0xe 00b9 e235 | 5 | Load 0x1,0x35 00ba e00c | | Load 0x0,0xc 00bb 0387 | | Declare_Variable Package 00bc 00d8 | | Load_Top At_Offset_0 00bd 020f | | Execute Module,Activate 00be e20f | | Load 0x1,0xf 00bf 00d8 | | Load_Top At_Offset_0 00c0 e20f | | Load 0x1,0xf 00c1 e238 | 8 | Load 0x1,0x38 00c2 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00c3 e239 | 9 | Load 0x1,0x39 00c4 1b10 | | Execute Package,Field_Read,Field_Number 0x10 00c5 e23a | : | Load 0x1,0x3a 00c6 1b10 | | Execute Package,Field_Read,Field_Number 0x10 00c7 e005 | | Load 0x0,0x5 00c8 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00c9 00e3 | | Load_Encached Natural_Cache 00ca 00e3 | | Load_Encached Natural_Cache 00cb 029f 03b3 | | Declare_Subprogram INIT_03b0,For_Call 00cd e21c | | Load 0x1,0x1c 00ce 0326 | & | Complete_Type Record,By_Defining 00cf 029d 03d3 | | Declare_Subprogram INIT_03d0,For_Outer_Call 00d1 1d20 | | Execute_Immediate Reference_Lex_1,0x20 00d2 00c7 | | Action Elaborate_Subprogram 00d3 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c 00d4 00c7 | | Action Elaborate_Subprogram 00d5 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30 00d6 00c7 | | Action Elaborate_Subprogram 00d7 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 00d8 00c7 | | Action Elaborate_Subprogram 00d9 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 00da 00c7 | | Action Elaborate_Subprogram 00db 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 00dc 00c7 | | Action Elaborate_Subprogram 00dd 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 00de 00c7 | | Action Elaborate_Subprogram 00df 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 00e0 00c7 | | Action Elaborate_Subprogram 00e1 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 00e2 00c7 | | Action Elaborate_Subprogram 00e3 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 00e4 00c7 | | Action Elaborate_Subprogram 00e5 BODY_0008: 00e5 00bc | | Action Signal_Activated 00e6 00bb | | Action Signal_Completion 00e7 0000 | | .XXX[0x1] 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; SUBPROGRAM 00e8 ; -------------------------------------------------------------------------------------- 00e8 00eb | | .CONST 0x00eb ; Address of begin 00e9 0004 | | .CONST 0x0004 ; Address of exception handler 00ea 0001 | | .CONST 0x0001 ; Number of locals 00eb BODY_00e8: 00eb INIT_00e8: 00eb 4607 |F | Jump_Case 0x8 00ec 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 00ed 7806 |x | Jump 0xf4 ; case 0x1 00ee 7809 |x | Jump 0xf8 ; case 0x2 00ef 780d |x | Jump 0xfd ; case 0x3 00f0 7810 |x | Jump 0x101 ; case 0x4 00f1 7811 |x | Jump 0x103 ; case 0x5 00f2 7812 |x | Jump 0x105 ; case 0x6 00f3 7815 |x | Jump 0x109 ; case 0x7 00f4 00da | | Load_Top At_Offset_2 00f5 0091 04bd | | Action Push_String_Extended_Indexed,0x4bd ; "UNDEFINED" 00f7 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00f8 00db | | Load_Top At_Offset_3 00f9 00db | | Load_Top At_Offset_3 00fa 00e0 | | Load_Encached Standard_Cache 00fb 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00fc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00fd 00da | | Load_Top At_Offset_2 00fe 00e0 | | Load_Encached Standard_Cache 00ff 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0100 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0101 00db | | Load_Top At_Offset_3 0102 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0103 00db | | Load_Top At_Offset_3 0104 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0105 e231 | 1 | Load 0x1,0x31 0106 00dc | | Load_Top At_Offset_4 0107 0267 | g | Execute Discrete,Predecessor 0108 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0109 e231 | 1 | Load 0x1,0x31 010a 00dc | | Load_Top At_Offset_4 010b 0268 | h | Execute Discrete,Successor 010c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 010d 0000 0000 | | .XXX[0x3] 010f 0000 | | 0110 ; -------------------------------------------------------------------------------------- 0110 ; SUBPROGRAM 0110 ; -------------------------------------------------------------------------------------- 0110 0113 | | .CONST 0x0113 ; Address of begin 0111 0004 | | .CONST 0x0004 ; Address of exception handler 0112 0001 | | .CONST 0x0001 ; Number of locals 0113 BODY_0110: 0113 INIT_0110: 0113 4607 |F | Jump_Case 0x8 0114 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0115 7806 |x | Jump 0x11c ; case 0x1 0116 7809 |x | Jump 0x120 ; case 0x2 0117 780d |x | Jump 0x125 ; case 0x3 0118 7810 |x | Jump 0x129 ; case 0x4 0119 7811 |x | Jump 0x12b ; case 0x5 011a 7812 |x | Jump 0x12d ; case 0x6 011b 7815 |x | Jump 0x131 ; case 0x7 011c 00da | | Load_Top At_Offset_2 011d 0091 04d3 | | Action Push_String_Extended_Indexed,0x4d3 ; "UNDEFINED" 011f 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0120 00db | | Load_Top At_Offset_3 0121 00db | | Load_Top At_Offset_3 0122 00e0 | | Load_Encached Standard_Cache 0123 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0124 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0125 00da | | Load_Top At_Offset_2 0126 00e0 | | Load_Encached Standard_Cache 0127 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0128 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0129 00db | | Load_Top At_Offset_3 012a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 012b 00db | | Load_Top At_Offset_3 012c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 012d e232 | 2 | Load 0x1,0x32 012e 00dc | | Load_Top At_Offset_4 012f 0267 | g | Execute Discrete,Predecessor 0130 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0131 e232 | 2 | Load 0x1,0x32 0132 00dc | | Load_Top At_Offset_4 0133 0268 | h | Execute Discrete,Successor 0134 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0135 0000 0000 | | .XXX[0x3] 0137 0000 | | 0138 ; -------------------------------------------------------------------------------------- 0138 ; SUBPROGRAM 0138 ; -------------------------------------------------------------------------------------- 0138 013b | ; | .CONST 0x013b ; Address of begin 0139 0004 | | .CONST 0x0004 ; Address of exception handler 013a 0001 | | .CONST 0x0001 ; Number of locals 013b BODY_0138: 013b INIT_0138: 013b e00f | | Load 0x0,0xf 013c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 013d e212 | | Load 0x1,0x12 013e 03bc | | Declare_Variable Access,By_Allocation 013f 00d8 | | Load_Top At_Offset_0 0140 0227 | ' | Execute Access,All_Reference 0141 1c00 | | Execute_Immediate Run_Utility,0x0 0142 a5fc | | Store_Unchecked 0x2,-0x4 0143 00da | | Load_Top At_Offset_2 0144 e20f | | Load 0x1,0xf 0145 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0146 e5fc | | Load 0x2,-0x4 0147 0227 | ' | Execute Access,All_Reference 0148 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0149 00db | | Load_Top At_Offset_3 014a e20f | | Load 0x1,0xf 014b 03b6 | | Declare_Variable Access,By_Allocation,With_Value 014c e5fc | | Load 0x2,-0x4 014d 0227 | ' | Execute Access,All_Reference 014e 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 014f e5fd | | Load 0x2,-0x3 0150 e20f | | Load 0x1,0xf 0151 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0152 e5fc | | Load 0x2,-0x4 0153 0227 | ' | Execute Access,All_Reference 0154 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0155 4800 |H | Short_Literal 0x0 0156 e5fc | | Load 0x2,-0x4 0157 0227 | ' | Execute Access,All_Reference 0158 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0159 4800 |H | Short_Literal 0x0 015a e5fc | | Load 0x2,-0x4 015b 0227 | ' | Execute Access,All_Reference 015c 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 015d 487f |H | Short_Literal 0x7f 015e e005 | | Load 0x0,0x5 015f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0160 e5fc | | Load 0x2,-0x4 0161 0227 | ' | Execute Access,All_Reference 0162 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0163 e5fc | | Load 0x2,-0x4 0164 0229 | ) | Execute Access,All_Read 0165 e238 | 8 | Load 0x1,0x38 0166 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0167 e238 | 8 | Load 0x1,0x38 0168 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0169 00d9 | | Load_Top At_Offset_1 016a 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 016b 00d1 | | Pop_Control Pop_Count_1 016c e5fc | | Load 0x2,-0x4 016d 0229 | ) | Execute Access,All_Read 016e 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 016f 00d8 | | Load_Top At_Offset_0 0170 e239 | 9 | Load 0x1,0x39 0171 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0172 00d2 | | Pop_Control Pop_Count_2 0173 e5fc | | Load 0x2,-0x4 0174 0229 | ) | Execute Access,All_Read 0175 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0176 00d8 | | Load_Top At_Offset_0 0177 e23a | : | Load 0x1,0x3a 0178 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0179 4504 |E | Exit_Suprogram New_Top_Offset 0x4 017a 0000 0000 | | .BLANK 0000[0x6] 0180 ; -------------------------------------------------------------------------------------- 0180 ; SUBPROGRAM 0180 ; -------------------------------------------------------------------------------------- 0180 0185 | | .CONST 0x0185 ; Address of begin 0181 0004 | | .CONST 0x0004 ; Address of exception handler 0182 0002 | | .CONST 0x0002 ; Number of locals 0183 INIT_0180: 0183 029f 03e3 | | Declare_Subprogram INIT_03e0,For_Call 0185 BODY_0180: 0185 00db | | Load_Top At_Offset_3 0186 0227 | ' | Execute Access,All_Reference 0187 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0188 0a01 | | Execute_Immediate Plus,0x1 0189 e5ff | | Load 0x2,-0x1 018a 0227 | ' | Execute Access,All_Reference 018b 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 018c 8402 | | Call 0x2,0x2 018d 00db | | Load_Top At_Offset_3 018e 0229 | ) | Execute Access,All_Read 018f 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0190 00d8 | | Load_Top At_Offset_0 0191 e234 | 4 | Load 0x1,0x34 0192 0322 | " | Declare_Variable Record 0193 e5fe | | Load 0x2,-0x2 0194 e234 | 4 | Load 0x1,0x34 0195 3000 |0 | Execute Record,Field_Type,Field_Number 0x0 0196 0119 | | Execute Any,Check_In_Formal_Type 0197 00d9 | | Load_Top At_Offset_1 0198 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0199 e5fb | | Load 0x2,-0x5 019a 00d9 | | Load_Top At_Offset_1 019b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 019c e5fd | | Load 0x2,-0x3 019d 00d9 | | Load_Top At_Offset_1 019e 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 019f 4801 |H | Short_Literal 0x1 01a0 e5fa | | Load 0x2,-0x6 01a1 01d7 | | Execute Vector,Field_Read 01a2 00d9 | | Load_Top At_Offset_1 01a3 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 01a4 4802 |H | Short_Literal 0x2 01a5 e5fa | | Load 0x2,-0x6 01a6 01d7 | | Execute Vector,Field_Read 01a7 00d9 | | Load_Top At_Offset_1 01a8 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 01a9 4803 |H | Short_Literal 0x3 01aa e5fa | | Load 0x2,-0x6 01ab 01d7 | | Execute Vector,Field_Read 01ac 00d9 | | Load_Top At_Offset_1 01ad 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 01ae e5f9 | | Load 0x2,-0x7 01af 00d9 | | Load_Top At_Offset_1 01b0 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 01b1 e5f8 | | Load 0x2,-0x8 01b2 00d9 | | Load_Top At_Offset_1 01b3 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 01b4 e5fc | | Load 0x2,-0x4 01b5 e234 | 4 | Load 0x1,0x34 01b6 3008 |0 | Execute Record,Field_Type,Field_Number 0x8 01b7 0119 | | Execute Any,Check_In_Formal_Type 01b8 00d9 | | Load_Top At_Offset_1 01b9 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 01ba e239 | 9 | Load 0x1,0x39 01bb 1815 | | Execute Package,Field_Execute,Field_Number 0x15 01bc 4509 |E | Exit_Suprogram New_Top_Offset 0x9 01bd 0000 0000 | | .XXX[0x3] 01bf 0000 | | 01c0 ; -------------------------------------------------------------------------------------- 01c0 ; SUBPROGRAM 01c0 ; -------------------------------------------------------------------------------------- 01c0 01d7 | | .CONST 0x01d7 ; Address of begin 01c1 0004 | | .CONST 0x0004 ; Address of exception handler 01c2 0006 | | .CONST 0x0006 ; Number of locals 01c3 INIT_01c0: 01c3 e005 | | Load 0x0,0x5 01c4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01c5 02c7 | | Declare_Variable Any 01c6 4801 |H | Short_Literal 0x1 01c7 e5ff | | Load 0x2,-0x1 01c8 0227 | ' | Execute Access,All_Reference 01c9 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 01ca e5fd | | Load 0x2,-0x3 01cb e005 | | Load 0x0,0x5 01cc 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01cd a402 | | Store_Unchecked 0x2,0x2 01ce e236 | 6 | Load 0x1,0x36 01cf 0322 | " | Declare_Variable Record 01d0 00d8 | | Load_Top At_Offset_0 01d1 1c00 | | Execute_Immediate Run_Utility,0x0 01d2 00e1 | | Load_Encached Boolean_Cache 01d3 e5fe | | Load 0x2,-0x2 01d4 823b | ; | Call 0x1,0x3b 01d5 029f 0413 | | Declare_Subprogram INIT_0410,For_Call 01d7 BODY_01c0: 01d7 00e1 | | Load_Encached Boolean_Cache 01d8 e403 | | Load 0x2,0x3 01d9 e5fe | | Load 0x2,-0x2 01da 823b | ; | Call 0x1,0x3b 01db e5ff | | Load 0x2,-0x1 01dc 0227 | ' | Execute Access,All_Reference 01dd 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 01de e238 | 8 | Load 0x1,0x38 01df 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01e0 00d1 | | Pop_Control Pop_Count_1 01e1 005b | [ | Store_Top Discrete,At_Offset_3 01e2 00da | | Load_Top At_Offset_2 01e3 6837 |h7 | Jump_Zero 0x21b 01e4 e402 | | Load 0x2,0x2 01e5 e005 | | Load 0x0,0x5 01e6 181a | | Execute Package,Field_Execute,Field_Number 0x1a 01e7 6809 |h | Jump_Zero 0x1f1 01e8 4800 |H | Short_Literal 0x0 01e9 e5ff | | Load 0x2,-0x1 01ea 0227 | ' | Execute Access,All_Reference 01eb 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 01ec e5fd | | Load 0x2,-0x3 01ed e005 | | Load 0x0,0x5 01ee 1812 | | Execute Package,Field_Execute,Field_Number 0x12 01ef c402 | | Store 0x2,0x2 01f0 7808 |x | Jump 0x1f9 01f1 e5fc | | Load 0x2,-0x4 01f2 6806 |h | Jump_Zero 0x1f9 01f3 e5ff | | Load 0x2,-0x1 01f4 0227 | ' | Execute Access,All_Reference 01f5 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 01f6 8406 | | Call 0x2,0x6 01f7 e22b | + | Load 0x1,0x2b 01f8 0257 | W | Execute Discrete,Raise 01f9 e5ff | | Load 0x2,-0x1 01fa 0229 | ) | Execute Access,All_Read 01fb 00d8 | | Load_Top At_Offset_0 01fc 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 01fd 00db | | Load_Top At_Offset_3 01fe e238 | 8 | Load 0x1,0x38 01ff 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0200 00d9 | | Load_Top At_Offset_1 0201 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0202 00d1 | | Pop_Control Pop_Count_1 0203 e5ff | | Load 0x2,-0x1 0204 0229 | ) | Execute Access,All_Read 0205 00d8 | | Load_Top At_Offset_0 0206 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0207 4801 |H | Short_Literal 0x1 0208 e236 | 6 | Load 0x1,0x36 0209 0322 | " | Declare_Variable Record 020a e402 | | Load 0x2,0x2 020b e236 | 6 | Load 0x1,0x36 020c 3000 |0 | Execute Record,Field_Type,Field_Number 0x0 020d 0119 | | Execute Any,Check_In_Formal_Type 020e 00d9 | | Load_Top At_Offset_1 020f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0210 e403 | | Load 0x2,0x3 0211 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0212 00d9 | | Load_Top At_Offset_1 0213 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0214 e405 | | Load 0x2,0x5 0215 e238 | 8 | Load 0x1,0x38 0216 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0217 00d9 | | Load_Top At_Offset_1 0218 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0219 00d1 | | Pop_Control Pop_Count_1 021a 4505 |E | Exit_Suprogram New_Top_Offset 0x5 021b e229 | ) | Load 0x1,0x29 021c 0257 | W | Execute Discrete,Raise 021d 0000 0000 | | .XXX[0x3] 021f 0000 | | 0220 ; -------------------------------------------------------------------------------------- 0220 ; SUBPROGRAM 0220 ; -------------------------------------------------------------------------------------- 0220 0223 | # | .CONST 0x0223 ; Address of begin 0221 0232 | 2 | .CONST 0x0232 ; Address of exception handler 0222 0001 | | .CONST 0x0001 ; Number of locals 0223 BODY_0220: 0223 INIT_0220: 0223 4800 |H | Short_Literal 0x0 0224 00ea | | Load_Encached Null_String_Cache 0225 6012 |` | Indirect_Literal Discrete,0x238,{0x00000000, 0x7fffffff} 0226 e5fe | | Load 0x2,-0x2 0227 e001 | | Load 0x0,0x1 0228 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0229 00db | | Load_Top At_Offset_3 022a 0227 | ' | Execute Access,All_Reference 022b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 022c e238 | 8 | Load 0x1,0x38 022d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 022e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 022f e005 | | Load 0x0,0x5 0230 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0231 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0232 TRAP_0220: 0232 0007 | | Action Break_Optional 0233 00ea | | Load_Encached Null_String_Cache 0234 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0235 0000 0000 | | .XXX[0x3] 0237 0000 | | 0238 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 023c 0000 0000 | | .BLANK 0000[0x4] 0240 ; -------------------------------------------------------------------------------------- 0240 ; SUBPROGRAM 0240 ; -------------------------------------------------------------------------------------- 0240 024c | L | .CONST 0x024c ; Address of begin 0241 0004 | | .CONST 0x0004 ; Address of exception handler 0242 0004 | | .CONST 0x0004 ; Number of locals 0243 INIT_0240: 0243 00e1 | | Load_Encached Boolean_Cache 0244 e236 | 6 | Load 0x1,0x36 0245 0322 | " | Declare_Variable Record 0246 00d8 | | Load_Top At_Offset_0 0247 1c00 | | Execute_Immediate Run_Utility,0x0 0248 e236 | 6 | Load 0x1,0x36 0249 0322 | " | Declare_Variable Record 024a 00d8 | | Load_Top At_Offset_0 024b 1c00 | | Execute_Immediate Run_Utility,0x0 024c BODY_0240: 024c 00e1 | | Load_Encached Boolean_Cache 024d 00da | | Load_Top At_Offset_2 024e e5fd | | Load 0x2,-0x3 024f 823b | ; | Call 0x1,0x3b 0250 e5ff | | Load 0x2,-0x1 0251 0227 | ' | Execute Access,All_Reference 0252 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0253 e238 | 8 | Load 0x1,0x38 0254 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0255 00d1 | | Pop_Control Pop_Count_1 0256 005b | [ | Store_Top Discrete,At_Offset_3 0257 00da | | Load_Top At_Offset_2 0258 7002 |p | Jump_Nonzero 0x25b 0259 e229 | ) | Load 0x1,0x29 025a 0257 | W | Execute Discrete,Raise 025b 00e1 | | Load_Encached Boolean_Cache 025c 00d9 | | Load_Top At_Offset_1 025d e5fc | | Load 0x2,-0x4 025e 823b | ; | Call 0x1,0x3b 025f e5ff | | Load 0x2,-0x1 0260 0227 | ' | Execute Access,All_Reference 0261 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0262 e238 | 8 | Load 0x1,0x38 0263 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0264 00d1 | | Pop_Control Pop_Count_1 0265 005b | [ | Store_Top Discrete,At_Offset_3 0266 00da | | Load_Top At_Offset_2 0267 7002 |p | Jump_Nonzero 0x26a 0268 e229 | ) | Load 0x1,0x29 0269 0257 | W | Execute Discrete,Raise 026a e5ff | | Load 0x2,-0x1 026b 0227 | ' | Execute Access,All_Reference 026c 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 026d 0a01 | | Execute_Immediate Plus,0x1 026e e5ff | | Load 0x2,-0x1 026f 0227 | ' | Execute Access,All_Reference 0270 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 0271 e5ff | | Load 0x2,-0x1 0272 0229 | ) | Execute Access,All_Read 0273 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0274 00d8 | | Load_Top At_Offset_0 0275 e235 | 5 | Load 0x1,0x35 0276 0322 | " | Declare_Variable Record 0277 e5fe | | Load 0x2,-0x2 0278 00d9 | | Load_Top At_Offset_1 0279 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 027a e403 | | Load 0x2,0x3 027b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 027c 00d9 | | Load_Top At_Offset_1 027d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 027e 00db | | Load_Top At_Offset_3 027f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0280 00d9 | | Load_Top At_Offset_1 0281 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0282 e23a | : | Load 0x1,0x3a 0283 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0284 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0285 0000 0000 | | .XXX[0x3] 0287 0000 | | 0288 ; -------------------------------------------------------------------------------------- 0288 ; SUBPROGRAM 0288 ; -------------------------------------------------------------------------------------- 0288 028b | | .CONST 0x028b ; Address of begin 0289 0004 | | .CONST 0x0004 ; Address of exception handler 028a 0001 | | .CONST 0x0001 ; Number of locals 028b BODY_0288: 028b INIT_0288: 028b e237 | 7 | Load 0x1,0x37 028c 00d8 | | Load_Top At_Offset_0 028d 0120 | | Execute Any,Is_Value 028e 7002 |p | Jump_Nonzero 0x291 028f 00d8 | | Load_Top At_Offset_0 0290 011e | | Execute Any,Convert 0291 00ca | | Action Exit_Nullary_Function 0292 0000 0000 | | .BLANK 0000[0x6] 0298 ; -------------------------------------------------------------------------------------- 0298 ; SUBPROGRAM 0298 ; -------------------------------------------------------------------------------------- 0298 029b | | .CONST 0x029b ; Address of begin 0299 0004 | | .CONST 0x0004 ; Address of exception handler 029a 0001 | | .CONST 0x0001 ; Number of locals 029b BODY_0298: 029b INIT_0298: 029b 00da | | Load_Top At_Offset_2 029c 0227 | ' | Execute Access,All_Reference 029d 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 029e 0f00 | | Execute_Immediate Equal,0x0 029f 00db | | Load_Top At_Offset_3 02a0 0227 | ' | Execute Access,All_Reference 02a1 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 02a2 0f00 | | Execute_Immediate Equal,0x0 02a3 0279 | y | Execute Discrete,And 02a4 6802 |h | Jump_Zero 0x2a7 02a5 4801 |H | Short_Literal 0x1 02a6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02a7 4800 |H | Short_Literal 0x0 02a8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02a9 0000 0000 | | .BLANK 0000[0x7] 02b0 ; -------------------------------------------------------------------------------------- 02b0 ; SUBPROGRAM 02b0 ; -------------------------------------------------------------------------------------- 02b0 02c0 | | .CONST 0x02c0 ; Address of begin 02b1 0004 | | .CONST 0x0004 ; Address of exception handler 02b2 0006 | | .CONST 0x0006 ; Number of locals 02b3 INIT_02b0: 02b3 e239 | 9 | Load 0x1,0x39 02b4 1b18 | | Execute Package,Field_Read,Field_Number 0x18 02b5 0322 | " | Declare_Variable Record 02b6 e23a | : | Load 0x1,0x3a 02b7 1b18 | | Execute Package,Field_Read,Field_Number 0x18 02b8 0322 | " | Declare_Variable Record 02b9 e010 | | Load 0x0,0x10 02ba 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02bb 1b11 | | Execute Package,Field_Read,Field_Number 0x11 02bc 029f 043b | ;| Declare_Subprogram INIT_0438,For_Call 02be 029f 044b | K| Declare_Subprogram INIT_0448,For_Call 02c0 BODY_02b0: 02c0 480a |H | Short_Literal 0xa 02c1 0092 04d9 | | Action Push_String_Extended,0x4d9 ; "@@ 5 1 \x22" 02c3 e5ff | | Load 0x2,-0x1 02c4 0227 | ' | Execute Access,All_Reference 02c5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02c6 0227 | ' | Execute Access,All_Reference 02c7 01cc | | Execute Vector,Catenate 02c8 0092 04da | | Action Push_String_Extended,0x4da ; "\x22" 02ca 01cc | | Execute Vector,Catenate 02cb 01cb | | Execute Vector,Append 02cc e010 | | Load 0x0,0x10 02cd 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02ce 1817 | | Execute Package,Field_Execute,Field_Number 0x17 02cf 003b | ; | Store_Top Access,At_Offset_3 02d0 00da | | Load_Top At_Offset_2 02d1 480a |H | Short_Literal 0xa 02d2 0092 04da | | Action Push_String_Extended,0x4da ; "\x22" 02d4 e5ff | | Load 0x2,-0x1 02d5 0227 | ' | Execute Access,All_Reference 02d6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02d7 0227 | ' | Execute Access,All_Reference 02d8 8405 | | Call 0x2,0x5 02d9 01cc | | Execute Vector,Catenate 02da 0092 04da | | Action Push_String_Extended,0x4da ; "\x22" 02dc 01cc | | Execute Vector,Catenate 02dd 01cb | | Execute Vector,Append 02de e010 | | Load 0x0,0x10 02df 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02e0 181d | | Execute Package,Field_Execute,Field_Number 0x1d 02e1 003b | ; | Store_Top Access,At_Offset_3 02e2 00da | | Load_Top At_Offset_2 02e3 480a |H | Short_Literal 0xa 02e4 e5ff | | Load 0x2,-0x1 02e5 0227 | ' | Execute Access,All_Reference 02e6 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 02e7 0227 | ' | Execute Access,All_Reference 02e8 8405 | | Call 0x2,0x5 02e9 01cb | | Execute Vector,Append 02ea e010 | | Load 0x0,0x10 02eb 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02ec 181d | | Execute Package,Field_Execute,Field_Number 0x1d 02ed 003b | ; | Store_Top Access,At_Offset_3 02ee 00da | | Load_Top At_Offset_2 02ef 480a |H | Short_Literal 0xa 02f0 e5ff | | Load 0x2,-0x1 02f1 0227 | ' | Execute Access,All_Reference 02f2 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 02f3 00e0 | | Load_Encached Standard_Cache 02f4 1818 | | Execute Package,Field_Execute,Field_Number 0x18 02f5 0092 04db | | Action Push_String_Extended,0x4db ; " " 02f7 01cc | | Execute Vector,Catenate 02f8 e5ff | | Load 0x2,-0x1 02f9 0227 | ' | Execute Access,All_Reference 02fa 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 02fb 00e0 | | Load_Encached Standard_Cache 02fc 1818 | | Execute Package,Field_Execute,Field_Number 0x18 02fd 01cc | | Execute Vector,Catenate 02fe 01cb | | Execute Vector,Append 02ff e010 | | Load 0x0,0x10 0300 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0301 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0302 003b | ; | Store_Top Access,At_Offset_3 0303 00da | | Load_Top At_Offset_2 0304 0092 04dc | | Action Push_String_Extended,0x4dc ; "@\x0a" 0306 e010 | | Load 0x0,0x10 0307 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0308 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0309 003b | ; | Store_Top Access,At_Offset_3 030a e402 | | Load 0x2,0x2 030b e5ff | | Load 0x2,-0x1 030c 0227 | ' | Execute Access,All_Reference 030d 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 030e e239 | 9 | Load 0x1,0x39 030f 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0310 00d1 | | Pop_Control Pop_Count_1 0311 00cf | | Action Mark_Auxiliary 0312 7806 |x | Jump 0x319 0313 8406 | | Call 0x2,0x6 0314 e402 | | Load 0x2,0x2 0315 e239 | 9 | Load 0x1,0x39 0316 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0317 00d1 | | Pop_Control Pop_Count_1 0318 00c9 | | Action Pop_Auxiliary_Loop 0319 e402 | | Load 0x2,0x2 031a e239 | 9 | Load 0x1,0x39 031b 181c | | Execute Package,Field_Execute,Field_Number 0x1c 031c 6ff6 |o | Jump_Zero 0x313 031d 00ce | | Action Pop_Auxiliary 031e 00da | | Load_Top At_Offset_2 031f 0092 04dc | | Action Push_String_Extended,0x4dc ; "@\x0a" 0321 e010 | | Load 0x0,0x10 0322 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0323 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0324 003b | ; | Store_Top Access,At_Offset_3 0325 00db | | Load_Top At_Offset_3 0326 e5ff | | Load 0x2,-0x1 0327 0227 | ' | Execute Access,All_Reference 0328 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0329 e23a | : | Load 0x1,0x3a 032a 1819 | | Execute Package,Field_Execute,Field_Number 0x19 032b 00d1 | | Pop_Control Pop_Count_1 032c 00cf | | Action Mark_Auxiliary 032d 7828 |x( | Jump 0x356 032e 00db | | Load_Top At_Offset_3 032f 480a |H | Short_Literal 0xa 0330 e403 | | Load 0x2,0x3 0331 e23a | : | Load 0x1,0x3a 0332 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0333 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0334 00d8 | | Load_Top At_Offset_0 0335 00e2 | | Load_Encached Integer_Cache 0336 0260 | ` | Execute Discrete,In_Type 0337 7001 |p | Jump_Nonzero 0x339 0338 0801 | | Execute_Immediate Raise,0x1 0339 00e0 | | Load_Encached Standard_Cache 033a 1818 | | Execute Package,Field_Execute,Field_Number 0x18 033b e403 | | Load 0x2,0x3 033c e23a | : | Load 0x1,0x3a 033d 181b | | Execute Package,Field_Execute,Field_Number 0x1b 033e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 033f 00e0 | | Load_Encached Standard_Cache 0340 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0341 01cc | | Execute Vector,Catenate 0342 0092 04db | | Action Push_String_Extended,0x4db ; " " 0344 01cc | | Execute Vector,Catenate 0345 e403 | | Load 0x2,0x3 0346 e23a | : | Load 0x1,0x3a 0347 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0348 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0349 00e0 | | Load_Encached Standard_Cache 034a 1818 | | Execute Package,Field_Execute,Field_Number 0x18 034b 01cc | | Execute Vector,Catenate 034c 01cb | | Execute Vector,Append 034d e010 | | Load 0x0,0x10 034e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 034f 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0350 c404 | | Store 0x2,0x4 0351 e403 | | Load 0x2,0x3 0352 e23a | : | Load 0x1,0x3a 0353 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0354 00d1 | | Pop_Control Pop_Count_1 0355 00c9 | | Action Pop_Auxiliary_Loop 0356 e403 | | Load 0x2,0x3 0357 e23a | : | Load 0x1,0x3a 0358 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0359 6fd4 |o | Jump_Zero 0x32e 035a 00ce | | Action Pop_Auxiliary 035b 00da | | Load_Top At_Offset_2 035c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 035d 0000 0000 | | .XXX[0x3] 035f 0000 | | 0360 ; -------------------------------------------------------------------------------------- 0360 ; SUBPROGRAM 0360 ; -------------------------------------------------------------------------------------- 0360 0363 | c | .CONST 0x0363 ; Address of begin 0361 0004 | | .CONST 0x0004 ; Address of exception handler 0362 0001 | | .CONST 0x0001 ; Number of locals 0363 BODY_0360: 0363 INIT_0360: 0363 00da | | Load_Top At_Offset_2 0364 0227 | ' | Execute Access,All_Reference 0365 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0366 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0367 0000 | | .XXX[0x1] 0368 ; -------------------------------------------------------------------------------------- 0368 ; SUBPROGRAM 0368 ; -------------------------------------------------------------------------------------- 0368 036b | k | .CONST 0x036b ; Address of begin 0369 0004 | | .CONST 0x0004 ; Address of exception handler 036a 0001 | | .CONST 0x0001 ; Number of locals 036b BODY_0368: 036b INIT_0368: 036b 00da | | Load_Top At_Offset_2 036c 0227 | ' | Execute Access,All_Reference 036d 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 036e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 036f 0000 | | .XXX[0x1] 0370 ; -------------------------------------------------------------------------------------- 0370 ; SUBPROGRAM 0370 ; -------------------------------------------------------------------------------------- 0370 0373 | s | .CONST 0x0373 ; Address of begin 0371 0004 | | .CONST 0x0004 ; Address of exception handler 0372 0001 | | .CONST 0x0001 ; Number of locals 0373 BODY_0370: 0373 INIT_0370: 0373 4608 |F | Jump_Case 0x9 0374 7808 |x | Jump 0x37d ; case 0x0 0375 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0376 7819 |x | Jump 0x390 ; case 0x2 0377 7818 |x | Jump 0x390 ; case 0x3 0378 7817 |x | Jump 0x390 ; case 0x4 0379 7816 |x | Jump 0x390 ; case 0x5 037a 7815 |x | Jump 0x390 ; case 0x6 037b 7814 |x | Jump 0x390 ; case 0x7 037c 7813 |x | Jump 0x390 ; case 0x8 037d 00da | | Load_Top At_Offset_2 037e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 037f 0125 | % | Execute Any,Set_Constraint 0380 00da | | Load_Top At_Offset_2 0381 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0382 1c00 | | Execute_Immediate Run_Utility,0x0 0383 4800 |H | Short_Literal 0x0 0384 00db | | Load_Top At_Offset_3 0385 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0386 4800 |H | Short_Literal 0x0 0387 00db | | Load_Top At_Offset_3 0388 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0389 00da | | Load_Top At_Offset_2 038a 3408 |4 | Execute Record,Field_Reference,Field_Number 0x8 038b 0125 | % | Execute Any,Set_Constraint 038c 00da | | Load_Top At_Offset_2 038d 3408 |4 | Execute Record,Field_Reference,Field_Number 0x8 038e 1c00 | | Execute_Immediate Run_Utility,0x0 038f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0390 0869 | i | Execute_Immediate Raise,0x69 0391 0000 0000 | | .BLANK 0000[0x7] 0398 ; -------------------------------------------------------------------------------------- 0398 ; SUBPROGRAM 0398 ; -------------------------------------------------------------------------------------- 0398 039b | | .CONST 0x039b ; Address of begin 0399 0004 | | .CONST 0x0004 ; Address of exception handler 039a 0001 | | .CONST 0x0001 ; Number of locals 039b BODY_0398: 039b INIT_0398: 039b 4608 |F | Jump_Case 0x9 039c 7808 |x | Jump 0x3a5 ; case 0x0 039d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 039e 780d |x | Jump 0x3ac ; case 0x2 039f 780c |x | Jump 0x3ac ; case 0x3 03a0 780b |x | Jump 0x3ac ; case 0x4 03a1 780a |x | Jump 0x3ac ; case 0x5 03a2 7809 |x | Jump 0x3ac ; case 0x6 03a3 7808 |x | Jump 0x3ac ; case 0x7 03a4 7807 |x | Jump 0x3ac ; case 0x8 03a5 00da | | Load_Top At_Offset_2 03a6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 03a7 0125 | % | Execute Any,Set_Constraint 03a8 00da | | Load_Top At_Offset_2 03a9 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 03aa 1c00 | | Execute_Immediate Run_Utility,0x0 03ab 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 03ac 0869 | i | Execute_Immediate Raise,0x69 03ad 0000 0000 | | .XXX[0x3] 03af 0000 | | 03b0 ; -------------------------------------------------------------------------------------- 03b0 ; SUBPROGRAM 03b0 ; -------------------------------------------------------------------------------------- 03b0 03b3 | | .CONST 0x03b3 ; Address of begin 03b1 0004 | | .CONST 0x0004 ; Address of exception handler 03b2 0001 | | .CONST 0x0001 ; Number of locals 03b3 BODY_03b0: 03b3 INIT_03b0: 03b3 4608 |F | Jump_Case 0x9 03b4 7808 |x | Jump 0x3bd ; case 0x0 03b5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 03b6 7813 |x | Jump 0x3ca ; case 0x2 03b7 7812 |x | Jump 0x3ca ; case 0x3 03b8 7811 |x | Jump 0x3ca ; case 0x4 03b9 7810 |x | Jump 0x3ca ; case 0x5 03ba 780f |x | Jump 0x3ca ; case 0x6 03bb 780e |x | Jump 0x3ca ; case 0x7 03bc 780d |x | Jump 0x3ca ; case 0x8 03bd 00da | | Load_Top At_Offset_2 03be 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 03bf 0125 | % | Execute Any,Set_Constraint 03c0 00da | | Load_Top At_Offset_2 03c1 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 03c2 1c00 | | Execute_Immediate Run_Utility,0x0 03c3 4800 |H | Short_Literal 0x0 03c4 00db | | Load_Top At_Offset_3 03c5 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 03c6 4800 |H | Short_Literal 0x0 03c7 00db | | Load_Top At_Offset_3 03c8 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 03c9 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 03ca 0869 | i | Execute_Immediate Raise,0x69 03cb 0000 0000 | | .BLANK 0000[0x5] 03d0 ; -------------------------------------------------------------------------------------- 03d0 ; SUBPROGRAM 03d0 ; -------------------------------------------------------------------------------------- 03d0 03d3 | | .CONST 0x03d3 ; Address of begin 03d1 0004 | | .CONST 0x0004 ; Address of exception handler 03d2 0001 | | .CONST 0x0001 ; Number of locals 03d3 BODY_03d0: 03d3 INIT_03d0: 03d3 4800 |H | Short_Literal 0x0 03d4 00ea | | Load_Encached Null_String_Cache 03d5 6006 |` | Indirect_Literal Discrete,0x3dc,{0x00000000, 0x7fffffff} 03d6 e5ff | | Load 0x2,-0x1 03d7 e001 | | Load 0x0,0x1 03d8 1812 | | Execute Package,Field_Execute,Field_Number 0x12 03d9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03da 0000 0000 | | .XXX[0x2] 03dc 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 03e0 ; -------------------------------------------------------------------------------------- 03e0 ; SUBPROGRAM 03e0 ; -------------------------------------------------------------------------------------- 03e0 03e3 | | .CONST 0x03e3 ; Address of begin 03e1 03fd | | .CONST 0x03fd ; Address of exception handler 03e2 0001 | | .CONST 0x0001 ; Number of locals 03e3 BODY_03e0: 03e3 INIT_03e0: 03e3 e5ff | | Load 0x2,-0x1 03e4 0229 | ) | Execute Access,All_Read 03e5 00d8 | | Load_Top At_Offset_0 03e6 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 03e7 4801 |H | Short_Literal 0x1 03e8 e236 | 6 | Load 0x1,0x36 03e9 0322 | " | Declare_Variable Record 03ea e005 | | Load 0x0,0x5 03eb 1811 | | Execute Package,Field_Execute,Field_Number 0x11 03ec e236 | 6 | Load 0x1,0x36 03ed 3000 |0 | Execute Record,Field_Type,Field_Number 0x0 03ee 0119 | | Execute Any,Check_In_Formal_Type 03ef 00d9 | | Load_Top At_Offset_1 03f0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 03f1 e5ff | | Load 0x2,-0x1 03f2 0227 | ' | Execute Access,All_Reference 03f3 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 03f4 00d9 | | Load_Top At_Offset_1 03f5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 03f6 e5fe | | Load 0x2,-0x2 03f7 823b | ; | Call 0x1,0x3b 03f8 e238 | 8 | Load 0x1,0x38 03f9 1815 | | Execute Package,Field_Execute,Field_Number 0x15 03fa 00d9 | | Load_Top At_Offset_1 03fb 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 03fc 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03fd TRAP_03e0: 03fd e238 | 8 | Load 0x1,0x38 03fe 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 03ff 010f | | Execute Exception,Equal 0400 6809 |h | Jump_Zero 0x40a 0401 e5ff | | Load 0x2,-0x1 0402 0227 | ' | Execute Access,All_Reference 0403 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0404 0aff | | Execute_Immediate Plus,-0x1 0405 e5ff | | Load 0x2,-0x1 0406 0227 | ' | Execute Access,All_Reference 0407 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0408 e22a | * | Load 0x1,0x2a 0409 0257 | W | Execute Discrete,Raise 040a 0100 | | Execute Exception,Raise 040b 0000 0000 | | .BLANK 0000[0x5] 0410 ; -------------------------------------------------------------------------------------- 0410 ; SUBPROGRAM 0410 ; -------------------------------------------------------------------------------------- 0410 0416 | | .CONST 0x0416 ; Address of begin 0411 0004 | | .CONST 0x0004 ; Address of exception handler 0412 0002 | | .CONST 0x0002 ; Number of locals 0413 INIT_0410: 0413 e239 | 9 | Load 0x1,0x39 0414 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0415 0322 | " | Declare_Variable Record 0416 BODY_0410: 0416 00d8 | | Load_Top At_Offset_0 0417 e7ff | | Load 0x3,-0x1 0418 e239 | 9 | Load 0x1,0x39 0419 1819 | | Execute Package,Field_Execute,Field_Number 0x19 041a 00d1 | | Pop_Control Pop_Count_1 041b 00cf | | Action Mark_Auxiliary 041c 7814 |x | Jump 0x431 041d 00d9 | | Load_Top At_Offset_1 041e e239 | 9 | Load 0x1,0x39 041f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0420 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0421 e5ff | | Load 0x2,-0x1 0422 8230 | 0 | Call 0x1,0x30 0423 e5fd | | Load 0x2,-0x3 0424 01df | | Execute Vector,Equal 0425 6806 |h | Jump_Zero 0x42c 0426 00d9 | | Load_Top At_Offset_1 0427 e239 | 9 | Load 0x1,0x39 0428 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0429 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 042a c237 | 7 | Store 0x1,0x37 042b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 042c 00d9 | | Load_Top At_Offset_1 042d e239 | 9 | Load 0x1,0x39 042e 181a | | Execute Package,Field_Execute,Field_Number 0x1a 042f 00d1 | | Pop_Control Pop_Count_1 0430 00c9 | | Action Pop_Auxiliary_Loop 0431 00d9 | | Load_Top At_Offset_1 0432 e239 | 9 | Load 0x1,0x39 0433 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0434 6fe8 |o | Jump_Zero 0x41d 0435 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0436 0000 0000 | | .XXX[0x2] 0438 ; -------------------------------------------------------------------------------------- 0438 ; SUBPROGRAM 0438 ; -------------------------------------------------------------------------------------- 0438 043b | ; | .CONST 0x043b ; Address of begin 0439 0004 | | .CONST 0x0004 ; Address of exception handler 043a 0001 | | .CONST 0x0001 ; Number of locals 043b BODY_0438: 043b INIT_0438: 043b 00da | | Load_Top At_Offset_2 043c 01db | | Execute Vector,Length 043d 6805 |h | Jump_Zero 0x443 043e 0092 04dd | | Action Push_String_Extended,0x4dd ; "*" 0440 00db | | Load_Top At_Offset_3 0441 01cc | | Execute Vector,Catenate 0442 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0443 00da | | Load_Top At_Offset_2 0444 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0445 0000 0000 | | .XXX[0x3] 0447 0000 | | 0448 ; -------------------------------------------------------------------------------------- 0448 ; SUBPROGRAM 0448 ; -------------------------------------------------------------------------------------- 0448 044e | N | .CONST 0x044e ; Address of begin 0449 0004 | | .CONST 0x0004 ; Address of exception handler 044a 0002 | | .CONST 0x0002 ; Number of locals 044b INIT_0448: 044b e402 | | Load 0x2,0x2 044c e239 | 9 | Load 0x1,0x39 044d 181b | | Execute Package,Field_Execute,Field_Number 0x1b 044e BODY_0448: 044e 00d8 | | Load_Top At_Offset_0 044f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0450 6807 |h | Jump_Zero 0x458 0451 e404 | | Load 0x2,0x4 0452 0092 04de | | Action Push_String_Extended,0x4de ; "& " 0454 e010 | | Load 0x0,0x10 0455 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0456 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0457 c404 | | Store 0x2,0x4 0458 e404 | | Load 0x2,0x4 0459 00d9 | | Load_Top At_Offset_1 045a 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 045b 00d8 | | Load_Top At_Offset_0 045c 00e2 | | Load_Encached Integer_Cache 045d 0260 | ` | Execute Discrete,In_Type 045e 7001 |p | Jump_Nonzero 0x460 045f 0801 | | Execute_Immediate Raise,0x1 0460 00e0 | | Load_Encached Standard_Cache 0461 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0462 0092 04db | | Action Push_String_Extended,0x4db ; " " 0464 01cc | | Execute Vector,Catenate 0465 00da | | Load_Top At_Offset_2 0466 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0467 00e0 | | Load_Encached Standard_Cache 0468 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0469 01cc | | Execute Vector,Catenate 046a 0092 04db | | Action Push_String_Extended,0x4db ; " " 046c 01cc | | Execute Vector,Catenate 046d 00da | | Load_Top At_Offset_2 046e 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 046f 00e0 | | Load_Encached Standard_Cache 0470 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0471 01cc | | Execute Vector,Catenate 0472 0092 04db | | Action Push_String_Extended,0x4db ; " " 0474 01cc | | Execute Vector,Catenate 0475 00da | | Load_Top At_Offset_2 0476 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0477 e5ff | | Load 0x2,-0x1 0478 8230 | 0 | Call 0x1,0x30 0479 01cc | | Execute Vector,Catenate 047a 0092 04db | | Action Push_String_Extended,0x4db ; " " 047c 01cc | | Execute Vector,Catenate 047d e010 | | Load 0x0,0x10 047e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 047f 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0480 c404 | | Store 0x2,0x4 0481 00d8 | | Load_Top At_Offset_0 0482 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0483 6827 |h' | Jump_Zero 0x4ab 0484 e404 | | Load 0x2,0x4 0485 0092 04df | | Action Push_String_Extended,0x4df ; ", " 0487 00da | | Load_Top At_Offset_2 0488 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0489 0227 | ' | Execute Access,All_Reference 048a 01cc | | Execute Vector,Catenate 048b e010 | | Load 0x0,0x10 048c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 048d 181d | | Execute Package,Field_Execute,Field_Number 0x1d 048e c404 | | Store 0x2,0x4 048f 00d8 | | Load_Top At_Offset_0 0490 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0491 6819 |h | Jump_Zero 0x4ab 0492 e404 | | Load 0x2,0x4 0493 0092 04df | | Action Push_String_Extended,0x4df ; ", " 0495 00da | | Load_Top At_Offset_2 0496 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0497 0227 | ' | Execute Access,All_Reference 0498 01cc | | Execute Vector,Catenate 0499 e010 | | Load 0x0,0x10 049a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 049b 181d | | Execute Package,Field_Execute,Field_Number 0x1d 049c c404 | | Store 0x2,0x4 049d 00d8 | | Load_Top At_Offset_0 049e 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 049f 680b |h | Jump_Zero 0x4ab 04a0 e404 | | Load 0x2,0x4 04a1 0092 04df | | Action Push_String_Extended,0x4df ; ", " 04a3 00da | | Load_Top At_Offset_2 04a4 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 04a5 0227 | ' | Execute Access,All_Reference 04a6 01cc | | Execute Vector,Catenate 04a7 e010 | | Load 0x0,0x10 04a8 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04a9 181d | | Execute Package,Field_Execute,Field_Number 0x1d 04aa c404 | | Store 0x2,0x4 04ab e404 | | Load 0x2,0x4 04ac 480a |H | Short_Literal 0xa 04ad 00da | | Load_Top At_Offset_2 04ae 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 04af e001 | | Load 0x0,0x1 04b0 181e | | Execute Package,Field_Execute,Field_Number 0x1e 04b1 00db | | Load_Top At_Offset_3 04b2 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 04b3 e001 | | Load 0x0,0x1 04b4 181f | | Execute Package,Field_Execute,Field_Number 0x1f 04b5 01cc | | Execute Vector,Catenate 04b6 8405 | | Call 0x2,0x5 04b7 01cb | | Execute Vector,Append 04b8 e010 | | Load 0x0,0x10 04b9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04ba 181d | | Execute Package,Field_Execute,Field_Number 0x1d 04bb c404 | | Store 0x2,0x4 04bc 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04bd ; -------------------------------------------------------------------------------------- 04bd ; STRING TABLE 04bd ; -------------------------------------------------------------------------------------- 04bd 0048 | H | .STRTAB 0x0048->0x04e1 ; "UNDEFINED" 04be 004f | O | .STRTAB 0x004f->0x04e5 ; "SUBSYSTEM" 04bf 0056 | V | .STRTAB 0x0056->0x04ea ; "MAIN_PROGRAM" 04c0 0060 | ` | .STRTAB 0x0060->0x04f0 ; "SUBPROGRAM_SPEC" 04c1 006d | m | .STRTAB 0x006d->0x04f7 ; "GENERIC_SUBPROGRAM" 04c2 007d | } | .STRTAB 0x007d->0x0500 ; "SUBPROGRAM_BODY" 04c3 008a | | .STRTAB 0x008a->0x0508 ; "PACKAGE_SPEC" 04c4 0094 | | .STRTAB 0x0094->0x050e ; "GENERIC_PACKAGE" 04c5 00a1 | | .STRTAB 0x00a1->0x0515 ; "PACKAGE_BODY" 04c6 00ab | | .STRTAB 0x00ab->0x051b ; "TASK_SPEC" 04c7 00b2 | | .STRTAB 0x00b2->0x0520 ; "TASK_BODY" 04c8 00b9 | | .STRTAB 0x00b9->0x0524 ; "POINT" 04c9 00bc | | .STRTAB 0x00bc->0x0527 ; "GROUP" 04ca 00bf | | .STRTAB 0x00bf->0x0529 ; "CLASS" 04cb 00c2 | | .STRTAB 0x00c2->0x052c ; "CLASS_CATEGORY" 04cc 00ce | | .STRTAB 0x00ce->0x0533 ; "CLASS_UTILITY" 04cd 00d9 | | .STRTAB 0x00d9->0x0539 ; "LOAD_VIEW" 04ce 00e0 | | .STRTAB 0x00e0->0x053e ; "SPEC_VIEW" 04cf 00e7 | | .STRTAB 0x00e7->0x0542 ; "COMBINED_VIEW" 04d0 00f2 | | .STRTAB 0x00f2->0x0549 ; "CODE_VIEW" 04d1 00f9 | | .STRTAB 0x00f9->0x054d ; "DIRECTORY" 04d2 0100 | | .STRTAB 0x0100->0x0552 ; "WORLD" 04d3 0103 | | .STRTAB 0x0103->0x0554 ; "UNDEFINED" 04d4 010a | | .STRTAB 0x010a->0x0559 ; "IMPORTS" 04d5 010f | | .STRTAB 0x010f->0x055c ; "IMPORTS_MANY" 04d6 0119 | | .STRTAB 0x0119->0x0562 ; "CONTAINS" 04d7 011f | | .STRTAB 0x011f->0x0566 ; "USES_FOR_INTERFACE" 04d8 012f | / | .STRTAB 0x012f->0x056f ; "INHERITS" 04d9 0135 | 5 | .STRTAB 0x0135->0x0573 ; "@@ 5 1 \x22" 04da 013b | ; | .STRTAB 0x013b->0x0577 ; "\x22" 04db 013a | : | .STRTAB 0x013a->0x0578 ; " " 04dc 0139 | 9 | .STRTAB 0x0139->0x0578 ; "@\x0a" 04dd 0139 | 9 | .STRTAB 0x0139->0x0579 ; "*" 04de 0138 | 8 | .STRTAB 0x0138->0x057a ; "& " 04df 0138 | 8 | .STRTAB 0x0138->0x057b ; ", " 04e0 0138 | 8 | .STREND 0x0138->0x057c 04e1 554e 4445 |UNDE| .STRTAB_STRINGS 057c 0000 0000 | | .BLANK 0000[0x4] 0580 ; -------------------------------------------------------------------------------------- 0580 ; Debug Table 0580 ; -------------------------------------------------------------------------------------- 0580 0004 0014 | | .DEBUG4 0x0004,0x0014,0x0ee7,0x0000,0x0001,0x0000 0586 0000 0000 | | .BLANK 0000[0x27] 05ad 1002 8000 | | .XXX[0xb] 05af 0000 0000 | | 05b1 0020 0000 | | 05b3 0110 0000 | | 05b5 0000 8000 | | 05b7 0005 | | 05b8 0000 0000 | | .BLANK 0000[0x48]