|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 3072 (0xc00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a7cf5
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 04f8 | | .CONST 0x04f8 ; 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 00ae | | .CONST 0x00ae ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 002f | / | .CONST 0x002f ; Number of locals
000b INIT_0008:
000b 00c4 | | Action Make_Default
000c 00c4 | | Action Make_Default
000d 00c4 | | Action Make_Default
000e 00c4 | | Action Make_Default
000f 00c4 | | Action Make_Default
0010 00c4 | | Action Make_Default
0011 00c4 | | Action Make_Default
0012 00c4 | | Action Make_Default
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 e001 | | Load 0x0,0x1
002c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
002d 0129 | ) | Execute Any,Make_Visible
002e c22c | , | Store 0x1,0x2c
002f e002 | | Load 0x0,0x2
0030 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0031 0129 | ) | Execute Any,Make_Visible
0032 c226 | & | Store 0x1,0x26
0033 e002 | | Load 0x0,0x2
0034 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0035 0129 | ) | Execute Any,Make_Visible
0036 c227 | ' | Store 0x1,0x27
0037 e002 | | Load 0x0,0x2
0038 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0039 0129 | ) | Execute Any,Make_Visible
003a c228 | ( | Store 0x1,0x28
003b e002 | | Load 0x0,0x2
003c 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
003d 0129 | ) | Execute Any,Make_Visible
003e c229 | ) | Store 0x1,0x29
003f e002 | | Load 0x0,0x2
0040 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0041 0266 | f | Execute Discrete,Bounds
0042 00e1 | | Load_Encached Boolean_Cache
0043 02a0 | | Declare_Subprogram Null_Subprogram
0044 4801 |H | Short_Literal 0x1
0045 035e | ^ | Declare_Type Array,Defined,Visible
0046 c212 | | Store 0x1,0x12
0047 e212 | | Load 0x1,0x12
0048 0337 | 7 | Declare_Variable Array
0049 4800 |H | Short_Literal 0x0
004a 4816 |H | Short_Literal 0x16
004b e22d | - | Load 0x1,0x2d
004c 01d6 | | Execute Vector,Field_Write
004d 4815 |H | Short_Literal 0x15
004e 4800 |H | Short_Literal 0x0
004f 4801 |H | Short_Literal 0x1
0050 e22f | / | Load 0x1,0x2f
0051 e22d | - | Load 0x1,0x2d
0052 01d6 | | Execute Vector,Field_Write
0053 3ffb |? | Loop_Increasing 0x4f
0054 e212 | | Load 0x1,0x12
0055 01c3 | | Execute Vector,Check_In_Type
0056 0129 | ) | Execute Any,Make_Visible
0057 c22a | * | Store 0x1,0x2a
0058 e212 | | Load 0x1,0x12
0059 0337 | 7 | Declare_Variable Array
005a 4808 |H | Short_Literal 0x8
005b 4800 |H | Short_Literal 0x0
005c 4801 |H | Short_Literal 0x1
005d e22f | / | Load 0x1,0x2f
005e e22d | - | Load 0x1,0x2d
005f 01d6 | | Execute Vector,Field_Write
0060 3ffb |? | Loop_Increasing 0x5c
0061 4816 |H | Short_Literal 0x16
0062 4809 |H | Short_Literal 0x9
0063 4800 |H | Short_Literal 0x0
0064 e22f | / | Load 0x1,0x2f
0065 e22d | - | Load 0x1,0x2d
0066 01d6 | | Execute Vector,Field_Write
0067 3ffb |? | Loop_Increasing 0x63
0068 e212 | | Load 0x1,0x12
0069 01c3 | | Execute Vector,Check_In_Type
006a 0129 | ) | Execute Any,Make_Visible
006b c214 | | Store 0x1,0x14
006c e212 | | Load 0x1,0x12
006d 0337 | 7 | Declare_Variable Array
006e 4800 |H | Short_Literal 0x0
006f 4816 |H | Short_Literal 0x16
0070 e22d | - | Load 0x1,0x2d
0071 01d6 | | Execute Vector,Field_Write
0072 4808 |H | Short_Literal 0x8
0073 4800 |H | Short_Literal 0x0
0074 4800 |H | Short_Literal 0x0
0075 e22f | / | Load 0x1,0x2f
0076 e22d | - | Load 0x1,0x2d
0077 01d6 | | Execute Vector,Field_Write
0078 3ffb |? | Loop_Increasing 0x74
0079 4800 |H | Short_Literal 0x0
007a 4815 |H | Short_Literal 0x15
007b e22d | - | Load 0x1,0x2d
007c 01d6 | | Execute Vector,Field_Write
007d 4814 |H | Short_Literal 0x14
007e 4809 |H | Short_Literal 0x9
007f 4801 |H | Short_Literal 0x1
0080 e22f | / | Load 0x1,0x2f
0081 e22d | - | Load 0x1,0x2d
0082 01d6 | | Execute Vector,Field_Write
0083 3ffb |? | Loop_Increasing 0x7f
0084 e212 | | Load 0x1,0x12
0085 01c3 | | Execute Vector,Check_In_Type
0086 0129 | ) | Execute Any,Make_Visible
0087 c22b | + | Store 0x1,0x2b
0088 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated
008a c216 | | Store 0x1,0x16
008b 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated
008d c221 | ! | Store 0x1,0x21
008e 029a 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call,Visible,Unelaborated
0090 c218 | | Store 0x1,0x18
0091 029a 029b | | Declare_Subprogram INIT_0298,For_Outer_Call,Visible,Unelaborated
0093 c224 | $ | Store 0x1,0x24
0094 029a 0323 | #| Declare_Subprogram INIT_0320,For_Outer_Call,Visible,Unelaborated
0096 c225 | % | Store 0x1,0x25
0097 029a 035b | [| Declare_Subprogram INIT_0358,For_Outer_Call,Visible,Unelaborated
0099 c21e | | Store 0x1,0x1e
009a 00bf | | Action Accept_Activation
009b e003 | | Load 0x0,0x3
009c 1916 | | Execute Package,Field_Reference,Field_Number 0x16
009d 0007 | | Action Break_Optional
009e 029d 0383 | | Declare_Subprogram INIT_0380,For_Outer_Call
00a0 029d 039b | | Declare_Subprogram INIT_0398,For_Outer_Call
00a2 1d16 | | Execute_Immediate Reference_Lex_1,0x16
00a3 00c7 | | Action Elaborate_Subprogram
00a4 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
00a5 00c7 | | Action Elaborate_Subprogram
00a6 1d18 | | Execute_Immediate Reference_Lex_1,0x18
00a7 00c7 | | Action Elaborate_Subprogram
00a8 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
00a9 00c7 | | Action Elaborate_Subprogram
00aa 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
00ab 00c7 | | Action Elaborate_Subprogram
00ac 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
00ad 00c7 | | Action Elaborate_Subprogram
00ae BODY_0008:
00ae 00bc | | Action Signal_Activated
00af 00bb | | Action Signal_Completion
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00bd | | .CONST 0x00bd ; Address of begin
00b1 00dd | | .CONST 0x00dd ; Address of exception handler
00b2 0003 | | .CONST 0x0003 ; Number of locals
00b3 INIT_00b0:
00b3 e004 | | Load 0x0,0x4
00b4 180e | | Execute Package,Field_Execute,Field_Number 0xe
00b5 e004 | | Load 0x0,0x4
00b6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00b7 011e | | Execute Any,Convert
00b8 e005 | | Load 0x0,0x5
00b9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00ba 02c7 | | Declare_Variable Any
00bb 00d8 | | Load_Top At_Offset_0
00bc 1c00 | | Execute_Immediate Run_Utility,0x0
00bd BODY_00b0:
00bd 00d8 | | Load_Top At_Offset_0
00be e5fa | | Load 0x2,-0x6
00bf e004 | | Load 0x0,0x4
00c0 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
00c1 c403 | | Store 0x2,0x3
00c2 e004 | | Load 0x0,0x4
00c3 180e | | Execute Package,Field_Execute,Field_Number 0xe
00c4 e403 | | Load 0x2,0x3
00c5 e006 | | Load 0x0,0x6
00c6 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00c7 85fc | | Call 0x2,-0x4
00c8 e5fd | | Load 0x2,-0x3
00c9 6803 |h | Jump_Zero 0xcd
00ca e004 | | Load 0x0,0x4
00cb 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
00cc 0257 | W | Execute Discrete,Raise
00cd e5fe | | Load 0x2,-0x2
00ce 6807 |h | Jump_Zero 0xd6
00cf 4800 |H | Short_Literal 0x0
00d0 e402 | | Load 0x2,0x2
00d1 0092 041c | | Action Push_String_Extended,0x41c ; " completed with warnings"
00d3 e5fb | | Load 0x2,-0x5
00d4 822e | . | Call 0x1,0x2e
00d5 4507 |E | Exit_Suprogram New_Top_Offset 0x7
00d6 4800 |H | Short_Literal 0x0
00d7 e402 | | Load 0x2,0x2
00d8 0092 041d | | Action Push_String_Extended,0x41d ; " completed"
00da e5fb | | Load 0x2,-0x5
00db 822e | . | Call 0x1,0x2e
00dc 4507 |E | Exit_Suprogram New_Top_Offset 0x7
00dd TRAP_00b0:
00dd e004 | | Load 0x0,0x4
00de 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
00df 010f | | Execute Exception,Equal
00e0 680a |h | Jump_Zero 0xeb
00e1 e004 | | Load 0x0,0x4
00e2 180e | | Execute Package,Field_Execute,Field_Number 0xe
00e3 e004 | | Load 0x0,0x4
00e4 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00e5 e402 | | Load 0x2,0x2
00e6 0092 041e | | Action Push_String_Extended,0x41e ; " terminated with errors"
00e8 e5fb | | Load 0x2,-0x5
00e9 822e | . | Call 0x1,0x2e
00ea 4507 |E | Exit_Suprogram New_Top_Offset 0x7
00eb e004 | | Load 0x0,0x4
00ec 180e | | Execute Package,Field_Execute,Field_Number 0xe
00ed 4808 |H | Short_Literal 0x8
00ee 0092 041f | | Action Push_String_Extended,0x41f ; "Unexpected "
00f0 4801 |H | Short_Literal 0x1
00f1 4801 |H | Short_Literal 0x1
00f2 e007 | | Load 0x0,0x7
00f3 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00f4 01cc | | Execute Vector,Catenate
00f5 e006 | | Load 0x0,0x6
00f6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00f7 e004 | | Load 0x0,0x4
00f8 180e | | Execute Package,Field_Execute,Field_Number 0xe
00f9 e004 | | Load 0x0,0x4
00fa 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00fb e402 | | Load 0x2,0x2
00fc 0092 0420 | | Action Push_String_Extended,0x420 ; " terminated with an internal error"
00fe e5fb | | Load 0x2,-0x5
00ff 822e | . | Call 0x1,0x2e
0100 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0101 0000 0000 | | .BLANK 0000[0x7]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 012c | , | .CONST 0x012c ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 000b | | .CONST 0x000b ; Number of locals
010b INIT_0108:
010b 00e1 | | Load_Encached Boolean_Cache
010c 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
010d e22c | , | Load 0x1,0x2c
010e 02c7 | | Declare_Variable Any
010f 00d8 | | Load_Top At_Offset_0
0110 1c00 | | Execute_Immediate Run_Utility,0x0
0111 e008 | | Load 0x0,0x8
0112 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0113 02c7 | | Declare_Variable Any
0114 00d8 | | Load_Top At_Offset_0
0115 1c00 | | Execute_Immediate Run_Utility,0x0
0116 e008 | | Load 0x0,0x8
0117 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0118 e008 | | Load 0x0,0x8
0119 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
011a 1b18 | | Execute Package,Field_Read,Field_Number 0x18
011b 02c7 | | Declare_Variable Any
011c 00d8 | | Load_Top At_Offset_0
011d 1c00 | | Execute_Immediate Run_Utility,0x0
011e e008 | | Load 0x0,0x8
011f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0120 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0121 00e3 | | Load_Encached Natural_Cache
0122 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0123 e005 | | Load 0x0,0x5
0124 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0125 02c7 | | Declare_Variable Any
0126 00d8 | | Load_Top At_Offset_0
0127 1c00 | | Execute_Immediate Run_Utility,0x0
0128 029f 03b3 | | Declare_Subprogram INIT_03b0,For_Call
012a 029f 03c3 | | Declare_Subprogram INIT_03c0,For_Call
012c BODY_0108:
012c e008 | | Load 0x0,0x8
012d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
012e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
012f e406 | | Load 0x2,0x6
0130 60bf |` | Indirect_Literal Discrete,0x1f0,{0x00000000, 0x00004000}
0131 e5f8 | | Load 0x2,-0x8
0132 e009 | | Load 0x0,0x9
0133 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0134 e00a | | Load 0x0,0xa
0135 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0136 4801 |H | Short_Literal 0x1
0137 4800 |H | Short_Literal 0x0
0138 e009 | | Load 0x0,0x9
0139 1811 | | Execute Package,Field_Execute,Field_Number 0x11
013a e008 | | Load 0x0,0x8
013b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
013c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
013d 840a | | Call 0x2,0xa
013e e008 | | Load 0x0,0x8
013f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0140 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0141 c406 | | Store 0x2,0x6
0142 c407 | | Store 0x2,0x7
0143 e407 | | Load 0x2,0x7
0144 6823 |h# | Jump_Zero 0x168
0145 e004 | | Load 0x0,0x4
0146 180e | | Execute Package,Field_Execute,Field_Number 0xe
0147 4807 |H | Short_Literal 0x7
0148 60a7 |` | Indirect_Literal Discrete,0x1f0,{0x00000000, 0x00004000}
0149 e00b | | Load 0x0,0xb
014a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
014b e009 | | Load 0x0,0x9
014c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
014d e00a | | Load 0x0,0xa
014e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
014f 4801 |H | Short_Literal 0x1
0150 4800 |H | Short_Literal 0x0
0151 e009 | | Load 0x0,0x9
0152 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0153 e008 | | Load 0x0,0x8
0154 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0155 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0156 e5fb | | Load 0x2,-0x5
0157 e407 | | Load 0x2,0x7
0158 e008 | | Load 0x0,0x8
0159 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
015a 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
015b e006 | | Load 0x0,0x6
015c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
015d e004 | | Load 0x0,0x4
015e 180e | | Execute Package,Field_Execute,Field_Number 0xe
015f e004 | | Load 0x0,0x4
0160 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0161 7003 |p | Jump_Nonzero 0x165
0162 e004 | | Load 0x0,0x4
0163 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
0164 0257 | W | Execute Discrete,Raise
0165 4801 |H | Short_Literal 0x1
0166 c5fd | | Store 0x2,-0x3
0167 450a |E | Exit_Suprogram New_Top_Offset 0xa
0168 00cf | | Action Mark_Auxiliary
0169 7851 |xQ | Jump 0x1bb
016a e008 | | Load 0x0,0x8
016b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
016c e404 | | Load 0x2,0x4
016d 0120 | | Execute Any,Is_Value
016e 6803 |h | Jump_Zero 0x172
016f e008 | | Load 0x0,0x8
0170 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0171 7801 |x | Jump 0x173
0172 e404 | | Load 0x2,0x4
0173 e406 | | Load 0x2,0x6
0174 e008 | | Load 0x0,0x8
0175 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0176 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0177 c404 | | Store 0x2,0x4
0178 c405 | | Store 0x2,0x5
0179 e405 | | Load 0x2,0x5
017a 703a |p: | Jump_Nonzero 0x1b5
017b 4801 |H | Short_Literal 0x1
017c e404 | | Load 0x2,0x4
017d e001 | | Load 0x0,0x1
017e 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
017f 6835 |h5 | Jump_Zero 0x1b5
0180 e409 | | Load 0x2,0x9
0181 e403 | | Load 0x2,0x3
0182 e5f8 | | Load 0x2,-0x8
0183 e5f9 | | Load 0x2,-0x7
0184 e404 | | Load 0x2,0x4
0185 e001 | | Load 0x0,0x1
0186 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
0187 c403 | | Store 0x2,0x3
0188 c409 | | Store 0x2,0x9
0189 4801 |H | Short_Literal 0x1
018a e409 | | Load 0x2,0x9
018b e005 | | Load 0x0,0x5
018c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
018d 680d |h | Jump_Zero 0x19b
018e 4801 |H | Short_Literal 0x1
018f a402 | | Store_Unchecked 0x2,0x2
0190 4801 |H | Short_Literal 0x1
0191 c5fd | | Store 0x2,-0x3
0192 e004 | | Load 0x0,0x4
0193 180e | | Execute Package,Field_Execute,Field_Number 0xe
0194 4807 |H | Short_Literal 0x7
0195 e409 | | Load 0x2,0x9
0196 e005 | | Load 0x0,0x5
0197 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0198 e006 | | Load 0x0,0x6
0199 1813 | | Execute Package,Field_Execute,Field_Number 0x13
019a 7816 |x | Jump 0x1b1
019b 4801 |H | Short_Literal 0x1
019c e002 | | Load 0x0,0x2
019d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
019e 4801 |H | Short_Literal 0x1
019f e403 | | Load 0x2,0x3
01a0 e001 | | Load 0x0,0x1
01a1 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
01a2 e003 | | Load 0x0,0x3
01a3 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
01a4 680c |h | Jump_Zero 0x1b1
01a5 4801 |H | Short_Literal 0x1
01a6 e403 | | Load 0x2,0x3
01a7 e001 | | Load 0x0,0x1
01a8 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
01a9 e5f7 | | Load 0x2,-0x9
01aa 01d7 | | Execute Vector,Field_Read
01ab 6805 |h | Jump_Zero 0x1b1
01ac 840b | | Call 0x2,0xb
01ad 00e2 | | Load_Encached Integer_Cache
01ae e408 | | Load 0x2,0x8
01af 0268 | h | Execute Discrete,Successor
01b0 c408 | | Store 0x2,0x8
01b1 e403 | | Load 0x2,0x3
01b2 e001 | | Load 0x0,0x1
01b3 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
01b4 c403 | | Store 0x2,0x3
01b5 e406 | | Load 0x2,0x6
01b6 e008 | | Load 0x0,0x8
01b7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01b8 181d | | Execute Package,Field_Execute,Field_Number 0x1d
01b9 c406 | | Store 0x2,0x6
01ba 00c9 | | Action Pop_Auxiliary_Loop
01bb e402 | | Load 0x2,0x2
01bc 6805 |h | Jump_Zero 0x1c2
01bd e406 | | Load 0x2,0x6
01be e008 | | Load 0x0,0x8
01bf 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01c0 181e | | Execute Package,Field_Execute,Field_Number 0x1e
01c1 6fa8 |o | Jump_Zero 0x16a
01c2 00ce | | Action Pop_Auxiliary
01c3 e406 | | Load 0x2,0x6
01c4 e008 | | Load 0x0,0x8
01c5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01c6 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
01c7 c406 | | Store 0x2,0x6
01c8 e408 | | Load 0x2,0x8
01c9 7015 |p | Jump_Nonzero 0x1df
01ca e004 | | Load 0x0,0x4
01cb 180e | | Execute Package,Field_Execute,Field_Number 0xe
01cc 4806 |H | Short_Literal 0x6
01cd 0092 0421 | !| Action Push_String_Extended,0x421 ; "Naming expression \x22"
01cf e5fb | | Load 0x2,-0x5
01d0 01cc | | Execute Vector,Catenate
01d1 0092 0422 | "| Action Push_String_Extended,0x422 ; "\x22 resolved to no "
01d3 01cc | | Execute Vector,Catenate
01d4 e5f7 | | Load 0x2,-0x9
01d5 822f | / | Call 0x1,0x2f
01d6 01cc | | Execute Vector,Catenate
01d7 0092 0423 | #| Action Push_String_Extended,0x423 ; " gateway objects"
01d9 01cc | | Execute Vector,Catenate
01da e006 | | Load 0x0,0x6
01db 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01dc 4801 |H | Short_Literal 0x1
01dd c5fe | | Store 0x2,-0x2
01de 450a |E | Exit_Suprogram New_Top_Offset 0xa
01df e004 | | Load 0x0,0x4
01e0 180e | | Execute Package,Field_Execute,Field_Number 0xe
01e1 4802 |H | Short_Literal 0x2
01e2 0092 0424 | $| Action Push_String_Extended,0x424 ; "s"
01e4 0092 0425 | %| Action Push_String_Extended,0x425 ; "gateway object"
01e6 e408 | | Load 0x2,0x8
01e7 821e | | Call 0x1,0x1e
01e8 0092 0426 | &| Action Push_String_Extended,0x426 ; " processed"
01ea 01cc | | Execute Vector,Catenate
01eb e006 | | Load 0x0,0x6
01ec 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01ed 450a |E | Exit_Suprogram New_Top_Offset 0xa
01ee 0000 0000 | | .XXX[0x2]
01f0 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
01f4 0000 0000 | | .BLANK 0000[0x4]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 0211 | | .CONST 0x0211 ; Address of begin
01f9 0004 | | .CONST 0x0004 ; Address of exception handler
01fa 0008 | | .CONST 0x0008 ; Number of locals
01fb INIT_01f8:
01fb 00e1 | | Load_Encached Boolean_Cache
01fc 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
01fd e008 | | Load 0x0,0x8
01fe 1b14 | | Execute Package,Field_Read,Field_Number 0x14
01ff 02ff | | Declare_Variable Variant_Record
0200 00d8 | | Load_Top At_Offset_0
0201 1c00 | | Execute_Immediate Run_Utility,0x0
0202 e008 | | Load 0x0,0x8
0203 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0204 e008 | | Load 0x0,0x8
0205 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0206 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0207 02c7 | | Declare_Variable Any
0208 00d8 | | Load_Top At_Offset_0
0209 1c00 | | Execute_Immediate Run_Utility,0x0
020a e008 | | Load 0x0,0x8
020b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
020c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
020d 00e3 | | Load_Encached Natural_Cache
020e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
020f 029f 03f3 | | Declare_Subprogram INIT_03f0,For_Call
0211 BODY_01f8:
0211 e008 | | Load 0x0,0x8
0212 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0213 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0214 e405 | | Load 0x2,0x5
0215 67da |g | Indirect_Literal Discrete,0x1f0,{0x00000000, 0x00004000}
0216 e5fa | | Load 0x2,-0x6
0217 e009 | | Load 0x0,0x9
0218 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0219 e00a | | Load 0x0,0xa
021a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
021b 4801 |H | Short_Literal 0x1
021c 4800 |H | Short_Literal 0x0
021d e009 | | Load 0x0,0x9
021e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
021f e008 | | Load 0x0,0x8
0220 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0221 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0222 e5fb | | Load 0x2,-0x5
0223 e008 | | Load 0x0,0x8
0224 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0225 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0226 c405 | | Store 0x2,0x5
0227 c406 | | Store 0x2,0x6
0228 e406 | | Load 0x2,0x6
0229 6823 |h# | Jump_Zero 0x24d
022a e004 | | Load 0x0,0x4
022b 180e | | Execute Package,Field_Execute,Field_Number 0xe
022c 4807 |H | Short_Literal 0x7
022d 67c2 |g | Indirect_Literal Discrete,0x1f0,{0x00000000, 0x00004000}
022e e00b | | Load 0x0,0xb
022f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0230 e009 | | Load 0x0,0x9
0231 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0232 e00a | | Load 0x0,0xa
0233 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0234 4801 |H | Short_Literal 0x1
0235 4800 |H | Short_Literal 0x0
0236 e009 | | Load 0x0,0x9
0237 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0238 e008 | | Load 0x0,0x8
0239 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
023a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
023b e5fb | | Load 0x2,-0x5
023c e406 | | Load 0x2,0x6
023d e008 | | Load 0x0,0x8
023e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
023f 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0240 e006 | | Load 0x0,0x6
0241 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0242 e004 | | Load 0x0,0x4
0243 180e | | Execute Package,Field_Execute,Field_Number 0xe
0244 e004 | | Load 0x0,0x4
0245 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0246 7003 |p | Jump_Nonzero 0x24a
0247 e004 | | Load 0x0,0x4
0248 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
0249 0257 | W | Execute Discrete,Raise
024a 4801 |H | Short_Literal 0x1
024b c5fd | | Store 0x2,-0x3
024c 4507 |E | Exit_Suprogram New_Top_Offset 0x7
024d 00cf | | Action Mark_Auxiliary
024e 7819 |x | Jump 0x268
024f e008 | | Load 0x0,0x8
0250 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0251 e403 | | Load 0x2,0x3
0252 679d |g | Indirect_Literal Discrete,0x1f0,{0x00000000, 0x00004000}
0253 e00b | | Load 0x0,0xb
0254 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0255 e405 | | Load 0x2,0x5
0256 e008 | | Load 0x0,0x8
0257 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0258 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0259 00d1 | | Pop_Control Pop_Count_1
025a c404 | | Store 0x2,0x4
025b e404 | | Load 0x2,0x4
025c 7005 |p | Jump_Nonzero 0x262
025d 8408 | | Call 0x2,0x8
025e 00e2 | | Load_Encached Integer_Cache
025f e407 | | Load 0x2,0x7
0260 0268 | h | Execute Discrete,Successor
0261 c407 | | Store 0x2,0x7
0262 e405 | | Load 0x2,0x5
0263 e008 | | Load 0x0,0x8
0264 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0265 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0266 c405 | | Store 0x2,0x5
0267 00c9 | | Action Pop_Auxiliary_Loop
0268 e402 | | Load 0x2,0x2
0269 6805 |h | Jump_Zero 0x26f
026a e405 | | Load 0x2,0x5
026b e008 | | Load 0x0,0x8
026c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
026d 181e | | Execute Package,Field_Execute,Field_Number 0x1e
026e 6fe0 |o | Jump_Zero 0x24f
026f 00ce | | Action Pop_Auxiliary
0270 e405 | | Load 0x2,0x5
0271 e008 | | Load 0x0,0x8
0272 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0273 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
0274 c405 | | Store 0x2,0x5
0275 e407 | | Load 0x2,0x7
0276 700f |p | Jump_Nonzero 0x286
0277 e004 | | Load 0x0,0x4
0278 180e | | Execute Package,Field_Execute,Field_Number 0xe
0279 4806 |H | Short_Literal 0x6
027a 0092 0421 | !| Action Push_String_Extended,0x421 ; "Naming expression \x22"
027c e5fb | | Load 0x2,-0x5
027d 01cc | | Execute Vector,Catenate
027e 0092 0427 | '| Action Push_String_Extended,0x427 ; "\x22 resolved to no applicable objects"
0280 01cc | | Execute Vector,Catenate
0281 e006 | | Load 0x0,0x6
0282 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0283 4801 |H | Short_Literal 0x1
0284 c5fe | | Store 0x2,-0x2
0285 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0286 e004 | | Load 0x0,0x4
0287 180e | | Execute Package,Field_Execute,Field_Number 0xe
0288 4802 |H | Short_Literal 0x2
0289 0092 0424 | $| Action Push_String_Extended,0x424 ; "s"
028b 0092 0428 | (| Action Push_String_Extended,0x428 ; "object"
028d e407 | | Load 0x2,0x7
028e 821e | | Call 0x1,0x1e
028f 0092 0426 | &| Action Push_String_Extended,0x426 ; " processed"
0291 01cc | | Execute Vector,Catenate
0292 e006 | | Load 0x0,0x6
0293 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0294 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0295 0000 0000 | | .XXX[0x3]
0297 0000 | |
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 02ab | | .CONST 0x02ab ; Address of begin
0299 0004 | | .CONST 0x0004 ; Address of exception handler
029a 0005 | | .CONST 0x0005 ; Number of locals
029b INIT_0298:
029b e008 | | Load 0x0,0x8
029c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
029d e008 | | Load 0x0,0x8
029e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
029f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02a0 e008 | | Load 0x0,0x8
02a1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02a2 02c7 | | Declare_Variable Any
02a3 00d8 | | Load_Top At_Offset_0
02a4 1c00 | | Execute_Immediate Run_Utility,0x0
02a5 e008 | | Load 0x0,0x8
02a6 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
02a7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02a8 02c7 | | Declare_Variable Any
02a9 00d8 | | Load_Top At_Offset_0
02aa 1c00 | | Execute_Immediate Run_Utility,0x0
02ab BODY_0298:
02ab e008 | | Load 0x0,0x8
02ac 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02ad 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02ae e404 | | Load 0x2,0x4
02af 0120 | | Execute Any,Is_Value
02b0 6803 |h | Jump_Zero 0x2b4
02b1 e008 | | Load 0x0,0x8
02b2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02b3 7801 |x | Jump 0x2b5
02b4 e404 | | Load 0x2,0x4
02b5 6062 |`b | Indirect_Literal Discrete,0x318,{0x00000000, 0x00004000}
02b6 e00b | | Load 0x0,0xb
02b7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02b8 e009 | | Load 0x0,0x9
02b9 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02ba e008 | | Load 0x0,0x8
02bb 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02bc 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02bd e5fd | | Load 0x2,-0x3
02be e008 | | Load 0x0,0x8
02bf 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02c0 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
02c1 c404 | | Store 0x2,0x4
02c2 c403 | | Store 0x2,0x3
02c3 e403 | | Load 0x2,0x3
02c4 681d |h | Jump_Zero 0x2e2
02c5 e004 | | Load 0x0,0x4
02c6 180e | | Execute Package,Field_Execute,Field_Number 0xe
02c7 4807 |H | Short_Literal 0x7
02c8 604f |`O | Indirect_Literal Discrete,0x318,{0x00000000, 0x00004000}
02c9 e00b | | Load 0x0,0xb
02ca 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02cb e009 | | Load 0x0,0x9
02cc 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02cd e00a | | Load 0x0,0xa
02ce 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02cf 4801 |H | Short_Literal 0x1
02d0 4800 |H | Short_Literal 0x0
02d1 e009 | | Load 0x0,0x9
02d2 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02d3 e008 | | Load 0x0,0x8
02d4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02d5 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02d6 e5fd | | Load 0x2,-0x3
02d7 e403 | | Load 0x2,0x3
02d8 e008 | | Load 0x0,0x8
02d9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02da 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
02db e006 | | Load 0x0,0x6
02dc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02dd 4801 |H | Short_Literal 0x1
02de c5fe | | Store 0x2,-0x2
02df e004 | | Load 0x0,0x4
02e0 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
02e1 0257 | W | Execute Discrete,Raise
02e2 e008 | | Load 0x0,0x8
02e3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02e4 e405 | | Load 0x2,0x5
02e5 0120 | | Execute Any,Is_Value
02e6 6804 |h | Jump_Zero 0x2eb
02e7 e008 | | Load 0x0,0x8
02e8 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
02e9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02ea 7801 |x | Jump 0x2ec
02eb e405 | | Load 0x2,0x5
02ec e404 | | Load 0x2,0x4
02ed e008 | | Load 0x0,0x8
02ee 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
02ef 181c | | Execute Package,Field_Execute,Field_Number 0x1c
02f0 c405 | | Store 0x2,0x5
02f1 c402 | | Store 0x2,0x2
02f2 e402 | | Load 0x2,0x2
02f3 7005 |p | Jump_Nonzero 0x2f9
02f4 00d8 | | Load_Top At_Offset_0
02f5 e008 | | Load 0x0,0x8
02f6 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
02f7 1812 | | Execute Package,Field_Execute,Field_Number 0x12
02f8 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
02f9 e004 | | Load 0x0,0x4
02fa 180e | | Execute Package,Field_Execute,Field_Number 0xe
02fb 4807 |H | Short_Literal 0x7
02fc 4829 |H) | Short_Literal 0x29
02fd 0092 0429 | )| Action Push_String_Extended,0x429 ; "Unable to obtain enclosing context of "
02ff e404 | | Load 0x2,0x4
0300 e008 | | Load 0x0,0x8
0301 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0302 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0303 01cc | | Execute Vector,Catenate
0304 0092 042a | *| Action Push_String_Extended,0x42a ; " ("
0306 01cc | | Execute Vector,Catenate
0307 e402 | | Load 0x2,0x2
0308 e008 | | Load 0x0,0x8
0309 1b0d | | Execute Package,Field_Read,Field_Number 0xd
030a 011c | | Execute Any,Convert_Unchecked
030b 1c01 | | Execute_Immediate Run_Utility,0x1
030c 01cc | | Execute Vector,Catenate
030d 01cb | | Execute Vector,Append
030e e006 | | Load 0x0,0x6
030f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0310 4801 |H | Short_Literal 0x1
0311 c5fe | | Store 0x2,-0x2
0312 e004 | | Load 0x0,0x4
0313 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
0314 0257 | W | Execute Discrete,Raise
0315 0000 0000 | | .XXX[0x3]
0317 0000 | |
0318 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
031c 0000 0000 | | .BLANK 0000[0x4]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0324 | $ | .CONST 0x0324 ; Address of begin
0321 0004 | | .CONST 0x0004 ; Address of exception handler
0322 0002 | | .CONST 0x0002 ; Number of locals
0323 INIT_0320:
0323 00e1 | | Load_Encached Boolean_Cache
0324 BODY_0320:
0324 00d8 | | Load_Top At_Offset_0
0325 4801 |H | Short_Literal 0x1
0326 e5fc | | Load 0x2,-0x4
0327 e5fd | | Load 0x2,-0x3
0328 e5fb | | Load 0x2,-0x5
0329 e001 | | Load 0x0,0x1
032a 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
032b c402 | | Store 0x2,0x2
032c 00d8 | | Load_Top At_Offset_0
032d 7024 |p$ | Jump_Nonzero 0x352
032e e004 | | Load 0x0,0x4
032f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0330 4807 |H | Short_Literal 0x7
0331 0092 042b | +| Action Push_String_Extended,0x42b ; "Unable to set "
0333 e5fd | | Load 0x2,-0x3
0334 01cc | | Execute Vector,Catenate
0335 0092 042c | ,| Action Push_String_Extended,0x42c ; " property for "
0337 01cc | | Execute Vector,Catenate
0338 4801 |H | Short_Literal 0x1
0339 e5fb | | Load 0x2,-0x5
033a e001 | | Load 0x0,0x1
033b 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
033c 01cc | | Execute Vector,Catenate
033d 0092 042d | -| Action Push_String_Extended,0x42d ; ": "
033f 01cc | | Execute Vector,Catenate
0340 e5fc | | Load 0x2,-0x4
0341 e5fd | | Load 0x2,-0x3
0342 e5fb | | Load 0x2,-0x5
0343 e001 | | Load 0x0,0x1
0344 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
0345 01cc | | Execute Vector,Catenate
0346 e006 | | Load 0x0,0x6
0347 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0348 e004 | | Load 0x0,0x4
0349 180e | | Execute Package,Field_Execute,Field_Number 0xe
034a e004 | | Load 0x0,0x4
034b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
034c 7003 |p | Jump_Nonzero 0x350
034d e004 | | Load 0x0,0x4
034e 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
034f 0257 | W | Execute Discrete,Raise
0350 4801 |H | Short_Literal 0x1
0351 c5fe | | Store 0x2,-0x2
0352 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0353 0000 0000 | | .BLANK 0000[0x5]
0358 ; --------------------------------------------------------------------------------------
0358 ; SUBPROGRAM
0358 ; --------------------------------------------------------------------------------------
0358 035b | [ | .CONST 0x035b ; Address of begin
0359 0004 | | .CONST 0x0004 ; Address of exception handler
035a 0001 | | .CONST 0x0001 ; Number of locals
035b BODY_0358:
035b INIT_0358:
035b e5ff | | Load 0x2,-0x1
035c 0b00 | | Execute_Immediate Case_Compare,0x0
035d 700e |p | Jump_Nonzero 0x36c
035e 0f01 | | Execute_Immediate Equal,0x1
035f 7014 |p | Jump_Nonzero 0x374
0360 4820 |H | Short_Literal 0x20
0361 4830 |H0 | Short_Literal 0x30
0362 4800 |H | Short_Literal 0x0
0363 480a |H | Short_Literal 0xa
0364 e5ff | | Load 0x2,-0x1
0365 822d | - | Call 0x1,0x2d
0366 01cb | | Execute Vector,Append
0367 e5fe | | Load 0x2,-0x2
0368 01cc | | Execute Vector,Catenate
0369 e5fd | | Load 0x2,-0x3
036a 01cc | | Execute Vector,Catenate
036b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
036c 00d1 | | Pop_Control Pop_Count_1
036d 0092 042e | .| Action Push_String_Extended,0x42e ; "No "
036f e5fe | | Load 0x2,-0x2
0370 01cc | | Execute Vector,Catenate
0371 e5fd | | Load 0x2,-0x3
0372 01cc | | Execute Vector,Catenate
0373 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0374 0092 042f | /| Action Push_String_Extended,0x42f ; "One "
0376 e5fe | | Load 0x2,-0x2
0377 01cc | | Execute Vector,Catenate
0378 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0379 0000 0000 | | .BLANK 0000[0x7]
0380 ; --------------------------------------------------------------------------------------
0380 ; SUBPROGRAM
0380 ; --------------------------------------------------------------------------------------
0380 0383 | | .CONST 0x0383 ; Address of begin
0381 0004 | | .CONST 0x0004 ; Address of exception handler
0382 0001 | | .CONST 0x0001 ; Number of locals
0383 BODY_0380:
0383 INIT_0380:
0383 e004 | | Load 0x0,0x4
0384 180e | | Execute Package,Field_Execute,Field_Number 0xe
0385 4800 |H | Short_Literal 0x0
0386 485d |H] | Short_Literal 0x5d
0387 485b |H[ | Short_Literal 0x5b
0388 e5ff | | Load 0x2,-0x1
0389 01ca | | Execute Vector,Prepend
038a e5fe | | Load 0x2,-0x2
038b 01cc | | Execute Vector,Catenate
038c 01cb | | Execute Vector,Append
038d e006 | | Load 0x0,0x6
038e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
038f e5fd | | Load 0x2,-0x3
0390 e004 | | Load 0x0,0x4
0391 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0392 e5fc | | Load 0x2,-0x4
0393 6803 |h | Jump_Zero 0x397
0394 e004 | | Load 0x0,0x4
0395 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
0396 0257 | W | Execute Discrete,Raise
0397 4505 |E | Exit_Suprogram New_Top_Offset 0x5
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 e5ff | | Load 0x2,-0x1
039c e214 | | Load 0x1,0x14
039d 01df | | Execute Vector,Equal
039e 6803 |h | Jump_Zero 0x3a2
039f 0092 0430 | 0| Action Push_String_Extended,0x430 ; "directory"
03a1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03a2 e5ff | | Load 0x2,-0x1
03a3 e22b | + | Load 0x1,0x2b
03a4 01df | | Execute Vector,Equal
03a5 6803 |h | Jump_Zero 0x3a9
03a6 0092 0431 | 1| Action Push_String_Extended,0x431 ; "non-directory"
03a8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03a9 0092 0432 | 2| Action Push_String_Extended,0x432 ; "applicable"
03ab 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03ac 0000 0000 | | .BLANK 0000[0x4]
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 e5fa | | Load 0x2,-0x6
03b4 6807 |h | Jump_Zero 0x3bc
03b5 485b |H[ | Short_Literal 0x5b
03b6 e5fb | | Load 0x2,-0x5
03b7 01ca | | Execute Vector,Prepend
03b8 0092 0433 | 3| Action Push_String_Extended,0x433 ; "]??"
03ba 01cc | | Execute Vector,Catenate
03bb 00ca | | Action Exit_Nullary_Function
03bc e5fb | | Load 0x2,-0x5
03bd 0335 | 5 | Declare_Variable Array,Duplicate
03be 00cd | | Action Spare6_Action
03bf 00ca | | Action Exit_Nullary_Function
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03c3 | | .CONST 0x03c3 ; Address of begin
03c1 03c9 | | .CONST 0x03c9 ; Address of exception handler
03c2 0001 | | .CONST 0x0001 ; Number of locals
03c3 BODY_03c0:
03c3 INIT_03c0:
03c3 e402 | | Load 0x2,0x2
03c4 e403 | | Load 0x2,0x3
03c5 85fc | | Call 0x2,-0x4
03c6 c403 | | Store 0x2,0x3
03c7 c402 | | Store 0x2,0x2
03c8 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03c9 TRAP_03c0:
03c9 e004 | | Load 0x0,0x4
03ca 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
03cb 010f | | Execute Exception,Equal
03cc 6808 |h | Jump_Zero 0x3d5
03cd e004 | | Load 0x0,0x4
03ce 180e | | Execute Package,Field_Execute,Field_Number 0xe
03cf e004 | | Load 0x0,0x4
03d0 1818 | | Execute Package,Field_Execute,Field_Number 0x18
03d1 a402 | | Store_Unchecked 0x2,0x2
03d2 4801 |H | Short_Literal 0x1
03d3 c5fd | | Store 0x2,-0x3
03d4 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03d5 e004 | | Load 0x0,0x4
03d6 180e | | Execute Package,Field_Execute,Field_Number 0xe
03d7 e004 | | Load 0x0,0x4
03d8 1818 | | Execute Package,Field_Execute,Field_Number 0x18
03d9 a402 | | Store_Unchecked 0x2,0x2
03da 4801 |H | Short_Literal 0x1
03db c5fd | | Store 0x2,-0x3
03dc e004 | | Load 0x0,0x4
03dd 180e | | Execute Package,Field_Execute,Field_Number 0xe
03de 4808 |H | Short_Literal 0x8
03df e008 | | Load 0x0,0x8
03e0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03e1 0092 0434 | 4| Action Push_String_Extended,0x434 ; "Unexpected exception while processing <1> - "
03e3 4801 |H | Short_Literal 0x1
03e4 4801 |H | Short_Literal 0x1
03e5 e007 | | Load 0x0,0x7
03e6 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03e7 01cc | | Execute Vector,Catenate
03e8 e404 | | Load 0x2,0x4
03e9 e006 | | Load 0x0,0x6
03ea 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
03eb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03ec 0000 0000 | | .BLANK 0000[0x4]
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 03f3 | | .CONST 0x03f3 ; Address of begin
03f1 03f9 | | .CONST 0x03f9 ; Address of exception handler
03f2 0001 | | .CONST 0x0001 ; Number of locals
03f3 BODY_03f0:
03f3 INIT_03f0:
03f3 e402 | | Load 0x2,0x2
03f4 e5fa | | Load 0x2,-0x6
03f5 e403 | | Load 0x2,0x3
03f6 85fc | | Call 0x2,-0x4
03f7 c402 | | Store 0x2,0x2
03f8 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03f9 TRAP_03f0:
03f9 e004 | | Load 0x0,0x4
03fa 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
03fb 010f | | Execute Exception,Equal
03fc 6808 |h | Jump_Zero 0x405
03fd e004 | | Load 0x0,0x4
03fe 180e | | Execute Package,Field_Execute,Field_Number 0xe
03ff e004 | | Load 0x0,0x4
0400 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0401 a402 | | Store_Unchecked 0x2,0x2
0402 4801 |H | Short_Literal 0x1
0403 c5fd | | Store 0x2,-0x3
0404 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0405 e004 | | Load 0x0,0x4
0406 180e | | Execute Package,Field_Execute,Field_Number 0xe
0407 e004 | | Load 0x0,0x4
0408 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0409 a402 | | Store_Unchecked 0x2,0x2
040a 4801 |H | Short_Literal 0x1
040b c5fd | | Store 0x2,-0x3
040c e004 | | Load 0x0,0x4
040d 180e | | Execute Package,Field_Execute,Field_Number 0xe
040e 4808 |H | Short_Literal 0x8
040f e008 | | Load 0x0,0x8
0410 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0411 0092 0434 | 4| Action Push_String_Extended,0x434 ; "Unexpected exception while processing <1> - "
0413 4801 |H | Short_Literal 0x1
0414 4801 |H | Short_Literal 0x1
0415 e007 | | Load 0x0,0x7
0416 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0417 01cc | | Execute Vector,Catenate
0418 e403 | | Load 0x2,0x3
0419 e006 | | Load 0x0,0x6
041a 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
041b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
041c ; --------------------------------------------------------------------------------------
041c ; STRING TABLE
041c ; --------------------------------------------------------------------------------------
041c 0034 | 4 | .STRTAB 0x0034->0x0436 ; " completed with warnings"
041d 004a | J | .STRTAB 0x004a->0x0442 ; " completed"
041e 0052 | R | .STRTAB 0x0052->0x0447 ; " terminated with errors"
041f 0067 | g | .STRTAB 0x0067->0x0452 ; "Unexpected "
0420 0070 | p | .STRTAB 0x0070->0x0458 ; " terminated with an internal error"
0421 0090 | | .STRTAB 0x0090->0x0469 ; "Naming expression \x22"
0422 00a1 | | .STRTAB 0x00a1->0x0472 ; "\x22 resolved to no "
0423 00b0 | | .STRTAB 0x00b0->0x047b ; " gateway objects"
0424 00be | | .STRTAB 0x00be->0x0483 ; "s"
0425 00bd | | .STRTAB 0x00bd->0x0483 ; "gateway object"
0426 00c9 | | .STRTAB 0x00c9->0x048a ; " processed"
0427 00d1 | | .STRTAB 0x00d1->0x048f ; "\x22 resolved to no applicable objects"
0428 00f2 | | .STRTAB 0x00f2->0x04a1 ; "object"
0429 00f6 | | .STRTAB 0x00f6->0x04a4 ; "Unable to obtain enclosing context of "
042a 011a | | .STRTAB 0x011a->0x04b7 ; " ("
042b 011a | | .STRTAB 0x011a->0x04b8 ; "Unable to set "
042c 0126 | & | .STRTAB 0x0126->0x04bf ; " property for "
042d 0132 | 2 | .STRTAB 0x0132->0x04c6 ; ": "
042e 0132 | 2 | .STRTAB 0x0132->0x04c7 ; "No "
042f 0133 | 3 | .STRTAB 0x0133->0x04c8 ; "One "
0430 0135 | 5 | .STRTAB 0x0135->0x04ca ; "directory"
0431 013c | < | .STRTAB 0x013c->0x04cf ; "non-directory"
0432 0147 | G | .STRTAB 0x0147->0x04d5 ; "applicable"
0433 014f | O | .STRTAB 0x014f->0x04da ; "]??"
0434 0150 | P | .STRTAB 0x0150->0x04dc ; "Unexpected exception while processing <1> - "
0435 017a | z | .STREND 0x017a->0x04f2
0436 2063 6f6d | com| .STRTAB_STRINGS
04f2 0000 0000 | | .BLANK 0000[0x6]
04f8 ; --------------------------------------------------------------------------------------
04f8 ; Debug Table
04f8 ; --------------------------------------------------------------------------------------
04f8 0004 0012 | | .DEBUG4 0x0004,0x0012,0xce68,0x0000,0x0001,0x0000
04fe 8e01 471d | G | .XXX[0x102]
0500 9238 05f4 | 8 |
0502 731d 28a1 |s ( |
0504 f6b2 df94 | |
0506 6242 958a |bB |
0508 658f 0259 |e Y|
050a a962 4807 | bH |
050c 583b 2868 |X;(h|
050e 0640 04e8 | @ |
0510 2a4d 2419 |*M$ |
0512 3249 4098 |2I@ |
0514 65c0 432a |e C*|
0516 b193 03f1 | |
0518 96ce 29ed | ) |
051a 4198 6783 |A g |
051c fb22 b195 | " |
051e 01c7 1992 | |
0520 5806 0781 |X |
0522 8964 1861 | d a|
0524 0910 af05 | |
0526 dad3 89fd | |
0528 2aac 7d12 |* } |
052a d3aa 8532 | 2|
052c 9864 02c4 | d |
052e b659 9803 | Y |
0530 c08e ce68 | h|
0532 050b a995 | |
0534 a418 52a5 | R |
0536 7bad d2ca |{ |
0538 d529 a155 | ) U|
053a acf4 1996 | |
053c 7805 161f |x |
053e 31e8 1912 |1 |
0540 a563 9865 | c e|
0542 0294 ba59 | Y|
0544 9d02 d282 | |
0546 da79 9133 | y 3|
0548 9866 419d | fA |
054a 0a65 a103 | e |
054c 302a c77a |0* z|
054e 59a1 0336 |Y 6|
0550 2996 8804 |) |
0552 e3ad 8a24 | $|
0554 1bb2 b1ed | |
0556 ac12 001b | |
0558 e2b1 fcaf | |
055a 42e9 6298 |B b |
055c 050d af86 | |
055e 6818 62b5 |h b |
0560 6198 6a42 |a jB|
0562 d06a 59a7 | jY |
0564 0098 8ece | |
0566 9805 285e | (^|
0568 4e64 1ae2 |Nd |
056a 4942 986b |IB k|
056c c247 22b1 | G" |
056e aa01 594d | YM|
0570 5ea8 0544 |^ D|
0572 93a2 aa43 | C|
0574 5255 ad03 |RU |
0576 f886 ceb8 | |
0578 0518 47a8 | G |
057a aad4 5abb | Z |
057c 5291 39a5 |R 9 |
057e 62c8 07d6 |b |
0580 0f33 2818 | 3( |
0582 a02d d594 | - |
0584 6ec1 9726 |n &|
0586 b1b6 0125 | %|
0588 e966 d805 | f |
058a c9af 8768 | h|
058c 1a51 69d6 | Qi |
058e 946d c2e7 | m |
0590 22b1 bb03 |" |
0592 8552 f17a | R z|
0594 b216 ac6e | n|
0596 81dc 6a59 | jY|
0598 bc03 4d6a | Mj|
059a e2f8 0576 | v|
059c a587 e4f0 | |
059e 2410 c8ac |$ |
05a0 70c2 597a |p Yz|
05a2 59c1 03c2 |Y |
05a4 a96b 0805 | k |
05a6 0c15 55e9 | U |
05a8 6f08 04f2 |o |
05aa 9d84 641c | d |
05ac e130 c9ac | 0 |
05ae 7142 446a |qBDj|
05b0 59cb 03d8 |Y |
05b2 82cf 2806 | ( |
05b4 4fa9 94a4 |O |
05b6 1c42 baaa | B |
05b8 9471 81c5 | q |
05ba 7a59 cd01 |zY |
05bc c49a a918 | |
05be 01ce 037a | z|
05c0 a968 98c6 | h |
05c2 769d 90e4 |v |
05c4 1cf2 6eb0 | n |
05c6 abfd 2936 | )6|
05c8 faab f3ae | |
05ca b8de af7a | z|
05cc 59cd 0331 |Y 1|
05ce d6ad 1801 | |
05d0 d103 fe96 | |
05d2 ae5a 59d0 | ZY |
05d4 0263 82af | c |
05d6 7a59 d101 |zY |
05d8 c0c5 6f48 | oH|
05da 044b a195 | K |
05dc 241f 91e7 |$ |
05de 049c 196e | n|
05e0 646a 59d6 |djY |
05e2 02d1 e967 | g|
05e4 5807 afa4 |X |
05e6 24ae be4a |$ J|
05e8 c3d4 a825 | %|
05ea ee6c 225d | l"]|
05ec db02 dda9 | |
05ee 6368 078b |ch |
05f0 a831 6e73 | 1ns|
05f2 7a59 d801 |zY |
05f4 c9e9 6f78 | ox|
05f6 06cb 09b1 | |
05f8 e41e d2ae | |
05fa 5f94 7683 |_ v |
05fc 077a 5ddf | z] |
05fe 0028 6f12 | (o |