|
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_191cd7
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 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 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0169 | i | .CONST 0x0169 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0020 | | .CONST 0x0020 ; Number of locals 000b INIT_0008: 000b 4800 |H | Short_Literal 0x0 000c 4801 |H | Short_Literal 0x1 000d 029f 0173 | s| Declare_Subprogram INIT_0170,For_Call 000f 03fe | | Declare_Type Discrete,Defined,Visible 0010 0007 | | Action Break_Optional 0011 4808 |H | Short_Literal 0x8 0012 4800 |H | Short_Literal 0x0 0013 4802 |H | Short_Literal 0x2 0014 029f 019b | | Declare_Subprogram INIT_0198,For_Call 0016 03fb | | Declare_Type Discrete,Defined,Visible,With_Size 0017 4800 |H | Short_Literal 0x0 0018 4803 |H | Short_Literal 0x3 0019 029f 01c3 | | Declare_Subprogram INIT_01c0,For_Call 001b 03fe | | Declare_Type Discrete,Defined,Visible 001c 0007 | | Action Break_Optional 001d 4808 |H | Short_Literal 0x8 001e 4800 |H | Short_Literal 0x0 001f 4803 |H | Short_Literal 0x3 0020 029f 01eb | | Declare_Subprogram INIT_01e8,For_Call 0022 03fb | | Declare_Type Discrete,Defined,Visible,With_Size 0023 0007 | | Action Break_Optional 0024 4800 |H | Short_Literal 0x0 0025 4801 |H | Short_Literal 0x1 0026 029f 0213 | | Declare_Subprogram INIT_0210,For_Call 0028 03fe | | Declare_Type Discrete,Defined,Visible 0029 0007 | | Action Break_Optional 002a 4800 |H | Short_Literal 0x0 002b 4803 |H | Short_Literal 0x3 002c 029f 023b | ;| Declare_Subprogram INIT_0238,For_Call 002e 03fe | | Declare_Type Discrete,Defined,Visible 002f 0007 | | Action Break_Optional 0030 4800 |H | Short_Literal 0x0 0031 481f |H | Short_Literal 0x1f 0032 029f 0263 | c| Declare_Subprogram INIT_0260,For_Call 0034 03fe | | Declare_Type Discrete,Defined,Visible 0035 0007 | | Action Break_Optional 0036 00d8 | | Load_Top At_Offset_0 0037 0266 | f | Execute Discrete,Bounds 0038 00e1 | | Load_Encached Boolean_Cache 0039 02a0 | | Declare_Subprogram Null_Subprogram 003a 4801 |H | Short_Literal 0x1 003b 035e | ^ | Declare_Type Array,Defined,Visible 003c 00d8 | | Load_Top At_Offset_0 003d 0336 | 6 | Declare_Variable Array,Visible 003e 00d8 | | Load_Top At_Offset_0 003f 0335 | 5 | Declare_Variable Array,Duplicate 0040 00cd | | Action Spare6_Action 0041 481f |H | Short_Literal 0x1f 0042 4800 |H | Short_Literal 0x0 0043 4800 |H | Short_Literal 0x0 0044 00d9 | | Load_Top At_Offset_1 0045 e216 | | Load 0x1,0x16 0046 01d6 | | Execute Vector,Field_Write 0047 3ffb |? | Loop_Increasing 0x43 0048 00d9 | | Load_Top At_Offset_1 0049 01d4 | | Execute Vector,Structure_Write 004a 00d9 | | Load_Top At_Offset_1 004b 0337 | 7 | Declare_Variable Array 004c 4800 |H | Short_Literal 0x0 004d 4800 |H | Short_Literal 0x0 004e 00da | | Load_Top At_Offset_2 004f 01d6 | | Execute Vector,Field_Write 0050 4800 |H | Short_Literal 0x0 0051 4801 |H | Short_Literal 0x1 0052 00da | | Load_Top At_Offset_2 0053 01d6 | | Execute Vector,Field_Write 0054 4800 |H | Short_Literal 0x0 0055 4802 |H | Short_Literal 0x2 0056 00da | | Load_Top At_Offset_2 0057 01d6 | | Execute Vector,Field_Write 0058 4800 |H | Short_Literal 0x0 0059 4803 |H | Short_Literal 0x3 005a 00da | | Load_Top At_Offset_2 005b 01d6 | | Execute Vector,Field_Write 005c 4800 |H | Short_Literal 0x0 005d 4804 |H | Short_Literal 0x4 005e 00da | | Load_Top At_Offset_2 005f 01d6 | | Execute Vector,Field_Write 0060 4800 |H | Short_Literal 0x0 0061 4805 |H | Short_Literal 0x5 0062 00da | | Load_Top At_Offset_2 0063 01d6 | | Execute Vector,Field_Write 0064 4800 |H | Short_Literal 0x0 0065 4806 |H | Short_Literal 0x6 0066 00da | | Load_Top At_Offset_2 0067 01d6 | | Execute Vector,Field_Write 0068 4800 |H | Short_Literal 0x0 0069 4807 |H | Short_Literal 0x7 006a 00da | | Load_Top At_Offset_2 006b 01d6 | | Execute Vector,Field_Write 006c 4800 |H | Short_Literal 0x0 006d 4808 |H | Short_Literal 0x8 006e 00da | | Load_Top At_Offset_2 006f 01d6 | | Execute Vector,Field_Write 0070 4801 |H | Short_Literal 0x1 0071 4809 |H | Short_Literal 0x9 0072 00da | | Load_Top At_Offset_2 0073 01d6 | | Execute Vector,Field_Write 0074 4801 |H | Short_Literal 0x1 0075 480a |H | Short_Literal 0xa 0076 00da | | Load_Top At_Offset_2 0077 01d6 | | Execute Vector,Field_Write 0078 4801 |H | Short_Literal 0x1 0079 480b |H | Short_Literal 0xb 007a 00da | | Load_Top At_Offset_2 007b 01d6 | | Execute Vector,Field_Write 007c 4801 |H | Short_Literal 0x1 007d 480c |H | Short_Literal 0xc 007e 00da | | Load_Top At_Offset_2 007f 01d6 | | Execute Vector,Field_Write 0080 4801 |H | Short_Literal 0x1 0081 480d |H | Short_Literal 0xd 0082 00da | | Load_Top At_Offset_2 0083 01d6 | | Execute Vector,Field_Write 0084 4801 |H | Short_Literal 0x1 0085 480e |H | Short_Literal 0xe 0086 00da | | Load_Top At_Offset_2 0087 01d6 | | Execute Vector,Field_Write 0088 4801 |H | Short_Literal 0x1 0089 480f |H | Short_Literal 0xf 008a 00da | | Load_Top At_Offset_2 008b 01d6 | | Execute Vector,Field_Write 008c 4801 |H | Short_Literal 0x1 008d 4810 |H | Short_Literal 0x10 008e 00da | | Load_Top At_Offset_2 008f 01d6 | | Execute Vector,Field_Write 0090 4801 |H | Short_Literal 0x1 0091 4811 |H | Short_Literal 0x11 0092 00da | | Load_Top At_Offset_2 0093 01d6 | | Execute Vector,Field_Write 0094 4801 |H | Short_Literal 0x1 0095 4812 |H | Short_Literal 0x12 0096 00da | | Load_Top At_Offset_2 0097 01d6 | | Execute Vector,Field_Write 0098 4801 |H | Short_Literal 0x1 0099 4813 |H | Short_Literal 0x13 009a 00da | | Load_Top At_Offset_2 009b 01d6 | | Execute Vector,Field_Write 009c 4801 |H | Short_Literal 0x1 009d 4814 |H | Short_Literal 0x14 009e 00da | | Load_Top At_Offset_2 009f 01d6 | | Execute Vector,Field_Write 00a0 4801 |H | Short_Literal 0x1 00a1 4815 |H | Short_Literal 0x15 00a2 00da | | Load_Top At_Offset_2 00a3 01d6 | | Execute Vector,Field_Write 00a4 4801 |H | Short_Literal 0x1 00a5 4816 |H | Short_Literal 0x16 00a6 00da | | Load_Top At_Offset_2 00a7 01d6 | | Execute Vector,Field_Write 00a8 4801 |H | Short_Literal 0x1 00a9 4817 |H | Short_Literal 0x17 00aa 00da | | Load_Top At_Offset_2 00ab 01d6 | | Execute Vector,Field_Write 00ac 4801 |H | Short_Literal 0x1 00ad 4818 |H | Short_Literal 0x18 00ae 00da | | Load_Top At_Offset_2 00af 01d6 | | Execute Vector,Field_Write 00b0 4801 |H | Short_Literal 0x1 00b1 4819 |H | Short_Literal 0x19 00b2 00da | | Load_Top At_Offset_2 00b3 01d6 | | Execute Vector,Field_Write 00b4 4801 |H | Short_Literal 0x1 00b5 481a |H | Short_Literal 0x1a 00b6 00da | | Load_Top At_Offset_2 00b7 01d6 | | Execute Vector,Field_Write 00b8 4801 |H | Short_Literal 0x1 00b9 481b |H | Short_Literal 0x1b 00ba 00da | | Load_Top At_Offset_2 00bb 01d6 | | Execute Vector,Field_Write 00bc 4801 |H | Short_Literal 0x1 00bd 481c |H | Short_Literal 0x1c 00be 00da | | Load_Top At_Offset_2 00bf 01d6 | | Execute Vector,Field_Write 00c0 4801 |H | Short_Literal 0x1 00c1 481d |H | Short_Literal 0x1d 00c2 00da | | Load_Top At_Offset_2 00c3 01d6 | | Execute Vector,Field_Write 00c4 4801 |H | Short_Literal 0x1 00c5 481e |H | Short_Literal 0x1e 00c6 00da | | Load_Top At_Offset_2 00c7 01d6 | | Execute Vector,Field_Write 00c8 4801 |H | Short_Literal 0x1 00c9 481f |H | Short_Literal 0x1f 00ca 00da | | Load_Top At_Offset_2 00cb 01d6 | | Execute Vector,Field_Write 00cc 00da | | Load_Top At_Offset_2 00cd 01c3 | | Execute Vector,Check_In_Type 00ce 0129 | ) | Execute Any,Make_Visible 00cf 4820 |H | Short_Literal 0x20 00d0 4800 |H | Short_Literal 0x0 00d1 480f |H | Short_Literal 0xf 00d2 029f 028b | | Declare_Subprogram INIT_0288,For_Call 00d4 03fb | | Declare_Type Discrete,Defined,Visible,With_Size 00d5 0007 | | Action Break_Optional 00d6 4800 |H | Short_Literal 0x0 00d7 4802 |H | Short_Literal 0x2 00d8 029f 02b3 | | Declare_Subprogram INIT_02b0,For_Call 00da 03fe | | Declare_Type Discrete,Defined,Visible 00db 0007 | | Action Break_Optional 00dc 4800 |H | Short_Literal 0x0 00dd 4802 |H | Short_Literal 0x2 00de 029f 02db | | Declare_Subprogram INIT_02d8,For_Call 00e0 03fe | | Declare_Type Discrete,Defined,Visible 00e1 0007 | | Action Break_Optional 00e2 4800 |H | Short_Literal 0x0 00e3 4801 |H | Short_Literal 0x1 00e4 029f 0303 | | Declare_Subprogram INIT_0300,For_Call 00e6 03fe | | Declare_Type Discrete,Defined,Visible 00e7 0007 | | Action Break_Optional 00e8 00db | | Load_Top At_Offset_3 00e9 e004 | | Load 0x0,0x4 00ea 00d8 | | Load_Top At_Offset_0 00eb e004 | | Load 0x0,0x4 00ec e005 | | Load 0x0,0x5 00ed e219 | | Load 0x1,0x19 00ee e20f | | Load 0x1,0xf 00ef e218 | | Load 0x1,0x18 00f0 e212 | | Load 0x1,0x12 00f1 e211 | | Load 0x1,0x11 00f2 e20d | | Load 0x1,0xd 00f3 e006 | | Load 0x0,0x6 00f4 00d8 | | Load_Top At_Offset_0 00f5 e007 | | Load 0x0,0x7 00f6 00d8 | | Load_Top At_Offset_0 00f7 e008 | | Load 0x0,0x8 00f8 e21a | | Load 0x1,0x1a 00f9 00e1 | | Load_Encached Boolean_Cache 00fa e007 | | Load 0x0,0x7 00fb 00d8 | | Load_Top At_Offset_0 00fc e006 | | Load 0x0,0x6 00fd e005 | | Load 0x0,0x5 00fe e009 | | Load 0x0,0x9 00ff 029f 032b | +| Declare_Subprogram INIT_0328,For_Call 0101 4817 |H | Short_Literal 0x17 0102 032e | . | Declare_Type Record,Defined,Visible 0103 00d8 | | Load_Top At_Offset_0 0104 0322 | " | Declare_Variable Record 0105 4800 |H | Short_Literal 0x0 0106 00d9 | | Load_Top At_Offset_1 0107 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0108 4800 |H | Short_Literal 0x0 0109 00d9 | | Load_Top At_Offset_1 010a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 010b 4800 |H | Short_Literal 0x0 010c 00d9 | | Load_Top At_Offset_1 010d 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 010e 4800 |H | Short_Literal 0x0 010f 00d9 | | Load_Top At_Offset_1 0110 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0111 4800 |H | Short_Literal 0x0 0112 00d9 | | Load_Top At_Offset_1 0113 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0114 4800 |H | Short_Literal 0x0 0115 00d9 | | Load_Top At_Offset_1 0116 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0117 4800 |H | Short_Literal 0x0 0118 00d9 | | Load_Top At_Offset_1 0119 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 011a 4800 |H | Short_Literal 0x0 011b 00d9 | | Load_Top At_Offset_1 011c 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 011d 4800 |H | Short_Literal 0x0 011e 00d9 | | Load_Top At_Offset_1 011f 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 0120 4800 |H | Short_Literal 0x0 0121 00d9 | | Load_Top At_Offset_1 0122 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 0123 4800 |H | Short_Literal 0x0 0124 00d9 | | Load_Top At_Offset_1 0125 380a |8 | Execute Record,Field_Write,Field_Number 0xa 0126 e002 | | Load 0x0,0x2 0127 00d9 | | Load_Top At_Offset_1 0128 380b |8 | Execute Record,Field_Write,Field_Number 0xb 0129 e002 | | Load 0x0,0x2 012a 00d9 | | Load_Top At_Offset_1 012b 380c |8 | Execute Record,Field_Write,Field_Number 0xc 012c 4800 |H | Short_Literal 0x0 012d 00d9 | | Load_Top At_Offset_1 012e 380d |8 | Execute Record,Field_Write,Field_Number 0xd 012f 4800 |H | Short_Literal 0x0 0130 00d9 | | Load_Top At_Offset_1 0131 380e |8 | Execute Record,Field_Write,Field_Number 0xe 0132 e00a | | Load 0x0,0xa 0133 00d9 | | Load_Top At_Offset_1 0134 380f |8 | Execute Record,Field_Write,Field_Number 0xf 0135 4800 |H | Short_Literal 0x0 0136 00d9 | | Load_Top At_Offset_1 0137 3810 |8 | Execute Record,Field_Write,Field_Number 0x10 0138 4800 |H | Short_Literal 0x0 0139 00d9 | | Load_Top At_Offset_1 013a 3811 |8 | Execute Record,Field_Write,Field_Number 0x11 013b 4800 |H | Short_Literal 0x0 013c 00d9 | | Load_Top At_Offset_1 013d 3812 |8 | Execute Record,Field_Write,Field_Number 0x12 013e 4800 |H | Short_Literal 0x0 013f 00d9 | | Load_Top At_Offset_1 0140 3813 |8 | Execute Record,Field_Write,Field_Number 0x13 0141 e002 | | Load 0x0,0x2 0142 00d9 | | Load_Top At_Offset_1 0143 3814 |8 | Execute Record,Field_Write,Field_Number 0x14 0144 4800 |H | Short_Literal 0x0 0145 00d9 | | Load_Top At_Offset_1 0146 3815 |8 | Execute Record,Field_Write,Field_Number 0x15 0147 4800 |H | Short_Literal 0x0 0148 00d9 | | Load_Top At_Offset_1 0149 3816 |8 | Execute Record,Field_Write,Field_Number 0x16 014a 0129 | ) | Execute Any,Make_Visible 014b e00b | | Load 0x0,0xb 014c e00c | | Load 0x0,0xc 014d 00e1 | | Load_Encached Boolean_Cache 014e 00e1 | | Load_Encached Boolean_Cache 014f e214 | | Load 0x1,0x14 0150 e21b | | Load 0x1,0x1b 0151 029f 037b | {| Declare_Subprogram INIT_0378,For_Call 0153 4806 |H | Short_Literal 0x6 0154 032e | . | Declare_Type Record,Defined,Visible 0155 00d8 | | Load_Top At_Offset_0 0156 02a0 | | Declare_Subprogram Null_Subprogram 0157 4818 |H | Short_Literal 0x18 0158 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected 0159 00d8 | | Load_Top At_Offset_0 015a 0221 | ! | Execute Access,Allow_Deallocate 015b 0007 | | Action Break_Optional 015c 0007 | | Action Break_Optional 015d e00d | | Load 0x0,0xd 015e 0266 | f | Execute Discrete,Bounds 015f 00da | | Load_Top At_Offset_2 0160 02a0 | | Declare_Subprogram Null_Subprogram 0161 4801 |H | Short_Literal 0x1 0162 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object 0163 00d8 | | Load_Top At_Offset_0 0164 02a0 | | Declare_Subprogram Null_Subprogram 0165 4818 |H | Short_Literal 0x18 0166 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected 0167 0007 | | Action Break_Optional 0168 00bf | | Action Accept_Activation 0169 BODY_0008: 0169 00bc | | Action Signal_Activated 016a 00bb | | Action Signal_Completion 016b 0000 0000 | | .BLANK 0000[0x5] 0170 ; -------------------------------------------------------------------------------------- 0170 ; SUBPROGRAM 0170 ; -------------------------------------------------------------------------------------- 0170 0173 | s | .CONST 0x0173 ; Address of begin 0171 0004 | | .CONST 0x0004 ; Address of exception handler 0172 0001 | | .CONST 0x0001 ; Number of locals 0173 BODY_0170: 0173 INIT_0170: 0173 4607 |F | Jump_Case 0x8 0174 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0175 7807 |x | Jump 0x17d ; case 0x1 0176 780a |x | Jump 0x181 ; case 0x2 0177 780e |x | Jump 0x186 ; case 0x3 0178 7811 |x | Jump 0x18a ; case 0x4 0179 7812 |x | Jump 0x18c ; case 0x5 017a 7813 |x | Jump 0x18e ; case 0x6 017b 7816 |x | Jump 0x192 ; case 0x7 017c 4302 |C | .XXX[0x1] 017d 00da | | Load_Top At_Offset_2 017e 0091 0393 | | Action Push_String_Extended_Indexed,0x393 ; "ARC_CHORD" 0180 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0181 00db | | Load_Top At_Offset_3 0182 00db | | Load_Top At_Offset_3 0183 00e0 | | Load_Encached Standard_Cache 0184 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0185 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0186 00da | | Load_Top At_Offset_2 0187 00e0 | | Load_Encached Standard_Cache 0188 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0189 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 018a 00db | | Load_Top At_Offset_3 018b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 018c 00db | | Load_Top At_Offset_3 018d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 018e e20d | | Load 0x1,0xd 018f 00dc | | Load_Top At_Offset_4 0190 0267 | g | Execute Discrete,Predecessor 0191 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0192 e20d | | Load 0x1,0xd 0193 00dc | | Load_Top At_Offset_4 0194 0268 | h | Execute Discrete,Successor 0195 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0196 0000 0000 | | .XXX[0x2] 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 019b | | .CONST 0x019b ; Address of begin 0199 0004 | | .CONST 0x0004 ; Address of exception handler 019a 0001 | | .CONST 0x0001 ; Number of locals 019b BODY_0198: 019b INIT_0198: 019b 4607 |F | Jump_Case 0x8 019c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 019d 7807 |x | Jump 0x1a5 ; case 0x1 019e 780a |x | Jump 0x1a9 ; case 0x2 019f 780e |x | Jump 0x1ae ; case 0x3 01a0 7811 |x | Jump 0x1b2 ; case 0x4 01a1 7812 |x | Jump 0x1b4 ; case 0x5 01a2 7813 |x | Jump 0x1b6 ; case 0x6 01a3 7816 |x | Jump 0x1ba ; case 0x7 01a4 4302 |C | .XXX[0x1] 01a5 00da | | Load_Top At_Offset_2 01a6 0091 0395 | | Action Push_String_Extended_Indexed,0x395 ; "CURSOR_SHAPE" 01a8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 01a9 00db | | Load_Top At_Offset_3 01aa 00db | | Load_Top At_Offset_3 01ab 00e0 | | Load_Encached Standard_Cache 01ac 181b | | Execute Package,Field_Execute,Field_Number 0x1b 01ad 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01ae 00da | | Load_Top At_Offset_2 01af 00e0 | | Load_Encached Standard_Cache 01b0 181c | | Execute Package,Field_Execute,Field_Number 0x1c 01b1 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 01b2 00db | | Load_Top At_Offset_3 01b3 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01b4 00db | | Load_Top At_Offset_3 01b5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01b6 e20e | | Load 0x1,0xe 01b7 00dc | | Load_Top At_Offset_4 01b8 0267 | g | Execute Discrete,Predecessor 01b9 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01ba e20e | | Load 0x1,0xe 01bb 00dc | | Load_Top At_Offset_4 01bc 0268 | h | Execute Discrete,Successor 01bd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01be 0000 0000 | | .XXX[0x2] 01c0 ; -------------------------------------------------------------------------------------- 01c0 ; SUBPROGRAM 01c0 ; -------------------------------------------------------------------------------------- 01c0 01c3 | | .CONST 0x01c3 ; Address of begin 01c1 0004 | | .CONST 0x0004 ; Address of exception handler 01c2 0001 | | .CONST 0x0001 ; Number of locals 01c3 BODY_01c0: 01c3 INIT_01c0: 01c3 4607 |F | Jump_Case 0x8 01c4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 01c5 7807 |x | Jump 0x1cd ; case 0x1 01c6 780a |x | Jump 0x1d1 ; case 0x2 01c7 780e |x | Jump 0x1d6 ; case 0x3 01c8 7811 |x | Jump 0x1da ; case 0x4 01c9 7812 |x | Jump 0x1dc ; case 0x5 01ca 7813 |x | Jump 0x1de ; case 0x6 01cb 7816 |x | Jump 0x1e2 ; case 0x7 01cc 4302 |C | .XXX[0x1] 01cd 00da | | Load_Top At_Offset_2 01ce 0091 0398 | | Action Push_String_Extended_Indexed,0x398 ; "CAP_NOT_LAST" 01d0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 01d1 00db | | Load_Top At_Offset_3 01d2 00db | | Load_Top At_Offset_3 01d3 00e0 | | Load_Encached Standard_Cache 01d4 181b | | Execute Package,Field_Execute,Field_Number 0x1b 01d5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01d6 00da | | Load_Top At_Offset_2 01d7 00e0 | | Load_Encached Standard_Cache 01d8 181c | | Execute Package,Field_Execute,Field_Number 0x1c 01d9 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 01da 00db | | Load_Top At_Offset_3 01db 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01dc 00db | | Load_Top At_Offset_3 01dd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01de e20f | | Load 0x1,0xf 01df 00dc | | Load_Top At_Offset_4 01e0 0267 | g | Execute Discrete,Predecessor 01e1 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01e2 e20f | | Load 0x1,0xf 01e3 00dc | | Load_Top At_Offset_4 01e4 0268 | h | Execute Discrete,Successor 01e5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01e6 0000 0000 | | .XXX[0x2] 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 01eb | | .CONST 0x01eb ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 0001 | | .CONST 0x0001 ; Number of locals 01eb BODY_01e8: 01eb INIT_01e8: 01eb 4607 |F | Jump_Case 0x8 01ec 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 01ed 7807 |x | Jump 0x1f5 ; case 0x1 01ee 780a |x | Jump 0x1f9 ; case 0x2 01ef 780e |x | Jump 0x1fe ; case 0x3 01f0 7811 |x | Jump 0x202 ; case 0x4 01f1 7812 |x | Jump 0x204 ; case 0x5 01f2 7813 |x | Jump 0x206 ; case 0x6 01f3 7816 |x | Jump 0x20a ; case 0x7 01f4 4302 |C | .XXX[0x1] 01f5 00da | | Load_Top At_Offset_2 01f6 0091 039c | | Action Push_String_Extended_Indexed,0x39c ; "UNSORTED" 01f8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 01f9 00db | | Load_Top At_Offset_3 01fa 00db | | Load_Top At_Offset_3 01fb 00e0 | | Load_Encached Standard_Cache 01fc 181b | | Execute Package,Field_Execute,Field_Number 0x1b 01fd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01fe 00da | | Load_Top At_Offset_2 01ff 00e0 | | Load_Encached Standard_Cache 0200 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0201 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0202 00db | | Load_Top At_Offset_3 0203 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0204 00db | | Load_Top At_Offset_3 0205 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0206 e210 | | Load 0x1,0x10 0207 00dc | | Load_Top At_Offset_4 0208 0267 | g | Execute Discrete,Predecessor 0209 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 020a e210 | | Load 0x1,0x10 020b 00dc | | Load_Top At_Offset_4 020c 0268 | h | Execute Discrete,Successor 020d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 020e 0000 0000 | | .XXX[0x2] 0210 ; -------------------------------------------------------------------------------------- 0210 ; SUBPROGRAM 0210 ; -------------------------------------------------------------------------------------- 0210 0213 | | .CONST 0x0213 ; Address of begin 0211 0004 | | .CONST 0x0004 ; Address of exception handler 0212 0001 | | .CONST 0x0001 ; Number of locals 0213 BODY_0210: 0213 INIT_0210: 0213 4607 |F | Jump_Case 0x8 0214 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0215 7807 |x | Jump 0x21d ; case 0x1 0216 780a |x | Jump 0x221 ; case 0x2 0217 780e |x | Jump 0x226 ; case 0x3 0218 7811 |x | Jump 0x22a ; case 0x4 0219 7812 |x | Jump 0x22c ; case 0x5 021a 7813 |x | Jump 0x22e ; case 0x6 021b 7816 |x | Jump 0x232 ; case 0x7 021c 4302 |C | .XXX[0x1] 021d 00da | | Load_Top At_Offset_2 021e 0091 03a0 | | Action Push_String_Extended_Indexed,0x3a0 ; "EVEN_ODD_RULE" 0220 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0221 00db | | Load_Top At_Offset_3 0222 00db | | Load_Top At_Offset_3 0223 00e0 | | Load_Encached Standard_Cache 0224 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0225 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0226 00da | | Load_Top At_Offset_2 0227 00e0 | | Load_Encached Standard_Cache 0228 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0229 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 022a 00db | | Load_Top At_Offset_3 022b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 022c 00db | | Load_Top At_Offset_3 022d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 022e e211 | | Load 0x1,0x11 022f 00dc | | Load_Top At_Offset_4 0230 0267 | g | Execute Discrete,Predecessor 0231 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0232 e211 | | Load 0x1,0x11 0233 00dc | | Load_Top At_Offset_4 0234 0268 | h | Execute Discrete,Successor 0235 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0236 0000 0000 | | .XXX[0x2] 0238 ; -------------------------------------------------------------------------------------- 0238 ; SUBPROGRAM 0238 ; -------------------------------------------------------------------------------------- 0238 023b | ; | .CONST 0x023b ; Address of begin 0239 0004 | | .CONST 0x0004 ; Address of exception handler 023a 0001 | | .CONST 0x0001 ; Number of locals 023b BODY_0238: 023b INIT_0238: 023b 4607 |F | Jump_Case 0x8 023c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 023d 7807 |x | Jump 0x245 ; case 0x1 023e 780a |x | Jump 0x249 ; case 0x2 023f 780e |x | Jump 0x24e ; case 0x3 0240 7811 |x | Jump 0x252 ; case 0x4 0241 7812 |x | Jump 0x254 ; case 0x5 0242 7813 |x | Jump 0x256 ; case 0x6 0243 7816 |x | Jump 0x25a ; case 0x7 0244 4302 |C | .XXX[0x1] 0245 00da | | Load_Top At_Offset_2 0246 0091 03a2 | | Action Push_String_Extended_Indexed,0x3a2 ; "FILL_SOLID" 0248 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0249 00db | | Load_Top At_Offset_3 024a 00db | | Load_Top At_Offset_3 024b 00e0 | | Load_Encached Standard_Cache 024c 181b | | Execute Package,Field_Execute,Field_Number 0x1b 024d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 024e 00da | | Load_Top At_Offset_2 024f 00e0 | | Load_Encached Standard_Cache 0250 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0251 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0252 00db | | Load_Top At_Offset_3 0253 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0254 00db | | Load_Top At_Offset_3 0255 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0256 e212 | | Load 0x1,0x12 0257 00dc | | Load_Top At_Offset_4 0258 0267 | g | Execute Discrete,Predecessor 0259 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 025a e212 | | Load 0x1,0x12 025b 00dc | | Load_Top At_Offset_4 025c 0268 | h | Execute Discrete,Successor 025d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 025e 0000 0000 | | .XXX[0x2] 0260 ; -------------------------------------------------------------------------------------- 0260 ; SUBPROGRAM 0260 ; -------------------------------------------------------------------------------------- 0260 0263 | c | .CONST 0x0263 ; Address of begin 0261 0004 | | .CONST 0x0004 ; Address of exception handler 0262 0001 | | .CONST 0x0001 ; Number of locals 0263 BODY_0260: 0263 INIT_0260: 0263 4607 |F | Jump_Case 0x8 0264 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0265 7807 |x | Jump 0x26d ; case 0x1 0266 780a |x | Jump 0x271 ; case 0x2 0267 780e |x | Jump 0x276 ; case 0x3 0268 7811 |x | Jump 0x27a ; case 0x4 0269 7812 |x | Jump 0x27c ; case 0x5 026a 7813 |x | Jump 0x27e ; case 0x6 026b 7816 |x | Jump 0x282 ; case 0x7 026c 4302 |C | .XXX[0x1] 026d 00da | | Load_Top At_Offset_2 026e 0091 03a6 | | Action Push_String_Extended_Indexed,0x3a6 ; "XGCL31" 0270 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0271 00db | | Load_Top At_Offset_3 0272 00db | | Load_Top At_Offset_3 0273 00e0 | | Load_Encached Standard_Cache 0274 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0275 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0276 00da | | Load_Top At_Offset_2 0277 00e0 | | Load_Encached Standard_Cache 0278 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0279 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 027a 00db | | Load_Top At_Offset_3 027b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 027c 00db | | Load_Top At_Offset_3 027d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 027e e213 | | Load 0x1,0x13 027f 00dc | | Load_Top At_Offset_4 0280 0267 | g | Execute Discrete,Predecessor 0281 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0282 e213 | | Load 0x1,0x13 0283 00dc | | Load_Top At_Offset_4 0284 0268 | h | Execute Discrete,Successor 0285 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0286 0000 0000 | | .XXX[0x2] 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 4607 |F | Jump_Case 0x8 028c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 028d 7807 |x | Jump 0x295 ; case 0x1 028e 780a |x | Jump 0x299 ; case 0x2 028f 780e |x | Jump 0x29e ; case 0x3 0290 7811 |x | Jump 0x2a2 ; case 0x4 0291 7812 |x | Jump 0x2a4 ; case 0x5 0292 7813 |x | Jump 0x2a6 ; case 0x6 0293 7816 |x | Jump 0x2aa ; case 0x7 0294 4302 |C | .XXX[0x1] 0295 00da | | Load_Top At_Offset_2 0296 0091 03c6 | | Action Push_String_Extended_Indexed,0x3c6 ; "GX_CLEAR" 0298 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0299 00db | | Load_Top At_Offset_3 029a 00db | | Load_Top At_Offset_3 029b 00e0 | | Load_Encached Standard_Cache 029c 181b | | Execute Package,Field_Execute,Field_Number 0x1b 029d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 029e 00da | | Load_Top At_Offset_2 029f 00e0 | | Load_Encached Standard_Cache 02a0 181c | | Execute Package,Field_Execute,Field_Number 0x1c 02a1 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 02a2 00db | | Load_Top At_Offset_3 02a3 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02a4 00db | | Load_Top At_Offset_3 02a5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02a6 e217 | | Load 0x1,0x17 02a7 00dc | | Load_Top At_Offset_4 02a8 0267 | g | Execute Discrete,Predecessor 02a9 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02aa e217 | | Load 0x1,0x17 02ab 00dc | | Load_Top At_Offset_4 02ac 0268 | h | Execute Discrete,Successor 02ad 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02ae 0000 0000 | | .XXX[0x2] 02b0 ; -------------------------------------------------------------------------------------- 02b0 ; SUBPROGRAM 02b0 ; -------------------------------------------------------------------------------------- 02b0 02b3 | | .CONST 0x02b3 ; Address of begin 02b1 0004 | | .CONST 0x0004 ; Address of exception handler 02b2 0001 | | .CONST 0x0001 ; Number of locals 02b3 BODY_02b0: 02b3 INIT_02b0: 02b3 4607 |F | Jump_Case 0x8 02b4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 02b5 7807 |x | Jump 0x2bd ; case 0x1 02b6 780a |x | Jump 0x2c1 ; case 0x2 02b7 780e |x | Jump 0x2c6 ; case 0x3 02b8 7811 |x | Jump 0x2ca ; case 0x4 02b9 7812 |x | Jump 0x2cc ; case 0x5 02ba 7813 |x | Jump 0x2ce ; case 0x6 02bb 7816 |x | Jump 0x2d2 ; case 0x7 02bc 4302 |C | .XXX[0x1] 02bd 00da | | Load_Top At_Offset_2 02be 0091 03d6 | | Action Push_String_Extended_Indexed,0x3d6 ; "JOIN_MITER" 02c0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 02c1 00db | | Load_Top At_Offset_3 02c2 00db | | Load_Top At_Offset_3 02c3 00e0 | | Load_Encached Standard_Cache 02c4 181b | | Execute Package,Field_Execute,Field_Number 0x1b 02c5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02c6 00da | | Load_Top At_Offset_2 02c7 00e0 | | Load_Encached Standard_Cache 02c8 181c | | Execute Package,Field_Execute,Field_Number 0x1c 02c9 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 02ca 00db | | Load_Top At_Offset_3 02cb 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02cc 00db | | Load_Top At_Offset_3 02cd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02ce e218 | | Load 0x1,0x18 02cf 00dc | | Load_Top At_Offset_4 02d0 0267 | g | Execute Discrete,Predecessor 02d1 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02d2 e218 | | Load 0x1,0x18 02d3 00dc | | Load_Top At_Offset_4 02d4 0268 | h | Execute Discrete,Successor 02d5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02d6 0000 0000 | | .XXX[0x2] 02d8 ; -------------------------------------------------------------------------------------- 02d8 ; SUBPROGRAM 02d8 ; -------------------------------------------------------------------------------------- 02d8 02db | | .CONST 0x02db ; Address of begin 02d9 0004 | | .CONST 0x0004 ; Address of exception handler 02da 0001 | | .CONST 0x0001 ; Number of locals 02db BODY_02d8: 02db INIT_02d8: 02db 4607 |F | Jump_Case 0x8 02dc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 02dd 7807 |x | Jump 0x2e5 ; case 0x1 02de 780a |x | Jump 0x2e9 ; case 0x2 02df 780e |x | Jump 0x2ee ; case 0x3 02e0 7811 |x | Jump 0x2f2 ; case 0x4 02e1 7812 |x | Jump 0x2f4 ; case 0x5 02e2 7813 |x | Jump 0x2f6 ; case 0x6 02e3 7816 |x | Jump 0x2fa ; case 0x7 02e4 4302 |C | .XXX[0x1] 02e5 00da | | Load_Top At_Offset_2 02e6 0091 03d9 | | Action Push_String_Extended_Indexed,0x3d9 ; "LINE_SOLID" 02e8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 02e9 00db | | Load_Top At_Offset_3 02ea 00db | | Load_Top At_Offset_3 02eb 00e0 | | Load_Encached Standard_Cache 02ec 181b | | Execute Package,Field_Execute,Field_Number 0x1b 02ed 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02ee 00da | | Load_Top At_Offset_2 02ef 00e0 | | Load_Encached Standard_Cache 02f0 181c | | Execute Package,Field_Execute,Field_Number 0x1c 02f1 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 02f2 00db | | Load_Top At_Offset_3 02f3 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02f4 00db | | Load_Top At_Offset_3 02f5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02f6 e219 | | Load 0x1,0x19 02f7 00dc | | Load_Top At_Offset_4 02f8 0267 | g | Execute Discrete,Predecessor 02f9 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02fa e219 | | Load 0x1,0x19 02fb 00dc | | Load_Top At_Offset_4 02fc 0268 | h | Execute Discrete,Successor 02fd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02fe 0000 0000 | | .XXX[0x2] 0300 ; -------------------------------------------------------------------------------------- 0300 ; SUBPROGRAM 0300 ; -------------------------------------------------------------------------------------- 0300 0303 | | .CONST 0x0303 ; Address of begin 0301 0004 | | .CONST 0x0004 ; Address of exception handler 0302 0001 | | .CONST 0x0001 ; Number of locals 0303 BODY_0300: 0303 INIT_0300: 0303 4607 |F | Jump_Case 0x8 0304 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0305 7807 |x | Jump 0x30d ; case 0x1 0306 780a |x | Jump 0x311 ; case 0x2 0307 780e |x | Jump 0x316 ; case 0x3 0308 7811 |x | Jump 0x31a ; case 0x4 0309 7812 |x | Jump 0x31c ; case 0x5 030a 7813 |x | Jump 0x31e ; case 0x6 030b 7816 |x | Jump 0x322 ; case 0x7 030c 4302 |C | .XXX[0x1] 030d 00da | | Load_Top At_Offset_2 030e 0091 03dc | | Action Push_String_Extended_Indexed,0x3dc ; "CLIP_BY_CHILDREN" 0310 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0311 00db | | Load_Top At_Offset_3 0312 00db | | Load_Top At_Offset_3 0313 00e0 | | Load_Encached Standard_Cache 0314 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0315 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0316 00da | | Load_Top At_Offset_2 0317 00e0 | | Load_Encached Standard_Cache 0318 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0319 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 031a 00db | | Load_Top At_Offset_3 031b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 031c 00db | | Load_Top At_Offset_3 031d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 031e e21a | | Load 0x1,0x1a 031f 00dc | | Load_Top At_Offset_4 0320 0267 | g | Execute Discrete,Predecessor 0321 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0322 e21a | | Load 0x1,0x1a 0323 00dc | | Load_Top At_Offset_4 0324 0268 | h | Execute Discrete,Successor 0325 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0326 0000 0000 | | .XXX[0x2] 0328 ; -------------------------------------------------------------------------------------- 0328 ; SUBPROGRAM 0328 ; -------------------------------------------------------------------------------------- 0328 032b | + | .CONST 0x032b ; Address of begin 0329 0004 | | .CONST 0x0004 ; Address of exception handler 032a 0001 | | .CONST 0x0001 ; Number of locals 032b BODY_0328: 032b INIT_0328: 032b 4601 |F | Jump_Case 0x2 032c 7801 |x | Jump 0x32e ; case 0x0 032d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 032e 4800 |H | Short_Literal 0x0 032f 00db | | Load_Top At_Offset_3 0330 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0331 4800 |H | Short_Literal 0x0 0332 00db | | Load_Top At_Offset_3 0333 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0334 4800 |H | Short_Literal 0x0 0335 00db | | Load_Top At_Offset_3 0336 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0337 4800 |H | Short_Literal 0x0 0338 00db | | Load_Top At_Offset_3 0339 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 033a 4800 |H | Short_Literal 0x0 033b 00db | | Load_Top At_Offset_3 033c 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 033d 4800 |H | Short_Literal 0x0 033e 00db | | Load_Top At_Offset_3 033f 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0340 4800 |H | Short_Literal 0x0 0341 00db | | Load_Top At_Offset_3 0342 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0343 4800 |H | Short_Literal 0x0 0344 00db | | Load_Top At_Offset_3 0345 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0346 4800 |H | Short_Literal 0x0 0347 00db | | Load_Top At_Offset_3 0348 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 0349 4800 |H | Short_Literal 0x0 034a 00db | | Load_Top At_Offset_3 034b 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 034c 4800 |H | Short_Literal 0x0 034d 00db | | Load_Top At_Offset_3 034e 380a |8 | Execute Record,Field_Write,Field_Number 0xa 034f e002 | | Load 0x0,0x2 0350 00db | | Load_Top At_Offset_3 0351 380b |8 | Execute Record,Field_Write,Field_Number 0xb 0352 e002 | | Load 0x0,0x2 0353 00db | | Load_Top At_Offset_3 0354 380c |8 | Execute Record,Field_Write,Field_Number 0xc 0355 4800 |H | Short_Literal 0x0 0356 00db | | Load_Top At_Offset_3 0357 380d |8 | Execute Record,Field_Write,Field_Number 0xd 0358 4800 |H | Short_Literal 0x0 0359 00db | | Load_Top At_Offset_3 035a 380e |8 | Execute Record,Field_Write,Field_Number 0xe 035b 4800 |H | Short_Literal 0x0 035c 00db | | Load_Top At_Offset_3 035d 3810 |8 | Execute Record,Field_Write,Field_Number 0x10 035e 4800 |H | Short_Literal 0x0 035f 00db | | Load_Top At_Offset_3 0360 3811 |8 | Execute Record,Field_Write,Field_Number 0x11 0361 4800 |H | Short_Literal 0x0 0362 00db | | Load_Top At_Offset_3 0363 3812 |8 | Execute Record,Field_Write,Field_Number 0x12 0364 4800 |H | Short_Literal 0x0 0365 00db | | Load_Top At_Offset_3 0366 3813 |8 | Execute Record,Field_Write,Field_Number 0x13 0367 e002 | | Load 0x0,0x2 0368 00db | | Load_Top At_Offset_3 0369 3814 |8 | Execute Record,Field_Write,Field_Number 0x14 036a 4800 |H | Short_Literal 0x0 036b 00db | | Load_Top At_Offset_3 036c 3815 |8 | Execute Record,Field_Write,Field_Number 0x15 036d 4800 |H | Short_Literal 0x0 036e 00db | | Load_Top At_Offset_3 036f 3816 |8 | Execute Record,Field_Write,Field_Number 0x16 0370 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0371 0000 0000 | | .BLANK 0000[0x7] 0378 ; -------------------------------------------------------------------------------------- 0378 ; SUBPROGRAM 0378 ; -------------------------------------------------------------------------------------- 0378 037b | { | .CONST 0x037b ; Address of begin 0379 0004 | | .CONST 0x0004 ; Address of exception handler 037a 0001 | | .CONST 0x0001 ; Number of locals 037b BODY_0378: 037b INIT_0378: 037b 4601 |F | Jump_Case 0x2 037c 7801 |x | Jump 0x37e ; case 0x0 037d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 037e e003 | | Load 0x0,0x3 037f 00db | | Load_Top At_Offset_3 0380 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0381 4800 |H | Short_Literal 0x0 0382 00db | | Load_Top At_Offset_3 0383 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0384 4800 |H | Short_Literal 0x0 0385 00db | | Load_Top At_Offset_3 0386 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0387 e215 | | Load 0x1,0x15 0388 00db | | Load_Top At_Offset_3 0389 00d9 | | Load_Top At_Offset_1 038a 00d9 | | Load_Top At_Offset_1 038b 3004 |0 | Execute Record,Field_Type,Field_Number 0x4 038c 0119 | | Execute Any,Check_In_Formal_Type 038d 00d1 | | Pop_Control Pop_Count_1 038e 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 038f 00da | | Load_Top At_Offset_2 0390 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0391 1c00 | | Execute_Immediate Run_Utility,0x0 0392 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0393 ; -------------------------------------------------------------------------------------- 0393 ; STRING TABLE 0393 ; -------------------------------------------------------------------------------------- 0393 0098 | | .STRTAB 0x0098->0x03df ; "ARC_CHORD" 0394 009f | | .STRTAB 0x009f->0x03e3 ; "ARC_PIE_SLICE" 0395 00aa | | .STRTAB 0x00aa->0x03ea ; "CURSOR_SHAPE" 0396 00b4 | | .STRTAB 0x00b4->0x03f0 ; "TILE_SHAPE" 0397 00bc | | .STRTAB 0x00bc->0x03f5 ; "STIPPLE_SHAPE" 0398 00c7 | | .STRTAB 0x00c7->0x03fb ; "CAP_NOT_LAST" 0399 00d1 | | .STRTAB 0x00d1->0x0401 ; "CAP_BUTT" 039a 00d7 | | .STRTAB 0x00d7->0x0405 ; "CAP_ROUND" 039b 00de | | .STRTAB 0x00de->0x040a ; "CAP_PROJECTING" 039c 00ea | | .STRTAB 0x00ea->0x0411 ; "UNSORTED" 039d 00f0 | | .STRTAB 0x00f0->0x0415 ; "Y_SORTED" 039e 00f6 | | .STRTAB 0x00f6->0x0419 ; "Y_X_SORTED" 039f 00fe | | .STRTAB 0x00fe->0x041e ; "Y_X_BANDED" 03a0 0106 | | .STRTAB 0x0106->0x0423 ; "EVEN_ODD_RULE" 03a1 0111 | | .STRTAB 0x0111->0x0429 ; "WINDING_RULE" 03a2 011b | | .STRTAB 0x011b->0x042f ; "FILL_SOLID" 03a3 0123 | # | .STRTAB 0x0123->0x0434 ; "FILL_TILED" 03a4 012b | + | .STRTAB 0x012b->0x0439 ; "FILL_STIPPLED" 03a5 0136 | 6 | .STRTAB 0x0136->0x0440 ; "FILL_OPAQUE_STIPPLED" 03a6 0148 | H | .STRTAB 0x0148->0x044a ; "XGCL31" 03a7 014c | L | .STRTAB 0x014c->0x044d ; "XGCL30" 03a8 0150 | P | .STRTAB 0x0150->0x0450 ; "XGCL29" 03a9 0154 | T | .STRTAB 0x0154->0x0453 ; "XGCL28" 03aa 0158 | X | .STRTAB 0x0158->0x0456 ; "XGCL27" 03ab 015c | \ | .STRTAB 0x015c->0x0459 ; "XGCL26" 03ac 0160 | ` | .STRTAB 0x0160->0x045c ; "XGCL25" 03ad 0164 | d | .STRTAB 0x0164->0x045f ; "XGCL24" 03ae 0168 | h | .STRTAB 0x0168->0x0462 ; "XGCL23" 03af 016c | l | .STRTAB 0x016c->0x0465 ; "GC_ARC_MODE" 03b0 0175 | u | .STRTAB 0x0175->0x046a ; "GC_DASH_LIST" 03b1 017f | | .STRTAB 0x017f->0x0470 ; "GC_DASH_OFFSET" 03b2 018b | | .STRTAB 0x018b->0x0477 ; "GC_CLIP_MASK" 03b3 0195 | | .STRTAB 0x0195->0x047d ; "GC_CLIP_Y_ORIGIN" 03b4 01a3 | | .STRTAB 0x01a3->0x0485 ; "GC_CLIP_X_ORIGIN" 03b5 01b1 | | .STRTAB 0x01b1->0x048d ; "GC_GRAPHICS_EXPOSURES" 03b6 01c4 | | .STRTAB 0x01c4->0x0498 ; "GC_SUBWINDOW_MODE" 03b7 01d3 | | .STRTAB 0x01d3->0x04a0 ; "GC_FONT" 03b8 01d8 | | .STRTAB 0x01d8->0x04a4 ; "GC_TILE_STIP_Y_ORIGIN" 03b9 01eb | | .STRTAB 0x01eb->0x04ae ; "GC_TILE_STIP_X_ORIGIN" 03ba 01fe | | .STRTAB 0x01fe->0x04b9 ; "GC_STIPPLE" 03bb 0206 | | .STRTAB 0x0206->0x04be ; "GC_TILE" 03bc 020b | | .STRTAB 0x020b->0x04c1 ; "GC_FILL_RULE" 03bd 0215 | | .STRTAB 0x0215->0x04c7 ; "GC_FILL_STYLE" 03be 0220 | | .STRTAB 0x0220->0x04ce ; "GC_JOIN_STYLE" 03bf 022b | + | .STRTAB 0x022b->0x04d4 ; "GC_CAP_STYLE" 03c0 0235 | 5 | .STRTAB 0x0235->0x04da ; "GC_LINE_STYLE" 03c1 0240 | @ | .STRTAB 0x0240->0x04e1 ; "GC_LINE_WIDTH" 03c2 024b | K | .STRTAB 0x024b->0x04e7 ; "GC_BACKGROUND" 03c3 0256 | V | .STRTAB 0x0256->0x04ee ; "GC_FOREGROUND" 03c4 0261 | a | .STRTAB 0x0261->0x04f4 ; "GC_PLANE_MASK" 03c5 026c | l | .STRTAB 0x026c->0x04fb ; "GC_FUNCTION" 03c6 0275 | u | .STRTAB 0x0275->0x0500 ; "GX_CLEAR" 03c7 027b | { | .STRTAB 0x027b->0x0504 ; "GX_AND" 03c8 027f | | .STRTAB 0x027f->0x0507 ; "GX_AND_REVERSE" 03c9 028b | | .STRTAB 0x028b->0x050e ; "GX_COPY" 03ca 0290 | | .STRTAB 0x0290->0x0512 ; "GX_AND_INVERTED" 03cb 029d | | .STRTAB 0x029d->0x0519 ; "GX_NOOP" 03cc 02a2 | | .STRTAB 0x02a2->0x051d ; "GX_XOR" 03cd 02a6 | | .STRTAB 0x02a6->0x0520 ; "GX_OR" 03ce 02a9 | | .STRTAB 0x02a9->0x0522 ; "GX_NOR" 03cf 02ad | | .STRTAB 0x02ad->0x0525 ; "GX_EQUIV" 03d0 02b3 | | .STRTAB 0x02b3->0x0529 ; "GX_INVERT" 03d1 02ba | | .STRTAB 0x02ba->0x052e ; "GX_OR_REVERSE" 03d2 02c5 | | .STRTAB 0x02c5->0x0534 ; "GX_COPY_INVERTED" 03d3 02d3 | | .STRTAB 0x02d3->0x053c ; "GX_OR_INVERTED" 03d4 02df | | .STRTAB 0x02df->0x0543 ; "GX_NAND" 03d5 02e4 | | .STRTAB 0x02e4->0x0547 ; "GX_SET" 03d6 02e8 | | .STRTAB 0x02e8->0x054a ; "JOIN_MITER" 03d7 02f0 | | .STRTAB 0x02f0->0x054f ; "JOIN_ROUND" 03d8 02f8 | | .STRTAB 0x02f8->0x0554 ; "JOIN_BEVEL" 03d9 0300 | | .STRTAB 0x0300->0x0559 ; "LINE_SOLID" 03da 0308 | | .STRTAB 0x0308->0x055e ; "LINE_ON_OFF_DASH" 03db 0316 | | .STRTAB 0x0316->0x0566 ; "LINE_DOUBLE_DASH" 03dc 0324 | $ | .STRTAB 0x0324->0x056e ; "CLIP_BY_CHILDREN" 03dd 0332 | 2 | .STRTAB 0x0332->0x0576 ; "INCLUDE_INFERIORS" 03de 0341 | A | .STREND 0x0341->0x057e 03df 4152 435f |ARC_| .STRTAB_STRINGS 057f 0000 | | .XXX[0x1] 0580 ; -------------------------------------------------------------------------------------- 0580 ; Debug Table 0580 ; -------------------------------------------------------------------------------------- 0580 0004 0000 | | .DEBUG4 0x0004,0x0000,0x48c8,0x0000,0x0001,0x000e 0586 000b 05be | | .DBG4T 0x000b,0x05be,0x8000,0x0000 058a 0173 0000 | s | .DBG4T 0x0173,0x0000,0x0005,0x0000 058e 019b 0000 | | .DBG4T 0x019b,0x0000,0x0005,0x0000 0592 01c3 0000 | | .DBG4T 0x01c3,0x0000,0x0005,0x0000 0596 01eb 0000 | | .DBG4T 0x01eb,0x0000,0x0005,0x0000 059a 0213 0000 | | .DBG4T 0x0213,0x0000,0x0005,0x0000 059e 023b 0000 | ; | .DBG4T 0x023b,0x0000,0x0005,0x0000 05a2 0263 0000 | c | .DBG4T 0x0263,0x0000,0x0005,0x0000 05a6 028b 0000 | | .DBG4T 0x028b,0x0000,0x0005,0x0000 05aa 02b3 0000 | | .DBG4T 0x02b3,0x0000,0x0005,0x0000 05ae 02db 0000 | | .DBG4T 0x02db,0x0000,0x0005,0x0000 05b2 0303 0000 | | .DBG4T 0x0303,0x0000,0x0005,0x0000 05b6 032b 0000 | + | .DBG4T 0x032b,0x0000,0x0005,0x0000 05ba 037b 0000 | { | .DBG4T 0x037b,0x0000,0x0005,0x0000 05be ; -------------------------------------------------------------------------------------- 05be ; Debug chain 05be ; -------------------------------------------------------------------------------------- 05be 0022 0000 | " | .DBGLEN 0x0022,0x0000 05c0 000b 0010 | | .DBGLNO 0x000b,0x0010,0x0011,0x0017,0x001c,0x001d,0x0023,0x0024,0x0029,0x002a,0x002f,0x0030,0x0035,0x0036,0x003c,0x004a,0x00cf,0x00d5,0x00d6,0x00db,0x00dc,0x00e1,0x00e2,0x00e7,0x00e8,0x0103,0x014b,0x0155,0x015b,0x015c,0x015d,0x0163,0x0167,0x0168 05e2 0000 0000 | | .BLANK 0000[0x1e]