|
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: 11264 (0x2c00)
Notes: 00_class, 580b_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦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 580b |X | .CONST 0x580b ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0f20 | | .CONST 0x0f20 ; 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 000a | | .CONST 0x000a ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 004c | L | .CONST 0x004c ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0021 | ! | .CONST 0x0021 ; Number of locals
000b INIT_0008:
000b 029a 0053 | S| Declare_Subprogram INIT_0050,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x1062,0x8000,0x0000,0x0038,0xc7e6,0x0000,0x0003
; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 0263 | c| Declare_Subprogram INIT_0260,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 029a 0373 | s| Declare_Subprogram INIT_0370,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x13,0xfffb
0015 029a 0473 | s| Declare_Subprogram INIT_0470,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x15,0xfffa
0017 029a 053b | ;| Declare_Subprogram INIT_0538,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x17,0xfff9
0019 029a 055b | [| Declare_Subprogram INIT_0558,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x19,0xfff8
001b 029a 056b | k| Declare_Subprogram INIT_0568,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x1b,0xfff7
001d 029a 0573 | s| Declare_Subprogram INIT_0570,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x1d,0xfff6
001f 00bf | | Action Accept_Activation
0020 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0020,0x1078,0x8000,0x0000,0x0039,0x33c6,0x0000,0x001d
; Debug Table 0x1.0x0 = 0x20,0xffff
0021 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x21,0xfffe
0022 029d 057b | {| Declare_Subprogram INIT_0578,For_Outer_Call ; Debug Table 0x1.0x2 = 0x22,0xfffd
0024 029d 0583 | | Declare_Subprogram INIT_0580,For_Outer_Call ; Debug Table 0x1.0x3 = 0x24,0xfffc
0026 029d 058b | | Declare_Subprogram INIT_0588,For_Outer_Call ; Debug Table 0x1.0x4 = 0x26,0xfffb
0028 029d 059b | | Declare_Subprogram INIT_0598,For_Outer_Call ; Debug Table 0x1.0x5 = 0x28,0xfffa
002a 029d 05ab | | Declare_Subprogram INIT_05a8,For_Outer_Call ; Debug Table 0x1.0x6 = 0x2a,0xfff9
002c 029d 05cb | | Declare_Subprogram INIT_05c8,For_Outer_Call ; Debug Table 0x1.0x7 = 0x2c,0xfff8
002e 029d 0603 | | Declare_Subprogram INIT_0600,For_Outer_Call ; Debug Table 0x1.0x8 = 0x2e,0xfff7
0030 029d 0643 | C| Declare_Subprogram INIT_0640,For_Outer_Call ; Debug Table 0x1.0x9 = 0x30,0xfff6
0032 029d 067b | {| Declare_Subprogram INIT_0678,For_Outer_Call ; Debug Table 0x1.0xa = 0x32,0xfff5
0034 029d 06d3 | | Declare_Subprogram INIT_06d0,For_Outer_Call ; Debug Table 0x1.0xb = 0x34,0xfff4
0036 029d 078b | | Declare_Subprogram INIT_0788,For_Outer_Call ; Debug Table 0x1.0xc = 0x36,0xfff3
0038 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0xd = 0x38,0xfff2
0039 00c7 | | Action Elaborate_Subprogram
003a 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0xe = 0x3a,0xfff1
003b 00c7 | | Action Elaborate_Subprogram
003c 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0xf = 0x3c,0xfff0
003d 00c7 | | Action Elaborate_Subprogram
003e 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x10 = 0x3e,0xffef
003f 00c7 | | Action Elaborate_Subprogram
0040 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x11 = 0x40,0xffee
0041 00c7 | | Action Elaborate_Subprogram
0042 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x12 = 0x42,0xffed
0043 00c7 | | Action Elaborate_Subprogram
0044 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x13 = 0x44,0xffec
0045 00c7 | | Action Elaborate_Subprogram
0046 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x14 = 0x46,0xffeb
0047 00c7 | | Action Elaborate_Subprogram
0048 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x15 = 0x48,0xffea
0049 00c7 | | Action Elaborate_Subprogram
004a 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x16 = 0x4a,0xffe9
004b 00c7 | | Action Elaborate_Subprogram
004c BODY_0008:
004c 00bc | | Action Signal_Activated
004d 00bb | | Action Signal_Completion
004e 0000 0000 | | .XXX[0x2]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0057 | W | .CONST 0x0057 ; Address of begin
0051 0004 | | .CONST 0x0004 ; Address of exception handler
0052 0003 | | .CONST 0x0003 ; Number of locals
0053 INIT_0050:
0053 029f 07a3 | | Declare_Subprogram INIT_07a0,For_Call ; Debug Table 0x2 = .DEBUG 0x0053,0x10a8,0x0001,0x0000,0x0038,0xc7e6,0x0000,0x0004
; Debug Table 0x2.0x0 = 0x53,0xffff
0055 029f 085b | [| Declare_Subprogram INIT_0858,For_Call ; Debug Table 0x2.0x1 = 0x55,0xfffe
0057 BODY_0050:
0057 8403 | | Call 0x2,0x3 ; Debug Table 0x2.0x2 = 0x57,0x1
0058 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0059 0000 0000 | | .BLANK 0000[0x7]
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 009d | | .CONST 0x009d ; Address of begin
0061 0171 | q | .CONST 0x0171 ; Address of exception handler
0062 000c | | .CONST 0x000c ; Number of locals
0063 INIT_0060:
0063 0007 | | Action Break_Optional ; Debug Table 0x3 = .DEBUG 0x0063,0x10b0,0x0001,0x0000,0x0038,0xc7e6,0x0000,0x0014
; Debug Table 0x3.0x0 = 0x63,0xffff
0064 e001 | | Load 0x0,0x1 ; Debug Table 0x3.0x1 = 0x64,0xfffe
0065 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0066 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0067 02c7 | | Declare_Variable Any
0068 00d8 | | Load_Top At_Offset_0
0069 1c00 | | Execute_Immediate Run_Utility,0x0
006a e002 | | Load 0x0,0x2 ; Debug Table 0x3.0x2 = 0x6a,0xfffd
006b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
006c 02c7 | | Declare_Variable Any
006d 00d8 | | Load_Top At_Offset_0
006e 1c00 | | Execute_Immediate Run_Utility,0x0
006f e003 | | Load 0x0,0x3 ; Debug Table 0x3.0x3 = 0x6f,0xfffc
0070 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0071 4973 |Is | Short_Literal 0x173 ; Debug Table 0x3.0x4 = 0x71,0xfffb
0072 00eb | | Load_Encached Diana_Cache
0073 0098 | | Execute Package,Field_Read_Dynamic
0074 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0075 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x3.0x5 = 0x75,0xfffa
0076 e001 | | Load 0x0,0x1 ; Debug Table 0x3.0x6 = 0x76,0xfff9
0077 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0078 02ff | | Declare_Variable Variant_Record
0079 00d8 | | Load_Top At_Offset_0
007a 1c00 | | Execute_Immediate Run_Utility,0x0
007b e004 | | Load 0x0,0x4 ; Debug Table 0x3.0x7 = 0x7b,0xfff8
007c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
007d 02c7 | | Declare_Variable Any
007e e005 | | Load 0x0,0x5
007f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0080 e004 | | Load 0x0,0x4
0081 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0082 c408 | | Store 0x2,0x8
0083 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x8 = 0x83,0xfff7
0084 4804 |H | Short_Literal 0x4
0085 029f 0973 | s| Declare_Subprogram INIT_0970,For_Call
0087 03fd | | Declare_Type Discrete,Defined
0088 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x9 = 0x88,0xfff6
0089 4801 |H | Short_Literal 0x1
008a 00e1 | | Load_Encached Boolean_Cache
008b 4801 |H | Short_Literal 0x1
008c 00e2 | | Load_Encached Integer_Cache
008d 4801 |H | Short_Literal 0x1
008e 00ec | | Load_Encached Diana_Tree_Cache
008f 029f 098b | | Declare_Subprogram INIT_0988,For_Call
0091 4803 |H | Short_Literal 0x3
0092 4800 |H | Short_Literal 0x0
0093 4803 |H | Short_Literal 0x3
0094 4800 |H | Short_Literal 0x0
0095 4801 |H | Short_Literal 0x1
0096 031d | | Declare_Type Variant_Record,Defined
0097 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0xa = 0x97,0xfff5
0098 02ff | | Declare_Variable Variant_Record
0099 00d8 | | Load_Top At_Offset_0
009a 1c00 | | Execute_Immediate Run_Utility,0x0
009b 029f 09db | | Declare_Subprogram INIT_09d8,For_Call ; Debug Table 0x3.0xb = 0x9b,0xfff4
009d BODY_0060:
009d e5fd | | Load 0x2,-0x3 ; Debug Table 0x3.0xc = 0x9d,0x1
009e 840c | | Call 0x2,0xc
009f 00da | | Load_Top At_Offset_2
00a0 016d | m | Execute Variant_Record,Structure_Write
00a1 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0xd = 0xa1,0x2
00a2 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00a3 7007 |p | Jump_Nonzero 0xab
00a4 e408 | | Load 0x2,0x8 ; Debug Table 0x3.0xe = 0xa4,0x3
00a5 4801 |H | Short_Literal 0x1
00a6 4800 |H | Short_Literal 0x0
00a7 e004 | | Load 0x0,0x4
00a8 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00a9 c408 | | Store 0x2,0x8
00aa 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; Debug Table 0x3.0xf = 0xaa,0x4
00ab e5fe | | Load 0x2,-0x2 ; Debug Table 0x3.0x10 = 0xab,0x5
00ac 01db | | Execute Vector,Length
00ad 700a |p | Jump_Nonzero 0xb8
00ae 0092 0c99 | | Action Push_String_Extended,0xc99 ; "on_node cannot be empty"
; Debug Table 0x3.0x11 = 0xae,0x6
00b0 8219 | | Call 0x1,0x19
00b1 e408 | | Load 0x2,0x8 ; Debug Table 0x3.0x12 = 0xb1,0x7
00b2 4801 |H | Short_Literal 0x1
00b3 4800 |H | Short_Literal 0x0
00b4 e004 | | Load 0x0,0x4
00b5 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00b6 c408 | | Store 0x2,0x8
00b7 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; Debug Table 0x3.0x13 = 0xb7,0x8
00b8 e5fe | | Load 0x2,-0x2 ; Debug Table 0x3.0x14 = 0xb8,0x9
00b9 8221 | ! | Call 0x1,0x21
00ba a406 | | Store_Unchecked 0x2,0x6
00bb e406 | | Load 0x2,0x6 ; Debug Table 0x3.0x15 = 0xbb,0xa
00bc 00eb | | Load_Encached Diana_Cache
00bd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00be 6807 |h | Jump_Zero 0xc6
00bf e408 | | Load 0x2,0x8 ; Debug Table 0x3.0x16 = 0xbf,0xb
00c0 4801 |H | Short_Literal 0x1
00c1 4800 |H | Short_Literal 0x0
00c2 e004 | | Load 0x0,0x4
00c3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00c4 c408 | | Store 0x2,0x8
00c5 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; Debug Table 0x3.0x17 = 0xc5,0xc
00c6 e406 | | Load 0x2,0x6 ; Debug Table 0x3.0x18 = 0xc6,0xd
00c7 e001 | | Load 0x0,0x1
00c8 1b13 | | Execute Package,Field_Read,Field_Number 0x13
00c9 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00ca e001 | | Load 0x0,0x1
00cb 1b13 | | Execute Package,Field_Read,Field_Number 0x13
00cc 181d | | Execute Package,Field_Execute,Field_Number 0x1d
00cd e407 | | Load 0x2,0x7
00ce 016d | m | Execute Variant_Record,Structure_Write
00cf e003 | | Load 0x0,0x3 ; Debug Table 0x3.0x19 = 0xcf,0xe
00d0 1b11 | | Execute Package,Field_Read,Field_Number 0x11
00d1 e403 | | Load 0x2,0x3
00d2 0120 | | Execute Any,Is_Value
00d3 6803 |h | Jump_Zero 0xd7
00d4 e002 | | Load 0x0,0x2
00d5 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00d6 7801 |x | Jump 0xd8
00d7 e403 | | Load 0x2,0x3
00d8 e402 | | Load 0x2,0x2
00d9 0120 | | Execute Any,Is_Value
00da 6804 |h | Jump_Zero 0xdf
00db e001 | | Load 0x0,0x1
00dc 1b13 | | Execute Package,Field_Read,Field_Number 0x13
00dd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00de 7801 |x | Jump 0xe0
00df e402 | | Load 0x2,0x2
00e0 e408 | | Load 0x2,0x8
00e1 4800 |H | Short_Literal 0x0
00e2 4803 |H | Short_Literal 0x3
00e3 e407 | | Load 0x2,0x7
00e4 e001 | | Load 0x0,0x1
00e5 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00e6 c402 | | Store 0x2,0x2
00e7 c403 | | Store 0x2,0x3
00e8 c404 | | Store 0x2,0x4
00e9 e404 | | Load 0x2,0x4 ; Debug Table 0x3.0x1a = 0xe9,0xf
00ea 6813 |h | Jump_Zero 0xfe
00eb 0092 0c9a | | Action Push_String_Extended,0xc9a ; "can't open unit for overwrite: "
; Debug Table 0x3.0x1b = 0xeb,0x10
00ed e404 | | Load 0x2,0x4
00ee e003 | | Load 0x0,0x3
00ef 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00f0 025e | ^ | Execute Discrete,Convert
00f1 1c01 | | Execute_Immediate Run_Utility,0x1
00f2 01cc | | Execute Vector,Catenate
00f3 0092 0c9b | | Action Push_String_Extended,0xc9b ; ", nothing changed"
00f5 01cc | | Execute Vector,Catenate
00f6 8219 | | Call 0x1,0x19
00f7 e408 | | Load 0x2,0x8 ; Debug Table 0x3.0x1c = 0xf7,0x11
00f8 4801 |H | Short_Literal 0x1
00f9 4800 |H | Short_Literal 0x0
00fa e004 | | Load 0x0,0x4
00fb 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00fc c408 | | Store 0x2,0x8
00fd 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; Debug Table 0x3.0x1d = 0xfd,0x12
00fe e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x1e = 0xfe,0x13
00ff e006 | | Load 0x0,0x6
0100 180f | | Execute Package,Field_Execute,Field_Number 0xf
0101 a405 | | Store_Unchecked 0x2,0x5
0102 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x1f = 0x102,0x14
0103 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0104 4604 |F | Jump_Case 0x5
0105 7837 |x7 | Jump 0x13d ; case 0x0
0106 780f |x | Jump 0x116 ; case 0x1
0107 7802 |x | Jump 0x10a ; case 0x2
0108 7819 |x | Jump 0x122 ; case 0x3
0109 7824 |x$ | Jump 0x12e ; case 0x4
010a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x20 = 0x10a,0x15
010b 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
010c e405 | | Load 0x2,0x5
010d e406 | | Load 0x2,0x6
010e e403 | | Load 0x2,0x3
010f 00eb | | Load_Encached Diana_Cache
0110 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0111 4973 |Is | Short_Literal 0x173
0112 00eb | | Load_Encached Diana_Cache
0113 0098 | | Execute Package,Field_Read_Dynamic
0114 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0115 7827 |x' | Jump 0x13d
0116 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x21 = 0x116,0x16
0117 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
0118 e405 | | Load 0x2,0x5
0119 e406 | | Load 0x2,0x6
011a e403 | | Load 0x2,0x3
011b 00eb | | Load_Encached Diana_Cache
011c 1819 | | Execute Package,Field_Execute,Field_Number 0x19
011d 4973 |Is | Short_Literal 0x173
011e 00eb | | Load_Encached Diana_Cache
011f 0098 | | Execute Package,Field_Read_Dynamic
0120 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0121 781b |x | Jump 0x13d
0122 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x22 = 0x122,0x17
0123 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0124 e405 | | Load 0x2,0x5
0125 e406 | | Load 0x2,0x6
0126 e403 | | Load 0x2,0x3
0127 00eb | | Load_Encached Diana_Cache
0128 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0129 4973 |Is | Short_Literal 0x173
012a 00eb | | Load_Encached Diana_Cache
012b 0098 | | Execute Package,Field_Read_Dynamic
012c 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
012d 780f |x | Jump 0x13d
012e e005 | | Load 0x0,0x5 ; Debug Table 0x3.0x23 = 0x12e,0x18
012f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0130 4800 |H | Short_Literal 0x0
0131 e402 | | Load 0x2,0x2
0132 e001 | | Load 0x0,0x1
0133 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0134 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0135 e406 | | Load 0x2,0x6 ; Debug Table 0x3.0x24 = 0x135,0x19
0136 e403 | | Load 0x2,0x3
0137 00eb | | Load_Encached Diana_Cache
0138 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0139 4972 |Ir | Short_Literal 0x172
013a 00eb | | Load_Encached Diana_Cache
013b 0098 | | Execute Package,Field_Read_Dynamic
013c 180f | | Execute Package,Field_Execute,Field_Number 0xf
013d e003 | | Load 0x0,0x3 ; Debug Table 0x3.0x25 = 0x13d,0x1b
013e 1b11 | | Execute Package,Field_Read,Field_Number 0x11
013f 4800 |H | Short_Literal 0x0
0140 4801 |H | Short_Literal 0x1
0141 e408 | | Load 0x2,0x8
0142 e407 | | Load 0x2,0x7
0143 e001 | | Load 0x0,0x1
0144 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0145 c404 | | Store 0x2,0x4
0146 e404 | | Load 0x2,0x4 ; Debug Table 0x3.0x26 = 0x146,0x1c
0147 6813 |h | Jump_Zero 0x15b
0148 0092 0c9c | | Action Push_String_Extended,0xc9c ; "can't close unit: "
; Debug Table 0x3.0x27 = 0x148,0x1d
014a e404 | | Load 0x2,0x4
014b e003 | | Load 0x0,0x3
014c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
014d 025e | ^ | Execute Discrete,Convert
014e 1c01 | | Execute_Immediate Run_Utility,0x1
014f 01cc | | Execute Vector,Catenate
0150 0092 0c9b | | Action Push_String_Extended,0xc9b ; ", nothing changed"
0152 01cc | | Execute Vector,Catenate
0153 8219 | | Call 0x1,0x19
0154 e408 | | Load 0x2,0x8 ; Debug Table 0x3.0x28 = 0x154,0x1e
0155 4801 |H | Short_Literal 0x1
0156 4800 |H | Short_Literal 0x0
0157 e004 | | Load 0x0,0x4
0158 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0159 c408 | | Store 0x2,0x8
015a 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; Debug Table 0x3.0x29 = 0x15a,0x1f
015b e408 | | Load 0x2,0x8 ; Debug Table 0x3.0x2a = 0x15b,0x20
015c 4801 |H | Short_Literal 0x1
015d 4801 |H | Short_Literal 0x1
015e e004 | | Load 0x0,0x4
015f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0160 c408 | | Store 0x2,0x8
0161 0092 0c9d | | Action Push_String_Extended,0xc9d ; "Added "
; Debug Table 0x3.0x2b = 0x161,0x21
0163 e5ff | | Load 0x2,-0x1
0164 01cc | | Execute Vector,Catenate
0165 0092 0c9e | | Action Push_String_Extended,0xc9e ; " attribute to "
0167 01cc | | Execute Vector,Catenate
0168 e5fe | | Load 0x2,-0x2
0169 01cc | | Execute Vector,Catenate
016a 0092 0c9f | | Action Push_String_Extended,0xc9f ; " with value "
016c 01cc | | Execute Vector,Catenate
016d e5fd | | Load 0x2,-0x3
016e 01cc | | Execute Vector,Catenate
016f 821a | | Call 0x1,0x1a
0170 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0171 TRAP_0060:
0171 0007 | | Action Break_Optional
0172 0092 0ca0 | | Action Push_String_Extended,0xca0 ; "Unexpected exception "
; Debug Table 0x3.0x2c = 0x172,0x22
0174 e007 | | Load 0x0,0x7
0175 180d | | Execute Package,Field_Execute,Field_Number 0xd
0176 01cc | | Execute Vector,Catenate
0177 0092 0ca1 | | Action Push_String_Extended,0xca1 ; " while adding attribute, nothing_changed"
0179 01cc | | Execute Vector,Catenate
017a 8219 | | Call 0x1,0x19
017b e408 | | Load 0x2,0x8 ; Debug Table 0x3.0x2d = 0x17b,0x23
017c 4801 |H | Short_Literal 0x1
017d 4800 |H | Short_Literal 0x0
017e e004 | | Load 0x0,0x4
017f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0180 c408 | | Store 0x2,0x8
0181 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0182 0000 0000 | | .BLANK 0000[0x6]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 01ab | | .CONST 0x01ab ; Address of begin
0189 0250 | P | .CONST 0x0250 ; Address of exception handler
018a 0008 | | .CONST 0x0008 ; Number of locals
018b INIT_0188:
018b 0007 | | Action Break_Optional ; Debug Table 0x4 = .DEBUG 0x018b,0x110e,0x0001,0x0000,0x0038,0xc7e6,0x0000,0x0025
; Debug Table 0x4.0x0 = 0x18b,0xffff
018c e001 | | Load 0x0,0x1 ; Debug Table 0x4.0x1 = 0x18c,0xfffe
018d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
018e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
018f 02c7 | | Declare_Variable Any
0190 00d8 | | Load_Top At_Offset_0
0191 1c00 | | Execute_Immediate Run_Utility,0x0
0192 e002 | | Load 0x0,0x2 ; Debug Table 0x4.0x2 = 0x192,0xfffd
0193 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0194 02c7 | | Declare_Variable Any
0195 00d8 | | Load_Top At_Offset_0
0196 1c00 | | Execute_Immediate Run_Utility,0x0
0197 e003 | | Load 0x0,0x3 ; Debug Table 0x4.0x3 = 0x197,0xfffc
0198 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0199 4973 |Is | Short_Literal 0x173 ; Debug Table 0x4.0x4 = 0x199,0xfffb
019a 00eb | | Load_Encached Diana_Cache
019b 0098 | | Execute Package,Field_Read_Dynamic
019c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
019d 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4.0x5 = 0x19d,0xfffa
019e e001 | | Load 0x0,0x1 ; Debug Table 0x4.0x6 = 0x19e,0xfff9
019f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01a0 02ff | | Declare_Variable Variant_Record
01a1 00d8 | | Load_Top At_Offset_0
01a2 1c00 | | Execute_Immediate Run_Utility,0x0
01a3 e004 | | Load 0x0,0x4 ; Debug Table 0x4.0x7 = 0x1a3,0xfff8
01a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01a5 02c7 | | Declare_Variable Any
01a6 e005 | | Load 0x0,0x5
01a7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01a8 e004 | | Load 0x0,0x4
01a9 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01aa c408 | | Store 0x2,0x8
01ab BODY_0188:
01ab e5ff | | Load 0x2,-0x1 ; Debug Table 0x4.0x8 = 0x1ab,0x1
01ac e006 | | Load 0x0,0x6
01ad 180f | | Execute Package,Field_Execute,Field_Number 0xf
01ae a405 | | Store_Unchecked 0x2,0x5
01af e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0x9 = 0x1af,0x2
01b0 01db | | Execute Vector,Length
01b1 700a |p | Jump_Nonzero 0x1bc
01b2 0092 0ca2 | | Action Push_String_Extended,0xca2 ; "from_node cannot be empty"
; Debug Table 0x4.0xa = 0x1b2,0x3
01b4 8219 | | Call 0x1,0x19
01b5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0xb = 0x1b5,0x4
01b6 4801 |H | Short_Literal 0x1
01b7 4800 |H | Short_Literal 0x0
01b8 e004 | | Load 0x0,0x4
01b9 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01ba c408 | | Store 0x2,0x8
01bb 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x4.0xc = 0x1bb,0x5
01bc e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0xd = 0x1bc,0x6
01bd 8221 | ! | Call 0x1,0x21
01be 0033 | 3 | Store_Top Heap_Access,At_Offset_3
01bf 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0xe = 0x1bf,0x7
01c0 00eb | | Load_Encached Diana_Cache
01c1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01c2 6807 |h | Jump_Zero 0x1ca
01c3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0xf = 0x1c3,0x8
01c4 4801 |H | Short_Literal 0x1
01c5 4800 |H | Short_Literal 0x0
01c6 e004 | | Load 0x0,0x4
01c7 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01c8 c408 | | Store 0x2,0x8
01c9 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x4.0x10 = 0x1c9,0x9
01ca 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x11 = 0x1ca,0xa
01cb 00db | | Load_Top At_Offset_3
01cc 4973 |Is | Short_Literal 0x173
01cd 00eb | | Load_Encached Diana_Cache
01ce 0098 | | Execute Package,Field_Read_Dynamic
01cf 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
01d0 700f |p | Jump_Nonzero 0x1e0
01d1 0092 0ca3 | | Action Push_String_Extended,0xca3 ; "node does not have the "
; Debug Table 0x4.0x12 = 0x1d1,0xb
01d3 e5ff | | Load 0x2,-0x1
01d4 01cc | | Execute Vector,Catenate
01d5 0092 0ca4 | | Action Push_String_Extended,0xca4 ; " attribute"
01d7 01cc | | Execute Vector,Catenate
01d8 8219 | | Call 0x1,0x19
01d9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x13 = 0x1d9,0xc
01da 4801 |H | Short_Literal 0x1
01db 4800 |H | Short_Literal 0x0
01dc e004 | | Load 0x0,0x4
01dd 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01de c408 | | Store 0x2,0x8
01df 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x4.0x14 = 0x1df,0xd
01e0 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x15 = 0x1e0,0xe
01e1 e001 | | Load 0x0,0x1
01e2 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01e3 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01e4 e001 | | Load 0x0,0x1
01e5 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01e6 181d | | Execute Package,Field_Execute,Field_Number 0x1d
01e7 00da | | Load_Top At_Offset_2
01e8 016d | m | Execute Variant_Record,Structure_Write
01e9 e003 | | Load 0x0,0x3 ; Debug Table 0x4.0x16 = 0x1e9,0xf
01ea 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01eb e403 | | Load 0x2,0x3
01ec 0120 | | Execute Any,Is_Value
01ed 6803 |h | Jump_Zero 0x1f1
01ee e002 | | Load 0x0,0x2
01ef 1b14 | | Execute Package,Field_Read,Field_Number 0x14
01f0 7801 |x | Jump 0x1f2
01f1 e403 | | Load 0x2,0x3
01f2 e402 | | Load 0x2,0x2
01f3 0120 | | Execute Any,Is_Value
01f4 6804 |h | Jump_Zero 0x1f9
01f5 e001 | | Load 0x0,0x1
01f6 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01f7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01f8 7801 |x | Jump 0x1fa
01f9 e402 | | Load 0x2,0x2
01fa 00db | | Load_Top At_Offset_3
01fb 4800 |H | Short_Literal 0x0
01fc 4803 |H | Short_Literal 0x3
01fd e407 | | Load 0x2,0x7
01fe e001 | | Load 0x0,0x1
01ff 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0200 c402 | | Store 0x2,0x2
0201 c403 | | Store 0x2,0x3
0202 c404 | | Store 0x2,0x4
0203 e404 | | Load 0x2,0x4 ; Debug Table 0x4.0x17 = 0x203,0x10
0204 6813 |h | Jump_Zero 0x218
0205 0092 0c9a | | Action Push_String_Extended,0xc9a ; "can't open unit for overwrite: "
; Debug Table 0x4.0x18 = 0x205,0x11
0207 e404 | | Load 0x2,0x4
0208 e003 | | Load 0x0,0x3
0209 1b0d | | Execute Package,Field_Read,Field_Number 0xd
020a 025e | ^ | Execute Discrete,Convert
020b 1c01 | | Execute_Immediate Run_Utility,0x1
020c 01cc | | Execute Vector,Catenate
020d 0092 0c9b | | Action Push_String_Extended,0xc9b ; ", nothing changed"
020f 01cc | | Execute Vector,Catenate
0210 8219 | | Call 0x1,0x19
0211 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x19 = 0x211,0x12
0212 4801 |H | Short_Literal 0x1
0213 4800 |H | Short_Literal 0x0
0214 e004 | | Load 0x0,0x4
0215 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0216 c408 | | Store 0x2,0x8
0217 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x4.0x1a = 0x217,0x13
0218 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x1b = 0x218,0x14
0219 00db | | Load_Top At_Offset_3
021a e403 | | Load 0x2,0x3
021b 00eb | | Load_Encached Diana_Cache
021c 1819 | | Execute Package,Field_Execute,Field_Number 0x19
021d 4973 |Is | Short_Literal 0x173
021e 00eb | | Load_Encached Diana_Cache
021f 0098 | | Execute Package,Field_Read_Dynamic
0220 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0221 e003 | | Load 0x0,0x3 ; Debug Table 0x4.0x1c = 0x221,0x15
0222 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0223 4800 |H | Short_Literal 0x0
0224 4801 |H | Short_Literal 0x1
0225 00db | | Load_Top At_Offset_3
0226 e407 | | Load 0x2,0x7
0227 e001 | | Load 0x0,0x1
0228 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0229 c404 | | Store 0x2,0x4
022a e404 | | Load 0x2,0x4 ; Debug Table 0x4.0x1d = 0x22a,0x16
022b 6813 |h | Jump_Zero 0x23f
022c 0092 0c9c | | Action Push_String_Extended,0xc9c ; "can't close unit: "
; Debug Table 0x4.0x1e = 0x22c,0x17
022e e404 | | Load 0x2,0x4
022f e003 | | Load 0x0,0x3
0230 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0231 025e | ^ | Execute Discrete,Convert
0232 1c01 | | Execute_Immediate Run_Utility,0x1
0233 01cc | | Execute Vector,Catenate
0234 0092 0c9b | | Action Push_String_Extended,0xc9b ; ", nothing changed"
0236 01cc | | Execute Vector,Catenate
0237 8219 | | Call 0x1,0x19
0238 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x1f = 0x238,0x18
0239 4801 |H | Short_Literal 0x1
023a 4800 |H | Short_Literal 0x0
023b e004 | | Load 0x0,0x4
023c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
023d c408 | | Store 0x2,0x8
023e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x4.0x20 = 0x23e,0x19
023f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x21 = 0x23f,0x1a
0240 4801 |H | Short_Literal 0x1
0241 4801 |H | Short_Literal 0x1
0242 e004 | | Load 0x0,0x4
0243 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0244 c408 | | Store 0x2,0x8
0245 0092 0ca5 | | Action Push_String_Extended,0xca5 ; "Removed "
; Debug Table 0x4.0x22 = 0x245,0x1b
0247 e5ff | | Load 0x2,-0x1
0248 01cc | | Execute Vector,Catenate
0249 0092 0ca6 | | Action Push_String_Extended,0xca6 ; " attribute from "
024b 01cc | | Execute Vector,Catenate
024c e5fe | | Load 0x2,-0x2
024d 01cc | | Execute Vector,Catenate
024e 821a | | Call 0x1,0x1a
024f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0250 TRAP_0188:
0250 0007 | | Action Break_Optional
0251 0092 0ca7 | | Action Push_String_Extended,0xca7 ; "Unexpected exception while removing attribute"
; Debug Table 0x4.0x23 = 0x251,0x1c
0253 8219 | | Call 0x1,0x19
0254 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x24 = 0x254,0x1d
0255 4801 |H | Short_Literal 0x1
0256 4800 |H | Short_Literal 0x0
0257 e004 | | Load 0x0,0x4
0258 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0259 c408 | | Store 0x2,0x8
025a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
025b 0000 0000 | | .BLANK 0000[0x5]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 028d | | .CONST 0x028d ; Address of begin
0261 0356 | V | .CONST 0x0356 ; Address of exception handler
0262 000b | | .CONST 0x000b ; Number of locals
0263 INIT_0260:
0263 e001 | | Load 0x0,0x1 ; Debug Table 0x5 = .DEBUG 0x0263,0x115a,0x0001,0x0000,0x0038,0xc7e6,0x0000,0x0031
; Debug Table 0x5.0x0 = 0x263,0xffff
0264 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0265 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0266 02c7 | | Declare_Variable Any
0267 00d8 | | Load_Top At_Offset_0
0268 1c00 | | Execute_Immediate Run_Utility,0x0
0269 e002 | | Load 0x0,0x2 ; Debug Table 0x5.0x1 = 0x269,0xfffe
026a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
026b 02c7 | | Declare_Variable Any
026c 00d8 | | Load_Top At_Offset_0
026d 1c00 | | Execute_Immediate Run_Utility,0x0
026e e003 | | Load 0x0,0x3 ; Debug Table 0x5.0x2 = 0x26e,0xfffd
026f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0270 e008 | | Load 0x0,0x8 ; Debug Table 0x5.0x3 = 0x270,0xfffc
0271 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0272 02ff | | Declare_Variable Variant_Record
0273 00d8 | | Load_Top At_Offset_0
0274 1c00 | | Execute_Immediate Run_Utility,0x0
0275 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0x4 = 0x275,0xfffb
0276 e001 | | Load 0x0,0x1 ; Debug Table 0x5.0x5 = 0x276,0xfffa
0277 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0278 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0279 02c7 | | Declare_Variable Any
027a 00d8 | | Load_Top At_Offset_0
027b 1c00 | | Execute_Immediate Run_Utility,0x0
027c 4973 |Is | Short_Literal 0x173 ; Debug Table 0x5.0x6 = 0x27c,0xfff9
027d 00eb | | Load_Encached Diana_Cache
027e 0098 | | Execute Package,Field_Read_Dynamic
027f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0280 e008 | | Load 0x0,0x8 ; Debug Table 0x5.0x7 = 0x280,0xfff8
0281 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0282 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0283 e004 | | Load 0x0,0x4 ; Debug Table 0x5.0x8 = 0x283,0xfff7
0284 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0285 02c7 | | Declare_Variable Any
0286 e005 | | Load 0x0,0x5
0287 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0288 e004 | | Load 0x0,0x4
0289 1814 | | Execute Package,Field_Execute,Field_Number 0x14
028a c40a | | Store 0x2,0xa
028b 029f 0a33 | 3| Declare_Subprogram INIT_0a30,For_Call ; Debug Table 0x5.0x9 = 0x28b,0xfff6
028d BODY_0260:
028d e005 | | Load 0x0,0x5 ; Debug Table 0x5.0xa = 0x28d,0x1
028e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
028f 4800 |H | Short_Literal 0x0
0290 e001 | | Load 0x0,0x1
0291 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0292 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0293 c407 | | Store 0x2,0x7
0294 0092 0ca8 | | Action Push_String_Extended,0xca8 ; "SM_READ_ONLY"
; Debug Table 0x5.0xb = 0x294,0x2
0296 e006 | | Load 0x0,0x6
0297 180f | | Execute Package,Field_Execute,Field_Number 0xf
0298 a408 | | Store_Unchecked 0x2,0x8
0299 e008 | | Load 0x0,0x8 ; Debug Table 0x5.0xc = 0x299,0x3
029a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
029b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
029c e405 | | Load 0x2,0x5
029d 62c6 |b | Indirect_Literal Discrete,0x564,{0x00000000, 0x00028000}
029e e004 | | Load 0x0,0x4
029f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02a0 4800 |H | Short_Literal 0x0
02a1 e009 | | Load 0x0,0x9
02a2 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02a3 e008 | | Load 0x0,0x8
02a4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02a5 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02a6 e5ff | | Load 0x2,-0x1
02a7 e008 | | Load 0x0,0x8
02a8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02a9 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
02aa 00d1 | | Pop_Control Pop_Count_1
02ab 005b | [ | Store_Top Discrete,At_Offset_3
02ac 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0xd = 0x2ac,0x4
02ad 6816 |h | Jump_Zero 0x2c4
02ae 0092 0ca9 | | Action Push_String_Extended,0xca9 ; "can't resolve \x22"
; Debug Table 0x5.0xe = 0x2ae,0x5
02b0 e5ff | | Load 0x2,-0x1
02b1 01cc | | Execute Vector,Catenate
02b2 0092 0caa | | Action Push_String_Extended,0xcaa ; "\x22: "
02b4 01cc | | Execute Vector,Catenate
02b5 00db | | Load_Top At_Offset_3
02b6 e008 | | Load 0x0,0x8
02b7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02b8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02b9 025e | ^ | Execute Discrete,Convert
02ba 1c01 | | Execute_Immediate Run_Utility,0x1
02bb 01cc | | Execute Vector,Catenate
02bc 8219 | | Call 0x1,0x19
02bd 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0xf = 0x2bd,0x6
02be 4801 |H | Short_Literal 0x1
02bf 4800 |H | Short_Literal 0x0
02c0 e004 | | Load 0x0,0x4
02c1 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02c2 c40a | | Store 0x2,0xa
02c3 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x5.0x10 = 0x2c3,0x7
02c4 e003 | | Load 0x0,0x3 ; Debug Table 0x5.0x11 = 0x2c4,0x8
02c5 1b11 | | Execute Package,Field_Read,Field_Number 0x11
02c6 e403 | | Load 0x2,0x3
02c7 0120 | | Execute Any,Is_Value
02c8 6803 |h | Jump_Zero 0x2cc
02c9 e002 | | Load 0x0,0x2
02ca 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02cb 7801 |x | Jump 0x2cd
02cc e403 | | Load 0x2,0x3
02cd e402 | | Load 0x2,0x2
02ce 0120 | | Execute Any,Is_Value
02cf 6804 |h | Jump_Zero 0x2d4
02d0 e001 | | Load 0x0,0x1
02d1 1b13 | | Execute Package,Field_Read,Field_Number 0x13
02d2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02d3 7801 |x | Jump 0x2d5
02d4 e402 | | Load 0x2,0x2
02d5 e40a | | Load 0x2,0xa
02d6 4800 |H | Short_Literal 0x0
02d7 4803 |H | Short_Literal 0x3
02d8 e405 | | Load 0x2,0x5
02d9 e001 | | Load 0x0,0x1
02da 181b | | Execute Package,Field_Execute,Field_Number 0x1b
02db c402 | | Store 0x2,0x2
02dc c403 | | Store 0x2,0x3
02dd c404 | | Store 0x2,0x4
02de e404 | | Load 0x2,0x4 ; Debug Table 0x5.0x12 = 0x2de,0x9
02df 6813 |h | Jump_Zero 0x2f3
02e0 0092 0c9a | | Action Push_String_Extended,0xc9a ; "can't open unit for overwrite: "
; Debug Table 0x5.0x13 = 0x2e0,0xa
02e2 e404 | | Load 0x2,0x4
02e3 e003 | | Load 0x0,0x3
02e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02e5 025e | ^ | Execute Discrete,Convert
02e6 1c01 | | Execute_Immediate Run_Utility,0x1
02e7 01cc | | Execute Vector,Catenate
02e8 0092 0c9b | | Action Push_String_Extended,0xc9b ; ", nothing changed"
02ea 01cc | | Execute Vector,Catenate
02eb 8219 | | Call 0x1,0x19
02ec 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x14 = 0x2ec,0xb
02ed 4801 |H | Short_Literal 0x1
02ee 4800 |H | Short_Literal 0x0
02ef e004 | | Load 0x0,0x4
02f0 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02f1 c40a | | Store 0x2,0xa
02f2 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x5.0x15 = 0x2f2,0xc
02f3 e005 | | Load 0x0,0x5 ; Debug Table 0x5.0x16 = 0x2f3,0xd
02f4 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02f5 4800 |H | Short_Literal 0x0
02f6 e402 | | Load 0x2,0x2
02f7 e001 | | Load 0x0,0x1
02f8 1b13 | | Execute Package,Field_Read,Field_Number 0x13
02f9 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
02fa e402 | | Load 0x2,0x2 ; Debug Table 0x5.0x17 = 0x2fa,0xe
02fb e001 | | Load 0x0,0x1
02fc 1b13 | | Execute Package,Field_Read,Field_Number 0x13
02fd 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02fe a406 | | Store_Unchecked 0x2,0x6
02ff 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x18 = 0x2ff,0xf
0300 e406 | | Load 0x2,0x6
0301 4973 |Is | Short_Literal 0x173
0302 00eb | | Load_Encached Diana_Cache
0303 0098 | | Execute Package,Field_Read_Dynamic
0304 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
0305 680f |h | Jump_Zero 0x315
0306 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x19 = 0x306,0x10
0307 e406 | | Load 0x2,0x6
0308 4973 |Is | Short_Literal 0x173
0309 00eb | | Load_Encached Diana_Cache
030a 0098 | | Execute Package,Field_Read_Dynamic
030b 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
030c 0092 0cab | | Action Push_String_Extended,0xcab ; "Removed read_only attribute from "
; Debug Table 0x5.0x1a = 0x30c,0x11
030e e405 | | Load 0x2,0x5
030f e008 | | Load 0x0,0x8
0310 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0311 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
0312 01cc | | Execute Vector,Catenate
0313 821a | | Call 0x1,0x1a
0314 780b |x | Jump 0x320
0315 0092 0cac | | Action Push_String_Extended,0xcac ; "unit "
; Debug Table 0x5.0x1b = 0x315,0x12
0317 e405 | | Load 0x2,0x5
0318 e008 | | Load 0x0,0x8
0319 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
031a 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
031b 01cc | | Execute Vector,Catenate
031c 0092 0cad | | Action Push_String_Extended,0xcad ; " does not have a read_only attribute"
031e 01cc | | Execute Vector,Catenate
031f 8219 | | Call 0x1,0x19
0320 e5fe | | Load 0x2,-0x2 ; Debug Table 0x5.0x1c = 0x320,0x13
0321 6801 |h | Jump_Zero 0x323
0322 840b | | Call 0x2,0xb ; Debug Table 0x5.0x1d = 0x322,0x14
0323 e003 | | Load 0x0,0x3 ; Debug Table 0x5.0x1e = 0x323,0x15
0324 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0325 4800 |H | Short_Literal 0x0
0326 4801 |H | Short_Literal 0x1
0327 e40a | | Load 0x2,0xa
0328 e405 | | Load 0x2,0x5
0329 e001 | | Load 0x0,0x1
032a 181c | | Execute Package,Field_Execute,Field_Number 0x1c
032b c404 | | Store 0x2,0x4
032c e404 | | Load 0x2,0x4 ; Debug Table 0x5.0x1f = 0x32c,0x16
032d 681a |h | Jump_Zero 0x348
032e 0092 0c9c | | Action Push_String_Extended,0xc9c ; "can't close unit: "
; Debug Table 0x5.0x20 = 0x32e,0x17
0330 e404 | | Load 0x2,0x4
0331 e003 | | Load 0x0,0x3
0332 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0333 025e | ^ | Execute Discrete,Convert
0334 1c01 | | Execute_Immediate Run_Utility,0x1
0335 01cc | | Execute Vector,Catenate
0336 0092 0c9b | | Action Push_String_Extended,0xc9b ; ", nothing changed"
0338 01cc | | Execute Vector,Catenate
0339 8219 | | Call 0x1,0x19
033a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x21 = 0x33a,0x18
033b 4801 |H | Short_Literal 0x1
033c 4800 |H | Short_Literal 0x0
033d e004 | | Load 0x0,0x4
033e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
033f c40a | | Store 0x2,0xa
0340 e005 | | Load 0x0,0x5 ; Debug Table 0x5.0x22 = 0x340,0x19
0341 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0342 4800 |H | Short_Literal 0x0
0343 e407 | | Load 0x2,0x7
0344 e001 | | Load 0x0,0x1
0345 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0346 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0347 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x5.0x23 = 0x347,0x1a
0348 e005 | | Load 0x0,0x5 ; Debug Table 0x5.0x24 = 0x348,0x1b
0349 1810 | | Execute Package,Field_Execute,Field_Number 0x10
034a 4800 |H | Short_Literal 0x0
034b e407 | | Load 0x2,0x7
034c e001 | | Load 0x0,0x1
034d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
034e 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
034f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x25 = 0x34f,0x1c
0350 4801 |H | Short_Literal 0x1
0351 4801 |H | Short_Literal 0x1
0352 e004 | | Load 0x0,0x4
0353 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0354 c40a | | Store 0x2,0xa
0355 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0356 TRAP_0260:
0356 0007 | | Action Break_Optional
0357 0092 0cae | | Action Push_String_Extended,0xcae ; "Unexpected exception while removing read_only attribute from "
; Debug Table 0x5.0x26 = 0x357,0x1d
0359 e405 | | Load 0x2,0x5
035a e008 | | Load 0x0,0x8
035b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
035c 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
035d 01cc | | Execute Vector,Catenate
035e 8219 | | Call 0x1,0x19
035f e005 | | Load 0x0,0x5 ; Debug Table 0x5.0x27 = 0x35f,0x1e
0360 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0361 4800 |H | Short_Literal 0x0
0362 e407 | | Load 0x2,0x7
0363 e001 | | Load 0x0,0x1
0364 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0365 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0366 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x28 = 0x366,0x1f
0367 4801 |H | Short_Literal 0x1
0368 4800 |H | Short_Literal 0x0
0369 e004 | | Load 0x0,0x4
036a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
036b c40a | | Store 0x2,0xa
036c 4503 |E | Exit_Suprogram New_Top_Offset 0x3
036d 0000 0000 | | .XXX[0x3]
036f 0000 | |
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 039f | | .CONST 0x039f ; Address of begin
0371 0456 | V | .CONST 0x0456 ; Address of exception handler
0372 000c | | .CONST 0x000c ; Number of locals
0373 INIT_0370:
0373 e001 | | Load 0x0,0x1 ; Debug Table 0x6 = .DEBUG 0x0373,0x11ae,0x0001,0x0000,0x0038,0xc7e6,0x0000,0x003e
; Debug Table 0x6.0x0 = 0x373,0xffff
0374 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0375 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0376 02c7 | | Declare_Variable Any
0377 00d8 | | Load_Top At_Offset_0
0378 1c00 | | Execute_Immediate Run_Utility,0x0
0379 e002 | | Load 0x0,0x2 ; Debug Table 0x6.0x1 = 0x379,0xfffe
037a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
037b 02c7 | | Declare_Variable Any
037c 00d8 | | Load_Top At_Offset_0
037d 1c00 | | Execute_Immediate Run_Utility,0x0
037e e003 | | Load 0x0,0x3 ; Debug Table 0x6.0x2 = 0x37e,0xfffd
037f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0380 e008 | | Load 0x0,0x8 ; Debug Table 0x6.0x3 = 0x380,0xfffc
0381 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0382 02ff | | Declare_Variable Variant_Record
0383 00d8 | | Load_Top At_Offset_0
0384 1c00 | | Execute_Immediate Run_Utility,0x0
0385 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x6.0x4 = 0x385,0xfffb
0386 e001 | | Load 0x0,0x1 ; Debug Table 0x6.0x5 = 0x386,0xfffa
0387 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0388 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0389 02c7 | | Declare_Variable Any
038a 00d8 | | Load_Top At_Offset_0
038b 1c00 | | Execute_Immediate Run_Utility,0x0
038c 4973 |Is | Short_Literal 0x173 ; Debug Table 0x6.0x6 = 0x38c,0xfff9
038d 00eb | | Load_Encached Diana_Cache
038e 0098 | | Execute Package,Field_Read_Dynamic
038f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0390 e008 | | Load 0x0,0x8 ; Debug Table 0x6.0x7 = 0x390,0xfff8
0391 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0392 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0393 e004 | | Load 0x0,0x4 ; Debug Table 0x6.0x8 = 0x393,0xfff7
0394 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0395 02c7 | | Declare_Variable Any
0396 e005 | | Load 0x0,0x5
0397 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0398 e004 | | Load 0x0,0x4
0399 1814 | | Execute Package,Field_Execute,Field_Number 0x14
039a c40a | | Store 0x2,0xa
039b 029f 0ad3 | | Declare_Subprogram INIT_0ad0,For_Call ; Debug Table 0x6.0x9 = 0x39b,0xfff6
039d 029f 0ae3 | | Declare_Subprogram INIT_0ae0,For_Call ; Debug Table 0x6.0xa = 0x39d,0xfff5
039f BODY_0370:
039f e005 | | Load 0x0,0x5 ; Debug Table 0x6.0xb = 0x39f,0x1
03a0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03a1 4800 |H | Short_Literal 0x0
03a2 e001 | | Load 0x0,0x1
03a3 1b13 | | Execute Package,Field_Read,Field_Number 0x13
03a4 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
03a5 c407 | | Store 0x2,0x7
03a6 0092 0ca8 | | Action Push_String_Extended,0xca8 ; "SM_READ_ONLY"
; Debug Table 0x6.0xc = 0x3a6,0x2
03a8 e006 | | Load 0x0,0x6
03a9 180f | | Execute Package,Field_Execute,Field_Number 0xf
03aa a408 | | Store_Unchecked 0x2,0x8
03ab e008 | | Load 0x0,0x8 ; Debug Table 0x6.0xd = 0x3ab,0x3
03ac 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03ad 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03ae e405 | | Load 0x2,0x5
03af 61b4 |a | Indirect_Literal Discrete,0x564,{0x00000000, 0x00028000}
03b0 e004 | | Load 0x0,0x4
03b1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03b2 4800 |H | Short_Literal 0x0
03b3 e009 | | Load 0x0,0x9
03b4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03b5 e008 | | Load 0x0,0x8
03b6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03b7 1816 | | Execute Package,Field_Execute,Field_Number 0x16
03b8 e5ff | | Load 0x2,-0x1
03b9 e008 | | Load 0x0,0x8
03ba 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03bb 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
03bc 00d1 | | Pop_Control Pop_Count_1
03bd c409 | | Store 0x2,0x9
03be 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0xe = 0x3be,0x4
03bf 6816 |h | Jump_Zero 0x3d6
03c0 0092 0ca9 | | Action Push_String_Extended,0xca9 ; "can't resolve \x22"
; Debug Table 0x6.0xf = 0x3c0,0x5
03c2 e5ff | | Load 0x2,-0x1
03c3 01cc | | Execute Vector,Catenate
03c4 0092 0caa | | Action Push_String_Extended,0xcaa ; "\x22: "
03c6 01cc | | Execute Vector,Catenate
03c7 e409 | | Load 0x2,0x9
03c8 e008 | | Load 0x0,0x8
03c9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03ca 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03cb 025e | ^ | Execute Discrete,Convert
03cc 1c01 | | Execute_Immediate Run_Utility,0x1
03cd 01cc | | Execute Vector,Catenate
03ce 8219 | | Call 0x1,0x19
03cf 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x10 = 0x3cf,0x6
03d0 4801 |H | Short_Literal 0x1
03d1 4800 |H | Short_Literal 0x0
03d2 e004 | | Load 0x0,0x4
03d3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
03d4 c40a | | Store 0x2,0xa
03d5 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x6.0x11 = 0x3d5,0x7
03d6 e003 | | Load 0x0,0x3 ; Debug Table 0x6.0x12 = 0x3d6,0x8
03d7 1b11 | | Execute Package,Field_Read,Field_Number 0x11
03d8 e403 | | Load 0x2,0x3
03d9 0120 | | Execute Any,Is_Value
03da 6803 |h | Jump_Zero 0x3de
03db e002 | | Load 0x0,0x2
03dc 1b14 | | Execute Package,Field_Read,Field_Number 0x14
03dd 7801 |x | Jump 0x3df
03de e403 | | Load 0x2,0x3
03df e402 | | Load 0x2,0x2
03e0 0120 | | Execute Any,Is_Value
03e1 6804 |h | Jump_Zero 0x3e6
03e2 e001 | | Load 0x0,0x1
03e3 1b13 | | Execute Package,Field_Read,Field_Number 0x13
03e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03e5 7801 |x | Jump 0x3e7
03e6 e402 | | Load 0x2,0x2
03e7 e40a | | Load 0x2,0xa
03e8 4800 |H | Short_Literal 0x0
03e9 4803 |H | Short_Literal 0x3
03ea e405 | | Load 0x2,0x5
03eb e001 | | Load 0x0,0x1
03ec 181b | | Execute Package,Field_Execute,Field_Number 0x1b
03ed c402 | | Store 0x2,0x2
03ee c403 | | Store 0x2,0x3
03ef c404 | | Store 0x2,0x4
03f0 e404 | | Load 0x2,0x4 ; Debug Table 0x6.0x13 = 0x3f0,0x9
03f1 6813 |h | Jump_Zero 0x405
03f2 0092 0c9a | | Action Push_String_Extended,0xc9a ; "can't open unit for overwrite: "
; Debug Table 0x6.0x14 = 0x3f2,0xa
03f4 e404 | | Load 0x2,0x4
03f5 e003 | | Load 0x0,0x3
03f6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03f7 025e | ^ | Execute Discrete,Convert
03f8 1c01 | | Execute_Immediate Run_Utility,0x1
03f9 01cc | | Execute Vector,Catenate
03fa 0092 0c9b | | Action Push_String_Extended,0xc9b ; ", nothing changed"
03fc 01cc | | Execute Vector,Catenate
03fd 8219 | | Call 0x1,0x19
03fe 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x15 = 0x3fe,0xb
03ff 4801 |H | Short_Literal 0x1
0400 4800 |H | Short_Literal 0x0
0401 e004 | | Load 0x0,0x4
0402 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0403 c40a | | Store 0x2,0xa
0404 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x6.0x16 = 0x404,0xc
0405 e005 | | Load 0x0,0x5 ; Debug Table 0x6.0x17 = 0x405,0xd
0406 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0407 4800 |H | Short_Literal 0x0
0408 e402 | | Load 0x2,0x2
0409 e001 | | Load 0x0,0x1
040a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
040b 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
040c e402 | | Load 0x2,0x2 ; Debug Table 0x6.0x18 = 0x40c,0xe
040d e001 | | Load 0x0,0x1
040e 1b13 | | Execute Package,Field_Read,Field_Number 0x13
040f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0410 a406 | | Store_Unchecked 0x2,0x6
0411 4801 |H | Short_Literal 0x1 ; Debug Table 0x6.0x19 = 0x411,0xf
0412 e408 | | Load 0x2,0x8
0413 e406 | | Load 0x2,0x6
0414 4973 |Is | Short_Literal 0x173
0415 00eb | | Load_Encached Diana_Cache
0416 0098 | | Execute Package,Field_Read_Dynamic
0417 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0418 0092 0caf | | Action Push_String_Extended,0xcaf ; "added read_only attribute to "
; Debug Table 0x6.0x1a = 0x418,0x10
041a e405 | | Load 0x2,0x5
041b e008 | | Load 0x0,0x8
041c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
041d 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
041e 01cc | | Execute Vector,Catenate
041f 821a | | Call 0x1,0x1a
0420 e5fe | | Load 0x2,-0x2 ; Debug Table 0x6.0x1b = 0x420,0x11
0421 6801 |h | Jump_Zero 0x423
0422 840c | | Call 0x2,0xc ; Debug Table 0x6.0x1c = 0x422,0x12
0423 e003 | | Load 0x0,0x3 ; Debug Table 0x6.0x1d = 0x423,0x13
0424 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0425 4800 |H | Short_Literal 0x0
0426 4801 |H | Short_Literal 0x1
0427 e40a | | Load 0x2,0xa
0428 e405 | | Load 0x2,0x5
0429 e001 | | Load 0x0,0x1
042a 181c | | Execute Package,Field_Execute,Field_Number 0x1c
042b c404 | | Store 0x2,0x4
042c e404 | | Load 0x2,0x4 ; Debug Table 0x6.0x1e = 0x42c,0x14
042d 681a |h | Jump_Zero 0x448
042e 0092 0c9c | | Action Push_String_Extended,0xc9c ; "can't close unit: "
; Debug Table 0x6.0x1f = 0x42e,0x15
0430 e404 | | Load 0x2,0x4
0431 e003 | | Load 0x0,0x3
0432 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0433 025e | ^ | Execute Discrete,Convert
0434 1c01 | | Execute_Immediate Run_Utility,0x1
0435 01cc | | Execute Vector,Catenate
0436 0092 0c9b | | Action Push_String_Extended,0xc9b ; ", nothing changed"
0438 01cc | | Execute Vector,Catenate
0439 8219 | | Call 0x1,0x19
043a 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x20 = 0x43a,0x16
043b 4801 |H | Short_Literal 0x1
043c 4800 |H | Short_Literal 0x0
043d e004 | | Load 0x0,0x4
043e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
043f c40a | | Store 0x2,0xa
0440 e005 | | Load 0x0,0x5 ; Debug Table 0x6.0x21 = 0x440,0x17
0441 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0442 4800 |H | Short_Literal 0x0
0443 e407 | | Load 0x2,0x7
0444 e001 | | Load 0x0,0x1
0445 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0446 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0447 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x6.0x22 = 0x447,0x18
0448 e005 | | Load 0x0,0x5 ; Debug Table 0x6.0x23 = 0x448,0x19
0449 1810 | | Execute Package,Field_Execute,Field_Number 0x10
044a 4800 |H | Short_Literal 0x0
044b e407 | | Load 0x2,0x7
044c e001 | | Load 0x0,0x1
044d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
044e 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
044f 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x24 = 0x44f,0x1a
0450 4801 |H | Short_Literal 0x1
0451 4801 |H | Short_Literal 0x1
0452 e004 | | Load 0x0,0x4
0453 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0454 c40a | | Store 0x2,0xa
0455 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0456 TRAP_0370:
0456 0007 | | Action Break_Optional
0457 0092 0cb0 | | Action Push_String_Extended,0xcb0 ; "Unexpected exception while adding read_only attribute to "
; Debug Table 0x6.0x25 = 0x457,0x1b
0459 e405 | | Load 0x2,0x5
045a e008 | | Load 0x0,0x8
045b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
045c 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
045d 01cc | | Execute Vector,Catenate
045e 8219 | | Call 0x1,0x19
045f e005 | | Load 0x0,0x5 ; Debug Table 0x6.0x26 = 0x45f,0x1c
0460 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0461 4800 |H | Short_Literal 0x0
0462 e407 | | Load 0x2,0x7
0463 e001 | | Load 0x0,0x1
0464 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0465 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0466 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x27 = 0x466,0x1d
0467 4801 |H | Short_Literal 0x1
0468 4800 |H | Short_Literal 0x0
0469 e004 | | Load 0x0,0x4
046a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
046b c40a | | Store 0x2,0xa
046c 4503 |E | Exit_Suprogram New_Top_Offset 0x3
046d 0000 0000 | | .XXX[0x3]
046f 0000 | |
0470 ; --------------------------------------------------------------------------------------
0470 ; SUBPROGRAM
0470 ; --------------------------------------------------------------------------------------
0470 0491 | | .CONST 0x0491 ; Address of begin
0471 051d | | .CONST 0x051d ; Address of exception handler
0472 0007 | | .CONST 0x0007 ; Number of locals
0473 INIT_0470:
0473 0007 | | Action Break_Optional ; Debug Table 0x7 = .DEBUG 0x0473,0x1200,0x0001,0x0000,0x0038,0xc7e6,0x0000,0x004b
; Debug Table 0x7.0x0 = 0x473,0xffff
0474 e001 | | Load 0x0,0x1 ; Debug Table 0x7.0x1 = 0x474,0xfffe
0475 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0476 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0477 02c7 | | Declare_Variable Any
0478 00d8 | | Load_Top At_Offset_0
0479 1c00 | | Execute_Immediate Run_Utility,0x0
047a e002 | | Load 0x0,0x2 ; Debug Table 0x7.0x2 = 0x47a,0xfffd
047b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
047c 02c7 | | Declare_Variable Any
047d 00d8 | | Load_Top At_Offset_0
047e 1c00 | | Execute_Immediate Run_Utility,0x0
047f e003 | | Load 0x0,0x3 ; Debug Table 0x7.0x3 = 0x47f,0xfffc
0480 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0481 e008 | | Load 0x0,0x8 ; Debug Table 0x7.0x4 = 0x481,0xfffb
0482 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0483 02ff | | Declare_Variable Variant_Record
0484 00d8 | | Load_Top At_Offset_0
0485 1c00 | | Execute_Immediate Run_Utility,0x0
0486 e008 | | Load 0x0,0x8 ; Debug Table 0x7.0x5 = 0x486,0xfffa
0487 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0488 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0489 e004 | | Load 0x0,0x4 ; Debug Table 0x7.0x6 = 0x489,0xfff9
048a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
048b 02c7 | | Declare_Variable Any
048c e005 | | Load 0x0,0x5
048d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
048e e004 | | Load 0x0,0x4
048f 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0490 c407 | | Store 0x2,0x7
0491 BODY_0470:
0491 e008 | | Load 0x0,0x8 ; Debug Table 0x7.0x7 = 0x491,0x1
0492 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0493 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0494 00db | | Load_Top At_Offset_3
0495 60ce |` | Indirect_Literal Discrete,0x564,{0x00000000, 0x00028000}
0496 e004 | | Load 0x0,0x4
0497 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0498 4800 |H | Short_Literal 0x0
0499 e009 | | Load 0x0,0x9
049a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
049b e008 | | Load 0x0,0x8
049c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
049d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
049e e5ff | | Load 0x2,-0x1
049f e008 | | Load 0x0,0x8
04a0 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04a1 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
04a2 00d1 | | Pop_Control Pop_Count_1
04a3 005a | Z | Store_Top Discrete,At_Offset_2
04a4 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x7.0x8 = 0x4a4,0x2
04a5 6816 |h | Jump_Zero 0x4bc
04a6 0092 0ca9 | | Action Push_String_Extended,0xca9 ; "can't resolve \x22"
; Debug Table 0x7.0x9 = 0x4a6,0x3
04a8 e5ff | | Load 0x2,-0x1
04a9 01cc | | Execute Vector,Catenate
04aa 0092 0caa | | Action Push_String_Extended,0xcaa ; "\x22: "
04ac 01cc | | Execute Vector,Catenate
04ad 00da | | Load_Top At_Offset_2
04ae e008 | | Load 0x0,0x8
04af 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04b0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04b1 025e | ^ | Execute Discrete,Convert
04b2 1c01 | | Execute_Immediate Run_Utility,0x1
04b3 01cc | | Execute Vector,Catenate
04b4 8219 | | Call 0x1,0x19
04b5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0xa = 0x4b5,0x4
04b6 4801 |H | Short_Literal 0x1
04b7 4800 |H | Short_Literal 0x0
04b8 e004 | | Load 0x0,0x4
04b9 1818 | | Execute Package,Field_Execute,Field_Number 0x18
04ba c407 | | Store 0x2,0x7
04bb 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x7.0xb = 0x4bb,0x5
04bc e003 | | Load 0x0,0x3 ; Debug Table 0x7.0xc = 0x4bc,0x6
04bd 1b11 | | Execute Package,Field_Read,Field_Number 0x11
04be e403 | | Load 0x2,0x3
04bf 0120 | | Execute Any,Is_Value
04c0 6803 |h | Jump_Zero 0x4c4
04c1 e002 | | Load 0x0,0x2
04c2 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04c3 7801 |x | Jump 0x4c5
04c4 e403 | | Load 0x2,0x3
04c5 e402 | | Load 0x2,0x2
04c6 0120 | | Execute Any,Is_Value
04c7 6804 |h | Jump_Zero 0x4cc
04c8 e001 | | Load 0x0,0x1
04c9 1b13 | | Execute Package,Field_Read,Field_Number 0x13
04ca 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04cb 7801 |x | Jump 0x4cd
04cc e402 | | Load 0x2,0x2
04cd 00db | | Load_Top At_Offset_3
04ce 4800 |H | Short_Literal 0x0
04cf 4803 |H | Short_Literal 0x3
04d0 e405 | | Load 0x2,0x5
04d1 e001 | | Load 0x0,0x1
04d2 181b | | Execute Package,Field_Execute,Field_Number 0x1b
04d3 c402 | | Store 0x2,0x2
04d4 c403 | | Store 0x2,0x3
04d5 c404 | | Store 0x2,0x4
04d6 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0xd = 0x4d6,0x7
04d7 6813 |h | Jump_Zero 0x4eb
04d8 0092 0c9a | | Action Push_String_Extended,0xc9a ; "can't open unit for overwrite: "
; Debug Table 0x7.0xe = 0x4d8,0x8
04da e404 | | Load 0x2,0x4
04db e003 | | Load 0x0,0x3
04dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04dd 025e | ^ | Execute Discrete,Convert
04de 1c01 | | Execute_Immediate Run_Utility,0x1
04df 01cc | | Execute Vector,Catenate
04e0 0092 0c9b | | Action Push_String_Extended,0xc9b ; ", nothing changed"
04e2 01cc | | Execute Vector,Catenate
04e3 8219 | | Call 0x1,0x19
04e4 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0xf = 0x4e4,0x9
04e5 4801 |H | Short_Literal 0x1
04e6 4800 |H | Short_Literal 0x0
04e7 e004 | | Load 0x0,0x4
04e8 1818 | | Execute Package,Field_Execute,Field_Number 0x18
04e9 c407 | | Store 0x2,0x7
04ea 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x7.0x10 = 0x4ea,0xa
04eb 4802 |H | Short_Literal 0x2 ; Debug Table 0x7.0x11 = 0x4eb,0xb
04ec e402 | | Load 0x2,0x2
04ed e001 | | Load 0x0,0x1
04ee 1b13 | | Execute Package,Field_Read,Field_Number 0x13
04ef 1820 | | Execute Package,Field_Execute,Field_Number 0x20
04f0 e003 | | Load 0x0,0x3 ; Debug Table 0x7.0x12 = 0x4f0,0xc
04f1 1b11 | | Execute Package,Field_Read,Field_Number 0x11
04f2 4800 |H | Short_Literal 0x0
04f3 4801 |H | Short_Literal 0x1
04f4 00db | | Load_Top At_Offset_3
04f5 e405 | | Load 0x2,0x5
04f6 e001 | | Load 0x0,0x1
04f7 181c | | Execute Package,Field_Execute,Field_Number 0x1c
04f8 c404 | | Store 0x2,0x4
04f9 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x13 = 0x4f9,0xd
04fa 6813 |h | Jump_Zero 0x50e
04fb 0092 0c9c | | Action Push_String_Extended,0xc9c ; "can't close unit: "
; Debug Table 0x7.0x14 = 0x4fb,0xe
04fd e404 | | Load 0x2,0x4
04fe e003 | | Load 0x0,0x3
04ff 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0500 025e | ^ | Execute Discrete,Convert
0501 1c01 | | Execute_Immediate Run_Utility,0x1
0502 01cc | | Execute Vector,Catenate
0503 0092 0c9b | | Action Push_String_Extended,0xc9b ; ", nothing changed"
0505 01cc | | Execute Vector,Catenate
0506 8219 | | Call 0x1,0x19
0507 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x15 = 0x507,0xf
0508 4801 |H | Short_Literal 0x1
0509 4800 |H | Short_Literal 0x0
050a e004 | | Load 0x0,0x4
050b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
050c c407 | | Store 0x2,0x7
050d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x7.0x16 = 0x50d,0x10
050e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x17 = 0x50e,0x11
050f 4801 |H | Short_Literal 0x1
0510 4801 |H | Short_Literal 0x1
0511 e004 | | Load 0x0,0x4
0512 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0513 c407 | | Store 0x2,0x7
0514 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x18 = 0x514,0x12
0515 e008 | | Load 0x0,0x8
0516 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0517 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
0518 0092 0cb1 | | Action Push_String_Extended,0xcb1 ; " has been changed to source"
051a 01cc | | Execute Vector,Catenate
051b 821a | | Call 0x1,0x1a
051c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
051d TRAP_0470:
051d 0007 | | Action Break_Optional
051e 0092 0cb2 | | Action Push_String_Extended,0xcb2 ; "Unexpected exception while changing "
; Debug Table 0x7.0x19 = 0x51e,0x13
0520 e405 | | Load 0x2,0x5
0521 e008 | | Load 0x0,0x8
0522 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0523 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
0524 01cc | | Execute Vector,Catenate
0525 0092 0cb3 | | Action Push_String_Extended,0xcb3 ; " to source ("
0527 01cc | | Execute Vector,Catenate
0528 e007 | | Load 0x0,0x7
0529 180d | | Execute Package,Field_Execute,Field_Number 0xd
052a 01cc | | Execute Vector,Catenate
052b 0092 0cb4 | | Action Push_String_Extended,0xcb4 ; ")"
052d 01cc | | Execute Vector,Catenate
052e 8219 | | Call 0x1,0x19
052f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x7.0x1a = 0x52f,0x14
0530 4801 |H | Short_Literal 0x1
0531 4800 |H | Short_Literal 0x0
0532 e004 | | Load 0x0,0x4
0533 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0534 c407 | | Store 0x2,0x7
0535 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0536 0000 0000 | | .XXX[0x2]
0538 ; --------------------------------------------------------------------------------------
0538 ; SUBPROGRAM
0538 ; --------------------------------------------------------------------------------------
0538 054b | K | .CONST 0x054b ; Address of begin
0539 0004 | | .CONST 0x0004 ; Address of exception handler
053a 0004 | | .CONST 0x0004 ; Number of locals
053b INIT_0538:
053b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8 = .DEBUG 0x053b,0x1238,0x0001,0x0000,0x0038,0xc7e6,0x0000,0x0053
; Debug Table 0x8.0x0 = 0x53b,0xffff
053c 029f 0b7b | {| Declare_Subprogram INIT_0b78,For_Call ; Debug Table 0x8.0x1 = 0x53c,0xfffe
053e 6021 |`! | Indirect_Literal Discrete,0x560,{0x00000000, 0x003933c6} ; Debug Table 0x8.0x2 = 0x53e,0xfffd
053f 601c |` | Indirect_Literal Discrete,0x55c,{0x00000000, 0x00000641}
0540 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0541 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0542 4803 |H | Short_Literal 0x3
0543 4802 |H | Short_Literal 0x2
0544 0099 | | Action Reference_Dynamic
0545 4977 |Iw | Short_Literal 0x177
0546 00eb | | Load_Encached Diana_Cache
0547 0098 | | Execute Package,Field_Read_Dynamic
0548 0387 | | Declare_Variable Package
0549 00d8 | | Load_Top At_Offset_0
054a 020f | | Execute Module,Activate
054b BODY_0538:
054b e5ff | | Load 0x2,-0x1 ; Debug Table 0x8.0x3 = 0x54b,0x1
054c 8221 | ! | Call 0x1,0x21
054d 0033 | 3 | Store_Top Heap_Access,At_Offset_3
054e 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x4 = 0x54e,0x2
054f 00eb | | Load_Encached Diana_Cache
0550 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0551 7004 |p | Jump_Nonzero 0x556
0552 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x5 = 0x552,0x3
0553 00db | | Load_Top At_Offset_3
0554 00da | | Load_Top At_Offset_2
0555 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0556 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0557 0000 | | .XXX[0x1]
0558 ; --------------------------------------------------------------------------------------
0558 ; SUBPROGRAM
0558 ; --------------------------------------------------------------------------------------
0558 055b | [ | .CONST 0x055b ; Address of begin
0559 0004 | | .CONST 0x0004 ; Address of exception handler
055a 0001 | | .CONST 0x0001 ; Number of locals
055b BODY_0558:
055b INIT_0558:
055b 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x9 = .DEBUG 0x055b,0x1246,0x0001,0x0000,0x0038,0xc7e6,0x0000,0x005b
; Debug Table 0x9.0x0 = 0x55b,0x1
055c 0000 0000 | | .LITERAL {0x00000000, 0x00000641}
0560 0000 0000 | | .LITERAL {0x00000000, 0x003933c6}
0564 0000 0000 | | .LITERAL {0x00000000, 0x00028000}
0568 ; --------------------------------------------------------------------------------------
0568 ; SUBPROGRAM
0568 ; --------------------------------------------------------------------------------------
0568 056b | k | .CONST 0x056b ; Address of begin
0569 0004 | | .CONST 0x0004 ; Address of exception handler
056a 0001 | | .CONST 0x0001 ; Number of locals
056b BODY_0568:
056b INIT_0568:
056b 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0xa = .DEBUG 0x056b,0x124a,0x0001,0x0000,0x0038,0xc7e6,0x0000,0x0067
; Debug Table 0xa.0x0 = 0x56b,0x1
056c 0000 0000 | | .BLANK 0000[0x4]
0570 ; --------------------------------------------------------------------------------------
0570 ; SUBPROGRAM
0570 ; --------------------------------------------------------------------------------------
0570 0573 | s | .CONST 0x0573 ; Address of begin
0571 0004 | | .CONST 0x0004 ; Address of exception handler
0572 0001 | | .CONST 0x0001 ; Number of locals
0573 BODY_0570:
0573 INIT_0570:
0573 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0xb = .DEBUG 0x0573,0x124e,0x0001,0x0000,0x0038,0xc7e6,0x0000,0x0074
; Debug Table 0xb.0x0 = 0x573,0x1
0574 0000 0000 | | .BLANK 0000[0x4]
0578 ; --------------------------------------------------------------------------------------
0578 ; SUBPROGRAM
0578 ; --------------------------------------------------------------------------------------
0578 057b | { | .CONST 0x057b ; Address of begin
0579 0004 | | .CONST 0x0004 ; Address of exception handler
057a 0001 | | .CONST 0x0001 ; Number of locals
057b BODY_0578:
057b INIT_0578:
057b 00da | | Load_Top At_Offset_2 ; Debug Table 0xc = .DEBUG 0x057b,0x1252,0x0001,0x0000,0x0039,0x33c6,0x0000,0x002a
; Debug Table 0xc.0x0 = 0x57b,0x1
057c e00a | | Load 0x0,0xa
057d 180e | | Execute Package,Field_Execute,Field_Number 0xe
057e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0xc.0x1 = 0x57e,0x2
057f 0000 | | .XXX[0x1]
0580 ; --------------------------------------------------------------------------------------
0580 ; SUBPROGRAM
0580 ; --------------------------------------------------------------------------------------
0580 0583 | | .CONST 0x0583 ; Address of begin
0581 0004 | | .CONST 0x0004 ; Address of exception handler
0582 0001 | | .CONST 0x0001 ; Number of locals
0583 BODY_0580:
0583 INIT_0580:
0583 e00a | | Load 0x0,0xa ; Debug Table 0xd = .DEBUG 0x0583,0x1258,0x0001,0x0000,0x0039,0x33c6,0x0000,0x003d
; Debug Table 0xd.0x0 = 0x583,0x1
0584 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0585 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0xd.0x1 = 0x585,0x2
0586 0000 0000 | | .XXX[0x2]
0588 ; --------------------------------------------------------------------------------------
0588 ; SUBPROGRAM
0588 ; --------------------------------------------------------------------------------------
0588 058b | | .CONST 0x058b ; Address of begin
0589 0004 | | .CONST 0x0004 ; Address of exception handler
058a 0001 | | .CONST 0x0001 ; Number of locals
058b BODY_0588:
058b INIT_0588:
058b 0092 0cb5 | | Action Push_String_Extended,0xcb5 ; "*** "
; Debug Table 0xe = .DEBUG 0x058b,0x125e,0x0001,0x0000,0x0039,0x33c6,0x0000,0x004b
; Debug Table 0xe.0x0 = 0x58b,0x1
058d 00db | | Load_Top At_Offset_3
058e 01cc | | Execute Vector,Catenate
058f 8217 | | Call 0x1,0x17
0590 8218 | | Call 0x1,0x18 ; Debug Table 0xe.0x1 = 0x590,0x2
0591 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0592 0000 0000 | | .BLANK 0000[0x6]
0598 ; --------------------------------------------------------------------------------------
0598 ; SUBPROGRAM
0598 ; --------------------------------------------------------------------------------------
0598 059b | | .CONST 0x059b ; Address of begin
0599 0004 | | .CONST 0x0004 ; Address of exception handler
059a 0001 | | .CONST 0x0001 ; Number of locals
059b BODY_0598:
059b INIT_0598:
059b 0092 0cb6 | | Action Push_String_Extended,0xcb6 ; "+++ "
; Debug Table 0xf = .DEBUG 0x059b,0x1264,0x0001,0x0000,0x0039,0x33c6,0x0000,0x0062
; Debug Table 0xf.0x0 = 0x59b,0x1
059d 00db | | Load_Top At_Offset_3
059e 01cc | | Execute Vector,Catenate
059f 8217 | | Call 0x1,0x17
05a0 8218 | | Call 0x1,0x18 ; Debug Table 0xf.0x1 = 0x5a0,0x2
05a1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
05a2 0000 0000 | | .BLANK 0000[0x6]
05a8 ; --------------------------------------------------------------------------------------
05a8 ; SUBPROGRAM
05a8 ; --------------------------------------------------------------------------------------
05a8 05c4 | | .CONST 0x05c4 ; Address of begin
05a9 0004 | | .CONST 0x0004 ; Address of exception handler
05aa 000b | | .CONST 0x000b ; Number of locals
05ab INIT_05a8:
05ab 0007 | | Action Break_Optional ; Debug Table 0x10 = .DEBUG 0x05ab,0x126a,0x0002,0x0000,0x0039,0x33c6,0x0000,0x0079
; Debug Table 0x10.0x0 = 0x5ab,0xffff
05ac 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x10.0x1 = 0x5ac,0xfffe
05ad 02a0 | | Declare_Subprogram Null_Subprogram ; Debug Table 0x10.0x2 = 0x5ad,0xfffd
05ae 4800 |H | Short_Literal 0x0
05af 032d | - | Declare_Type Record,Defined
05b0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0x3 = 0x5b0,0xfffc
05b1 02a0 | | Declare_Subprogram Null_Subprogram
05b2 03ad | | Declare_Type Heap_Access,Defined
05b3 0007 | | Action Break_Optional ; Debug Table 0x10.0x4 = 0x5b3,0xfffb
05b4 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0x10.0x5 = 0x5b4,0xfffa
05b5 e402 | | Load 0x2,0x2 ; Debug Table 0x10.0x6 = 0x5b5,0xfff9
05b6 0007 | | Action Break_Optional
05b7 e002 | | Load 0x0,0x2 ; Debug Table 0x10.0x7 = 0x5b7,0xfff8
05b8 1919 | | Execute Package,Field_Reference,Field_Number 0x19
05b9 00c6 | | Action Check_Subprogram_Elaborated
05ba 00d9 | | Load_Top At_Offset_1
05bb 00d9 | | Load_Top At_Offset_1
05bc 67a3 |g | Indirect_Literal Discrete,0x560,{0x00000000, 0x003933c6}
05bd 48bc |H | Short_Literal 0xbc
05be 4809 |H | Short_Literal 0x9
05bf 0007 | | Action Break_Optional
05c0 029f 0b83 | | Declare_Subprogram INIT_0b80,For_Call ; Debug Table 0x10.0x8 = 0x5c0,0xfff7
05c2 029f 0b93 | | Declare_Subprogram INIT_0b90,For_Call ; Debug Table 0x10.0x9 = 0x5c2,0xfff6
05c4 BODY_05a8:
05c4 e5ff | | Load 0x2,-0x1 ; Debug Table 0x10.0xa = 0x5c4,0x1
05c5 840b | | Call 0x2,0xb
05c6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05c7 0000 | | .XXX[0x1]
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05ce | | .CONST 0x05ce ; Address of begin
05c9 05f7 | | .CONST 0x05f7 ; Address of exception handler
05ca 0003 | | .CONST 0x0003 ; Number of locals
05cb INIT_05c8:
05cb 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x11 = .DEBUG 0x05cb,0x1282,0x0002,0x0000,0x0039,0x33c6,0x0000,0x0207
; Debug Table 0x11.0x0 = 0x5cb,0xffff
05cc 029f 0c13 | | Declare_Subprogram INIT_0c10,For_Call ; Debug Table 0x11.0x1 = 0x5cc,0xfffe
05ce BODY_05c8:
05ce e5ff | | Load 0x2,-0x1 ; Debug Table 0x11.0x2 = 0x5ce,0x1
05cf 00eb | | Load_Encached Diana_Cache
05d0 18ec | | Execute Package,Field_Execute,Field_Number 0xec
05d1 00eb | | Load_Encached Diana_Cache
05d2 1883 | | Execute Package,Field_Execute,Field_Number 0x83
05d3 0f04 | | Execute_Immediate Equal,0x4
05d4 680e |h | Jump_Zero 0x5e3
05d5 e5ff | | Load 0x2,-0x1 ; Debug Table 0x11.0x3 = 0x5d5,0x2
05d6 4975 |Iu | Short_Literal 0x175
05d7 00eb | | Load_Encached Diana_Cache
05d8 0098 | | Execute Package,Field_Read_Dynamic
05d9 181d | | Execute Package,Field_Execute,Field_Number 0x1d
05da 0032 | 2 | Store_Top Heap_Access,At_Offset_2
05db 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x11.0x4 = 0x5db,0x3
05dc 00eb | | Load_Encached Diana_Cache
05dd 1858 | X | Execute Package,Field_Execute,Field_Number 0x58
05de 7002 |p | Jump_Nonzero 0x5e1
05df 8403 | | Call 0x2,0x3 ; Debug Table 0x11.0x5 = 0x5df,0x4
05e0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05e1 e5ff | | Load 0x2,-0x1 ; Debug Table 0x11.0x6 = 0x5e1,0x5
05e2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05e3 e5ff | | Load 0x2,-0x1 ; Debug Table 0x11.0x7 = 0x5e3,0x6
05e4 00eb | | Load_Encached Diana_Cache
05e5 1883 | | Execute Package,Field_Execute,Field_Number 0x83
05e6 0f04 | | Execute_Immediate Equal,0x4
05e7 680c |h | Jump_Zero 0x5f4
05e8 e5ff | | Load 0x2,-0x1 ; Debug Table 0x11.0x8 = 0x5e8,0x7
05e9 00eb | | Load_Encached Diana_Cache
05ea 1888 | | Execute Package,Field_Execute,Field_Number 0x88
05eb 0032 | 2 | Store_Top Heap_Access,At_Offset_2
05ec 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x11.0x9 = 0x5ec,0x8
05ed 00eb | | Load_Encached Diana_Cache
05ee 1858 | X | Execute Package,Field_Execute,Field_Number 0x58
05ef 7002 |p | Jump_Nonzero 0x5f2
05f0 8403 | | Call 0x2,0x3 ; Debug Table 0x11.0xa = 0x5f0,0x9
05f1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05f2 e5ff | | Load 0x2,-0x1 ; Debug Table 0x11.0xb = 0x5f2,0xa
05f3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05f4 00eb | | Load_Encached Diana_Cache ; Debug Table 0x11.0xc = 0x5f4,0xb
05f5 1812 | | Execute Package,Field_Execute,Field_Number 0x12
05f6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05f7 TRAP_05c8:
05f7 0007 | | Action Break_Optional
05f8 00eb | | Load_Encached Diana_Cache ; Debug Table 0x11.0xd = 0x5f8,0xc
05f9 1812 | | Execute Package,Field_Execute,Field_Number 0x12
05fa 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05fb 0000 0000 | | .BLANK 0000[0x5]
0600 ; --------------------------------------------------------------------------------------
0600 ; SUBPROGRAM
0600 ; --------------------------------------------------------------------------------------
0600 0609 | | .CONST 0x0609 ; Address of begin
0601 063c | < | .CONST 0x063c ; Address of exception handler
0602 0006 | | .CONST 0x0006 ; Number of locals
0603 INIT_0600:
0603 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x12 = .DEBUG 0x0603,0x12a0,0x0002,0x0000,0x0039,0x33c6,0x0000,0x02b4
; Debug Table 0x12.0x0 = 0x603,0xffff
0604 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0605 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x12.0x1 = 0x605,0xfffe
0606 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x12.0x2 = 0x606,0xfffd
0607 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x12.0x3 = 0x607,0xfffc
0608 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x12.0x4 = 0x608,0xfffb
0609 BODY_0600:
0609 e5ff | | Load 0x2,-0x1 ; Debug Table 0x12.0x5 = 0x609,0x1
060a 00eb | | Load_Encached Diana_Cache
060b 18ec | | Execute Package,Field_Execute,Field_Number 0xec
060c 00eb | | Load_Encached Diana_Cache
060d 1883 | | Execute Package,Field_Execute,Field_Number 0x83
060e 0f04 | | Execute_Immediate Equal,0x4
060f 6829 |h) | Jump_Zero 0x639
0610 e5ff | | Load 0x2,-0x1 ; Debug Table 0x12.0x6 = 0x610,0x2
0611 00eb | | Load_Encached Diana_Cache
0612 18ec | | Execute Package,Field_Execute,Field_Number 0xec
0613 00eb | | Load_Encached Diana_Cache
0614 1888 | | Execute Package,Field_Execute,Field_Number 0x88
0615 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0616 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x7 = 0x616,0x3
0617 00eb | | Load_Encached Diana_Cache
0618 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
0619 a403 | | Store_Unchecked 0x2,0x3
061a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x8 = 0x61a,0x4
061b 00eb | | Load_Encached Diana_Cache
061c 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
061d 0032 | 2 | Store_Top Heap_Access,At_Offset_2
061e 00cf | | Action Mark_Auxiliary
061f 0007 | | Action Break_Optional ; Debug Table 0x12.0x9 = 0x61f,0x5
0620 00da | | Load_Top At_Offset_2 ; Debug Table 0x12.0xa = 0x620,0x6
0621 00eb | | Load_Encached Diana_Cache
0622 1858 | X | Execute Package,Field_Execute,Field_Number 0x58
0623 7014 |p | Jump_Nonzero 0x638
0624 00da | | Load_Top At_Offset_2 ; Debug Table 0x12.0xb = 0x624,0x7
0625 00eb | | Load_Encached Diana_Cache
0626 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
0627 a404 | | Store_Unchecked 0x2,0x4
0628 00db | | Load_Top At_Offset_3 ; Debug Table 0x12.0xc = 0x628,0x8
0629 e5ff | | Load 0x2,-0x1
062a 021f | | Execute Heap_Access,Equal
062b 6802 |h | Jump_Zero 0x62e
062c e403 | | Load 0x2,0x3 ; Debug Table 0x12.0xd = 0x62c,0x9
062d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
062e 00db | | Load_Top At_Offset_3 ; Debug Table 0x12.0xe = 0x62e,0xa
062f a403 | | Store_Unchecked 0x2,0x3
0630 00da | | Load_Top At_Offset_2 ; Debug Table 0x12.0xf = 0x630,0xb
0631 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0632 00da | | Load_Top At_Offset_2 ; Debug Table 0x12.0x10 = 0x632,0xc
0633 00eb | | Load_Encached Diana_Cache
0634 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0635 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0636 00c9 | | Action Pop_Auxiliary_Loop
0637 7fe8 | | Jump 0x620
0638 00ce | | Action Pop_Auxiliary
0639 00eb | | Load_Encached Diana_Cache ; Debug Table 0x12.0x11 = 0x639,0xd
063a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
063b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
063c TRAP_0600:
063c 0007 | | Action Break_Optional
063d 00eb | | Load_Encached Diana_Cache ; Debug Table 0x12.0x12 = 0x63d,0xe
063e 1812 | | Execute Package,Field_Execute,Field_Number 0x12
063f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 0644 | D | .CONST 0x0644 ; Address of begin
0641 066f | o | .CONST 0x066f ; Address of exception handler
0642 0002 | | .CONST 0x0002 ; Number of locals
0643 INIT_0640:
0643 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x13 = .DEBUG 0x0643,0x12c8,0x0002,0x0000,0x0039,0x33c6,0x0000,0x0353
; Debug Table 0x13.0x0 = 0x643,0xffff
0644 BODY_0640:
0644 00db | | Load_Top At_Offset_3 ; Debug Table 0x13.0x1 = 0x644,0x1
0645 00eb | | Load_Encached Diana_Cache
0646 18ec | | Execute Package,Field_Execute,Field_Number 0xec
0647 00eb | | Load_Encached Diana_Cache
0648 1883 | | Execute Package,Field_Execute,Field_Number 0x83
0649 0f04 | | Execute_Immediate Equal,0x4
064a 6810 |h | Jump_Zero 0x65b
064b 00db | | Load_Top At_Offset_3 ; Debug Table 0x13.0x2 = 0x64b,0x2
064c 4975 |Iu | Short_Literal 0x175
064d 00eb | | Load_Encached Diana_Cache
064e 0098 | | Execute Package,Field_Read_Dynamic
064f 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0650 00eb | | Load_Encached Diana_Cache
0651 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0652 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0653 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x3 = 0x653,0x3
0654 00eb | | Load_Encached Diana_Cache
0655 1858 | X | Execute Package,Field_Execute,Field_Number 0x58
0656 7015 |p | Jump_Nonzero 0x66c
0657 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x4 = 0x657,0x4
0658 00eb | | Load_Encached Diana_Cache
0659 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
065a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
065b 00db | | Load_Top At_Offset_3 ; Debug Table 0x13.0x5 = 0x65b,0x5
065c 00eb | | Load_Encached Diana_Cache
065d 1883 | | Execute Package,Field_Execute,Field_Number 0x83
065e 0f04 | | Execute_Immediate Equal,0x4
065f 680c |h | Jump_Zero 0x66c
0660 00db | | Load_Top At_Offset_3 ; Debug Table 0x13.0x6 = 0x660,0x6
0661 00eb | | Load_Encached Diana_Cache
0662 1888 | | Execute Package,Field_Execute,Field_Number 0x88
0663 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0664 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x7 = 0x664,0x7
0665 00eb | | Load_Encached Diana_Cache
0666 1858 | X | Execute Package,Field_Execute,Field_Number 0x58
0667 7004 |p | Jump_Nonzero 0x66c
0668 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x8 = 0x668,0x8
0669 00eb | | Load_Encached Diana_Cache
066a 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
066b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
066c 00eb | | Load_Encached Diana_Cache ; Debug Table 0x13.0x9 = 0x66c,0x9
066d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
066e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
066f TRAP_0640:
066f 0007 | | Action Break_Optional
0670 00eb | | Load_Encached Diana_Cache ; Debug Table 0x13.0xa = 0x670,0xa
0671 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0672 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0673 0000 0000 | | .BLANK 0000[0x5]
0678 ; --------------------------------------------------------------------------------------
0678 ; SUBPROGRAM
0678 ; --------------------------------------------------------------------------------------
0678 0689 | | .CONST 0x0689 ; Address of begin
0679 06c5 | | .CONST 0x06c5 ; Address of exception handler
067a 0005 | | .CONST 0x0005 ; Number of locals
067b INIT_0678:
067b e008 | | Load 0x0,0x8 ; Debug Table 0x14 = .DEBUG 0x067b,0x12e0,0x0002,0x0000,0x0039,0x33c6,0x0000,0x03da
; Debug Table 0x14.0x0 = 0x67b,0xffff
067c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
067d e008 | | Load 0x0,0x8 ; Debug Table 0x14.0x1 = 0x67d,0xfffe
067e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
067f 02c7 | | Declare_Variable Any
0680 00d8 | | Load_Top At_Offset_0
0681 1c00 | | Execute_Immediate Run_Utility,0x0
0682 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x14.0x2 = 0x682,0xfffd
0683 e008 | | Load 0x0,0x8 ; Debug Table 0x14.0x3 = 0x683,0xfffc
0684 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0685 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0686 02c7 | | Declare_Variable Any
0687 00d8 | | Load_Top At_Offset_0
0688 1c00 | | Execute_Immediate Run_Utility,0x0
0689 BODY_0678:
0689 e008 | | Load 0x0,0x8 ; Debug Table 0x14.0x4 = 0x689,0x1
068a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
068b 00db | | Load_Top At_Offset_3
068c 0120 | | Execute Any,Is_Value
068d 6803 |h | Jump_Zero 0x691
068e e008 | | Load 0x0,0x8
068f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0690 7801 |x | Jump 0x692
0691 00db | | Load_Top At_Offset_3
0692 66d1 |f | Indirect_Literal Discrete,0x564,{0x00000000, 0x00028000}
0693 e004 | | Load 0x0,0x4
0694 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0695 4800 |H | Short_Literal 0x0
0696 e008 | | Load 0x0,0x8
0697 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0698 e5ff | | Load 0x2,-0x1
0699 e008 | | Load 0x0,0x8
069a 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
069b 1816 | | Execute Package,Field_Execute,Field_Number 0x16
069c c403 | | Store 0x2,0x3
069d c402 | | Store 0x2,0x2
069e 00db | | Load_Top At_Offset_3 ; Debug Table 0x14.0x5 = 0x69e,0x2
069f 7022 |p" | Jump_Nonzero 0x6c2
06a0 e008 | | Load 0x0,0x8 ; Debug Table 0x14.0x6 = 0x6a0,0x3
06a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06a2 00d9 | | Load_Top At_Offset_1
06a3 0120 | | Execute Any,Is_Value
06a4 6804 |h | Jump_Zero 0x6a9
06a5 e008 | | Load 0x0,0x8
06a6 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
06a7 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
06a8 7801 |x | Jump 0x6aa
06a9 00d9 | | Load_Top At_Offset_1
06aa e008 | | Load 0x0,0x8
06ab 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
06ac 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06ad 66b6 |f | Indirect_Literal Discrete,0x564,{0x00000000, 0x00028000}
06ae 4801 |H | Short_Literal 0x1
06af 4800 |H | Short_Literal 0x0
06b0 4800 |H | Short_Literal 0x0
06b1 e004 | | Load 0x0,0x4
06b2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06b3 4800 |H | Short_Literal 0x0
06b4 e403 | | Load 0x2,0x3
06b5 e008 | | Load 0x0,0x8
06b6 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
06b7 1811 | | Execute Package,Field_Execute,Field_Number 0x11
06b8 e008 | | Load 0x0,0x8
06b9 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
06ba 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
06bb c404 | | Store 0x2,0x4
06bc c405 | | Store 0x2,0x5
06bd c402 | | Store 0x2,0x2
06be 00db | | Load_Top At_Offset_3 ; Debug Table 0x14.0x7 = 0x6be,0x4
06bf 7002 |p | Jump_Nonzero 0x6c2
06c0 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x14.0x8 = 0x6c0,0x5
06c1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
06c2 00eb | | Load_Encached Diana_Cache ; Debug Table 0x14.0x9 = 0x6c2,0x6
06c3 1812 | | Execute Package,Field_Execute,Field_Number 0x12
06c4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
06c5 TRAP_0678:
06c5 0007 | | Action Break_Optional
06c6 00eb | | Load_Encached Diana_Cache ; Debug Table 0x14.0xa = 0x6c6,0x7
06c7 1812 | | Execute Package,Field_Execute,Field_Number 0x12
06c8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
06c9 0000 0000 | | .BLANK 0000[0x7]
06d0 ; --------------------------------------------------------------------------------------
06d0 ; SUBPROGRAM
06d0 ; --------------------------------------------------------------------------------------
06d0 06e5 | | .CONST 0x06e5 ; Address of begin
06d1 0004 | | .CONST 0x0004 ; Address of exception handler
06d2 000a | | .CONST 0x000a ; Number of locals
06d3 INIT_06d0:
06d3 00da | | Load_Top At_Offset_2 ; Debug Table 0x15 = .DEBUG 0x06d3,0x12f8,0x0002,0x0000,0x0039,0x33c6,0x0000,0x0453
; Debug Table 0x15.0x0 = 0x6d3,0xffff
06d4 01dc | | Execute Vector,Last
06d5 00e2 | | Load_Encached Integer_Cache
06d6 03f1 | | Declare_Variable Discrete,With_Value
06d7 e008 | | Load 0x0,0x8 ; Debug Table 0x15.0x1 = 0x6d7,0xfffe
06d8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06d9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06da 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x15.0x2 = 0x6da,0xfffd
06db 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x15.0x3 = 0x6db,0xfffc
06dc 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x15.0x4 = 0x6dc,0xfffb
06dd 029f 0c2b | +| Declare_Subprogram INIT_0c28,For_Call
06df 029f 0c3b | ;| Declare_Subprogram INIT_0c38,For_Call
06e1 029f 0c5b | [| Declare_Subprogram INIT_0c58,For_Call
06e3 029f 0c6b | k| Declare_Subprogram INIT_0c68,For_Call
06e5 BODY_06d0:
06e5 00cf | | Action Mark_Auxiliary
06e6 e5ff | | Load 0x2,-0x1 ; Debug Table 0x15.0x5 = 0x6e6,0x1
06e7 01da | | Execute Vector,Bounds
06e8 0264 | d | Execute Discrete,Below_Bound
06e9 700d |p | Jump_Nonzero 0x6f7
06ea 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0x6 = 0x6ea,0x2
06eb e5ff | | Load 0x2,-0x1
06ec 01d7 | | Execute Vector,Field_Read
06ed 0f20 | | Execute_Immediate Equal,0x20
06ee 6806 |h | Jump_Zero 0x6f5
06ef 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0x7 = 0x6ef,0x3
06f0 0aff | | Execute_Immediate Plus,-0x1
06f1 0248 | H | Execute Discrete,Check_In_Integer
06f2 a402 | | Store_Unchecked 0x2,0x2
06f3 00d2 | | Pop_Control Pop_Count_2 ; Debug Table 0x15.0x8 = 0x6f3,0x4
06f4 7802 |x | Jump 0x6f7
06f5 00c8 | | Action Pop_Auxiliary_Range
06f6 37f3 |7 | Loop_Decreasing 0x6ea
06f7 00ce | | Action Pop_Auxiliary
06f8 e008 | | Load 0x0,0x8 ; Debug Table 0x15.0x9 = 0x6f8,0x5
06f9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06fa 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06fb e008 | | Load 0x0,0x8
06fc 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06fd 6666 |ff | Indirect_Literal Discrete,0x564,{0x00000000, 0x00028000}
06fe e004 | | Load 0x0,0x4
06ff 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0700 e009 | | Load 0x0,0x9
0701 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0702 e008 | | Load 0x0,0x8
0703 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0704 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0705 e5ff | | Load 0x2,-0x1
0706 01dd | | Execute Vector,First
0707 e402 | | Load 0x2,0x2
0708 e5ff | | Load 0x2,-0x1
0709 01cf | | Execute Vector,Slice_Read
070a e008 | | Load 0x0,0x8
070b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
070c 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
070d c404 | | Store 0x2,0x4
070e c403 | | Store 0x2,0x3
070f e403 | | Load 0x2,0x3 ; Debug Table 0x15.0xa = 0x70f,0x6
0710 6819 |h | Jump_Zero 0x72a
0711 0092 0cb7 | | Action Push_String_Extended,0xcb7 ; "can't resolve "
; Debug Table 0x15.0xb = 0x711,0x7
0713 e5ff | | Load 0x2,-0x1
0714 01dd | | Execute Vector,First
0715 e402 | | Load 0x2,0x2
0716 e5ff | | Load 0x2,-0x1
0717 01cf | | Execute Vector,Slice_Read
0718 01cc | | Execute Vector,Catenate
0719 0092 0cb8 | | Action Push_String_Extended,0xcb8 ; " ("
071b 01cc | | Execute Vector,Catenate
071c e403 | | Load 0x2,0x3
071d e008 | | Load 0x0,0x8
071e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
071f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0720 025e | ^ | Execute Discrete,Convert
0721 1c01 | | Execute_Immediate Run_Utility,0x1
0722 01cc | | Execute Vector,Catenate
0723 0092 0cb4 | | Action Push_String_Extended,0xcb4 ; ")"
0725 01cc | | Execute Vector,Catenate
0726 8219 | | Call 0x1,0x19
0727 00eb | | Load_Encached Diana_Cache ; Debug Table 0x15.0xc = 0x727,0x8
0728 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0729 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
072a e404 | | Load 0x2,0x4 ; Debug Table 0x15.0xd = 0x72a,0x9
072b a405 | | Store_Unchecked 0x2,0x5
072c 00cf | | Action Mark_Auxiliary
072d e5ff | | Load 0x2,-0x1 ; Debug Table 0x15.0xe = 0x72d,0xa
072e 01dc | | Execute Vector,Last
072f e402 | | Load 0x2,0x2
0730 0a02 | | Execute_Immediate Plus,0x2
0731 0248 | H | Execute Discrete,Check_In_Integer
0732 0263 | c | Execute Discrete,Above_Bound
0733 704d |pM | Jump_Nonzero 0x781
0734 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0xf = 0x734,0xb
0735 e5ff | | Load 0x2,-0x1
0736 01d7 | | Execute Vector,Field_Read
0737 0b5e | ^ | Execute_Immediate Case_Compare,0x5e
0738 701a |p | Jump_Nonzero 0x753
0739 0b31 | 1 | Execute_Immediate Case_Compare,0x31
073a 701a |p | Jump_Nonzero 0x755
073b 0b32 | 2 | Execute_Immediate Case_Compare,0x32
073c 701a |p | Jump_Nonzero 0x757
073d 0b33 | 3 | Execute_Immediate Case_Compare,0x33
073e 701a |p | Jump_Nonzero 0x759
073f 0b6c | l | Execute_Immediate Case_Compare,0x6c
0740 701a |p | Jump_Nonzero 0x75b
0741 0b4c | L | Execute_Immediate Case_Compare,0x4c
0742 7018 |p | Jump_Nonzero 0x75b
0743 0b5b | [ | Execute_Immediate Case_Compare,0x5b
0744 701a |p | Jump_Nonzero 0x75f
0745 0b5d | ] | Execute_Immediate Case_Compare,0x5d
0746 701c |p | Jump_Nonzero 0x763
0747 0b2f | / | Execute_Immediate Case_Compare,0x2f
0748 701e |p | Jump_Nonzero 0x767
0749 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x15.0x10 = 0x749,0x14
074a e5ff | | Load 0x2,-0x1
074b 01d7 | | Execute Vector,Field_Read
074c 0092 0cb9 | | Action Push_String_Extended,0xcb9 ; "unknown positioning character "
074e 01cb | | Execute Vector,Append
074f 8219 | | Call 0x1,0x19
0750 00eb | | Load_Encached Diana_Cache ; Debug Table 0x15.0x11 = 0x750,0x15
0751 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0752 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0753 8407 | | Call 0x2,0x7 ; Debug Table 0x15.0x12 = 0x753,0xc
0754 7815 |x | Jump 0x76a
0755 8408 | | Call 0x2,0x8 ; Debug Table 0x15.0x13 = 0x755,0xd
0756 7813 |x | Jump 0x76a
0757 8409 | | Call 0x2,0x9 ; Debug Table 0x15.0x14 = 0x757,0xe
0758 7811 |x | Jump 0x76a
0759 840a | | Call 0x2,0xa ; Debug Table 0x15.0x15 = 0x759,0xf
075a 780f |x | Jump 0x76a
075b e405 | | Load 0x2,0x5 ; Debug Table 0x15.0x16 = 0x75b,0x10
075c 821c | | Call 0x1,0x1c
075d a405 | | Store_Unchecked 0x2,0x5
075e 780b |x | Jump 0x76a
075f e405 | | Load 0x2,0x5 ; Debug Table 0x15.0x17 = 0x75f,0x11
0760 821d | | Call 0x1,0x1d
0761 a405 | | Store_Unchecked 0x2,0x5
0762 7807 |x | Jump 0x76a
0763 e405 | | Load 0x2,0x5 ; Debug Table 0x15.0x18 = 0x763,0x12
0764 821e | | Call 0x1,0x1e
0765 a405 | | Store_Unchecked 0x2,0x5
0766 7803 |x | Jump 0x76a
0767 e405 | | Load 0x2,0x5 ; Debug Table 0x15.0x19 = 0x767,0x13
0768 821f | | Call 0x1,0x1f
0769 a405 | | Store_Unchecked 0x2,0x5
076a 00d1 | | Pop_Control Pop_Count_1
076b e405 | | Load 0x2,0x5 ; Debug Table 0x15.0x1a = 0x76b,0x16
076c 00eb | | Load_Encached Diana_Cache
076d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
076e 6810 |h | Jump_Zero 0x77f
076f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0x1b = 0x76f,0x17
0770 e5ff | | Load 0x2,-0x1
0771 01d7 | | Execute Vector,Field_Read
0772 0092 0cba | | Action Push_String_Extended,0xcba ; "bad positioning character "
0774 01cb | | Execute Vector,Append
0775 0092 0cbb | | Action Push_String_Extended,0xcbb ; " at position"
0777 01cc | | Execute Vector,Catenate
0778 00d9 | | Load_Top At_Offset_1
0779 00e0 | | Load_Encached Standard_Cache
077a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
077b 01cc | | Execute Vector,Catenate
077c 8219 | | Call 0x1,0x19
077d e405 | | Load 0x2,0x5 ; Debug Table 0x15.0x1c = 0x77d,0x18
077e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
077f 00c8 | | Action Pop_Auxiliary_Range
0780 3fb3 |? | Loop_Increasing 0x734
0781 00ce | | Action Pop_Auxiliary
0782 e405 | | Load 0x2,0x5 ; Debug Table 0x15.0x1d = 0x782,0x19
0783 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0784 0000 0000 | | .BLANK 0000[0x4]
0788 ; --------------------------------------------------------------------------------------
0788 ; SUBPROGRAM
0788 ; --------------------------------------------------------------------------------------
0788 078b | | .CONST 0x078b ; Address of begin
0789 0004 | | .CONST 0x0004 ; Address of exception handler
078a 0001 | | .CONST 0x0001 ; Number of locals
078b BODY_0788:
078b INIT_0788:
078b 00da | | Load_Top At_Offset_2 ; Debug Table 0x16 = .DEBUG 0x078b,0x1336,0x0002,0x0000,0x0039,0x33c6,0x0000,0x05ed
; Debug Table 0x16.0x0 = 0x78b,0x1
078c 01db | | Execute Vector,Length
078d 7003 |p | Jump_Nonzero 0x791
078e 00eb | | Load_Encached Diana_Cache ; Debug Table 0x16.0x1 = 0x78e,0x2
078f 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0790 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0791 00da | | Load_Top At_Offset_2 ; Debug Table 0x16.0x2 = 0x791,0x3
0792 01dd | | Execute Vector,First
0793 00db | | Load_Top At_Offset_3
0794 01d7 | | Execute Vector,Field_Read
0795 0f21 | ! | Execute_Immediate Equal,0x21
0796 6803 |h | Jump_Zero 0x79a
0797 00da | | Load_Top At_Offset_2 ; Debug Table 0x16.0x3 = 0x797,0x4
0798 8220 | | Call 0x1,0x20
0799 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
079a 00da | | Load_Top At_Offset_2 ; Debug Table 0x16.0x4 = 0x79a,0x5
079b 821b | | Call 0x1,0x1b
079c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
079d 0000 0000 | | .XXX[0x3]
079f 0000 | |
07a0 ; --------------------------------------------------------------------------------------
07a0 ; SUBPROGRAM
07a0 ; --------------------------------------------------------------------------------------
07a0 07a6 | | .CONST 0x07a6 ; Address of begin
07a1 083f | ? | .CONST 0x083f ; Address of exception handler
07a2 0002 | | .CONST 0x0002 ; Number of locals
07a3 INIT_07a0:
07a3 e5ff | | Load 0x2,-0x1 ; Debug Table 0x17 = .DEBUG 0x07a3,0x1342,0x0001,0x0000,0x0039,0x33c6,0x0000,0x10cc
; Debug Table 0x17.0x0 = 0x7a3,0xffff
07a4 e00b | | Load 0x0,0xb
07a5 1814 | | Execute Package,Field_Execute,Field_Number 0x14
07a6 BODY_07a0:
07a6 4801 |H | Short_Literal 0x1 ; Debug Table 0x17.0x1 = 0x7a6,0x1
07a7 a7fd | | Store_Unchecked 0x3,-0x3
07a8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0x2 = 0x7a8,0x2
07a9 0092 0cbc | | Action Push_String_Extended,0xcbc ; "SM_DEFN"
07ab 01df | | Execute Vector,Equal
07ac 6806 |h | Jump_Zero 0x7b3
07ad e7fe | | Load 0x3,-0x2 ; Debug Table 0x17.0x3 = 0x7ad,0x3
07ae e7ff | | Load 0x3,-0x1
07af 4959 |IY | Short_Literal 0x159
07b0 00eb | | Load_Encached Diana_Cache
07b1 0096 | | Execute Package,Entry
07b2 4503 |E | Exit_Suprogram New_Top_Offset 0x3
07b3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0x4 = 0x7b3,0x4
07b4 0092 0cbd | | Action Push_String_Extended,0xcbd ; "SM_EXP_TYPE"
07b6 01df | | Execute Vector,Equal
07b7 6806 |h | Jump_Zero 0x7be
07b8 e7fe | | Load 0x3,-0x2 ; Debug Table 0x17.0x5 = 0x7b8,0x5
07b9 e7ff | | Load 0x3,-0x1
07ba 495b |I[ | Short_Literal 0x15b
07bb 00eb | | Load_Encached Diana_Cache
07bc 0096 | | Execute Package,Entry
07bd 4503 |E | Exit_Suprogram New_Top_Offset 0x3
07be 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0x6 = 0x7be,0x6
07bf 0092 0cbe | | Action Push_String_Extended,0xcbe ; "SM_TYPE_SPEC"
07c1 01df | | Execute Vector,Equal
07c2 6806 |h | Jump_Zero 0x7c9
07c3 e7fe | | Load 0x3,-0x2 ; Debug Table 0x17.0x7 = 0x7c3,0x7
07c4 e7ff | | Load 0x3,-0x1
07c5 4966 |If | Short_Literal 0x166
07c6 00eb | | Load_Encached Diana_Cache
07c7 0096 | | Execute Package,Entry
07c8 4503 |E | Exit_Suprogram New_Top_Offset 0x3
07c9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0x8 = 0x7c9,0x8
07ca 0092 0cbf | | Action Push_String_Extended,0xcbf ; "SM_DISCRIMINANTS"
07cc 01df | | Execute Vector,Equal
07cd 6806 |h | Jump_Zero 0x7d4
07ce e7fe | | Load 0x3,-0x2 ; Debug Table 0x17.0x9 = 0x7ce,0x9
07cf e7ff | | Load 0x3,-0x1
07d0 495a |IZ | Short_Literal 0x15a
07d1 00eb | | Load_Encached Diana_Cache
07d2 0096 | | Execute Package,Entry
07d3 4503 |E | Exit_Suprogram New_Top_Offset 0x3
07d4 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0xa = 0x7d4,0xa
07d5 0092 0cc0 | | Action Push_String_Extended,0xcc0 ; "SM_BASE_TYPE"
07d7 01df | | Execute Vector,Equal
07d8 6806 |h | Jump_Zero 0x7df
07d9 e7fe | | Load 0x3,-0x2 ; Debug Table 0x17.0xb = 0x7d9,0xb
07da e7ff | | Load 0x3,-0x1
07db 4956 |IV | Short_Literal 0x156
07dc 00eb | | Load_Encached Diana_Cache
07dd 0096 | | Execute Package,Entry
07de 4503 |E | Exit_Suprogram New_Top_Offset 0x3
07df 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0xc = 0x7df,0xc
07e0 0092 0cc1 | | Action Push_String_Extended,0xcc1 ; "SM_TYPE_STRUCT"
07e2 01df | | Execute Vector,Equal
07e3 6806 |h | Jump_Zero 0x7ea
07e4 e7fe | | Load 0x3,-0x2 ; Debug Table 0x17.0xd = 0x7e4,0xd
07e5 e7ff | | Load 0x3,-0x1
07e6 4967 |Ig | Short_Literal 0x167
07e7 00eb | | Load_Encached Diana_Cache
07e8 0096 | | Execute Package,Entry
07e9 4503 |E | Exit_Suprogram New_Top_Offset 0x3
07ea 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0xe = 0x7ea,0xe
07eb 0092 0cc2 | | Action Push_String_Extended,0xcc2 ; "SM_CONSTRAINT"
07ed 01df | | Execute Vector,Equal
07ee 6806 |h | Jump_Zero 0x7f5
07ef e7fe | | Load 0x3,-0x2 ; Debug Table 0x17.0xf = 0x7ef,0xf
07f0 e7ff | | Load 0x3,-0x1
07f1 4958 |IX | Short_Literal 0x158
07f2 00eb | | Load_Encached Diana_Cache
07f3 0096 | | Execute Package,Entry
07f4 4503 |E | Exit_Suprogram New_Top_Offset 0x3
07f5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0x10 = 0x7f5,0x10
07f6 0092 0cc3 | | Action Push_String_Extended,0xcc3 ; "SM_FIRST"
07f8 01df | | Execute Vector,Equal
07f9 6806 |h | Jump_Zero 0x800
07fa e7fe | | Load 0x3,-0x2 ; Debug Table 0x17.0x11 = 0x7fa,0x11
07fb e7ff | | Load 0x3,-0x1
07fc 496a |Ij | Short_Literal 0x16a
07fd 00eb | | Load_Encached Diana_Cache
07fe 0096 | | Execute Package,Entry
07ff 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0800 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0x12 = 0x800,0x12
0801 0092 0cc4 | | Action Push_String_Extended,0xcc4 ; "SM_BODY"
0803 01df | | Execute Vector,Equal
0804 6806 |h | Jump_Zero 0x80b
0805 e7fe | | Load 0x3,-0x2 ; Debug Table 0x17.0x13 = 0x805,0x13
0806 e7ff | | Load 0x3,-0x1
0807 4957 |IW | Short_Literal 0x157
0808 00eb | | Load_Encached Diana_Cache
0809 0096 | | Execute Package,Entry
080a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
080b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0x14 = 0x80b,0x14
080c 0092 0cc5 | | Action Push_String_Extended,0xcc5 ; "SM_STUB"
080e 01df | | Execute Vector,Equal
080f 6806 |h | Jump_Zero 0x816
0810 e7fe | | Load 0x3,-0x2 ; Debug Table 0x17.0x15 = 0x810,0x15
0811 e7ff | | Load 0x3,-0x1
0812 496c |Il | Short_Literal 0x16c
0813 00eb | | Load_Encached Diana_Cache
0814 0096 | | Execute Package,Entry
0815 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0816 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0x16 = 0x816,0x16
0817 0092 0cc6 | | Action Push_String_Extended,0xcc6 ; "SM_SPEC"
0819 01df | | Execute Vector,Equal
081a 6806 |h | Jump_Zero 0x821
081b e7fe | | Load 0x3,-0x2 ; Debug Table 0x17.0x17 = 0x81b,0x17
081c e7ff | | Load 0x3,-0x1
081d 4963 |Ic | Short_Literal 0x163
081e 00eb | | Load_Encached Diana_Cache
081f 0096 | | Execute Package,Entry
0820 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0821 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0x18 = 0x821,0x18
0822 0092 0cc7 | | Action Push_String_Extended,0xcc7 ; "SM_OBJ_TYPE"
0824 01df | | Execute Vector,Equal
0825 6806 |h | Jump_Zero 0x82c
0826 e7fe | | Load 0x3,-0x2 ; Debug Table 0x17.0x19 = 0x826,0x19
0827 e7ff | | Load 0x3,-0x1
0828 4961 |Ia | Short_Literal 0x161
0829 00eb | | Load_Encached Diana_Cache
082a 0096 | | Execute Package,Entry
082b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
082c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0x1a = 0x82c,0x1a
082d 0092 0cc8 | | Action Push_String_Extended,0xcc8 ; "SM_OBJ_DEF"
082f 01df | | Execute Vector,Equal
0830 6806 |h | Jump_Zero 0x837
0831 e7fe | | Load 0x3,-0x2 ; Debug Table 0x17.0x1b = 0x831,0x1b
0832 e7ff | | Load 0x3,-0x1
0833 4960 |I` | Short_Literal 0x160
0834 00eb | | Load_Encached Diana_Cache
0835 0096 | | Execute Package,Entry
0836 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0837 0092 0cc9 | | Action Push_String_Extended,0xcc9 ; "bad attribute name: "
; Debug Table 0x17.0x1c = 0x837,0x1c
0839 00d9 | | Load_Top At_Offset_1
083a 01cc | | Execute Vector,Catenate
083b 8219 | | Call 0x1,0x19
083c 4800 |H | Short_Literal 0x0 ; Debug Table 0x17.0x1d = 0x83c,0x1d
083d a7fd | | Store_Unchecked 0x3,-0x3
083e 4503 |E | Exit_Suprogram New_Top_Offset 0x3
083f TRAP_07a0:
083f 0007 | | Action Break_Optional
0840 4800 |H | Short_Literal 0x0 ; Debug Table 0x17.0x1e = 0x840,0x1e
0841 a7fd | | Store_Unchecked 0x3,-0x3
0842 0092 0cca | | Action Push_String_Extended,0xcca ; "exception setting: "
; Debug Table 0x17.0x1f = 0x842,0x1f
0844 00da | | Load_Top At_Offset_2
0845 01cc | | Execute Vector,Catenate
0846 0092 0cb8 | | Action Push_String_Extended,0xcb8 ; " ("
0848 01cc | | Execute Vector,Catenate
0849 e007 | | Load 0x0,0x7
084a 180d | | Execute Package,Field_Execute,Field_Number 0xd
084b 01cc | | Execute Vector,Catenate
084c 0092 0cb4 | | Action Push_String_Extended,0xcb4 ; ")"
084e 01cc | | Execute Vector,Catenate
084f 8219 | | Call 0x1,0x19
0850 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0851 0000 0000 | | .BLANK 0000[0x7]
0858 ; --------------------------------------------------------------------------------------
0858 ; SUBPROGRAM
0858 ; --------------------------------------------------------------------------------------
0858 087f | | .CONST 0x087f ; Address of begin
0859 0953 | S | .CONST 0x0953 ; Address of exception handler
085a 000a | | .CONST 0x000a ; Number of locals
085b INIT_0858:
085b 0007 | | Action Break_Optional ; Debug Table 0x18 = .DEBUG 0x085b,0x1384,0x0001,0x0000,0x0039,0x33c6,0x0000,0x11ce
; Debug Table 0x18.0x0 = 0x85b,0xffff
085c e001 | | Load 0x0,0x1 ; Debug Table 0x18.0x1 = 0x85c,0xfffe
085d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
085e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
085f 02c7 | | Declare_Variable Any
0860 00d8 | | Load_Top At_Offset_0
0861 1c00 | | Execute_Immediate Run_Utility,0x0
0862 e002 | | Load 0x0,0x2 ; Debug Table 0x18.0x2 = 0x862,0xfffd
0863 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0864 02c7 | | Declare_Variable Any
0865 00d8 | | Load_Top At_Offset_0
0866 1c00 | | Execute_Immediate Run_Utility,0x0
0867 e003 | | Load 0x0,0x3 ; Debug Table 0x18.0x3 = 0x867,0xfffc
0868 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0869 e001 | | Load 0x0,0x1 ; Debug Table 0x18.0x4 = 0x869,0xfffb
086a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
086b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
086c 02c7 | | Declare_Variable Any
086d 00d8 | | Load_Top At_Offset_0
086e 1c00 | | Execute_Immediate Run_Utility,0x0
086f 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x18.0x5 = 0x86f,0xfffa
0870 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x18.0x6 = 0x870,0xfff9
0871 e001 | | Load 0x0,0x1 ; Debug Table 0x18.0x7 = 0x871,0xfff8
0872 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0873 02ff | | Declare_Variable Variant_Record
0874 00d8 | | Load_Top At_Offset_0
0875 1c00 | | Execute_Immediate Run_Utility,0x0
0876 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x18.0x8 = 0x876,0xfff7
0877 e004 | | Load 0x0,0x4 ; Debug Table 0x18.0x9 = 0x877,0xfff6
0878 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0879 02c7 | | Declare_Variable Any
087a e005 | | Load 0x0,0x5
087b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
087c e004 | | Load 0x0,0x4
087d 1814 | | Execute Package,Field_Execute,Field_Number 0x14
087e c60a | | Store 0x3,0xa
087f BODY_0858:
087f e005 | | Load 0x0,0x5 ; Debug Table 0x18.0xa = 0x87f,0x1
0880 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0881 4800 |H | Short_Literal 0x0
0882 e001 | | Load 0x0,0x1
0883 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0884 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0885 c605 | | Store 0x3,0x5
0886 e5fe | | Load 0x2,-0x2 ; Debug Table 0x18.0xb = 0x886,0x2
0887 01db | | Execute Vector,Length
0888 700a |p | Jump_Nonzero 0x893
0889 0092 0c99 | | Action Push_String_Extended,0xc99 ; "on_node cannot be empty"
; Debug Table 0x18.0xc = 0x889,0x3
088b 8219 | | Call 0x1,0x19
088c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0xd = 0x88c,0x4
088d 4801 |H | Short_Literal 0x1
088e 4800 |H | Short_Literal 0x0
088f e004 | | Load 0x0,0x4
0890 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0891 c60a | | Store 0x3,0xa
0892 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x18.0xe = 0x892,0x5
0893 e5fe | | Load 0x2,-0x2 ; Debug Table 0x18.0xf = 0x893,0x6
0894 8221 | ! | Call 0x1,0x21
0895 a606 | | Store_Unchecked 0x3,0x6
0896 e606 | | Load 0x3,0x6 ; Debug Table 0x18.0x10 = 0x896,0x7
0897 00eb | | Load_Encached Diana_Cache
0898 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0899 6807 |h | Jump_Zero 0x8a1
089a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x11 = 0x89a,0x8
089b 4801 |H | Short_Literal 0x1
089c 4800 |H | Short_Literal 0x0
089d e004 | | Load 0x0,0x4
089e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
089f c60a | | Store 0x3,0xa
08a0 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x18.0x12 = 0x8a0,0x9
08a1 e5fd | | Load 0x2,-0x3 ; Debug Table 0x18.0x13 = 0x8a1,0xa
08a2 8221 | ! | Call 0x1,0x21
08a3 a607 | | Store_Unchecked 0x3,0x7
08a4 e5fd | | Load 0x2,-0x3 ; Debug Table 0x18.0x14 = 0x8a4,0xb
08a5 01db | | Execute Vector,Length
08a6 680b |h | Jump_Zero 0x8b2
08a7 00db | | Load_Top At_Offset_3
08a8 00eb | | Load_Encached Diana_Cache
08a9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08aa 6807 |h | Jump_Zero 0x8b2
08ab 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x15 = 0x8ab,0xc
08ac 4801 |H | Short_Literal 0x1
08ad 4800 |H | Short_Literal 0x0
08ae e004 | | Load 0x0,0x4
08af 1818 | | Execute Package,Field_Execute,Field_Number 0x18
08b0 c60a | | Store 0x3,0xa
08b1 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x18.0x16 = 0x8b1,0xd
08b2 e606 | | Load 0x3,0x6 ; Debug Table 0x18.0x17 = 0x8b2,0xe
08b3 e001 | | Load 0x0,0x1
08b4 1b13 | | Execute Package,Field_Read,Field_Number 0x13
08b5 1812 | | Execute Package,Field_Execute,Field_Number 0x12
08b6 e001 | | Load 0x0,0x1
08b7 1b13 | | Execute Package,Field_Read,Field_Number 0x13
08b8 181d | | Execute Package,Field_Execute,Field_Number 0x1d
08b9 00db | | Load_Top At_Offset_3
08ba 016d | m | Execute Variant_Record,Structure_Write
08bb e003 | | Load 0x0,0x3 ; Debug Table 0x18.0x18 = 0x8bb,0xf
08bc 1b11 | | Execute Package,Field_Read,Field_Number 0x11
08bd e603 | | Load 0x3,0x3
08be 0120 | | Execute Any,Is_Value
08bf 6803 |h | Jump_Zero 0x8c3
08c0 e002 | | Load 0x0,0x2
08c1 1b14 | | Execute Package,Field_Read,Field_Number 0x14
08c2 7801 |x | Jump 0x8c4
08c3 e603 | | Load 0x3,0x3
08c4 e602 | | Load 0x3,0x2
08c5 0120 | | Execute Any,Is_Value
08c6 6804 |h | Jump_Zero 0x8cb
08c7 e001 | | Load 0x0,0x1
08c8 1b13 | | Execute Package,Field_Read,Field_Number 0x13
08c9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08ca 7801 |x | Jump 0x8cc
08cb e602 | | Load 0x3,0x2
08cc 00db | | Load_Top At_Offset_3
08cd 4800 |H | Short_Literal 0x0
08ce 4803 |H | Short_Literal 0x3
08cf e608 | | Load 0x3,0x8
08d0 e001 | | Load 0x0,0x1
08d1 181b | | Execute Package,Field_Execute,Field_Number 0x1b
08d2 c602 | | Store 0x3,0x2
08d3 c603 | | Store 0x3,0x3
08d4 c604 | | Store 0x3,0x4
08d5 e604 | | Load 0x3,0x4 ; Debug Table 0x18.0x19 = 0x8d5,0x10
08d6 6813 |h | Jump_Zero 0x8ea
08d7 0092 0c9a | | Action Push_String_Extended,0xc9a ; "can't open unit for overwrite: "
; Debug Table 0x18.0x1a = 0x8d7,0x11
08d9 e604 | | Load 0x3,0x4
08da e003 | | Load 0x0,0x3
08db 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08dc 025e | ^ | Execute Discrete,Convert
08dd 1c01 | | Execute_Immediate Run_Utility,0x1
08de 01cc | | Execute Vector,Catenate
08df 0092 0c9b | | Action Push_String_Extended,0xc9b ; ", nothing changed"
08e1 01cc | | Execute Vector,Catenate
08e2 8219 | | Call 0x1,0x19
08e3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x1b = 0x8e3,0x12
08e4 4801 |H | Short_Literal 0x1
08e5 4800 |H | Short_Literal 0x0
08e6 e004 | | Load 0x0,0x4
08e7 1818 | | Execute Package,Field_Execute,Field_Number 0x18
08e8 c60a | | Store 0x3,0xa
08e9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x18.0x1c = 0x8e9,0x13
08ea e005 | | Load 0x0,0x5 ; Debug Table 0x18.0x1d = 0x8ea,0x14
08eb 1810 | | Execute Package,Field_Execute,Field_Number 0x10
08ec 4800 |H | Short_Literal 0x0
08ed e602 | | Load 0x3,0x2
08ee e001 | | Load 0x0,0x1
08ef 1b13 | | Execute Package,Field_Read,Field_Number 0x13
08f0 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
08f1 e606 | | Load 0x3,0x6 ; Debug Table 0x18.0x1e = 0x8f1,0x15
08f2 00eb | | Load_Encached Diana_Cache
08f3 1810 | | Execute Package,Field_Execute,Field_Number 0x10
08f4 e607 | | Load 0x3,0x7
08f5 00eb | | Load_Encached Diana_Cache
08f6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
08f7 021f | | Execute Heap_Access,Equal
08f8 6805 |h | Jump_Zero 0x8fe
08f9 00db | | Load_Top At_Offset_3 ; Debug Table 0x18.0x1f = 0x8f9,0x16
08fa e603 | | Load 0x3,0x3
08fb 00eb | | Load_Encached Diana_Cache
08fc 1819 | | Execute Package,Field_Execute,Field_Number 0x19
08fd a607 | | Store_Unchecked 0x3,0x7
08fe 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x18.0x20 = 0x8fe,0x17
08ff e607 | | Load 0x3,0x7
0900 e606 | | Load 0x3,0x6
0901 e603 | | Load 0x3,0x3
0902 00eb | | Load_Encached Diana_Cache
0903 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0904 8402 | | Call 0x2,0x2
0905 005a | Z | Store_Top Discrete,At_Offset_2
0906 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x18.0x21 = 0x906,0x18
0907 700e |p | Jump_Nonzero 0x916
0908 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x22 = 0x908,0x19
0909 4801 |H | Short_Literal 0x1
090a 4800 |H | Short_Literal 0x0
090b e004 | | Load 0x0,0x4
090c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
090d c60a | | Store 0x3,0xa
090e e005 | | Load 0x0,0x5 ; Debug Table 0x18.0x23 = 0x90e,0x1a
090f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0910 4800 |H | Short_Literal 0x0
0911 e605 | | Load 0x3,0x5
0912 e001 | | Load 0x0,0x1
0913 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0914 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0915 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x18.0x24 = 0x915,0x1b
0916 e003 | | Load 0x0,0x3 ; Debug Table 0x18.0x25 = 0x916,0x1c
0917 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0918 4800 |H | Short_Literal 0x0
0919 4801 |H | Short_Literal 0x1
091a 00db | | Load_Top At_Offset_3
091b e608 | | Load 0x3,0x8
091c e001 | | Load 0x0,0x1
091d 181c | | Execute Package,Field_Execute,Field_Number 0x1c
091e c604 | | Store 0x3,0x4
091f e604 | | Load 0x3,0x4 ; Debug Table 0x18.0x26 = 0x91f,0x1d
0920 681a |h | Jump_Zero 0x93b
0921 0092 0c9c | | Action Push_String_Extended,0xc9c ; "can't close unit: "
; Debug Table 0x18.0x27 = 0x921,0x1e
0923 e604 | | Load 0x3,0x4
0924 e003 | | Load 0x0,0x3
0925 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0926 025e | ^ | Execute Discrete,Convert
0927 1c01 | | Execute_Immediate Run_Utility,0x1
0928 01cc | | Execute Vector,Catenate
0929 0092 0c9b | | Action Push_String_Extended,0xc9b ; ", nothing changed"
092b 01cc | | Execute Vector,Catenate
092c 8219 | | Call 0x1,0x19
092d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x28 = 0x92d,0x1f
092e 4801 |H | Short_Literal 0x1
092f 4800 |H | Short_Literal 0x0
0930 e004 | | Load 0x0,0x4
0931 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0932 c60a | | Store 0x3,0xa
0933 e005 | | Load 0x0,0x5 ; Debug Table 0x18.0x29 = 0x933,0x20
0934 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0935 4800 |H | Short_Literal 0x0
0936 e605 | | Load 0x3,0x5
0937 e001 | | Load 0x0,0x1
0938 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0939 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
093a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x18.0x2a = 0x93a,0x21
093b e005 | | Load 0x0,0x5 ; Debug Table 0x18.0x2b = 0x93b,0x22
093c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
093d 4800 |H | Short_Literal 0x0
093e e605 | | Load 0x3,0x5
093f e001 | | Load 0x0,0x1
0940 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0941 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0942 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x2c = 0x942,0x23
0943 4801 |H | Short_Literal 0x1
0944 4801 |H | Short_Literal 0x1
0945 e004 | | Load 0x0,0x4
0946 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0947 c60a | | Store 0x3,0xa
0948 0092 0ccb | | Action Push_String_Extended,0xccb ; "changed attribute "
; Debug Table 0x18.0x2d = 0x948,0x24
094a e5ff | | Load 0x2,-0x1
094b 01cc | | Execute Vector,Catenate
094c 0092 0ccc | | Action Push_String_Extended,0xccc ; " on node "
094e 01cc | | Execute Vector,Catenate
094f e5fe | | Load 0x2,-0x2
0950 01cc | | Execute Vector,Catenate
0951 821a | | Call 0x1,0x1a
0952 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0953 TRAP_0858:
0953 0007 | | Action Break_Optional
0954 0092 0ccd | | Action Push_String_Extended,0xccd ; "Unexpected exception ("
; Debug Table 0x18.0x2e = 0x954,0x25
0956 e007 | | Load 0x0,0x7
0957 180d | | Execute Package,Field_Execute,Field_Number 0xd
0958 01cc | | Execute Vector,Catenate
0959 0092 0cce | | Action Push_String_Extended,0xcce ; "), nothing changed"
095b 01cc | | Execute Vector,Catenate
095c 8219 | | Call 0x1,0x19
095d e005 | | Load 0x0,0x5 ; Debug Table 0x18.0x2f = 0x95d,0x26
095e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
095f 4800 |H | Short_Literal 0x0
0960 e605 | | Load 0x3,0x5
0961 e001 | | Load 0x0,0x1
0962 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0963 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0964 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x18.0x30 = 0x964,0x27
0965 4801 |H | Short_Literal 0x1
0966 4800 |H | Short_Literal 0x0
0967 e004 | | Load 0x0,0x4
0968 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0969 c60a | | Store 0x3,0xa
096a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
096b 0000 0000 | | .BLANK 0000[0x5]
0970 ; --------------------------------------------------------------------------------------
0970 ; SUBPROGRAM
0970 ; --------------------------------------------------------------------------------------
0970 0973 | s | .CONST 0x0973 ; Address of begin
0971 0004 | | .CONST 0x0004 ; Address of exception handler
0972 0001 | | .CONST 0x0001 ; Number of locals
0973 BODY_0970:
0973 INIT_0970:
0973 4603 |F | Jump_Case 0x4 ; Debug Table 0x19 = .DEBUG 0x0973,0x13e8,0x0005,0x0000,0x0039,0x33c6,0x0000,0x06b8
0974 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
0975 7802 |x | Jump 0x978 ; case 0x1
0976 7805 |x | Jump 0x97c ; case 0x2
0977 7809 |x | Jump 0x981 ; case 0x3
0978 00da | | Load_Top At_Offset_2
0979 0091 0c94 | | Action Push_String_Extended_Indexed,0xc94 ; "NO_KIND"
097b 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
097c 00db | | Load_Top At_Offset_3
097d 00db | | Load_Top At_Offset_3
097e 00e0 | | Load_Encached Standard_Cache
097f 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0980 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0981 00da | | Load_Top At_Offset_2
0982 00e0 | | Load_Encached Standard_Cache
0983 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0984 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0985 0000 0000 | | .XXX[0x3]
0987 0000 | |
0988 ; --------------------------------------------------------------------------------------
0988 ; SUBPROGRAM
0988 ; --------------------------------------------------------------------------------------
0988 098b | | .CONST 0x098b ; Address of begin
0989 0004 | | .CONST 0x0004 ; Address of exception handler
098a 0001 | | .CONST 0x0001 ; Number of locals
098b BODY_0988:
098b INIT_0988:
098b 4608 |F | Jump_Case 0x9 ; Debug Table 0x1a = .DEBUG 0x098b,0x13ea,0x0005,0x0000,0x0039,0x33c6,0x0000,0x06c1
098c 7808 |x | Jump 0x995 ; case 0x0
098d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
098e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
098f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
0990 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
0991 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5
0992 7816 |x | Jump 0x9a9 ; case 0x6
0993 7824 |x$ | Jump 0x9b8 ; case 0x7
0994 7835 |x5 | Jump 0x9ca ; case 0x8
0995 00da | | Load_Top At_Offset_2
0996 016c | l | Execute Variant_Record,Is_Constrained
0997 7009 |p | Jump_Nonzero 0x9a1
0998 00cf | | Action Mark_Auxiliary
0999 4800 |H | Short_Literal 0x0
099a e7ff | | Load 0x3,-0x1
099b 1c08 | | Execute_Immediate Run_Utility,0x8
099c 00d8 | | Load_Top At_Offset_0
099d 1c00 | | Execute_Immediate Run_Utility,0x0
099e c7ff | | Store 0x3,-0x1
099f 00ce | | Action Pop_Auxiliary
09a0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
09a1 00da | | Load_Top At_Offset_2
09a2 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
09a3 4604 |F | Jump_Case 0x5
09a4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
09a5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
09a6 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
09a7 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
09a8 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
09a9 00db | | Load_Top At_Offset_3
09aa 4604 |F | Jump_Case 0x5
09ab 780a |x | Jump 0x9b6 ; case 0x0
09ac 7803 |x | Jump 0x9b0 ; case 0x1
09ad 7804 |x | Jump 0x9b2 ; case 0x2
09ae 7805 |x | Jump 0x9b4 ; case 0x3
09af 7806 |x | Jump 0x9b6 ; case 0x4
09b0 4801 |H | Short_Literal 0x1
09b1 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
09b2 4802 |H | Short_Literal 0x2
09b3 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
09b4 4803 |H | Short_Literal 0x3
09b5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
09b6 48ff |H | Short_Literal 0xff
09b7 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
09b8 00db | | Load_Top At_Offset_3
09b9 e7fe | | Load 0x3,-0x2
09ba 4604 |F | Jump_Case 0x5
09bb 780a |x | Jump 0x9c6 ; case 0x0
09bc 7803 |x | Jump 0x9c0 ; case 0x1
09bd 7804 |x | Jump 0x9c2 ; case 0x2
09be 7805 |x | Jump 0x9c4 ; case 0x3
09bf 7806 |x | Jump 0x9c6 ; case 0x4
09c0 4801 |H | Short_Literal 0x1
09c1 7805 |x | Jump 0x9c7
09c2 4802 |H | Short_Literal 0x2
09c3 7803 |x | Jump 0x9c7
09c4 4803 |H | Short_Literal 0x3
09c5 7801 |x | Jump 0x9c7
09c6 48ff |H | Short_Literal 0xff
09c7 e7ff | | Load 0x3,-0x1
09c8 031b | | Declare_Type Variant_Record,Constrained
09c9 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
09ca 00db | | Load_Top At_Offset_3
09cb e7fe | | Load 0x3,-0x2
09cc e7ff | | Load 0x3,-0x1
09cd 1c06 | | Execute_Immediate Run_Utility,0x6
09ce e7ff | | Load 0x3,-0x1
09cf 02fc | | Declare_Variable Variant_Record,With_Constraint
09d0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
09d1 0000 0000 | | .BLANK 0000[0x7]
09d8 ; --------------------------------------------------------------------------------------
09d8 ; SUBPROGRAM
09d8 ; --------------------------------------------------------------------------------------
09d8 09e1 | | .CONST 0x09e1 ; Address of begin
09d9 0004 | | .CONST 0x0004 ; Address of exception handler
09da 0004 | | .CONST 0x0004 ; Number of locals
09db INIT_09d8:
09db 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b = .DEBUG 0x09db,0x13ec,0x0002,0x0000,0x0039,0x33c6,0x0000,0x06f5
; Debug Table 0x1b.0x0 = 0x9db,0xffff
09dc e00b | | Load 0x0,0xb
09dd 1814 | | Execute Package,Field_Execute,Field_Number 0x14
09de 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1b.0x1 = 0x9de,0xfffe
09df 029f 0c7b | {| Declare_Subprogram INIT_0c78,For_Call
09e1 BODY_09d8:
09e1 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b.0x2 = 0x9e1,0x1
09e2 0092 0ccf | | Action Push_String_Extended,0xccf ; "TRUE"
09e4 01df | | Execute Vector,Equal
09e5 6807 |h | Jump_Zero 0x9ed
09e6 4801 |H | Short_Literal 0x1 ; Debug Table 0x1b.0x3 = 0x9e6,0x2
09e7 e40a | | Load 0x2,0xa
09e8 1c08 | | Execute_Immediate Run_Utility,0x8
09e9 4801 |H | Short_Literal 0x1
09ea 00d9 | | Load_Top At_Offset_1
09eb 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
09ec 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
09ed 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b.0x4 = 0x9ed,0x3
09ee 0092 0cd0 | | Action Push_String_Extended,0xcd0 ; "FALSE"
09f0 01df | | Execute Vector,Equal
09f1 6807 |h | Jump_Zero 0x9f9
09f2 4801 |H | Short_Literal 0x1 ; Debug Table 0x1b.0x5 = 0x9f2,0x4
09f3 e40a | | Load 0x2,0xa
09f4 1c08 | | Execute_Immediate Run_Utility,0x8
09f5 4800 |H | Short_Literal 0x0
09f6 00d9 | | Load_Top At_Offset_1
09f7 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
09f8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
09f9 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b.0x6 = 0x9f9,0x5
09fa 0092 0cd1 | | Action Push_String_Extended,0xcd1 ; "NULL"
09fc 01df | | Execute Vector,Equal
09fd 6808 |h | Jump_Zero 0xa06
09fe 4803 |H | Short_Literal 0x3 ; Debug Table 0x1b.0x7 = 0x9fe,0x6
09ff e40a | | Load 0x2,0xa
0a00 1c08 | | Execute_Immediate Run_Utility,0x8
0a01 00eb | | Load_Encached Diana_Cache
0a02 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0a03 00d9 | | Load_Top At_Offset_1
0a04 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0a05 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a06 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b.0x8 = 0xa06,0x7
0a07 0092 0cd2 | | Action Push_String_Extended,0xcd2 ; "[]"
0a09 01df | | Execute Vector,Equal
0a0a 6804 |h | Jump_Zero 0xa0f
0a0b 4804 |H | Short_Literal 0x4 ; Debug Table 0x1b.0x9 = 0xa0b,0x8
0a0c e40a | | Load 0x2,0xa
0a0d 1c08 | | Execute_Immediate Run_Utility,0x8
0a0e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a0f 4800 |H | Short_Literal 0x0 ; Debug Table 0x1b.0xa = 0xa0f,0x9
0a10 00db | | Load_Top At_Offset_3
0a11 485f |H_ | Short_Literal 0x5f
0a12 e00b | | Load 0x0,0xb
0a13 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0a14 6812 |h | Jump_Zero 0xa27
0a15 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b.0xb = 0xa15,0xa
0a16 8221 | ! | Call 0x1,0x21
0a17 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0a18 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1b.0xc = 0xa18,0xb
0a19 00eb | | Load_Encached Diana_Cache
0a1a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0a1b 6804 |h | Jump_Zero 0xa20
0a1c 4800 |H | Short_Literal 0x0 ; Debug Table 0x1b.0xd = 0xa1c,0xc
0a1d e40a | | Load 0x2,0xa
0a1e 1c08 | | Execute_Immediate Run_Utility,0x8
0a1f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a20 4803 |H | Short_Literal 0x3 ; Debug Table 0x1b.0xe = 0xa20,0xd
0a21 e40a | | Load 0x2,0xa
0a22 1c08 | | Execute_Immediate Run_Utility,0x8
0a23 00da | | Load_Top At_Offset_2
0a24 00d9 | | Load_Top At_Offset_1
0a25 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0a26 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a27 8604 | | Call 0x3,0x4 ; Debug Table 0x1b.0xf = 0xa27,0xe
0a28 4831 |H1 | Short_Literal 0x31
0a29 0257 | W | Execute Discrete,Raise
0a2a 0000 0000 | | .BLANK 0000[0x6]
0a30 ; --------------------------------------------------------------------------------------
0a30 ; SUBPROGRAM
0a30 ; --------------------------------------------------------------------------------------
0a30 0a38 | 8 | .CONST 0x0a38 ; Address of begin
0a31 0004 | | .CONST 0x0004 ; Address of exception handler
0a32 0006 | | .CONST 0x0006 ; Number of locals
0a33 INIT_0a30:
0a33 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1c = .DEBUG 0x0a33,0x140e,0x0001,0x0000,0x0039,0x33c6,0x0000,0x0ad8
; Debug Table 0x1c.0x0 = 0xa33,0xffff
0a34 039d | | Declare_Variable Heap_Access,Duplicate
0a35 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x1c.0x1 = 0xa35,0xfffe
0a36 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x1c.0x2 = 0xa36,0xfffd
0a37 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1c.0x3 = 0xa37,0xfffc
0a38 BODY_0a30:
0a38 e406 | | Load 0x2,0x6 ; Debug Table 0x1c.0x4 = 0xa38,0x1
0a39 00eb | | Load_Encached Diana_Cache
0a3a 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0a3b 0fa8 | | Execute_Immediate Equal,-0x58
0a3c 688c |h | Jump_Zero 0xac9
0a3d e406 | | Load 0x2,0x6 ; Debug Table 0x1c.0x5 = 0xa3d,0x2
0a3e 00eb | | Load_Encached Diana_Cache
0a3f 18e9 | | Execute Package,Field_Execute,Field_Number 0xe9
0a40 a603 | | Store_Unchecked 0x3,0x3
0a41 00db | | Load_Top At_Offset_3 ; Debug Table 0x1c.0x6 = 0xa41,0x3
0a42 00eb | | Load_Encached Diana_Cache
0a43 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0a44 0f49 | I | Execute_Immediate Equal,0x49
0a45 6804 |h | Jump_Zero 0xa4a
0a46 00db | | Load_Top At_Offset_3 ; Debug Table 0x1c.0x7 = 0xa46,0x4
0a47 00eb | | Load_Encached Diana_Cache
0a48 18e5 | | Execute Package,Field_Execute,Field_Number 0xe5
0a49 a603 | | Store_Unchecked 0x3,0x3
0a4a 00db | | Load_Top At_Offset_3 ; Debug Table 0x1c.0x8 = 0xa4a,0x5
0a4b 00eb | | Load_Encached Diana_Cache
0a4c 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0a4d 0f3e | > | Execute_Immediate Equal,0x3e
0a4e 687a |hz | Jump_Zero 0xac9
0a4f 00db | | Load_Top At_Offset_3 ; Debug Table 0x1c.0x9 = 0xa4f,0x6
0a50 00eb | | Load_Encached Diana_Cache
0a51 18d8 | | Execute Package,Field_Execute,Field_Number 0xd8
0a52 a602 | | Store_Unchecked 0x3,0x2
0a53 e602 | | Load 0x3,0x2 ; Debug Table 0x1c.0xa = 0xa53,0x7
0a54 00eb | | Load_Encached Diana_Cache
0a55 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0a56 0f7c | | | Execute_Immediate Equal,0x7c
0a57 6871 |hq | Jump_Zero 0xac9
0a58 e602 | | Load 0x3,0x2 ; Debug Table 0x1c.0xb = 0xa58,0x8
0a59 00eb | | Load_Encached Diana_Cache
0a5a 18bd | | Execute Package,Field_Execute,Field_Number 0xbd
0a5b 00eb | | Load_Encached Diana_Cache
0a5c 1888 | | Execute Package,Field_Execute,Field_Number 0x88
0a5d 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0a5e 00da | | Load_Top At_Offset_2 ; Debug Table 0x1c.0xc = 0xa5e,0x9
0a5f 00eb | | Load_Encached Diana_Cache
0a60 1858 | X | Execute Package,Field_Execute,Field_Number 0x58
0a61 7067 |pg | Jump_Nonzero 0xac9
0a62 00da | | Load_Top At_Offset_2 ; Debug Table 0x1c.0xd = 0xa62,0xa
0a63 00eb | | Load_Encached Diana_Cache
0a64 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
0a65 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0a66 00da | | Load_Top At_Offset_2 ; Debug Table 0x1c.0xe = 0xa66,0xb
0a67 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0a68 00da | | Load_Top At_Offset_2 ; Debug Table 0x1c.0xf = 0xa68,0xc
0a69 00eb | | Load_Encached Diana_Cache
0a6a 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0a6b 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0a6c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1c.0x10 = 0xa6c,0xd
0a6d 00eb | | Load_Encached Diana_Cache
0a6e 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0a6f 0f40 | @ | Execute_Immediate Equal,0x40
0a70 6820 |h | Jump_Zero 0xa91
0a71 00d8 | | Load_Top At_Offset_0
0a72 00eb | | Load_Encached Diana_Cache
0a73 18cf | | Execute Package,Field_Execute,Field_Number 0xcf
0a74 00eb | | Load_Encached Diana_Cache
0a75 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0a76 00eb | | Load_Encached Diana_Cache
0a77 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0a78 0092 0cd3 | | Action Push_String_Extended,0xcd3 ; "READ_ONLY"
0a7a 01df | | Execute Vector,Equal
0a7b 6815 |h | Jump_Zero 0xa91
0a7c 4801 |H | Short_Literal 0x1 ; Debug Table 0x1c.0x11 = 0xa7c,0xe
0a7d 00d9 | | Load_Top At_Offset_1
0a7e 4974 |It | Short_Literal 0x174
0a7f 00eb | | Load_Encached Diana_Cache
0a80 0098 | | Execute Package,Field_Read_Dynamic
0a81 180f | | Execute Package,Field_Execute,Field_Number 0xf
0a82 00da | | Load_Top At_Offset_2 ; Debug Table 0x1c.0x12 = 0xa82,0xf
0a83 e602 | | Load 0x3,0x2
0a84 00eb | | Load_Encached Diana_Cache
0a85 18bd | | Execute Package,Field_Execute,Field_Number 0xbd
0a86 00eb | | Load_Encached Diana_Cache
0a87 1890 | | Execute Package,Field_Execute,Field_Number 0x90
0a88 0092 0cd4 | | Action Push_String_Extended,0xcd4 ; "Removed read_only pragma from "
; Debug Table 0x1c.0x13 = 0xa88,0x10
0a8a e405 | | Load 0x2,0x5
0a8b e008 | | Load 0x0,0x8
0a8c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0a8d 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
0a8e 01cc | | Execute Vector,Catenate
0a8f 821a | | Call 0x1,0x1a
0a90 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x1c.0x14 = 0xa90,0x11
0a91 00cf | | Action Mark_Auxiliary
0a92 7831 |x1 | Jump 0xac4
0a93 00db | | Load_Top At_Offset_3 ; Debug Table 0x1c.0x15 = 0xa93,0x13
0a94 00eb | | Load_Encached Diana_Cache
0a95 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
0a96 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0a97 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1c.0x16 = 0xa97,0x14
0a98 00eb | | Load_Encached Diana_Cache
0a99 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0a9a 0f40 | @ | Execute_Immediate Equal,0x40
0a9b 6821 |h! | Jump_Zero 0xabd
0a9c 00d9 | | Load_Top At_Offset_1
0a9d 00eb | | Load_Encached Diana_Cache
0a9e 18cf | | Execute Package,Field_Execute,Field_Number 0xcf
0a9f 00eb | | Load_Encached Diana_Cache
0aa0 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0aa1 00eb | | Load_Encached Diana_Cache
0aa2 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0aa3 0092 0cd3 | | Action Push_String_Extended,0xcd3 ; "READ_ONLY"
0aa5 01df | | Execute Vector,Equal
0aa6 6816 |h | Jump_Zero 0xabd
0aa7 00db | | Load_Top At_Offset_3 ; Debug Table 0x1c.0x17 = 0xaa7,0x15
0aa8 00eb | | Load_Encached Diana_Cache
0aa9 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0aaa a604 | | Store_Unchecked 0x3,0x4
0aab 00eb | | Load_Encached Diana_Cache ; Debug Table 0x1c.0x18 = 0xaab,0x16
0aac 1857 | W | Execute Package,Field_Execute,Field_Number 0x57
0aad 00db | | Load_Top At_Offset_3
0aae 00eb | | Load_Encached Diana_Cache
0aaf 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
0ab0 00db | | Load_Top At_Offset_3 ; Debug Table 0x1c.0x19 = 0xab0,0x17
0ab1 00db | | Load_Top At_Offset_3
0ab2 00eb | | Load_Encached Diana_Cache
0ab3 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
0ab4 0092 0cd4 | | Action Push_String_Extended,0xcd4 ; "Removed read_only pragma from "
; Debug Table 0x1c.0x1a = 0xab4,0x18
0ab6 e405 | | Load 0x2,0x5
0ab7 e008 | | Load 0x0,0x8
0ab8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0ab9 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
0aba 01cc | | Execute Vector,Catenate
0abb 821a | | Call 0x1,0x1a
0abc 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x1c.0x1b = 0xabc,0x19
0abd 00db | | Load_Top At_Offset_3 ; Debug Table 0x1c.0x1c = 0xabd,0x1a
0abe 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0abf 00db | | Load_Top At_Offset_3 ; Debug Table 0x1c.0x1d = 0xabf,0x1b
0ac0 00eb | | Load_Encached Diana_Cache
0ac1 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0ac2 a604 | | Store_Unchecked 0x3,0x4
0ac3 00c9 | | Action Pop_Auxiliary_Loop
0ac4 00db | | Load_Top At_Offset_3 ; Debug Table 0x1c.0x1e = 0xac4,0x12
0ac5 00eb | | Load_Encached Diana_Cache
0ac6 1858 | X | Execute Package,Field_Execute,Field_Number 0x58
0ac7 6fcb |o | Jump_Zero 0xa93
0ac8 00ce | | Action Pop_Auxiliary
0ac9 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0aca 0000 0000 | | .BLANK 0000[0x6]
0ad0 ; --------------------------------------------------------------------------------------
0ad0 ; SUBPROGRAM
0ad0 ; --------------------------------------------------------------------------------------
0ad0 0ad3 | | .CONST 0x0ad3 ; Address of begin
0ad1 0004 | | .CONST 0x0004 ; Address of exception handler
0ad2 0001 | | .CONST 0x0001 ; Number of locals
0ad3 BODY_0ad0:
0ad3 INIT_0ad0:
0ad3 00eb | | Load_Encached Diana_Cache ; Debug Table 0x1d = .DEBUG 0x0ad3,0x144e,0x0002,0x0000,0x0039,0x33c6,0x0000,0x0df8
; Debug Table 0x1d.0x0 = 0xad3,0x1
0ad4 1857 | W | Execute Package,Field_Execute,Field_Number 0x57
0ad5 4893 |H | Short_Literal 0x93
0ad6 00eb | | Load_Encached Diana_Cache
0ad7 187f | | Execute Package,Field_Execute,Field_Number 0x7f
0ad8 00db | | Load_Top At_Offset_3
0ad9 4817 |H | Short_Literal 0x17
0ada 00eb | | Load_Encached Diana_Cache
0adb 187a | z | Execute Package,Field_Execute,Field_Number 0x7a
0adc 4840 |H@ | Short_Literal 0x40
0add 00eb | | Load_Encached Diana_Cache
0ade 187d | } | Execute Package,Field_Execute,Field_Number 0x7d
0adf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0ae0 ; --------------------------------------------------------------------------------------
0ae0 ; SUBPROGRAM
0ae0 ; --------------------------------------------------------------------------------------
0ae0 0ae9 | | .CONST 0x0ae9 ; Address of begin
0ae1 0004 | | .CONST 0x0004 ; Address of exception handler
0ae2 0007 | | .CONST 0x0007 ; Number of locals
0ae3 INIT_0ae0:
0ae3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1e = .DEBUG 0x0ae3,0x1452,0x0001,0x0000,0x0039,0x33c6,0x0000,0x0e24
; Debug Table 0x1e.0x0 = 0xae3,0xffff
0ae4 039d | | Declare_Variable Heap_Access,Duplicate
0ae5 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1e.0x1 = 0xae5,0xfffe
0ae6 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x1e.0x2 = 0xae6,0xfffd
0ae7 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x1e.0x3 = 0xae7,0xfffc
0ae8 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1e.0x4 = 0xae8,0xfffb
0ae9 BODY_0ae0:
0ae9 e406 | | Load 0x2,0x6 ; Debug Table 0x1e.0x5 = 0xae9,0x1
0aea 00eb | | Load_Encached Diana_Cache
0aeb 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0aec 0fa8 | | Execute_Immediate Equal,-0x58
0aed 6882 |h | Jump_Zero 0xb70
0aee e406 | | Load 0x2,0x6 ; Debug Table 0x1e.0x6 = 0xaee,0x2
0aef 00eb | | Load_Encached Diana_Cache
0af0 18e9 | | Execute Package,Field_Execute,Field_Number 0xe9
0af1 a603 | | Store_Unchecked 0x3,0x3
0af2 e603 | | Load 0x3,0x3 ; Debug Table 0x1e.0x7 = 0xaf2,0x3
0af3 00eb | | Load_Encached Diana_Cache
0af4 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0af5 0f49 | I | Execute_Immediate Equal,0x49
0af6 6804 |h | Jump_Zero 0xafb
0af7 e603 | | Load 0x3,0x3 ; Debug Table 0x1e.0x8 = 0xaf7,0x4
0af8 00eb | | Load_Encached Diana_Cache
0af9 18e5 | | Execute Package,Field_Execute,Field_Number 0xe5
0afa a603 | | Store_Unchecked 0x3,0x3
0afb e603 | | Load 0x3,0x3 ; Debug Table 0x1e.0x9 = 0xafb,0x5
0afc 00eb | | Load_Encached Diana_Cache
0afd 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0afe 0f3e | > | Execute_Immediate Equal,0x3e
0aff 6870 |hp | Jump_Zero 0xb70
0b00 e603 | | Load 0x3,0x3 ; Debug Table 0x1e.0xa = 0xb00,0x6
0b01 00eb | | Load_Encached Diana_Cache
0b02 18d8 | | Execute Package,Field_Execute,Field_Number 0xd8
0b03 a602 | | Store_Unchecked 0x3,0x2
0b04 e602 | | Load 0x3,0x2 ; Debug Table 0x1e.0xb = 0xb04,0x7
0b05 00eb | | Load_Encached Diana_Cache
0b06 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0b07 0f7c | | | Execute_Immediate Equal,0x7c
0b08 6867 |hg | Jump_Zero 0xb70
0b09 e602 | | Load 0x3,0x2 ; Debug Table 0x1e.0xc = 0xb09,0x8
0b0a 00eb | | Load_Encached Diana_Cache
0b0b 18bd | | Execute Package,Field_Execute,Field_Number 0xbd
0b0c a604 | | Store_Unchecked 0x3,0x4
0b0d 00db | | Load_Top At_Offset_3 ; Debug Table 0x1e.0xd = 0xb0d,0x9
0b0e 00eb | | Load_Encached Diana_Cache
0b0f 1888 | | Execute Package,Field_Execute,Field_Number 0x88
0b10 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0b11 00da | | Load_Top At_Offset_2 ; Debug Table 0x1e.0xe = 0xb11,0xa
0b12 00eb | | Load_Encached Diana_Cache
0b13 1858 | X | Execute Package,Field_Execute,Field_Number 0x58
0b14 704f |pO | Jump_Nonzero 0xb64
0b15 00da | | Load_Top At_Offset_2 ; Debug Table 0x1e.0xf = 0xb15,0xb
0b16 00eb | | Load_Encached Diana_Cache
0b17 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
0b18 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0b19 00da | | Load_Top At_Offset_2 ; Debug Table 0x1e.0x10 = 0xb19,0xc
0b1a 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0b1b 00da | | Load_Top At_Offset_2 ; Debug Table 0x1e.0x11 = 0xb1b,0xd
0b1c 00eb | | Load_Encached Diana_Cache
0b1d 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0b1e 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0b1f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1e.0x12 = 0xb1f,0xe
0b20 00eb | | Load_Encached Diana_Cache
0b21 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0b22 0f40 | @ | Execute_Immediate Equal,0x40
0b23 680c |h | Jump_Zero 0xb30
0b24 00d8 | | Load_Top At_Offset_0
0b25 00eb | | Load_Encached Diana_Cache
0b26 18cf | | Execute Package,Field_Execute,Field_Number 0xcf
0b27 00eb | | Load_Encached Diana_Cache
0b28 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0b29 00eb | | Load_Encached Diana_Cache
0b2a 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0b2b 0092 0cd3 | | Action Push_String_Extended,0xcd3 ; "READ_ONLY"
0b2d 01df | | Execute Vector,Equal
0b2e 6801 |h | Jump_Zero 0xb30
0b2f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x1e.0x13 = 0xb2f,0xf
0b30 00cf | | Action Mark_Auxiliary
0b31 7820 |x | Jump 0xb52
0b32 00db | | Load_Top At_Offset_3 ; Debug Table 0x1e.0x14 = 0xb32,0x11
0b33 00eb | | Load_Encached Diana_Cache
0b34 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
0b35 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0b36 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1e.0x15 = 0xb36,0x12
0b37 00eb | | Load_Encached Diana_Cache
0b38 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0b39 0f40 | @ | Execute_Immediate Equal,0x40
0b3a 6810 |h | Jump_Zero 0xb4b
0b3b 00d9 | | Load_Top At_Offset_1
0b3c 00eb | | Load_Encached Diana_Cache
0b3d 18cf | | Execute Package,Field_Execute,Field_Number 0xcf
0b3e 00eb | | Load_Encached Diana_Cache
0b3f 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0b40 00eb | | Load_Encached Diana_Cache
0b41 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0b42 0092 0cd3 | | Action Push_String_Extended,0xcd3 ; "READ_ONLY"
0b44 01df | | Execute Vector,Equal
0b45 6805 |h | Jump_Zero 0xb4b
0b46 00db | | Load_Top At_Offset_3 ; Debug Table 0x1e.0x16 = 0xb46,0x13
0b47 00eb | | Load_Encached Diana_Cache
0b48 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0b49 a605 | | Store_Unchecked 0x3,0x5
0b4a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x1e.0x17 = 0xb4a,0x14
0b4b 00db | | Load_Top At_Offset_3 ; Debug Table 0x1e.0x18 = 0xb4b,0x15
0b4c 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0b4d 00db | | Load_Top At_Offset_3 ; Debug Table 0x1e.0x19 = 0xb4d,0x16
0b4e 00eb | | Load_Encached Diana_Cache
0b4f 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0b50 a605 | | Store_Unchecked 0x3,0x5
0b51 00c9 | | Action Pop_Auxiliary_Loop
0b52 00db | | Load_Top At_Offset_3 ; Debug Table 0x1e.0x1a = 0xb52,0x10
0b53 00eb | | Load_Encached Diana_Cache
0b54 1858 | X | Execute Package,Field_Execute,Field_Number 0x58
0b55 6fdc |o | Jump_Zero 0xb32
0b56 00ce | | Action Pop_Auxiliary
0b57 0092 0cd3 | | Action Push_String_Extended,0xcd3 ; "READ_ONLY"
; Debug Table 0x1e.0x1b = 0xb57,0x17
0b59 840b | | Call 0x2,0xb
0b5a a603 | | Store_Unchecked 0x3,0x3
0b5b e603 | | Load 0x3,0x3 ; Debug Table 0x1e.0x1c = 0xb5b,0x18
0b5c 4975 |Iu | Short_Literal 0x175
0b5d 00eb | | Load_Encached Diana_Cache
0b5e 0098 | | Execute Package,Field_Read_Dynamic
0b5f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b60 00da | | Load_Top At_Offset_2
0b61 00eb | | Load_Encached Diana_Cache
0b62 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
0b63 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0b64 0092 0cd3 | | Action Push_String_Extended,0xcd3 ; "READ_ONLY"
; Debug Table 0x1e.0x1d = 0xb64,0x19
0b66 840b | | Call 0x2,0xb
0b67 a603 | | Store_Unchecked 0x3,0x3
0b68 e603 | | Load 0x3,0x3 ; Debug Table 0x1e.0x1e = 0xb68,0x1a
0b69 4975 |Iu | Short_Literal 0x175
0b6a 00eb | | Load_Encached Diana_Cache
0b6b 0098 | | Execute Package,Field_Read_Dynamic
0b6c 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b6d e604 | | Load 0x3,0x4
0b6e 00eb | | Load_Encached Diana_Cache
0b6f 1890 | | Execute Package,Field_Execute,Field_Number 0x90
0b70 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0b71 0000 0000 | | .BLANK 0000[0x7]
0b78 ; --------------------------------------------------------------------------------------
0b78 ; SUBPROGRAM
0b78 ; --------------------------------------------------------------------------------------
0b78 0b7b | { | .CONST 0x0b7b ; Address of begin
0b79 0004 | | .CONST 0x0004 ; Address of exception handler
0b7a 0001 | | .CONST 0x0001 ; Number of locals
0b7b BODY_0b78:
0b7b INIT_0b78:
0b7b 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x1f = .DEBUG 0x0b7b,0x1492,0x0001,0x0000,0x0039,0x33c6,0x0000,0x062e
; Debug Table 0x1f.0x0 = 0xb7b,0x1
0b7c 0000 0000 | | .BLANK 0000[0x4]
0b80 ; --------------------------------------------------------------------------------------
0b80 ; SUBPROGRAM
0b80 ; --------------------------------------------------------------------------------------
0b80 0b85 | | .CONST 0x0b85 ; Address of begin
0b81 0004 | | .CONST 0x0004 ; Address of exception handler
0b82 0001 | | .CONST 0x0001 ; Number of locals
0b83 INIT_0b80:
0b83 0007 | | Action Break_Optional ; Debug Table 0x20 = .DEBUG 0x0b83,0x1496,0x0002,0x0000,0x0039,0x33c6,0x0000,0x00cd
; Debug Table 0x20.0x0 = 0xb83,0xffff
0b84 0007 | | Action Break_Optional ; Debug Table 0x20.0x1 = 0xb84,0xfffe
0b85 BODY_0b80:
0b85 0007 | | Action Break_Optional ; Debug Table 0x20.0x2 = 0xb85,0x1
0b86 e7ff | | Load 0x3,-0x1 ; Debug Table 0x20.0x3 = 0xb86,0x401
0b87 0007 | | Action Break_Optional
0b88 4400 |D | Exit_Subprogram With_Value,New_Top_Offset 0x0 ; Debug Table 0x20.0x4 = 0xb88,0x402
0b89 4831 0257 |H1 W| .XXX[0x2]
0b8b 0000 0000 | | .BLANK 0000[0x5]
0b90 ; --------------------------------------------------------------------------------------
0b90 ; SUBPROGRAM
0b90 ; --------------------------------------------------------------------------------------
0b90 0b9e | | .CONST 0x0b9e ; Address of begin
0b91 0bfa | | .CONST 0x0bfa ; Address of exception handler
0b92 0008 | | .CONST 0x0008 ; Number of locals
0b93 INIT_0b90:
0b93 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x21 = .DEBUG 0x0b93,0x14a2,0x0002,0x0000,0x0039,0x33c6,0x0000,0x0114
; Debug Table 0x21.0x0 = 0xb93,0xffff
0b94 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x21.0x1 = 0xb94,0xfffe
0b95 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x21.0x2 = 0xb95,0xfffd
0b96 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0b97 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x21.0x3 = 0xb97,0xfffc
0b98 e404 | | Load 0x2,0x4 ; Debug Table 0x21.0x4 = 0xb98,0xfffb
0b99 0007 | | Action Break_Optional
0b9a e00c | | Load 0x0,0xc ; Debug Table 0x21.0x5 = 0xb9a,0xfffa
0b9b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b9c 0322 | " | Declare_Variable Record
0b9d 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x21.0x6 = 0xb9d,0xfff9
0b9e BODY_0b90:
0b9e 00cf | | Action Mark_Auxiliary ; Debug Table 0x21.0x7 = 0xb9e,0xfff8
0b9f e7ff | | Load 0x3,-0x1 ; Debug Table 0x21.0x8 = 0xb9f,0x1
0ba0 01d9 | | Execute Vector,Reverse_Bounds
0ba1 0263 | c | Execute Discrete,Above_Bound
0ba2 702c |p, | Jump_Nonzero 0xbcf
0ba3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x21.0x9 = 0xba3,0x2
0ba4 e7ff | | Load 0x3,-0x1
0ba5 01d7 | | Execute Vector,Field_Read
0ba6 0f5f | _ | Execute_Immediate Equal,0x5f
0ba7 6825 |h% | Jump_Zero 0xbcd
0ba8 0092 0cd5 | | Action Push_String_Extended,0xcd5 ; "16#"
; Debug Table 0x21.0xa = 0xba8,0x3
0baa 4801 |H | Short_Literal 0x1
0bab 00da | | Load_Top At_Offset_2
0bac 0aff | | Execute_Immediate Plus,-0x1
0bad 0248 | H | Execute Discrete,Check_In_Integer
0bae e7ff | | Load 0x3,-0x1
0baf 01cf | | Execute Vector,Slice_Read
0bb0 01cc | | Execute Vector,Catenate
0bb1 0092 0cd6 | | Action Push_String_Extended,0xcd6 ; "#"
0bb3 01cc | | Execute Vector,Catenate
0bb4 00e2 | | Load_Encached Integer_Cache
0bb5 00e0 | | Load_Encached Standard_Cache
0bb6 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0bb7 a602 | | Store_Unchecked 0x3,0x2
0bb8 0092 0cd5 | | Action Push_String_Extended,0xcd5 ; "16#"
; Debug Table 0x21.0xb = 0xbb8,0x4
0bba 00d9 | | Load_Top At_Offset_1
0bbb 0a01 | | Execute_Immediate Plus,0x1
0bbc 0248 | H | Execute Discrete,Check_In_Integer
0bbd e7ff | | Load 0x3,-0x1
0bbe 01dc | | Execute Vector,Last
0bbf e7ff | | Load 0x3,-0x1
0bc0 01cf | | Execute Vector,Slice_Read
0bc1 01cc | | Execute Vector,Catenate
0bc2 0092 0cd6 | | Action Push_String_Extended,0xcd6 ; "#"
0bc4 01cc | | Execute Vector,Catenate
0bc5 00e2 | | Load_Encached Integer_Cache
0bc6 00e0 | | Load_Encached Standard_Cache
0bc7 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0bc8 a603 | | Store_Unchecked 0x3,0x3
0bc9 4801 |H | Short_Literal 0x1 ; Debug Table 0x21.0xc = 0xbc9,0x5
0bca a604 | | Store_Unchecked 0x3,0x4
0bcb 00d2 | | Pop_Control Pop_Count_2 ; Debug Table 0x21.0xd = 0xbcb,0x6
0bcc 7802 |x | Jump 0xbcf
0bcd 00c8 | | Action Pop_Auxiliary_Range
0bce 3fd4 |? | Loop_Increasing 0xba3
0bcf 00ce | | Action Pop_Auxiliary
0bd0 e604 | | Load 0x3,0x4 ; Debug Table 0x21.0xe = 0xbd0,0x7
0bd1 7008 |p | Jump_Nonzero 0xbda
0bd2 0092 0cd7 | | Action Push_String_Extended,0xcd7 ; "bad format for node name: "
; Debug Table 0x21.0xf = 0xbd2,0x8
0bd4 e7ff | | Load 0x3,-0x1
0bd5 01cc | | Execute Vector,Catenate
0bd6 8219 | | Call 0x1,0x19
0bd7 00eb | | Load_Encached Diana_Cache ; Debug Table 0x21.0x10 = 0xbd7,0x9
0bd8 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0bd9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0bda 4804 |H | Short_Literal 0x4 ; Debug Table 0x21.0x11 = 0xbda,0xa
0bdb e602 | | Load 0x3,0x2
0bdc 4802 |H | Short_Literal 0x2
0bdd 4820 |H | Short_Literal 0x20
0bde 026d | m | Execute Discrete,Exponentiate
0bdf 0271 | q | Execute Discrete,Times
0be0 e00c | | Load 0x0,0xc
0be1 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0be2 00da | | Load_Top At_Offset_2
0be3 017d | } | Execute Record,Structure_Write
0be4 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x21.0x12 = 0xbe4,0xb
0be5 e002 | | Load 0x0,0x2
0be6 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0be7 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0be8 e603 | | Load 0x3,0x3 ; Debug Table 0x21.0x13 = 0xbe8,0xc
0be9 e00d | | Load 0x0,0xd
0bea 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0beb 025b | [ | Execute Discrete,Check_In_Type
0bec 00d9 | | Load_Top At_Offset_1
0bed e405 | | Load 0x2,0x5
0bee e406 | | Load 0x2,0x6
0bef 4807 |H | Short_Literal 0x7
0bf0 4802 |H | Short_Literal 0x2
0bf1 0099 | | Action Reference_Dynamic
0bf2 e002 | | Load 0x0,0x2
0bf3 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0bf4 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0bf5 00da | | Load_Top At_Offset_2 ; Debug Table 0x21.0x14 = 0xbf5,0xd
0bf6 840a | | Call 0x2,0xa
0bf7 a605 | | Store_Unchecked 0x3,0x5
0bf8 00db | | Load_Top At_Offset_3 ; Debug Table 0x21.0x15 = 0xbf8,0xe
0bf9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0bfa TRAP_0b90:
0bfa 0007 | | Action Break_Optional
0bfb 0092 0cd8 | | Action Push_String_Extended,0xcd8 ; "exception converting: "
; Debug Table 0x21.0x16 = 0xbfb,0xf
0bfd e7ff | | Load 0x3,-0x1
0bfe 01cc | | Execute Vector,Catenate
0bff 0092 0cb8 | | Action Push_String_Extended,0xcb8 ; " ("
0c01 01cc | | Execute Vector,Catenate
0c02 e007 | | Load 0x0,0x7
0c03 180d | | Execute Package,Field_Execute,Field_Number 0xd
0c04 01cc | | Execute Vector,Catenate
0c05 0092 0cb4 | | Action Push_String_Extended,0xcb4 ; ")"
0c07 01cc | | Execute Vector,Catenate
0c08 8219 | | Call 0x1,0x19
0c09 00eb | | Load_Encached Diana_Cache ; Debug Table 0x21.0x17 = 0xc09,0x10
0c0a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0c0b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c0c 0000 0000 | | .BLANK 0000[0x4]
0c10 ; --------------------------------------------------------------------------------------
0c10 ; SUBPROGRAM
0c10 ; --------------------------------------------------------------------------------------
0c10 0c13 | | .CONST 0x0c13 ; Address of begin
0c11 0004 | | .CONST 0x0004 ; Address of exception handler
0c12 0001 | | .CONST 0x0001 ; Number of locals
0c13 BODY_0c10:
0c13 INIT_0c10:
0c13 00cf | | Action Mark_Auxiliary ; Debug Table 0x22 = .DEBUG 0x0c13,0x14d4,0x0002,0x0000,0x0039,0x33c6,0x0000,0x021a
0c14 7805 |x | Jump 0xc1a
0c15 e402 | | Load 0x2,0x2 ; Debug Table 0x22.0x0 = 0xc15,0x2
0c16 00eb | | Load_Encached Diana_Cache
0c17 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0c18 a402 | | Store_Unchecked 0x2,0x2
0c19 00c9 | | Action Pop_Auxiliary_Loop
0c1a e402 | | Load 0x2,0x2 ; Debug Table 0x22.0x1 = 0xc1a,0x1
0c1b 00eb | | Load_Encached Diana_Cache
0c1c 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0c1d 00eb | | Load_Encached Diana_Cache
0c1e 1858 | X | Execute Package,Field_Execute,Field_Number 0x58
0c1f 6ff5 |o | Jump_Zero 0xc15
0c20 00ce | | Action Pop_Auxiliary
0c21 e402 | | Load 0x2,0x2 ; Debug Table 0x22.0x2 = 0xc21,0x3
0c22 00eb | | Load_Encached Diana_Cache
0c23 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
0c24 00ca | | Action Exit_Nullary_Function
0c25 0000 0000 | | .XXX[0x3]
0c27 0000 | |
0c28 ; --------------------------------------------------------------------------------------
0c28 ; SUBPROGRAM
0c28 ; --------------------------------------------------------------------------------------
0c28 0c2b | + | .CONST 0x0c2b ; Address of begin
0c29 0c30 | 0 | .CONST 0x0c30 ; Address of exception handler
0c2a 0001 | | .CONST 0x0001 ; Number of locals
0c2b BODY_0c28:
0c2b INIT_0c28:
0c2b e405 | | Load 0x2,0x5 ; Debug Table 0x23 = .DEBUG 0x0c2b,0x14dc,0x0004,0x0000,0x0039,0x33c6,0x0000,0x0508
; Debug Table 0x23.0x0 = 0xc2b,0x1
0c2c 00eb | | Load_Encached Diana_Cache
0c2d 18ec | | Execute Package,Field_Execute,Field_Number 0xec
0c2e a405 | | Store_Unchecked 0x2,0x5
0c2f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c30 TRAP_0c28:
0c30 0007 | | Action Break_Optional
0c31 00eb | | Load_Encached Diana_Cache ; Debug Table 0x23.0x1 = 0xc31,0x2
0c32 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0c33 a405 | | Store_Unchecked 0x2,0x5
0c34 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c35 0000 0000 | | .XXX[0x3]
0c37 0000 | |
0c38 ; --------------------------------------------------------------------------------------
0c38 ; SUBPROGRAM
0c38 ; --------------------------------------------------------------------------------------
0c38 0c3b | ; | .CONST 0x0c3b ; Address of begin
0c39 0c52 | R | .CONST 0x0c52 ; Address of exception handler
0c3a 0001 | | .CONST 0x0001 ; Number of locals
0c3b BODY_0c38:
0c3b INIT_0c38:
0c3b e405 | | Load 0x2,0x5 ; Debug Table 0x24 = .DEBUG 0x0c3b,0x14e2,0x0004,0x0000,0x0039,0x33c6,0x0000,0x0550
; Debug Table 0x24.0x0 = 0xc3b,0x1
0c3c 00eb | | Load_Encached Diana_Cache
0c3d 1883 | | Execute Package,Field_Execute,Field_Number 0x83
0c3e 0f04 | | Execute_Immediate Equal,0x4
0c3f 680d |h | Jump_Zero 0xc4d
0c40 e405 | | Load 0x2,0x5 ; Debug Table 0x24.0x1 = 0xc40,0x2
0c41 00eb | | Load_Encached Diana_Cache
0c42 1888 | | Execute Package,Field_Execute,Field_Number 0x88
0c43 a406 | | Store_Unchecked 0x2,0x6
0c44 e406 | | Load 0x2,0x6 ; Debug Table 0x24.0x2 = 0xc44,0x3
0c45 00eb | | Load_Encached Diana_Cache
0c46 1858 | X | Execute Package,Field_Execute,Field_Number 0x58
0c47 7004 |p | Jump_Nonzero 0xc4c
0c48 e406 | | Load 0x2,0x6 ; Debug Table 0x24.0x3 = 0xc48,0x4
0c49 00eb | | Load_Encached Diana_Cache
0c4a 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
0c4b a405 | | Store_Unchecked 0x2,0x5
0c4c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c4d e405 | | Load 0x2,0x5 ; Debug Table 0x24.0x4 = 0xc4d,0x5
0c4e 00eb | | Load_Encached Diana_Cache
0c4f 1885 | | Execute Package,Field_Execute,Field_Number 0x85
0c50 a405 | | Store_Unchecked 0x2,0x5
0c51 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c52 TRAP_0c38:
0c52 0007 | | Action Break_Optional
0c53 00eb | | Load_Encached Diana_Cache ; Debug Table 0x24.0x5 = 0xc53,0x6
0c54 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0c55 a405 | | Store_Unchecked 0x2,0x5
0c56 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c57 0000 | | .XXX[0x1]
0c58 ; --------------------------------------------------------------------------------------
0c58 ; SUBPROGRAM
0c58 ; --------------------------------------------------------------------------------------
0c58 0c5b | [ | .CONST 0x0c5b ; Address of begin
0c59 0c60 | ` | .CONST 0x0c60 ; Address of exception handler
0c5a 0001 | | .CONST 0x0001 ; Number of locals
0c5b BODY_0c58:
0c5b INIT_0c58:
0c5b e405 | | Load 0x2,0x5 ; Debug Table 0x25 = .DEBUG 0x0c5b,0x14f0,0x0004,0x0000,0x0039,0x33c6,0x0000,0x0569
; Debug Table 0x25.0x0 = 0xc5b,0x1
0c5c 00eb | | Load_Encached Diana_Cache
0c5d 1886 | | Execute Package,Field_Execute,Field_Number 0x86
0c5e a405 | | Store_Unchecked 0x2,0x5
0c5f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c60 TRAP_0c58:
0c60 0007 | | Action Break_Optional
0c61 00eb | | Load_Encached Diana_Cache ; Debug Table 0x25.0x1 = 0xc61,0x2
0c62 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0c63 a405 | | Store_Unchecked 0x2,0x5
0c64 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c65 0000 0000 | | .XXX[0x3]
0c67 0000 | |
0c68 ; --------------------------------------------------------------------------------------
0c68 ; SUBPROGRAM
0c68 ; --------------------------------------------------------------------------------------
0c68 0c6b | k | .CONST 0x0c6b ; Address of begin
0c69 0c70 | p | .CONST 0x0c70 ; Address of exception handler
0c6a 0001 | | .CONST 0x0001 ; Number of locals
0c6b BODY_0c68:
0c6b INIT_0c68:
0c6b e405 | | Load 0x2,0x5 ; Debug Table 0x26 = .DEBUG 0x0c6b,0x14f6,0x0004,0x0000,0x0039,0x33c6,0x0000,0x0582
; Debug Table 0x26.0x0 = 0xc6b,0x1
0c6c 00eb | | Load_Encached Diana_Cache
0c6d 1887 | | Execute Package,Field_Execute,Field_Number 0x87
0c6e a405 | | Store_Unchecked 0x2,0x5
0c6f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c70 TRAP_0c68:
0c70 0007 | | Action Break_Optional
0c71 00eb | | Load_Encached Diana_Cache ; Debug Table 0x26.0x1 = 0xc71,0x2
0c72 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0c73 a405 | | Store_Unchecked 0x2,0x5
0c74 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c75 0000 0000 | | .XXX[0x3]
0c77 0000 | |
0c78 ; --------------------------------------------------------------------------------------
0c78 ; SUBPROGRAM
0c78 ; --------------------------------------------------------------------------------------
0c78 0c7b | { | .CONST 0x0c7b ; Address of begin
0c79 0c86 | | .CONST 0x0c86 ; Address of exception handler
0c7a 0001 | | .CONST 0x0001 ; Number of locals
0c7b BODY_0c78:
0c7b INIT_0c78:
0c7b 4802 |H | Short_Literal 0x2 ; Debug Table 0x27 = .DEBUG 0x0c7b,0x14fc,0x0004,0x0000,0x0039,0x33c6,0x0000,0x0789
; Debug Table 0x27.0x0 = 0xc7b,0x1
0c7c e40a | | Load 0x2,0xa
0c7d 1c08 | | Execute_Immediate Run_Utility,0x8
0c7e e602 | | Load 0x3,0x2
0c7f 00e2 | | Load_Encached Integer_Cache
0c80 00e0 | | Load_Encached Standard_Cache
0c81 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0c82 00d9 | | Load_Top At_Offset_1
0c83 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
0c84 00cb | | Action Pop_Block_With_Result
0c85 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c86 TRAP_0c78:
0c86 0007 | | Action Break_Optional
0c87 0092 0cd9 | | Action Push_String_Extended,0xcd9 ; "to_value "
; Debug Table 0x27.0x1 = 0xc87,0x2
0c89 e5fd | | Load 0x2,-0x3
0c8a 01cc | | Execute Vector,Catenate
0c8b 0092 0cda | | Action Push_String_Extended,0xcda ; " is not recognizable"
0c8d 01cc | | Execute Vector,Catenate
0c8e 8219 | | Call 0x1,0x19
0c8f 4800 |H | Short_Literal 0x0 ; Debug Table 0x27.0x2 = 0xc8f,0x3
0c90 e40a | | Load 0x2,0xa
0c91 1c08 | | Execute_Immediate Run_Utility,0x8
0c92 00cb | | Action Pop_Block_With_Result
0c93 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c94 ; --------------------------------------------------------------------------------------
0c94 ; STRING TABLE
0c94 ; --------------------------------------------------------------------------------------
0c94 0090 | | .STRTAB 0x0090->0x0cdc ; "NO_KIND"
0c95 0095 | | .STRTAB 0x0095->0x0cdf ; "BOOLEAN_KIND"
0c96 009f | | .STRTAB 0x009f->0x0ce5 ; "INTEGER_KIND"
0c97 00a9 | | .STRTAB 0x00a9->0x0ceb ; "TREE_KIND"
0c98 00b0 | | .STRTAB 0x00b0->0x0cf0 ; "ID_TABLE_KIND"
0c99 00bb | | .STRTAB 0x00bb->0x0cf6 ; "on_node cannot be empty"
0c9a 00d0 | | .STRTAB 0x00d0->0x0d02 ; "can't open unit for overwrite: "
0c9b 00ed | | .STRTAB 0x00ed->0x0d11 ; ", nothing changed"
0c9c 00fc | | .STRTAB 0x00fc->0x0d1a ; "can't close unit: "
0c9d 010c | | .STRTAB 0x010c->0x0d23 ; "Added "
0c9e 0110 | | .STRTAB 0x0110->0x0d26 ; " attribute to "
0c9f 011c | | .STRTAB 0x011c->0x0d2d ; " with value "
0ca0 0126 | & | .STRTAB 0x0126->0x0d33 ; "Unexpected exception "
0ca1 0139 | 9 | .STRTAB 0x0139->0x0d3d ; " while adding attribute, nothing_changed"
0ca2 015f | _ | .STRTAB 0x015f->0x0d51 ; "from_node cannot be empty"
0ca3 0176 | v | .STRTAB 0x0176->0x0d5e ; "node does not have the "
0ca4 018b | | .STRTAB 0x018b->0x0d69 ; " attribute"
0ca5 0193 | | .STRTAB 0x0193->0x0d6e ; "Removed "
0ca6 0199 | | .STRTAB 0x0199->0x0d72 ; " attribute from "
0ca7 01a7 | | .STRTAB 0x01a7->0x0d7a ; "Unexpected exception while removing attribute"
0ca8 01d2 | | .STRTAB 0x01d2->0x0d91 ; "SM_READ_ONLY"
0ca9 01dc | | .STRTAB 0x01dc->0x0d97 ; "can't resolve \x22"
0caa 01e9 | | .STRTAB 0x01e9->0x0d9e ; "\x22: "
0cab 01ea | | .STRTAB 0x01ea->0x0da0 ; "Removed read_only attribute from "
0cac 0209 | | .STRTAB 0x0209->0x0db0 ; "unit "
0cad 020c | | .STRTAB 0x020c->0x0db3 ; " does not have a read_only attribute"
0cae 022e | . | .STRTAB 0x022e->0x0dc5 ; "Unexpected exception while removing read_only attribute from "
0caf 0269 | i | .STRTAB 0x0269->0x0de3 ; "added read_only attribute to "
0cb0 0284 | | .STRTAB 0x0284->0x0df2 ; "Unexpected exception while adding read_only attribute to "
0cb1 02bb | | .STRTAB 0x02bb->0x0e0e ; " has been changed to source"
0cb2 02d4 | | .STRTAB 0x02d4->0x0e1c ; "Unexpected exception while changing "
0cb3 02f6 | | .STRTAB 0x02f6->0x0e2e ; " to source ("
0cb4 0300 | | .STRTAB 0x0300->0x0e34 ; ")"
0cb5 02ff | | .STRTAB 0x02ff->0x0e34 ; "*** "
0cb6 0301 | | .STRTAB 0x0301->0x0e36 ; "+++ "
0cb7 0303 | | .STRTAB 0x0303->0x0e38 ; "can't resolve "
0cb8 030f | | .STRTAB 0x030f->0x0e3f ; " ("
0cb9 030f | | .STRTAB 0x030f->0x0e40 ; "unknown positioning character "
0cba 032b | + | .STRTAB 0x032b->0x0e4f ; "bad positioning character "
0cbb 0343 | C | .STRTAB 0x0343->0x0e5c ; " at position"
0cbc 034d | M | .STRTAB 0x034d->0x0e62 ; "SM_DEFN"
0cbd 0352 | R | .STRTAB 0x0352->0x0e66 ; "SM_EXP_TYPE"
0cbe 035b | [ | .STRTAB 0x035b->0x0e6b ; "SM_TYPE_SPEC"
0cbf 0365 | e | .STRTAB 0x0365->0x0e71 ; "SM_DISCRIMINANTS"
0cc0 0373 | s | .STRTAB 0x0373->0x0e79 ; "SM_BASE_TYPE"
0cc1 037d | } | .STRTAB 0x037d->0x0e7f ; "SM_TYPE_STRUCT"
0cc2 0389 | | .STRTAB 0x0389->0x0e86 ; "SM_CONSTRAINT"
0cc3 0394 | | .STRTAB 0x0394->0x0e8d ; "SM_FIRST"
0cc4 039a | | .STRTAB 0x039a->0x0e91 ; "SM_BODY"
0cc5 039f | | .STRTAB 0x039f->0x0e94 ; "SM_STUB"
0cc6 03a4 | | .STRTAB 0x03a4->0x0e98 ; "SM_SPEC"
0cc7 03a9 | | .STRTAB 0x03a9->0x0e9b ; "SM_OBJ_TYPE"
0cc8 03b2 | | .STRTAB 0x03b2->0x0ea1 ; "SM_OBJ_DEF"
0cc9 03ba | | .STRTAB 0x03ba->0x0ea6 ; "bad attribute name: "
0cca 03cc | | .STRTAB 0x03cc->0x0eb0 ; "exception setting: "
0ccb 03dd | | .STRTAB 0x03dd->0x0eb9 ; "changed attribute "
0ccc 03ed | | .STRTAB 0x03ed->0x0ec2 ; " on node "
0ccd 03f4 | | .STRTAB 0x03f4->0x0ec7 ; "Unexpected exception ("
0cce 0408 | | .STRTAB 0x0408->0x0ed2 ; "), nothing changed"
0ccf 0418 | | .STRTAB 0x0418->0x0edb ; "TRUE"
0cd0 041a | | .STRTAB 0x041a->0x0edd ; "FALSE"
0cd1 041d | | .STRTAB 0x041d->0x0edf ; "NULL"
0cd2 041f | | .STRTAB 0x041f->0x0ee1 ; "[]"
0cd3 041f | | .STRTAB 0x041f->0x0ee2 ; "READ_ONLY"
0cd4 0426 | & | .STRTAB 0x0426->0x0ee7 ; "Removed read_only pragma from "
0cd5 0442 | B | .STRTAB 0x0442->0x0ef6 ; "16#"
0cd6 0443 | C | .STRTAB 0x0443->0x0ef7 ; "#"
0cd7 0442 | B | .STRTAB 0x0442->0x0ef8 ; "bad format for node name: "
0cd8 045a | Z | .STRTAB 0x045a->0x0f05 ; "exception converting: "
0cd9 046e | n | .STRTAB 0x046e->0x0f10 ; "to_value "
0cda 0475 | u | .STRTAB 0x0475->0x0f14 ; " is not recognizable"
0cdb 0487 | | .STREND 0x0487->0x0f1e
0cdc 4e4f 5f4b |NO_K| .STRTAB_STRINGS
0f1f 0000 | | .XXX[0x1]
0f20 ; --------------------------------------------------------------------------------------
0f20 ; Debug Table
0f20 ; --------------------------------------------------------------------------------------
0f20 0003 0028 | (| .CONST 0x0003,0x0028
0f22 000b 1062 | b| .DEBUG 0x000b,0x1062,0x8000,0x0000,0x0038,0xc7e6,0x0000,0x0003
0f2a 0020 1078 | x| .DEBUG 0x0020,0x1078,0x8000,0x0000,0x0039,0x33c6,0x0000,0x001d
0f32 0053 10a8 | S | .DEBUG 0x0053,0x10a8,0x0001,0x0000,0x0038,0xc7e6,0x0000,0x0004
0f3a 0063 10b0 | c | .DEBUG 0x0063,0x10b0,0x0001,0x0000,0x0038,0xc7e6,0x0000,0x0014
0f42 018b 110e | | .DEBUG 0x018b,0x110e,0x0001,0x0000,0x0038,0xc7e6,0x0000,0x0025
0f4a 0263 115a | c Z| .DEBUG 0x0263,0x115a,0x0001,0x0000,0x0038,0xc7e6,0x0000,0x0031
0f52 0373 11ae | s | .DEBUG 0x0373,0x11ae,0x0001,0x0000,0x0038,0xc7e6,0x0000,0x003e
0f5a 0473 1200 | s | .DEBUG 0x0473,0x1200,0x0001,0x0000,0x0038,0xc7e6,0x0000,0x004b
0f62 053b 1238 | ; 8| .DEBUG 0x053b,0x1238,0x0001,0x0000,0x0038,0xc7e6,0x0000,0x0053
0f6a 055b 1246 | [ F| .DEBUG 0x055b,0x1246,0x0001,0x0000,0x0038,0xc7e6,0x0000,0x005b
0f72 056b 124a | k J| .DEBUG 0x056b,0x124a,0x0001,0x0000,0x0038,0xc7e6,0x0000,0x0067
0f7a 0573 124e | s N| .DEBUG 0x0573,0x124e,0x0001,0x0000,0x0038,0xc7e6,0x0000,0x0074
0f82 057b 1252 | { R| .DEBUG 0x057b,0x1252,0x0001,0x0000,0x0039,0x33c6,0x0000,0x002a
0f8a 0583 1258 | X| .DEBUG 0x0583,0x1258,0x0001,0x0000,0x0039,0x33c6,0x0000,0x003d
0f92 058b 125e | ^| .DEBUG 0x058b,0x125e,0x0001,0x0000,0x0039,0x33c6,0x0000,0x004b
0f9a 059b 1264 | d| .DEBUG 0x059b,0x1264,0x0001,0x0000,0x0039,0x33c6,0x0000,0x0062
0fa2 05ab 126a | j| .DEBUG 0x05ab,0x126a,0x0002,0x0000,0x0039,0x33c6,0x0000,0x0079
0faa 05cb 1282 | | .DEBUG 0x05cb,0x1282,0x0002,0x0000,0x0039,0x33c6,0x0000,0x0207
0fb2 0603 12a0 | | .DEBUG 0x0603,0x12a0,0x0002,0x0000,0x0039,0x33c6,0x0000,0x02b4
0fba 0643 12c8 | C | .DEBUG 0x0643,0x12c8,0x0002,0x0000,0x0039,0x33c6,0x0000,0x0353
0fc2 067b 12e0 | { | .DEBUG 0x067b,0x12e0,0x0002,0x0000,0x0039,0x33c6,0x0000,0x03da
0fca 06d3 12f8 | | .DEBUG 0x06d3,0x12f8,0x0002,0x0000,0x0039,0x33c6,0x0000,0x0453
0fd2 078b 1336 | 6| .DEBUG 0x078b,0x1336,0x0002,0x0000,0x0039,0x33c6,0x0000,0x05ed
0fda 07a3 1342 | B| .DEBUG 0x07a3,0x1342,0x0001,0x0000,0x0039,0x33c6,0x0000,0x10cc
0fe2 085b 1384 | [ | .DEBUG 0x085b,0x1384,0x0001,0x0000,0x0039,0x33c6,0x0000,0x11ce
0fea 0973 13e8 | s | .DEBUG 0x0973,0x13e8,0x0005,0x0000,0x0039,0x33c6,0x0000,0x06b8
0ff2 098b 13ea | | .DEBUG 0x098b,0x13ea,0x0005,0x0000,0x0039,0x33c6,0x0000,0x06c1
0ffa 09db 13ec | | .DEBUG 0x09db,0x13ec,0x0002,0x0000,0x0039,0x33c6,0x0000,0x06f5
1002 0a33 140e | 3 | .DEBUG 0x0a33,0x140e,0x0001,0x0000,0x0039,0x33c6,0x0000,0x0ad8
100a 0ad3 144e | N| .DEBUG 0x0ad3,0x144e,0x0002,0x0000,0x0039,0x33c6,0x0000,0x0df8
1012 0ae3 1452 | R| .DEBUG 0x0ae3,0x1452,0x0001,0x0000,0x0039,0x33c6,0x0000,0x0e24
101a 0b7b 1492 | { | .DEBUG 0x0b7b,0x1492,0x0001,0x0000,0x0039,0x33c6,0x0000,0x062e
1022 0b83 1496 | | .DEBUG 0x0b83,0x1496,0x0002,0x0000,0x0039,0x33c6,0x0000,0x00cd
102a 0b93 14a2 | | .DEBUG 0x0b93,0x14a2,0x0002,0x0000,0x0039,0x33c6,0x0000,0x0114
1032 0c13 14d4 | | .DEBUG 0x0c13,0x14d4,0x0002,0x0000,0x0039,0x33c6,0x0000,0x021a
103a 0c2b 14dc | + | .DEBUG 0x0c2b,0x14dc,0x0004,0x0000,0x0039,0x33c6,0x0000,0x0508
1042 0c3b 14e2 | ; | .DEBUG 0x0c3b,0x14e2,0x0004,0x0000,0x0039,0x33c6,0x0000,0x0550
104a 0c5b 14f0 | [ | .DEBUG 0x0c5b,0x14f0,0x0004,0x0000,0x0039,0x33c6,0x0000,0x0569
1052 0c6b 14f6 | k | .DEBUG 0x0c6b,0x14f6,0x0004,0x0000,0x0039,0x33c6,0x0000,0x0582
105a 0c7b 14fc | { | .DEBUG 0x0c7b,0x14fc,0x0004,0x0000,0x0039,0x33c6,0x0000,0x0789
1062 ; --------------------------------------------------------------------------------------
1062 ; Debug3 Subtable 0x0
1062 ; --------------------------------------------------------------------------------------
1062 000a 0000 | | .DBG3TAB 0x000a,0x0000
1064 000b ffff | | .CONST 0x000b,0xffff
1066 000d fffe | | .CONST 0x000d,0xfffe
1068 000f fffd | | .CONST 0x000f,0xfffd
106a 0011 fffc | | .CONST 0x0011,0xfffc
106c 0013 fffb | | .CONST 0x0013,0xfffb
106e 0015 fffa | | .CONST 0x0015,0xfffa
1070 0017 fff9 | | .CONST 0x0017,0xfff9
1072 0019 fff8 | | .CONST 0x0019,0xfff8
1074 001b fff7 | | .CONST 0x001b,0xfff7
1076 001d fff6 | | .CONST 0x001d,0xfff6
1078 ; --------------------------------------------------------------------------------------
1078 ; Debug3 Subtable 0x1
1078 ; --------------------------------------------------------------------------------------
1078 0017 0000 | | .DBG3TAB 0x0017,0x0000
107a 0020 ffff | | .CONST 0x0020,0xffff
107c 0021 fffe | ! | .CONST 0x0021,0xfffe
107e 0022 fffd | " | .CONST 0x0022,0xfffd
1080 0024 fffc | $ | .CONST 0x0024,0xfffc
1082 0026 fffb | & | .CONST 0x0026,0xfffb
1084 0028 fffa | ( | .CONST 0x0028,0xfffa
1086 002a fff9 | * | .CONST 0x002a,0xfff9
1088 002c fff8 | , | .CONST 0x002c,0xfff8
108a 002e fff7 | . | .CONST 0x002e,0xfff7
108c 0030 fff6 | 0 | .CONST 0x0030,0xfff6
108e 0032 fff5 | 2 | .CONST 0x0032,0xfff5
1090 0034 fff4 | 4 | .CONST 0x0034,0xfff4
1092 0036 fff3 | 6 | .CONST 0x0036,0xfff3
1094 0038 fff2 | 8 | .CONST 0x0038,0xfff2
1096 003a fff1 | : | .CONST 0x003a,0xfff1
1098 003c fff0 | < | .CONST 0x003c,0xfff0
109a 003e ffef | > | .CONST 0x003e,0xffef
109c 0040 ffee | @ | .CONST 0x0040,0xffee
109e 0042 ffed | B | .CONST 0x0042,0xffed
10a0 0044 ffec | D | .CONST 0x0044,0xffec
10a2 0046 ffeb | F | .CONST 0x0046,0xffeb
10a4 0048 ffea | H | .CONST 0x0048,0xffea
10a6 004a ffe9 | J | .CONST 0x004a,0xffe9
10a8 ; --------------------------------------------------------------------------------------
10a8 ; Debug3 Subtable 0x2
10a8 ; --------------------------------------------------------------------------------------
10a8 0002 0001 | | .DBG3TAB 0x0002,0x0001
10aa 0053 ffff | S | .CONST 0x0053,0xffff
10ac 0055 fffe | U | .CONST 0x0055,0xfffe
10ae 0057 0001 | W | .CONST 0x0057,0x0001
10b0 ; --------------------------------------------------------------------------------------
10b0 ; Debug3 Subtable 0x3
10b0 ; --------------------------------------------------------------------------------------
10b0 000c 0022 | "| .DBG3TAB 0x000c,0x0022
10b2 0063 ffff | c | .CONST 0x0063,0xffff
10b4 0064 fffe | d | .CONST 0x0064,0xfffe
10b6 006a fffd | j | .CONST 0x006a,0xfffd
10b8 006f fffc | o | .CONST 0x006f,0xfffc
10ba 0071 fffb | q | .CONST 0x0071,0xfffb
10bc 0075 fffa | u | .CONST 0x0075,0xfffa
10be 0076 fff9 | v | .CONST 0x0076,0xfff9
10c0 007b fff8 | { | .CONST 0x007b,0xfff8
10c2 0083 fff7 | | .CONST 0x0083,0xfff7
10c4 0088 fff6 | | .CONST 0x0088,0xfff6
10c6 0097 fff5 | | .CONST 0x0097,0xfff5
10c8 009b fff4 | | .CONST 0x009b,0xfff4
10ca 009d 0001 | | .CONST 0x009d,0x0001
10cc 00a1 0002 | | .CONST 0x00a1,0x0002
10ce 00a4 0003 | | .CONST 0x00a4,0x0003
10d0 00aa 0004 | | .CONST 0x00aa,0x0004
10d2 00ab 0005 | | .CONST 0x00ab,0x0005
10d4 00ae 0006 | | .CONST 0x00ae,0x0006
10d6 00b1 0007 | | .CONST 0x00b1,0x0007
10d8 00b7 0008 | | .CONST 0x00b7,0x0008
10da 00b8 0009 | | .CONST 0x00b8,0x0009
10dc 00bb 000a | | .CONST 0x00bb,0x000a
10de 00bf 000b | | .CONST 0x00bf,0x000b
10e0 00c5 000c | | .CONST 0x00c5,0x000c
10e2 00c6 000d | | .CONST 0x00c6,0x000d
10e4 00cf 000e | | .CONST 0x00cf,0x000e
10e6 00e9 000f | | .CONST 0x00e9,0x000f
10e8 00eb 0010 | | .CONST 0x00eb,0x0010
10ea 00f7 0011 | | .CONST 0x00f7,0x0011
10ec 00fd 0012 | | .CONST 0x00fd,0x0012
10ee 00fe 0013 | | .CONST 0x00fe,0x0013
10f0 0102 0014 | | .CONST 0x0102,0x0014
10f2 010a 0015 | | .CONST 0x010a,0x0015
10f4 0116 0016 | | .CONST 0x0116,0x0016
10f6 0122 0017 | " | .CONST 0x0122,0x0017
10f8 012e 0018 | . | .CONST 0x012e,0x0018
10fa 0135 0019 | 5 | .CONST 0x0135,0x0019
10fc 013d 001b | = | .CONST 0x013d,0x001b
10fe 0146 001c | F | .CONST 0x0146,0x001c
1100 0148 001d | H | .CONST 0x0148,0x001d
1102 0154 001e | T | .CONST 0x0154,0x001e
1104 015a 001f | Z | .CONST 0x015a,0x001f
1106 015b 0020 | [ | .CONST 0x015b,0x0020
1108 0161 0021 | a !| .CONST 0x0161,0x0021
110a 0172 0022 | r "| .CONST 0x0172,0x0022
110c 017b 0023 | { #| .CONST 0x017b,0x0023
110e ; --------------------------------------------------------------------------------------
110e ; Debug3 Subtable 0x4
110e ; --------------------------------------------------------------------------------------
110e 0008 001d | | .DBG3TAB 0x0008,0x001d
1110 018b ffff | | .CONST 0x018b,0xffff
1112 018c fffe | | .CONST 0x018c,0xfffe
1114 0192 fffd | | .CONST 0x0192,0xfffd
1116 0197 fffc | | .CONST 0x0197,0xfffc
1118 0199 fffb | | .CONST 0x0199,0xfffb
111a 019d fffa | | .CONST 0x019d,0xfffa
111c 019e fff9 | | .CONST 0x019e,0xfff9
111e 01a3 fff8 | | .CONST 0x01a3,0xfff8
1120 01ab 0001 | | .CONST 0x01ab,0x0001
1122 01af 0002 | | .CONST 0x01af,0x0002
1124 01b2 0003 | | .CONST 0x01b2,0x0003
1126 01b5 0004 | | .CONST 0x01b5,0x0004
1128 01bb 0005 | | .CONST 0x01bb,0x0005
112a 01bc 0006 | | .CONST 0x01bc,0x0006
112c 01bf 0007 | | .CONST 0x01bf,0x0007
112e 01c3 0008 | | .CONST 0x01c3,0x0008
1130 01c9 0009 | | .CONST 0x01c9,0x0009
1132 01ca 000a | | .CONST 0x01ca,0x000a
1134 01d1 000b | | .CONST 0x01d1,0x000b
1136 01d9 000c | | .CONST 0x01d9,0x000c
1138 01df 000d | | .CONST 0x01df,0x000d
113a 01e0 000e | | .CONST 0x01e0,0x000e
113c 01e9 000f | | .CONST 0x01e9,0x000f
113e 0203 0010 | | .CONST 0x0203,0x0010
1140 0205 0011 | | .CONST 0x0205,0x0011
1142 0211 0012 | | .CONST 0x0211,0x0012
1144 0217 0013 | | .CONST 0x0217,0x0013
1146 0218 0014 | | .CONST 0x0218,0x0014
1148 0221 0015 | ! | .CONST 0x0221,0x0015
114a 022a 0016 | * | .CONST 0x022a,0x0016
114c 022c 0017 | , | .CONST 0x022c,0x0017
114e 0238 0018 | 8 | .CONST 0x0238,0x0018
1150 023e 0019 | > | .CONST 0x023e,0x0019
1152 023f 001a | ? | .CONST 0x023f,0x001a
1154 0245 001b | E | .CONST 0x0245,0x001b
1156 0251 001c | Q | .CONST 0x0251,0x001c
1158 0254 001d | T | .CONST 0x0254,0x001d
115a ; --------------------------------------------------------------------------------------
115a ; Debug3 Subtable 0x5
115a ; --------------------------------------------------------------------------------------
115a 000a 001f | | .DBG3TAB 0x000a,0x001f
115c 0263 ffff | c | .CONST 0x0263,0xffff
115e 0269 fffe | i | .CONST 0x0269,0xfffe
1160 026e fffd | n | .CONST 0x026e,0xfffd
1162 0270 fffc | p | .CONST 0x0270,0xfffc
1164 0275 fffb | u | .CONST 0x0275,0xfffb
1166 0276 fffa | v | .CONST 0x0276,0xfffa
1168 027c fff9 | | | .CONST 0x027c,0xfff9
116a 0280 fff8 | | .CONST 0x0280,0xfff8
116c 0283 fff7 | | .CONST 0x0283,0xfff7
116e 028b fff6 | | .CONST 0x028b,0xfff6
1170 028d 0001 | | .CONST 0x028d,0x0001
1172 0294 0002 | | .CONST 0x0294,0x0002
1174 0299 0003 | | .CONST 0x0299,0x0003
1176 02ac 0004 | | .CONST 0x02ac,0x0004
1178 02ae 0005 | | .CONST 0x02ae,0x0005
117a 02bd 0006 | | .CONST 0x02bd,0x0006
117c 02c3 0007 | | .CONST 0x02c3,0x0007
117e 02c4 0008 | | .CONST 0x02c4,0x0008
1180 02de 0009 | | .CONST 0x02de,0x0009
1182 02e0 000a | | .CONST 0x02e0,0x000a
1184 02ec 000b | | .CONST 0x02ec,0x000b
1186 02f2 000c | | .CONST 0x02f2,0x000c
1188 02f3 000d | | .CONST 0x02f3,0x000d
118a 02fa 000e | | .CONST 0x02fa,0x000e
118c 02ff 000f | | .CONST 0x02ff,0x000f
118e 0306 0010 | | .CONST 0x0306,0x0010
1190 030c 0011 | | .CONST 0x030c,0x0011
1192 0315 0012 | | .CONST 0x0315,0x0012
1194 0320 0013 | | .CONST 0x0320,0x0013
1196 0322 0014 | " | .CONST 0x0322,0x0014
1198 0323 0015 | # | .CONST 0x0323,0x0015
119a 032c 0016 | , | .CONST 0x032c,0x0016
119c 032e 0017 | . | .CONST 0x032e,0x0017
119e 033a 0018 | : | .CONST 0x033a,0x0018
11a0 0340 0019 | @ | .CONST 0x0340,0x0019
11a2 0347 001a | G | .CONST 0x0347,0x001a
11a4 0348 001b | H | .CONST 0x0348,0x001b
11a6 034f 001c | O | .CONST 0x034f,0x001c
11a8 0357 001d | W | .CONST 0x0357,0x001d
11aa 035f 001e | _ | .CONST 0x035f,0x001e
11ac 0366 001f | f | .CONST 0x0366,0x001f
11ae ; --------------------------------------------------------------------------------------
11ae ; Debug3 Subtable 0x6
11ae ; --------------------------------------------------------------------------------------
11ae 000b 001d | | .DBG3TAB 0x000b,0x001d
11b0 0373 ffff | s | .CONST 0x0373,0xffff
11b2 0379 fffe | y | .CONST 0x0379,0xfffe
11b4 037e fffd | ~ | .CONST 0x037e,0xfffd
11b6 0380 fffc | | .CONST 0x0380,0xfffc
11b8 0385 fffb | | .CONST 0x0385,0xfffb
11ba 0386 fffa | | .CONST 0x0386,0xfffa
11bc 038c fff9 | | .CONST 0x038c,0xfff9
11be 0390 fff8 | | .CONST 0x0390,0xfff8
11c0 0393 fff7 | | .CONST 0x0393,0xfff7
11c2 039b fff6 | | .CONST 0x039b,0xfff6
11c4 039d fff5 | | .CONST 0x039d,0xfff5
11c6 039f 0001 | | .CONST 0x039f,0x0001
11c8 03a6 0002 | | .CONST 0x03a6,0x0002
11ca 03ab 0003 | | .CONST 0x03ab,0x0003
11cc 03be 0004 | | .CONST 0x03be,0x0004
11ce 03c0 0005 | | .CONST 0x03c0,0x0005
11d0 03cf 0006 | | .CONST 0x03cf,0x0006
11d2 03d5 0007 | | .CONST 0x03d5,0x0007
11d4 03d6 0008 | | .CONST 0x03d6,0x0008
11d6 03f0 0009 | | .CONST 0x03f0,0x0009
11d8 03f2 000a | | .CONST 0x03f2,0x000a
11da 03fe 000b | | .CONST 0x03fe,0x000b
11dc 0404 000c | | .CONST 0x0404,0x000c
11de 0405 000d | | .CONST 0x0405,0x000d
11e0 040c 000e | | .CONST 0x040c,0x000e
11e2 0411 000f | | .CONST 0x0411,0x000f
11e4 0418 0010 | | .CONST 0x0418,0x0010
11e6 0420 0011 | | .CONST 0x0420,0x0011
11e8 0422 0012 | " | .CONST 0x0422,0x0012
11ea 0423 0013 | # | .CONST 0x0423,0x0013
11ec 042c 0014 | , | .CONST 0x042c,0x0014
11ee 042e 0015 | . | .CONST 0x042e,0x0015
11f0 043a 0016 | : | .CONST 0x043a,0x0016
11f2 0440 0017 | @ | .CONST 0x0440,0x0017
11f4 0447 0018 | G | .CONST 0x0447,0x0018
11f6 0448 0019 | H | .CONST 0x0448,0x0019
11f8 044f 001a | O | .CONST 0x044f,0x001a
11fa 0457 001b | W | .CONST 0x0457,0x001b
11fc 045f 001c | _ | .CONST 0x045f,0x001c
11fe 0466 001d | f | .CONST 0x0466,0x001d
1200 ; --------------------------------------------------------------------------------------
1200 ; Debug3 Subtable 0x7
1200 ; --------------------------------------------------------------------------------------
1200 0007 0014 | | .DBG3TAB 0x0007,0x0014
1202 0473 ffff | s | .CONST 0x0473,0xffff
1204 0474 fffe | t | .CONST 0x0474,0xfffe
1206 047a fffd | z | .CONST 0x047a,0xfffd
1208 047f fffc | | .CONST 0x047f,0xfffc
120a 0481 fffb | | .CONST 0x0481,0xfffb
120c 0486 fffa | | .CONST 0x0486,0xfffa
120e 0489 fff9 | | .CONST 0x0489,0xfff9
1210 0491 0001 | | .CONST 0x0491,0x0001
1212 04a4 0002 | | .CONST 0x04a4,0x0002
1214 04a6 0003 | | .CONST 0x04a6,0x0003
1216 04b5 0004 | | .CONST 0x04b5,0x0004
1218 04bb 0005 | | .CONST 0x04bb,0x0005
121a 04bc 0006 | | .CONST 0x04bc,0x0006
121c 04d6 0007 | | .CONST 0x04d6,0x0007
121e 04d8 0008 | | .CONST 0x04d8,0x0008
1220 04e4 0009 | | .CONST 0x04e4,0x0009
1222 04ea 000a | | .CONST 0x04ea,0x000a
1224 04eb 000b | | .CONST 0x04eb,0x000b
1226 04f0 000c | | .CONST 0x04f0,0x000c
1228 04f9 000d | | .CONST 0x04f9,0x000d
122a 04fb 000e | | .CONST 0x04fb,0x000e
122c 0507 000f | | .CONST 0x0507,0x000f
122e 050d 0010 | | .CONST 0x050d,0x0010
1230 050e 0011 | | .CONST 0x050e,0x0011
1232 0514 0012 | | .CONST 0x0514,0x0012
1234 051e 0013 | | .CONST 0x051e,0x0013
1236 052f 0014 | / | .CONST 0x052f,0x0014
1238 ; --------------------------------------------------------------------------------------
1238 ; Debug3 Subtable 0x8
1238 ; --------------------------------------------------------------------------------------
1238 0003 0003 | | .DBG3TAB 0x0003,0x0003
123a 053b ffff | ; | .CONST 0x053b,0xffff
123c 053c fffe | < | .CONST 0x053c,0xfffe
123e 053e fffd | > | .CONST 0x053e,0xfffd
1240 054b 0001 | K | .CONST 0x054b,0x0001
1242 054e 0002 | N | .CONST 0x054e,0x0002
1244 0552 0003 | R | .CONST 0x0552,0x0003
1246 ; --------------------------------------------------------------------------------------
1246 ; Debug3 Subtable 0x9
1246 ; --------------------------------------------------------------------------------------
1246 0000 0001 | | .DBG3TAB 0x0000,0x0001
1248 055b 0001 | [ | .CONST 0x055b,0x0001
124a ; --------------------------------------------------------------------------------------
124a ; Debug3 Subtable 0xa
124a ; --------------------------------------------------------------------------------------
124a 0000 0001 | | .DBG3TAB 0x0000,0x0001
124c 056b 0001 | k | .CONST 0x056b,0x0001
124e ; --------------------------------------------------------------------------------------
124e ; Debug3 Subtable 0xb
124e ; --------------------------------------------------------------------------------------
124e 0000 0001 | | .DBG3TAB 0x0000,0x0001
1250 0573 0001 | s | .CONST 0x0573,0x0001
1252 ; --------------------------------------------------------------------------------------
1252 ; Debug3 Subtable 0xc
1252 ; --------------------------------------------------------------------------------------
1252 0000 0002 | | .DBG3TAB 0x0000,0x0002
1254 057b 0001 | { | .CONST 0x057b,0x0001
1256 057e 0002 | ~ | .CONST 0x057e,0x0002
1258 ; --------------------------------------------------------------------------------------
1258 ; Debug3 Subtable 0xd
1258 ; --------------------------------------------------------------------------------------
1258 0000 0002 | | .DBG3TAB 0x0000,0x0002
125a 0583 0001 | | .CONST 0x0583,0x0001
125c 0585 0002 | | .CONST 0x0585,0x0002
125e ; --------------------------------------------------------------------------------------
125e ; Debug3 Subtable 0xe
125e ; --------------------------------------------------------------------------------------
125e 0000 0002 | | .DBG3TAB 0x0000,0x0002
1260 058b 0001 | | .CONST 0x058b,0x0001
1262 0590 0002 | | .CONST 0x0590,0x0002
1264 ; --------------------------------------------------------------------------------------
1264 ; Debug3 Subtable 0xf
1264 ; --------------------------------------------------------------------------------------
1264 0000 0002 | | .DBG3TAB 0x0000,0x0002
1266 059b 0001 | | .CONST 0x059b,0x0001
1268 05a0 0002 | | .CONST 0x05a0,0x0002
126a ; --------------------------------------------------------------------------------------
126a ; Debug3 Subtable 0x10
126a ; --------------------------------------------------------------------------------------
126a 000a 0001 | | .DBG3TAB 0x000a,0x0001
126c 05ab ffff | | .CONST 0x05ab,0xffff
126e 05ac fffe | | .CONST 0x05ac,0xfffe
1270 05ad fffd | | .CONST 0x05ad,0xfffd
1272 05b0 fffc | | .CONST 0x05b0,0xfffc
1274 05b3 fffb | | .CONST 0x05b3,0xfffb
1276 05b4 fffa | | .CONST 0x05b4,0xfffa
1278 05b5 fff9 | | .CONST 0x05b5,0xfff9
127a 05b7 fff8 | | .CONST 0x05b7,0xfff8
127c 05c0 fff7 | | .CONST 0x05c0,0xfff7
127e 05c2 fff6 | | .CONST 0x05c2,0xfff6
1280 05c4 0001 | | .CONST 0x05c4,0x0001
1282 ; --------------------------------------------------------------------------------------
1282 ; Debug3 Subtable 0x11
1282 ; --------------------------------------------------------------------------------------
1282 0002 000c | | .DBG3TAB 0x0002,0x000c
1284 05cb ffff | | .CONST 0x05cb,0xffff
1286 05cc fffe | | .CONST 0x05cc,0xfffe
1288 05ce 0001 | | .CONST 0x05ce,0x0001
128a 05d5 0002 | | .CONST 0x05d5,0x0002
128c 05db 0003 | | .CONST 0x05db,0x0003
128e 05df 0004 | | .CONST 0x05df,0x0004
1290 05e1 0005 | | .CONST 0x05e1,0x0005
1292 05e3 0006 | | .CONST 0x05e3,0x0006
1294 05e8 0007 | | .CONST 0x05e8,0x0007
1296 05ec 0008 | | .CONST 0x05ec,0x0008
1298 05f0 0009 | | .CONST 0x05f0,0x0009
129a 05f2 000a | | .CONST 0x05f2,0x000a
129c 05f4 000b | | .CONST 0x05f4,0x000b
129e 05f8 000c | | .CONST 0x05f8,0x000c
12a0 ; --------------------------------------------------------------------------------------
12a0 ; Debug3 Subtable 0x12
12a0 ; --------------------------------------------------------------------------------------
12a0 0005 000e | | .DBG3TAB 0x0005,0x000e
12a2 0603 ffff | | .CONST 0x0603,0xffff
12a4 0605 fffe | | .CONST 0x0605,0xfffe
12a6 0606 fffd | | .CONST 0x0606,0xfffd
12a8 0607 fffc | | .CONST 0x0607,0xfffc
12aa 0608 fffb | | .CONST 0x0608,0xfffb
12ac 0609 0001 | | .CONST 0x0609,0x0001
12ae 0610 0002 | | .CONST 0x0610,0x0002
12b0 0616 0003 | | .CONST 0x0616,0x0003
12b2 061a 0004 | | .CONST 0x061a,0x0004
12b4 061f 0005 | | .CONST 0x061f,0x0005
12b6 0620 0006 | | .CONST 0x0620,0x0006
12b8 0624 0007 | $ | .CONST 0x0624,0x0007
12ba 0628 0008 | ( | .CONST 0x0628,0x0008
12bc 062c 0009 | , | .CONST 0x062c,0x0009
12be 062e 000a | . | .CONST 0x062e,0x000a
12c0 0630 000b | 0 | .CONST 0x0630,0x000b
12c2 0632 000c | 2 | .CONST 0x0632,0x000c
12c4 0639 000d | 9 | .CONST 0x0639,0x000d
12c6 063d 000e | = | .CONST 0x063d,0x000e
12c8 ; --------------------------------------------------------------------------------------
12c8 ; Debug3 Subtable 0x13
12c8 ; --------------------------------------------------------------------------------------
12c8 0001 000a | | .DBG3TAB 0x0001,0x000a
12ca 0643 ffff | C | .CONST 0x0643,0xffff
12cc 0644 0001 | D | .CONST 0x0644,0x0001
12ce 064b 0002 | K | .CONST 0x064b,0x0002
12d0 0653 0003 | S | .CONST 0x0653,0x0003
12d2 0657 0004 | W | .CONST 0x0657,0x0004
12d4 065b 0005 | [ | .CONST 0x065b,0x0005
12d6 0660 0006 | ` | .CONST 0x0660,0x0006
12d8 0664 0007 | d | .CONST 0x0664,0x0007
12da 0668 0008 | h | .CONST 0x0668,0x0008
12dc 066c 0009 | l | .CONST 0x066c,0x0009
12de 0670 000a | p | .CONST 0x0670,0x000a
12e0 ; --------------------------------------------------------------------------------------
12e0 ; Debug3 Subtable 0x14
12e0 ; --------------------------------------------------------------------------------------
12e0 0004 0007 | | .DBG3TAB 0x0004,0x0007
12e2 067b ffff | { | .CONST 0x067b,0xffff
12e4 067d fffe | } | .CONST 0x067d,0xfffe
12e6 0682 fffd | | .CONST 0x0682,0xfffd
12e8 0683 fffc | | .CONST 0x0683,0xfffc
12ea 0689 0001 | | .CONST 0x0689,0x0001
12ec 069e 0002 | | .CONST 0x069e,0x0002
12ee 06a0 0003 | | .CONST 0x06a0,0x0003
12f0 06be 0004 | | .CONST 0x06be,0x0004
12f2 06c0 0005 | | .CONST 0x06c0,0x0005
12f4 06c2 0006 | | .CONST 0x06c2,0x0006
12f6 06c6 0007 | | .CONST 0x06c6,0x0007
12f8 ; --------------------------------------------------------------------------------------
12f8 ; Debug3 Subtable 0x15
12f8 ; --------------------------------------------------------------------------------------
12f8 0005 0019 | | .DBG3TAB 0x0005,0x0019
12fa 06d3 ffff | | .CONST 0x06d3,0xffff
12fc 06d7 fffe | | .CONST 0x06d7,0xfffe
12fe 06da fffd | | .CONST 0x06da,0xfffd
1300 06db fffc | | .CONST 0x06db,0xfffc
1302 06dc fffb | | .CONST 0x06dc,0xfffb
1304 06e6 0001 | | .CONST 0x06e6,0x0001
1306 06ea 0002 | | .CONST 0x06ea,0x0002
1308 06ef 0003 | | .CONST 0x06ef,0x0003
130a 06f3 0004 | | .CONST 0x06f3,0x0004
130c 06f8 0005 | | .CONST 0x06f8,0x0005
130e 070f 0006 | | .CONST 0x070f,0x0006
1310 0711 0007 | | .CONST 0x0711,0x0007
1312 0727 0008 | ' | .CONST 0x0727,0x0008
1314 072a 0009 | * | .CONST 0x072a,0x0009
1316 072d 000a | - | .CONST 0x072d,0x000a
1318 0734 000b | 4 | .CONST 0x0734,0x000b
131a 0749 0014 | I | .CONST 0x0749,0x0014
131c 0750 0015 | P | .CONST 0x0750,0x0015
131e 0753 000c | S | .CONST 0x0753,0x000c
1320 0755 000d | U | .CONST 0x0755,0x000d
1322 0757 000e | W | .CONST 0x0757,0x000e
1324 0759 000f | Y | .CONST 0x0759,0x000f
1326 075b 0010 | [ | .CONST 0x075b,0x0010
1328 075f 0011 | _ | .CONST 0x075f,0x0011
132a 0763 0012 | c | .CONST 0x0763,0x0012
132c 0767 0013 | g | .CONST 0x0767,0x0013
132e 076b 0016 | k | .CONST 0x076b,0x0016
1330 076f 0017 | o | .CONST 0x076f,0x0017
1332 077d 0018 | } | .CONST 0x077d,0x0018
1334 0782 0019 | | .CONST 0x0782,0x0019
1336 ; --------------------------------------------------------------------------------------
1336 ; Debug3 Subtable 0x16
1336 ; --------------------------------------------------------------------------------------
1336 0000 0005 | | .DBG3TAB 0x0000,0x0005
1338 078b 0001 | | .CONST 0x078b,0x0001
133a 078e 0002 | | .CONST 0x078e,0x0002
133c 0791 0003 | | .CONST 0x0791,0x0003
133e 0797 0004 | | .CONST 0x0797,0x0004
1340 079a 0005 | | .CONST 0x079a,0x0005
1342 ; --------------------------------------------------------------------------------------
1342 ; Debug3 Subtable 0x17
1342 ; --------------------------------------------------------------------------------------
1342 0001 001f | | .DBG3TAB 0x0001,0x001f
1344 07a3 ffff | | .CONST 0x07a3,0xffff
1346 07a6 0001 | | .CONST 0x07a6,0x0001
1348 07a8 0002 | | .CONST 0x07a8,0x0002
134a 07ad 0003 | | .CONST 0x07ad,0x0003
134c 07b3 0004 | | .CONST 0x07b3,0x0004
134e 07b8 0005 | | .CONST 0x07b8,0x0005
1350 07be 0006 | | .CONST 0x07be,0x0006
1352 07c3 0007 | | .CONST 0x07c3,0x0007
1354 07c9 0008 | | .CONST 0x07c9,0x0008
1356 07ce 0009 | | .CONST 0x07ce,0x0009
1358 07d4 000a | | .CONST 0x07d4,0x000a
135a 07d9 000b | | .CONST 0x07d9,0x000b
135c 07df 000c | | .CONST 0x07df,0x000c
135e 07e4 000d | | .CONST 0x07e4,0x000d
1360 07ea 000e | | .CONST 0x07ea,0x000e
1362 07ef 000f | | .CONST 0x07ef,0x000f
1364 07f5 0010 | | .CONST 0x07f5,0x0010
1366 07fa 0011 | | .CONST 0x07fa,0x0011
1368 0800 0012 | | .CONST 0x0800,0x0012
136a 0805 0013 | | .CONST 0x0805,0x0013
136c 080b 0014 | | .CONST 0x080b,0x0014
136e 0810 0015 | | .CONST 0x0810,0x0015
1370 0816 0016 | | .CONST 0x0816,0x0016
1372 081b 0017 | | .CONST 0x081b,0x0017
1374 0821 0018 | ! | .CONST 0x0821,0x0018
1376 0826 0019 | & | .CONST 0x0826,0x0019
1378 082c 001a | , | .CONST 0x082c,0x001a
137a 0831 001b | 1 | .CONST 0x0831,0x001b
137c 0837 001c | 7 | .CONST 0x0837,0x001c
137e 083c 001d | < | .CONST 0x083c,0x001d
1380 0840 001e | @ | .CONST 0x0840,0x001e
1382 0842 001f | B | .CONST 0x0842,0x001f
1384 ; --------------------------------------------------------------------------------------
1384 ; Debug3 Subtable 0x18
1384 ; --------------------------------------------------------------------------------------
1384 000a 0027 | '| .DBG3TAB 0x000a,0x0027
1386 085b ffff | [ | .CONST 0x085b,0xffff
1388 085c fffe | \ | .CONST 0x085c,0xfffe
138a 0862 fffd | b | .CONST 0x0862,0xfffd
138c 0867 fffc | g | .CONST 0x0867,0xfffc
138e 0869 fffb | i | .CONST 0x0869,0xfffb
1390 086f fffa | o | .CONST 0x086f,0xfffa
1392 0870 fff9 | p | .CONST 0x0870,0xfff9
1394 0871 fff8 | q | .CONST 0x0871,0xfff8
1396 0876 fff7 | v | .CONST 0x0876,0xfff7
1398 0877 fff6 | w | .CONST 0x0877,0xfff6
139a 087f 0001 | | .CONST 0x087f,0x0001
139c 0886 0002 | | .CONST 0x0886,0x0002
139e 0889 0003 | | .CONST 0x0889,0x0003
13a0 088c 0004 | | .CONST 0x088c,0x0004
13a2 0892 0005 | | .CONST 0x0892,0x0005
13a4 0893 0006 | | .CONST 0x0893,0x0006
13a6 0896 0007 | | .CONST 0x0896,0x0007
13a8 089a 0008 | | .CONST 0x089a,0x0008
13aa 08a0 0009 | | .CONST 0x08a0,0x0009
13ac 08a1 000a | | .CONST 0x08a1,0x000a
13ae 08a4 000b | | .CONST 0x08a4,0x000b
13b0 08ab 000c | | .CONST 0x08ab,0x000c
13b2 08b1 000d | | .CONST 0x08b1,0x000d
13b4 08b2 000e | | .CONST 0x08b2,0x000e
13b6 08bb 000f | | .CONST 0x08bb,0x000f
13b8 08d5 0010 | | .CONST 0x08d5,0x0010
13ba 08d7 0011 | | .CONST 0x08d7,0x0011
13bc 08e3 0012 | | .CONST 0x08e3,0x0012
13be 08e9 0013 | | .CONST 0x08e9,0x0013
13c0 08ea 0014 | | .CONST 0x08ea,0x0014
13c2 08f1 0015 | | .CONST 0x08f1,0x0015
13c4 08f9 0016 | | .CONST 0x08f9,0x0016
13c6 08fe 0017 | | .CONST 0x08fe,0x0017
13c8 0906 0018 | | .CONST 0x0906,0x0018
13ca 0908 0019 | | .CONST 0x0908,0x0019
13cc 090e 001a | | .CONST 0x090e,0x001a
13ce 0915 001b | | .CONST 0x0915,0x001b
13d0 0916 001c | | .CONST 0x0916,0x001c
13d2 091f 001d | | .CONST 0x091f,0x001d
13d4 0921 001e | ! | .CONST 0x0921,0x001e
13d6 092d 001f | - | .CONST 0x092d,0x001f
13d8 0933 0020 | 3 | .CONST 0x0933,0x0020
13da 093a 0021 | : !| .CONST 0x093a,0x0021
13dc 093b 0022 | ; "| .CONST 0x093b,0x0022
13de 0942 0023 | B #| .CONST 0x0942,0x0023
13e0 0948 0024 | H $| .CONST 0x0948,0x0024
13e2 0954 0025 | T %| .CONST 0x0954,0x0025
13e4 095d 0026 | ] &| .CONST 0x095d,0x0026
13e6 0964 0027 | d '| .CONST 0x0964,0x0027
13e8 ; --------------------------------------------------------------------------------------
13e8 ; Debug3 Subtable 0x19
13e8 ; --------------------------------------------------------------------------------------
13e8 0000 0000 | | .DBG3TAB 0x0000,0x0000
13ea ; --------------------------------------------------------------------------------------
13ea ; Debug3 Subtable 0x1a
13ea ; --------------------------------------------------------------------------------------
13ea 0000 0000 | | .DBG3TAB 0x0000,0x0000
13ec ; --------------------------------------------------------------------------------------
13ec ; Debug3 Subtable 0x1b
13ec ; --------------------------------------------------------------------------------------
13ec 0002 000e | | .DBG3TAB 0x0002,0x000e
13ee 09db ffff | | .CONST 0x09db,0xffff
13f0 09de fffe | | .CONST 0x09de,0xfffe
13f2 09e1 0001 | | .CONST 0x09e1,0x0001
13f4 09e6 0002 | | .CONST 0x09e6,0x0002
13f6 09ed 0003 | | .CONST 0x09ed,0x0003
13f8 09f2 0004 | | .CONST 0x09f2,0x0004
13fa 09f9 0005 | | .CONST 0x09f9,0x0005
13fc 09fe 0006 | | .CONST 0x09fe,0x0006
13fe 0a06 0007 | | .CONST 0x0a06,0x0007
1400 0a0b 0008 | | .CONST 0x0a0b,0x0008
1402 0a0f 0009 | | .CONST 0x0a0f,0x0009
1404 0a15 000a | | .CONST 0x0a15,0x000a
1406 0a18 000b | | .CONST 0x0a18,0x000b
1408 0a1c 000c | | .CONST 0x0a1c,0x000c
140a 0a20 000d | | .CONST 0x0a20,0x000d
140c 0a27 000e | ' | .CONST 0x0a27,0x000e
140e ; --------------------------------------------------------------------------------------
140e ; Debug3 Subtable 0x1c
140e ; --------------------------------------------------------------------------------------
140e 0004 001b | | .DBG3TAB 0x0004,0x001b
1410 0a33 ffff | 3 | .CONST 0x0a33,0xffff
1412 0a35 fffe | 5 | .CONST 0x0a35,0xfffe
1414 0a36 fffd | 6 | .CONST 0x0a36,0xfffd
1416 0a37 fffc | 7 | .CONST 0x0a37,0xfffc
1418 0a38 0001 | 8 | .CONST 0x0a38,0x0001
141a 0a3d 0002 | = | .CONST 0x0a3d,0x0002
141c 0a41 0003 | A | .CONST 0x0a41,0x0003
141e 0a46 0004 | F | .CONST 0x0a46,0x0004
1420 0a4a 0005 | J | .CONST 0x0a4a,0x0005
1422 0a4f 0006 | O | .CONST 0x0a4f,0x0006
1424 0a53 0007 | S | .CONST 0x0a53,0x0007
1426 0a58 0008 | X | .CONST 0x0a58,0x0008
1428 0a5e 0009 | ^ | .CONST 0x0a5e,0x0009
142a 0a62 000a | b | .CONST 0x0a62,0x000a
142c 0a66 000b | f | .CONST 0x0a66,0x000b
142e 0a68 000c | h | .CONST 0x0a68,0x000c
1430 0a6c 000d | l | .CONST 0x0a6c,0x000d
1432 0a7c 000e | | | .CONST 0x0a7c,0x000e
1434 0a82 000f | | .CONST 0x0a82,0x000f
1436 0a88 0010 | | .CONST 0x0a88,0x0010
1438 0a90 0011 | | .CONST 0x0a90,0x0011
143a 0a93 0013 | | .CONST 0x0a93,0x0013
143c 0a97 0014 | | .CONST 0x0a97,0x0014
143e 0aa7 0015 | | .CONST 0x0aa7,0x0015
1440 0aab 0016 | | .CONST 0x0aab,0x0016
1442 0ab0 0017 | | .CONST 0x0ab0,0x0017
1444 0ab4 0018 | | .CONST 0x0ab4,0x0018
1446 0abc 0019 | | .CONST 0x0abc,0x0019
1448 0abd 001a | | .CONST 0x0abd,0x001a
144a 0abf 001b | | .CONST 0x0abf,0x001b
144c 0ac4 0012 | | .CONST 0x0ac4,0x0012
144e ; --------------------------------------------------------------------------------------
144e ; Debug3 Subtable 0x1d
144e ; --------------------------------------------------------------------------------------
144e 0000 0001 | | .DBG3TAB 0x0000,0x0001
1450 0ad3 0001 | | .CONST 0x0ad3,0x0001
1452 ; --------------------------------------------------------------------------------------
1452 ; Debug3 Subtable 0x1e
1452 ; --------------------------------------------------------------------------------------
1452 0005 001a | | .DBG3TAB 0x0005,0x001a
1454 0ae3 ffff | | .CONST 0x0ae3,0xffff
1456 0ae5 fffe | | .CONST 0x0ae5,0xfffe
1458 0ae6 fffd | | .CONST 0x0ae6,0xfffd
145a 0ae7 fffc | | .CONST 0x0ae7,0xfffc
145c 0ae8 fffb | | .CONST 0x0ae8,0xfffb
145e 0ae9 0001 | | .CONST 0x0ae9,0x0001
1460 0aee 0002 | | .CONST 0x0aee,0x0002
1462 0af2 0003 | | .CONST 0x0af2,0x0003
1464 0af7 0004 | | .CONST 0x0af7,0x0004
1466 0afb 0005 | | .CONST 0x0afb,0x0005
1468 0b00 0006 | | .CONST 0x0b00,0x0006
146a 0b04 0007 | | .CONST 0x0b04,0x0007
146c 0b09 0008 | | .CONST 0x0b09,0x0008
146e 0b0d 0009 | | .CONST 0x0b0d,0x0009
1470 0b11 000a | | .CONST 0x0b11,0x000a
1472 0b15 000b | | .CONST 0x0b15,0x000b
1474 0b19 000c | | .CONST 0x0b19,0x000c
1476 0b1b 000d | | .CONST 0x0b1b,0x000d
1478 0b1f 000e | | .CONST 0x0b1f,0x000e
147a 0b2f 000f | / | .CONST 0x0b2f,0x000f
147c 0b32 0011 | 2 | .CONST 0x0b32,0x0011
147e 0b36 0012 | 6 | .CONST 0x0b36,0x0012
1480 0b46 0013 | F | .CONST 0x0b46,0x0013
1482 0b4a 0014 | J | .CONST 0x0b4a,0x0014
1484 0b4b 0015 | K | .CONST 0x0b4b,0x0015
1486 0b4d 0016 | M | .CONST 0x0b4d,0x0016
1488 0b52 0010 | R | .CONST 0x0b52,0x0010
148a 0b57 0017 | W | .CONST 0x0b57,0x0017
148c 0b5b 0018 | [ | .CONST 0x0b5b,0x0018
148e 0b64 0019 | d | .CONST 0x0b64,0x0019
1490 0b68 001a | h | .CONST 0x0b68,0x001a
1492 ; --------------------------------------------------------------------------------------
1492 ; Debug3 Subtable 0x1f
1492 ; --------------------------------------------------------------------------------------
1492 0000 0001 | | .DBG3TAB 0x0000,0x0001
1494 0b7b 0001 | { | .CONST 0x0b7b,0x0001
1496 ; --------------------------------------------------------------------------------------
1496 ; Debug3 Subtable 0x20
1496 ; --------------------------------------------------------------------------------------
1496 0002 0003 | | .DBG3TAB 0x0002,0x0003
1498 0b83 ffff | | .CONST 0x0b83,0xffff
149a 0b84 fffe | | .CONST 0x0b84,0xfffe
149c 0b85 0001 | | .CONST 0x0b85,0x0001
149e 0b86 0401 | | .CONST 0x0b86,0x0401
14a0 0b88 0402 | | .CONST 0x0b88,0x0402
14a2 ; --------------------------------------------------------------------------------------
14a2 ; Debug3 Subtable 0x21
14a2 ; --------------------------------------------------------------------------------------
14a2 0008 0010 | | .DBG3TAB 0x0008,0x0010
14a4 0b93 ffff | | .CONST 0x0b93,0xffff
14a6 0b94 fffe | | .CONST 0x0b94,0xfffe
14a8 0b95 fffd | | .CONST 0x0b95,0xfffd
14aa 0b97 fffc | | .CONST 0x0b97,0xfffc
14ac 0b98 fffb | | .CONST 0x0b98,0xfffb
14ae 0b9a fffa | | .CONST 0x0b9a,0xfffa
14b0 0b9d fff9 | | .CONST 0x0b9d,0xfff9
14b2 0b9e fff8 | | .CONST 0x0b9e,0xfff8
14b4 0b9f 0001 | | .CONST 0x0b9f,0x0001
14b6 0ba3 0002 | | .CONST 0x0ba3,0x0002
14b8 0ba8 0003 | | .CONST 0x0ba8,0x0003
14ba 0bb8 0004 | | .CONST 0x0bb8,0x0004
14bc 0bc9 0005 | | .CONST 0x0bc9,0x0005
14be 0bcb 0006 | | .CONST 0x0bcb,0x0006
14c0 0bd0 0007 | | .CONST 0x0bd0,0x0007
14c2 0bd2 0008 | | .CONST 0x0bd2,0x0008
14c4 0bd7 0009 | | .CONST 0x0bd7,0x0009
14c6 0bda 000a | | .CONST 0x0bda,0x000a
14c8 0be4 000b | | .CONST 0x0be4,0x000b
14ca 0be8 000c | | .CONST 0x0be8,0x000c
14cc 0bf5 000d | | .CONST 0x0bf5,0x000d
14ce 0bf8 000e | | .CONST 0x0bf8,0x000e
14d0 0bfb 000f | | .CONST 0x0bfb,0x000f
14d2 0c09 0010 | | .CONST 0x0c09,0x0010
14d4 ; --------------------------------------------------------------------------------------
14d4 ; Debug3 Subtable 0x22
14d4 ; --------------------------------------------------------------------------------------
14d4 0000 0003 | | .DBG3TAB 0x0000,0x0003
14d6 0c15 0002 | | .CONST 0x0c15,0x0002
14d8 0c1a 0001 | | .CONST 0x0c1a,0x0001
14da 0c21 0003 | ! | .CONST 0x0c21,0x0003
14dc ; --------------------------------------------------------------------------------------
14dc ; Debug3 Subtable 0x23
14dc ; --------------------------------------------------------------------------------------
14dc 0000 0002 | | .DBG3TAB 0x0000,0x0002
14de 0c2b 0001 | + | .CONST 0x0c2b,0x0001
14e0 0c31 0002 | 1 | .CONST 0x0c31,0x0002
14e2 ; --------------------------------------------------------------------------------------
14e2 ; Debug3 Subtable 0x24
14e2 ; --------------------------------------------------------------------------------------
14e2 0000 0006 | | .DBG3TAB 0x0000,0x0006
14e4 0c3b 0001 | ; | .CONST 0x0c3b,0x0001
14e6 0c40 0002 | @ | .CONST 0x0c40,0x0002
14e8 0c44 0003 | D | .CONST 0x0c44,0x0003
14ea 0c48 0004 | H | .CONST 0x0c48,0x0004
14ec 0c4d 0005 | M | .CONST 0x0c4d,0x0005
14ee 0c53 0006 | S | .CONST 0x0c53,0x0006
14f0 ; --------------------------------------------------------------------------------------
14f0 ; Debug3 Subtable 0x25
14f0 ; --------------------------------------------------------------------------------------
14f0 0000 0002 | | .DBG3TAB 0x0000,0x0002
14f2 0c5b 0001 | [ | .CONST 0x0c5b,0x0001
14f4 0c61 0002 | a | .CONST 0x0c61,0x0002
14f6 ; --------------------------------------------------------------------------------------
14f6 ; Debug3 Subtable 0x26
14f6 ; --------------------------------------------------------------------------------------
14f6 0000 0002 | | .DBG3TAB 0x0000,0x0002
14f8 0c6b 0001 | k | .CONST 0x0c6b,0x0001
14fa 0c71 0002 | q | .CONST 0x0c71,0x0002
14fc ; --------------------------------------------------------------------------------------
14fc ; Debug3 Subtable 0x27
14fc ; --------------------------------------------------------------------------------------
14fc 0000 0003 | | .DBG3TAB 0x0000,0x0003
14fe 0c7b 0001 | { | .CONST 0x0c7b,0x0001
1500 0c87 0002 | | .CONST 0x0c87,0x0002
1502 0c8f 0003 | | .CONST 0x0c8f,0x0003
1504 0000 0000 | | .BLANK 0000[0xfc]