|
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 - metrics - download
Length: 4096 (0x1000)
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 04c0 | | .CONST 0x04c0 ; 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 0003 | | .CONST 0x0003 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0079 | y | .CONST 0x0079 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0026 | & | .CONST 0x0026 ; Number of locals
000b INIT_0008:
000b 62b4 |b | Indirect_Literal Discrete,0x2c0,{0x00000000, 0x5875b501} ; Debug Table 0x0 = .DEBUG 0x000b,0x057a,0x0000,0x0000,0x0058,0x75b5,0x0000,0x0144
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0129 | ) | Execute Any,Make_Visible
000d 4803 |H | Short_Literal 0x3 ; Debug Table 0x0.0x1 = 0xd,0xfffe
000e 032b | + | Declare_Type Record,Incomplete,Visible
000f 00c4 | | Action Make_Default ; Debug Table 0x0.0x2 = 0xf,0xfffd
0010 00e4 | | Load_Encached Positive_Cache ; Debug Table 0x0.0x3 = 0x10,0xfffc
0011 0266 | f | Execute Discrete,Bounds
0012 00db | | Load_Top At_Offset_3
0013 02a0 | | Declare_Subprogram Null_Subprogram
0014 4801 |H | Short_Literal 0x1
0015 0349 | I | Declare_Type Array,Defined_Incomplete,Visible,Bounds_With_Object
0016 029a 0083 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0080 ; Debug Table 0x0.0x4 = 0x16,0xfffb
0018 029a 008b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0088 ; Debug Table 0x0.0x5 = 0x18,0xfffa
001a 029a 00c3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00c0 ; Debug Table 0x0.0x6 = 0x1a,0xfff9
001c 029a 00eb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00e8 ; Debug Table 0x0.0x7 = 0x1c,0xfff8
001e 029a 012b | +| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0128 ; Debug Table 0x0.0x8 = 0x1e,0xfff7
0020 029a 013b | ;| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0138 ; Debug Table 0x0.0x9 = 0x20,0xfff6
0022 029a 014b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0148 ; Debug Table 0x0.0xa = 0x22,0xfff5
0024 029a 0163 | c| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0160 ; Debug Table 0x0.0xb = 0x24,0xfff4
0026 0092 044b | K| Action Push_String_Extended,0x44b ; "##UNDEFINED##;"
; Debug Table 0x0.0xc = 0x26,0xfff3
0028 0129 | ) | Execute Any,Make_Visible
0029 029a 017b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0178 ; Debug Table 0x0.0xd = 0x29,0xfff2
; Debug Table 0x0.0xe = 0x29,0xfff1
002b 029a 019b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0198 ; Debug Table 0x0.0xf = 0x2b,0xfff0
002d 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x10 = 0x2d,0xffef
002e 4803 |H | Short_Literal 0x3
002f 029f 01bb | | Declare_Subprogram For_Call,INIT_01b8
0031 03fd | | Declare_Type Discrete,Defined
0032 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x11 = 0x32,0xffee
0033 00e2 | | Load_Encached Integer_Cache
0034 00ec | | Load_Encached Diana_Tree_Cache
0035 02a0 | | Declare_Subprogram Null_Subprogram
0036 e20e | | Load 0x1,0xe
0037 0326 | & | Complete_Type Record,By_Defining
0038 e210 | | Load 0x1,0x10
0039 0340 | @ | Complete_Type Array,By_Component_Completion
003a e20e | | Load 0x1,0xe ; Debug Table 0x0.0x12 = 0x3a,0xffed
003b 0322 | " | Declare_Variable Record
003c 4803 |H | Short_Literal 0x3
003d 00d9 | | Load_Top At_Offset_1
003e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
003f 4800 |H | Short_Literal 0x0
0040 00d9 | | Load_Top At_Offset_1
0041 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0042 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x0.0x13 = 0x42,0x401
0043 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x0.0x14 = 0x43,0xffed
0044 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0045 0129 | ) | Execute Any,Make_Visible
0046 c20f | | Store 0x1,0xf
0047 00bf | | Action Accept_Activation
0048 4801 |H | Short_Literal 0x1 ; Debug Table 0x1 = .DEBUG 0x0048,0x05a6,0x0000,0x0000,0x0058,0x75e5,0x0000,0x0010
; Debug Table 0x1.0x0 = 0x48,0xffff
; Debug Table 0x1.0x1 = 0x48,0xfffe
0049 4800 |H | Short_Literal 0x0
004a e210 | | Load 0x1,0x10
004b 0334 | 4 | Declare_Variable Array,With_Constraint
004c 4801 |H | Short_Literal 0x1
004d 4800 |H | Short_Literal 0x0
004e e210 | | Load 0x1,0x10
004f 0334 | 4 | Declare_Variable Array,With_Constraint
0050 00d9 | | Load_Top At_Offset_1
0051 01d4 | | Execute Vector,Structure_Write
0052 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x1.0x2 = 0x52,0xfffd
0053 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x1.0x3 = 0x53,0x801
0054 0031 | 1 | Store_Top Heap_Access,At_Offset_1 ; Debug Table 0x1.0x4 = 0x54,0xfffd
0055 029d 01d3 | | Declare_Subprogram For_Outer_Call,INIT_01d0 ; Debug Table 0x1.0x5 = 0x55,0xfffc
; Debug Table 0x1.0x6 = 0x55,0xfffb
; Debug Table 0x1.0x7 = 0x55,0xfffa
0057 029d 01eb | | Declare_Subprogram For_Outer_Call,INIT_01e8 ; Debug Table 0x1.0x8 = 0x57,0xfff9
0059 029d 0203 | | Declare_Subprogram For_Outer_Call,INIT_0200 ; Debug Table 0x1.0x9 = 0x59,0xfff8
005b 029d 02cb | | Declare_Subprogram For_Outer_Call,INIT_02c8 ; Debug Table 0x1.0xa = 0x5b,0xfff7
005d 029d 02db | | Declare_Subprogram For_Outer_Call,INIT_02d8 ; Debug Table 0x1.0xb = 0x5d,0xfff6
005f 029d 0313 | | Declare_Subprogram For_Outer_Call,INIT_0310 ; Debug Table 0x1.0xc = 0x5f,0xfff5
0061 029d 035b | [| Declare_Subprogram For_Outer_Call,INIT_0358 ; Debug Table 0x1.0xd = 0x61,0xfff4
0063 029d 03cb | | Declare_Subprogram For_Outer_Call,INIT_03c8 ; Debug Table 0x1.0xe = 0x63,0xfff3
0065 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0xf = 0x65,0xfff2
0066 00c7 | | Action Elaborate_Subprogram
0067 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x10 = 0x67,0xfff1
0068 00c7 | | Action Elaborate_Subprogram
0069 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x11 = 0x69,0xfff0
006a 00c7 | | Action Elaborate_Subprogram
006b 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x12 = 0x6b,0xffef
006c 00c7 | | Action Elaborate_Subprogram
006d 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x13 = 0x6d,0xffee
006e 00c7 | | Action Elaborate_Subprogram
006f 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x14 = 0x6f,0xffed
0070 00c7 | | Action Elaborate_Subprogram
0071 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x15 = 0x71,0xffec
0072 00c7 | | Action Elaborate_Subprogram
0073 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0x16 = 0x73,0xffeb
0074 00c7 | | Action Elaborate_Subprogram
0075 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0x17 = 0x75,0xffea
0076 00c7 | | Action Elaborate_Subprogram
0077 1d1b | | Execute_Immediate Reference_Lex_1,0x1b ; Debug Table 0x1.0x18 = 0x77,0xffe9
0078 00c7 | | Action Elaborate_Subprogram
0079 BODY_0008:
0079 00bc | | Action Signal_Activated
007a 00bb | | Action Signal_Completion
007b 0000 0000 | | .BLANK 0000[0x5]
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 0083 | | .CONST 0x0083 ; Address of begin
0081 0004 | | .CONST 0x0004 ; Address of exception handler
0082 0001 | | .CONST 0x0001 ; Number of locals
0083 BODY_0080:
0083 INIT_0080:
0083 e21d | | Load 0x1,0x1d ; Debug Table 0x2 = .DEBUG 0x0083,0x05da,0x0002,0x0000,0x0058,0x75b5,0x0000,0x0159
; Debug Table 0x2.0x0 = 0x83,0x1
0084 00ca | | Action Exit_Nullary_Function
0085 0000 0000 | | .XXX[0x3]
0087 0000 | |
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008c | | .CONST 0x008c ; Address of begin
0089 00af | | .CONST 0x00af ; Address of exception handler
008a 0002 | | .CONST 0x0002 ; Number of locals
008b INIT_0088:
008b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x3 = .DEBUG 0x008b,0x05de,0x0002,0x0000,0x0058,0x75b5,0x0000,0x015e
; Debug Table 0x3.0x0 = 0x8b,0xffff
008c BODY_0088:
008c 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x1 = 0x8c,0x1
008d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
008e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x2 = 0x8e,0x401
008f 021d | | Execute Heap_Access,Is_Null
0090 00d0 | | Action Swap_Control
0091 00d1 | | Pop_Control Pop_Count_1
0092 6802 |h | Jump_Zero 0x95 ; Debug Table 0x3.0x3 = 0x92,0x1
0093 8211 | | Call 0x1,0x11 ; Debug Table 0x3.0x4 = 0x93,0x2
0094 4401 |D | Exit_Subprogram With_Result,0x1
0095 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x5 = 0x95,0x3
0096 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0097 490c |I | Short_Literal 0x10c
0098 00eb | | Load_Encached Diana_Cache
0099 0096 | | Execute Package,Field_Execute_Dynamic
009a 0031 | 1 | Store_Top Heap_Access,At_Offset_1
009b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x6 = 0x9b,0x4
; Debug Table 0x3.0x7 = 0x9b,0x801
009c 021d | | Execute Heap_Access,Is_Null
009d 680a |h | Jump_Zero 0xa8 ; Debug Table 0x3.0x8 = 0x9d,0x4
009e 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x9 = 0x9e,0x5
009f 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
00a0 e5ff | | Load 0x2,-0x1
00a1 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
00a2 e5ff | | Load 0x2,-0x1
00a3 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00a4 00eb | | Load_Encached Diana_Cache
00a5 18d9 | | Execute Package,Field_Execute,Field_Number 0xd9
00a6 8225 | % | Call 0x1,0x25
00a7 4401 |D | Exit_Subprogram With_Result,0x1
00a8 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0xa = 0xa8,0x6
00a9 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
00aa e5ff | | Load 0x2,-0x1
00ab 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
00ac 00da | | Load_Top At_Offset_2
00ad 8224 | $ | Call 0x1,0x24
00ae 4401 |D | Exit_Subprogram With_Result,0x1
00af TRAP_0088:
00af e20d | | Load 0x1,0xd
00b0 010f | | Execute Exception,Equal
00b1 6802 |h | Jump_Zero 0xb4
00b2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0xb = 0xb2,0x7
00b3 0101 | | Execute Exception,Reraise
00b4 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0xc = 0xb4,0x8
00b5 e001 | | Load 0x0,0x1
00b6 180d | | Execute Package,Field_Execute,Field_Number 0xd
00b7 0092 044c | L| Action Push_String_Extended,0x44c ; "Get (1)"
00b9 8220 | | Call 0x1,0x20
00ba 8211 | | Call 0x1,0x11 ; Debug Table 0x3.0xd = 0xba,0x9
00bb 4401 |D | Exit_Subprogram With_Result,0x1
00bc 0000 0000 | | .BLANK 0000[0x4]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c4 | | .CONST 0x00c4 ; Address of begin
00c1 00d8 | | .CONST 0x00d8 ; Address of exception handler
00c2 0002 | | .CONST 0x0002 ; Number of locals
00c3 INIT_00c0:
00c3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4 = .DEBUG 0x00c3,0x05fc,0x0002,0x0000,0x0058,0x75b5,0x0000,0x0167
; Debug Table 0x4.0x0 = 0xc3,0xffff
00c4 BODY_00c0:
00c4 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x1 = 0xc4,0x1
00c5 490c |I | Short_Literal 0x10c
00c6 00eb | | Load_Encached Diana_Cache
00c7 0096 | | Execute Package,Field_Execute_Dynamic
00c8 0031 | 1 | Store_Top Heap_Access,At_Offset_1
00c9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x2 = 0xc9,0x2
; Debug Table 0x4.0x3 = 0xc9,0x401
00ca 021d | | Execute Heap_Access,Is_Null
00cb 6807 |h | Jump_Zero 0xd3 ; Debug Table 0x4.0x4 = 0xcb,0x2
00cc 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x5 = 0xcc,0x3
00cd 4800 |H | Short_Literal 0x0
00ce e5ff | | Load 0x2,-0x1
00cf 00eb | | Load_Encached Diana_Cache
00d0 18d9 | | Execute Package,Field_Execute,Field_Number 0xd9
00d1 8225 | % | Call 0x1,0x25
00d2 4401 |D | Exit_Subprogram With_Result,0x1
00d3 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x6 = 0xd3,0x4
00d4 4800 |H | Short_Literal 0x0
00d5 00da | | Load_Top At_Offset_2
00d6 8224 | $ | Call 0x1,0x24
00d7 4401 |D | Exit_Subprogram With_Result,0x1
00d8 TRAP_00c0:
00d8 e20d | | Load 0x1,0xd
00d9 010f | | Execute Exception,Equal
00da 6802 |h | Jump_Zero 0xdd
00db 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x7 = 0xdb,0x5
00dc 0101 | | Execute Exception,Reraise
00dd 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x8 = 0xdd,0x6
00de e001 | | Load 0x0,0x1
00df 180d | | Execute Package,Field_Execute,Field_Number 0xd
00e0 0092 044d | M| Action Push_String_Extended,0x44d ; "Get (2)"
00e2 8220 | | Call 0x1,0x20
00e3 8211 | | Call 0x1,0x11 ; Debug Table 0x4.0x9 = 0xe3,0x7
00e4 4401 |D | Exit_Subprogram With_Result,0x1
00e5 0000 0000 | | .XXX[0x3]
00e7 0000 | |
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00ed | | .CONST 0x00ed ; Address of begin
00e9 011b | | .CONST 0x011b ; Address of exception handler
00ea 0003 | | .CONST 0x0003 ; Number of locals
00eb INIT_00e8:
00eb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5 = .DEBUG 0x00eb,0x0612,0x0002,0x0000,0x0058,0x75b5,0x0000,0x0172
; Debug Table 0x5.0x0 = 0xeb,0xffff
00ec 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x5.0x1 = 0xec,0xfffe
00ed BODY_00e8:
00ed e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x2 = 0xed,0x1
00ee 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00ef 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x3 = 0xef,0x401
00f0 021d | | Execute Heap_Access,Is_Null
00f1 00d0 | | Action Swap_Control
00f2 00d1 | | Pop_Control Pop_Count_1
00f3 680b |h | Jump_Zero 0xff ; Debug Table 0x5.0x4 = 0xf3,0x1
00f4 e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x5 = 0xf4,0x2
00f5 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
00f6 e002 | | Load 0x0,0x2
00f7 180d | | Execute Package,Field_Execute,Field_Number 0xd
00f8 e002 | | Load 0x0,0x2
00f9 1b19 | | Execute Package,Field_Read,Field_Number 0x19
00fa 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00fb e003 | | Load 0x0,0x3
00fc 180e | | Execute Package,Field_Execute,Field_Number 0xe
00fd 0032 | 2 | Store_Top Heap_Access,At_Offset_2
00fe 781a |x | Jump 0x119
00ff 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0x6 = 0xff,0x3
0100 e5ff | | Load 0x2,-0x1
0101 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0102 e004 | | Load 0x0,0x4
0103 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0104 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0105 e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x7 = 0x105,0x4
0106 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0107 6811 |h | Jump_Zero 0x119
0108 e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x8 = 0x108,0x5
0109 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
010a e004 | | Load 0x0,0x4
010b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
010c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
010d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x9 = 0x10d,0x6
010e 680a |h | Jump_Zero 0x119
010f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0xa = 0x10f,0x7
0110 00e4 | | Load_Encached Positive_Cache
0111 025b | [ | Execute Discrete,Check_In_Type
0112 e5ff | | Load 0x2,-0x1
0113 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0114 00db | | Load_Top At_Offset_3
0115 e002 | | Load 0x0,0x2
0116 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0117 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0118 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0119 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0xb = 0x119,0x8
011a 4401 |D | Exit_Subprogram With_Result,0x1
011b TRAP_00e8:
011b 0007 | | Action Break_Optional
011c 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0xc = 0x11c,0x9
011d e001 | | Load 0x0,0x1
011e 180d | | Execute Package,Field_Execute,Field_Number 0xd
011f 0092 044e | N| Action Push_String_Extended,0x44e ; "Get_Call"
0121 8220 | | Call 0x1,0x20
0122 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0xd = 0x122,0xa
; Debug Table 0x5.0xe = 0x122,0x801
0123 4401 |D | Exit_Subprogram With_Result,0x1 ; Debug Table 0x5.0xf = 0x123,0xa
0124 0000 0000 | | .BLANK 0000[0x4]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b | + | .CONST 0x012b ; Address of begin
0129 0004 | | .CONST 0x0004 ; Address of exception handler
012a 0001 | | .CONST 0x0001 ; Number of locals
012b BODY_0128:
012b INIT_0128:
012b 00da | | Load_Top At_Offset_2 ; Debug Table 0x6 = .DEBUG 0x012b,0x0634,0x0002,0x0000,0x0058,0x75b5,0x0000,0x017d
; Debug Table 0x6.0x0 = 0x12b,0x1
012c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
012d 0f02 | | Execute_Immediate Equal,0x2
012e 6807 |h | Jump_Zero 0x136
012f 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x1 = 0x12f,0x2
0130 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0131 00eb | | Load_Encached Diana_Cache
0132 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0133 00eb | | Load_Encached Diana_Cache
0134 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0135 4401 |D | Exit_Subprogram With_Result,0x1
0136 e20d | | Load 0x1,0xd ; Debug Table 0x6.0x2 = 0x136,0x3
0137 0257 | W | Execute Discrete,Raise
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013b | ; | .CONST 0x013b ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0001 | | .CONST 0x0001 ; Number of locals
013b BODY_0138:
013b INIT_0138:
013b 00da | | Load_Top At_Offset_2 ; Debug Table 0x7 = .DEBUG 0x013b,0x063c,0x0002,0x0000,0x0058,0x75b5,0x0000,0x0186
; Debug Table 0x7.0x0 = 0x13b,0x1
013c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
013d 4603 |F | Jump_Case 0x3
013e 7803 |x | Jump 0x142 ; case 0x0
013f 7802 |x | Jump 0x142 ; case 0x1
0140 7804 |x | Jump 0x145 ; case 0x2
0141 7803 |x | Jump 0x145 ; case 0x3
0142 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x1 = 0x142,0x2
0143 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0144 4401 |D | Exit_Subprogram With_Result,0x1
0145 e20d | | Load 0x1,0xd ; Debug Table 0x7.0x2 = 0x145,0x3
0146 0257 | W | Execute Discrete,Raise
0147 0000 | | .XXX[0x1]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b | K | .CONST 0x014b ; Address of begin
0149 0154 | T | .CONST 0x0154 ; Address of exception handler
014a 0001 | | .CONST 0x0001 ; Number of locals
014b BODY_0148:
014b INIT_0148:
014b 00da | | Load_Top At_Offset_2 ; Debug Table 0x8 = .DEBUG 0x014b,0x0644,0x0002,0x0000,0x0058,0x75b5,0x0000,0x018f
; Debug Table 0x8.0x0 = 0x14b,0x1
014c 8216 | | Call 0x1,0x16
014d 00d8 | | Load_Top At_Offset_0
014e 00e1 | | Load_Encached Boolean_Cache
014f 0260 | ` | Execute Discrete,In_Type
0150 7002 |p | Jump_Nonzero 0x153
0151 48e0 |H | Short_Literal 0xe0
0152 0257 | W | Execute Discrete,Raise
0153 4401 |D | Exit_Subprogram With_Result,0x1
0154 TRAP_0148:
0154 010e | | Execute Exception,Is_Constraint_Error
0155 6802 |h | Jump_Zero 0x158
0156 e20d | | Load 0x1,0xd ; Debug Table 0x8.0x1 = 0x156,0x2
0157 0257 | W | Execute Discrete,Raise
0158 0100 | | Execute Exception,Raise
0159 0000 0000 | | .BLANK 0000[0x7]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163 | c | .CONST 0x0163 ; Address of begin
0161 016c | l | .CONST 0x016c ; Address of exception handler
0162 0001 | | .CONST 0x0001 ; Number of locals
0163 BODY_0160:
0163 INIT_0160:
0163 00da | | Load_Top At_Offset_2 ; Debug Table 0x9 = .DEBUG 0x0163,0x064a,0x0002,0x0000,0x0058,0x75b5,0x0000,0x0198
; Debug Table 0x9.0x0 = 0x163,0x1
0164 8216 | | Call 0x1,0x16
0165 00d8 | | Load_Top At_Offset_0
0166 00e8 | | Load_Encached Character_Cache
0167 0260 | ` | Execute Discrete,In_Type
0168 7002 |p | Jump_Nonzero 0x16b
0169 48e0 |H | Short_Literal 0xe0
016a 0257 | W | Execute Discrete,Raise
016b 4401 |D | Exit_Subprogram With_Result,0x1
016c TRAP_0160:
016c 010e | | Execute Exception,Is_Constraint_Error
016d 6802 |h | Jump_Zero 0x170
016e e20d | | Load 0x1,0xd ; Debug Table 0x9.0x1 = 0x16e,0x2
016f 0257 | W | Execute Discrete,Raise
0170 0100 | | Execute Exception,Raise
0171 0000 0000 | | .BLANK 0000[0x7]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017d | } | .CONST 0x017d ; Address of begin
0179 0191 | | .CONST 0x0191 ; Address of exception handler
017a 0002 | | .CONST 0x0002 ; Number of locals
017b INIT_0178:
017b e20e | | Load 0x1,0xe ; Debug Table 0xa = .DEBUG 0x017b,0x0650,0x0002,0x0000,0x0058,0x75b5,0x0000,0x01af
; Debug Table 0xa.0x0 = 0x17b,0xffff
017c 0322 | " | Declare_Variable Record
017d BODY_0178:
017d e5fe | | Load 0x2,-0x2 ; Debug Table 0xa.0x1 = 0x17d,0x1
017e e5ff | | Load 0x2,-0x1
017f 01dc | | Execute Vector,Last
0180 027d | } | Execute Discrete,Greater
0181 6802 |h | Jump_Zero 0x184
0182 e219 | | Load 0x1,0x19 ; Debug Table 0xa.0x2 = 0x182,0x2
0183 4402 |D | Exit_Subprogram With_Result,0x2
0184 4801 |H | Short_Literal 0x1 ; Debug Table 0xa.0x3 = 0x184,0x3
0185 e5fe | | Load 0x2,-0x2
0186 e5ff | | Load 0x2,-0x1
0187 8226 | & | Call 0x1,0x26
0188 00d9 | | Load_Top At_Offset_1
0189 017d | } | Execute Record,Structure_Write
018a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x4 = 0x18a,0x4
018b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
018c 00eb | | Load_Encached Diana_Cache
018d 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
018e 00eb | | Load_Encached Diana_Cache
018f 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0190 4402 |D | Exit_Subprogram With_Result,0x2
0191 TRAP_0178:
0191 e20d | | Load 0x1,0xd
0192 010f | | Execute Exception,Equal
0193 6802 |h | Jump_Zero 0x196
0194 e219 | | Load 0x1,0x19 ; Debug Table 0xa.0x5 = 0x194,0x5
0195 4402 |D | Exit_Subprogram With_Result,0x2
0196 0100 | | Execute Exception,Raise
0197 0000 | | .XXX[0x1]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019d | | .CONST 0x019d ; Address of begin
0199 01ad | | .CONST 0x01ad ; Address of exception handler
019a 0002 | | .CONST 0x0002 ; Number of locals
019b INIT_0198:
019b e20e | | Load 0x1,0xe ; Debug Table 0xb = .DEBUG 0x019b,0x065e,0x0002,0x0000,0x0058,0x75b5,0x0000,0x01bc
; Debug Table 0xb.0x0 = 0x19b,0xffff
019c 0322 | " | Declare_Variable Record
019d BODY_0198:
019d e5fe | | Load 0x2,-0x2 ; Debug Table 0xb.0x1 = 0x19d,0x1
019e e5ff | | Load 0x2,-0x1
019f 01dc | | Execute Vector,Last
01a0 027d | } | Execute Discrete,Greater
01a1 6802 |h | Jump_Zero 0x1a4
01a2 6119 |a | Indirect_Literal Discrete,0x2bc,{0xffffffff, 0x80000001} ; Debug Table 0xb.0x2 = 0x1a2,0x2
01a3 4402 |D | Exit_Subprogram With_Result,0x2
01a4 4800 |H | Short_Literal 0x0 ; Debug Table 0xb.0x3 = 0x1a4,0x3
01a5 e5fe | | Load 0x2,-0x2
01a6 e5ff | | Load 0x2,-0x1
01a7 8226 | & | Call 0x1,0x26
01a8 00d9 | | Load_Top At_Offset_1
01a9 017d | } | Execute Record,Structure_Write
01aa 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x4 = 0x1aa,0x4
01ab 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01ac 4402 |D | Exit_Subprogram With_Result,0x2
01ad TRAP_0198:
01ad e20d | | Load 0x1,0xd
01ae 010f | | Execute Exception,Equal
01af 6802 |h | Jump_Zero 0x1b2
01b0 610b |a | Indirect_Literal Discrete,0x2bc,{0xffffffff, 0x80000001} ; Debug Table 0xb.0x5 = 0x1b0,0x5
01b1 4402 |D | Exit_Subprogram With_Result,0x2
01b2 0100 | | Execute Exception,Raise
01b3 0000 0000 | | .BLANK 0000[0x5]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bb | | .CONST 0x01bb ; Address of begin
01b9 0004 | | .CONST 0x0004 ; Address of exception handler
01ba 0001 | | .CONST 0x0001 ; Number of locals
01bb BODY_01b8:
01bb INIT_01b8:
01bb 4603 |F | Jump_Case 0x3 ; Debug Table 0xc = .DEBUG 0x01bb,0x066c,0x0005,0x0000,0x0058,0x75b5,0x0000,0x01ca
01bc 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
01bd 7802 |x | Jump 0x1c0 ; case 0x1
01be 7805 |x | Jump 0x1c4 ; case 0x2
01bf 7809 |x | Jump 0x1c9 ; case 0x3
01c0 00da | | Load_Top At_Offset_2
01c1 0091 0447 | G| Action Push_String_Extended_Indexed,0x447 ; "ENUMERATED"
01c3 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
01c4 00db | | Load_Top At_Offset_3
01c5 00db | | Load_Top At_Offset_3
01c6 00e0 | | Load_Encached Standard_Cache
01c7 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01c8 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
01c9 00da | | Load_Top At_Offset_2
01ca 00e0 | | Load_Encached Standard_Cache
01cb 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01cc 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
01cd 0000 0000 | | .XXX[0x3]
01cf 0000 | |
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3 | | .CONST 0x01d3 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0001 | | .CONST 0x0001 ; Number of locals
01d3 BODY_01d0:
01d3 INIT_01d0:
01d3 e005 | | Load 0x0,0x5 ; Debug Table 0xd = .DEBUG 0x01d3,0x066e,0x0001,0x0000,0x0058,0x75e5,0x0000,0x0035
; Debug Table 0xd.0x0 = 0x1d3,0x1
01d4 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01d5 0092 044f | O| Action Push_String_Extended,0x44f ; "*** Bad status from Directory."
; Debug Table 0xd.0x1 = 0x1d5,0x2
01d7 00db | | Load_Top At_Offset_3
01d8 01cc | | Execute Vector,Catenate
01d9 e5fe | | Load 0x2,-0x2
01da e006 | | Load 0x0,0x6
01db 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01dc 025e | ^ | Execute Discrete,Convert
01dd 1c01 | | Execute_Immediate Run_Utility,0x1
01de 01cc | | Execute Vector,Catenate
01df e005 | | Load 0x0,0x5
01e0 180f | | Execute Package,Field_Execute,Field_Number 0xf
01e1 60d6 |` | Indirect_Literal Discrete,0x2b8,{0x00000000, 0x5875e502} ; Debug Table 0xd.0x2 = 0x1e1,0x3
01e2 0257 | W | Execute Discrete,Raise
01e3 0000 0000 | | .BLANK 0000[0x5]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb | | .CONST 0x01eb ; Address of begin
01e9 0004 | | .CONST 0x0004 ; Address of exception handler
01ea 0001 | | .CONST 0x0001 ; Number of locals
01eb BODY_01e8:
01eb INIT_01e8:
01eb e005 | | Load 0x0,0x5 ; Debug Table 0xe = .DEBUG 0x01eb,0x0676,0x0001,0x0000,0x0058,0x75e5,0x0000,0x0062
; Debug Table 0xe.0x0 = 0x1eb,0x1
01ec 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01ed 0092 0450 | P| Action Push_String_Extended,0x450 ; "*** Exception in Command.Parameters."
; Debug Table 0xe.0x1 = 0x1ed,0x2
01ef 00db | | Load_Top At_Offset_3
01f0 01cc | | Execute Vector,Catenate
01f1 0092 0451 | Q| Action Push_String_Extended,0x451 ; ": "
01f3 01cc | | Execute Vector,Catenate
01f4 e5fe | | Load 0x2,-0x2
01f5 01cc | | Execute Vector,Catenate
01f6 e005 | | Load 0x0,0x5
01f7 180f | | Execute Package,Field_Execute,Field_Number 0xf
01f8 60bb |` | Indirect_Literal Discrete,0x2b4,{0x00000000, 0x5875e501} ; Debug Table 0xe.0x2 = 0x1f8,0x3
01f9 0257 | W | Execute Discrete,Raise
01fa 0000 0000 | | .BLANK 0000[0x6]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0207 | | .CONST 0x0207 ; Address of begin
0201 029f | | .CONST 0x029f ; Address of exception handler
0202 0003 | | .CONST 0x0003 ; Number of locals
0203 INIT_0200:
0203 029f 03fb | | Declare_Subprogram For_Call,INIT_03f8 ; Debug Table 0xf = .DEBUG 0x0203,0x067e,0x0002,0x0000,0x0058,0x75e5,0x0000,0x0090
; Debug Table 0xf.0x0 = 0x203,0xffff
0205 029f 042b | +| Declare_Subprogram For_Call,INIT_0428
0207 BODY_0200:
0207 e5ff | | Load 0x2,-0x1 ; Debug Table 0xf.0x1 = 0x207,0x1
; Debug Table 0xf.0x2 = 0x207,0x401
0208 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xf.0x3 = 0x208,0x402
0209 0b12 | | Execute_Immediate Case_Compare,0x12 ; Debug Table 0xf.0x4 = 0x209,0x403
; Debug Table 0xf.0x5 = 0x209,0x404
; Debug Table 0xf.0x6 = 0x209,0x1
020a 7010 |p | Jump_Nonzero 0x21b
020b 0b17 | | Execute_Immediate Case_Compare,0x17
020c 7013 |p | Jump_Nonzero 0x220
020d 0b16 | | Execute_Immediate Case_Compare,0x16
020e 7014 |p | Jump_Nonzero 0x223
020f 0b08 | | Execute_Immediate Case_Compare,0x8
0210 7047 |pG | Jump_Nonzero 0x258
0211 0b0b | | Execute_Immediate Case_Compare,0xb
0212 7047 |pG | Jump_Nonzero 0x25a
0213 0b0c | | Execute_Immediate Case_Compare,0xc
0214 7051 |pQ | Jump_Nonzero 0x266
0215 0b10 | | Execute_Immediate Case_Compare,0x10
0216 7066 |pf | Jump_Nonzero 0x27d
0217 0ba9 | | Execute_Immediate Case_Compare,0xa9
0218 707e |p~ | Jump_Nonzero 0x297
0219 e20d | | Load 0x1,0xd ; Debug Table 0xf.0x7 = 0x219,0xa
021a 0257 | W | Execute Discrete,Raise
021b e5ff | | Load 0x2,-0x1 ; Debug Table 0xf.0x8 = 0x21b,0x2
021c 00eb | | Load_Encached Diana_Cache
021d 18c0 | | Execute Package,Field_Execute,Field_Number 0xc0
021e 8221 | ! | Call 0x1,0x21
021f 4401 |D | Exit_Subprogram With_Result,0x1
0220 e5ff | | Load 0x2,-0x1 ; Debug Table 0xf.0x9 = 0x220,0x3
0221 8402 | | Call 0x2,0x2
0222 4401 |D | Exit_Subprogram With_Result,0x1
0223 00cf | | Action Mark_Auxiliary ; Debug Table 0xf.0xa = 0x223,0x4
0224 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf.0xb = 0x224,0xf7ff
0225 e5ff | | Load 0x2,-0x1 ; Debug Table 0xf.0xc = 0x225,0x801
0226 00eb | | Load_Encached Diana_Cache
0227 18fa | | Execute Package,Field_Execute,Field_Number 0xfa
0228 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0229 e406 | | Load 0x2,0x6 ; Debug Table 0xf.0xd = 0x229,0x802
; Debug Table 0xf.0xe = 0x229,0xc01
022a 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xf.0xf = 0x22a,0xc02
022b 0b1d | | Execute_Immediate Case_Compare,0x1d ; Debug Table 0xf.0x10 = 0x22b,0xc03
; Debug Table 0xf.0x11 = 0x22b,0xc04
; Debug Table 0xf.0x12 = 0x22b,0x802
022c 7006 |p | Jump_Nonzero 0x233
022d 0b31 | 1 | Execute_Immediate Case_Compare,0x31
022e 700a |p | Jump_Nonzero 0x239
022f 0b00 | | Execute_Immediate Case_Compare,0x0
0230 7024 |p$ | Jump_Nonzero 0x255
0231 e20d | | Load 0x1,0xd ; Debug Table 0xf.0x13 = 0x231,0x806
0232 0257 | W | Execute Discrete,Raise
0233 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0x14 = 0x233,0x803
0234 4901 |I | Short_Literal 0x101
0235 00eb | | Load_Encached Diana_Cache
0236 0096 | | Execute Package,Field_Execute_Dynamic
0237 8221 | ! | Call 0x1,0x21
0238 4401 |D | Exit_Subprogram With_Result,0x1
0239 00cf | | Action Mark_Auxiliary ; Debug Table 0xf.0x15 = 0x239,0x804
023a 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf.0x16 = 0x23a,0xefff
023b 00db | | Load_Top At_Offset_3
023c 00eb | | Load_Encached Diana_Cache
023d 18ec | | Execute Package,Field_Execute,Field_Number 0xec
023e 0031 | 1 | Store_Top Heap_Access,At_Offset_1
023f 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xf.0x17 = 0x23f,0xeffe
0240 00d9 | | Load_Top At_Offset_1
0241 00eb | | Load_Encached Diana_Cache
0242 1889 | | Execute Package,Field_Execute,Field_Number 0x89
0243 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0244 e20e | | Load 0x1,0xe ; Debug Table 0xf.0x18 = 0x244,0x1001
0245 0322 | " | Declare_Variable Record
0246 4800 |H | Short_Literal 0x0
0247 00d9 | | Load_Top At_Offset_1
0248 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0249 00d9 | | Load_Top At_Offset_1
024a e406 | | Load 0x2,0x6
024b 4975 |Iu | Short_Literal 0x175
024c 00eb | | Load_Encached Diana_Cache
024d 0098 | | Execute Package,Field_Read_Dynamic
024e 181b | | Execute Package,Field_Execute,Field_Number 0x1b
024f 00d9 | | Load_Top At_Offset_1
0250 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0251 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf.0x19 = 0x251,0x1401
0252 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0x1a = 0x252,0x1001
0253 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0254 4401 |D | Exit_Subprogram With_Result,0x1
0255 e5ff | | Load 0x2,-0x1 ; Debug Table 0xf.0x1b = 0x255,0x805
0256 8402 | | Call 0x2,0x2
0257 4401 |D | Exit_Subprogram With_Result,0x1
0258 8403 | | Call 0x2,0x3 ; Debug Table 0xf.0x1c = 0x258,0x5
0259 7842 |xB | Jump 0x29c
025a e20e | | Load 0x1,0xe ; Debug Table 0xf.0x1d = 0x25a,0x6
025b 0322 | " | Declare_Variable Record
025c 4802 |H | Short_Literal 0x2
025d 00d9 | | Load_Top At_Offset_1
025e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
025f 4800 |H | Short_Literal 0x0
0260 00d9 | | Load_Top At_Offset_1
0261 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0262 e5ff | | Load 0x2,-0x1
0263 00d9 | | Load_Top At_Offset_1
0264 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0265 4401 |D | Exit_Subprogram With_Result,0x1
0266 00cf | | Action Mark_Auxiliary ; Debug Table 0xf.0x1e = 0x266,0x7
0267 e5ff | | Load 0x2,-0x1 ; Debug Table 0xf.0x1f = 0x267,0xe7ff
0268 00eb | | Load_Encached Diana_Cache
0269 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
026a 00eb | | Load_Encached Diana_Cache
026b 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
026c e20e | | Load 0x1,0xe ; Debug Table 0xf.0x20 = 0x26c,0x1801
026d 0322 | " | Declare_Variable Record
026e 4800 |H | Short_Literal 0x0
026f 00d9 | | Load_Top At_Offset_1
0270 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0271 00d9 | | Load_Top At_Offset_1
0272 01dd | | Execute Vector,First
0273 0a01 | | Execute_Immediate Plus,0x1
0274 0248 | H | Execute Discrete,Check_In_Integer
0275 00da | | Load_Top At_Offset_2
0276 01d7 | | Execute Vector,Field_Read
0277 00d9 | | Load_Top At_Offset_1
0278 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0279 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf.0x21 = 0x279,0x1c01
027a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0x22 = 0x27a,0x1801
027b 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
027c 4401 |D | Exit_Subprogram With_Result,0x1
027d 00cf | | Action Mark_Auxiliary ; Debug Table 0xf.0x23 = 0x27d,0x8
027e 00e2 | | Load_Encached Integer_Cache ; Debug Table 0xf.0x24 = 0x27e,0xdfff
027f 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xf.0x25 = 0x27f,0xdffe
0280 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xf.0x26 = 0x280,0x2001
0281 00e2 | | Load_Encached Integer_Cache
0282 e5ff | | Load 0x2,-0x1
0283 e004 | | Load 0x0,0x4
0284 180e | | Execute Package,Field_Execute,Field_Number 0xe
0285 005b | [ | Store_Top Discrete,At_Offset_3
0286 0059 | Y | Store_Top Discrete,At_Offset_1
0287 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x27 = 0x287,0x2002
0288 680c |h | Jump_Zero 0x295
0289 e20e | | Load 0x1,0xe ; Debug Table 0xf.0x28 = 0x289,0x2003
028a 0322 | " | Declare_Variable Record
028b 4801 |H | Short_Literal 0x1
028c 00d9 | | Load_Top At_Offset_1
028d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
028e 00da | | Load_Top At_Offset_2
028f 00d9 | | Load_Top At_Offset_1
0290 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0291 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf.0x29 = 0x291,0x2401
0292 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0x2a = 0x292,0x2003
0293 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0294 4401 |D | Exit_Subprogram With_Result,0x1
0295 e20d | | Load 0x1,0xd ; Debug Table 0xf.0x2b = 0x295,0x2004
0296 0257 | W | Execute Discrete,Raise
0297 e5ff | | Load 0x2,-0x1 ; Debug Table 0xf.0x2c = 0x297,0x9
0298 00eb | | Load_Encached Diana_Cache
0299 18b2 | | Execute Package,Field_Execute,Field_Number 0xb2
029a 8221 | ! | Call 0x1,0x21
029b 4401 |D | Exit_Subprogram With_Result,0x1
029c 00d1 | | Pop_Control Pop_Count_1
029d 4831 |H1 | Short_Literal 0x31
029e 0257 | W | Execute Discrete,Raise
029f TRAP_0200:
029f e20d | | Load 0x1,0xd
02a0 010f | | Execute Exception,Equal
02a1 6802 |h | Jump_Zero 0x2a4
02a2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x2d = 0x2a2,0xb
02a3 0101 | | Execute Exception,Reraise
02a4 600f |` | Indirect_Literal Discrete,0x2b4,{0x00000000, 0x5875e501}
02a5 010f | | Execute Exception,Equal
02a6 6802 |h | Jump_Zero 0x2a9
02a7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x2e = 0x2a7,0xc
02a8 0101 | | Execute Exception,Reraise
02a9 4801 |H | Short_Literal 0x1 ; Debug Table 0xf.0x2f = 0x2a9,0xd
02aa e001 | | Load 0x0,0x1
02ab 180d | | Execute Package,Field_Execute,Field_Number 0xd
02ac 0092 0452 | R| Action Push_String_Extended,0x452 ; "Parameter_Of"
02ae 8220 | | Call 0x1,0x20
02af 4831 |H1 | Short_Literal 0x31
02b0 0257 | W | Execute Discrete,Raise
02b1 0000 0000 | | .XXX[0x3]
02b3 0000 | |
02b4 0000 0000 | | .LITERAL {0x00000000, 0x5875e501}
02b8 0000 0000 | | .LITERAL {0x00000000, 0x5875e502}
02bc ffff ffff | | .LITERAL {0xffffffff, 0x80000001}
02c0 0000 0000 | | .LITERAL {0x00000000, 0x5875b501}
02c4 0000 0000 | | .BLANK 0000[0x4]
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02cb | | .CONST 0x02cb ; Address of begin
02c9 0004 | | .CONST 0x0004 ; Address of exception handler
02ca 0001 | | .CONST 0x0001 ; Number of locals
02cb BODY_02c8:
02cb INIT_02c8:
02cb 00da | | Load_Top At_Offset_2 ; Debug Table 0x10 = .DEBUG 0x02cb,0x06e0,0x0002,0x0000,0x0058,0x75e5,0x0000,0x0286
; Debug Table 0x10.0x0 = 0x2cb,0x1
02cc 0d00 | | Execute_Immediate Less,0x0
02cd 6802 |h | Jump_Zero 0x2d0
02ce 4fff |O | Short_Literal 0x7ff ; Debug Table 0x10.0x1 = 0x2ce,0x2
02cf 4401 |D | Exit_Subprogram With_Result,0x1
02d0 4801 |H | Short_Literal 0x1 ; Debug Table 0x10.0x2 = 0x2d0,0x3
02d1 4401 |D | Exit_Subprogram With_Result,0x1
02d2 0000 0000 | | .BLANK 0000[0x6]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02db | | .CONST 0x02db ; Address of begin
02d9 02f9 | | .CONST 0x02f9 ; Address of exception handler
02da 0001 | | .CONST 0x0001 ; Number of locals
02db BODY_02d8:
02db INIT_02d8:
02db 00db | | Load_Top At_Offset_3 ; Debug Table 0x11 = .DEBUG 0x02db,0x06e8,0x0001,0x0000,0x0058,0x75e5,0x0000,0x02a4
; Debug Table 0x11.0x0 = 0x2db,0x1
02dc 681b |h | Jump_Zero 0x2f8
02dd 00cf | | Action Mark_Auxiliary
02de e5fd | | Load 0x2,-0x3 ; Debug Table 0x11.0x1 = 0x2de,0x2
02df 01d9 | | Execute Vector,Reverse_Bounds
02e0 0263 | c | Execute Discrete,Above_Bound
02e1 7015 |p | Jump_Nonzero 0x2f7
02e2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x2 = 0x2e2,0x3
02e3 e5fd | | Load 0x2,-0x3
02e4 01d5 | | Execute Vector,Field_Reference
02e5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02e6 0f01 | | Execute_Immediate Equal,0x1
02e7 680d |h | Jump_Zero 0x2f5
02e8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x3 = 0x2e8,0x4
02e9 e5fd | | Load 0x2,-0x3
02ea 01d5 | | Execute Vector,Field_Reference
02eb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02ec 8222 | " | Call 0x1,0x22
02ed e5ff | | Load 0x2,-0x1
02ee 0271 | q | Execute Discrete,Times
02ef 00d9 | | Load_Top At_Offset_1
02f0 e5fd | | Load 0x2,-0x3
02f1 01d5 | | Execute Vector,Field_Reference
02f2 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
02f3 00d2 | | Pop_Control Pop_Count_2 ; Debug Table 0x11.0x4 = 0x2f3,0x5
02f4 7802 |x | Jump 0x2f7
02f5 00c8 | | Action Pop_Auxiliary_Range
02f6 3feb |? | Loop_Increasing 0x2e2
02f7 00ce | | Action Pop_Auxiliary
02f8 4503 |E | Exit_Subprogram 0x3
02f9 TRAP_02d8:
02f9 e20d | | Load 0x1,0xd
02fa 010f | | Execute Exception,Equal
02fb 6802 |h | Jump_Zero 0x2fe
02fc 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x5 = 0x2fc,0x6
02fd 0101 | | Execute Exception,Reraise
02fe 67b5 |g | Indirect_Literal Discrete,0x2b4,{0x00000000, 0x5875e501}
02ff 010f | | Execute Exception,Equal
0300 6802 |h | Jump_Zero 0x303
0301 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x6 = 0x301,0x7
0302 0101 | | Execute Exception,Reraise
0303 4801 |H | Short_Literal 0x1 ; Debug Table 0x11.0x7 = 0x303,0x8
0304 e001 | | Load 0x0,0x1
0305 180d | | Execute Package,Field_Execute,Field_Number 0xd
0306 0092 0453 | S| Action Push_String_Extended,0x453 ; "Adjust_Argument"
0308 8220 | | Call 0x1,0x20
0309 4503 |E | Exit_Subprogram 0x3
030a 0000 0000 | | .BLANK 0000[0x6]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0320 | | .CONST 0x0320 ; Address of begin
0311 0345 | E | .CONST 0x0345 ; Address of exception handler
0312 0003 | | .CONST 0x0003 ; Number of locals
0313 INIT_0310:
0313 00ef | | Load_Encached Diana_Sequence_Cache ; Debug Table 0x12 = .DEBUG 0x0313,0x06fa,0x0002,0x0000,0x0058,0x75e5,0x0000,0x02fe
; Debug Table 0x12.0x0 = 0x313,0xffff
0314 00db | | Load_Top At_Offset_3
0315 00eb | | Load_Encached Diana_Cache
0316 18ed | | Execute Package,Field_Execute,Field_Number 0xed
0317 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0318 4801 |H | Short_Literal 0x1 ; Debug Table 0x12.0x1 = 0x318,0xfffe
0319 00d9 | | Load_Top At_Offset_1
031a 4975 |Iu | Short_Literal 0x175
031b 00eb | | Load_Encached Diana_Cache
031c 0098 | | Execute Package,Field_Read_Dynamic
031d 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
031e e210 | | Load 0x1,0x10
031f 0334 | 4 | Declare_Variable Array,With_Constraint
0320 BODY_0310:
0320 00cf | | Action Mark_Auxiliary
0321 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x12.0x2 = 0x321,0x1
0322 01d9 | | Execute Vector,Reverse_Bounds
0323 0263 | c | Execute Discrete,Above_Bound
0324 7018 |p | Jump_Nonzero 0x33d
0325 e402 | | Load 0x2,0x2 ; Debug Table 0x12.0x3 = 0x325,0x2
0326 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x4 = 0x326,0x401
0327 0217 | | Execute Heap_Access,All_Reference
0328 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0329 00d9 | | Load_Top At_Offset_1
032a e409 | | Load 0x2,0x9 ; Debug Table 0x12.0x5 = 0x32a,0x801
032b 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x12.0x6 = 0x32b,0x802
032c 00d0 | | Action Swap_Control ; Debug Table 0x12.0x7 = 0x32c,0x803
; Debug Table 0x12.0x8 = 0x32c,0x804
032d 00d1 | | Pop_Control Pop_Count_1
032e 49af |I | Short_Literal 0x1af ; Debug Table 0x12.0x9 = 0x32e,0x401
032f 00eb | | Load_Encached Diana_Cache
0330 0096 | | Execute Package,Field_Execute_Dynamic
0331 00d0 | | Action Swap_Control
0332 00d1 | | Pop_Control Pop_Count_1
0333 8221 | ! | Call 0x1,0x21 ; Debug Table 0x12.0xa = 0x333,0x2
0334 00d9 | | Load_Top At_Offset_1
0335 e403 | | Load 0x2,0x3
0336 01d6 | | Execute Vector,Field_Write
0337 e402 | | Load 0x2,0x2 ; Debug Table 0x12.0xb = 0x337,0x3
; Debug Table 0x12.0xc = 0x337,0xc01
0338 0217 | | Execute Heap_Access,All_Reference
0339 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
033a a402 | | Store_Unchecked 0x2,0x2 ; Debug Table 0x12.0xd = 0x33a,0x3
033b 00c8 | | Action Pop_Auxiliary_Range
033c 3fe8 |? | Loop_Increasing 0x325
033d 00ce | | Action Pop_Auxiliary
033e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0xe = 0x33e,0x4
033f e5fd | | Load 0x2,-0x3
0340 e5fe | | Load 0x2,-0x2
0341 8223 | # | Call 0x1,0x23
0342 00d1 | | Pop_Control Pop_Count_1
0343 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0xf = 0x343,0x5
0344 4403 |D | Exit_Subprogram With_Result,0x3
0345 TRAP_0310:
0345 e20d | | Load 0x1,0xd
0346 010f | | Execute Exception,Equal
0347 6802 |h | Jump_Zero 0x34a
0348 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x10 = 0x348,0x6
0349 0101 | | Execute Exception,Reraise
034a 6769 |gi | Indirect_Literal Discrete,0x2b4,{0x00000000, 0x5875e501}
034b 010f | | Execute Exception,Equal
034c 6802 |h | Jump_Zero 0x34f
034d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x11 = 0x34d,0x7
034e 0101 | | Execute Exception,Reraise
034f 4801 |H | Short_Literal 0x1 ; Debug Table 0x12.0x12 = 0x34f,0x8
0350 e001 | | Load 0x0,0x1
0351 180d | | Execute Package,Field_Execute,Field_Number 0xd
0352 0092 0454 | T| Action Push_String_Extended,0x454 ; "List_From_Normalized"
0354 8220 | | Call 0x1,0x20
0355 4831 |H1 | Short_Literal 0x31
0356 0257 | W | Execute Discrete,Raise
0357 0000 | | .XXX[0x1]
0358 ; --------------------------------------------------------------------------------------
0358 ; SUBPROGRAM
0358 ; --------------------------------------------------------------------------------------
0358 0368 | h | .CONST 0x0368 ; Address of begin
0359 03b0 | | .CONST 0x03b0 ; Address of exception handler
035a 0003 | | .CONST 0x0003 ; Number of locals
035b INIT_0358:
035b 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x13 = .DEBUG 0x035b,0x0722,0x0002,0x0000,0x0058,0x75e5,0x0000,0x036a
; Debug Table 0x13.0x0 = 0x35b,0xffff
035c 00db | | Load_Top At_Offset_3
035d 00eb | | Load_Encached Diana_Cache
035e 1889 | | Execute Package,Field_Execute,Field_Number 0x89
035f 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0360 4801 |H | Short_Literal 0x1 ; Debug Table 0x13.0x1 = 0x360,0xfffe
0361 00d9 | | Load_Top At_Offset_1
0362 4975 |Iu | Short_Literal 0x175
0363 00eb | | Load_Encached Diana_Cache
0364 0098 | | Execute Package,Field_Read_Dynamic
0365 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0366 e210 | | Load 0x1,0x10
0367 0334 | 4 | Declare_Variable Array,With_Constraint
0368 BODY_0358:
0368 00cf | | Action Mark_Auxiliary
0369 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x13.0x2 = 0x369,0x1
036a 01d9 | | Execute Vector,Reverse_Bounds
036b 0263 | c | Execute Discrete,Above_Bound
036c 703b |p; | Jump_Nonzero 0x3a8
036d e402 | | Load 0x2,0x2 ; Debug Table 0x13.0x3 = 0x36d,0x2
036e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x4 = 0x36e,0x401
036f 7002 |p | Jump_Nonzero 0x372
0370 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x13.0x5 = 0x370,0x402
0371 7826 |x& | Jump 0x398
0372 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x6 = 0x372,0x403
0373 0217 | | Execute Heap_Access,All_Reference
0374 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0375 6804 |h | Jump_Zero 0x37a
0376 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x7 = 0x376,0x404
0377 0217 | | Execute Heap_Access,All_Reference
0378 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0379 781e |x | Jump 0x398
037a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x8 = 0x37a,0x405
037b e408 | | Load 0x2,0x8 ; Debug Table 0x13.0x9 = 0x37b,0x801
037c 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0x13.0xa = 0x37c,0x802
037d 00d0 | | Action Swap_Control ; Debug Table 0x13.0xb = 0x37d,0x803
; Debug Table 0x13.0xc = 0x37d,0x804
037e 00d1 | | Pop_Control Pop_Count_1
037f 49bb |I | Short_Literal 0x1bb ; Debug Table 0x13.0xd = 0x37f,0x405
0380 00eb | | Load_Encached Diana_Cache
0381 0098 | | Execute Package,Field_Read_Dynamic
0382 012c | , | Execute Any,Size
0383 e007 | | Load 0x0,0x7
0384 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0385 025b | [ | Execute Discrete,Check_In_Type
0386 0273 | s | Execute Discrete,Plus
0387 00d9 | | Load_Top At_Offset_1
0388 e409 | | Load 0x2,0x9 ; Debug Table 0x13.0xe = 0x388,0xc01
0389 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x13.0xf = 0x389,0xc02
038a 00d0 | | Action Swap_Control ; Debug Table 0x13.0x10 = 0x38a,0xc03
; Debug Table 0x13.0x11 = 0x38a,0xc04
038b 00d1 | | Pop_Control Pop_Count_1
038c 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0x13.0x12 = 0x38c,0x804
038d 00eb | | Load_Encached Diana_Cache
038e 0098 | | Execute Package,Field_Read_Dynamic
038f 49c9 |I | Short_Literal 0x1c9
0390 00eb | | Load_Encached Diana_Cache
0391 0098 | | Execute Package,Field_Read_Dynamic
0392 49ca |I | Short_Literal 0x1ca
0393 00eb | | Load_Encached Diana_Cache
0394 0095 | | Execute Package,Field_Reference_Dynamic
0395 e008 | | Load 0x0,0x8
0396 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0397 7800 |x | Jump 0x398
0398 00d0 | | Action Swap_Control
0399 00d1 | | Pop_Control Pop_Count_1
039a 8221 | ! | Call 0x1,0x21 ; Debug Table 0x13.0x13 = 0x39a,0x2
039b 00d9 | | Load_Top At_Offset_1
039c e403 | | Load 0x2,0x3
039d 01d6 | | Execute Vector,Field_Write
039e e402 | | Load 0x2,0x2 ; Debug Table 0x13.0x14 = 0x39e,0x3
; Debug Table 0x13.0x15 = 0x39e,0x1001
039f 7002 |p | Jump_Nonzero 0x3a2
03a0 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x13.0x16 = 0x3a0,0x1002
03a1 7803 |x | Jump 0x3a5
03a2 e402 | | Load 0x2,0x2 ; Debug Table 0x13.0x17 = 0x3a2,0x1003
03a3 0217 | | Execute Heap_Access,All_Reference
03a4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
03a5 a402 | | Store_Unchecked 0x2,0x2 ; Debug Table 0x13.0x18 = 0x3a5,0x3
03a6 00c8 | | Action Pop_Auxiliary_Range
03a7 3fc5 |? | Loop_Increasing 0x36d
03a8 00ce | | Action Pop_Auxiliary
03a9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x19 = 0x3a9,0x4
03aa e5fd | | Load 0x2,-0x3
03ab e5fe | | Load 0x2,-0x2
03ac 8223 | # | Call 0x1,0x23
03ad 00d1 | | Pop_Control Pop_Count_1
03ae 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x1a = 0x3ae,0x5
03af 4403 |D | Exit_Subprogram With_Result,0x3
03b0 TRAP_0358:
03b0 e20d | | Load 0x1,0xd
03b1 010f | | Execute Exception,Equal
03b2 6802 |h | Jump_Zero 0x3b5
03b3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x1b = 0x3b3,0x6
03b4 0101 | | Execute Exception,Reraise
03b5 66fe |f | Indirect_Literal Discrete,0x2b4,{0x00000000, 0x5875e501}
03b6 010f | | Execute Exception,Equal
03b7 6802 |h | Jump_Zero 0x3ba
03b8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x1c = 0x3b8,0x7
03b9 0101 | | Execute Exception,Reraise
03ba 4801 |H | Short_Literal 0x1 ; Debug Table 0x13.0x1d = 0x3ba,0x8
03bb e001 | | Load 0x0,0x1
03bc 180d | | Execute Package,Field_Execute,Field_Number 0xd
03bd 0092 0455 | U| Action Push_String_Extended,0x455 ; "List_From_Call"
03bf 8220 | | Call 0x1,0x20
03c0 4831 |H1 | Short_Literal 0x31
03c1 0257 | W | Execute Discrete,Raise
03c2 0000 0000 | | .BLANK 0000[0x6]
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03ce | | .CONST 0x03ce ; Address of begin
03c9 0004 | | .CONST 0x0004 ; Address of exception handler
03ca 0004 | | .CONST 0x0004 ; Number of locals
03cb INIT_03c8:
03cb 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x14 = .DEBUG 0x03cb,0x0760,0x0002,0x0000,0x0058,0x75e5,0x0000,0x03d6
; Debug Table 0x14.0x0 = 0x3cb,0xffff
03cc 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x14.0x1 = 0x3cc,0xfffe
03cd 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x14.0x2 = 0x3cd,0xfffd
03ce BODY_03c8:
03ce 4800 |H | Short_Literal 0x0 ; Debug Table 0x14.0x3 = 0x3ce,0x1
03cf 0053 | S | Store_Top_Unchecked Discrete,At_Offset_3
03d0 4800 |H | Short_Literal 0x0 ; Debug Table 0x14.0x4 = 0x3d0,0x2
03d1 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
03d2 00cf | | Action Mark_Auxiliary
03d3 e5ff | | Load 0x2,-0x1 ; Debug Table 0x14.0x5 = 0x3d3,0x3
03d4 01d9 | | Execute Vector,Reverse_Bounds
03d5 0263 | c | Execute Discrete,Above_Bound
03d6 7017 |p | Jump_Nonzero 0x3ee
03d7 e5fd | | Load 0x2,-0x3 ; Debug Table 0x14.0x6 = 0x3d7,0x4
03d8 00d9 | | Load_Top At_Offset_1
03d9 e5ff | | Load 0x2,-0x1
03da 01d5 | | Execute Vector,Field_Reference
03db 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03dc 0f02 | | Execute_Immediate Equal,0x2
03dd 027f | | Execute Discrete,Equal
03de 680d |h | Jump_Zero 0x3ec
03df e402 | | Load 0x2,0x2 ; Debug Table 0x14.0x7 = 0x3df,0x5
03e0 0a01 | | Execute_Immediate Plus,0x1
03e1 c402 | | Store 0x2,0x2
03e2 e402 | | Load 0x2,0x2 ; Debug Table 0x14.0x8 = 0x3e2,0x6
03e3 e5fe | | Load 0x2,-0x2
03e4 027f | | Execute Discrete,Equal
03e5 6806 |h | Jump_Zero 0x3ec
03e6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0x9 = 0x3e6,0x7
03e7 a403 | | Store_Unchecked 0x2,0x3
03e8 4801 |H | Short_Literal 0x1 ; Debug Table 0x14.0xa = 0x3e8,0x8
03e9 a404 | | Store_Unchecked 0x2,0x4
03ea 00d2 | | Pop_Control Pop_Count_2 ; Debug Table 0x14.0xb = 0x3ea,0x9
03eb 7802 |x | Jump 0x3ee
03ec 00c8 | | Action Pop_Auxiliary_Range
03ed 3fe9 |? | Loop_Increasing 0x3d7
03ee 00ce | | Action Pop_Auxiliary
03ef 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0xc = 0x3ef,0xa
03f0 6804 |h | Jump_Zero 0x3f5
03f1 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x14.0xd = 0x3f1,0xb
03f2 e5ff | | Load 0x2,-0x1
03f3 01d5 | | Execute Vector,Field_Reference
03f4 4403 |D | Exit_Subprogram With_Result,0x3
03f5 e20d | | Load 0x1,0xd ; Debug Table 0x14.0xe = 0x3f5,0xc
03f6 0257 | W | Execute Discrete,Raise
03f7 0000 | | .XXX[0x1]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 0400 | | .CONST 0x0400 ; Address of begin
03f9 0004 | | .CONST 0x0004 ; Address of exception handler
03fa 0002 | | .CONST 0x0002 ; Number of locals
03fb INIT_03f8:
03fb 00da | | Load_Top At_Offset_2 ; Debug Table 0x15 = .DEBUG 0x03fb,0x0780,0x0002,0x0000,0x0058,0x75e5,0x0000,0x009a
; Debug Table 0x15.0x0 = 0x3fb,0xffff
03fc 00eb | | Load_Encached Diana_Cache
03fd 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
03fe 00eb | | Load_Encached Diana_Cache
03ff 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0400 BODY_03f8:
0400 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0x1 = 0x400,0x1
0401 0092 0456 | V| Action Push_String_Extended,0x456 ; "TRUE"
0403 01df | | Execute Vector,Equal
0404 680c |h | Jump_Zero 0x411
0405 e20e | | Load 0x1,0xe ; Debug Table 0x15.0x2 = 0x405,0x2
0406 0322 | " | Declare_Variable Record
0407 4800 |H | Short_Literal 0x0
0408 00d9 | | Load_Top At_Offset_1
0409 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
040a 4801 |H | Short_Literal 0x1
040b 00d9 | | Load_Top At_Offset_1
040c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
040d 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x15.0x3 = 0x40d,0x401
040e 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x15.0x4 = 0x40e,0x2
040f 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0410 4401 |D | Exit_Subprogram With_Result,0x1
0411 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0x5 = 0x411,0x3
0412 0092 0457 | W| Action Push_String_Extended,0x457 ; "FALSE"
0414 01df | | Execute Vector,Equal
0415 680c |h | Jump_Zero 0x422
0416 e20e | | Load 0x1,0xe ; Debug Table 0x15.0x6 = 0x416,0x4
0417 0322 | " | Declare_Variable Record
0418 4800 |H | Short_Literal 0x0
0419 00d9 | | Load_Top At_Offset_1
041a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
041b 4800 |H | Short_Literal 0x0
041c 00d9 | | Load_Top At_Offset_1
041d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
041e 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x15.0x7 = 0x41e,0x801
041f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x15.0x8 = 0x41f,0x4
0420 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0421 4401 |D | Exit_Subprogram With_Result,0x1
0422 e20d | | Load 0x1,0xd ; Debug Table 0x15.0x9 = 0x422,0x5
0423 0257 | W | Execute Discrete,Raise
0424 0000 0000 | | .BLANK 0000[0x4]
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 042c | , | .CONST 0x042c ; Address of begin
0429 0442 | B | .CONST 0x0442 ; Address of exception handler
042a 0002 | | .CONST 0x0002 ; Number of locals
042b INIT_0428:
042b 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x16 = .DEBUG 0x042b,0x0796,0x0004,0x0000,0x0058,0x75e5,0x0000,0x01cd
; Debug Table 0x16.0x0 = 0x42b,0xffff
042c BODY_0428:
042c e5ff | | Load 0x2,-0x1 ; Debug Table 0x16.0x1 = 0x42c,0x1
042d 00eb | | Load_Encached Diana_Cache
042e 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
042f 00eb | | Load_Encached Diana_Cache
0430 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
0431 00e2 | | Load_Encached Integer_Cache
0432 00e0 | | Load_Encached Standard_Cache
0433 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0434 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0435 e20e | | Load 0x1,0xe ; Debug Table 0x16.0x2 = 0x435,0x2
0436 0322 | " | Declare_Variable Record
0437 4801 |H | Short_Literal 0x1
0438 00d9 | | Load_Top At_Offset_1
0439 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
043a 00d9 | | Load_Top At_Offset_1
043b 00d9 | | Load_Top At_Offset_1
043c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
043d 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x16.0x3 = 0x43d,0x401
043e 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x16.0x4 = 0x43e,0x2
043f 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0440 00cb | | Action Pop_Block_With_Result
0441 4401 |D | Exit_Subprogram With_Result,0x1
0442 TRAP_0428:
0442 010e | | Execute Exception,Is_Constraint_Error
0443 6802 |h | Jump_Zero 0x446
0444 e20d | | Load 0x1,0xd ; Debug Table 0x16.0x5 = 0x444,0x3
0445 0257 | W | Execute Discrete,Raise
0446 0100 | | Execute Exception,Raise
0447 ; --------------------------------------------------------------------------------------
0447 ; STRING TABLE
0447 ; --------------------------------------------------------------------------------------
0447 0024 | $ | .STRTAB 0x0024->0x0459 ; "ENUMERATED"
0448 002c | , | .STRTAB 0x002c->0x045e ; "NUMERIC"
0449 0031 | 1 | .STRTAB 0x0031->0x0461 ; "TEXT"
044a 0033 | 3 | .STRTAB 0x0033->0x0463 ; "UNKNOWN"
044b 0038 | 8 | .STRTAB 0x0038->0x0467 ; "##UNDEFINED##;"
044c 0044 | D | .STRTAB 0x0044->0x046e ; "Get (1)"
044d 0049 | I | .STRTAB 0x0049->0x0471 ; "Get (2)"
044e 004e | N | .STRTAB 0x004e->0x0475 ; "Get_Call"
044f 0054 | T | .STRTAB 0x0054->0x0479 ; "*** Bad status from Directory."
0450 0070 | p | .STRTAB 0x0070->0x0488 ; "*** Exception in Command.Parameters."
0451 0092 | | .STRTAB 0x0092->0x049a ; ": "
0452 0092 | | .STRTAB 0x0092->0x049b ; "Parameter_Of"
0453 009c | | .STRTAB 0x009c->0x04a1 ; "Adjust_Argument"
0454 00a9 | | .STRTAB 0x00a9->0x04a8 ; "List_From_Normalized"
0455 00bb | | .STRTAB 0x00bb->0x04b2 ; "List_From_Call"
0456 00c7 | | .STRTAB 0x00c7->0x04b9 ; "TRUE"
0457 00c9 | | .STRTAB 0x00c9->0x04bb ; "FALSE"
0458 00cc | | .STREND 0x00cc->0x04be
0459 454e 554d |ENUM| .STRTAB_STRINGS
04be 0000 0000 | | .XXX[0x2]
04c0 ; --------------------------------------------------------------------------------------
04c0 ; Debug Table
04c0 ; --------------------------------------------------------------------------------------
04c0 0003 0017 | | .CONST 0x0003,0x0017
04c2 000b 057a | z| .DEBUG 0x000b,0x057a,0x0000,0x0000,0x0058,0x75b5,0x0000,0x0144
04ca 0048 05a6 | H | .DEBUG 0x0048,0x05a6,0x0000,0x0000,0x0058,0x75e5,0x0000,0x0010
04d2 0083 05da | | .DEBUG 0x0083,0x05da,0x0002,0x0000,0x0058,0x75b5,0x0000,0x0159
04da 008b 05de | | .DEBUG 0x008b,0x05de,0x0002,0x0000,0x0058,0x75b5,0x0000,0x015e
04e2 00c3 05fc | | .DEBUG 0x00c3,0x05fc,0x0002,0x0000,0x0058,0x75b5,0x0000,0x0167
04ea 00eb 0612 | | .DEBUG 0x00eb,0x0612,0x0002,0x0000,0x0058,0x75b5,0x0000,0x0172
04f2 012b 0634 | + 4| .DEBUG 0x012b,0x0634,0x0002,0x0000,0x0058,0x75b5,0x0000,0x017d
04fa 013b 063c | ; <| .DEBUG 0x013b,0x063c,0x0002,0x0000,0x0058,0x75b5,0x0000,0x0186
0502 014b 0644 | K D| .DEBUG 0x014b,0x0644,0x0002,0x0000,0x0058,0x75b5,0x0000,0x018f
050a 0163 064a | c J| .DEBUG 0x0163,0x064a,0x0002,0x0000,0x0058,0x75b5,0x0000,0x0198
0512 017b 0650 | { P| .DEBUG 0x017b,0x0650,0x0002,0x0000,0x0058,0x75b5,0x0000,0x01af
051a 019b 065e | ^| .DEBUG 0x019b,0x065e,0x0002,0x0000,0x0058,0x75b5,0x0000,0x01bc
0522 01bb 066c | l| .DEBUG 0x01bb,0x066c,0x0005,0x0000,0x0058,0x75b5,0x0000,0x01ca
052a 01d3 066e | n| .DEBUG 0x01d3,0x066e,0x0001,0x0000,0x0058,0x75e5,0x0000,0x0035
0532 01eb 0676 | v| .DEBUG 0x01eb,0x0676,0x0001,0x0000,0x0058,0x75e5,0x0000,0x0062
053a 0203 067e | ~| .DEBUG 0x0203,0x067e,0x0002,0x0000,0x0058,0x75e5,0x0000,0x0090
0542 02cb 06e0 | | .DEBUG 0x02cb,0x06e0,0x0002,0x0000,0x0058,0x75e5,0x0000,0x0286
054a 02db 06e8 | | .DEBUG 0x02db,0x06e8,0x0001,0x0000,0x0058,0x75e5,0x0000,0x02a4
0552 0313 06fa | | .DEBUG 0x0313,0x06fa,0x0002,0x0000,0x0058,0x75e5,0x0000,0x02fe
055a 035b 0722 | [ "| .DEBUG 0x035b,0x0722,0x0002,0x0000,0x0058,0x75e5,0x0000,0x036a
0562 03cb 0760 | `| .DEBUG 0x03cb,0x0760,0x0002,0x0000,0x0058,0x75e5,0x0000,0x03d6
056a 03fb 0780 | | .DEBUG 0x03fb,0x0780,0x0002,0x0000,0x0058,0x75e5,0x0000,0x009a
0572 042b 0796 | + | .DEBUG 0x042b,0x0796,0x0004,0x0000,0x0058,0x75e5,0x0000,0x01cd
057a ; --------------------------------------------------------------------------------------
057a ; Debug3 Subtable 0x0
057a ; --------------------------------------------------------------------------------------
057a 0014 0001 | | .DBG3TAB 0x0014,0x0001
057c 000b ffff | | .CONST 0x000b,0xffff
057e 000d fffe | | .CONST 0x000d,0xfffe
0580 000f fffd | | .CONST 0x000f,0xfffd
0582 0010 fffc | | .CONST 0x0010,0xfffc
0584 0016 fffb | | .CONST 0x0016,0xfffb
0586 0018 fffa | | .CONST 0x0018,0xfffa
0588 001a fff9 | | .CONST 0x001a,0xfff9
058a 001c fff8 | | .CONST 0x001c,0xfff8
058c 001e fff7 | | .CONST 0x001e,0xfff7
058e 0020 fff6 | | .CONST 0x0020,0xfff6
0590 0022 fff5 | " | .CONST 0x0022,0xfff5
0592 0024 fff4 | $ | .CONST 0x0024,0xfff4
0594 0026 fff3 | & | .CONST 0x0026,0xfff3
0596 0029 fff2 | ) | .CONST 0x0029,0xfff2
0598 0029 fff1 | ) | .CONST 0x0029,0xfff1
059a 002b fff0 | + | .CONST 0x002b,0xfff0
059c 002d ffef | - | .CONST 0x002d,0xffef
059e 0032 ffee | 2 | .CONST 0x0032,0xffee
05a0 003a ffed | : | .CONST 0x003a,0xffed
05a2 0042 0401 | B | .CONST 0x0042,0x0401
05a4 0043 ffed | C | .CONST 0x0043,0xffed
05a6 ; --------------------------------------------------------------------------------------
05a6 ; Debug3 Subtable 0x1
05a6 ; --------------------------------------------------------------------------------------
05a6 0018 0001 | | .DBG3TAB 0x0018,0x0001
05a8 0048 ffff | H | .CONST 0x0048,0xffff
05aa 0048 fffe | H | .CONST 0x0048,0xfffe
05ac 0052 fffd | R | .CONST 0x0052,0xfffd
05ae 0053 0801 | S | .CONST 0x0053,0x0801
05b0 0054 fffd | T | .CONST 0x0054,0xfffd
05b2 0055 fffc | U | .CONST 0x0055,0xfffc
05b4 0055 fffb | U | .CONST 0x0055,0xfffb
05b6 0055 fffa | U | .CONST 0x0055,0xfffa
05b8 0057 fff9 | W | .CONST 0x0057,0xfff9
05ba 0059 fff8 | Y | .CONST 0x0059,0xfff8
05bc 005b fff7 | [ | .CONST 0x005b,0xfff7
05be 005d fff6 | ] | .CONST 0x005d,0xfff6
05c0 005f fff5 | _ | .CONST 0x005f,0xfff5
05c2 0061 fff4 | a | .CONST 0x0061,0xfff4
05c4 0063 fff3 | c | .CONST 0x0063,0xfff3
05c6 0065 fff2 | e | .CONST 0x0065,0xfff2
05c8 0067 fff1 | g | .CONST 0x0067,0xfff1
05ca 0069 fff0 | i | .CONST 0x0069,0xfff0
05cc 006b ffef | k | .CONST 0x006b,0xffef
05ce 006d ffee | m | .CONST 0x006d,0xffee
05d0 006f ffed | o | .CONST 0x006f,0xffed
05d2 0071 ffec | q | .CONST 0x0071,0xffec
05d4 0073 ffeb | s | .CONST 0x0073,0xffeb
05d6 0075 ffea | u | .CONST 0x0075,0xffea
05d8 0077 ffe9 | w | .CONST 0x0077,0xffe9
05da ; --------------------------------------------------------------------------------------
05da ; Debug3 Subtable 0x2
05da ; --------------------------------------------------------------------------------------
05da 0000 0001 | | .DBG3TAB 0x0000,0x0001
05dc 0083 0001 | | .CONST 0x0083,0x0001
05de ; --------------------------------------------------------------------------------------
05de ; Debug3 Subtable 0x3
05de ; --------------------------------------------------------------------------------------
05de 0001 000d | | .DBG3TAB 0x0001,0x000d
05e0 008b ffff | | .CONST 0x008b,0xffff
05e2 008c 0001 | | .CONST 0x008c,0x0001
05e4 008e 0401 | | .CONST 0x008e,0x0401
05e6 0092 0001 | | .CONST 0x0092,0x0001
05e8 0093 0002 | | .CONST 0x0093,0x0002
05ea 0095 0003 | | .CONST 0x0095,0x0003
05ec 009b 0004 | | .CONST 0x009b,0x0004
05ee 009b 0801 | | .CONST 0x009b,0x0801
05f0 009d 0004 | | .CONST 0x009d,0x0004
05f2 009e 0005 | | .CONST 0x009e,0x0005
05f4 00a8 0006 | | .CONST 0x00a8,0x0006
05f6 00b2 0007 | | .CONST 0x00b2,0x0007
05f8 00b4 0008 | | .CONST 0x00b4,0x0008
05fa 00ba 0009 | | .CONST 0x00ba,0x0009
05fc ; --------------------------------------------------------------------------------------
05fc ; Debug3 Subtable 0x4
05fc ; --------------------------------------------------------------------------------------
05fc 0001 0009 | | .DBG3TAB 0x0001,0x0009
05fe 00c3 ffff | | .CONST 0x00c3,0xffff
0600 00c4 0001 | | .CONST 0x00c4,0x0001
0602 00c9 0002 | | .CONST 0x00c9,0x0002
0604 00c9 0401 | | .CONST 0x00c9,0x0401
0606 00cb 0002 | | .CONST 0x00cb,0x0002
0608 00cc 0003 | | .CONST 0x00cc,0x0003
060a 00d3 0004 | | .CONST 0x00d3,0x0004
060c 00db 0005 | | .CONST 0x00db,0x0005
060e 00dd 0006 | | .CONST 0x00dd,0x0006
0610 00e3 0007 | | .CONST 0x00e3,0x0007
0612 ; --------------------------------------------------------------------------------------
0612 ; Debug3 Subtable 0x5
0612 ; --------------------------------------------------------------------------------------
0612 0002 000e | | .DBG3TAB 0x0002,0x000e
0614 00eb ffff | | .CONST 0x00eb,0xffff
0616 00ec fffe | | .CONST 0x00ec,0xfffe
0618 00ed 0001 | | .CONST 0x00ed,0x0001
061a 00ef 0401 | | .CONST 0x00ef,0x0401
061c 00f3 0001 | | .CONST 0x00f3,0x0001
061e 00f4 0002 | | .CONST 0x00f4,0x0002
0620 00ff 0003 | | .CONST 0x00ff,0x0003
0622 0105 0004 | | .CONST 0x0105,0x0004
0624 0108 0005 | | .CONST 0x0108,0x0005
0626 010d 0006 | | .CONST 0x010d,0x0006
0628 010f 0007 | | .CONST 0x010f,0x0007
062a 0119 0008 | | .CONST 0x0119,0x0008
062c 011c 0009 | | .CONST 0x011c,0x0009
062e 0122 000a | " | .CONST 0x0122,0x000a
0630 0122 0801 | " | .CONST 0x0122,0x0801
0632 0123 000a | # | .CONST 0x0123,0x000a
0634 ; --------------------------------------------------------------------------------------
0634 ; Debug3 Subtable 0x6
0634 ; --------------------------------------------------------------------------------------
0634 0000 0003 | | .DBG3TAB 0x0000,0x0003
0636 012b 0001 | + | .CONST 0x012b,0x0001
0638 012f 0002 | / | .CONST 0x012f,0x0002
063a 0136 0003 | 6 | .CONST 0x0136,0x0003
063c ; --------------------------------------------------------------------------------------
063c ; Debug3 Subtable 0x7
063c ; --------------------------------------------------------------------------------------
063c 0000 0003 | | .DBG3TAB 0x0000,0x0003
063e 013b 0001 | ; | .CONST 0x013b,0x0001
0640 0142 0002 | B | .CONST 0x0142,0x0002
0642 0145 0003 | E | .CONST 0x0145,0x0003
0644 ; --------------------------------------------------------------------------------------
0644 ; Debug3 Subtable 0x8
0644 ; --------------------------------------------------------------------------------------
0644 0000 0002 | | .DBG3TAB 0x0000,0x0002
0646 014b 0001 | K | .CONST 0x014b,0x0001
0648 0156 0002 | V | .CONST 0x0156,0x0002
064a ; --------------------------------------------------------------------------------------
064a ; Debug3 Subtable 0x9
064a ; --------------------------------------------------------------------------------------
064a 0000 0002 | | .DBG3TAB 0x0000,0x0002
064c 0163 0001 | c | .CONST 0x0163,0x0001
064e 016e 0002 | n | .CONST 0x016e,0x0002
0650 ; --------------------------------------------------------------------------------------
0650 ; Debug3 Subtable 0xa
0650 ; --------------------------------------------------------------------------------------
0650 0001 0005 | | .DBG3TAB 0x0001,0x0005
0652 017b ffff | { | .CONST 0x017b,0xffff
0654 017d 0001 | } | .CONST 0x017d,0x0001
0656 0182 0002 | | .CONST 0x0182,0x0002
0658 0184 0003 | | .CONST 0x0184,0x0003
065a 018a 0004 | | .CONST 0x018a,0x0004
065c 0194 0005 | | .CONST 0x0194,0x0005
065e ; --------------------------------------------------------------------------------------
065e ; Debug3 Subtable 0xb
065e ; --------------------------------------------------------------------------------------
065e 0001 0005 | | .DBG3TAB 0x0001,0x0005
0660 019b ffff | | .CONST 0x019b,0xffff
0662 019d 0001 | | .CONST 0x019d,0x0001
0664 01a2 0002 | | .CONST 0x01a2,0x0002
0666 01a4 0003 | | .CONST 0x01a4,0x0003
0668 01aa 0004 | | .CONST 0x01aa,0x0004
066a 01b0 0005 | | .CONST 0x01b0,0x0005
066c ; --------------------------------------------------------------------------------------
066c ; Debug3 Subtable 0xc
066c ; --------------------------------------------------------------------------------------
066c 0000 0000 | | .DBG3TAB 0x0000,0x0000
066e ; --------------------------------------------------------------------------------------
066e ; Debug3 Subtable 0xd
066e ; --------------------------------------------------------------------------------------
066e 0000 0003 | | .DBG3TAB 0x0000,0x0003
0670 01d3 0001 | | .CONST 0x01d3,0x0001
0672 01d5 0002 | | .CONST 0x01d5,0x0002
0674 01e1 0003 | | .CONST 0x01e1,0x0003
0676 ; --------------------------------------------------------------------------------------
0676 ; Debug3 Subtable 0xe
0676 ; --------------------------------------------------------------------------------------
0676 0000 0003 | | .DBG3TAB 0x0000,0x0003
0678 01eb 0001 | | .CONST 0x01eb,0x0001
067a 01ed 0002 | | .CONST 0x01ed,0x0002
067c 01f8 0003 | | .CONST 0x01f8,0x0003
067e ; --------------------------------------------------------------------------------------
067e ; Debug3 Subtable 0xf
067e ; --------------------------------------------------------------------------------------
067e 0007 0029 | )| .DBG3TAB 0x0007,0x0029
0680 0203 ffff | | .CONST 0x0203,0xffff
0682 0207 0001 | | .CONST 0x0207,0x0001
0684 0207 0401 | | .CONST 0x0207,0x0401
0686 0208 0402 | | .CONST 0x0208,0x0402
0688 0209 0403 | | .CONST 0x0209,0x0403
068a 0209 0404 | | .CONST 0x0209,0x0404
068c 0209 0001 | | .CONST 0x0209,0x0001
068e 0219 000a | | .CONST 0x0219,0x000a
0690 021b 0002 | | .CONST 0x021b,0x0002
0692 0220 0003 | | .CONST 0x0220,0x0003
0694 0223 0004 | # | .CONST 0x0223,0x0004
0696 0224 f7ff | $ | .CONST 0x0224,0xf7ff
0698 0225 0801 | % | .CONST 0x0225,0x0801
069a 0229 0802 | ) | .CONST 0x0229,0x0802
069c 0229 0c01 | ) | .CONST 0x0229,0x0c01
069e 022a 0c02 | * | .CONST 0x022a,0x0c02
06a0 022b 0c03 | + | .CONST 0x022b,0x0c03
06a2 022b 0c04 | + | .CONST 0x022b,0x0c04
06a4 022b 0802 | + | .CONST 0x022b,0x0802
06a6 0231 0806 | 1 | .CONST 0x0231,0x0806
06a8 0233 0803 | 3 | .CONST 0x0233,0x0803
06aa 0239 0804 | 9 | .CONST 0x0239,0x0804
06ac 023a efff | : | .CONST 0x023a,0xefff
06ae 023f effe | ? | .CONST 0x023f,0xeffe
06b0 0244 1001 | D | .CONST 0x0244,0x1001
06b2 0251 1401 | Q | .CONST 0x0251,0x1401
06b4 0252 1001 | R | .CONST 0x0252,0x1001
06b6 0255 0805 | U | .CONST 0x0255,0x0805
06b8 0258 0005 | X | .CONST 0x0258,0x0005
06ba 025a 0006 | Z | .CONST 0x025a,0x0006
06bc 0266 0007 | f | .CONST 0x0266,0x0007
06be 0267 e7ff | g | .CONST 0x0267,0xe7ff
06c0 026c 1801 | l | .CONST 0x026c,0x1801
06c2 0279 1c01 | y | .CONST 0x0279,0x1c01
06c4 027a 1801 | z | .CONST 0x027a,0x1801
06c6 027d 0008 | } | .CONST 0x027d,0x0008
06c8 027e dfff | ~ | .CONST 0x027e,0xdfff
06ca 027f dffe | | .CONST 0x027f,0xdffe
06cc 0280 2001 | | .CONST 0x0280,0x2001
06ce 0287 2002 | | .CONST 0x0287,0x2002
06d0 0289 2003 | | .CONST 0x0289,0x2003
06d2 0291 2401 | $ | .CONST 0x0291,0x2401
06d4 0292 2003 | | .CONST 0x0292,0x2003
06d6 0295 2004 | | .CONST 0x0295,0x2004
06d8 0297 0009 | | .CONST 0x0297,0x0009
06da 02a2 000b | | .CONST 0x02a2,0x000b
06dc 02a7 000c | | .CONST 0x02a7,0x000c
06de 02a9 000d | | .CONST 0x02a9,0x000d
06e0 ; --------------------------------------------------------------------------------------
06e0 ; Debug3 Subtable 0x10
06e0 ; --------------------------------------------------------------------------------------
06e0 0000 0003 | | .DBG3TAB 0x0000,0x0003
06e2 02cb 0001 | | .CONST 0x02cb,0x0001
06e4 02ce 0002 | | .CONST 0x02ce,0x0002
06e6 02d0 0003 | | .CONST 0x02d0,0x0003
06e8 ; --------------------------------------------------------------------------------------
06e8 ; Debug3 Subtable 0x11
06e8 ; --------------------------------------------------------------------------------------
06e8 0000 0008 | | .DBG3TAB 0x0000,0x0008
06ea 02db 0001 | | .CONST 0x02db,0x0001
06ec 02de 0002 | | .CONST 0x02de,0x0002
06ee 02e2 0003 | | .CONST 0x02e2,0x0003
06f0 02e8 0004 | | .CONST 0x02e8,0x0004
06f2 02f3 0005 | | .CONST 0x02f3,0x0005
06f4 02fc 0006 | | .CONST 0x02fc,0x0006
06f6 0301 0007 | | .CONST 0x0301,0x0007
06f8 0303 0008 | | .CONST 0x0303,0x0008
06fa ; --------------------------------------------------------------------------------------
06fa ; Debug3 Subtable 0x12
06fa ; --------------------------------------------------------------------------------------
06fa 0002 0011 | | .DBG3TAB 0x0002,0x0011
06fc 0313 ffff | | .CONST 0x0313,0xffff
06fe 0318 fffe | | .CONST 0x0318,0xfffe
0700 0321 0001 | ! | .CONST 0x0321,0x0001
0702 0325 0002 | % | .CONST 0x0325,0x0002
0704 0326 0401 | & | .CONST 0x0326,0x0401
0706 032a 0801 | * | .CONST 0x032a,0x0801
0708 032b 0802 | + | .CONST 0x032b,0x0802
070a 032c 0803 | , | .CONST 0x032c,0x0803
070c 032c 0804 | , | .CONST 0x032c,0x0804
070e 032e 0401 | . | .CONST 0x032e,0x0401
0710 0333 0002 | 3 | .CONST 0x0333,0x0002
0712 0337 0003 | 7 | .CONST 0x0337,0x0003
0714 0337 0c01 | 7 | .CONST 0x0337,0x0c01
0716 033a 0003 | : | .CONST 0x033a,0x0003
0718 033e 0004 | > | .CONST 0x033e,0x0004
071a 0343 0005 | C | .CONST 0x0343,0x0005
071c 0348 0006 | H | .CONST 0x0348,0x0006
071e 034d 0007 | M | .CONST 0x034d,0x0007
0720 034f 0008 | O | .CONST 0x034f,0x0008
0722 ; --------------------------------------------------------------------------------------
0722 ; Debug3 Subtable 0x13
0722 ; --------------------------------------------------------------------------------------
0722 0002 001c | | .DBG3TAB 0x0002,0x001c
0724 035b ffff | [ | .CONST 0x035b,0xffff
0726 0360 fffe | ` | .CONST 0x0360,0xfffe
0728 0369 0001 | i | .CONST 0x0369,0x0001
072a 036d 0002 | m | .CONST 0x036d,0x0002
072c 036e 0401 | n | .CONST 0x036e,0x0401
072e 0370 0402 | p | .CONST 0x0370,0x0402
0730 0372 0403 | r | .CONST 0x0372,0x0403
0732 0376 0404 | v | .CONST 0x0376,0x0404
0734 037a 0405 | z | .CONST 0x037a,0x0405
0736 037b 0801 | { | .CONST 0x037b,0x0801
0738 037c 0802 | | | .CONST 0x037c,0x0802
073a 037d 0803 | } | .CONST 0x037d,0x0803
073c 037d 0804 | } | .CONST 0x037d,0x0804
073e 037f 0405 | | .CONST 0x037f,0x0405
0740 0388 0c01 | | .CONST 0x0388,0x0c01
0742 0389 0c02 | | .CONST 0x0389,0x0c02
0744 038a 0c03 | | .CONST 0x038a,0x0c03
0746 038a 0c04 | | .CONST 0x038a,0x0c04
0748 038c 0804 | | .CONST 0x038c,0x0804
074a 039a 0002 | | .CONST 0x039a,0x0002
074c 039e 0003 | | .CONST 0x039e,0x0003
074e 039e 1001 | | .CONST 0x039e,0x1001
0750 03a0 1002 | | .CONST 0x03a0,0x1002
0752 03a2 1003 | | .CONST 0x03a2,0x1003
0754 03a5 0003 | | .CONST 0x03a5,0x0003
0756 03a9 0004 | | .CONST 0x03a9,0x0004
0758 03ae 0005 | | .CONST 0x03ae,0x0005
075a 03b3 0006 | | .CONST 0x03b3,0x0006
075c 03b8 0007 | | .CONST 0x03b8,0x0007
075e 03ba 0008 | | .CONST 0x03ba,0x0008
0760 ; --------------------------------------------------------------------------------------
0760 ; Debug3 Subtable 0x14
0760 ; --------------------------------------------------------------------------------------
0760 0003 000c | | .DBG3TAB 0x0003,0x000c
0762 03cb ffff | | .CONST 0x03cb,0xffff
0764 03cc fffe | | .CONST 0x03cc,0xfffe
0766 03cd fffd | | .CONST 0x03cd,0xfffd
0768 03ce 0001 | | .CONST 0x03ce,0x0001
076a 03d0 0002 | | .CONST 0x03d0,0x0002
076c 03d3 0003 | | .CONST 0x03d3,0x0003
076e 03d7 0004 | | .CONST 0x03d7,0x0004
0770 03df 0005 | | .CONST 0x03df,0x0005
0772 03e2 0006 | | .CONST 0x03e2,0x0006
0774 03e6 0007 | | .CONST 0x03e6,0x0007
0776 03e8 0008 | | .CONST 0x03e8,0x0008
0778 03ea 0009 | | .CONST 0x03ea,0x0009
077a 03ef 000a | | .CONST 0x03ef,0x000a
077c 03f1 000b | | .CONST 0x03f1,0x000b
077e 03f5 000c | | .CONST 0x03f5,0x000c
0780 ; --------------------------------------------------------------------------------------
0780 ; Debug3 Subtable 0x15
0780 ; --------------------------------------------------------------------------------------
0780 0001 0009 | | .DBG3TAB 0x0001,0x0009
0782 03fb ffff | | .CONST 0x03fb,0xffff
0784 0400 0001 | | .CONST 0x0400,0x0001
0786 0405 0002 | | .CONST 0x0405,0x0002
0788 040d 0401 | | .CONST 0x040d,0x0401
078a 040e 0002 | | .CONST 0x040e,0x0002
078c 0411 0003 | | .CONST 0x0411,0x0003
078e 0416 0004 | | .CONST 0x0416,0x0004
0790 041e 0801 | | .CONST 0x041e,0x0801
0792 041f 0004 | | .CONST 0x041f,0x0004
0794 0422 0005 | " | .CONST 0x0422,0x0005
0796 ; --------------------------------------------------------------------------------------
0796 ; Debug3 Subtable 0x16
0796 ; --------------------------------------------------------------------------------------
0796 0001 0005 | | .DBG3TAB 0x0001,0x0005
0798 042b ffff | + | .CONST 0x042b,0xffff
079a 042c 0001 | , | .CONST 0x042c,0x0001
079c 0435 0002 | 5 | .CONST 0x0435,0x0002
079e 043d 0401 | = | .CONST 0x043d,0x0401
07a0 043e 0002 | > | .CONST 0x043e,0x0002
07a2 0444 0003 | D | .CONST 0x0444,0x0003
07a4 0000 0000 | | .BLANK 0000[0x5c]