|
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: 2048 (0x800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6148f2
└─⟦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 02b0 | | .CONST 0x02b0 ; 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 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 001c | | .CONST 0x001c ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0011 | | .CONST 0x0011 ; Number of locals
000b INIT_0008:
000b 029a 0023 | #| Declare_Subprogram INIT_0020,For_Outer_Call,Visible,Unelaborated
000d 00bf | | Action Accept_Activation
000e e002 | | Load 0x0,0x2
000f 0322 | " | Declare_Variable Record
0010 e003 | | Load 0x0,0x3
0011 0007 | | Action Break_Optional
0012 0007 | | Action Break_Optional
0013 4800 |H | Short_Literal 0x0
0014 4809 |H | Short_Literal 0x9
0015 e004 | | Load 0x0,0x4
0016 035b | [ | Declare_Type Array,Constrained
0017 0337 | 7 | Declare_Variable Array
0018 e005 | | Load 0x0,0x5
0019 0322 | " | Declare_Variable Record
001a 1d0d | | Execute_Immediate Reference_Lex_1,0xd
001b 00c7 | | Action Elaborate_Subprogram
001c BODY_0008:
001c 00bc | | Action Signal_Activated
001d 00bb | | Action Signal_Completion
001e 0000 0000 | | .XXX[0x2]
0020 ; --------------------------------------------------------------------------------------
0020 ; SUBPROGRAM
0020 ; --------------------------------------------------------------------------------------
0020 005d | ] | .CONST 0x005d ; Address of begin
0021 0004 | | .CONST 0x0004 ; Address of exception handler
0022 001a | | .CONST 0x001a ; Number of locals
0023 INIT_0020:
0023 e006 | | Load 0x0,0x6
0024 0007 | | Action Break_Optional
0025 e006 | | Load 0x0,0x6
0026 0007 | | Action Break_Optional
0027 e006 | | Load 0x0,0x6
0028 0007 | | Action Break_Optional
0029 e007 | | Load 0x0,0x7
002a 0007 | | Action Break_Optional
002b e007 | | Load 0x0,0x7
002c 0007 | | Action Break_Optional
002d e008 | | Load 0x0,0x8
002e 0007 | | Action Break_Optional
002f e008 | | Load 0x0,0x8
0030 0007 | | Action Break_Optional
0031 e007 | | Load 0x0,0x7
0032 0007 | | Action Break_Optional
0033 e007 | | Load 0x0,0x7
0034 0007 | | Action Break_Optional
0035 e007 | | Load 0x0,0x7
0036 0007 | | Action Break_Optional
0037 e007 | | Load 0x0,0x7
0038 0007 | | Action Break_Optional
0039 e007 | | Load 0x0,0x7
003a 0007 | | Action Break_Optional
003b e007 | | Load 0x0,0x7
003c 0007 | | Action Break_Optional
003d e009 | | Load 0x0,0x9
003e 0322 | " | Declare_Variable Record
003f 00d8 | | Load_Top At_Offset_0
0040 1c00 | | Execute_Immediate Run_Utility,0x0
0041 e00a | | Load 0x0,0xa
0042 0007 | | Action Break_Optional
0043 e00b | | Load 0x0,0xb
0044 0322 | " | Declare_Variable Record
0045 00d8 | | Load_Top At_Offset_0
0046 1c00 | | Execute_Immediate Run_Utility,0x0
0047 e00c | | Load 0x0,0xc
0048 02ff | | Declare_Variable Variant_Record
0049 00d8 | | Load_Top At_Offset_0
004a 1c00 | | Execute_Immediate Run_Utility,0x0
004b e002 | | Load 0x0,0x2
004c 0322 | " | Declare_Variable Record
004d e007 | | Load 0x0,0x7
004e 0007 | | Action Break_Optional
004f e007 | | Load 0x0,0x7
0050 0007 | | Action Break_Optional
0051 e008 | | Load 0x0,0x8
0052 0007 | | Action Break_Optional
0053 e008 | | Load 0x0,0x8
0054 0007 | | Action Break_Optional
0055 e00d | | Load 0x0,0xd
0056 0322 | " | Declare_Variable Record
0057 00d8 | | Load_Top At_Offset_0
0058 1c00 | | Execute_Immediate Run_Utility,0x0
0059 e5ff | | Load 0x2,-0x1
005a 800e | | Call 0x0,0xe
005b 029f 023b | ;| Declare_Subprogram INIT_0238,For_Call
005d BODY_0020:
005d 00da | | Load_Top At_Offset_2
005e e003 | | Load 0x0,0x3
005f 00db | | Load_Top At_Offset_3
0060 800f | | Call 0x0,0xf
0061 c20f | | Store 0x1,0xf
0062 00d1 | | Pop_Control Pop_Count_1
0063 e20f | | Load 0x1,0xf
0064 e003 | | Load 0x0,0x3
0065 022f | / | Execute Access,Equal
0066 6809 |h | Jump_Zero 0x70
0067 0092 0278 | x| Action Push_String_Extended,0x278 ; "Cannot open display: "
0069 00db | | Load_Top At_Offset_3
006a 8010 | | Call 0x0,0x10
006b 8011 | | Call 0x0,0x11
006c 01cc | | Execute Vector,Catenate
006d e012 | | Load 0x0,0x12
006e 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
006f 08e2 | | Execute_Immediate Raise,0xe2
0070 4800 |H | Short_Literal 0x0
0071 a405 | | Store_Unchecked 0x2,0x5
0072 4800 |H | Short_Literal 0x0
0073 a406 | | Store_Unchecked 0x2,0x6
0074 49f5 |I | Short_Literal 0x1f5
0075 a407 | | Store_Unchecked 0x2,0x7
0076 492f |I/ | Short_Literal 0x12f
0077 a408 | | Store_Unchecked 0x2,0x8
0078 e5fe | | Load 0x2,-0x2
0079 4800 |H | Short_Literal 0x0
007a 00e5 | | Load_Encached Long_Integer_Cache
007b 00d9 | | Load_Top At_Offset_1
007c 0267 | g | Execute Discrete,Predecessor
007d e013 | | Load 0x0,0x13
007e 0334 | 4 | Declare_Variable Array,With_Constraint
007f 01de | | Execute Vector,Not_Equal
0080 6801 |h | Jump_Zero 0x82
0081 841a | | Call 0x2,0x1a
0082 e5fd | | Load 0x2,-0x3
0083 6804 |h | Jump_Zero 0x88
0084 4800 |H | Short_Literal 0x0
0085 e411 | | Load 0x2,0x11
0086 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0087 7803 |x | Jump 0x8b
0088 4802 |H | Short_Literal 0x2
0089 e411 | | Load 0x2,0x11
008a 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
008b e014 | | Load 0x0,0x14
008c 0337 | 7 | Declare_Variable Array
008d 4801 |H | Short_Literal 0x1
008e 481d |H | Short_Literal 0x1d
008f 00da | | Load_Top At_Offset_2
0090 01d6 | | Execute Vector,Field_Write
0091 4801 |H | Short_Literal 0x1
0092 4810 |H | Short_Literal 0x10
0093 00da | | Load_Top At_Offset_2
0094 01d6 | | Execute Vector,Field_Write
0095 4801 |H | Short_Literal 0x1
0096 480e |H | Short_Literal 0xe
0097 00da | | Load_Top At_Offset_2
0098 01d6 | | Execute Vector,Field_Write
0099 480d |H | Short_Literal 0xd
009a 4800 |H | Short_Literal 0x0
009b 4800 |H | Short_Literal 0x0
009c 00d9 | | Load_Top At_Offset_1
009d e41b | | Load 0x2,0x1b
009e 01d6 | | Execute Vector,Field_Write
009f 3ffb |? | Loop_Increasing 0x9b
00a0 4800 |H | Short_Literal 0x0
00a1 480f |H | Short_Literal 0xf
00a2 00da | | Load_Top At_Offset_2
00a3 01d6 | | Execute Vector,Field_Write
00a4 481c |H | Short_Literal 0x1c
00a5 4811 |H | Short_Literal 0x11
00a6 4800 |H | Short_Literal 0x0
00a7 00d9 | | Load_Top At_Offset_1
00a8 e41b | | Load 0x2,0x1b
00a9 01d6 | | Execute Vector,Field_Write
00aa 3ffb |? | Loop_Increasing 0xa6
00ab 4800 |H | Short_Literal 0x0
00ac 481e |H | Short_Literal 0x1e
00ad 00da | | Load_Top At_Offset_2
00ae 01d6 | | Execute Vector,Field_Write
00af 4800 |H | Short_Literal 0x0
00b0 481f |H | Short_Literal 0x1f
00b1 00da | | Load_Top At_Offset_2
00b2 01d6 | | Execute Vector,Field_Write
00b3 e014 | | Load 0x0,0x14
00b4 01c3 | | Execute Vector,Check_In_Type
00b5 e411 | | Load 0x2,0x11
00b6 380b |8 | Execute Record,Field_Write,Field_Number 0xb
00b7 e20f | | Load 0x1,0xf
00b8 8015 | | Call 0x0,0x15
00b9 e20f | | Load 0x1,0xf
00ba 8016 | | Call 0x0,0x16
00bb e411 | | Load 0x2,0x11
00bc 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00bd e20f | | Load 0x1,0xf
00be 8015 | | Call 0x0,0x15
00bf e20f | | Load 0x1,0xf
00c0 8017 | | Call 0x0,0x17
00c1 e411 | | Load 0x2,0x11
00c2 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
00c3 e411 | | Load 0x2,0x11
00c4 e018 | | Load 0x0,0x18
00c5 0337 | 7 | Declare_Variable Array
00c6 4801 |H | Short_Literal 0x1
00c7 4814 |H | Short_Literal 0x14
00c8 00da | | Load_Top At_Offset_2
00c9 01d6 | | Execute Vector,Field_Write
00ca 4801 |H | Short_Literal 0x1
00cb 4819 |H | Short_Literal 0x19
00cc 00da | | Load_Top At_Offset_2
00cd 01d6 | | Execute Vector,Field_Write
00ce 4801 |H | Short_Literal 0x1
00cf 481c |H | Short_Literal 0x1c
00d0 00da | | Load_Top At_Offset_2
00d1 01d6 | | Execute Vector,Field_Write
00d2 4801 |H | Short_Literal 0x1
00d3 481e |H | Short_Literal 0x1e
00d4 00da | | Load_Top At_Offset_2
00d5 01d6 | | Execute Vector,Field_Write
00d6 4813 |H | Short_Literal 0x13
00d7 4800 |H | Short_Literal 0x0
00d8 4800 |H | Short_Literal 0x0
00d9 00d9 | | Load_Top At_Offset_1
00da e41c | | Load 0x2,0x1c
00db 01d6 | | Execute Vector,Field_Write
00dc 3ffb |? | Loop_Increasing 0xd8
00dd 4818 |H | Short_Literal 0x18
00de 4815 |H | Short_Literal 0x15
00df 4800 |H | Short_Literal 0x0
00e0 00d9 | | Load_Top At_Offset_1
00e1 e41c | | Load 0x2,0x1c
00e2 01d6 | | Execute Vector,Field_Write
00e3 3ffb |? | Loop_Increasing 0xdf
00e4 4800 |H | Short_Literal 0x0
00e5 481a |H | Short_Literal 0x1a
00e6 00da | | Load_Top At_Offset_2
00e7 01d6 | | Execute Vector,Field_Write
00e8 4800 |H | Short_Literal 0x0
00e9 481b |H | Short_Literal 0x1b
00ea 00da | | Load_Top At_Offset_2
00eb 01d6 | | Execute Vector,Field_Write
00ec 4800 |H | Short_Literal 0x0
00ed 481d |H | Short_Literal 0x1d
00ee 00da | | Load_Top At_Offset_2
00ef 01d6 | | Execute Vector,Field_Write
00f0 4800 |H | Short_Literal 0x0
00f1 481f |H | Short_Literal 0x1f
00f2 00da | | Load_Top At_Offset_2
00f3 01d6 | | Execute Vector,Field_Write
00f4 e018 | | Load 0x0,0x18
00f5 01c3 | | Execute Vector,Check_In_Type
00f6 e019 | | Load 0x0,0x19
00f7 4801 |H | Short_Literal 0x1
00f8 e20f | | Load 0x1,0xf
00f9 8015 | | Call 0x0,0x15
00fa e20f | | Load 0x1,0xf
00fb 801a | | Call 0x0,0x1a
00fc 4801 |H | Short_Literal 0x1
00fd e408 | | Load 0x2,0x8
00fe 00d8 | | Load_Top At_Offset_0
00ff e01b | | Load 0x0,0x1b
0100 0260 | ` | Execute Discrete,In_Type
0101 7001 |p | Jump_Nonzero 0x103
0102 0801 | | Execute_Immediate Raise,0x1
0103 e407 | | Load 0x2,0x7
0104 00d8 | | Load_Top At_Offset_0
0105 e01b | | Load 0x0,0x1b
0106 0260 | ` | Execute Discrete,In_Type
0107 7001 |p | Jump_Nonzero 0x109
0108 0801 | | Execute_Immediate Raise,0x1
0109 e406 | | Load 0x2,0x6
010a e405 | | Load 0x2,0x5
010b e20f | | Load 0x1,0xf
010c 8015 | | Call 0x0,0x15
010d e20f | | Load 0x1,0xf
010e 801c | | Call 0x0,0x1c
010f e20f | | Load 0x1,0xf
0110 801d | | Call 0x0,0x1d
0111 e20e | | Load 0x1,0xe
0112 017d | } | Execute Record,Structure_Write
0113 e01e | | Load 0x0,0x1e
0114 4800 |H | Short_Literal 0x0
0115 4804 |H | Short_Literal 0x4
0116 e013 | | Load 0x0,0x13
0117 0334 | 4 | Declare_Variable Array,With_Constraint
0118 511b |Q | Indirect_Literal Any,0x234,{0x506c6169, 0x64000000}
0119 e20e | | Load 0x1,0xe
011a e20f | | Load 0x1,0xf
011b 801f | | Call 0x0,0x1f
011c e20e | | Load 0x1,0xe
011d e20f | | Load 0x1,0xf
011e 8020 | | Call 0x0,0x20
011f 480a |H | Short_Literal 0xa
0120 e40f | | Load 0x2,0xf
0121 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0122 e20f | | Load 0x1,0xf
0123 8015 | | Call 0x0,0x15
0124 e20f | | Load 0x1,0xf
0125 8017 | | Call 0x0,0x17
0126 e20f | | Load 0x1,0xf
0127 8015 | | Call 0x0,0x15
0128 e20f | | Load 0x1,0xf
0129 8016 | | Call 0x0,0x16
012a 8021 | ! | Call 0x0,0x21
012b e40f | | Load 0x2,0xf
012c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
012d 4800 |H | Short_Literal 0x0
012e e40f | | Load 0x2,0xf
012f 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0130 e40f | | Load 0x2,0xf
0131 e022 | " | Load 0x0,0x22
0132 0337 | 7 | Declare_Variable Array
0133 4801 |H | Short_Literal 0x1
0134 481f |H | Short_Literal 0x1f
0135 00da | | Load_Top At_Offset_2
0136 01d6 | | Execute Vector,Field_Write
0137 4801 |H | Short_Literal 0x1
0138 481e |H | Short_Literal 0x1e
0139 00da | | Load_Top At_Offset_2
013a 01d6 | | Execute Vector,Field_Write
013b 4801 |H | Short_Literal 0x1
013c 4817 |H | Short_Literal 0x17
013d 00da | | Load_Top At_Offset_2
013e 01d6 | | Execute Vector,Field_Write
013f 4816 |H | Short_Literal 0x16
0140 4800 |H | Short_Literal 0x0
0141 4800 |H | Short_Literal 0x0
0142 00d9 | | Load_Top At_Offset_1
0143 e41c | | Load 0x2,0x1c
0144 01d6 | | Execute Vector,Field_Write
0145 3ffb |? | Loop_Increasing 0x141
0146 481d |H | Short_Literal 0x1d
0147 4818 |H | Short_Literal 0x18
0148 4800 |H | Short_Literal 0x0
0149 00d9 | | Load_Top At_Offset_1
014a e41c | | Load 0x2,0x1c
014b 01d6 | | Execute Vector,Field_Write
014c 3ffb |? | Loop_Increasing 0x148
014d e022 | " | Load 0x0,0x22
014e 01c3 | | Execute Vector,Check_In_Type
014f e20e | | Load 0x1,0xe
0150 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0151 e20f | | Load 0x1,0xf
0152 8023 | # | Call 0x0,0x23
0153 a410 | | Store_Unchecked 0x2,0x10
0154 4800 |H | Short_Literal 0x0
0155 a403 | | Store_Unchecked 0x2,0x3
0156 00cf | | Action Mark_Auxiliary
0157 0007 | | Action Break_Optional
0158 e412 | | Load 0x2,0x12
0159 e20f | | Load 0x1,0xf
015a 8024 | $ | Call 0x0,0x24
015b 00d1 | | Pop_Control Pop_Count_1
015c e412 | | Load 0x2,0x12
015d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
015e 0f0c | | Execute_Immediate Equal,0xc
015f 680d |h | Jump_Zero 0x16d
0160 00cf | | Action Mark_Auxiliary
0161 7805 |x | Jump 0x167
0162 e412 | | Load 0x2,0x12
0163 e20f | | Load 0x1,0xf
0164 8024 | $ | Call 0x0,0x24
0165 00d1 | | Pop_Control Pop_Count_1
0166 00c9 | | Action Pop_Auxiliary_Loop
0167 e412 | | Load 0x2,0x12
0168 260c |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
0169 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
016a 77f7 |w | Jump_Nonzero 0x162
016b 00ce | | Action Pop_Auxiliary
016c 7833 |x3 | Jump 0x1a0
016d e412 | | Load 0x2,0x12
016e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
016f 0f16 | | Execute_Immediate Equal,0x16
0170 6811 |h | Jump_Zero 0x182
0171 e412 | | Load 0x2,0x12
0172 2616 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x16
0173 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0174 a405 | | Store_Unchecked 0x2,0x5
0175 e412 | | Load 0x2,0x12
0176 2616 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x16
0177 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0178 a406 | | Store_Unchecked 0x2,0x6
0179 e412 | | Load 0x2,0x12
017a 2616 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x16
017b 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
017c a407 | | Store_Unchecked 0x2,0x7
017d e412 | | Load 0x2,0x12
017e 2616 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x16
017f 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
0180 a408 | | Store_Unchecked 0x2,0x8
0181 781e |x | Jump 0x1a0
0182 e412 | | Load 0x2,0x12
0183 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0184 0f13 | | Execute_Immediate Equal,0x13
0185 7004 |p | Jump_Nonzero 0x18a
0186 e412 | | Load 0x2,0x12
0187 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0188 0f15 | | Execute_Immediate Equal,0x15
0189 6802 |h | Jump_Zero 0x18c
018a 0008 | | Action Idle
018b 7814 |x | Jump 0x1a0
018c e412 | | Load 0x2,0x12
018d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
018e 0f04 | | Execute_Immediate Equal,0x4
018f 6806 |h | Jump_Zero 0x196
0190 e412 | | Load 0x2,0x12
0191 2607 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7
0192 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0193 0f02 | | Execute_Immediate Equal,0x2
0194 680b |h | Jump_Zero 0x1a0
0195 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0196 0092 0279 | y| Action Push_String_Extended,0x279 ; "Unexpected event type: "
0198 e412 | | Load 0x2,0x12
0199 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
019a e025 | % | Load 0x0,0x25
019b 011c | | Execute Any,Convert_Unchecked
019c 1c01 | | Execute_Immediate Run_Utility,0x1
019d 01cc | | Execute Vector,Catenate
019e e012 | | Load 0x0,0x12
019f 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
01a0 e5fc | | Load 0x2,-0x4
01a1 6804 |h | Jump_Zero 0x1a6
01a2 0092 027a | z| Action Push_String_Extended,0x27a ; "PLAID: Dealing with exposures"
01a4 e012 | | Load 0x0,0x12
01a5 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
01a6 4800 |H | Short_Literal 0x0
01a7 e408 | | Load 0x2,0x8
01a8 e407 | | Load 0x2,0x7
01a9 4800 |H | Short_Literal 0x0
01aa 4800 |H | Short_Literal 0x0
01ab e20e | | Load 0x1,0xe
01ac e20f | | Load 0x1,0xf
01ad 8026 | & | Call 0x0,0x26
01ae e5fc | | Load 0x2,-0x4
01af 6804 |h | Jump_Zero 0x1b4
01b0 0092 027b | {| Action Push_String_Extended,0x27b ; "PLAID: drawing rects"
01b2 e012 | | Load 0x0,0x12
01b3 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
01b4 e407 | | Load 0x2,0x7
01b5 09ff | | Execute_Immediate Binary_Scale,-0x1
01b6 00d8 | | Load_Top At_Offset_0
01b7 e007 | | Load 0x0,0x7
01b8 0260 | ` | Execute Discrete,In_Type
01b9 7001 |p | Jump_Nonzero 0x1bb
01ba 0801 | | Execute_Immediate Raise,0x1
01bb a40d | | Store_Unchecked 0x2,0xd
01bc e408 | | Load 0x2,0x8
01bd 09ff | | Execute_Immediate Binary_Scale,-0x1
01be 00d8 | | Load_Top At_Offset_0
01bf e007 | | Load 0x0,0x7
01c0 0260 | ` | Execute Discrete,In_Type
01c1 7001 |p | Jump_Nonzero 0x1c3
01c2 0801 | | Execute_Immediate Raise,0x1
01c3 a40e | | Store_Unchecked 0x2,0xe
01c4 4fff |O | Short_Literal -0x1
01c5 a409 | | Store_Unchecked 0x2,0x9
01c6 4ffe |O | Short_Literal -0x2
01c7 a40a | | Store_Unchecked 0x2,0xa
01c8 4802 |H | Short_Literal 0x2
01c9 a40b | | Store_Unchecked 0x2,0xb
01ca 4802 |H | Short_Literal 0x2
01cb a40c | | Store_Unchecked 0x2,0xc
01cc 4800 |H | Short_Literal 0x0
01cd a402 | | Store_Unchecked 0x2,0x2
01ce 00cf | | Action Mark_Auxiliary
01cf 785c |x\ | Jump 0x22c
01d0 e40d | | Load 0x2,0xd
01d1 e40b | | Load 0x2,0xb
01d2 0272 | r | Execute Discrete,Minus
01d3 e402 | | Load 0x2,0x2
01d4 e210 | | Load 0x1,0x10
01d5 01d5 | | Execute Vector,Field_Reference
01d6 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01d7 e40e | | Load 0x2,0xe
01d8 e40c | | Load 0x2,0xc
01d9 0272 | r | Execute Discrete,Minus
01da e402 | | Load 0x2,0x2
01db e210 | | Load 0x1,0x10
01dc 01d5 | | Execute Vector,Field_Reference
01dd 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01de e40b | | Load 0x2,0xb
01df 00d8 | | Load_Top At_Offset_0
01e0 e008 | | Load 0x0,0x8
01e1 0260 | ` | Execute Discrete,In_Type
01e2 7001 |p | Jump_Nonzero 0x1e4
01e3 0801 | | Execute_Immediate Raise,0x1
01e4 0901 | | Execute_Immediate Binary_Scale,0x1
01e5 e402 | | Load 0x2,0x2
01e6 e210 | | Load 0x1,0x10
01e7 01d5 | | Execute Vector,Field_Reference
01e8 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
01e9 e40c | | Load 0x2,0xc
01ea 00d8 | | Load_Top At_Offset_0
01eb e008 | | Load 0x0,0x8
01ec 0260 | ` | Execute Discrete,In_Type
01ed 7001 |p | Jump_Nonzero 0x1ef
01ee 0801 | | Execute_Immediate Raise,0x1
01ef 0901 | | Execute_Immediate Binary_Scale,0x1
01f0 e402 | | Load 0x2,0x2
01f1 e210 | | Load 0x1,0x10
01f2 01d5 | | Execute Vector,Field_Reference
01f3 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
01f4 e40b | | Load 0x2,0xb
01f5 e409 | | Load 0x2,0x9
01f6 0273 | s | Execute Discrete,Plus
01f7 c40b | | Store 0x2,0xb
01f8 e40c | | Load 0x2,0xc
01f9 e40a | | Load 0x2,0xa
01fa 0273 | s | Execute Discrete,Plus
01fb c40c | | Store 0x2,0xc
01fc e40b | | Load 0x2,0xb
01fd 0d01 | | Execute_Immediate Less,0x1
01fe 7004 |p | Jump_Nonzero 0x203
01ff e40b | | Load 0x2,0xb
0200 e40d | | Load 0x2,0xd
0201 027b | { | Execute Discrete,Greater_Equal
0202 6808 |h | Jump_Zero 0x20b
0203 e40b | | Load 0x2,0xb
0204 e409 | | Load 0x2,0x9
0205 0901 | | Execute_Immediate Binary_Scale,0x1
0206 0272 | r | Execute Discrete,Minus
0207 c40b | | Store 0x2,0xb
0208 e409 | | Load 0x2,0x9
0209 0275 | u | Execute Discrete,Unary_Minus
020a c409 | | Store 0x2,0x9
020b e40c | | Load 0x2,0xc
020c 0d01 | | Execute_Immediate Less,0x1
020d 7004 |p | Jump_Nonzero 0x212
020e e40c | | Load 0x2,0xc
020f e40e | | Load 0x2,0xe
0210 027b | { | Execute Discrete,Greater_Equal
0211 6808 |h | Jump_Zero 0x21a
0212 e40c | | Load 0x2,0xc
0213 e40a | | Load 0x2,0xa
0214 0901 | | Execute_Immediate Binary_Scale,0x1
0215 0272 | r | Execute Discrete,Minus
0216 c40c | | Store 0x2,0xc
0217 e40a | | Load 0x2,0xa
0218 0275 | u | Execute Discrete,Unary_Minus
0219 c40a | | Store 0x2,0xa
021a e402 | | Load 0x2,0x2
021b 0f09 | | Execute_Immediate Equal,0x9
021c 680b |h | Jump_Zero 0x228
021d e210 | | Load 0x1,0x10
021e e410 | | Load 0x2,0x10
021f e20e | | Load 0x1,0xe
0220 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0221 e20f | | Load 0x1,0xf
0222 8027 | ' | Call 0x0,0x27
0223 e20f | | Load 0x1,0xf
0224 8028 | ( | Call 0x0,0x28
0225 4800 |H | Short_Literal 0x0
0226 a402 | | Store_Unchecked 0x2,0x2
0227 7803 |x | Jump 0x22b
0228 e402 | | Load 0x2,0x2
0229 0a01 | | Execute_Immediate Plus,0x1
022a c402 | | Store 0x2,0x2
022b 00c9 | | Action Pop_Auxiliary_Loop
022c e20f | | Load 0x1,0xf
022d 8029 | ) | Call 0x0,0x29
022e 6fa1 |o | Jump_Zero 0x1d0
022f 00ce | | Action Pop_Auxiliary
0230 00c9 | | Action Pop_Auxiliary_Loop
0231 7f26 | & | Jump 0x158
0232 0000 0000 | | .XXX[0x2]
0234 506c 6169 |Plai| .LITERAL {0x506c6169, 0x64000000}
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023d | = | .CONST 0x023d ; Address of begin
0239 0004 | | .CONST 0x0004 ; Address of exception handler
023a 0002 | | .CONST 0x0002 ; Number of locals
023b INIT_0238:
023b e02a | * | Load 0x0,0x2a
023c 0337 | 7 | Declare_Variable Array
023d BODY_0238:
023d 00d8 | | Load_Top At_Offset_0
023e e408 | | Load 0x2,0x8
023f e407 | | Load 0x2,0x7
0240 e406 | | Load 0x2,0x6
0241 e405 | | Load 0x2,0x5
0242 e5fe | | Load 0x2,-0x2
0243 802b | + | Call 0x0,0x2b
0244 c405 | | Store 0x2,0x5
0245 c406 | | Store 0x2,0x6
0246 c407 | | Store 0x2,0x7
0247 c408 | | Store 0x2,0x8
0248 00d1 | | Pop_Control Pop_Count_1
0249 481b |H | Short_Literal 0x1b
024a 00d9 | | Load_Top At_Offset_1
024b 01d7 | | Execute Vector,Field_Read
024c 6813 |h | Jump_Zero 0x260
024d e20f | | Load 0x1,0xf
024e 8015 | | Call 0x0,0x15
024f e20f | | Load 0x1,0xf
0250 802c | , | Call 0x0,0x2c
0251 00d8 | | Load_Top At_Offset_0
0252 e007 | | Load 0x0,0x7
0253 0260 | ` | Execute Discrete,In_Type
0254 7001 |p | Jump_Nonzero 0x256
0255 0801 | | Execute_Immediate Raise,0x1
0256 e405 | | Load 0x2,0x5
0257 0272 | r | Execute Discrete,Minus
0258 e407 | | Load 0x2,0x7
0259 00d8 | | Load_Top At_Offset_0
025a e007 | | Load 0x0,0x7
025b 0260 | ` | Execute Discrete,In_Type
025c 7001 |p | Jump_Nonzero 0x25e
025d 0801 | | Execute_Immediate Raise,0x1
025e 0272 | r | Execute Discrete,Minus
025f c405 | | Store 0x2,0x5
0260 481a |H | Short_Literal 0x1a
0261 00d9 | | Load_Top At_Offset_1
0262 01d7 | | Execute Vector,Field_Read
0263 6813 |h | Jump_Zero 0x277
0264 e20f | | Load 0x1,0xf
0265 8015 | | Call 0x0,0x15
0266 e20f | | Load 0x1,0xf
0267 802d | - | Call 0x0,0x2d
0268 00d8 | | Load_Top At_Offset_0
0269 e007 | | Load 0x0,0x7
026a 0260 | ` | Execute Discrete,In_Type
026b 7001 |p | Jump_Nonzero 0x26d
026c 0801 | | Execute_Immediate Raise,0x1
026d e406 | | Load 0x2,0x6
026e 0272 | r | Execute Discrete,Minus
026f e408 | | Load 0x2,0x8
0270 00d8 | | Load_Top At_Offset_0
0271 e007 | | Load 0x0,0x7
0272 0260 | ` | Execute Discrete,In_Type
0273 7001 |p | Jump_Nonzero 0x275
0274 0801 | | Execute_Immediate Raise,0x1
0275 0272 | r | Execute Discrete,Minus
0276 c406 | | Store 0x2,0x6
0277 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0278 ; --------------------------------------------------------------------------------------
0278 ; STRING TABLE
0278 ; --------------------------------------------------------------------------------------
0278 000a | | .STRTAB 0x000a->0x027d ; "Cannot open display: "
0279 001d | | .STRTAB 0x001d->0x0287 ; "Unexpected event type: "
027a 0032 | 2 | .STRTAB 0x0032->0x0293 ; "PLAID: Dealing with exposures"
027b 004d | M | .STRTAB 0x004d->0x02a1 ; "PLAID: drawing rects"
027c 005f | _ | .STREND 0x005f->0x02ab
027d 4361 6e6e |Cann| .STRTAB_STRINGS
02ac 0000 0000 | | .BLANK 0000[0x4]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; Debug Table
02b0 ; --------------------------------------------------------------------------------------
02b0 0004 0000 | | .DEBUG4 0x0004,0x0000,0x6889,0x0000,0x0001,0x0004
02b6 000b 02c6 | | .DBG4T 0x000b,0x02c6,0x8000,0x0000
02ba 000e 02c9 | | .DBG4T 0x000e,0x02c9,0x8000,0x0000
02be 0023 02d1 | # | .DBG4T 0x0023,0x02d1,0x0001,0x4000
02c2 023b 0377 | ; w| .DBG4T 0x023b,0x0377,0x0004,0x0000
02c6 ; --------------------------------------------------------------------------------------
02c6 ; Debug chain
02c6 ; --------------------------------------------------------------------------------------
02c6 0001 0000 | | .DBGLEN 0x0001,0x0000
02c8 000b | | .DBGLNO 0x000b
02c9 ; --------------------------------------------------------------------------------------
02c9 ; Debug chain
02c9 ; --------------------------------------------------------------------------------------
02c9 0006 0000 | | .DBGLEN 0x0006,0x0000
02cb 000e 0010 | | .DBGLNO 0x000e,0x0010,0x0012,0x0013,0x0018,0x001a
02d1 ; --------------------------------------------------------------------------------------
02d1 ; Debug chain
02d1 ; --------------------------------------------------------------------------------------
02d1 0018 0046 | F| .DBGLEN 0x0018,0x0046
02d3 0023 0025 | # %| .DBGLNO 0x0023,0x0025,0x0027,0x0029,0x002b,0x002d,0x002f,0x0031,0x0033,0x0035,0x0037,0x0039,0x003b,0x003d,0x0041,0x0043,0x0047,0x004b,0x004d,0x004f,0x0051,0x0053,0x0055,0x0059,0x005d,0x0063,0x0067,0x006f,0x0070,0x0072,0x0074,0x0076,0x0078,0x0081,0x0082,0x0084,0x0088,0x008b,0x00b7,0x00bd,0x00c3,0x0113,0x011c,0x011f,0x0122,0x012d,0x0130,0x0154,0x0157,0x0158,0x015c,0x0162,0x0167,0x016d,0x0171,0x0175,0x0179,0x017d,0x0182,0x018a,0x018c,0x0190,0x0195,0x0196,0x01a0,0x01a2,0x01a6,0x01ae,0x01b0,0x01b4,0x01bc,0x01c4,0x01c6,0x01c8,0x01ca,0x01cc,0x01d0,0x01d7,0x01de,0x01e9,0x01f4,0x01f8,0x01fc,0x0203,0x0208,0x020b,0x0212,0x0217,0x021a,0x021d,0x0223,0x0225,0x0228,0x022c
0331 0001 0002 | | .XXX[0x46]
0333 0003 0004 | |
0335 0005 0006 | |
0337 0007 0008 | |
0339 0009 000a | |
033b 000b 000c | |
033d 000d 000e | |
033f 000f 0010 | |
0341 0011 0012 | |
0343 0013 0014 | |
0345 0015 0016 | |
0347 0017 0018 | |
0349 0019 001a | |
034b 001b 001d | |
034d 001c 001e | |
034f 001f 0020 | |
0351 0021 0022 | ! "|
0353 0023 0024 | # $|
0355 0025 0026 | % &|
0357 0027 0028 | ' (|
0359 0029 002a | ) *|
035b 002b 002c | + ,|
035d 002d 002e | - .|
035f 002f 0030 | / 0|
0361 0031 0032 | 1 2|
0363 0033 0034 | 3 4|
0365 0036 0037 | 6 7|
0367 0038 0039 | 8 9|
0369 003a 003b | : ;|
036b 003c 003d | < =|
036d 003e 003f | > ?|
036f 0040 0041 | @ A|
0371 0042 0043 | B C|
0373 0044 0045 | D E|
0375 0046 0035 | F 5|
0377 ; --------------------------------------------------------------------------------------
0377 ; Debug chain
0377 ; --------------------------------------------------------------------------------------
0377 0001 0005 | | .DBGLEN 0x0001,0x0005
0379 023b 023d | ; =| .DBGLNO 0x023b,0x023d,0x0249,0x024d,0x0260,0x0264
037f 0000 0000 | | .BLANK 0000[0x81]