|
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: 6144 (0x1800)
Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦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 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0840 | @ | .CONST 0x0840 ; 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 0005 | | .CONST 0x0005 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 003b | ; | .CONST 0x003b ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 001a | | .CONST 0x001a ; Number of locals
000b INIT_0008:
000b 029a 0043 | C| Declare_Subprogram INIT_0040,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x08c2,0x8000,0x0000,0x0057,0xadc5,0x0000,0x0009
; Debug Table 0x0.0x0 = 0xb,0xffff
000d 0007 | | Action Break_Optional ; Debug Table 0x0.0x1 = 0xd,0xfffe
000e 00bf | | Action Accept_Activation ; Debug Table 0x0.0x2 = 0xe,0xfffd
000f 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x000f,0x08ca,0x8000,0x0000,0x0057,0xaf05,0x0000,0x0025
; Debug Table 0x1.0x0 = 0xf,0xffff
0010 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x10,0xfffe
0011 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x11,0xfffd
0012 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x12,0xfffc
0013 0007 | | Action Break_Optional ; Debug Table 0x1.0x4 = 0x13,0xfffb
0014 0007 | | Action Break_Optional ; Debug Table 0x1.0x5 = 0x14,0xfffa
0015 0007 | | Action Break_Optional ; Debug Table 0x1.0x6 = 0x15,0xfff9
0016 0007 | | Action Break_Optional ; Debug Table 0x1.0x7 = 0x16,0xfff8
0017 0007 | | Action Break_Optional ; Debug Table 0x1.0x8 = 0x17,0xfff7
0018 0007 | | Action Break_Optional ; Debug Table 0x1.0x9 = 0x18,0xfff6
0019 0007 | | Action Break_Optional ; Debug Table 0x1.0xa = 0x19,0xfff5
001a 0007 | | Action Break_Optional ; Debug Table 0x1.0xb = 0x1a,0xfff4
001b 0007 | | Action Break_Optional ; Debug Table 0x1.0xc = 0x1b,0xfff3
001c 0007 | | Action Break_Optional ; Debug Table 0x1.0xd = 0x1c,0xfff2
001d e001 | | Load 0x0,0x1 ; Debug Table 0x1.0xe = 0x1d,0xfff1
001e 1929 | ) | Execute Package,Field_Reference,Field_Number 0x29
001f 0007 | | Action Break_Optional
0020 029d 0203 | | Declare_Subprogram INIT_0200,For_Outer_Call ; Debug Table 0x1.0xf = 0x20,0xfff0
0022 029d 020b | | Declare_Subprogram INIT_0208,For_Outer_Call ; Debug Table 0x1.0x10 = 0x22,0xffef
0024 029d 0213 | | Declare_Subprogram INIT_0210,For_Outer_Call ; Debug Table 0x1.0x11 = 0x24,0xffee
0026 029d 021b | | Declare_Subprogram INIT_0218,For_Outer_Call ; Debug Table 0x1.0x12 = 0x26,0xffed
0028 0007 | | Action Break_Optional ; Debug Table 0x1.0x13 = 0x28,0xffec
0029 029d 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call ; Debug Table 0x1.0x14 = 0x29,0xffeb
002b 029d 0263 | c| Declare_Subprogram INIT_0260,For_Outer_Call ; Debug Table 0x1.0x15 = 0x2b,0xffea
002d 029d 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call ; Debug Table 0x1.0x16 = 0x2d,0xffe9
002f 029d 03b3 | | Declare_Subprogram INIT_03b0,For_Outer_Call ; Debug Table 0x1.0x17 = 0x2f,0xffe8
0031 029d 03d3 | | Declare_Subprogram INIT_03d0,For_Outer_Call ; Debug Table 0x1.0x18 = 0x31,0xffe7
0033 029d 0473 | s| Declare_Subprogram INIT_0470,For_Outer_Call ; Debug Table 0x1.0x19 = 0x33,0xffe6
0035 029d 053b | ;| Declare_Subprogram INIT_0538,For_Outer_Call ; Debug Table 0x1.0x1a = 0x35,0xffe5
0037 029d 0603 | | Declare_Subprogram INIT_0600,For_Outer_Call ; Debug Table 0x1.0x1b = 0x37,0xffe4
0039 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x1c = 0x39,0xffe3
003a 00c7 | | Action Elaborate_Subprogram
003b BODY_0008:
003b 00bc | | Action Signal_Activated
003c 00bb | | Action Signal_Completion
003d 0000 0000 | | .XXX[0x3]
003f 0000 | |
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 0062 | b | .CONST 0x0062 ; Address of begin
0041 0195 | | .CONST 0x0195 ; Address of exception handler
0042 000a | | .CONST 0x000a ; Number of locals
0043 INIT_0040:
0043 e002 | | Load 0x0,0x2 ; Debug Table 0x2 = .DEBUG 0x0043,0x0906,0x0001,0x0000,0x0057,0xadc5,0x0000,0x000a
; Debug Table 0x2.0x0 = 0x43,0xffff
0044 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0045 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0046 e002 | | Load 0x0,0x2 ; Debug Table 0x2.0x1 = 0x46,0xfffe
0047 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0048 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0049 02c7 | | Declare_Variable Any
004a 00d8 | | Load_Top At_Offset_0
004b 1c00 | | Execute_Immediate Run_Utility,0x0
004c 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x2.0x2 = 0x4c,0xfffd
004d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
004e 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x2.0x3 = 0x4e,0xfffc
004f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0050 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x2.0x4 = 0x50,0xfffb
0051 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0052 e003 | | Load 0x0,0x3 ; Debug Table 0x2.0x5 = 0x52,0xfffa
0053 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0054 02c7 | | Declare_Variable Any
0055 e003 | | Load 0x0,0x3
0056 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0057 c407 | | Store 0x2,0x7
0058 e001 | | Load 0x0,0x1 ; Debug Table 0x2.0x6 = 0x58,0xfff9
0059 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
005a 1b12 | | Execute Package,Field_Read,Field_Number 0x12
005b e001 | | Load 0x0,0x1 ; Debug Table 0x2.0x7 = 0x5b,0xfff8
005c 1b11 | | Execute Package,Field_Read,Field_Number 0x11
005d 0322 | " | Declare_Variable Record
005e 00d8 | | Load_Top At_Offset_0
005f 1c00 | | Execute_Immediate Run_Utility,0x0
0060 029f 069b | | Declare_Subprogram INIT_0698,For_Call
0062 BODY_0040:
0062 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0x8 = 0x62,0x1
0063 a5f9 | | Store_Unchecked 0x2,-0x7
0064 e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0x9 = 0x64,0x2
0065 01db | | Execute Vector,Length
0066 700f |p | Jump_Nonzero 0x76
0067 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0xa = 0x67,0x3
0068 0092 06b8 | | Action Push_String_Extended,0x6b8 ; "The unit name given to "
006a 4800 |H | Short_Literal 0x0
006b 4800 |H | Short_Literal 0x0
006c 4801 |H | Short_Literal 0x1
006d e5fb | | Load 0x2,-0x5
006e 8213 | | Call 0x1,0x13
006f 01cc | | Execute Vector,Catenate
0070 0092 06b9 | | Action Push_String_Extended,0x6b9 ; " should not be the null string"
0072 01cc | | Execute Vector,Catenate
0073 820f | | Call 0x1,0xf
0074 820e | | Call 0x1,0xe
0075 4507 |E | Exit_Suprogram New_Top_Offset 0x7 ; Debug Table 0x2.0xb = 0x75,0x4
0076 e001 | | Load 0x0,0x1 ; Debug Table 0x2.0xc = 0x76,0x5
0077 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0078 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0079 e004 | | Load 0x0,0x4
007a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
007b e005 | | Load 0x0,0x5
007c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
007d e001 | | Load 0x0,0x1
007e 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
007f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0080 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0081 e5fb | | Load 0x2,-0x5 ; Debug Table 0x2.0xd = 0x81,0x6
0082 6819 |h | Jump_Zero 0x9c
0083 e002 | | Load 0x0,0x2 ; Debug Table 0x2.0xe = 0x83,0x7
0084 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0085 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0086 e403 | | Load 0x2,0x3
0087 6320 |c | Indirect_Literal Discrete,0x3a8,{0x00000000, 0x00004000}
0088 e003 | | Load 0x0,0x3
0089 1b0e | | Execute Package,Field_Read,Field_Number 0xe
008a e004 | | Load 0x0,0x4
008b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
008c e005 | | Load 0x0,0x5
008d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
008e 4801 |H | Short_Literal 0x1
008f 4800 |H | Short_Literal 0x0
0090 e004 | | Load 0x0,0x4
0091 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0092 e002 | | Load 0x0,0x2
0093 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0094 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0095 e5ff | | Load 0x2,-0x1
0096 e002 | | Load 0x0,0x2
0097 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0098 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0099 c403 | | Store 0x2,0x3
009a c402 | | Store 0x2,0x2
009b 781c |x | Jump 0xb8
009c e002 | | Load 0x0,0x2 ; Debug Table 0x2.0xf = 0x9c,0x8
009d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
009e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
009f e403 | | Load 0x2,0x3
00a0 6307 |c | Indirect_Literal Discrete,0x3a8,{0x00000000, 0x00004000}
00a1 e003 | | Load 0x0,0x3
00a2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00a3 e004 | | Load 0x0,0x4
00a4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00a5 e005 | | Load 0x0,0x5
00a6 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00a7 4801 |H | Short_Literal 0x1
00a8 4800 |H | Short_Literal 0x0
00a9 e004 | | Load 0x0,0x4
00aa 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00ab e002 | | Load 0x0,0x2
00ac 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
00ad 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00ae 487d |H} | Short_Literal 0x7d
00af 487b |H{ | Short_Literal 0x7b
00b0 e5ff | | Load 0x2,-0x1
00b1 01ca | | Execute Vector,Prepend
00b2 01cb | | Execute Vector,Append
00b3 e002 | | Load 0x0,0x2
00b4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
00b5 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00b6 c403 | | Store 0x2,0x3
00b7 c402 | | Store 0x2,0x2
00b8 840a | | Call 0x2,0xa ; Debug Table 0x2.0x10 = 0xb8,0x9
00b9 e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x11 = 0xb9,0xa
00ba 702d |p- | Jump_Nonzero 0xe8
00bb e006 | | Load 0x0,0x6 ; Debug Table 0x2.0x12 = 0xbb,0xb
00bc 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00bd e5fa | | Load 0x2,-0x6
00be e003 | | Load 0x0,0x3
00bf 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00c0 c407 | | Store 0x2,0x7
00c1 e404 | | Load 0x2,0x4 ; Debug Table 0x2.0x13 = 0xc1,0xc
00c2 00db | | Load_Top At_Offset_3
00c3 e405 | | Load 0x2,0x5
00c4 e403 | | Load 0x2,0x3
00c5 e5fd | | Load 0x2,-0x3
00c6 e407 | | Load 0x2,0x7
00c7 e409 | | Load 0x2,0x9
00c8 e5fb | | Load 0x2,-0x5
00c9 821a | | Call 0x1,0x1a
00ca c403 | | Store 0x2,0x3
00cb c405 | | Store 0x2,0x5
00cc c408 | | Store 0x2,0x8
00cd c404 | | Store 0x2,0x4
00ce 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x14 = 0xce,0xd
00cf 4801 |H | Short_Literal 0x1
00d0 4801 |H | Short_Literal 0x1
00d1 e5fa | | Load 0x2,-0x6
00d2 e003 | | Load 0x0,0x3
00d3 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00d4 c407 | | Store 0x2,0x7
00d5 e404 | | Load 0x2,0x4 ; Debug Table 0x2.0x15 = 0xd5,0xe
00d6 701f |p | Jump_Nonzero 0xf6
00d7 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x16 = 0xd7,0xf
00d8 0092 06ba | | Action Push_String_Extended,0x6ba ; "No "
00da 4800 |H | Short_Literal 0x0
00db 4800 |H | Short_Literal 0x0
00dc 4800 |H | Short_Literal 0x0
00dd e5fb | | Load 0x2,-0x5
00de 8213 | | Call 0x1,0x13
00df 01cc | | Execute Vector,Catenate
00e0 0092 06bb | | Action Push_String_Extended,0x6bb ; "able objects match "
00e2 01cc | | Execute Vector,Catenate
00e3 e5ff | | Load 0x2,-0x1
00e4 01cc | | Execute Vector,Catenate
00e5 820f | | Call 0x1,0xf
00e6 820e | | Call 0x1,0xe
00e7 780e |x | Jump 0xf6
00e8 4805 |H | Short_Literal 0x5 ; Debug Table 0x2.0x17 = 0xe8,0x10
00e9 e5fd | | Load 0x2,-0x3
00ea e5ff | | Load 0x2,-0x1
00eb 0092 06bc | | Action Push_String_Extended,0x6bc ; "finding objects to "
00ed 4800 |H | Short_Literal 0x0
00ee 4800 |H | Short_Literal 0x0
00ef 4800 |H | Short_Literal 0x0
00f0 e5fb | | Load 0x2,-0x5
00f1 8213 | | Call 0x1,0x13
00f2 01cc | | Execute Vector,Catenate
00f3 e402 | | Load 0x2,0x2
00f4 e007 | | Load 0x0,0x7
00f5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00f6 e403 | | Load 0x2,0x3 ; Debug Table 0x2.0x18 = 0xf6,0x11
00f7 e002 | | Load 0x0,0x2
00f8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
00f9 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
00fa c403 | | Store 0x2,0x3
00fb e405 | | Load 0x2,0x5 ; Debug Table 0x2.0x19 = 0xfb,0x12
00fc e404 | | Load 0x2,0x4
00fd e5fe | | Load 0x2,-0x2
00fe 0271 | q | Execute Discrete,Times
00ff 027d | } | Execute Discrete,Greater
0100 680e |h | Jump_Zero 0x10f
0101 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x1a = 0x101,0x13
0102 0092 06bd | | Action Push_String_Extended,0x6bd ; "Number of marked objects,"
0104 e405 | | Load 0x2,0x5
0105 00e0 | | Load_Encached Standard_Cache
0106 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0107 01cc | | Execute Vector,Catenate
0108 0092 06be | | Action Push_String_Extended,0x6be ; ", exceeds threshold"
010a 01cc | | Execute Vector,Catenate
010b 820f | | Call 0x1,0xf
010c 820e | | Call 0x1,0xe
010d 6296 |b | Indirect_Literal Discrete,0x3a4,{0x00000000, 0x57af0501} ; Debug Table 0x2.0x1b = 0x10d,0x14
010e 0257 | W | Execute Discrete,Raise
010f e405 | | Load 0x2,0x5 ; Debug Table 0x2.0x1c = 0x10f,0x15
0110 0f01 | | Execute_Immediate Equal,0x1
0111 680c |h | Jump_Zero 0x11e
0112 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x1d = 0x112,0x16
0113 0092 06bf | | Action Push_String_Extended,0x6bf ; "The 1 marked object will now be "
0115 4801 |H | Short_Literal 0x1
0116 4800 |H | Short_Literal 0x0
0117 4800 |H | Short_Literal 0x0
0118 e5fb | | Load 0x2,-0x5
0119 8213 | | Call 0x1,0x13
011a 01cc | | Execute Vector,Catenate
011b 8212 | | Call 0x1,0x12
011c 820e | | Call 0x1,0xe
011d 7815 |x | Jump 0x133
011e e405 | | Load 0x2,0x5 ; Debug Table 0x2.0x1e = 0x11e,0x17
011f 0c02 | | Execute_Immediate Greater_Equal,0x2
0120 6812 |h | Jump_Zero 0x133
0121 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x1f = 0x121,0x18
0122 0092 06c0 | | Action Push_String_Extended,0x6c0 ; "The"
0124 e405 | | Load 0x2,0x5
0125 00e0 | | Load_Encached Standard_Cache
0126 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0127 01cc | | Execute Vector,Catenate
0128 0092 06c1 | | Action Push_String_Extended,0x6c1 ; " marked objects will now be "
012a 01cc | | Execute Vector,Catenate
012b 4801 |H | Short_Literal 0x1
012c 4800 |H | Short_Literal 0x0
012d 4800 |H | Short_Literal 0x0
012e e5fb | | Load 0x2,-0x5
012f 8213 | | Call 0x1,0x13
0130 01cc | | Execute Vector,Catenate
0131 8212 | | Call 0x1,0x12
0132 820e | | Call 0x1,0xe
0133 e406 | | Load 0x2,0x6 ; Debug Table 0x2.0x20 = 0x133,0x19
0134 00da | | Load_Top At_Offset_2
0135 e5fa | | Load 0x2,-0x6
0136 e5fd | | Load 0x2,-0x3
0137 e5fb | | Load 0x2,-0x5
0138 e408 | | Load 0x2,0x8
0139 8218 | | Call 0x1,0x18
013a c406 | | Store 0x2,0x6
013b e405 | | Load 0x2,0x5 ; Debug Table 0x2.0x21 = 0x13b,0x1a
013c e406 | | Load 0x2,0x6
013d 027f | | Execute Discrete,Equal
013e 680c |h | Jump_Zero 0x14b
013f e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x22 = 0x13f,0x1b
0140 0092 06c2 | | Action Push_String_Extended,0x6c2 ; "No objects have been "
0142 4801 |H | Short_Literal 0x1
0143 4800 |H | Short_Literal 0x0
0144 4800 |H | Short_Literal 0x0
0145 e5fb | | Load 0x2,-0x5
0146 8213 | | Call 0x1,0x13
0147 01cc | | Execute Vector,Catenate
0148 8210 | | Call 0x1,0x10
0149 820e | | Call 0x1,0xe
014a 7823 |x# | Jump 0x16e
014b e405 | | Load 0x2,0x5 ; Debug Table 0x2.0x23 = 0x14b,0x1c
014c e406 | | Load 0x2,0x6
014d 0272 | r | Execute Discrete,Minus
014e 0f01 | | Execute_Immediate Equal,0x1
014f 680c |h | Jump_Zero 0x15c
0150 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x24 = 0x150,0x1d
0151 0092 06c3 | | Action Push_String_Extended,0x6c3 ; " 1 object has been "
0153 4801 |H | Short_Literal 0x1
0154 4800 |H | Short_Literal 0x0
0155 4800 |H | Short_Literal 0x0
0156 e5fb | | Load 0x2,-0x5
0157 8213 | | Call 0x1,0x13
0158 01cc | | Execute Vector,Catenate
0159 8210 | | Call 0x1,0x10
015a 820e | | Call 0x1,0xe
015b 7812 |x | Jump 0x16e
015c e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x25 = 0x15c,0x1e
015d e405 | | Load 0x2,0x5
015e e406 | | Load 0x2,0x6
015f 0272 | r | Execute Discrete,Minus
0160 0248 | H | Execute Discrete,Check_In_Integer
0161 00e0 | | Load_Encached Standard_Cache
0162 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0163 0092 06c4 | | Action Push_String_Extended,0x6c4 ; " objects have been "
0165 01cc | | Execute Vector,Catenate
0166 4801 |H | Short_Literal 0x1
0167 4800 |H | Short_Literal 0x0
0168 4800 |H | Short_Literal 0x0
0169 e5fb | | Load 0x2,-0x5
016a 8213 | | Call 0x1,0x13
016b 01cc | | Execute Vector,Catenate
016c 8210 | | Call 0x1,0x10
016d 820e | | Call 0x1,0xe
016e e001 | | Load 0x0,0x1 ; Debug Table 0x2.0x26 = 0x16e,0x1f
016f 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0170 e406 | | Load 0x2,0x6 ; Debug Table 0x2.0x27 = 0x170,0x20
0171 0f00 | | Execute_Immediate Equal,0x0
0172 a5f9 | | Store_Unchecked 0x2,-0x7
0173 e406 | | Load 0x2,0x6 ; Debug Table 0x2.0x28 = 0x173,0x21
0174 0f01 | | Execute_Immediate Equal,0x1
0175 680c |h | Jump_Zero 0x182
0176 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x29 = 0x176,0x22
0177 0092 06c5 | | Action Push_String_Extended,0x6c5 ; " 1 object could not be "
0179 4801 |H | Short_Literal 0x1
017a 4800 |H | Short_Literal 0x0
017b 4800 |H | Short_Literal 0x0
017c e5fb | | Load 0x2,-0x5
017d 8213 | | Call 0x1,0x13
017e 01cc | | Execute Vector,Catenate
017f 820f | | Call 0x1,0xf
0180 820e | | Call 0x1,0xe
0181 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0182 e406 | | Load 0x2,0x6 ; Debug Table 0x2.0x2a = 0x182,0x23
0183 0c01 | | Execute_Immediate Greater_Equal,0x1
0184 680f |h | Jump_Zero 0x194
0185 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x2b = 0x185,0x24
0186 e406 | | Load 0x2,0x6
0187 00e0 | | Load_Encached Standard_Cache
0188 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0189 0092 06c6 | | Action Push_String_Extended,0x6c6 ; " objects could not be "
018b 01cc | | Execute Vector,Catenate
018c 4801 |H | Short_Literal 0x1
018d 4800 |H | Short_Literal 0x0
018e 4800 |H | Short_Literal 0x0
018f e5fb | | Load 0x2,-0x5
0190 8213 | | Call 0x1,0x13
0191 01cc | | Execute Vector,Catenate
0192 820f | | Call 0x1,0xf
0193 820e | | Call 0x1,0xe
0194 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0195 TRAP_0040:
0195 e008 | | Load 0x0,0x8
0196 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
0197 010f | | Execute Exception,Equal
0198 6819 |h | Jump_Zero 0x1b2
0199 e403 | | Load 0x2,0x3 ; Debug Table 0x2.0x2c = 0x199,0x25
019a e002 | | Load 0x0,0x2
019b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
019c 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
019d c403 | | Store 0x2,0x3
019e e407 | | Load 0x2,0x7 ; Debug Table 0x2.0x2d = 0x19e,0x26
019f 4801 |H | Short_Literal 0x1
01a0 4800 |H | Short_Literal 0x0
01a1 e5fa | | Load 0x2,-0x6
01a2 e003 | | Load 0x0,0x3
01a3 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01a4 c407 | | Store 0x2,0x7
01a5 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x2e = 0x1a5,0x27
01a6 0092 06c7 | | Action Push_String_Extended,0x6c7 ; "No objects will be "
01a8 4801 |H | Short_Literal 0x1
01a9 4800 |H | Short_Literal 0x0
01aa 4800 |H | Short_Literal 0x0
01ab e5fb | | Load 0x2,-0x5
01ac 8213 | | Call 0x1,0x13
01ad 01cc | | Execute Vector,Catenate
01ae 8211 | | Call 0x1,0x11
01af 820e | | Call 0x1,0xe
01b0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x2f = 0x1b0,0x28
01b1 0101 | | Execute Exception,Reraise
01b2 61f1 |a | Indirect_Literal Discrete,0x3a4,{0x00000000, 0x57af0501}
01b3 010f | | Execute Exception,Equal
01b4 6818 |h | Jump_Zero 0x1cd
01b5 e403 | | Load 0x2,0x3 ; Debug Table 0x2.0x30 = 0x1b5,0x29
01b6 e002 | | Load 0x0,0x2
01b7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01b8 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
01b9 c403 | | Store 0x2,0x3
01ba e407 | | Load 0x2,0x7 ; Debug Table 0x2.0x31 = 0x1ba,0x2a
01bb 4801 |H | Short_Literal 0x1
01bc 4800 |H | Short_Literal 0x0
01bd e5fa | | Load 0x2,-0x6
01be e003 | | Load 0x0,0x3
01bf 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01c0 c407 | | Store 0x2,0x7
01c1 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x32 = 0x1c1,0x2b
01c2 0092 06c7 | | Action Push_String_Extended,0x6c7 ; "No objects will be "
01c4 4801 |H | Short_Literal 0x1
01c5 4800 |H | Short_Literal 0x0
01c6 4800 |H | Short_Literal 0x0
01c7 e5fb | | Load 0x2,-0x5
01c8 8213 | | Call 0x1,0x13
01c9 01cc | | Execute Vector,Catenate
01ca 8211 | | Call 0x1,0x11
01cb 820e | | Call 0x1,0xe
01cc 4507 |E | Exit_Suprogram New_Top_Offset 0x7
01cd e403 | | Load 0x2,0x3 ; Debug Table 0x2.0x33 = 0x1cd,0x2c
01ce e002 | | Load 0x0,0x2
01cf 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01d0 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
01d1 c403 | | Store 0x2,0x3
01d2 e407 | | Load 0x2,0x7 ; Debug Table 0x2.0x34 = 0x1d2,0x2d
01d3 4801 |H | Short_Literal 0x1
01d4 4800 |H | Short_Literal 0x0
01d5 e5fa | | Load 0x2,-0x6
01d6 e003 | | Load 0x0,0x3
01d7 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01d8 c407 | | Store 0x2,0x7
01d9 4808 |H | Short_Literal 0x8 ; Debug Table 0x2.0x35 = 0x1d9,0x2e
01da e5fd | | Load 0x2,-0x3
01db e009 | | Load 0x0,0x9
01dc 180d | | Execute Package,Field_Execute,Field_Number 0xd
01dd 0092 06c8 | | Action Push_String_Extended,0x6c8 ; " "
01df 01cc | | Execute Vector,Catenate
01e0 4800 |H | Short_Literal 0x0
01e1 4801 |H | Short_Literal 0x1
01e2 4800 |H | Short_Literal 0x0
01e3 e5fb | | Load 0x2,-0x5
01e4 8213 | | Call 0x1,0x13
01e5 01cc | | Execute Vector,Catenate
01e6 0092 06c8 | | Action Push_String_Extended,0x6c8 ; " "
01e8 01cc | | Execute Vector,Catenate
01e9 e5ff | | Load 0x2,-0x1
01ea 01cc | | Execute Vector,Catenate
01eb e007 | | Load 0x0,0x7
01ec 180e | | Execute Package,Field_Execute,Field_Number 0xe
01ed e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x36 = 0x1ed,0x2f
01ee 0092 06c7 | | Action Push_String_Extended,0x6c7 ; "No objects will be "
01f0 4801 |H | Short_Literal 0x1
01f1 4800 |H | Short_Literal 0x0
01f2 4800 |H | Short_Literal 0x0
01f3 e5fb | | Load 0x2,-0x5
01f4 8213 | | Call 0x1,0x13
01f5 01cc | | Execute Vector,Catenate
01f6 8211 | | Call 0x1,0x11
01f7 820e | | Call 0x1,0xe
01f8 4507 |E | Exit_Suprogram New_Top_Offset 0x7
01f9 0000 0000 | | .BLANK 0000[0x7]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0203 | | .CONST 0x0203 ; Address of begin
0201 0004 | | .CONST 0x0004 ; Address of exception handler
0202 0001 | | .CONST 0x0001 ; Number of locals
0203 BODY_0200:
0203 INIT_0200:
0203 4805 |H | Short_Literal 0x5 ; Debug Table 0x3 = .DEBUG 0x0203,0x0976,0x0005,0x0000,0x0057,0xa6a5,0x0000,0x008f
0204 00ca | | Action Exit_Nullary_Function
0205 0000 0000 | | .XXX[0x3]
0207 0000 | |
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020b | | .CONST 0x020b ; Address of begin
0209 0004 | | .CONST 0x0004 ; Address of exception handler
020a 0001 | | .CONST 0x0001 ; Number of locals
020b BODY_0208:
020b INIT_0208:
020b 4803 |H | Short_Literal 0x3 ; Debug Table 0x4 = .DEBUG 0x020b,0x0978,0x0005,0x0000,0x0057,0xa6a5,0x0000,0x008d
020c 00ca | | Action Exit_Nullary_Function
020d 0000 0000 | | .XXX[0x3]
020f 0000 | |
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 4806 |H | Short_Literal 0x6 ; Debug Table 0x5 = .DEBUG 0x0213,0x097a,0x0005,0x0000,0x0057,0xa6a5,0x0000,0x0090
0214 00ca | | Action Exit_Nullary_Function
0215 0000 0000 | | .XXX[0x3]
0217 0000 | |
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 021b | | .CONST 0x021b ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0001 | | .CONST 0x0001 ; Number of locals
021b BODY_0218:
021b INIT_0218:
021b 4802 |H | Short_Literal 0x2 ; Debug Table 0x6 = .DEBUG 0x021b,0x097c,0x0005,0x0000,0x0057,0xa6a5,0x0000,0x008c
021c 00ca | | Action Exit_Nullary_Function
021d 0000 0000 | | .XXX[0x3]
021f 0000 | |
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223 | # | .CONST 0x0223 ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0001 | | .CONST 0x0001 ; Number of locals
0223 BODY_0220:
0223 INIT_0220:
0223 00da | | Load_Top At_Offset_2 ; Debug Table 0x7 = .DEBUG 0x0223,0x097e,0x0002,0x0000,0x0057,0xaf05,0x0000,0x00d9
; Debug Table 0x7.0x0 = 0x223,0x1
0224 681c |h | Jump_Zero 0x241
0225 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x1 = 0x225,0x2
0226 680d |h | Jump_Zero 0x234
0227 e5fd | | Load 0x2,-0x3 ; Debug Table 0x7.0x2 = 0x227,0x3
0228 6803 |h | Jump_Zero 0x22c
0229 0092 06c9 | | Action Push_String_Extended,0x6c9 ; "Deleting"
; Debug Table 0x7.0x3 = 0x229,0x4
022b 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
022c e5fc | | Load 0x2,-0x4 ; Debug Table 0x7.0x4 = 0x22c,0x5
022d 6803 |h | Jump_Zero 0x231
022e 0092 06ca | | Action Push_String_Extended,0x6ca ; "Deleted"
; Debug Table 0x7.0x5 = 0x22e,0x6
0230 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0231 0092 06cb | | Action Push_String_Extended,0x6cb ; "Delete"
; Debug Table 0x7.0x6 = 0x231,0x7
0233 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0234 e5fd | | Load 0x2,-0x3 ; Debug Table 0x7.0x7 = 0x234,0x8
0235 6803 |h | Jump_Zero 0x239
0236 0092 06cc | | Action Push_String_Extended,0x6cc ; "deleting"
; Debug Table 0x7.0x8 = 0x236,0x9
0238 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0239 e5fc | | Load 0x2,-0x4 ; Debug Table 0x7.0x9 = 0x239,0xa
023a 6803 |h | Jump_Zero 0x23e
023b 0092 06cd | | Action Push_String_Extended,0x6cd ; "deleted"
; Debug Table 0x7.0xa = 0x23b,0xb
023d 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
023e 0092 06ce | | Action Push_String_Extended,0x6ce ; "delete"
; Debug Table 0x7.0xb = 0x23e,0xc
0240 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0241 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0xc = 0x241,0xd
0242 680d |h | Jump_Zero 0x250
0243 e5fd | | Load 0x2,-0x3 ; Debug Table 0x7.0xd = 0x243,0xe
0244 6803 |h | Jump_Zero 0x248
0245 0092 06cf | | Action Push_String_Extended,0x6cf ; "Destroying"
; Debug Table 0x7.0xe = 0x245,0xf
0247 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0248 e5fc | | Load 0x2,-0x4 ; Debug Table 0x7.0xf = 0x248,0x10
0249 6803 |h | Jump_Zero 0x24d
024a 0092 06d0 | | Action Push_String_Extended,0x6d0 ; "Destroyed"
; Debug Table 0x7.0x10 = 0x24a,0x11
024c 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
024d 0092 06d1 | | Action Push_String_Extended,0x6d1 ; "Destroy"
; Debug Table 0x7.0x11 = 0x24d,0x12
024f 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0250 e5fd | | Load 0x2,-0x3 ; Debug Table 0x7.0x12 = 0x250,0x13
0251 6803 |h | Jump_Zero 0x255
0252 0092 06d2 | | Action Push_String_Extended,0x6d2 ; "destroying"
; Debug Table 0x7.0x13 = 0x252,0x14
0254 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0255 e5fc | | Load 0x2,-0x4 ; Debug Table 0x7.0x14 = 0x255,0x15
0256 6803 |h | Jump_Zero 0x25a
0257 0092 06d3 | | Action Push_String_Extended,0x6d3 ; "destroyed"
; Debug Table 0x7.0x15 = 0x257,0x16
0259 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
025a 0092 06d4 | | Action Push_String_Extended,0x6d4 ; "destroy"
; Debug Table 0x7.0x16 = 0x25a,0x17
025c 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
025d 0000 0000 | | .XXX[0x3]
025f 0000 | |
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 028e | | .CONST 0x028e ; Address of begin
0261 0004 | | .CONST 0x0004 ; Address of exception handler
0262 0009 | | .CONST 0x0009 ; Number of locals
0263 INIT_0260:
0263 e002 | | Load 0x0,0x2 ; Debug Table 0x8 = .DEBUG 0x0263,0x09ae,0x0002,0x0000,0x0057,0xaf05,0x0000,0x0143
; Debug Table 0x8.0x0 = 0x263,0xffff
0264 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0265 e00a | | Load 0x0,0xa ; Debug Table 0x8.0x1 = 0x265,0xfffe
0266 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0267 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x8.0x2 = 0x267,0xfffd
0268 e002 | | Load 0x0,0x2 ; Debug Table 0x8.0x3 = 0x268,0xfffc
0269 1b14 | | Execute Package,Field_Read,Field_Number 0x14
026a 02ff | | Declare_Variable Variant_Record
026b 00d8 | | Load_Top At_Offset_0
026c 1c00 | | Execute_Immediate Run_Utility,0x0
026d e00b | | Load 0x0,0xb ; Debug Table 0x8.0x4 = 0x26d,0xfffb
026e 1b19 | | Execute Package,Field_Read,Field_Number 0x19
026f 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x8.0x5 = 0x26f,0xfffa
0270 e004 | | Load 0x0,0x4
0271 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0272 e005 | | Load 0x0,0x5
0273 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0274 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0275 e00c | | Load 0x0,0xc ; Debug Table 0x8.0x6 = 0x275,0xfff9
0276 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0277 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0278 02c7 | | Declare_Variable Any
0279 4800 |H | Short_Literal 0x0
027a 4800 |H | Short_Literal 0x0
027b 4801 |H | Short_Literal 0x1
027c e00d | | Load 0x0,0xd
027d 181b | | Execute Package,Field_Execute,Field_Number 0x1b
027e e5fe | | Load 0x2,-0x2
027f e407 | | Load 0x2,0x7
0280 e00c | | Load 0x0,0xc
0281 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0282 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0283 c408 | | Store 0x2,0x8
0284 e002 | | Load 0x0,0x2 ; Debug Table 0x8.0x7 = 0x284,0xfff8
0285 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0286 02c7 | | Declare_Variable Any
0287 4801 |H | Short_Literal 0x1
0288 e5ff | | Load 0x2,-0x1
0289 00db | | Load_Top At_Offset_3
028a e00c | | Load 0x0,0xc
028b 1b6a | j | Execute Package,Field_Read,Field_Number 0x6a
028c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
028d c409 | | Store 0x2,0x9
028e BODY_0260:
028e e002 | | Load 0x0,0x2 ; Debug Table 0x8.0x8 = 0x28e,0x1
028f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0290 e405 | | Load 0x2,0x5
0291 6116 |a | Indirect_Literal Discrete,0x3a8,{0x00000000, 0x00004000}
0292 e5fe | | Load 0x2,-0x2
0293 4800 |H | Short_Literal 0x0
0294 e409 | | Load 0x2,0x9
0295 e002 | | Load 0x0,0x2
0296 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
0297 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0298 00d1 | | Pop_Control Pop_Count_1
0299 c402 | | Store 0x2,0x2
029a e402 | | Load 0x2,0x2 ; Debug Table 0x8.0x9 = 0x29a,0x2
029b 6802 |h | Jump_Zero 0x29e
029c 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0xa = 0x29c,0x3
029d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
029e e00a | | Load 0x0,0xa ; Debug Table 0x8.0xb = 0x29e,0x4
029f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02a0 00e1 | | Load_Encached Boolean_Cache
02a1 e5fe | | Load 0x2,-0x2
02a2 e405 | | Load 0x2,0x5
02a3 e00e | | Load 0x0,0xe
02a4 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02a5 c404 | | Store 0x2,0x4
02a6 c403 | | Store 0x2,0x3
02a7 e403 | | Load 0x2,0x3 ; Debug Table 0x8.0xc = 0x2a7,0x5
02a8 7002 |p | Jump_Nonzero 0x2ab
02a9 e404 | | Load 0x2,0x4
02aa 7002 |p | Jump_Nonzero 0x2ad
02ab 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0xd = 0x2ab,0x6
02ac 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02ad 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0xe = 0x2ad,0x7
02ae e5fe | | Load 0x2,-0x2
02af 00da | | Load_Top At_Offset_2
02b0 e002 | | Load 0x0,0x2
02b1 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
02b2 180d | | Execute Package,Field_Execute,Field_Number 0xd
02b3 4806 |H | Short_Literal 0x6
02b4 e00b | | Load 0x0,0xb
02b5 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
02b6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02b7 0000 | | .XXX[0x1]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02d4 | | .CONST 0x02d4 ; Address of begin
02b9 0004 | | .CONST 0x0004 ; Address of exception handler
02ba 0008 | | .CONST 0x0008 ; Number of locals
02bb INIT_02b8:
02bb e002 | | Load 0x0,0x2 ; Debug Table 0x9 = .DEBUG 0x02bb,0x09ce,0x0002,0x0000,0x0057,0xaf05,0x0000,0x01fc
; Debug Table 0x9.0x0 = 0x2bb,0xffff
02bc 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
02bd 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
02be 02c7 | | Declare_Variable Any
02bf 00d8 | | Load_Top At_Offset_0
02c0 1c00 | | Execute_Immediate Run_Utility,0x0
02c1 e002 | | Load 0x0,0x2 ; Debug Table 0x9.0x1 = 0x2c1,0xfffe
02c2 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
02c3 e00b | | Load 0x0,0xb ; Debug Table 0x9.0x2 = 0x2c3,0xfffd
02c4 1b19 | | Execute Package,Field_Read,Field_Number 0x19
02c5 e002 | | Load 0x0,0x2 ; Debug Table 0x9.0x3 = 0x2c5,0xfffc
02c6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02c7 e002 | | Load 0x0,0x2 ; Debug Table 0x9.0x4 = 0x2c7,0xfffb
02c8 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02c9 02ff | | Declare_Variable Variant_Record
02ca 00d8 | | Load_Top At_Offset_0
02cb 1c00 | | Execute_Immediate Run_Utility,0x0
02cc e002 | | Load 0x0,0x2 ; Debug Table 0x9.0x5 = 0x2cc,0xfffa
02cd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02ce 02c7 | | Declare_Variable Any
02cf 00d8 | | Load_Top At_Offset_0
02d0 1c00 | | Execute_Immediate Run_Utility,0x0
02d1 e002 | | Load 0x0,0x2 ; Debug Table 0x9.0x6 = 0x2d1,0xfff9
02d2 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
02d3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02d4 BODY_02b8:
02d4 e002 | | Load 0x0,0x2 ; Debug Table 0x9.0x7 = 0x2d4,0x1
02d5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02d6 e402 | | Load 0x2,0x2
02d7 0120 | | Execute Any,Is_Value
02d8 6804 |h | Jump_Zero 0x2dd
02d9 e002 | | Load 0x0,0x2
02da 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
02db 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
02dc 7801 |x | Jump 0x2de
02dd e402 | | Load 0x2,0x2
02de 60c9 |` | Indirect_Literal Discrete,0x3a8,{0x00000000, 0x00004000}
02df e5fd | | Load 0x2,-0x3
02e0 4801 |H | Short_Literal 0x1
02e1 e5ff | | Load 0x2,-0x1
02e2 e002 | | Load 0x0,0x2
02e3 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
02e4 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
02e5 c402 | | Store 0x2,0x2
02e6 c405 | | Store 0x2,0x5
02e7 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x8 = 0x2e7,0x2
02e8 7009 |p | Jump_Nonzero 0x2f2
02e9 e402 | | Load 0x2,0x2
02ea e002 | | Load 0x0,0x2
02eb 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
02ec 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
02ed e002 | | Load 0x0,0x2
02ee 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
02ef 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02f0 012f | / | Execute Any,Equal
02f1 7002 |p | Jump_Nonzero 0x2f4
02f2 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x9 = 0x2f2,0x3
02f3 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
02f4 e402 | | Load 0x2,0x2 ; Debug Table 0x9.0xa = 0x2f4,0x4
02f5 e002 | | Load 0x0,0x2
02f6 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
02f7 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
02f8 a403 | | Store_Unchecked 0x2,0x3
02f9 e403 | | Load 0x2,0x3 ; Debug Table 0x9.0xb = 0x2f9,0x5
02fa e00f | | Load 0x0,0xf
02fb 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02fc 027f | | Execute Discrete,Equal
02fd 700f |p | Jump_Nonzero 0x30d
02fe e403 | | Load 0x2,0x3
02ff e00f | | Load 0x0,0xf
0300 180f | | Execute Package,Field_Execute,Field_Number 0xf
0301 027f | | Execute Discrete,Equal
0302 700a |p | Jump_Nonzero 0x30d
0303 e403 | | Load 0x2,0x3
0304 e00f | | Load 0x0,0xf
0305 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0306 027f | | Execute Discrete,Equal
0307 7005 |p | Jump_Nonzero 0x30d
0308 e403 | | Load 0x2,0x3
0309 e00f | | Load 0x0,0xf
030a 1814 | | Execute Package,Field_Execute,Field_Number 0x14
030b 027f | | Execute Discrete,Equal
030c 680c |h | Jump_Zero 0x319
030d e5fc | | Load 0x2,-0x4 ; Debug Table 0x9.0xc = 0x30d,0x6
030e 4801 |H | Short_Literal 0x1
030f e5ff | | Load 0x2,-0x1
0310 e001 | | Load 0x0,0x1
0311 180e | | Execute Package,Field_Execute,Field_Number 0xe
0312 0092 06d5 | | Action Push_String_Extended,0x6d5 ; " is a subsystem; use cmvc commands to destroy it"
0314 01cc | | Execute Vector,Catenate
0315 820f | | Call 0x1,0xf
0316 820e | | Call 0x1,0xe
0317 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0xd = 0x317,0x7
0318 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0319 e403 | | Load 0x2,0x3 ; Debug Table 0x9.0xe = 0x319,0x8
031a e00f | | Load 0x0,0xf
031b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
031c 027f | | Execute Discrete,Equal
031d 700f |p | Jump_Nonzero 0x32d
031e e403 | | Load 0x2,0x3
031f e00f | | Load 0x0,0xf
0320 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0321 027f | | Execute Discrete,Equal
0322 700a |p | Jump_Nonzero 0x32d
0323 e403 | | Load 0x2,0x3
0324 e00f | | Load 0x0,0xf
0325 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0326 027f | | Execute Discrete,Equal
0327 7005 |p | Jump_Nonzero 0x32d
0328 e403 | | Load 0x2,0x3
0329 e00f | | Load 0x0,0xf
032a 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
032b 027f | | Execute Discrete,Equal
032c 680c |h | Jump_Zero 0x339
032d e5fc | | Load 0x2,-0x4 ; Debug Table 0x9.0xf = 0x32d,0x9
032e 4801 |H | Short_Literal 0x1
032f e5ff | | Load 0x2,-0x1
0330 e001 | | Load 0x0,0x1
0331 180e | | Execute Package,Field_Execute,Field_Number 0xe
0332 0092 06d6 | | Action Push_String_Extended,0x6d6 ; " is a view; use cmvc commands to destroy it"
0334 01cc | | Execute Vector,Catenate
0335 820f | | Call 0x1,0xf
0336 820e | | Call 0x1,0xe
0337 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x10 = 0x337,0xa
0338 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0339 e5fe | | Load 0x2,-0x2 ; Debug Table 0x9.0x11 = 0x339,0xb
033a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
033b 0e04 | | Execute_Immediate Not_Equal,0x4
033c 6863 |hc | Jump_Zero 0x3a0
033d e403 | | Load 0x2,0x3
033e e00f | | Load 0x0,0xf
033f 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0340 027f | | Execute Discrete,Equal
0341 685e |h^ | Jump_Zero 0x3a0
0342 e5fd | | Load 0x2,-0x3 ; Debug Table 0x9.0x12 = 0x342,0xc
0343 e5ff | | Load 0x2,-0x1
0344 8214 | | Call 0x1,0x14
0345 a404 | | Store_Unchecked 0x2,0x4
0346 e404 | | Load 0x2,0x4 ; Debug Table 0x9.0x13 = 0x346,0xd
0347 e00b | | Load 0x0,0xb
0348 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0349 6802 |h | Jump_Zero 0x34c
034a 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x14 = 0x34a,0xe
034b 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
034c 00cf | | Action Mark_Auxiliary
034d 0007 | | Action Break_Optional ; Debug Table 0x9.0x15 = 0x34d,0xf
034e e404 | | Load 0x2,0x4 ; Debug Table 0x9.0x16 = 0x34e,0x10
034f e00b | | Load 0x0,0xb
0350 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0351 e406 | | Load 0x2,0x6
0352 016d | m | Execute Variant_Record,Structure_Write
0353 e002 | | Load 0x0,0x2 ; Debug Table 0x9.0x17 = 0x353,0x11
0354 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0355 e002 | | Load 0x0,0x2
0356 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
0357 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0358 604f |`O | Indirect_Literal Discrete,0x3a8,{0x00000000, 0x00004000}
0359 e5fd | | Load 0x2,-0x3
035a e406 | | Load 0x2,0x6
035b e002 | | Load 0x0,0x2
035c 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
035d 180e | | Execute Package,Field_Execute,Field_Number 0xe
035e 005b | [ | Store_Top Discrete,At_Offset_3
035f c405 | | Store 0x2,0x5
0360 e405 | | Load 0x2,0x5 ; Debug Table 0x9.0x18 = 0x360,0x12
0361 7038 |p8 | Jump_Nonzero 0x39a
0362 00d9 | | Load_Top At_Offset_1
0363 0c04 | | Execute_Immediate Greater_Equal,0x4
0364 6835 |h5 | Jump_Zero 0x39a
0365 e002 | | Load 0x0,0x2 ; Debug Table 0x9.0x19 = 0x365,0x13
0366 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0367 00db | | Load_Top At_Offset_3
0368 0120 | | Execute Any,Is_Value
0369 6803 |h | Jump_Zero 0x36d
036a e002 | | Load 0x0,0x2
036b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
036c 7801 |x | Jump 0x36e
036d 00db | | Load_Top At_Offset_3
036e 6039 |`9 | Indirect_Literal Discrete,0x3a8,{0x00000000, 0x00004000}
036f e5fd | | Load 0x2,-0x3
0370 e406 | | Load 0x2,0x6
0371 e002 | | Load 0x0,0x2
0372 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
0373 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0374 c407 | | Store 0x2,0x7
0375 c405 | | Store 0x2,0x5
0376 e405 | | Load 0x2,0x5 ; Debug Table 0x9.0x1a = 0x376,0x14
0377 7022 |p" | Jump_Nonzero 0x39a
0378 e5fe | | Load 0x2,-0x2
0379 00db | | Load_Top At_Offset_3
037a e002 | | Load 0x0,0x2
037b 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
037c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
037d e001 | | Load 0x0,0x1
037e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
037f 701a |p | Jump_Nonzero 0x39a
0380 e5fc | | Load 0x2,-0x4 ; Debug Table 0x9.0x1b = 0x380,0x15
0381 0092 06d7 | | Action Push_String_Extended,0x6d7 ; "The code view "
0383 4801 |H | Short_Literal 0x1
0384 e5ff | | Load 0x2,-0x1
0385 e001 | | Load 0x0,0x1
0386 180e | | Execute Package,Field_Execute,Field_Number 0xe
0387 01cc | | Execute Vector,Catenate
0388 0092 06d8 | | Action Push_String_Extended,0x6d8 ; " has the dependent main program "
038a 01cc | | Execute Vector,Catenate
038b 4801 |H | Short_Literal 0x1
038c e407 | | Load 0x2,0x7
038d e001 | | Load 0x0,0x1
038e 180e | | Execute Package,Field_Execute,Field_Number 0xe
038f 01cc | | Execute Vector,Catenate
0390 0092 06d9 | | Action Push_String_Extended,0x6d9 ; " which would need to be demoted, "
0392 01cc | | Execute Vector,Catenate
0393 0092 06da | | Action Push_String_Extended,0x6da ; "but is outside the change limit given"
0395 01cc | | Execute Vector,Catenate
0396 820f | | Call 0x1,0xf
0397 820e | | Call 0x1,0xe
0398 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x1c = 0x398,0x16
0399 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
039a e404 | | Load 0x2,0x4 ; Debug Table 0x9.0x1d = 0x39a,0x17
039b e00b | | Load 0x0,0xb
039c 181c | | Execute Package,Field_Execute,Field_Number 0x1c
039d a404 | | Store_Unchecked 0x2,0x4
039e 00c9 | | Action Pop_Auxiliary_Loop
039f 7fae | | Jump 0x34e
03a0 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x1e = 0x3a0,0x18
03a1 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
03a2 0000 0000 | | .XXX[0x2]
03a4 0000 0000 | | .LITERAL {0x00000000, 0x57af0501}
03a8 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
03ac 0000 0000 | | .BLANK 0000[0x4]
03b0 ; --------------------------------------------------------------------------------------
03b0 ; SUBPROGRAM
03b0 ; --------------------------------------------------------------------------------------
03b0 03ba | | .CONST 0x03ba ; Address of begin
03b1 0004 | | .CONST 0x0004 ; Address of exception handler
03b2 0003 | | .CONST 0x0003 ; Number of locals
03b3 INIT_03b0:
03b3 e002 | | Load 0x0,0x2 ; Debug Table 0xa = .DEBUG 0x03b3,0x0a0e,0x0002,0x0000,0x0057,0xaf05,0x0000,0x038b
; Debug Table 0xa.0x0 = 0x3b3,0xffff
03b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03b5 e002 | | Load 0x0,0x2 ; Debug Table 0xa.0x1 = 0x3b5,0xfffe
03b6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
03b7 02ff | | Declare_Variable Variant_Record
03b8 00d8 | | Load_Top At_Offset_0
03b9 1c00 | | Execute_Immediate Run_Utility,0x0
03ba BODY_03b0:
03ba e002 | | Load 0x0,0x2 ; Debug Table 0xa.0x2 = 0x3ba,0x1
03bb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03bc 00d9 | | Load_Top At_Offset_1
03bd 67ea |g | Indirect_Literal Discrete,0x3a8,{0x00000000, 0x00004000}
03be e5fe | | Load 0x2,-0x2
03bf 4800 |H | Short_Literal 0x0
03c0 e5ff | | Load 0x2,-0x1
03c1 e002 | | Load 0x0,0x2
03c2 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
03c3 181a | | Execute Package,Field_Execute,Field_Number 0x1a
03c4 00d1 | | Pop_Control Pop_Count_1
03c5 005a | Z | Store_Top Discrete,At_Offset_2
03c6 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0x3 = 0x3c6,0x2
03c7 0f08 | | Execute_Immediate Equal,0x8
03c8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03c9 0000 0000 | | .BLANK 0000[0x7]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03e2 | | .CONST 0x03e2 ; Address of begin
03d1 0004 | | .CONST 0x0004 ; Address of exception handler
03d2 0007 | | .CONST 0x0007 ; Number of locals
03d3 INIT_03d0:
03d3 e00d | | Load 0x0,0xd ; Debug Table 0xb = .DEBUG 0x03d3,0x0a18,0x0001,0x0000,0x0057,0xaf05,0x0000,0x03c1
; Debug Table 0xb.0x0 = 0x3d3,0xffff
03d4 1b11 | | Execute Package,Field_Read,Field_Number 0x11
03d5 e002 | | Load 0x0,0x2 ; Debug Table 0xb.0x1 = 0x3d5,0xfffe
03d6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03d7 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0xb.0x2 = 0x3d7,0xfffd
03d8 e00d | | Load 0x0,0xd ; Debug Table 0xb.0x3 = 0x3d8,0xfffc
03d9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03da 02c7 | | Declare_Variable Any
03db 00d8 | | Load_Top At_Offset_0
03dc 1c00 | | Execute_Immediate Run_Utility,0x0
03dd 4801 |H | Short_Literal 0x1 ; Debug Table 0xb.0x4 = 0x3dd,0xfffb
03de e5ff | | Load 0x2,-0x1
03df e001 | | Load 0x0,0x1
03e0 180e | | Execute Package,Field_Execute,Field_Number 0xe
03e1 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0xb.0x5 = 0x3e1,0xfffa
03e2 BODY_03d0:
03e2 e004 | | Load 0x0,0x4 ; Debug Table 0xb.0x6 = 0x3e2,0x1
03e3 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03e4 e010 | | Load 0x0,0x10
03e5 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03e6 e5fe | | Load 0x2,-0x2 ; Debug Table 0xb.0x7 = 0x3e6,0x2
03e7 6820 |h | Jump_Zero 0x408
03e8 e002 | | Load 0x0,0x2 ; Debug Table 0xb.0x8 = 0x3e8,0x3
03e9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03ea 00f1 | | Load_Encached Diana_Temp_Seq
03eb e002 | | Load 0x0,0x2
03ec 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
03ed 1b17 | | Execute Package,Field_Read,Field_Number 0x17
03ee e405 | | Load 0x2,0x5
03ef 0120 | | Execute Any,Is_Value
03f0 6803 |h | Jump_Zero 0x3f4
03f1 e00d | | Load 0x0,0xd
03f2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03f3 7801 |x | Jump 0x3f5
03f4 e405 | | Load 0x2,0x5
03f5 67b2 |g | Indirect_Literal Discrete,0x3a8,{0x00000000, 0x00004000}
03f6 e5fb | | Load 0x2,-0x5
03f7 e5fd | | Load 0x2,-0x3
03f8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
03f9 e5fd | | Load 0x2,-0x3
03fa 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03fb e002 | | Load 0x0,0x2
03fc 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03fd e002 | | Load 0x0,0x2
03fe 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03ff e5ff | | Load 0x2,-0x1
0400 e002 | | Load 0x0,0x2
0401 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
0402 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0403 c405 | | Store 0x2,0x5
0404 c404 | | Store 0x2,0x4
0405 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0406 c403 | | Store 0x2,0x3
0407 781e |x | Jump 0x426
0408 e002 | | Load 0x0,0x2 ; Debug Table 0xb.0x9 = 0x408,0x4
0409 1b0d | | Execute Package,Field_Read,Field_Number 0xd
040a 00f1 | | Load_Encached Diana_Temp_Seq
040b e002 | | Load 0x0,0x2
040c 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
040d 1b17 | | Execute Package,Field_Read,Field_Number 0x17
040e e405 | | Load 0x2,0x5
040f 0120 | | Execute Any,Is_Value
0410 6803 |h | Jump_Zero 0x414
0411 e00d | | Load 0x0,0xd
0412 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0413 7801 |x | Jump 0x415
0414 e405 | | Load 0x2,0x5
0415 6792 |g | Indirect_Literal Discrete,0x3a8,{0x00000000, 0x00004000}
0416 e5fb | | Load 0x2,-0x5
0417 e5fd | | Load 0x2,-0x3
0418 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0419 e5fd | | Load 0x2,-0x3
041a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
041b e002 | | Load 0x0,0x2
041c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
041d 4ffb |O | Short_Literal -0x5
041e e5ff | | Load 0x2,-0x1
041f e002 | | Load 0x0,0x2
0420 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
0421 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0422 c405 | | Store 0x2,0x5
0423 c404 | | Store 0x2,0x4
0424 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0425 c403 | | Store 0x2,0x3
0426 e00d | | Load 0x0,0xd ; Debug Table 0xb.0xa = 0x426,0x5
0427 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0428 4800 |H | Short_Literal 0x0
0429 4801 |H | Short_Literal 0x1
042a 4800 |H | Short_Literal 0x0
042b e5fe | | Load 0x2,-0x2
042c 8213 | | Call 0x1,0x13
042d 0092 06c8 | | Action Push_String_Extended,0x6c8 ; " "
042f 01cc | | Execute Vector,Catenate
0430 00db | | Load_Top At_Offset_3
0431 01cc | | Execute Vector,Catenate
0432 e5fc | | Load 0x2,-0x4
0433 e405 | | Load 0x2,0x5
0434 e403 | | Load 0x2,0x3
0435 4800 |H | Short_Literal 0x0
0436 00eb | | Load_Encached Diana_Cache
0437 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0438 e011 | | Load 0x0,0x11
0439 1810 | | Execute Package,Field_Execute,Field_Number 0x10
043a c402 | | Store 0x2,0x2
043b e5fc | | Load 0x2,-0x4 ; Debug Table 0xb.0xb = 0x43b,0x6
043c 00da | | Load_Top At_Offset_2
043d 0092 06db | | Action Push_String_Extended,0x6db ; " were "
043f 01cc | | Execute Vector,Catenate
0440 4801 |H | Short_Literal 0x1
0441 4800 |H | Short_Literal 0x0
0442 4800 |H | Short_Literal 0x0
0443 e5fe | | Load 0x2,-0x2
0444 8213 | | Call 0x1,0x13
0445 01cc | | Execute Vector,Catenate
0446 e404 | | Load 0x2,0x4
0447 e011 | | Load 0x0,0x11
0448 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0449 e403 | | Load 0x2,0x3 ; Debug Table 0xb.0xc = 0x449,0x7
044a 6809 |h | Jump_Zero 0x454
044b e403 | | Load 0x2,0x3
044c 0f08 | | Execute_Immediate Equal,0x8
044d 6804 |h | Jump_Zero 0x452
044e e5fb | | Load 0x2,-0x5
044f e5ff | | Load 0x2,-0x1
0450 8216 | | Call 0x1,0x16
0451 7801 |x | Jump 0x453
0452 4800 |H | Short_Literal 0x0
0453 6805 |h | Jump_Zero 0x459
0454 e004 | | Load 0x0,0x4 ; Debug Table 0xb.0xd = 0x454,0x8
0455 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0456 e010 | | Load 0x0,0x10
0457 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0458 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0459 e5fa | | Load 0x2,-0x6 ; Debug Table 0xb.0xe = 0x459,0x9
045a 0a01 | | Execute_Immediate Plus,0x1
045b c5fa | | Store 0x2,-0x6
045c 4805 |H | Short_Literal 0x5 ; Debug Table 0xb.0xf = 0x45c,0xa
045d e5fc | | Load 0x2,-0x4
045e 4820 |H | Short_Literal 0x20
045f 4800 |H | Short_Literal 0x0
0460 4801 |H | Short_Literal 0x1
0461 4800 |H | Short_Literal 0x0
0462 e5fe | | Load 0x2,-0x2
0463 8213 | | Call 0x1,0x13
0464 01cb | | Execute Vector,Append
0465 e406 | | Load 0x2,0x6
0466 01cc | | Execute Vector,Catenate
0467 e403 | | Load 0x2,0x3
0468 e007 | | Load 0x0,0x7
0469 180f | | Execute Package,Field_Execute,Field_Number 0xf
046a 4506 |E | Exit_Suprogram New_Top_Offset 0x6
046b 0000 0000 | | .BLANK 0000[0x5]
0470 ; --------------------------------------------------------------------------------------
0470 ; SUBPROGRAM
0470 ; --------------------------------------------------------------------------------------
0470 0490 | | .CONST 0x0490 ; Address of begin
0471 0004 | | .CONST 0x0004 ; Address of exception handler
0472 0009 | | .CONST 0x0009 ; Number of locals
0473 INIT_0470:
0473 e001 | | Load 0x0,0x1 ; Debug Table 0xc = .DEBUG 0x0473,0x0a3a,0x0001,0x0000,0x0057,0xaf05,0x0000,0x04e0
; Debug Table 0xc.0x0 = 0x473,0xffff
0474 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0475 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0476 0322 | " | Declare_Variable Record
0477 00d8 | | Load_Top At_Offset_0
0478 1c00 | | Execute_Immediate Run_Utility,0x0
0479 e002 | | Load 0x0,0x2 ; Debug Table 0xc.0x1 = 0x479,0xfffe
047a 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
047b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
047c e002 | | Load 0x0,0x2 ; Debug Table 0xc.0x2 = 0x47c,0xfffd
047d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
047e 02c7 | | Declare_Variable Any
047f 00d8 | | Load_Top At_Offset_0
0480 1c00 | | Execute_Immediate Run_Utility,0x0
0481 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xc.0x3 = 0x481,0xfffc
0482 e00b | | Load 0x0,0xb ; Debug Table 0xc.0x4 = 0x482,0xfffb
0483 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0484 e002 | | Load 0x0,0x2 ; Debug Table 0xc.0x5 = 0x484,0xfffa
0485 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0486 02ff | | Declare_Variable Variant_Record
0487 00d8 | | Load_Top At_Offset_0
0488 1c00 | | Execute_Immediate Run_Utility,0x0
0489 e002 | | Load 0x0,0x2 ; Debug Table 0xc.0x6 = 0x489,0xfff9
048a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
048b 02c7 | | Declare_Variable Any
048c 00d8 | | Load_Top At_Offset_0
048d 1c00 | | Execute_Immediate Run_Utility,0x0
048e e002 | | Load 0x0,0x2 ; Debug Table 0xc.0x7 = 0x48e,0xfff8
048f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0490 BODY_0470:
0490 e402 | | Load 0x2,0x2 ; Debug Table 0xc.0x8 = 0x490,0x1
0491 e5ff | | Load 0x2,-0x1
0492 e001 | | Load 0x0,0x1
0493 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0494 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0495 00d1 | | Pop_Control Pop_Count_1
0496 00cf | | Action Mark_Auxiliary
0497 7878 |xx | Jump 0x510
0498 e402 | | Load 0x2,0x2 ; Debug Table 0xc.0x9 = 0x498,0x3
0499 e001 | | Load 0x0,0x1
049a 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
049b 181f | | Execute Package,Field_Execute,Field_Number 0x1f
049c c404 | | Store 0x2,0x4
049d e404 | | Load 0x2,0x4 ; Debug Table 0xc.0xa = 0x49d,0x4
049e e002 | | Load 0x0,0x2
049f 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
04a0 e002 | | Load 0x0,0x2
04a1 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
04a2 1814 | | Execute Package,Field_Execute,Field_Number 0x14
04a3 012f | / | Execute Any,Equal
04a4 6825 |h% | Jump_Zero 0x4ca
04a5 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xc.0xb = 0x4a5,0x5
04a6 e002 | | Load 0x0,0x2
04a7 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
04a8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04a9 e001 | | Load 0x0,0x1
04aa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04ab e404 | | Load 0x2,0x4
04ac e002 | | Load 0x0,0x2
04ad 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
04ae 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04af e001 | | Load 0x0,0x1
04b0 181b | | Execute Package,Field_Execute,Field_Number 0x1b
04b1 c403 | | Store 0x2,0x3
04b2 c405 | | Store 0x2,0x5
04b3 e405 | | Load 0x2,0x5 ; Debug Table 0xc.0xc = 0x4b3,0x6
04b4 6855 |hU | Jump_Zero 0x50a
04b5 e403 | | Load 0x2,0x3
04b6 0c03 | | Execute_Immediate Greater_Equal,0x3
04b7 6852 |hR | Jump_Zero 0x50a
04b8 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xc.0xd = 0x4b8,0x7
04b9 e5fc | | Load 0x2,-0x4
04ba e5fd | | Load 0x2,-0x3
04bb 4800 |H | Short_Literal 0x0
04bc e5fb | | Load 0x2,-0x5
04bd 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
04be e5fb | | Load 0x2,-0x5
04bf 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04c0 4802 |H | Short_Literal 0x2
04c1 e404 | | Load 0x2,0x4
04c2 e012 | | Load 0x0,0x12
04c3 180e | | Execute Package,Field_Execute,Field_Number 0xe
04c4 c405 | | Store 0x2,0x5
04c5 e004 | | Load 0x0,0x4 ; Debug Table 0xc.0xe = 0x4c5,0x8
04c6 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04c7 e010 | | Load 0x0,0x10
04c8 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04c9 7840 |x@ | Jump 0x50a
04ca e404 | | Load 0x2,0x4 ; Debug Table 0xc.0xf = 0x4ca,0x9
04cb e002 | | Load 0x0,0x2
04cc 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
04cd e00f | | Load 0x0,0xf
04ce 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04cf 027f | | Execute Discrete,Equal
04d0 6839 |h9 | Jump_Zero 0x50a
04d1 e5fc | | Load 0x2,-0x4 ; Debug Table 0xc.0x10 = 0x4d1,0xa
04d2 e404 | | Load 0x2,0x4
04d3 8214 | | Call 0x1,0x14
04d4 a406 | | Store_Unchecked 0x2,0x6
04d5 00cf | | Action Mark_Auxiliary
04d6 782e |x. | Jump 0x505
04d7 e406 | | Load 0x2,0x6 ; Debug Table 0xc.0x11 = 0x4d7,0xc
04d8 e00b | | Load 0x0,0xb
04d9 181e | | Execute Package,Field_Execute,Field_Number 0x1e
04da e407 | | Load 0x2,0x7
04db 016d | m | Execute Variant_Record,Structure_Write
04dc e002 | | Load 0x0,0x2 ; Debug Table 0xc.0x12 = 0x4dc,0xd
04dd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04de e408 | | Load 0x2,0x8
04df 0120 | | Execute Any,Is_Value
04e0 6803 |h | Jump_Zero 0x4e4
04e1 e002 | | Load 0x0,0x2
04e2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04e3 7801 |x | Jump 0x4e5
04e4 e408 | | Load 0x2,0x8
04e5 66c2 |f | Indirect_Literal Discrete,0x3a8,{0x00000000, 0x00004000}
04e6 e5fc | | Load 0x2,-0x4
04e7 e407 | | Load 0x2,0x7
04e8 e002 | | Load 0x0,0x2
04e9 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
04ea 181b | | Execute Package,Field_Execute,Field_Number 0x1b
04eb c408 | | Store 0x2,0x8
04ec 005b | [ | Store_Top Discrete,At_Offset_3
04ed 00da | | Load_Top At_Offset_2 ; Debug Table 0xc.0x13 = 0x4ed,0xe
04ee 7011 |p | Jump_Nonzero 0x500
04ef 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xc.0x14 = 0x4ef,0xf
04f0 e5fc | | Load 0x2,-0x4
04f1 e5fd | | Load 0x2,-0x3
04f2 4800 |H | Short_Literal 0x0
04f3 e5fb | | Load 0x2,-0x5
04f4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
04f5 e5fb | | Load 0x2,-0x5
04f6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04f7 4803 |H | Short_Literal 0x3
04f8 e408 | | Load 0x2,0x8
04f9 e012 | | Load 0x0,0x12
04fa 180e | | Execute Package,Field_Execute,Field_Number 0xe
04fb c405 | | Store 0x2,0x5
04fc e004 | | Load 0x0,0x4 ; Debug Table 0xc.0x15 = 0x4fc,0x10
04fd 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04fe e010 | | Load 0x0,0x10
04ff 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0500 e406 | | Load 0x2,0x6 ; Debug Table 0xc.0x16 = 0x500,0x11
0501 e00b | | Load 0x0,0xb
0502 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0503 a406 | | Store_Unchecked 0x2,0x6
0504 00c9 | | Action Pop_Auxiliary_Loop
0505 e406 | | Load 0x2,0x6 ; Debug Table 0xc.0x17 = 0x505,0xb
0506 e00b | | Load 0x0,0xb
0507 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0508 6fce |o | Jump_Zero 0x4d7
0509 00ce | | Action Pop_Auxiliary
050a e402 | | Load 0x2,0x2 ; Debug Table 0xc.0x18 = 0x50a,0x12
050b e001 | | Load 0x0,0x1
050c 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
050d 181e | | Execute Package,Field_Execute,Field_Number 0x1e
050e 00d1 | | Pop_Control Pop_Count_1
050f 00c9 | | Action Pop_Auxiliary_Loop
0510 e402 | | Load 0x2,0x2 ; Debug Table 0xc.0x19 = 0x510,0x2
0511 e001 | | Load 0x0,0x1
0512 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0513 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0514 6f83 |o | Jump_Zero 0x498
0515 00ce | | Action Pop_Auxiliary
0516 e402 | | Load 0x2,0x2 ; Debug Table 0xc.0x1a = 0x516,0x13
0517 e5ff | | Load 0x2,-0x1
0518 e001 | | Load 0x0,0x1
0519 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
051a 181d | | Execute Package,Field_Execute,Field_Number 0x1d
051b 00d1 | | Pop_Control Pop_Count_1
051c 00cf | | Action Mark_Auxiliary
051d 7813 |x | Jump 0x531
051e e402 | | Load 0x2,0x2 ; Debug Table 0xc.0x1b = 0x51e,0x15
051f e001 | | Load 0x0,0x1
0520 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0521 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0522 c404 | | Store 0x2,0x4
0523 e5fa | | Load 0x2,-0x6 ; Debug Table 0xc.0x1c = 0x523,0x16
0524 e5fc | | Load 0x2,-0x4
0525 e5fd | | Load 0x2,-0x3
0526 e5fb | | Load 0x2,-0x5
0527 e5fe | | Load 0x2,-0x2
0528 e404 | | Load 0x2,0x4
0529 8217 | | Call 0x1,0x17
052a c5fa | | Store 0x2,-0x6
052b e402 | | Load 0x2,0x2 ; Debug Table 0xc.0x1d = 0x52b,0x17
052c e001 | | Load 0x0,0x1
052d 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
052e 181e | | Execute Package,Field_Execute,Field_Number 0x1e
052f 00d1 | | Pop_Control Pop_Count_1
0530 00c9 | | Action Pop_Auxiliary_Loop
0531 e402 | | Load 0x2,0x2 ; Debug Table 0xc.0x1e = 0x531,0x14
0532 e001 | | Load 0x0,0x1
0533 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0534 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0535 6fe8 |o | Jump_Zero 0x51e
0536 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0537 0000 | | .XXX[0x1]
0538 ; --------------------------------------------------------------------------------------
0538 ; SUBPROGRAM
0538 ; --------------------------------------------------------------------------------------
0538 055a | Z | .CONST 0x055a ; Address of begin
0539 0004 | | .CONST 0x0004 ; Address of exception handler
053a 0008 | | .CONST 0x0008 ; Number of locals
053b INIT_0538:
053b e002 | | Load 0x0,0x2 ; Debug Table 0xd = .DEBUG 0x053b,0x0a7a,0x0001,0x0000,0x0057,0xaf05,0x0000,0x063b
; Debug Table 0xd.0x0 = 0x53b,0xffff
053c 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
053d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
053e 02c7 | | Declare_Variable Any
053f 00d8 | | Load_Top At_Offset_0
0540 1c00 | | Execute_Immediate Run_Utility,0x0
0541 e002 | | Load 0x0,0x2 ; Debug Table 0xd.0x1 = 0x541,0xfffe
0542 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0543 e002 | | Load 0x0,0x2 ; Debug Table 0xd.0x2 = 0x543,0xfffd
0544 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
0545 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31
0546 02c7 | | Declare_Variable Any
0547 00d8 | | Load_Top At_Offset_0
0548 1c00 | | Execute_Immediate Run_Utility,0x0
0549 e002 | | Load 0x0,0x2 ; Debug Table 0xd.0x3 = 0x549,0xfffc
054a 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
054b 02c7 | | Declare_Variable Any
054c 00d8 | | Load_Top At_Offset_0
054d 1c00 | | Execute_Immediate Run_Utility,0x0
054e e002 | | Load 0x0,0x2 ; Debug Table 0xd.0x4 = 0x54e,0xfffb
054f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0550 02c7 | | Declare_Variable Any
0551 00d8 | | Load_Top At_Offset_0
0552 1c00 | | Execute_Immediate Run_Utility,0x0
0553 e002 | | Load 0x0,0x2 ; Debug Table 0xd.0x5 = 0x553,0xfffa
0554 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0555 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0556 02c7 | | Declare_Variable Any
0557 00d8 | | Load_Top At_Offset_0
0558 1c00 | | Execute_Immediate Run_Utility,0x0
0559 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xd.0x6 = 0x559,0xfff9
055a BODY_0538:
055a e5ff | | Load 0x2,-0x1 ; Debug Table 0xd.0x7 = 0x55a,0x1
055b e5fa | | Load 0x2,-0x6
055c e001 | | Load 0x0,0x1
055d 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
055e 1817 | | Execute Package,Field_Execute,Field_Number 0x17
055f 6801 |h | Jump_Zero 0x561
0560 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; Debug Table 0xd.0x8 = 0x560,0x2
0561 e5ff | | Load 0x2,-0x1 ; Debug Table 0xd.0x9 = 0x561,0x3
0562 e002 | | Load 0x0,0x2
0563 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0564 c405 | | Store 0x2,0x5
0565 00db | | Load_Top At_Offset_3 ; Debug Table 0xd.0xa = 0x565,0x4
0566 e002 | | Load 0x0,0x2
0567 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0568 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0569 012f | / | Execute Any,Equal
056a 700b |p | Jump_Nonzero 0x576
056b 00db | | Load_Top At_Offset_3
056c e002 | | Load 0x0,0x2
056d 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
056e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
056f 012f | / | Execute Any,Equal
0570 7005 |p | Jump_Nonzero 0x576
0571 00db | | Load_Top At_Offset_3
0572 e013 | | Load 0x0,0x13
0573 180f | | Execute Package,Field_Execute,Field_Number 0xf
0574 012f | / | Execute Any,Equal
0575 6870 |hp | Jump_Zero 0x5e6
0576 e5ff | | Load 0x2,-0x1 ; Debug Table 0xd.0xb = 0x576,0x5
0577 e002 | | Load 0x0,0x2
0578 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0579 1811 | | Execute Package,Field_Execute,Field_Number 0x11
057a c402 | | Store 0x2,0x2
057b 00db | | Load_Top At_Offset_3 ; Debug Table 0xd.0xc = 0x57b,0x6
057c e002 | | Load 0x0,0x2
057d 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
057e 1814 | | Execute Package,Field_Execute,Field_Number 0x14
057f 012f | / | Execute Any,Equal
0580 6822 |h" | Jump_Zero 0x5a3
0581 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xd.0xd = 0x581,0x7
0582 00da | | Load_Top At_Offset_2
0583 0120 | | Execute Any,Is_Value
0584 6804 |h | Jump_Zero 0x589
0585 e002 | | Load 0x0,0x2
0586 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0587 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0588 7801 |x | Jump 0x58a
0589 00da | | Load_Top At_Offset_2
058a e001 | | Load 0x0,0x1
058b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
058c e402 | | Load 0x2,0x2
058d e001 | | Load 0x0,0x1
058e 181c | | Execute Package,Field_Execute,Field_Number 0x1c
058f c407 | | Store 0x2,0x7
0590 0059 | Y | Store_Top Discrete,At_Offset_1
0591 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0xe = 0x591,0x8
0592 6810 |h | Jump_Zero 0x5a3
0593 00d9 | | Load_Top At_Offset_1
0594 e402 | | Load 0x2,0x2
0595 012e | . | Execute Any,Not_Equal
0596 680c |h | Jump_Zero 0x5a3
0597 e5fa | | Load 0x2,-0x6 ; Debug Table 0xd.0xf = 0x597,0x9
0598 e5fb | | Load 0x2,-0x5
0599 e5fc | | Load 0x2,-0x4
059a e5fd | | Load 0x2,-0x3
059b e5fe | | Load 0x2,-0x2
059c e407 | | Load 0x2,0x7
059d e002 | | Load 0x0,0x2
059e 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
059f 1812 | | Execute Package,Field_Execute,Field_Number 0x12
05a0 8219 | | Call 0x1,0x19
05a1 c5fb | | Store 0x2,-0x5
05a2 c5fa | | Store 0x2,-0x6
05a3 e002 | | Load 0x0,0x2 ; Debug Table 0xd.0x10 = 0x5a3,0xa
05a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05a5 e404 | | Load 0x2,0x4
05a6 0120 | | Execute Any,Is_Value
05a7 6804 |h | Jump_Zero 0x5ac
05a8 e002 | | Load 0x0,0x2
05a9 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
05aa 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31
05ab 7801 |x | Jump 0x5ad
05ac e404 | | Load 0x2,0x4
05ad 65fa |e | Indirect_Literal Discrete,0x3a8,{0x00000000, 0x00004000}
05ae e5fd | | Load 0x2,-0x3
05af e402 | | Load 0x2,0x2
05b0 e002 | | Load 0x0,0x2
05b1 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
05b2 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
05b3 c404 | | Store 0x2,0x4
05b4 c403 | | Store 0x2,0x3
05b5 e403 | | Load 0x2,0x3 ; Debug Table 0xd.0x11 = 0x5b5,0xb
05b6 7023 |p# | Jump_Nonzero 0x5da
05b7 00cf | | Action Mark_Auxiliary
05b8 781a |x | Jump 0x5d3
05b9 e404 | | Load 0x2,0x4 ; Debug Table 0xd.0x12 = 0x5b9,0xd
05ba e002 | | Load 0x0,0x2
05bb 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
05bc 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
05bd c406 | | Store 0x2,0x6
05be e5fc | | Load 0x2,-0x4 ; Debug Table 0xd.0x13 = 0x5be,0xe
05bf e5fd | | Load 0x2,-0x3
05c0 e5fe | | Load 0x2,-0x2
05c1 e406 | | Load 0x2,0x6
05c2 8215 | | Call 0x1,0x15
05c3 6809 |h | Jump_Zero 0x5cd
05c4 e5fa | | Load 0x2,-0x6 ; Debug Table 0xd.0x14 = 0x5c4,0xf
05c5 e5fb | | Load 0x2,-0x5
05c6 e5fc | | Load 0x2,-0x4
05c7 e5fd | | Load 0x2,-0x3
05c8 e5fe | | Load 0x2,-0x2
05c9 e406 | | Load 0x2,0x6
05ca 8219 | | Call 0x1,0x19
05cb c5fb | | Store 0x2,-0x5
05cc c5fa | | Store 0x2,-0x6
05cd e404 | | Load 0x2,0x4 ; Debug Table 0xd.0x15 = 0x5cd,0x10
05ce e002 | | Load 0x0,0x2
05cf 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
05d0 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
05d1 c404 | | Store 0x2,0x4
05d2 00c9 | | Action Pop_Auxiliary_Loop
05d3 e404 | | Load 0x2,0x4 ; Debug Table 0xd.0x16 = 0x5d3,0xc
05d4 e002 | | Load 0x0,0x2
05d5 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
05d6 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
05d7 6fe1 |o | Jump_Zero 0x5b9
05d8 00ce | | Action Pop_Auxiliary
05d9 780c |x | Jump 0x5e6
05da 4805 |H | Short_Literal 0x5 ; Debug Table 0xd.0x17 = 0x5da,0x11
05db e5fc | | Load 0x2,-0x4
05dc 0092 06dc | | Action Push_String_Extended,0x6dc ; "examining children of "
05de 4801 |H | Short_Literal 0x1
05df e5ff | | Load 0x2,-0x1
05e0 e001 | | Load 0x0,0x1
05e1 180e | | Execute Package,Field_Execute,Field_Number 0xe
05e2 01cc | | Execute Vector,Catenate
05e3 e403 | | Load 0x2,0x3
05e4 e007 | | Load 0x0,0x7
05e5 180f | | Execute Package,Field_Execute,Field_Number 0xf
05e6 e5fb | | Load 0x2,-0x5 ; Debug Table 0xd.0x18 = 0x5e6,0x12
05e7 0a01 | | Execute_Immediate Plus,0x1
05e8 c5fb | | Store 0x2,-0x5
05e9 e5fc | | Load 0x2,-0x4 ; Debug Table 0xd.0x19 = 0x5e9,0x13
05ea 4801 |H | Short_Literal 0x1
05eb e5ff | | Load 0x2,-0x1
05ec e001 | | Load 0x0,0x1
05ed 180e | | Execute Package,Field_Execute,Field_Number 0xe
05ee 0092 06dd | | Action Push_String_Extended,0x6dd ; " has been marked"
05f0 01cc | | Execute Vector,Catenate
05f1 8210 | | Call 0x1,0x10
05f2 820e | | Call 0x1,0xe
05f3 e5fa | | Load 0x2,-0x6 ; Debug Table 0xd.0x1a = 0x5f3,0x14
05f4 e5ff | | Load 0x2,-0x1
05f5 e001 | | Load 0x0,0x1
05f6 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
05f7 1818 | | Execute Package,Field_Execute,Field_Number 0x18
05f8 c5fa | | Store 0x2,-0x6
05f9 4505 |E | Exit_Suprogram New_Top_Offset 0x5
05fa 0000 0000 | | .BLANK 0000[0x6]
0600 ; --------------------------------------------------------------------------------------
0600 ; SUBPROGRAM
0600 ; --------------------------------------------------------------------------------------
0600 0616 | | .CONST 0x0616 ; Address of begin
0601 0004 | | .CONST 0x0004 ; Address of exception handler
0602 0006 | | .CONST 0x0006 ; Number of locals
0603 INIT_0600:
0603 e002 | | Load 0x0,0x2 ; Debug Table 0xe = .DEBUG 0x0603,0x0ab2,0x0001,0x0000,0x0057,0xaf05,0x0000,0x0772
; Debug Table 0xe.0x0 = 0x603,0xffff
0604 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0605 02c7 | | Declare_Variable Any
0606 00d8 | | Load_Top At_Offset_0
0607 1c00 | | Execute_Immediate Run_Utility,0x0
0608 e002 | | Load 0x0,0x2 ; Debug Table 0xe.0x1 = 0x608,0xfffe
0609 1b14 | | Execute Package,Field_Read,Field_Number 0x14
060a 02ff | | Declare_Variable Variant_Record
060b 00d8 | | Load_Top At_Offset_0
060c 1c00 | | Execute_Immediate Run_Utility,0x0
060d e002 | | Load 0x0,0x2 ; Debug Table 0xe.0x2 = 0x60d,0xfffd
060e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
060f 02ff | | Declare_Variable Variant_Record
0610 00d8 | | Load_Top At_Offset_0
0611 1c00 | | Execute_Immediate Run_Utility,0x0
0612 e002 | | Load 0x0,0x2 ; Debug Table 0xe.0x3 = 0x612,0xfffc
0613 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0614 e002 | | Load 0x0,0x2 ; Debug Table 0xe.0x4 = 0x614,0xfffb
0615 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0616 BODY_0600:
0616 e5fb | | Load 0x2,-0x5 ; Debug Table 0xe.0x5 = 0x616,0x1
0617 e002 | | Load 0x0,0x2
0618 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0619 181e | | Execute Package,Field_Execute,Field_Number 0x1e
061a 6801 |h | Jump_Zero 0x61c
061b 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; Debug Table 0xe.0x6 = 0x61b,0x2
061c e002 | | Load 0x0,0x2 ; Debug Table 0xe.0x7 = 0x61c,0x3
061d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
061e e402 | | Load 0x2,0x2
061f 0120 | | Execute Any,Is_Value
0620 6803 |h | Jump_Zero 0x624
0621 e002 | | Load 0x0,0x2
0622 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0623 7801 |x | Jump 0x625
0624 e402 | | Load 0x2,0x2
0625 e5fb | | Load 0x2,-0x5
0626 e002 | | Load 0x0,0x2
0627 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0628 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0629 c402 | | Store 0x2,0x2
062a 005a | Z | Store_Top Discrete,At_Offset_2
062b e002 | | Load 0x0,0x2 ; Debug Table 0xe.0x8 = 0x62b,0x4
062c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
062d e403 | | Load 0x2,0x3
062e 6579 |ey | Indirect_Literal Discrete,0x3a8,{0x00000000, 0x00004000}
062f e003 | | Load 0x0,0x3
0630 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0631 e5fb | | Load 0x2,-0x5
0632 e002 | | Load 0x0,0x2
0633 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0634 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0635 00d1 | | Pop_Control Pop_Count_1
0636 0059 | Y | Store_Top Discrete,At_Offset_1
0637 e5fb | | Load 0x2,-0x5 ; Debug Table 0xe.0x9 = 0x637,0x5
0638 e002 | | Load 0x0,0x2
0639 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
063a 181d | | Execute Package,Field_Execute,Field_Number 0x1d
063b c5fb | | Store 0x2,-0x5
063c e5f8 | | Load 0x2,-0x8 ; Debug Table 0xe.0xa = 0x63c,0x6
063d e5f9 | | Load 0x2,-0x7
063e e5fa | | Load 0x2,-0x6
063f e5fb | | Load 0x2,-0x5
0640 e5fc | | Load 0x2,-0x4
0641 e5fd | | Load 0x2,-0x3
0642 e5fe | | Load 0x2,-0x2
0643 e5ff | | Load 0x2,-0x1
0644 821a | | Call 0x1,0x1a
0645 c5fb | | Store 0x2,-0x5
0646 c5fa | | Store 0x2,-0x6
0647 c5f9 | | Store 0x2,-0x7
0648 c5f8 | | Store 0x2,-0x8
0649 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xe.0xb = 0x649,0x7
064a 6801 |h | Jump_Zero 0x64c
064b 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; Debug Table 0xe.0xc = 0x64b,0x8
064c e004 | | Load 0x0,0x4 ; Debug Table 0xe.0xd = 0x64c,0x9
064d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
064e e010 | | Load 0x0,0x10
064f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0650 e5fc | | Load 0x2,-0x4 ; Debug Table 0xe.0xe = 0x650,0xa
0651 e5fd | | Load 0x2,-0x3
0652 e5fe | | Load 0x2,-0x2
0653 e402 | | Load 0x2,0x2
0654 8215 | | Call 0x1,0x15
0655 7001 |p | Jump_Nonzero 0x657
0656 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; Debug Table 0xe.0xf = 0x656,0xb
0657 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x10 = 0x657,0xc
0658 702b |p+ | Jump_Nonzero 0x684
0659 e002 | | Load 0x0,0x2 ; Debug Table 0xe.0x11 = 0x659,0xd
065a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
065b 00db | | Load_Top At_Offset_3
065c 654b |eK | Indirect_Literal Discrete,0x3a8,{0x00000000, 0x00004000}
065d e003 | | Load 0x0,0x3
065e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
065f 4800 |H | Short_Literal 0x0
0660 e402 | | Load 0x2,0x2
0661 e002 | | Load 0x0,0x2
0662 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
0663 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0664 00d1 | | Pop_Control Pop_Count_1
0665 0059 | Y | Store_Top Discrete,At_Offset_1
0666 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x12 = 0x666,0xe
0667 701c |p | Jump_Nonzero 0x684
0668 00da | | Load_Top At_Offset_2
0669 e002 | | Load 0x0,0x2
066a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
066b 7018 |p | Jump_Nonzero 0x684
066c 00da | | Load_Top At_Offset_2
066d e403 | | Load 0x2,0x3
066e 016e | n | Execute Variant_Record,Not_Equal
066f 6814 |h | Jump_Zero 0x684
0670 e5fc | | Load 0x2,-0x4 ; Debug Table 0xe.0x13 = 0x670,0xf
0671 0092 06de | | Action Push_String_Extended,0x6de ; "Cannot "
0673 4800 |H | Short_Literal 0x0
0674 4800 |H | Short_Literal 0x0
0675 4800 |H | Short_Literal 0x0
0676 e5ff | | Load 0x2,-0x1
0677 8213 | | Call 0x1,0x13
0678 01cc | | Execute Vector,Catenate
0679 0092 06df | | Action Push_String_Extended,0x6df ; " nondefault version of "
067b 01cc | | Execute Vector,Catenate
067c 4801 |H | Short_Literal 0x1
067d e402 | | Load 0x2,0x2
067e e001 | | Load 0x0,0x1
067f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0680 01cc | | Execute Vector,Catenate
0681 820f | | Call 0x1,0xf
0682 820e | | Call 0x1,0xe
0683 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; Debug Table 0xe.0x14 = 0x683,0x10
0684 e5f8 | | Load 0x2,-0x8 ; Debug Table 0xe.0x15 = 0x684,0x11
0685 0a01 | | Execute_Immediate Plus,0x1
0686 c5f8 | | Store 0x2,-0x8
0687 e5f9 | | Load 0x2,-0x7 ; Debug Table 0xe.0x16 = 0x687,0x12
0688 e5fa | | Load 0x2,-0x6
0689 e5fc | | Load 0x2,-0x4
068a e5fd | | Load 0x2,-0x3
068b e5fe | | Load 0x2,-0x2
068c e402 | | Load 0x2,0x2
068d 8219 | | Call 0x1,0x19
068e c5fa | | Store 0x2,-0x6
068f c5f9 | | Store 0x2,-0x7
0690 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0691 0000 0000 | | .BLANK 0000[0x7]
0698 ; --------------------------------------------------------------------------------------
0698 ; SUBPROGRAM
0698 ; --------------------------------------------------------------------------------------
0698 069b | | .CONST 0x069b ; Address of begin
0699 06a6 | | .CONST 0x06a6 ; Address of exception handler
069a 0001 | | .CONST 0x0001 ; Number of locals
069b BODY_0698:
069b INIT_0698:
069b e409 | | Load 0x2,0x9 ; Debug Table 0xf = .DEBUG 0x069b,0x0ae2,0x0004,0x0000,0x0057,0xaf05,0x0000,0x093e
; Debug Table 0xf.0x0 = 0x69b,0x1
069c e004 | | Load 0x0,0x4
069d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
069e e005 | | Load 0x0,0x5
069f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
06a0 e5fd | | Load 0x2,-0x3
06a1 e5fc | | Load 0x2,-0x4
06a2 e403 | | Load 0x2,0x3
06a3 e001 | | Load 0x0,0x1
06a4 1812 | | Execute Package,Field_Execute,Field_Number 0x12
06a5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
06a6 TRAP_0698:
06a6 e008 | | Load 0x0,0x8
06a7 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
06a8 010f | | Execute Exception,Equal
06a9 6809 |h | Jump_Zero 0x6b3
06aa e5fd | | Load 0x2,-0x3 ; Debug Table 0xf.0x1 = 0x6aa,0x2
06ab e008 | | Load 0x0,0x8
06ac 1817 | | Execute Package,Field_Execute,Field_Number 0x17
06ad 0f01 | | Execute_Immediate Equal,0x1
06ae 6802 |h | Jump_Zero 0x6b1
06af 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x2 = 0x6af,0x3
06b0 0101 | | Execute Exception,Reraise
06b1 6002 |` | Indirect_Literal Discrete,0x6b4,{0x00000000, 0x57af0501} ; Debug Table 0xf.0x3 = 0x6b1,0x4
06b2 0257 | W | Execute Discrete,Raise
06b3 0100 | | Execute Exception,Raise
06b4 0000 0000 | | .LITERAL {0x00000000, 0x57af0501}
06b8 ; --------------------------------------------------------------------------------------
06b8 ; STRING TABLE
06b8 ; --------------------------------------------------------------------------------------
06b8 0052 | R | .STRTAB 0x0052->0x06e1 ; "The unit name given to "
06b9 0067 | g | .STRTAB 0x0067->0x06ec ; " should not be the null string"
06ba 0083 | | .STRTAB 0x0083->0x06fb ; "No "
06bb 0084 | | .STRTAB 0x0084->0x06fd ; "able objects match "
06bc 0095 | | .STRTAB 0x0095->0x0706 ; "finding objects to "
06bd 00a6 | | .STRTAB 0x00a6->0x0710 ; "Number of marked objects,"
06be 00bd | | .STRTAB 0x00bd->0x071c ; ", exceeds threshold"
06bf 00ce | | .STRTAB 0x00ce->0x0726 ; "The 1 marked object will now be "
06c0 00ec | | .STRTAB 0x00ec->0x0736 ; "The"
06c1 00ed | | .STRTAB 0x00ed->0x0737 ; " marked objects will now be "
06c2 0107 | | .STRTAB 0x0107->0x0745 ; "No objects have been "
06c3 011a | | .STRTAB 0x011a->0x0750 ; " 1 object has been "
06c4 012b | + | .STRTAB 0x012b->0x0759 ; " objects have been "
06c5 013c | < | .STRTAB 0x013c->0x0763 ; " 1 object could not be "
06c6 0151 | Q | .STRTAB 0x0151->0x076e ; " objects could not be "
06c7 0165 | e | .STRTAB 0x0165->0x0779 ; "No objects will be "
06c8 0176 | v | .STRTAB 0x0176->0x0783 ; " "
06c9 0175 | u | .STRTAB 0x0175->0x0783 ; "Deleting"
06ca 017b | { | .STRTAB 0x017b->0x0787 ; "Deleted"
06cb 0180 | | .STRTAB 0x0180->0x078b ; "Delete"
06cc 0184 | | .STRTAB 0x0184->0x078e ; "deleting"
06cd 018a | | .STRTAB 0x018a->0x0792 ; "deleted"
06ce 018f | | .STRTAB 0x018f->0x0795 ; "delete"
06cf 0193 | | .STRTAB 0x0193->0x0798 ; "Destroying"
06d0 019b | | .STRTAB 0x019b->0x079d ; "Destroyed"
06d1 01a2 | | .STRTAB 0x01a2->0x07a2 ; "Destroy"
06d2 01a7 | | .STRTAB 0x01a7->0x07a5 ; "destroying"
06d3 01af | | .STRTAB 0x01af->0x07aa ; "destroyed"
06d4 01b6 | | .STRTAB 0x01b6->0x07af ; "destroy"
06d5 01bb | | .STRTAB 0x01bb->0x07b2 ; " is a subsystem; use cmvc commands to destroy it"
06d6 01e9 | | .STRTAB 0x01e9->0x07ca ; " is a view; use cmvc commands to destroy it"
06d7 0212 | | .STRTAB 0x0212->0x07e0 ; "The code view "
06d8 021e | | .STRTAB 0x021e->0x07e7 ; " has the dependent main program "
06d9 023c | < | .STRTAB 0x023c->0x07f7 ; " which would need to be demoted, "
06da 025b | [ | .STRTAB 0x025b->0x0807 ; "but is outside the change limit given"
06db 027e | ~ | .STRTAB 0x027e->0x081a ; " were "
06dc 0282 | | .STRTAB 0x0282->0x081d ; "examining children of "
06dd 0296 | | .STRTAB 0x0296->0x0828 ; " has been marked"
06de 02a4 | | .STRTAB 0x02a4->0x0830 ; "Cannot "
06df 02a9 | | .STRTAB 0x02a9->0x0833 ; " nondefault version of "
06e0 02be | | .STREND 0x02be->0x083f
06e1 5468 6520 |The | .STRTAB_STRINGS
083f 0000 | | .XXX[0x1]
0840 ; --------------------------------------------------------------------------------------
0840 ; Debug Table
0840 ; --------------------------------------------------------------------------------------
0840 0003 0010 | | .CONST 0x0003,0x0010
0842 000b 08c2 | | .DEBUG 0x000b,0x08c2,0x8000,0x0000,0x0057,0xadc5,0x0000,0x0009
084a 000f 08ca | | .DEBUG 0x000f,0x08ca,0x8000,0x0000,0x0057,0xaf05,0x0000,0x0025
0852 0043 0906 | C | .DEBUG 0x0043,0x0906,0x0001,0x0000,0x0057,0xadc5,0x0000,0x000a
085a 0203 0976 | v| .DEBUG 0x0203,0x0976,0x0005,0x0000,0x0057,0xa6a5,0x0000,0x008f
0862 020b 0978 | x| .DEBUG 0x020b,0x0978,0x0005,0x0000,0x0057,0xa6a5,0x0000,0x008d
086a 0213 097a | z| .DEBUG 0x0213,0x097a,0x0005,0x0000,0x0057,0xa6a5,0x0000,0x0090
0872 021b 097c | || .DEBUG 0x021b,0x097c,0x0005,0x0000,0x0057,0xa6a5,0x0000,0x008c
087a 0223 097e | # ~| .DEBUG 0x0223,0x097e,0x0002,0x0000,0x0057,0xaf05,0x0000,0x00d9
0882 0263 09ae | c | .DEBUG 0x0263,0x09ae,0x0002,0x0000,0x0057,0xaf05,0x0000,0x0143
088a 02bb 09ce | | .DEBUG 0x02bb,0x09ce,0x0002,0x0000,0x0057,0xaf05,0x0000,0x01fc
0892 03b3 0a0e | | .DEBUG 0x03b3,0x0a0e,0x0002,0x0000,0x0057,0xaf05,0x0000,0x038b
089a 03d3 0a18 | | .DEBUG 0x03d3,0x0a18,0x0001,0x0000,0x0057,0xaf05,0x0000,0x03c1
08a2 0473 0a3a | s :| .DEBUG 0x0473,0x0a3a,0x0001,0x0000,0x0057,0xaf05,0x0000,0x04e0
08aa 053b 0a7a | ; z| .DEBUG 0x053b,0x0a7a,0x0001,0x0000,0x0057,0xaf05,0x0000,0x063b
08b2 0603 0ab2 | | .DEBUG 0x0603,0x0ab2,0x0001,0x0000,0x0057,0xaf05,0x0000,0x0772
08ba 069b 0ae2 | | .DEBUG 0x069b,0x0ae2,0x0004,0x0000,0x0057,0xaf05,0x0000,0x093e
08c2 ; --------------------------------------------------------------------------------------
08c2 ; Debug3 Subtable 0x0
08c2 ; --------------------------------------------------------------------------------------
08c2 0003 0000 | | .DBG3TAB 0x0003,0x0000
08c4 000b ffff | | .CONST 0x000b,0xffff
08c6 000d fffe | | .CONST 0x000d,0xfffe
08c8 000e fffd | | .CONST 0x000e,0xfffd
08ca ; --------------------------------------------------------------------------------------
08ca ; Debug3 Subtable 0x1
08ca ; --------------------------------------------------------------------------------------
08ca 001d 0000 | | .DBG3TAB 0x001d,0x0000
08cc 000f ffff | | .CONST 0x000f,0xffff
08ce 0010 fffe | | .CONST 0x0010,0xfffe
08d0 0011 fffd | | .CONST 0x0011,0xfffd
08d2 0012 fffc | | .CONST 0x0012,0xfffc
08d4 0013 fffb | | .CONST 0x0013,0xfffb
08d6 0014 fffa | | .CONST 0x0014,0xfffa
08d8 0015 fff9 | | .CONST 0x0015,0xfff9
08da 0016 fff8 | | .CONST 0x0016,0xfff8
08dc 0017 fff7 | | .CONST 0x0017,0xfff7
08de 0018 fff6 | | .CONST 0x0018,0xfff6
08e0 0019 fff5 | | .CONST 0x0019,0xfff5
08e2 001a fff4 | | .CONST 0x001a,0xfff4
08e4 001b fff3 | | .CONST 0x001b,0xfff3
08e6 001c fff2 | | .CONST 0x001c,0xfff2
08e8 001d fff1 | | .CONST 0x001d,0xfff1
08ea 0020 fff0 | | .CONST 0x0020,0xfff0
08ec 0022 ffef | " | .CONST 0x0022,0xffef
08ee 0024 ffee | $ | .CONST 0x0024,0xffee
08f0 0026 ffed | & | .CONST 0x0026,0xffed
08f2 0028 ffec | ( | .CONST 0x0028,0xffec
08f4 0029 ffeb | ) | .CONST 0x0029,0xffeb
08f6 002b ffea | + | .CONST 0x002b,0xffea
08f8 002d ffe9 | - | .CONST 0x002d,0xffe9
08fa 002f ffe8 | / | .CONST 0x002f,0xffe8
08fc 0031 ffe7 | 1 | .CONST 0x0031,0xffe7
08fe 0033 ffe6 | 3 | .CONST 0x0033,0xffe6
0900 0035 ffe5 | 5 | .CONST 0x0035,0xffe5
0902 0037 ffe4 | 7 | .CONST 0x0037,0xffe4
0904 0039 ffe3 | 9 | .CONST 0x0039,0xffe3
0906 ; --------------------------------------------------------------------------------------
0906 ; Debug3 Subtable 0x2
0906 ; --------------------------------------------------------------------------------------
0906 0008 002f | /| .DBG3TAB 0x0008,0x002f
0908 0043 ffff | C | .CONST 0x0043,0xffff
090a 0046 fffe | F | .CONST 0x0046,0xfffe
090c 004c fffd | L | .CONST 0x004c,0xfffd
090e 004e fffc | N | .CONST 0x004e,0xfffc
0910 0050 fffb | P | .CONST 0x0050,0xfffb
0912 0052 fffa | R | .CONST 0x0052,0xfffa
0914 0058 fff9 | X | .CONST 0x0058,0xfff9
0916 005b fff8 | [ | .CONST 0x005b,0xfff8
0918 0062 0001 | b | .CONST 0x0062,0x0001
091a 0064 0002 | d | .CONST 0x0064,0x0002
091c 0067 0003 | g | .CONST 0x0067,0x0003
091e 0075 0004 | u | .CONST 0x0075,0x0004
0920 0076 0005 | v | .CONST 0x0076,0x0005
0922 0081 0006 | | .CONST 0x0081,0x0006
0924 0083 0007 | | .CONST 0x0083,0x0007
0926 009c 0008 | | .CONST 0x009c,0x0008
0928 00b8 0009 | | .CONST 0x00b8,0x0009
092a 00b9 000a | | .CONST 0x00b9,0x000a
092c 00bb 000b | | .CONST 0x00bb,0x000b
092e 00c1 000c | | .CONST 0x00c1,0x000c
0930 00ce 000d | | .CONST 0x00ce,0x000d
0932 00d5 000e | | .CONST 0x00d5,0x000e
0934 00d7 000f | | .CONST 0x00d7,0x000f
0936 00e8 0010 | | .CONST 0x00e8,0x0010
0938 00f6 0011 | | .CONST 0x00f6,0x0011
093a 00fb 0012 | | .CONST 0x00fb,0x0012
093c 0101 0013 | | .CONST 0x0101,0x0013
093e 010d 0014 | | .CONST 0x010d,0x0014
0940 010f 0015 | | .CONST 0x010f,0x0015
0942 0112 0016 | | .CONST 0x0112,0x0016
0944 011e 0017 | | .CONST 0x011e,0x0017
0946 0121 0018 | ! | .CONST 0x0121,0x0018
0948 0133 0019 | 3 | .CONST 0x0133,0x0019
094a 013b 001a | ; | .CONST 0x013b,0x001a
094c 013f 001b | ? | .CONST 0x013f,0x001b
094e 014b 001c | K | .CONST 0x014b,0x001c
0950 0150 001d | P | .CONST 0x0150,0x001d
0952 015c 001e | \ | .CONST 0x015c,0x001e
0954 016e 001f | n | .CONST 0x016e,0x001f
0956 0170 0020 | p | .CONST 0x0170,0x0020
0958 0173 0021 | s !| .CONST 0x0173,0x0021
095a 0176 0022 | v "| .CONST 0x0176,0x0022
095c 0182 0023 | #| .CONST 0x0182,0x0023
095e 0185 0024 | $| .CONST 0x0185,0x0024
0960 0199 0025 | %| .CONST 0x0199,0x0025
0962 019e 0026 | &| .CONST 0x019e,0x0026
0964 01a5 0027 | '| .CONST 0x01a5,0x0027
0966 01b0 0028 | (| .CONST 0x01b0,0x0028
0968 01b5 0029 | )| .CONST 0x01b5,0x0029
096a 01ba 002a | *| .CONST 0x01ba,0x002a
096c 01c1 002b | +| .CONST 0x01c1,0x002b
096e 01cd 002c | ,| .CONST 0x01cd,0x002c
0970 01d2 002d | -| .CONST 0x01d2,0x002d
0972 01d9 002e | .| .CONST 0x01d9,0x002e
0974 01ed 002f | /| .CONST 0x01ed,0x002f
0976 ; --------------------------------------------------------------------------------------
0976 ; Debug3 Subtable 0x3
0976 ; --------------------------------------------------------------------------------------
0976 0000 0000 | | .DBG3TAB 0x0000,0x0000
0978 ; --------------------------------------------------------------------------------------
0978 ; Debug3 Subtable 0x4
0978 ; --------------------------------------------------------------------------------------
0978 0000 0000 | | .DBG3TAB 0x0000,0x0000
097a ; --------------------------------------------------------------------------------------
097a ; Debug3 Subtable 0x5
097a ; --------------------------------------------------------------------------------------
097a 0000 0000 | | .DBG3TAB 0x0000,0x0000
097c ; --------------------------------------------------------------------------------------
097c ; Debug3 Subtable 0x6
097c ; --------------------------------------------------------------------------------------
097c 0000 0000 | | .DBG3TAB 0x0000,0x0000
097e ; --------------------------------------------------------------------------------------
097e ; Debug3 Subtable 0x7
097e ; --------------------------------------------------------------------------------------
097e 0000 0017 | | .DBG3TAB 0x0000,0x0017
0980 0223 0001 | # | .CONST 0x0223,0x0001
0982 0225 0002 | % | .CONST 0x0225,0x0002
0984 0227 0003 | ' | .CONST 0x0227,0x0003
0986 0229 0004 | ) | .CONST 0x0229,0x0004
0988 022c 0005 | , | .CONST 0x022c,0x0005
098a 022e 0006 | . | .CONST 0x022e,0x0006
098c 0231 0007 | 1 | .CONST 0x0231,0x0007
098e 0234 0008 | 4 | .CONST 0x0234,0x0008
0990 0236 0009 | 6 | .CONST 0x0236,0x0009
0992 0239 000a | 9 | .CONST 0x0239,0x000a
0994 023b 000b | ; | .CONST 0x023b,0x000b
0996 023e 000c | > | .CONST 0x023e,0x000c
0998 0241 000d | A | .CONST 0x0241,0x000d
099a 0243 000e | C | .CONST 0x0243,0x000e
099c 0245 000f | E | .CONST 0x0245,0x000f
099e 0248 0010 | H | .CONST 0x0248,0x0010
09a0 024a 0011 | J | .CONST 0x024a,0x0011
09a2 024d 0012 | M | .CONST 0x024d,0x0012
09a4 0250 0013 | P | .CONST 0x0250,0x0013
09a6 0252 0014 | R | .CONST 0x0252,0x0014
09a8 0255 0015 | U | .CONST 0x0255,0x0015
09aa 0257 0016 | W | .CONST 0x0257,0x0016
09ac 025a 0017 | Z | .CONST 0x025a,0x0017
09ae ; --------------------------------------------------------------------------------------
09ae ; Debug3 Subtable 0x8
09ae ; --------------------------------------------------------------------------------------
09ae 0008 0007 | | .DBG3TAB 0x0008,0x0007
09b0 0263 ffff | c | .CONST 0x0263,0xffff
09b2 0265 fffe | e | .CONST 0x0265,0xfffe
09b4 0267 fffd | g | .CONST 0x0267,0xfffd
09b6 0268 fffc | h | .CONST 0x0268,0xfffc
09b8 026d fffb | m | .CONST 0x026d,0xfffb
09ba 026f fffa | o | .CONST 0x026f,0xfffa
09bc 0275 fff9 | u | .CONST 0x0275,0xfff9
09be 0284 fff8 | | .CONST 0x0284,0xfff8
09c0 028e 0001 | | .CONST 0x028e,0x0001
09c2 029a 0002 | | .CONST 0x029a,0x0002
09c4 029c 0003 | | .CONST 0x029c,0x0003
09c6 029e 0004 | | .CONST 0x029e,0x0004
09c8 02a7 0005 | | .CONST 0x02a7,0x0005
09ca 02ab 0006 | | .CONST 0x02ab,0x0006
09cc 02ad 0007 | | .CONST 0x02ad,0x0007
09ce ; --------------------------------------------------------------------------------------
09ce ; Debug3 Subtable 0x9
09ce ; --------------------------------------------------------------------------------------
09ce 0007 0018 | | .DBG3TAB 0x0007,0x0018
09d0 02bb ffff | | .CONST 0x02bb,0xffff
09d2 02c1 fffe | | .CONST 0x02c1,0xfffe
09d4 02c3 fffd | | .CONST 0x02c3,0xfffd
09d6 02c5 fffc | | .CONST 0x02c5,0xfffc
09d8 02c7 fffb | | .CONST 0x02c7,0xfffb
09da 02cc fffa | | .CONST 0x02cc,0xfffa
09dc 02d1 fff9 | | .CONST 0x02d1,0xfff9
09de 02d4 0001 | | .CONST 0x02d4,0x0001
09e0 02e7 0002 | | .CONST 0x02e7,0x0002
09e2 02f2 0003 | | .CONST 0x02f2,0x0003
09e4 02f4 0004 | | .CONST 0x02f4,0x0004
09e6 02f9 0005 | | .CONST 0x02f9,0x0005
09e8 030d 0006 | | .CONST 0x030d,0x0006
09ea 0317 0007 | | .CONST 0x0317,0x0007
09ec 0319 0008 | | .CONST 0x0319,0x0008
09ee 032d 0009 | - | .CONST 0x032d,0x0009
09f0 0337 000a | 7 | .CONST 0x0337,0x000a
09f2 0339 000b | 9 | .CONST 0x0339,0x000b
09f4 0342 000c | B | .CONST 0x0342,0x000c
09f6 0346 000d | F | .CONST 0x0346,0x000d
09f8 034a 000e | J | .CONST 0x034a,0x000e
09fa 034d 000f | M | .CONST 0x034d,0x000f
09fc 034e 0010 | N | .CONST 0x034e,0x0010
09fe 0353 0011 | S | .CONST 0x0353,0x0011
0a00 0360 0012 | ` | .CONST 0x0360,0x0012
0a02 0365 0013 | e | .CONST 0x0365,0x0013
0a04 0376 0014 | v | .CONST 0x0376,0x0014
0a06 0380 0015 | | .CONST 0x0380,0x0015
0a08 0398 0016 | | .CONST 0x0398,0x0016
0a0a 039a 0017 | | .CONST 0x039a,0x0017
0a0c 03a0 0018 | | .CONST 0x03a0,0x0018
0a0e ; --------------------------------------------------------------------------------------
0a0e ; Debug3 Subtable 0xa
0a0e ; --------------------------------------------------------------------------------------
0a0e 0002 0002 | | .DBG3TAB 0x0002,0x0002
0a10 03b3 ffff | | .CONST 0x03b3,0xffff
0a12 03b5 fffe | | .CONST 0x03b5,0xfffe
0a14 03ba 0001 | | .CONST 0x03ba,0x0001
0a16 03c6 0002 | | .CONST 0x03c6,0x0002
0a18 ; --------------------------------------------------------------------------------------
0a18 ; Debug3 Subtable 0xb
0a18 ; --------------------------------------------------------------------------------------
0a18 0006 000a | | .DBG3TAB 0x0006,0x000a
0a1a 03d3 ffff | | .CONST 0x03d3,0xffff
0a1c 03d5 fffe | | .CONST 0x03d5,0xfffe
0a1e 03d7 fffd | | .CONST 0x03d7,0xfffd
0a20 03d8 fffc | | .CONST 0x03d8,0xfffc
0a22 03dd fffb | | .CONST 0x03dd,0xfffb
0a24 03e1 fffa | | .CONST 0x03e1,0xfffa
0a26 03e2 0001 | | .CONST 0x03e2,0x0001
0a28 03e6 0002 | | .CONST 0x03e6,0x0002
0a2a 03e8 0003 | | .CONST 0x03e8,0x0003
0a2c 0408 0004 | | .CONST 0x0408,0x0004
0a2e 0426 0005 | & | .CONST 0x0426,0x0005
0a30 043b 0006 | ; | .CONST 0x043b,0x0006
0a32 0449 0007 | I | .CONST 0x0449,0x0007
0a34 0454 0008 | T | .CONST 0x0454,0x0008
0a36 0459 0009 | Y | .CONST 0x0459,0x0009
0a38 045c 000a | \ | .CONST 0x045c,0x000a
0a3a ; --------------------------------------------------------------------------------------
0a3a ; Debug3 Subtable 0xc
0a3a ; --------------------------------------------------------------------------------------
0a3a 0008 0017 | | .DBG3TAB 0x0008,0x0017
0a3c 0473 ffff | s | .CONST 0x0473,0xffff
0a3e 0479 fffe | y | .CONST 0x0479,0xfffe
0a40 047c fffd | | | .CONST 0x047c,0xfffd
0a42 0481 fffc | | .CONST 0x0481,0xfffc
0a44 0482 fffb | | .CONST 0x0482,0xfffb
0a46 0484 fffa | | .CONST 0x0484,0xfffa
0a48 0489 fff9 | | .CONST 0x0489,0xfff9
0a4a 048e fff8 | | .CONST 0x048e,0xfff8
0a4c 0490 0001 | | .CONST 0x0490,0x0001
0a4e 0498 0003 | | .CONST 0x0498,0x0003
0a50 049d 0004 | | .CONST 0x049d,0x0004
0a52 04a5 0005 | | .CONST 0x04a5,0x0005
0a54 04b3 0006 | | .CONST 0x04b3,0x0006
0a56 04b8 0007 | | .CONST 0x04b8,0x0007
0a58 04c5 0008 | | .CONST 0x04c5,0x0008
0a5a 04ca 0009 | | .CONST 0x04ca,0x0009
0a5c 04d1 000a | | .CONST 0x04d1,0x000a
0a5e 04d7 000c | | .CONST 0x04d7,0x000c
0a60 04dc 000d | | .CONST 0x04dc,0x000d
0a62 04ed 000e | | .CONST 0x04ed,0x000e
0a64 04ef 000f | | .CONST 0x04ef,0x000f
0a66 04fc 0010 | | .CONST 0x04fc,0x0010
0a68 0500 0011 | | .CONST 0x0500,0x0011
0a6a 0505 000b | | .CONST 0x0505,0x000b
0a6c 050a 0012 | | .CONST 0x050a,0x0012
0a6e 0510 0002 | | .CONST 0x0510,0x0002
0a70 0516 0013 | | .CONST 0x0516,0x0013
0a72 051e 0015 | | .CONST 0x051e,0x0015
0a74 0523 0016 | # | .CONST 0x0523,0x0016
0a76 052b 0017 | + | .CONST 0x052b,0x0017
0a78 0531 0014 | 1 | .CONST 0x0531,0x0014
0a7a ; --------------------------------------------------------------------------------------
0a7a ; Debug3 Subtable 0xd
0a7a ; --------------------------------------------------------------------------------------
0a7a 0007 0014 | | .DBG3TAB 0x0007,0x0014
0a7c 053b ffff | ; | .CONST 0x053b,0xffff
0a7e 0541 fffe | A | .CONST 0x0541,0xfffe
0a80 0543 fffd | C | .CONST 0x0543,0xfffd
0a82 0549 fffc | I | .CONST 0x0549,0xfffc
0a84 054e fffb | N | .CONST 0x054e,0xfffb
0a86 0553 fffa | S | .CONST 0x0553,0xfffa
0a88 0559 fff9 | Y | .CONST 0x0559,0xfff9
0a8a 055a 0001 | Z | .CONST 0x055a,0x0001
0a8c 0560 0002 | ` | .CONST 0x0560,0x0002
0a8e 0561 0003 | a | .CONST 0x0561,0x0003
0a90 0565 0004 | e | .CONST 0x0565,0x0004
0a92 0576 0005 | v | .CONST 0x0576,0x0005
0a94 057b 0006 | { | .CONST 0x057b,0x0006
0a96 0581 0007 | | .CONST 0x0581,0x0007
0a98 0591 0008 | | .CONST 0x0591,0x0008
0a9a 0597 0009 | | .CONST 0x0597,0x0009
0a9c 05a3 000a | | .CONST 0x05a3,0x000a
0a9e 05b5 000b | | .CONST 0x05b5,0x000b
0aa0 05b9 000d | | .CONST 0x05b9,0x000d
0aa2 05be 000e | | .CONST 0x05be,0x000e
0aa4 05c4 000f | | .CONST 0x05c4,0x000f
0aa6 05cd 0010 | | .CONST 0x05cd,0x0010
0aa8 05d3 000c | | .CONST 0x05d3,0x000c
0aaa 05da 0011 | | .CONST 0x05da,0x0011
0aac 05e6 0012 | | .CONST 0x05e6,0x0012
0aae 05e9 0013 | | .CONST 0x05e9,0x0013
0ab0 05f3 0014 | | .CONST 0x05f3,0x0014
0ab2 ; --------------------------------------------------------------------------------------
0ab2 ; Debug3 Subtable 0xe
0ab2 ; --------------------------------------------------------------------------------------
0ab2 0005 0012 | | .DBG3TAB 0x0005,0x0012
0ab4 0603 ffff | | .CONST 0x0603,0xffff
0ab6 0608 fffe | | .CONST 0x0608,0xfffe
0ab8 060d fffd | | .CONST 0x060d,0xfffd
0aba 0612 fffc | | .CONST 0x0612,0xfffc
0abc 0614 fffb | | .CONST 0x0614,0xfffb
0abe 0616 0001 | | .CONST 0x0616,0x0001
0ac0 061b 0002 | | .CONST 0x061b,0x0002
0ac2 061c 0003 | | .CONST 0x061c,0x0003
0ac4 062b 0004 | + | .CONST 0x062b,0x0004
0ac6 0637 0005 | 7 | .CONST 0x0637,0x0005
0ac8 063c 0006 | < | .CONST 0x063c,0x0006
0aca 0649 0007 | I | .CONST 0x0649,0x0007
0acc 064b 0008 | K | .CONST 0x064b,0x0008
0ace 064c 0009 | L | .CONST 0x064c,0x0009
0ad0 0650 000a | P | .CONST 0x0650,0x000a
0ad2 0656 000b | V | .CONST 0x0656,0x000b
0ad4 0657 000c | W | .CONST 0x0657,0x000c
0ad6 0659 000d | Y | .CONST 0x0659,0x000d
0ad8 0666 000e | f | .CONST 0x0666,0x000e
0ada 0670 000f | p | .CONST 0x0670,0x000f
0adc 0683 0010 | | .CONST 0x0683,0x0010
0ade 0684 0011 | | .CONST 0x0684,0x0011
0ae0 0687 0012 | | .CONST 0x0687,0x0012
0ae2 ; --------------------------------------------------------------------------------------
0ae2 ; Debug3 Subtable 0xf
0ae2 ; --------------------------------------------------------------------------------------
0ae2 0000 0004 | | .DBG3TAB 0x0000,0x0004
0ae4 069b 0001 | | .CONST 0x069b,0x0001
0ae6 06aa 0002 | | .CONST 0x06aa,0x0002
0ae8 06af 0003 | | .CONST 0x06af,0x0003
0aea 06b1 0004 | | .CONST 0x06b1,0x0004
0aec 0000 0000 | | .BLANK 0000[0x114]