|
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: 5120 (0x1400)
Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 04f8 | | .CONST 0x04f8 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 0004 | | .CONST 0x0004 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0033 | 3 | .CONST 0x0033 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0018 | | .CONST 0x0018 ; Number of locals
000b INIT_0008:
000b 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x0582,0x8000,0x0000,0x0057,0x6215,0x0000,0x0005
; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 005b | [| Declare_Subprogram INIT_0058,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x13,0xfffb
0015 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x15,0xfffa
0017 029a 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x17,0xfff9
0019 00bf | | Action Accept_Activation
001a 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x1 = .DEBUG 0x001a,0x0592,0x8000,0x0000,0x0057,0x66a5,0x0000,0x0013
; Debug Table 0x1.0x0 = 0x1a,0xffff
; Debug Table 0x1.0x1 = 0x1a,0xfffe
001b 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x1.0x2 = 0x1b,0x401
001c 0031 | 1 | Store_Top Heap_Access,At_Offset_1 ; Debug Table 0x1.0x3 = 0x1c,0xfffe
001d 029d 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call ; Debug Table 0x1.0x4 = 0x1d,0xfffd
; Debug Table 0x1.0x5 = 0x1d,0xfffc
001f 029d 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call ; Debug Table 0x1.0x6 = 0x1f,0xfffb
0021 029d 028b | | Declare_Subprogram INIT_0288,For_Outer_Call ; Debug Table 0x1.0x7 = 0x21,0xfffa
0023 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x8 = 0x23,0xfff9
0024 00c7 | | Action Elaborate_Subprogram
0025 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x9 = 0x25,0xfff8
0026 00c7 | | Action Elaborate_Subprogram
0027 029d 033b | ;| Declare_Subprogram INIT_0338,For_Outer_Call ; Debug Table 0x1.0xa = 0x27,0xfff7
0029 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0xb = 0x29,0xfff6
002a 00c7 | | Action Elaborate_Subprogram
002b 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0xc = 0x2b,0xfff5
002c 00c7 | | Action Elaborate_Subprogram
002d 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0xd = 0x2d,0xfff4
002e 00c7 | | Action Elaborate_Subprogram
002f 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0xe = 0x2f,0xfff3
0030 00c7 | | Action Elaborate_Subprogram
0031 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0xf = 0x31,0xfff2
0032 00c7 | | Action Elaborate_Subprogram
0033 BODY_0008:
0033 00bc | | Action Signal_Activated
0034 00bb | | Action Signal_Completion
0035 0000 0000 | | .XXX[0x3]
0037 0000 | |
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 003f | ? | .CONST 0x003f ; Address of begin
0039 0004 | | .CONST 0x0004 ; Address of exception handler
003a 0003 | | .CONST 0x0003 ; Number of locals
003b INIT_0038:
003b 00da | | Load_Top At_Offset_2 ; Debug Table 0x2 = .DEBUG 0x003b,0x05b4,0x0002,0x0000,0x0057,0x6215,0x0000,0x0006
; Debug Table 0x2.0x0 = 0x3b,0xffff
003c 00eb | | Load_Encached Diana_Cache
003d 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
003e 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x2.0x1 = 0x3e,0xfffe
; Debug Table 0x2.0x2 = 0x3e,0xfffd
003f BODY_0038:
003f 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0x3 = 0x3f,0x1
0040 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0041 00cf | | Action Mark_Auxiliary
0042 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x4 = 0x42,0x2
0043 01dc | | Execute Vector,Last
0044 00db | | Load_Top At_Offset_3
0045 01dd | | Execute Vector,First
0046 0263 | c | Execute Discrete,Above_Bound
0047 700c |p | Jump_Nonzero 0x54
0048 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x5 = 0x48,0x3
0049 480a |H | Short_Literal 0xa
004a 0271 | q | Execute Discrete,Times
004b 00d9 | | Load_Top At_Offset_1
004c e402 | | Load 0x2,0x2
004d 01d7 | | Execute Vector,Field_Read
004e 0ad0 | | Execute_Immediate Plus,-0x30
004f 0273 | s | Execute Discrete,Plus
0050 0248 | H | Execute Discrete,Check_In_Integer
0051 a403 | | Store_Unchecked 0x2,0x3
0052 00c8 | | Action Pop_Auxiliary_Range
0053 3ff4 |? | Loop_Increasing 0x48
0054 00ce | | Action Pop_Auxiliary
0055 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x6 = 0x55,0x4
0056 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0057 0000 | | .XXX[0x1]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005e | ^ | .CONST 0x005e ; Address of begin
0059 00c9 | | .CONST 0x00c9 ; Address of exception handler
005a 0004 | | .CONST 0x0004 ; Number of locals
005b INIT_0058:
005b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x3 = .DEBUG 0x005b,0x05c4,0x0001,0x0000,0x0057,0x6215,0x0000,0x0011
; Debug Table 0x3.0x0 = 0x5b,0xffff
005c 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x3.0x1 = 0x5c,0xfffe
005d 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x3.0x2 = 0x5d,0xfffd
005e BODY_0058:
005e 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x3 = 0x5e,0x1
005f a5fe | | Store_Unchecked 0x2,-0x2
0060 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x4 = 0x60,0x2
0061 a5fd | | Store_Unchecked 0x2,-0x3
0062 e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x5 = 0x62,0x3
; Debug Table 0x3.0x6 = 0x62,0x401
0063 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x3.0x7 = 0x63,0x402
0064 0b10 | | Execute_Immediate Case_Compare,0x10 ; Debug Table 0x3.0x8 = 0x64,0x403
; Debug Table 0x3.0x9 = 0x64,0x404
; Debug Table 0x3.0xa = 0x64,0x3
0065 7001 |p | Jump_Nonzero 0x67
0066 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x3.0xb = 0x66,0x10
0067 e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0xc = 0x67,0x4
0068 00eb | | Load_Encached Diana_Cache
0069 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4
006a 0032 | 2 | Store_Top Heap_Access,At_Offset_2
006b e404 | | Load 0x2,0x4 ; Debug Table 0x3.0xd = 0x6b,0x5
; Debug Table 0x3.0xe = 0x6b,0x801
006c 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x3.0xf = 0x6c,0x802
006d 0b14 | | Execute_Immediate Case_Compare,0x14 ; Debug Table 0x3.0x10 = 0x6d,0x803
; Debug Table 0x3.0x11 = 0x6d,0x804
; Debug Table 0x3.0x12 = 0x6d,0x5
006e 7003 |p | Jump_Nonzero 0x72
006f 0b15 | | Execute_Immediate Case_Compare,0x15
0070 7001 |p | Jump_Nonzero 0x72
0071 7855 |xU | Jump 0xc7 ; Debug Table 0x3.0x13 = 0x71,0xf
0072 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x14 = 0x72,0x6
0073 00eb | | Load_Encached Diana_Cache
0074 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0075 00eb | | Load_Encached Diana_Cache
0076 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0077 0092 04bc | | Action Push_String_Extended,0x4bc ; "-"
0079 01df | | Execute Vector,Equal
007a 684c |hL | Jump_Zero 0xc7
007b e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x15 = 0x7b,0x7
007c 00eb | | Load_Encached Diana_Cache
007d 18d9 | | Execute Package,Field_Execute,Field_Number 0xd9
007e 00eb | | Load_Encached Diana_Cache
007f 1889 | | Execute Package,Field_Execute,Field_Number 0x89
0080 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x16 = 0x80,0xc01
0081 7002 |p | Jump_Nonzero 0x84
0082 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x3.0x17 = 0x82,0xc02
0083 7826 |x& | Jump 0xaa
0084 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x18 = 0x84,0xc03
0085 0217 | | Execute Heap_Access,All_Reference
0086 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0087 6804 |h | Jump_Zero 0x8c
0088 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x19 = 0x88,0xc04
0089 0217 | | Execute Heap_Access,All_Reference
008a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
008b 781e |x | Jump 0xaa
008c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x1a = 0x8c,0xc05
008d e408 | | Load 0x2,0x8 ; Debug Table 0x3.0x1b = 0x8d,0x1001
008e 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0x3.0x1c = 0x8e,0x1002
008f 00d0 | | Action Swap_Control ; Debug Table 0x3.0x1d = 0x8f,0x1003
; Debug Table 0x3.0x1e = 0x8f,0x1004
0090 00d1 | | Pop_Control Pop_Count_1
0091 49bb |I | Short_Literal 0x1bb ; Debug Table 0x3.0x1f = 0x91,0xc05
0092 00eb | | Load_Encached Diana_Cache
0093 0098 | | Execute Package,Field_Read_Dynamic
0094 012c | , | Execute Any,Size
0095 e001 | | Load 0x0,0x1
0096 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0097 025b | [ | Execute Discrete,Check_In_Type
0098 0273 | s | Execute Discrete,Plus
0099 00d9 | | Load_Top At_Offset_1
009a e409 | | Load 0x2,0x9 ; Debug Table 0x3.0x20 = 0x9a,0x1401
009b 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x3.0x21 = 0x9b,0x1402
009c 00d0 | | Action Swap_Control ; Debug Table 0x3.0x22 = 0x9c,0x1403
; Debug Table 0x3.0x23 = 0x9c,0x1404
009d 00d1 | | Pop_Control Pop_Count_1
009e 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0x3.0x24 = 0x9e,0x1004
009f 00eb | | Load_Encached Diana_Cache
00a0 0098 | | Execute Package,Field_Read_Dynamic
00a1 49c9 |I | Short_Literal 0x1c9
00a2 00eb | | Load_Encached Diana_Cache
00a3 0098 | | Execute Package,Field_Read_Dynamic
00a4 49ca |I | Short_Literal 0x1ca
00a5 00eb | | Load_Encached Diana_Cache
00a6 0095 | | Execute Package,Field_Reference_Dynamic
00a7 e002 | | Load 0x0,0x2
00a8 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00a9 7800 |x | Jump 0xaa
00aa 00d0 | | Action Swap_Control
00ab 00d1 | | Pop_Control Pop_Count_1
00ac a403 | | Store_Unchecked 0x2,0x3 ; Debug Table 0x3.0x25 = 0xac,0x7
00ad e403 | | Load 0x2,0x3 ; Debug Table 0x3.0x26 = 0xad,0x8
; Debug Table 0x3.0x27 = 0xad,0x1801
00ae 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x3.0x28 = 0xae,0x1802
00af 0ba9 | | Execute_Immediate Case_Compare,0xa9 ; Debug Table 0x3.0x29 = 0xaf,0x1803
; Debug Table 0x3.0x2a = 0xaf,0x1804
; Debug Table 0x3.0x2b = 0xaf,0x8
00b0 7003 |p | Jump_Nonzero 0xb4
00b1 e403 | | Load 0x2,0x3 ; Debug Table 0x3.0x2c = 0xb1,0xa
00b2 a402 | | Store_Unchecked 0x2,0x2
00b3 7804 |x | Jump 0xb8
00b4 e403 | | Load 0x2,0x3 ; Debug Table 0x3.0x2d = 0xb4,0x9
00b5 00eb | | Load_Encached Diana_Cache
00b6 18b2 | | Execute Package,Field_Execute,Field_Number 0xb2
00b7 a402 | | Store_Unchecked 0x2,0x2
00b8 00d1 | | Pop_Control Pop_Count_1
00b9 e402 | | Load 0x2,0x2 ; Debug Table 0x3.0x2e = 0xb9,0xb
; Debug Table 0x3.0x2f = 0xb9,0x1c01
00ba 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x3.0x30 = 0xba,0x1c02
00bb 0b08 | | Execute_Immediate Case_Compare,0x8 ; Debug Table 0x3.0x31 = 0xbb,0x1c03
; Debug Table 0x3.0x32 = 0xbb,0x1c04
; Debug Table 0x3.0x33 = 0xbb,0xb
00bc 7001 |p | Jump_Nonzero 0xbe
00bd 7808 |x | Jump 0xc6 ; Debug Table 0x3.0x34 = 0xbd,0xe
00be e402 | | Load 0x2,0x2 ; Debug Table 0x3.0x35 = 0xbe,0xc
00bf 00eb | | Load_Encached Diana_Cache
00c0 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
00c1 820d | | Call 0x1,0xd
00c2 0275 | u | Execute Discrete,Unary_Minus
00c3 a5fe | | Store_Unchecked 0x2,-0x2
00c4 4801 |H | Short_Literal 0x1 ; Debug Table 0x3.0x36 = 0xc4,0xd
00c5 a5fd | | Store_Unchecked 0x2,-0x3
00c6 00d1 | | Pop_Control Pop_Count_1
00c7 00d1 | | Pop_Control Pop_Count_1
00c8 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00c9 TRAP_0058:
00c9 0007 | | Action Break_Optional
00ca 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x3.0x37 = 0xca,0x11
00cb 0000 0000 | | .BLANK 0000[0x5]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d5 | | .CONST 0x00d5 ; Address of begin
00d1 015c | \ | .CONST 0x015c ; Address of exception handler
00d2 0003 | | .CONST 0x0003 ; Number of locals
00d3 INIT_00d0:
00d3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4 = .DEBUG 0x00d3,0x0636,0x0002,0x0000,0x0057,0x6215,0x0000,0x0023
; Debug Table 0x4.0x0 = 0xd3,0xffff
00d4 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4.0x1 = 0xd4,0xfffe
00d5 BODY_00d0:
00d5 e5ff | | Load 0x2,-0x1 ; Debug Table 0x4.0x2 = 0xd5,0x1
00d6 00eb | | Load_Encached Diana_Cache
00d7 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4
00d8 0032 | 2 | Store_Top Heap_Access,At_Offset_2
00d9 e402 | | Load 0x2,0x2 ; Debug Table 0x4.0x3 = 0xd9,0x2
; Debug Table 0x4.0x4 = 0xd9,0x401
00da 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x4.0x5 = 0xda,0x402
00db 0b12 | | Execute_Immediate Case_Compare,0x12 ; Debug Table 0x4.0x6 = 0xdb,0x403
; Debug Table 0x4.0x7 = 0xdb,0x404
; Debug Table 0x4.0x8 = 0xdb,0x2
00dc 7006 |p | Jump_Nonzero 0xe3
00dd 0b17 | | Execute_Immediate Case_Compare,0x17
00de 700b |p | Jump_Nonzero 0xea
00df 0b16 | | Execute_Immediate Case_Compare,0x16
00e0 7009 |p | Jump_Nonzero 0xea
00e1 62de |b | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x5766a501} ; Debug Table 0x4.0x9 = 0xe1,0x5
00e2 0257 | W | Execute Discrete,Raise
00e3 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0xa = 0xe3,0x3
00e4 00eb | | Load_Encached Diana_Cache
00e5 18c0 | | Execute Package,Field_Execute,Field_Number 0xc0
00e6 00eb | | Load_Encached Diana_Cache
00e7 18fa | | Execute Package,Field_Execute,Field_Number 0xfa
00e8 0032 | 2 | Store_Top Heap_Access,At_Offset_2
00e9 7804 |x | Jump 0xee
00ea 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0xb = 0xea,0x4
00eb 00eb | | Load_Encached Diana_Cache
00ec 18fa | | Execute Package,Field_Execute,Field_Number 0xfa
00ed 0032 | 2 | Store_Top Heap_Access,At_Offset_2
00ee 00d1 | | Pop_Control Pop_Count_1
00ef 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0xc = 0xef,0x6
; Debug Table 0x4.0xd = 0xef,0x801
00f0 021d | | Execute Heap_Access,Is_Null
00f1 6803 |h | Jump_Zero 0xf5 ; Debug Table 0x4.0xe = 0xf1,0x6
00f2 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0xf = 0xf2,0x7
00f3 8218 | | Call 0x1,0x18
00f4 0031 | 1 | Store_Top Heap_Access,At_Offset_1
00f5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x10 = 0xf5,0x8
00f6 e003 | | Load 0x0,0x3
00f7 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00f8 6861 |ha | Jump_Zero 0x15a
00f9 00cf | | Action Mark_Auxiliary ; Debug Table 0x4.0x11 = 0xf9,0x9
00fa e004 | | Load 0x0,0x4 ; Debug Table 0x4.0x12 = 0xfa,0xf3ff
00fb 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00fc 02c7 | | Declare_Variable Any
00fd 00d8 | | Load_Top At_Offset_0
00fe 1c00 | | Execute_Immediate Run_Utility,0x0
00ff e004 | | Load 0x0,0x4 ; Debug Table 0x4.0x13 = 0xff,0xf3fe
0100 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0101 e004 | | Load 0x0,0x4 ; Debug Table 0x4.0x14 = 0x101,0xf3fd
0102 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0103 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0104 02c7 | | Declare_Variable Any
0105 00d8 | | Load_Top At_Offset_0
0106 1c00 | | Execute_Immediate Run_Utility,0x0
0107 e004 | | Load 0x0,0x4 ; Debug Table 0x4.0x15 = 0x107,0xc01
0108 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0109 00db | | Load_Top At_Offset_3
010a 0120 | | Execute Any,Is_Value
010b 6803 |h | Jump_Zero 0x10f
010c e004 | | Load 0x0,0x4
010d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
010e 7801 |x | Jump 0x110
010f 00db | | Load_Top At_Offset_3
0110 62ab |b | Indirect_Literal Discrete,0x3bc,{0x00000000, 0x00004000}
0111 e005 | | Load 0x0,0x5
0112 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0113 4800 |H | Short_Literal 0x0
0114 e004 | | Load 0x0,0x4
0115 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0116 e403 | | Load 0x2,0x3
0117 e004 | | Load 0x0,0x4
0118 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
0119 1816 | | Execute Package,Field_Execute,Field_Number 0x16
011a c405 | | Store 0x2,0x5
011b 005a | Z | Store_Top Discrete,At_Offset_2
011c 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x16 = 0x11c,0xc02
011d 8215 | | Call 0x1,0x15
011e 7002 |p | Jump_Nonzero 0x121
011f 62a0 |b | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x5766a501} ; Debug Table 0x4.0x17 = 0x11f,0xc03
0120 0257 | W | Execute Discrete,Raise
0121 e004 | | Load 0x0,0x4 ; Debug Table 0x4.0x18 = 0x121,0xc04
0122 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0123 00d9 | | Load_Top At_Offset_1
0124 0120 | | Execute Any,Is_Value
0125 6804 |h | Jump_Zero 0x12a
0126 e004 | | Load 0x0,0x4
0127 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0128 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0129 7801 |x | Jump 0x12b
012a 00d9 | | Load_Top At_Offset_1
012b e004 | | Load 0x0,0x4
012c 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
012d 1b16 | | Execute Package,Field_Read,Field_Number 0x16
012e 628d |b | Indirect_Literal Discrete,0x3bc,{0x00000000, 0x00004000}
012f 4800 |H | Short_Literal 0x0
0130 4800 |H | Short_Literal 0x0
0131 4800 |H | Short_Literal 0x0
0132 e005 | | Load 0x0,0x5
0133 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0134 4800 |H | Short_Literal 0x0
0135 e405 | | Load 0x2,0x5
0136 e004 | | Load 0x0,0x4
0137 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0138 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0139 e004 | | Load 0x0,0x4
013a 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
013b 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
013c c403 | | Store 0x2,0x3
013d c407 | | Store 0x2,0x7
013e 005a | Z | Store_Top Discrete,At_Offset_2
013f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x19 = 0x13f,0xc05
0140 8215 | | Call 0x1,0x15
0141 7002 |p | Jump_Nonzero 0x144
0142 627d |b} | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x5766a501} ; Debug Table 0x4.0x1a = 0x142,0xc06
0143 0257 | W | Execute Discrete,Raise
0144 00d3 | | Pop_Control Pop_Count_3
0145 00ce | | Action Pop_Auxiliary
0146 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x1b = 0x146,0xa
0147 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x1c = 0x147,0x1001
0148 e405 | | Load 0x2,0x5 ; Debug Table 0x4.0x1d = 0x148,0x1401
0149 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x4.0x1e = 0x149,0x1402
014a 00d0 | | Action Swap_Control ; Debug Table 0x4.0x1f = 0x14a,0x1403
; Debug Table 0x4.0x20 = 0x14a,0x1404
014b 00d1 | | Pop_Control Pop_Count_1
014c 49e1 |I | Short_Literal 0x1e1 ; Debug Table 0x4.0x21 = 0x14c,0x1001
014d 00eb | | Load_Encached Diana_Cache
014e 0098 | | Execute Package,Field_Read_Dynamic
014f 180d | | Execute Package,Field_Execute,Field_Number 0xd
0150 7800 |x | Jump 0x151
0151 00d0 | | Action Swap_Control
0152 00d1 | | Pop_Control Pop_Count_1
0153 7006 |p | Jump_Nonzero 0x15a ; Debug Table 0x4.0x22 = 0x153,0xa
0154 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x23 = 0x154,0xb
0155 4976 |Iv | Short_Literal 0x176
0156 00eb | | Load_Encached Diana_Cache
0157 0098 | | Execute Package,Field_Read_Dynamic
0158 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0159 0031 | 1 | Store_Top Heap_Access,At_Offset_1
015a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x24 = 0x15a,0xc
015b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
015c TRAP_00d0:
015c 0007 | | Action Break_Optional
015d 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4.0x25 = 0x15d,0xd
; Debug Table 0x4.0x26 = 0x15d,0x1801
015e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 ; Debug Table 0x4.0x27 = 0x15e,0xd
015f 0000 | | .XXX[0x1]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 016b | k | .CONST 0x016b ; Address of begin
0161 01dd | | .CONST 0x01dd ; Address of exception handler
0162 0008 | | .CONST 0x0008 ; Number of locals
0163 INIT_0160:
0163 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5 = .DEBUG 0x0163,0x0688,0x0002,0x0000,0x0057,0x6215,0x0000,0x0030
; Debug Table 0x5.0x0 = 0x163,0xffff
0164 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0x1 = 0x164,0xfffe
0165 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0x2 = 0x165,0xfffd
0166 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0x3 = 0x166,0xfffc
0167 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x5.0x4 = 0x167,0xfffb
0168 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x5.0x5 = 0x168,0xfffa
0169 029f 03cb | | Declare_Subprogram INIT_03c8,For_Call ; Debug Table 0x5.0x6 = 0x169,0xfff9
016b BODY_0160:
016b e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x7 = 0x16b,0x1
016c 820f | | Call 0x1,0xf
016d a402 | | Store_Unchecked 0x2,0x2
016e e402 | | Load 0x2,0x2 ; Debug Table 0x5.0x8 = 0x16e,0x2
016f 00eb | | Load_Encached Diana_Cache
0170 18ec | | Execute Package,Field_Execute,Field_Number 0xec
0171 a405 | | Store_Unchecked 0x2,0x5
0172 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x9 = 0x172,0x3
0173 00eb | | Load_Encached Diana_Cache
0174 18ce | | Execute Package,Field_Execute,Field_Number 0xce
0175 00eb | | Load_Encached Diana_Cache
0176 18da | | Execute Package,Field_Execute,Field_Number 0xda
0177 00eb | | Load_Encached Diana_Cache
0178 1889 | | Execute Package,Field_Execute,Field_Number 0x89
0179 0033 | 3 | Store_Top Heap_Access,At_Offset_3
017a 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0xa = 0x17a,0x4
017b 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
017c 00cf | | Action Mark_Auxiliary
017d 7859 |xY | Jump 0x1d7
017e 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0xb = 0x17e,0x6
017f 0a01 | | Execute_Immediate Plus,0x1
0180 005b | [ | Store_Top Discrete,At_Offset_3
0181 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0xc = 0x181,0x7
0182 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0xd = 0x182,0x401
0183 7002 |p | Jump_Nonzero 0x186
0184 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0xe = 0x184,0x402
0185 7826 |x& | Jump 0x1ac
0186 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0xf = 0x186,0x403
0187 0217 | | Execute Heap_Access,All_Reference
0188 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0189 6804 |h | Jump_Zero 0x18e
018a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x10 = 0x18a,0x404
018b 0217 | | Execute Heap_Access,All_Reference
018c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
018d 781e |x | Jump 0x1ac
018e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x11 = 0x18e,0x405
018f e40b | | Load 0x2,0xb ; Debug Table 0x5.0x12 = 0x18f,0x801
0190 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0x5.0x13 = 0x190,0x802
0191 00d0 | | Action Swap_Control ; Debug Table 0x5.0x14 = 0x191,0x803
; Debug Table 0x5.0x15 = 0x191,0x804
0192 00d1 | | Pop_Control Pop_Count_1
0193 49bb |I | Short_Literal 0x1bb ; Debug Table 0x5.0x16 = 0x193,0x405
0194 00eb | | Load_Encached Diana_Cache
0195 0098 | | Execute Package,Field_Read_Dynamic
0196 012c | , | Execute Any,Size
0197 e001 | | Load 0x0,0x1
0198 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0199 025b | [ | Execute Discrete,Check_In_Type
019a 0273 | s | Execute Discrete,Plus
019b 00d9 | | Load_Top At_Offset_1
019c e40c | | Load 0x2,0xc ; Debug Table 0x5.0x17 = 0x19c,0xc01
019d 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x5.0x18 = 0x19d,0xc02
019e 00d0 | | Action Swap_Control ; Debug Table 0x5.0x19 = 0x19e,0xc03
; Debug Table 0x5.0x1a = 0x19e,0xc04
019f 00d1 | | Pop_Control Pop_Count_1
01a0 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0x5.0x1b = 0x1a0,0x804
01a1 00eb | | Load_Encached Diana_Cache
01a2 0098 | | Execute Package,Field_Read_Dynamic
01a3 49c9 |I | Short_Literal 0x1c9
01a4 00eb | | Load_Encached Diana_Cache
01a5 0098 | | Execute Package,Field_Read_Dynamic
01a6 49ca |I | Short_Literal 0x1ca
01a7 00eb | | Load_Encached Diana_Cache
01a8 0095 | | Execute Package,Field_Reference_Dynamic
01a9 e002 | | Load 0x0,0x2
01aa 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01ab 7800 |x | Jump 0x1ac
01ac 00d0 | | Action Swap_Control
01ad 00d1 | | Pop_Control Pop_Count_1
01ae 00eb | | Load_Encached Diana_Cache ; Debug Table 0x5.0x1c = 0x1ae,0x7
01af 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4
01b0 a404 | | Store_Unchecked 0x2,0x4
01b1 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x1d = 0x1b1,0x8
; Debug Table 0x5.0x1e = 0x1b1,0x1001
01b2 7002 |p | Jump_Nonzero 0x1b5
01b3 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x5.0x1f = 0x1b3,0x1002
01b4 7803 |x | Jump 0x1b8
01b5 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x20 = 0x1b5,0x1003
01b6 0217 | | Execute Heap_Access,All_Reference
01b7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01b8 a406 | | Store_Unchecked 0x2,0x6 ; Debug Table 0x5.0x21 = 0x1b8,0x8
01b9 e404 | | Load 0x2,0x4 ; Debug Table 0x5.0x22 = 0x1b9,0x9
01ba 4976 |Iv | Short_Literal 0x176
01bb 00eb | | Load_Encached Diana_Cache
01bc 0098 | | Execute Package,Field_Read_Dynamic
01bd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01be a403 | | Store_Unchecked 0x2,0x3
01bf e403 | | Load 0x2,0x3 ; Debug Table 0x5.0x23 = 0x1bf,0xa
01c0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x24 = 0x1c0,0x1401
01c1 e40b | | Load 0x2,0xb ; Debug Table 0x5.0x25 = 0x1c1,0x1801
01c2 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x5.0x26 = 0x1c2,0x1802
01c3 00d0 | | Action Swap_Control ; Debug Table 0x5.0x27 = 0x1c3,0x1803
; Debug Table 0x5.0x28 = 0x1c3,0x1804
01c4 00d1 | | Pop_Control Pop_Count_1
01c5 49e1 |I | Short_Literal 0x1e1 ; Debug Table 0x5.0x29 = 0x1c5,0x1401
01c6 00eb | | Load_Encached Diana_Cache
01c7 0098 | | Execute Package,Field_Read_Dynamic
01c8 180d | | Execute Package,Field_Execute,Field_Number 0xd
01c9 7800 |x | Jump 0x1ca
01ca 00d0 | | Action Swap_Control
01cb 00d1 | | Pop_Control Pop_Count_1
01cc 6809 |h | Jump_Zero 0x1d6 ; Debug Table 0x5.0x2a = 0x1cc,0xa
01cd e403 | | Load 0x2,0x3
01ce 00eb | | Load_Encached Diana_Cache
01cf 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
01d0 00eb | | Load_Encached Diana_Cache
01d1 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
01d2 8408 | | Call 0x2,0x8
01d3 6802 |h | Jump_Zero 0x1d6
01d4 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x2b = 0x1d4,0xb
01d5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01d6 00c9 | | Action Pop_Auxiliary_Loop
01d7 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x2c = 0x1d7,0x5
; Debug Table 0x5.0x2d = 0x1d7,0x1c01
01d8 021d | | Execute Heap_Access,Is_Null
01d9 6fa4 |o | Jump_Zero 0x17e ; Debug Table 0x5.0x2e = 0x1d9,0x5
01da 00ce | | Action Pop_Auxiliary
01db 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x2f = 0x1db,0xc
01dc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01dd TRAP_0160:
01dd 0007 | | Action Break_Optional
01de 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x30 = 0x1de,0xd
01df 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e5 | | .CONST 0x01e5 ; Address of begin
01e1 0204 | | .CONST 0x0204 ; Address of exception handler
01e2 0002 | | .CONST 0x0002 ; Number of locals
01e3 INIT_01e0:
01e3 e006 | | Load 0x0,0x6 ; Debug Table 0x6 = .DEBUG 0x01e3,0x06ec,0x0001,0x0000,0x0057,0x6215,0x0000,0x003b
; Debug Table 0x6.0x0 = 0x1e3,0xffff
01e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01e5 BODY_01e0:
01e5 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x1 = 0x1e5,0x1
01e6 01db | | Execute Vector,Length
01e7 7003 |p | Jump_Nonzero 0x1eb
01e8 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x6.0x2 = 0x1e8,0x2
; Debug Table 0x6.0x3 = 0x1e8,0x401
01e9 a5fe | | Store_Unchecked 0x2,-0x2 ; Debug Table 0x6.0x4 = 0x1e9,0x2
01ea 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x6.0x5 = 0x1ea,0x3
01eb e006 | | Load 0x0,0x6 ; Debug Table 0x6.0x6 = 0x1eb,0x4
01ec 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ed 00ec | | Load_Encached Diana_Tree_Cache
01ee e007 | | Load 0x0,0x7
01ef 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01f0 e008 | | Load 0x0,0x8
01f1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01f2 4800 |H | Short_Literal 0x0
01f3 e009 | | Load 0x0,0x9
01f4 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01f5 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
01f6 480f |H | Short_Literal 0xf
01f7 e5ff | | Load 0x2,-0x1
01f8 e00a | | Load 0x0,0xa
01f9 180d | | Execute Package,Field_Execute,Field_Number 0xd
01fa c5fe | | Store 0x2,-0x2
01fb 0059 | Y | Store_Top Discrete,At_Offset_1
01fc 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x7 = 0x1fc,0x5
01fd 4602 |F | Jump_Case 0x3
01fe 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x0
01ff 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x1
0200 7800 |x | Jump 0x201 ; case 0x2
0201 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x6.0x8 = 0x201,0x7
; Debug Table 0x6.0x9 = 0x201,0x801
0202 a5fe | | Store_Unchecked 0x2,-0x2 ; Debug Table 0x6.0xa = 0x202,0x7
0203 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0204 TRAP_01e0:
0204 0007 | | Action Break_Optional
0205 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x6.0xb = 0x205,0x8
; Debug Table 0x6.0xc = 0x205,0xc01
0206 a5fe | | Store_Unchecked 0x2,-0x2 ; Debug Table 0x6.0xd = 0x206,0x8
0207 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020c | | .CONST 0x020c ; Address of begin
0209 0219 | | .CONST 0x0219 ; Address of exception handler
020a 0002 | | .CONST 0x0002 ; Number of locals
020b INIT_0208:
020b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x7 = .DEBUG 0x020b,0x070a,0x0001,0x0000,0x0057,0x6215,0x0000,0x0049
; Debug Table 0x7.0x0 = 0x20b,0xffff
020c BODY_0208:
020c 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x1 = 0x20c,0x1
020d e00b | | Load 0x0,0xb
020e 180e | | Execute Package,Field_Execute,Field_Number 0xe
020f 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0210 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x2 = 0x210,0x2
0211 8217 | | Call 0x1,0x17
0212 00d9 | | Load_Top At_Offset_1
0213 493a |I: | Short_Literal 0x13a
0214 00eb | | Load_Encached Diana_Cache
0215 0096 | | Execute Package,Entry
0216 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x3 = 0x216,0x3
0217 a5fe | | Store_Unchecked 0x2,-0x2
0218 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0219 TRAP_0208:
0219 0007 | | Action Break_Optional
021a 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x7.0x4 = 0x21a,0x4
; Debug Table 0x7.0x5 = 0x21a,0x401
021b a5fe | | Store_Unchecked 0x2,-0x2 ; Debug Table 0x7.0x6 = 0x21b,0x4
021c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
021d 0000 0000 | | .XXX[0x3]
021f 0000 | |
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0229 | ) | .CONST 0x0229 ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0003 | | .CONST 0x0003 ; Number of locals
0223 INIT_0220:
0223 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8 = .DEBUG 0x0223,0x071a,0x0001,0x0000,0x0057,0x6215,0x0000,0x0059
; Debug Table 0x8.0x0 = 0x223,0xffff
0224 e00c | | Load 0x0,0xc ; Debug Table 0x8.0x1 = 0x224,0xfffe
0225 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0226 02c7 | | Declare_Variable Any
0227 00d8 | | Load_Top At_Offset_0
0228 1c00 | | Execute_Immediate Run_Utility,0x0
0229 BODY_0220:
0229 e214 | | Load 0x1,0x14 ; Debug Table 0x8.0x2 = 0x229,0x1
022a 4889 |H | Short_Literal 0x89
022b 00eb | | Load_Encached Diana_Cache
022c 187f | | Execute Package,Field_Execute,Field_Number 0x7f
022d e214 | | Load 0x1,0x14
022e e5ff | | Load 0x2,-0x1
022f 00eb | | Load_Encached Diana_Cache
0230 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b
0231 4897 |H | Short_Literal 0x97
0232 00eb | | Load_Encached Diana_Cache
0233 187f | | Execute Package,Field_Execute,Field_Number 0x7f
0234 e214 | | Load 0x1,0x14
0235 4891 |H | Short_Literal 0x91
0236 00eb | | Load_Encached Diana_Cache
0237 187f | | Execute Package,Field_Execute,Field_Number 0x7f
0238 484e |HN | Short_Literal 0x4e
0239 00eb | | Load_Encached Diana_Cache
023a 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e
023b 0032 | 2 | Store_Top Heap_Access,At_Offset_2
023c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x3 = 0x23c,0x2
023d 0120 | | Execute Any,Is_Value
023e 6803 |h | Jump_Zero 0x242
023f e00d | | Load 0x0,0xd
0240 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0241 7801 |x | Jump 0x243
0242 00d8 | | Load_Top At_Offset_0
0243 00da | | Load_Top At_Offset_2
0244 e00e | | Load 0x0,0xe
0245 180f | | Execute Package,Field_Execute,Field_Number 0xf
0246 e005 | | Load 0x0,0x5
0247 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0248 4800 |H | Short_Literal 0x0
0249 e00f | | Load 0x0,0xf
024a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
024b e010 | | Load 0x0,0x10
024c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
024d e011 | | Load 0x0,0x11
024e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
024f 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8.0x4 = 0x24f,0x401
0250 e012 | | Load 0x0,0x12 ; Debug Table 0x8.0x5 = 0x250,0x2
0251 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0252 e00d | | Load 0x0,0xd
0253 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0254 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0255 180e | | Execute Package,Field_Execute,Field_Number 0xe
0256 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0257 c403 | | Store 0x2,0x3
0258 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x6 = 0x258,0x3
0259 e00c | | Load 0x0,0xc
025a 181a | | Execute Package,Field_Execute,Field_Number 0x1a
025b a5fe | | Store_Unchecked 0x2,-0x2
025c 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x7 = 0x25c,0x4
025d e5ff | | Load 0x2,-0x1
025e 4974 |It | Short_Literal 0x174
025f 00eb | | Load_Encached Diana_Cache
0260 0098 | | Execute Package,Field_Read_Dynamic
0261 180f | | Execute Package,Field_Execute,Field_Number 0xf
0262 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0263 0000 0000 | | .BLANK 0000[0x5]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026b | k | .CONST 0x026b ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 0001 | | .CONST 0x0001 ; Number of locals
026b BODY_0268:
026b INIT_0268:
026b 00da | | Load_Top At_Offset_2 ; Debug Table 0x9 = .DEBUG 0x026b,0x072c,0x0002,0x0000,0x0057,0x66a5,0x0000,0x0027
; Debug Table 0x9.0x0 = 0x26b,0x1
026c 0f00 | | Execute_Immediate Equal,0x0
026d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
026e 0000 0000 | | .XXX[0x2]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273 | s | .CONST 0x0273 ; Address of begin
0271 0004 | | .CONST 0x0004 ; Address of exception handler
0272 0001 | | .CONST 0x0001 ; Number of locals
0273 BODY_0270:
0273 INIT_0270:
0273 e013 | | Load 0x0,0x13 ; Debug Table 0xa = .DEBUG 0x0273,0x0730,0x0001,0x0000,0x0057,0x66a5,0x0000,0x0040
; Debug Table 0xa.0x0 = 0x273,0x1
0274 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0275 0092 04bd | | Action Push_String_Extended,0x4bd ; "*** Exception in Ce_Diana_Utilities."
; Debug Table 0xa.0x1 = 0x275,0x2
0277 00db | | Load_Top At_Offset_3
0278 01cc | | Execute Vector,Catenate
0279 0092 04be | | Action Push_String_Extended,0x4be ; ": "
027b 01cc | | Execute Vector,Catenate
027c e5fe | | Load 0x2,-0x2
027d 01cc | | Execute Vector,Catenate
027e e013 | | Load 0x0,0x13
027f 180f | | Execute Package,Field_Execute,Field_Number 0xf
0280 613f |a? | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x5766a501} ; Debug Table 0xa.0x2 = 0x280,0x3
0281 0257 | W | Execute Discrete,Raise
0282 0000 0000 | | .BLANK 0000[0x6]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 029c | | .CONST 0x029c ; Address of begin
0289 032a | * | .CONST 0x032a ; Address of exception handler
028a 000b | | .CONST 0x000b ; Number of locals
028b INIT_0288:
028b 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xb = .DEBUG 0x028b,0x0738,0x0002,0x0000,0x0057,0x66a5,0x0000,0x006e
; Debug Table 0xb.0x0 = 0x28b,0xffff
028c 00ee | | Load_Encached Diana_Seq_Type_Cache
028d 02a0 | | Declare_Subprogram Null_Subprogram
028e 4802 |H | Short_Literal 0x2
028f 032d | - | Declare_Type Record,Defined
0290 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xb.0x1 = 0x290,0xfffe
0291 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xb.0x2 = 0x291,0xfffd
0292 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xb.0x3 = 0x292,0xfffc
0293 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xb.0x4 = 0x293,0xfffb
0294 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xb.0x5 = 0x294,0xfffa
0295 00ef | | Load_Encached Diana_Sequence_Cache ; Debug Table 0xb.0x6 = 0x295,0xfff9
0296 e402 | | Load 0x2,0x2 ; Debug Table 0xb.0x7 = 0x296,0xfff8
0297 0322 | " | Declare_Variable Record
0298 029f 03eb | | Declare_Subprogram INIT_03e8,For_Call ; Debug Table 0xb.0x8 = 0x298,0xfff7
029a 029f 048b | | Declare_Subprogram INIT_0488,For_Call
029c BODY_0288:
029c 840b | | Call 0x2,0xb ; Debug Table 0xb.0x9 = 0x29c,0x1
029d e5ff | | Load 0x2,-0x1 ; Debug Table 0xb.0xa = 0x29d,0x2
029e 820f | | Call 0x1,0xf
029f a405 | | Store_Unchecked 0x2,0x5
02a0 e405 | | Load 0x2,0x5 ; Debug Table 0xb.0xb = 0x2a0,0x3
02a1 4904 |I | Short_Literal 0x104
02a2 00eb | | Load_Encached Diana_Cache
02a3 0096 | | Execute Package,Entry
02a4 00eb | | Load_Encached Diana_Cache
02a5 18da | | Execute Package,Field_Execute,Field_Number 0xda
02a6 00eb | | Load_Encached Diana_Cache
02a7 1888 | | Execute Package,Field_Execute,Field_Number 0x88
02a8 00db | | Load_Top At_Offset_3
02a9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02aa 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0xc = 0x2aa,0x4
02ab 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02ac 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0xd = 0x2ac,0x401
02ad 021d | | Execute Heap_Access,Is_Null
02ae 00d0 | | Action Swap_Control
02af 00d1 | | Pop_Control Pop_Count_1
02b0 6805 |h | Jump_Zero 0x2b6 ; Debug Table 0xb.0xe = 0x2b0,0x4
02b1 e214 | | Load 0x1,0x14 ; Debug Table 0xb.0xf = 0x2b1,0x5
02b2 4893 |H | Short_Literal 0x93
02b3 00eb | | Load_Encached Diana_Cache
02b4 187f | | Execute Package,Field_Execute,Field_Number 0x7f
02b5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02b6 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x10 = 0x2b6,0x6
02b7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02b8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x11 = 0x2b8,0x801
02b9 7002 |p | Jump_Nonzero 0x2bc
02ba 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xb.0x12 = 0x2ba,0x802
02bb 7826 |x& | Jump 0x2e2
02bc 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x13 = 0x2bc,0x803
02bd 0217 | | Execute Heap_Access,All_Reference
02be 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02bf 6804 |h | Jump_Zero 0x2c4
02c0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x14 = 0x2c0,0x804
02c1 0217 | | Execute Heap_Access,All_Reference
02c2 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
02c3 781e |x | Jump 0x2e2
02c4 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x15 = 0x2c4,0x805
02c5 e40d | | Load 0x2,0xd ; Debug Table 0xb.0x16 = 0x2c5,0xc01
02c6 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0xb.0x17 = 0x2c6,0xc02
02c7 00d0 | | Action Swap_Control ; Debug Table 0xb.0x18 = 0x2c7,0xc03
; Debug Table 0xb.0x19 = 0x2c7,0xc04
02c8 00d1 | | Pop_Control Pop_Count_1
02c9 49bb |I | Short_Literal 0x1bb ; Debug Table 0xb.0x1a = 0x2c9,0x805
02ca 00eb | | Load_Encached Diana_Cache
02cb 0098 | | Execute Package,Field_Read_Dynamic
02cc 012c | , | Execute Any,Size
02cd e001 | | Load 0x0,0x1
02ce 1b17 | | Execute Package,Field_Read,Field_Number 0x17
02cf 025b | [ | Execute Discrete,Check_In_Type
02d0 0273 | s | Execute Discrete,Plus
02d1 00d9 | | Load_Top At_Offset_1
02d2 e40e | | Load 0x2,0xe ; Debug Table 0xb.0x1b = 0x2d2,0x1001
02d3 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0xb.0x1c = 0x2d3,0x1002
02d4 00d0 | | Action Swap_Control ; Debug Table 0xb.0x1d = 0x2d4,0x1003
; Debug Table 0xb.0x1e = 0x2d4,0x1004
02d5 00d1 | | Pop_Control Pop_Count_1
02d6 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0xb.0x1f = 0x2d6,0xc04
02d7 00eb | | Load_Encached Diana_Cache
02d8 0098 | | Execute Package,Field_Read_Dynamic
02d9 49c9 |I | Short_Literal 0x1c9
02da 00eb | | Load_Encached Diana_Cache
02db 0098 | | Execute Package,Field_Read_Dynamic
02dc 49ca |I | Short_Literal 0x1ca
02dd 00eb | | Load_Encached Diana_Cache
02de 0095 | | Execute Package,Field_Reference_Dynamic
02df e002 | | Load 0x0,0x2
02e0 1819 | | Execute Package,Field_Execute,Field_Number 0x19
02e1 7800 |x | Jump 0x2e2
02e2 00d0 | | Action Swap_Control
02e3 00d1 | | Pop_Control Pop_Count_1
02e4 00eb | | Load_Encached Diana_Cache ; Debug Table 0xb.0x20 = 0x2e4,0x6
02e5 18d0 | | Execute Package,Field_Execute,Field_Number 0xd0
02e6 00eb | | Load_Encached Diana_Cache
02e7 1888 | | Execute Package,Field_Execute,Field_Number 0x88
02e8 00db | | Load_Top At_Offset_3
02e9 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
02ea e214 | | Load 0x1,0x14 ; Debug Table 0xb.0x21 = 0x2ea,0x7
02eb a404 | | Store_Unchecked 0x2,0x4
02ec 4801 |H | Short_Literal 0x1 ; Debug Table 0xb.0x22 = 0x2ec,0x8
02ed a407 | | Store_Unchecked 0x2,0x7
02ee 00cf | | Action Mark_Auxiliary
02ef 7831 |x1 | Jump 0x321
02f0 e408 | | Load 0x2,0x8 ; Debug Table 0xb.0x23 = 0x2f0,0xa
02f1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x24 = 0x2f1,0x1401
02f2 0217 | | Execute Heap_Access,All_Reference
02f3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02f4 00d9 | | Load_Top At_Offset_1
02f5 e40f | | Load 0x2,0xf ; Debug Table 0xb.0x25 = 0x2f5,0x1801
02f6 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0xb.0x26 = 0x2f6,0x1802
02f7 00d0 | | Action Swap_Control ; Debug Table 0xb.0x27 = 0x2f7,0x1803
; Debug Table 0xb.0x28 = 0x2f7,0x1804
02f8 00d1 | | Pop_Control Pop_Count_1
02f9 49af |I | Short_Literal 0x1af ; Debug Table 0xb.0x29 = 0x2f9,0x1401
02fa 00eb | | Load_Encached Diana_Cache
02fb 0096 | | Execute Package,Entry
02fc 00d0 | | Action Swap_Control
02fd 00d1 | | Pop_Control Pop_Count_1
02fe a406 | | Store_Unchecked 0x2,0x6 ; Debug Table 0xb.0x2a = 0x2fe,0xa
02ff e408 | | Load 0x2,0x8 ; Debug Table 0xb.0x2b = 0x2ff,0xb
; Debug Table 0xb.0x2c = 0x2ff,0x1c01
0300 0217 | | Execute Heap_Access,All_Reference
0301 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0302 a408 | | Store_Unchecked 0x2,0x8 ; Debug Table 0xb.0x2d = 0x302,0xb
0303 e407 | | Load 0x2,0x7 ; Debug Table 0xb.0x2e = 0x303,0xc
0304 680b |h | Jump_Zero 0x310
0305 e404 | | Load 0x2,0x4 ; Debug Table 0xb.0x2f = 0x305,0xd
0306 e406 | | Load 0x2,0x6
0307 840a | | Call 0x2,0xa
0308 00eb | | Load_Encached Diana_Cache
0309 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b
030a a404 | | Store_Unchecked 0x2,0x4
030b e404 | | Load 0x2,0x4 ; Debug Table 0xb.0x30 = 0x30b,0xe
030c a403 | | Store_Unchecked 0x2,0x3
030d 4800 |H | Short_Literal 0x0 ; Debug Table 0xb.0x31 = 0x30d,0xf
030e a407 | | Store_Unchecked 0x2,0x7
030f 7810 |x | Jump 0x320
0310 e403 | | Load 0x2,0x3 ; Debug Table 0xb.0x32 = 0x310,0x10
0311 e406 | | Load 0x2,0x6
0312 840a | | Call 0x2,0xa
0313 4975 |Iu | Short_Literal 0x175
0314 00eb | | Load_Encached Diana_Cache
0315 0098 | | Execute Package,Field_Read_Dynamic
0316 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0317 c403 | | Store 0x2,0x3
0318 e403 | | Load 0x2,0x3 ; Debug Table 0xb.0x33 = 0x318,0x11
; Debug Table 0xb.0x34 = 0x318,0x2001
0319 7002 |p | Jump_Nonzero 0x31c
031a 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xb.0x35 = 0x31a,0x2002
031b 7803 |x | Jump 0x31f
031c e403 | | Load 0x2,0x3 ; Debug Table 0xb.0x36 = 0x31c,0x2003
031d 0217 | | Execute Heap_Access,All_Reference
031e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
031f a403 | | Store_Unchecked 0x2,0x3 ; Debug Table 0xb.0x37 = 0x31f,0x11
0320 00c9 | | Action Pop_Auxiliary_Loop
0321 e408 | | Load 0x2,0x8 ; Debug Table 0xb.0x38 = 0x321,0x9
; Debug Table 0xb.0x39 = 0x321,0x2401
0322 021d | | Execute Heap_Access,Is_Null
0323 6fcc |o | Jump_Zero 0x2f0 ; Debug Table 0xb.0x3a = 0x323,0x9
0324 00ce | | Action Pop_Auxiliary
0325 e404 | | Load 0x2,0x4 ; Debug Table 0xb.0x3b = 0x325,0x12
0326 4893 |H | Short_Literal 0x93
0327 00eb | | Load_Encached Diana_Cache
0328 187f | | Execute Package,Field_Execute,Field_Number 0x7f
0329 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
032a TRAP_0288:
032a 0007 | | Action Break_Optional
032b 4801 |H | Short_Literal 0x1 ; Debug Table 0xb.0x3c = 0x32b,0x13
032c e014 | | Load 0x0,0x14
032d 180d | | Execute Package,Field_Execute,Field_Number 0xd
032e 0092 04bf | | Action Push_String_Extended,0x4bf ; "Make_Param_Assoc_S"
0330 8216 | | Call 0x1,0x16
0331 4831 |H1 | Short_Literal 0x31
0332 0257 | W | Execute Discrete,Raise
0333 0000 0000 | | .BLANK 0000[0x5]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 0351 | Q | .CONST 0x0351 ; Address of begin
0339 03b4 | | .CONST 0x03b4 ; Address of exception handler
033a 0009 | | .CONST 0x0009 ; Number of locals
033b INIT_0338:
033b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc = .DEBUG 0x033b,0x07b4,0x0002,0x0000,0x0057,0x66a5,0x0000,0x0333
; Debug Table 0xc.0x0 = 0x33b,0xffff
; Debug Table 0xc.0x1 = 0x33b,0xfffe
033c 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0x2 = 0x33c,0xfffd
033d 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0x3 = 0x33d,0xfffc
033e e004 | | Load 0x0,0x4 ; Debug Table 0xc.0x4 = 0x33e,0xfffb
033f 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0340 1b33 | 3 | Execute Package,Field_Read,Field_Number 0x33
0341 02c7 | | Declare_Variable Any
0342 00d8 | | Load_Top At_Offset_0
0343 1c00 | | Execute_Immediate Run_Utility,0x0
0344 e004 | | Load 0x0,0x4 ; Debug Table 0xc.0x5 = 0x344,0xfffa
0345 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0346 e004 | | Load 0x0,0x4 ; Debug Table 0xc.0x6 = 0x346,0xfff9
0347 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0348 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0349 e004 | | Load 0x0,0x4 ; Debug Table 0xc.0x7 = 0x349,0xfff8
034a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
034b 1b18 | | Execute Package,Field_Read,Field_Number 0x18
034c 02c7 | | Declare_Variable Any
034d 00d8 | | Load_Top At_Offset_0
034e 1c00 | | Execute_Immediate Run_Utility,0x0
034f 029f 04a3 | | Declare_Subprogram INIT_04a0,For_Call ; Debug Table 0xc.0x8 = 0x34f,0xfff7
0351 BODY_0338:
0351 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0x9 = 0x351,0x1
; Debug Table 0xc.0xa = 0x351,0x401
0352 a404 | | Store_Unchecked 0x2,0x4 ; Debug Table 0xc.0xb = 0x352,0x1
0353 e004 | | Load 0x0,0x4 ; Debug Table 0xc.0xc = 0x353,0x2
0354 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0355 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
0356 c405 | | Store 0x2,0x5
0357 e004 | | Load 0x0,0x4 ; Debug Table 0xc.0xd = 0x357,0x3
0358 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0359 e004 | | Load 0x0,0x4
035a 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
035b 1b16 | | Execute Package,Field_Read,Field_Number 0x16
035c 4800 |H | Short_Literal 0x0
035d e010 | | Load 0x0,0x10
035e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
035f e004 | | Load 0x0,0x4
0360 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0361 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0362 c403 | | Store 0x2,0x3
0363 c406 | | Store 0x2,0x6
0364 00db | | Load_Top At_Offset_3 ; Debug Table 0xc.0xe = 0x364,0x4
0365 8215 | | Call 0x1,0x15
0366 7002 |p | Jump_Nonzero 0x369
0367 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0x10 = 0x367,0x801
; Debug Table 0xc.0xf = 0x367,0x5
0368 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 ; Debug Table 0xc.0x11 = 0x368,0x5
0369 e004 | | Load 0x0,0x4 ; Debug Table 0xc.0x12 = 0x369,0x6
036a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
036b 4800 |H | Short_Literal 0x0
036c 4800 |H | Short_Literal 0x0
036d 00ea | | Load_Encached Null_String_Cache
036e e403 | | Load 0x2,0x3
036f e004 | | Load 0x0,0x4
0370 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0371 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0372 c406 | | Store 0x2,0x6
0373 00db | | Load_Top At_Offset_3 ; Debug Table 0xc.0x13 = 0x373,0x7
0374 8215 | | Call 0x1,0x15
0375 7002 |p | Jump_Nonzero 0x378
0376 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0x14 = 0x376,0x8
; Debug Table 0xc.0x15 = 0x376,0xc01
0377 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 ; Debug Table 0xc.0x16 = 0x377,0x8
0378 00cf | | Action Mark_Auxiliary ; Debug Table 0xc.0x17 = 0x378,0x9
0379 e5ff | | Load 0x2,-0x1 ; Debug Table 0xc.0x18 = 0x379,0xefff
037a 8409 | | Call 0x2,0x9
037b e004 | | Load 0x0,0x4 ; Debug Table 0xc.0x19 = 0x37b,0x1001
037c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
037d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
037e e408 | | Load 0x2,0x8
037f 603c |`< | Indirect_Literal Discrete,0x3bc,{0x00000000, 0x00004000}
0380 e005 | | Load 0x0,0x5
0381 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0382 e010 | | Load 0x0,0x10
0383 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0384 e011 | | Load 0x0,0x11
0385 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0386 4801 |H | Short_Literal 0x1
0387 4800 |H | Short_Literal 0x0
0388 e010 | | Load 0x0,0x10
0389 1811 | | Execute Package,Field_Execute,Field_Number 0x11
038a e004 | | Load 0x0,0x4
038b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
038c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
038d 485c |H\ | Short_Literal 0x5c
038e e40b | | Load 0x2,0xb
038f 01ca | | Execute Vector,Prepend
0390 e004 | | Load 0x0,0x4
0391 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0392 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0393 c408 | | Store 0x2,0x8
0394 c407 | | Store 0x2,0x7
0395 e407 | | Load 0x2,0x7 ; Debug Table 0xc.0x1a = 0x395,0x1002
0396 7015 |p | Jump_Nonzero 0x3ac
0397 e004 | | Load 0x0,0x4 ; Debug Table 0xc.0x1b = 0x397,0x1003
0398 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0399 00ec | | Load_Encached Diana_Tree_Cache
039a 6021 |`! | Indirect_Literal Discrete,0x3bc,{0x00000000, 0x00004000}
039b e005 | | Load 0x0,0x5
039c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
039d e408 | | Load 0x2,0x8
039e e004 | | Load 0x0,0x4
039f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03a0 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
03a1 c402 | | Store 0x2,0x2
03a2 c406 | | Store 0x2,0x6
03a3 e406 | | Load 0x2,0x6 ; Debug Table 0xc.0x1c = 0x3a3,0x1004
03a4 8215 | | Call 0x1,0x15
03a5 6806 |h | Jump_Zero 0x3ac
03a6 e402 | | Load 0x2,0x2 ; Debug Table 0xc.0x1d = 0x3a6,0x1005
03a7 4976 |Iv | Short_Literal 0x176
03a8 00eb | | Load_Encached Diana_Cache
03a9 0098 | | Execute Package,Field_Read_Dynamic
03aa 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03ab a404 | | Store_Unchecked 0x2,0x4
03ac 00d1 | | Pop_Control Pop_Count_1
03ad 00ce | | Action Pop_Auxiliary
03ae e405 | | Load 0x2,0x5 ; Debug Table 0xc.0x1e = 0x3ae,0xa
03af e004 | | Load 0x0,0x4
03b0 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
03b1 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
03b2 e404 | | Load 0x2,0x4 ; Debug Table 0xc.0x1f = 0x3b2,0xb
03b3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03b4 TRAP_0338:
03b4 0007 | | Action Break_Optional
03b5 e405 | | Load 0x2,0x5 ; Debug Table 0xc.0x20 = 0x3b5,0xc
03b6 e004 | | Load 0x0,0x4
03b7 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
03b8 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
03b9 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0x21 = 0x3b9,0xd
; Debug Table 0xc.0x22 = 0x3b9,0x1401
03ba 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 ; Debug Table 0xc.0x23 = 0x3ba,0xd
03bb 0000 | | .XXX[0x1]
03bc 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
03c0 0000 0000 | | .LITERAL {0x00000000, 0x5766a501}
03c4 0000 0000 | | .BLANK 0000[0x4]
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03cb | | .CONST 0x03cb ; Address of begin
03c9 0004 | | .CONST 0x0004 ; Address of exception handler
03ca 0001 | | .CONST 0x0001 ; Number of locals
03cb BODY_03c8:
03cb INIT_03c8:
03cb 00da | | Load_Top At_Offset_2 ; Debug Table 0xd = .DEBUG 0x03cb,0x07fe,0x0002,0x0000,0x0057,0x66a5,0x0000,0x05a3
; Debug Table 0xd.0x0 = 0x3cb,0x1
03cc 0092 04c0 | | Action Push_String_Extended,0x4c0 ; "INTEGER"
03ce 01df | | Execute Vector,Equal
03cf 700f |p | Jump_Nonzero 0x3df
03d0 00da | | Load_Top At_Offset_2
03d1 0092 04c1 | | Action Push_String_Extended,0x4c1 ; "POSITIVE"
03d3 01df | | Execute Vector,Equal
03d4 700a |p | Jump_Nonzero 0x3df
03d5 00da | | Load_Top At_Offset_2
03d6 0092 04c2 | | Action Push_String_Extended,0x4c2 ; "NATURAL"
03d8 01df | | Execute Vector,Equal
03d9 7005 |p | Jump_Nonzero 0x3df
03da 00da | | Load_Top At_Offset_2
03db 0092 04c3 | | Action Push_String_Extended,0x4c3 ; "LONG_INTEGER"
03dd 01df | | Execute Vector,Equal
03de 6802 |h | Jump_Zero 0x3e1
03df 4801 |H | Short_Literal 0x1 ; Debug Table 0xd.0x1 = 0x3df,0x2
03e0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03e1 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0x2 = 0x3e1,0x3
03e2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03e3 0000 0000 | | .BLANK 0000[0x5]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03ed | | .CONST 0x03ed ; Address of begin
03e9 0004 | | .CONST 0x0004 ; Address of exception handler
03ea 0003 | | .CONST 0x0003 ; Number of locals
03eb INIT_03e8:
03eb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xe = .DEBUG 0x03eb,0x0806,0x0002,0x0000,0x0057,0x66a5,0x0000,0x00b9
; Debug Table 0xe.0x0 = 0x3eb,0xffff
03ec 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xe.0x1 = 0x3ec,0xfffe
03ed BODY_03e8:
03ed e409 | | Load 0x2,0x9 ; Debug Table 0xe.0x2 = 0x3ed,0x1
03ee 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
03ef 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x3 = 0x3ef,0x401
03f0 7002 |p | Jump_Nonzero 0x3f3
03f1 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xe.0x4 = 0x3f1,0x402
03f2 7826 |x& | Jump 0x419
03f3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x5 = 0x3f3,0x403
03f4 0217 | | Execute Heap_Access,All_Reference
03f5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03f6 6804 |h | Jump_Zero 0x3fb
03f7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x6 = 0x3f7,0x404
03f8 0217 | | Execute Heap_Access,All_Reference
03f9 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
03fa 781e |x | Jump 0x419
03fb 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x7 = 0x3fb,0x405
03fc e605 | | Load 0x3,0x5 ; Debug Table 0xe.0x8 = 0x3fc,0x801
03fd 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0xe.0x9 = 0x3fd,0x802
03fe 00d0 | | Action Swap_Control ; Debug Table 0xe.0xa = 0x3fe,0x803
; Debug Table 0xe.0xb = 0x3fe,0x804
03ff 00d1 | | Pop_Control Pop_Count_1
0400 49bb |I | Short_Literal 0x1bb ; Debug Table 0xe.0xc = 0x400,0x405
0401 00eb | | Load_Encached Diana_Cache
0402 0098 | | Execute Package,Field_Read_Dynamic
0403 012c | , | Execute Any,Size
0404 e001 | | Load 0x0,0x1
0405 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0406 025b | [ | Execute Discrete,Check_In_Type
0407 0273 | s | Execute Discrete,Plus
0408 00d9 | | Load_Top At_Offset_1
0409 e606 | | Load 0x3,0x6 ; Debug Table 0xe.0xd = 0x409,0xc01
040a 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0xe.0xe = 0x40a,0xc02
040b 00d0 | | Action Swap_Control ; Debug Table 0xe.0x10 = 0x40b,0xc04
; Debug Table 0xe.0xf = 0x40b,0xc03
040c 00d1 | | Pop_Control Pop_Count_1
040d 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0xe.0x11 = 0x40d,0x804
040e 00eb | | Load_Encached Diana_Cache
040f 0098 | | Execute Package,Field_Read_Dynamic
0410 49c9 |I | Short_Literal 0x1c9
0411 00eb | | Load_Encached Diana_Cache
0412 0098 | | Execute Package,Field_Read_Dynamic
0413 49ca |I | Short_Literal 0x1ca
0414 00eb | | Load_Encached Diana_Cache
0415 0095 | | Execute Package,Field_Reference_Dynamic
0416 e002 | | Load 0x0,0x2
0417 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0418 7800 |x | Jump 0x419
0419 00d0 | | Action Swap_Control
041a 00d1 | | Pop_Control Pop_Count_1
041b 0032 | 2 | Store_Top Heap_Access,At_Offset_2 ; Debug Table 0xe.0x12 = 0x41b,0x1
041c e409 | | Load 0x2,0x9 ; Debug Table 0xe.0x13 = 0x41c,0x2
041d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
041e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x14 = 0x41e,0x1001
041f 7002 |p | Jump_Nonzero 0x422
0420 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xe.0x15 = 0x420,0x1002
0421 7803 |x | Jump 0x425
0422 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x16 = 0x422,0x1003
0423 0217 | | Execute Heap_Access,All_Reference
0424 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0425 00d0 | | Action Swap_Control
0426 00d1 | | Pop_Control Pop_Count_1
0427 e409 | | Load 0x2,0x9 ; Debug Table 0xe.0x17 = 0x427,0x2
0428 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0429 e409 | | Load 0x2,0x9 ; Debug Table 0xe.0x18 = 0x429,0x3
042a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
042b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x19 = 0x42b,0x1401
042c 021d | | Execute Heap_Access,Is_Null
042d 00d0 | | Action Swap_Control
042e 00d1 | | Pop_Control Pop_Count_1
042f 6848 |hH | Jump_Zero 0x478 ; Debug Table 0xe.0x1a = 0x42f,0x3
0430 e409 | | Load 0x2,0x9 ; Debug Table 0xe.0x1b = 0x430,0x4
0431 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0432 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x1c = 0x432,0x1801
0433 7002 |p | Jump_Nonzero 0x436
0434 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xe.0x1d = 0x434,0x1802
0435 7803 |x | Jump 0x439
0436 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x1e = 0x436,0x1803
0437 0217 | | Execute Heap_Access,All_Reference
0438 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0439 00d0 | | Action Swap_Control
043a 00d1 | | Pop_Control Pop_Count_1
043b e409 | | Load 0x2,0x9 ; Debug Table 0xe.0x1f = 0x43b,0x4
043c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
043d e409 | | Load 0x2,0x9 ; Debug Table 0xe.0x20 = 0x43d,0x5
043e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
043f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x21 = 0x43f,0x1c01
0440 021d | | Execute Heap_Access,Is_Null
0441 00d0 | | Action Swap_Control
0442 00d1 | | Pop_Control Pop_Count_1
0443 7034 |p4 | Jump_Nonzero 0x478 ; Debug Table 0xe.0x22 = 0x443,0x5
0444 e409 | | Load 0x2,0x9 ; Debug Table 0xe.0x23 = 0x444,0x6
0445 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0446 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x24 = 0x446,0x2001
0447 7002 |p | Jump_Nonzero 0x44a
0448 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xe.0x25 = 0x448,0x2002
0449 7826 |x& | Jump 0x470
044a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x26 = 0x44a,0x2003
044b 0217 | | Execute Heap_Access,All_Reference
044c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
044d 6804 |h | Jump_Zero 0x452
044e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x27 = 0x44e,0x2004
044f 0217 | | Execute Heap_Access,All_Reference
0450 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0451 781e |x | Jump 0x470
0452 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x28 = 0x452,0x2005
0453 e605 | | Load 0x3,0x5 ; Debug Table 0xe.0x29 = 0x453,0x2401
0454 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0xe.0x2a = 0x454,0x2402
0455 00d0 | | Action Swap_Control ; Debug Table 0xe.0x2b = 0x455,0x2403
; Debug Table 0xe.0x2c = 0x455,0x2404
0456 00d1 | | Pop_Control Pop_Count_1
0457 49bb |I | Short_Literal 0x1bb ; Debug Table 0xe.0x2d = 0x457,0x2005
0458 00eb | | Load_Encached Diana_Cache
0459 0098 | | Execute Package,Field_Read_Dynamic
045a 012c | , | Execute Any,Size
045b e001 | | Load 0x0,0x1
045c 1b17 | | Execute Package,Field_Read,Field_Number 0x17
045d 025b | [ | Execute Discrete,Check_In_Type
045e 0273 | s | Execute Discrete,Plus
045f 00d9 | | Load_Top At_Offset_1
0460 e606 | | Load 0x3,0x6 ; Debug Table 0xe.0x2e = 0x460,0x2801
0461 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0xe.0x2f = 0x461,0x2802
0462 00d0 | | Action Swap_Control ; Debug Table 0xe.0x30 = 0x462,0x2803
; Debug Table 0xe.0x31 = 0x462,0x2804
0463 00d1 | | Pop_Control Pop_Count_1
0464 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0xe.0x32 = 0x464,0x2404
0465 00eb | | Load_Encached Diana_Cache
0466 0098 | | Execute Package,Field_Read_Dynamic
0467 49c9 |I | Short_Literal 0x1c9
0468 00eb | | Load_Encached Diana_Cache
0469 0098 | | Execute Package,Field_Read_Dynamic
046a 49ca |I | Short_Literal 0x1ca
046b 00eb | | Load_Encached Diana_Cache
046c 0095 | | Execute Package,Field_Reference_Dynamic
046d e002 | | Load 0x0,0x2
046e 1819 | | Execute Package,Field_Execute,Field_Number 0x19
046f 7800 |x | Jump 0x470
0470 00d0 | | Action Swap_Control
0471 00d1 | | Pop_Control Pop_Count_1
0472 00eb | | Load_Encached Diana_Cache ; Debug Table 0xe.0x33 = 0x472,0x6
0473 18d0 | | Execute Package,Field_Execute,Field_Number 0xd0
0474 00eb | | Load_Encached Diana_Cache
0475 1888 | | Execute Package,Field_Execute,Field_Number 0x88
0476 e409 | | Load 0x2,0x9
0477 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0478 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xe.0x34 = 0x478,0x7
0479 00eb | | Load_Encached Diana_Cache
047a 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
047b 4817 |H | Short_Literal 0x17
047c 00eb | | Load_Encached Diana_Cache
047d 1879 | y | Execute Package,Field_Execute,Field_Number 0x79
047e 0031 | 1 | Store_Top Heap_Access,At_Offset_1
047f e7ff | | Load 0x3,-0x1 ; Debug Table 0xe.0x35 = 0x47f,0x8
0480 e00b | | Load 0x0,0xb
0481 180e | | Execute Package,Field_Execute,Field_Number 0xe
0482 00d9 | | Load_Top At_Offset_1
0483 48a9 |H | Short_Literal 0xa9
0484 00eb | | Load_Encached Diana_Cache
0485 187d | } | Execute Package,Field_Execute,Field_Number 0x7d
0486 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0487 0000 | | .XXX[0x1]
0488 ; --------------------------------------------------------------------------------------
0488 ; SUBPROGRAM
0488 ; --------------------------------------------------------------------------------------
0488 048b | | .CONST 0x048b ; Address of begin
0489 0493 | | .CONST 0x0493 ; Address of exception handler
048a 0001 | | .CONST 0x0001 ; Number of locals
048b BODY_0488:
048b INIT_0488:
048b e5ff | | Load 0x2,-0x1 ; Debug Table 0xf = .DEBUG 0x048b,0x0874,0x0004,0x0000,0x0057,0x66a5,0x0000,0x016a
; Debug Table 0xf.0x0 = 0x48b,0x1
048c 490c |I | Short_Literal 0x10c
048d 00eb | | Load_Encached Diana_Cache
048e 0096 | | Execute Package,Entry
048f 00eb | | Load_Encached Diana_Cache
0490 18ed | | Execute Package,Field_Execute,Field_Number 0xed
0491 a408 | | Store_Unchecked 0x2,0x8
0492 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0493 TRAP_0488:
0493 0007 | | Action Break_Optional
0494 e5ff | | Load 0x2,-0x1 ; Debug Table 0xf.0x1 = 0x494,0x2
0495 00eb | | Load_Encached Diana_Cache
0496 18d9 | | Execute Package,Field_Execute,Field_Number 0xd9
0497 e00b | | Load 0x0,0xb
0498 180e | | Execute Package,Field_Execute,Field_Number 0xe
0499 00cb | | Action Pop_Block_With_Result
049a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
049b 0000 0000 | | .BLANK 0000[0x5]
04a0 ; --------------------------------------------------------------------------------------
04a0 ; SUBPROGRAM
04a0 ; --------------------------------------------------------------------------------------
04a0 04a3 | | .CONST 0x04a3 ; Address of begin
04a1 0004 | | .CONST 0x0004 ; Address of exception handler
04a2 0001 | | .CONST 0x0001 ; Number of locals
04a3 BODY_04a0:
04a3 INIT_04a0:
04a3 e7ff | | Load 0x3,-0x1 ; Debug Table 0x10 = .DEBUG 0x04a3,0x087a,0x0002,0x0000,0x0057,0x66a5,0x0000,0x037a
; Debug Table 0x10.0x0 = 0x4a3,0x1
; Debug Table 0x10.0x1 = 0x4a3,0x401
04a4 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x10.0x2 = 0x4a4,0x402
04a5 0b12 | | Execute_Immediate Case_Compare,0x12 ; Debug Table 0x10.0x3 = 0x4a5,0x403
; Debug Table 0x10.0x4 = 0x4a5,0x404
; Debug Table 0x10.0x5 = 0x4a5,0x1
04a6 7006 |p | Jump_Nonzero 0x4ad
04a7 00db | | Load_Top At_Offset_3 ; Debug Table 0x10.0x6 = 0x4a7,0x3
04a8 00eb | | Load_Encached Diana_Cache
04a9 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
04aa 00eb | | Load_Encached Diana_Cache
04ab 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
04ac 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04ad 482e |H. | Short_Literal 0x2e ; Debug Table 0x10.0x7 = 0x4ad,0x2
04ae e7ff | | Load 0x3,-0x1
04af 00eb | | Load_Encached Diana_Cache
04b0 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4
04b1 8409 | | Call 0x2,0x9
04b2 01cb | | Execute Vector,Append
04b3 e7ff | | Load 0x3,-0x1
04b4 00eb | | Load_Encached Diana_Cache
04b5 18c0 | | Execute Package,Field_Execute,Field_Number 0xc0
04b6 00eb | | Load_Encached Diana_Cache
04b7 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
04b8 00eb | | Load_Encached Diana_Cache
04b9 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
04ba 01cc | | Execute Vector,Catenate
04bb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04bc ; --------------------------------------------------------------------------------------
04bc ; STRING TABLE
04bc ; --------------------------------------------------------------------------------------
04bc 0012 | | .STRTAB 0x0012->0x04c5 ; "-"
04bd 0011 | | .STRTAB 0x0011->0x04c5 ; "*** Exception in Ce_Diana_Utilities."
04be 0033 | 3 | .STRTAB 0x0033->0x04d7 ; ": "
04bf 0033 | 3 | .STRTAB 0x0033->0x04d8 ; "Make_Param_Assoc_S"
04c0 0043 | C | .STRTAB 0x0043->0x04e1 ; "INTEGER"
04c1 0048 | H | .STRTAB 0x0048->0x04e5 ; "POSITIVE"
04c2 004e | N | .STRTAB 0x004e->0x04e9 ; "NATURAL"
04c3 0053 | S | .STRTAB 0x0053->0x04ec ; "LONG_INTEGER"
04c4 005d | ] | .STREND 0x005d->0x04f2
04c5 2d2a 2a2a |-***| .STRTAB_STRINGS
04f3 0000 0000 | | .BLANK 0000[0x5]
04f8 ; --------------------------------------------------------------------------------------
04f8 ; Debug Table
04f8 ; --------------------------------------------------------------------------------------
04f8 0003 0011 | | .CONST 0x0003,0x0011
04fa 000b 0582 | | .DEBUG 0x000b,0x0582,0x8000,0x0000,0x0057,0x6215,0x0000,0x0005
0502 001a 0592 | | .DEBUG 0x001a,0x0592,0x8000,0x0000,0x0057,0x66a5,0x0000,0x0013
050a 003b 05b4 | ; | .DEBUG 0x003b,0x05b4,0x0002,0x0000,0x0057,0x6215,0x0000,0x0006
0512 005b 05c4 | [ | .DEBUG 0x005b,0x05c4,0x0001,0x0000,0x0057,0x6215,0x0000,0x0011
051a 00d3 0636 | 6| .DEBUG 0x00d3,0x0636,0x0002,0x0000,0x0057,0x6215,0x0000,0x0023
0522 0163 0688 | c | .DEBUG 0x0163,0x0688,0x0002,0x0000,0x0057,0x6215,0x0000,0x0030
052a 01e3 06ec | | .DEBUG 0x01e3,0x06ec,0x0001,0x0000,0x0057,0x6215,0x0000,0x003b
0532 020b 070a | | .DEBUG 0x020b,0x070a,0x0001,0x0000,0x0057,0x6215,0x0000,0x0049
053a 0223 071a | # | .DEBUG 0x0223,0x071a,0x0001,0x0000,0x0057,0x6215,0x0000,0x0059
0542 026b 072c | k ,| .DEBUG 0x026b,0x072c,0x0002,0x0000,0x0057,0x66a5,0x0000,0x0027
054a 0273 0730 | s 0| .DEBUG 0x0273,0x0730,0x0001,0x0000,0x0057,0x66a5,0x0000,0x0040
0552 028b 0738 | 8| .DEBUG 0x028b,0x0738,0x0002,0x0000,0x0057,0x66a5,0x0000,0x006e
055a 033b 07b4 | ; | .DEBUG 0x033b,0x07b4,0x0002,0x0000,0x0057,0x66a5,0x0000,0x0333
0562 03cb 07fe | | .DEBUG 0x03cb,0x07fe,0x0002,0x0000,0x0057,0x66a5,0x0000,0x05a3
056a 03eb 0806 | | .DEBUG 0x03eb,0x0806,0x0002,0x0000,0x0057,0x66a5,0x0000,0x00b9
0572 048b 0874 | t| .DEBUG 0x048b,0x0874,0x0004,0x0000,0x0057,0x66a5,0x0000,0x016a
057a 04a3 087a | z| .DEBUG 0x04a3,0x087a,0x0002,0x0000,0x0057,0x66a5,0x0000,0x037a
0582 ; --------------------------------------------------------------------------------------
0582 ; Debug3 Subtable 0x0
0582 ; --------------------------------------------------------------------------------------
0582 0007 0000 | | .DBG3TAB 0x0007,0x0000
0584 000b ffff | | .CONST 0x000b,0xffff
0586 000d fffe | | .CONST 0x000d,0xfffe
0588 000f fffd | | .CONST 0x000f,0xfffd
058a 0011 fffc | | .CONST 0x0011,0xfffc
058c 0013 fffb | | .CONST 0x0013,0xfffb
058e 0015 fffa | | .CONST 0x0015,0xfffa
0590 0017 fff9 | | .CONST 0x0017,0xfff9
0592 ; --------------------------------------------------------------------------------------
0592 ; Debug3 Subtable 0x1
0592 ; --------------------------------------------------------------------------------------
0592 000f 0001 | | .DBG3TAB 0x000f,0x0001
0594 001a ffff | | .CONST 0x001a,0xffff
0596 001a fffe | | .CONST 0x001a,0xfffe
0598 001b 0401 | | .CONST 0x001b,0x0401
059a 001c fffe | | .CONST 0x001c,0xfffe
059c 001d fffd | | .CONST 0x001d,0xfffd
059e 001d fffc | | .CONST 0x001d,0xfffc
05a0 001f fffb | | .CONST 0x001f,0xfffb
05a2 0021 fffa | ! | .CONST 0x0021,0xfffa
05a4 0023 fff9 | # | .CONST 0x0023,0xfff9
05a6 0025 fff8 | % | .CONST 0x0025,0xfff8
05a8 0027 fff7 | ' | .CONST 0x0027,0xfff7
05aa 0029 fff6 | ) | .CONST 0x0029,0xfff6
05ac 002b fff5 | + | .CONST 0x002b,0xfff5
05ae 002d fff4 | - | .CONST 0x002d,0xfff4
05b0 002f fff3 | / | .CONST 0x002f,0xfff3
05b2 0031 fff2 | 1 | .CONST 0x0031,0xfff2
05b4 ; --------------------------------------------------------------------------------------
05b4 ; Debug3 Subtable 0x2
05b4 ; --------------------------------------------------------------------------------------
05b4 0003 0004 | | .DBG3TAB 0x0003,0x0004
05b6 003b ffff | ; | .CONST 0x003b,0xffff
05b8 003e fffe | > | .CONST 0x003e,0xfffe
05ba 003e fffd | > | .CONST 0x003e,0xfffd
05bc 003f 0001 | ? | .CONST 0x003f,0x0001
05be 0042 0002 | B | .CONST 0x0042,0x0002
05c0 0048 0003 | H | .CONST 0x0048,0x0003
05c2 0055 0004 | U | .CONST 0x0055,0x0004
05c4 ; --------------------------------------------------------------------------------------
05c4 ; Debug3 Subtable 0x3
05c4 ; --------------------------------------------------------------------------------------
05c4 0003 0035 | 5| .DBG3TAB 0x0003,0x0035
05c6 005b ffff | [ | .CONST 0x005b,0xffff
05c8 005c fffe | \ | .CONST 0x005c,0xfffe
05ca 005d fffd | ] | .CONST 0x005d,0xfffd
05cc 005e 0001 | ^ | .CONST 0x005e,0x0001
05ce 0060 0002 | ` | .CONST 0x0060,0x0002
05d0 0062 0003 | b | .CONST 0x0062,0x0003
05d2 0062 0401 | b | .CONST 0x0062,0x0401
05d4 0063 0402 | c | .CONST 0x0063,0x0402
05d6 0064 0403 | d | .CONST 0x0064,0x0403
05d8 0064 0404 | d | .CONST 0x0064,0x0404
05da 0064 0003 | d | .CONST 0x0064,0x0003
05dc 0066 0010 | f | .CONST 0x0066,0x0010
05de 0067 0004 | g | .CONST 0x0067,0x0004
05e0 006b 0005 | k | .CONST 0x006b,0x0005
05e2 006b 0801 | k | .CONST 0x006b,0x0801
05e4 006c 0802 | l | .CONST 0x006c,0x0802
05e6 006d 0803 | m | .CONST 0x006d,0x0803
05e8 006d 0804 | m | .CONST 0x006d,0x0804
05ea 006d 0005 | m | .CONST 0x006d,0x0005
05ec 0071 000f | q | .CONST 0x0071,0x000f
05ee 0072 0006 | r | .CONST 0x0072,0x0006
05f0 007b 0007 | { | .CONST 0x007b,0x0007
05f2 0080 0c01 | | .CONST 0x0080,0x0c01
05f4 0082 0c02 | | .CONST 0x0082,0x0c02
05f6 0084 0c03 | | .CONST 0x0084,0x0c03
05f8 0088 0c04 | | .CONST 0x0088,0x0c04
05fa 008c 0c05 | | .CONST 0x008c,0x0c05
05fc 008d 1001 | | .CONST 0x008d,0x1001
05fe 008e 1002 | | .CONST 0x008e,0x1002
0600 008f 1003 | | .CONST 0x008f,0x1003
0602 008f 1004 | | .CONST 0x008f,0x1004
0604 0091 0c05 | | .CONST 0x0091,0x0c05
0606 009a 1401 | | .CONST 0x009a,0x1401
0608 009b 1402 | | .CONST 0x009b,0x1402
060a 009c 1403 | | .CONST 0x009c,0x1403
060c 009c 1404 | | .CONST 0x009c,0x1404
060e 009e 1004 | | .CONST 0x009e,0x1004
0610 00ac 0007 | | .CONST 0x00ac,0x0007
0612 00ad 0008 | | .CONST 0x00ad,0x0008
0614 00ad 1801 | | .CONST 0x00ad,0x1801
0616 00ae 1802 | | .CONST 0x00ae,0x1802
0618 00af 1803 | | .CONST 0x00af,0x1803
061a 00af 1804 | | .CONST 0x00af,0x1804
061c 00af 0008 | | .CONST 0x00af,0x0008
061e 00b1 000a | | .CONST 0x00b1,0x000a
0620 00b4 0009 | | .CONST 0x00b4,0x0009
0622 00b9 000b | | .CONST 0x00b9,0x000b
0624 00b9 1c01 | | .CONST 0x00b9,0x1c01
0626 00ba 1c02 | | .CONST 0x00ba,0x1c02
0628 00bb 1c03 | | .CONST 0x00bb,0x1c03
062a 00bb 1c04 | | .CONST 0x00bb,0x1c04
062c 00bb 000b | | .CONST 0x00bb,0x000b
062e 00bd 000e | | .CONST 0x00bd,0x000e
0630 00be 000c | | .CONST 0x00be,0x000c
0632 00c4 000d | | .CONST 0x00c4,0x000d
0634 00ca 0011 | | .CONST 0x00ca,0x0011
0636 ; --------------------------------------------------------------------------------------
0636 ; Debug3 Subtable 0x4
0636 ; --------------------------------------------------------------------------------------
0636 0005 0023 | #| .DBG3TAB 0x0005,0x0023
0638 00d3 ffff | | .CONST 0x00d3,0xffff
063a 00d4 fffe | | .CONST 0x00d4,0xfffe
063c 00d5 0001 | | .CONST 0x00d5,0x0001
063e 00d9 0002 | | .CONST 0x00d9,0x0002
0640 00d9 0401 | | .CONST 0x00d9,0x0401
0642 00da 0402 | | .CONST 0x00da,0x0402
0644 00db 0403 | | .CONST 0x00db,0x0403
0646 00db 0404 | | .CONST 0x00db,0x0404
0648 00db 0002 | | .CONST 0x00db,0x0002
064a 00e1 0005 | | .CONST 0x00e1,0x0005
064c 00e3 0003 | | .CONST 0x00e3,0x0003
064e 00ea 0004 | | .CONST 0x00ea,0x0004
0650 00ef 0006 | | .CONST 0x00ef,0x0006
0652 00ef 0801 | | .CONST 0x00ef,0x0801
0654 00f1 0006 | | .CONST 0x00f1,0x0006
0656 00f2 0007 | | .CONST 0x00f2,0x0007
0658 00f5 0008 | | .CONST 0x00f5,0x0008
065a 00f9 0009 | | .CONST 0x00f9,0x0009
065c 00fa f3ff | | .CONST 0x00fa,0xf3ff
065e 00ff f3fe | | .CONST 0x00ff,0xf3fe
0660 0101 f3fd | | .CONST 0x0101,0xf3fd
0662 0107 0c01 | | .CONST 0x0107,0x0c01
0664 011c 0c02 | | .CONST 0x011c,0x0c02
0666 011f 0c03 | | .CONST 0x011f,0x0c03
0668 0121 0c04 | ! | .CONST 0x0121,0x0c04
066a 013f 0c05 | ? | .CONST 0x013f,0x0c05
066c 0142 0c06 | B | .CONST 0x0142,0x0c06
066e 0146 000a | F | .CONST 0x0146,0x000a
0670 0147 1001 | G | .CONST 0x0147,0x1001
0672 0148 1401 | H | .CONST 0x0148,0x1401
0674 0149 1402 | I | .CONST 0x0149,0x1402
0676 014a 1403 | J | .CONST 0x014a,0x1403
0678 014a 1404 | J | .CONST 0x014a,0x1404
067a 014c 1001 | L | .CONST 0x014c,0x1001
067c 0153 000a | S | .CONST 0x0153,0x000a
067e 0154 000b | T | .CONST 0x0154,0x000b
0680 015a 000c | Z | .CONST 0x015a,0x000c
0682 015d 000d | ] | .CONST 0x015d,0x000d
0684 015d 1801 | ] | .CONST 0x015d,0x1801
0686 015e 000d | ^ | .CONST 0x015e,0x000d
0688 ; --------------------------------------------------------------------------------------
0688 ; Debug3 Subtable 0x5
0688 ; --------------------------------------------------------------------------------------
0688 0007 002a | *| .DBG3TAB 0x0007,0x002a
068a 0163 ffff | c | .CONST 0x0163,0xffff
068c 0164 fffe | d | .CONST 0x0164,0xfffe
068e 0165 fffd | e | .CONST 0x0165,0xfffd
0690 0166 fffc | f | .CONST 0x0166,0xfffc
0692 0167 fffb | g | .CONST 0x0167,0xfffb
0694 0168 fffa | h | .CONST 0x0168,0xfffa
0696 0169 fff9 | i | .CONST 0x0169,0xfff9
0698 016b 0001 | k | .CONST 0x016b,0x0001
069a 016e 0002 | n | .CONST 0x016e,0x0002
069c 0172 0003 | r | .CONST 0x0172,0x0003
069e 017a 0004 | z | .CONST 0x017a,0x0004
06a0 017e 0006 | ~ | .CONST 0x017e,0x0006
06a2 0181 0007 | | .CONST 0x0181,0x0007
06a4 0182 0401 | | .CONST 0x0182,0x0401
06a6 0184 0402 | | .CONST 0x0184,0x0402
06a8 0186 0403 | | .CONST 0x0186,0x0403
06aa 018a 0404 | | .CONST 0x018a,0x0404
06ac 018e 0405 | | .CONST 0x018e,0x0405
06ae 018f 0801 | | .CONST 0x018f,0x0801
06b0 0190 0802 | | .CONST 0x0190,0x0802
06b2 0191 0803 | | .CONST 0x0191,0x0803
06b4 0191 0804 | | .CONST 0x0191,0x0804
06b6 0193 0405 | | .CONST 0x0193,0x0405
06b8 019c 0c01 | | .CONST 0x019c,0x0c01
06ba 019d 0c02 | | .CONST 0x019d,0x0c02
06bc 019e 0c03 | | .CONST 0x019e,0x0c03
06be 019e 0c04 | | .CONST 0x019e,0x0c04
06c0 01a0 0804 | | .CONST 0x01a0,0x0804
06c2 01ae 0007 | | .CONST 0x01ae,0x0007
06c4 01b1 0008 | | .CONST 0x01b1,0x0008
06c6 01b1 1001 | | .CONST 0x01b1,0x1001
06c8 01b3 1002 | | .CONST 0x01b3,0x1002
06ca 01b5 1003 | | .CONST 0x01b5,0x1003
06cc 01b8 0008 | | .CONST 0x01b8,0x0008
06ce 01b9 0009 | | .CONST 0x01b9,0x0009
06d0 01bf 000a | | .CONST 0x01bf,0x000a
06d2 01c0 1401 | | .CONST 0x01c0,0x1401
06d4 01c1 1801 | | .CONST 0x01c1,0x1801
06d6 01c2 1802 | | .CONST 0x01c2,0x1802
06d8 01c3 1803 | | .CONST 0x01c3,0x1803
06da 01c3 1804 | | .CONST 0x01c3,0x1804
06dc 01c5 1401 | | .CONST 0x01c5,0x1401
06de 01cc 000a | | .CONST 0x01cc,0x000a
06e0 01d4 000b | | .CONST 0x01d4,0x000b
06e2 01d7 0005 | | .CONST 0x01d7,0x0005
06e4 01d7 1c01 | | .CONST 0x01d7,0x1c01
06e6 01d9 0005 | | .CONST 0x01d9,0x0005
06e8 01db 000c | | .CONST 0x01db,0x000c
06ea 01de 000d | | .CONST 0x01de,0x000d
06ec ; --------------------------------------------------------------------------------------
06ec ; Debug3 Subtable 0x6
06ec ; --------------------------------------------------------------------------------------
06ec 0001 000d | | .DBG3TAB 0x0001,0x000d
06ee 01e3 ffff | | .CONST 0x01e3,0xffff
06f0 01e5 0001 | | .CONST 0x01e5,0x0001
06f2 01e8 0002 | | .CONST 0x01e8,0x0002
06f4 01e8 0401 | | .CONST 0x01e8,0x0401
06f6 01e9 0002 | | .CONST 0x01e9,0x0002
06f8 01ea 0003 | | .CONST 0x01ea,0x0003
06fa 01eb 0004 | | .CONST 0x01eb,0x0004
06fc 01fc 0005 | | .CONST 0x01fc,0x0005
06fe 0201 0007 | | .CONST 0x0201,0x0007
0700 0201 0801 | | .CONST 0x0201,0x0801
0702 0202 0007 | | .CONST 0x0202,0x0007
0704 0205 0008 | | .CONST 0x0205,0x0008
0706 0205 0c01 | | .CONST 0x0205,0x0c01
0708 0206 0008 | | .CONST 0x0206,0x0008
070a ; --------------------------------------------------------------------------------------
070a ; Debug3 Subtable 0x7
070a ; --------------------------------------------------------------------------------------
070a 0001 0006 | | .DBG3TAB 0x0001,0x0006
070c 020b ffff | | .CONST 0x020b,0xffff
070e 020c 0001 | | .CONST 0x020c,0x0001
0710 0210 0002 | | .CONST 0x0210,0x0002
0712 0216 0003 | | .CONST 0x0216,0x0003
0714 021a 0004 | | .CONST 0x021a,0x0004
0716 021a 0401 | | .CONST 0x021a,0x0401
0718 021b 0004 | | .CONST 0x021b,0x0004
071a ; --------------------------------------------------------------------------------------
071a ; Debug3 Subtable 0x8
071a ; --------------------------------------------------------------------------------------
071a 0002 0006 | | .DBG3TAB 0x0002,0x0006
071c 0223 ffff | # | .CONST 0x0223,0xffff
071e 0224 fffe | $ | .CONST 0x0224,0xfffe
0720 0229 0001 | ) | .CONST 0x0229,0x0001
0722 023c 0002 | < | .CONST 0x023c,0x0002
0724 024f 0401 | O | .CONST 0x024f,0x0401
0726 0250 0002 | P | .CONST 0x0250,0x0002
0728 0258 0003 | X | .CONST 0x0258,0x0003
072a 025c 0004 | \ | .CONST 0x025c,0x0004
072c ; --------------------------------------------------------------------------------------
072c ; Debug3 Subtable 0x9
072c ; --------------------------------------------------------------------------------------
072c 0000 0001 | | .DBG3TAB 0x0000,0x0001
072e 026b 0001 | k | .CONST 0x026b,0x0001
0730 ; --------------------------------------------------------------------------------------
0730 ; Debug3 Subtable 0xa
0730 ; --------------------------------------------------------------------------------------
0730 0000 0003 | | .DBG3TAB 0x0000,0x0003
0732 0273 0001 | s | .CONST 0x0273,0x0001
0734 0275 0002 | u | .CONST 0x0275,0x0002
0736 0280 0003 | | .CONST 0x0280,0x0003
0738 ; --------------------------------------------------------------------------------------
0738 ; Debug3 Subtable 0xb
0738 ; --------------------------------------------------------------------------------------
0738 0009 0034 | 4| .DBG3TAB 0x0009,0x0034
073a 028b ffff | | .CONST 0x028b,0xffff
073c 0290 fffe | | .CONST 0x0290,0xfffe
073e 0291 fffd | | .CONST 0x0291,0xfffd
0740 0292 fffc | | .CONST 0x0292,0xfffc
0742 0293 fffb | | .CONST 0x0293,0xfffb
0744 0294 fffa | | .CONST 0x0294,0xfffa
0746 0295 fff9 | | .CONST 0x0295,0xfff9
0748 0296 fff8 | | .CONST 0x0296,0xfff8
074a 0298 fff7 | | .CONST 0x0298,0xfff7
074c 029c 0001 | | .CONST 0x029c,0x0001
074e 029d 0002 | | .CONST 0x029d,0x0002
0750 02a0 0003 | | .CONST 0x02a0,0x0003
0752 02aa 0004 | | .CONST 0x02aa,0x0004
0754 02ac 0401 | | .CONST 0x02ac,0x0401
0756 02b0 0004 | | .CONST 0x02b0,0x0004
0758 02b1 0005 | | .CONST 0x02b1,0x0005
075a 02b6 0006 | | .CONST 0x02b6,0x0006
075c 02b8 0801 | | .CONST 0x02b8,0x0801
075e 02ba 0802 | | .CONST 0x02ba,0x0802
0760 02bc 0803 | | .CONST 0x02bc,0x0803
0762 02c0 0804 | | .CONST 0x02c0,0x0804
0764 02c4 0805 | | .CONST 0x02c4,0x0805
0766 02c5 0c01 | | .CONST 0x02c5,0x0c01
0768 02c6 0c02 | | .CONST 0x02c6,0x0c02
076a 02c7 0c03 | | .CONST 0x02c7,0x0c03
076c 02c7 0c04 | | .CONST 0x02c7,0x0c04
076e 02c9 0805 | | .CONST 0x02c9,0x0805
0770 02d2 1001 | | .CONST 0x02d2,0x1001
0772 02d3 1002 | | .CONST 0x02d3,0x1002
0774 02d4 1003 | | .CONST 0x02d4,0x1003
0776 02d4 1004 | | .CONST 0x02d4,0x1004
0778 02d6 0c04 | | .CONST 0x02d6,0x0c04
077a 02e4 0006 | | .CONST 0x02e4,0x0006
077c 02ea 0007 | | .CONST 0x02ea,0x0007
077e 02ec 0008 | | .CONST 0x02ec,0x0008
0780 02f0 000a | | .CONST 0x02f0,0x000a
0782 02f1 1401 | | .CONST 0x02f1,0x1401
0784 02f5 1801 | | .CONST 0x02f5,0x1801
0786 02f6 1802 | | .CONST 0x02f6,0x1802
0788 02f7 1803 | | .CONST 0x02f7,0x1803
078a 02f7 1804 | | .CONST 0x02f7,0x1804
078c 02f9 1401 | | .CONST 0x02f9,0x1401
078e 02fe 000a | | .CONST 0x02fe,0x000a
0790 02ff 000b | | .CONST 0x02ff,0x000b
0792 02ff 1c01 | | .CONST 0x02ff,0x1c01
0794 0302 000b | | .CONST 0x0302,0x000b
0796 0303 000c | | .CONST 0x0303,0x000c
0798 0305 000d | | .CONST 0x0305,0x000d
079a 030b 000e | | .CONST 0x030b,0x000e
079c 030d 000f | | .CONST 0x030d,0x000f
079e 0310 0010 | | .CONST 0x0310,0x0010
07a0 0318 0011 | | .CONST 0x0318,0x0011
07a2 0318 2001 | | .CONST 0x0318,0x2001
07a4 031a 2002 | | .CONST 0x031a,0x2002
07a6 031c 2003 | | .CONST 0x031c,0x2003
07a8 031f 0011 | | .CONST 0x031f,0x0011
07aa 0321 0009 | ! | .CONST 0x0321,0x0009
07ac 0321 2401 | !$ | .CONST 0x0321,0x2401
07ae 0323 0009 | # | .CONST 0x0323,0x0009
07b0 0325 0012 | % | .CONST 0x0325,0x0012
07b2 032b 0013 | + | .CONST 0x032b,0x0013
07b4 ; --------------------------------------------------------------------------------------
07b4 ; Debug3 Subtable 0xc
07b4 ; --------------------------------------------------------------------------------------
07b4 000a 001a | | .DBG3TAB 0x000a,0x001a
07b6 033b ffff | ; | .CONST 0x033b,0xffff
07b8 033b fffe | ; | .CONST 0x033b,0xfffe
07ba 033c fffd | < | .CONST 0x033c,0xfffd
07bc 033d fffc | = | .CONST 0x033d,0xfffc
07be 033e fffb | > | .CONST 0x033e,0xfffb
07c0 0344 fffa | D | .CONST 0x0344,0xfffa
07c2 0346 fff9 | F | .CONST 0x0346,0xfff9
07c4 0349 fff8 | I | .CONST 0x0349,0xfff8
07c6 034f fff7 | O | .CONST 0x034f,0xfff7
07c8 0351 0001 | Q | .CONST 0x0351,0x0001
07ca 0351 0401 | Q | .CONST 0x0351,0x0401
07cc 0352 0001 | R | .CONST 0x0352,0x0001
07ce 0353 0002 | S | .CONST 0x0353,0x0002
07d0 0357 0003 | W | .CONST 0x0357,0x0003
07d2 0364 0004 | d | .CONST 0x0364,0x0004
07d4 0367 0005 | g | .CONST 0x0367,0x0005
07d6 0367 0801 | g | .CONST 0x0367,0x0801
07d8 0368 0005 | h | .CONST 0x0368,0x0005
07da 0369 0006 | i | .CONST 0x0369,0x0006
07dc 0373 0007 | s | .CONST 0x0373,0x0007
07de 0376 0008 | v | .CONST 0x0376,0x0008
07e0 0376 0c01 | v | .CONST 0x0376,0x0c01
07e2 0377 0008 | w | .CONST 0x0377,0x0008
07e4 0378 0009 | x | .CONST 0x0378,0x0009
07e6 0379 efff | y | .CONST 0x0379,0xefff
07e8 037b 1001 | { | .CONST 0x037b,0x1001
07ea 0395 1002 | | .CONST 0x0395,0x1002
07ec 0397 1003 | | .CONST 0x0397,0x1003
07ee 03a3 1004 | | .CONST 0x03a3,0x1004
07f0 03a6 1005 | | .CONST 0x03a6,0x1005
07f2 03ae 000a | | .CONST 0x03ae,0x000a
07f4 03b2 000b | | .CONST 0x03b2,0x000b
07f6 03b5 000c | | .CONST 0x03b5,0x000c
07f8 03b9 000d | | .CONST 0x03b9,0x000d
07fa 03b9 1401 | | .CONST 0x03b9,0x1401
07fc 03ba 000d | | .CONST 0x03ba,0x000d
07fe ; --------------------------------------------------------------------------------------
07fe ; Debug3 Subtable 0xd
07fe ; --------------------------------------------------------------------------------------
07fe 0000 0003 | | .DBG3TAB 0x0000,0x0003
0800 03cb 0001 | | .CONST 0x03cb,0x0001
0802 03df 0002 | | .CONST 0x03df,0x0002
0804 03e1 0003 | | .CONST 0x03e1,0x0003
0806 ; --------------------------------------------------------------------------------------
0806 ; Debug3 Subtable 0xe
0806 ; --------------------------------------------------------------------------------------
0806 0002 0034 | 4| .DBG3TAB 0x0002,0x0034
0808 03eb ffff | | .CONST 0x03eb,0xffff
080a 03ec fffe | | .CONST 0x03ec,0xfffe
080c 03ed 0001 | | .CONST 0x03ed,0x0001
080e 03ef 0401 | | .CONST 0x03ef,0x0401
0810 03f1 0402 | | .CONST 0x03f1,0x0402
0812 03f3 0403 | | .CONST 0x03f3,0x0403
0814 03f7 0404 | | .CONST 0x03f7,0x0404
0816 03fb 0405 | | .CONST 0x03fb,0x0405
0818 03fc 0801 | | .CONST 0x03fc,0x0801
081a 03fd 0802 | | .CONST 0x03fd,0x0802
081c 03fe 0803 | | .CONST 0x03fe,0x0803
081e 03fe 0804 | | .CONST 0x03fe,0x0804
0820 0400 0405 | | .CONST 0x0400,0x0405
0822 0409 0c01 | | .CONST 0x0409,0x0c01
0824 040a 0c02 | | .CONST 0x040a,0x0c02
0826 040b 0c03 | | .CONST 0x040b,0x0c03
0828 040b 0c04 | | .CONST 0x040b,0x0c04
082a 040d 0804 | | .CONST 0x040d,0x0804
082c 041b 0001 | | .CONST 0x041b,0x0001
082e 041c 0002 | | .CONST 0x041c,0x0002
0830 041e 1001 | | .CONST 0x041e,0x1001
0832 0420 1002 | | .CONST 0x0420,0x1002
0834 0422 1003 | " | .CONST 0x0422,0x1003
0836 0427 0002 | ' | .CONST 0x0427,0x0002
0838 0429 0003 | ) | .CONST 0x0429,0x0003
083a 042b 1401 | + | .CONST 0x042b,0x1401
083c 042f 0003 | / | .CONST 0x042f,0x0003
083e 0430 0004 | 0 | .CONST 0x0430,0x0004
0840 0432 1801 | 2 | .CONST 0x0432,0x1801
0842 0434 1802 | 4 | .CONST 0x0434,0x1802
0844 0436 1803 | 6 | .CONST 0x0436,0x1803
0846 043b 0004 | ; | .CONST 0x043b,0x0004
0848 043d 0005 | = | .CONST 0x043d,0x0005
084a 043f 1c01 | ? | .CONST 0x043f,0x1c01
084c 0443 0005 | C | .CONST 0x0443,0x0005
084e 0444 0006 | D | .CONST 0x0444,0x0006
0850 0446 2001 | F | .CONST 0x0446,0x2001
0852 0448 2002 | H | .CONST 0x0448,0x2002
0854 044a 2003 | J | .CONST 0x044a,0x2003
0856 044e 2004 | N | .CONST 0x044e,0x2004
0858 0452 2005 | R | .CONST 0x0452,0x2005
085a 0453 2401 | S$ | .CONST 0x0453,0x2401
085c 0454 2402 | T$ | .CONST 0x0454,0x2402
085e 0455 2403 | U$ | .CONST 0x0455,0x2403
0860 0455 2404 | U$ | .CONST 0x0455,0x2404
0862 0457 2005 | W | .CONST 0x0457,0x2005
0864 0460 2801 | `( | .CONST 0x0460,0x2801
0866 0461 2802 | a( | .CONST 0x0461,0x2802
0868 0462 2803 | b( | .CONST 0x0462,0x2803
086a 0462 2804 | b( | .CONST 0x0462,0x2804
086c 0464 2404 | d$ | .CONST 0x0464,0x2404
086e 0472 0006 | r | .CONST 0x0472,0x0006
0870 0478 0007 | x | .CONST 0x0478,0x0007
0872 047f 0008 | | .CONST 0x047f,0x0008
0874 ; --------------------------------------------------------------------------------------
0874 ; Debug3 Subtable 0xf
0874 ; --------------------------------------------------------------------------------------
0874 0000 0002 | | .DBG3TAB 0x0000,0x0002
0876 048b 0001 | | .CONST 0x048b,0x0001
0878 0494 0002 | | .CONST 0x0494,0x0002
087a ; --------------------------------------------------------------------------------------
087a ; Debug3 Subtable 0x10
087a ; --------------------------------------------------------------------------------------
087a 0000 0008 | | .DBG3TAB 0x0000,0x0008
087c 04a3 0001 | | .CONST 0x04a3,0x0001
087e 04a3 0401 | | .CONST 0x04a3,0x0401
0880 04a4 0402 | | .CONST 0x04a4,0x0402
0882 04a5 0403 | | .CONST 0x04a5,0x0403
0884 04a5 0404 | | .CONST 0x04a5,0x0404
0886 04a5 0001 | | .CONST 0x04a5,0x0001
0888 04a7 0003 | | .CONST 0x04a7,0x0003
088a 04ad 0002 | | .CONST 0x04ad,0x0002
088c 0000 0000 | | .BLANK 0000[0x174]