|
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: 7168 (0x1c00) Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 09a0 | | .CONST 0x09a0 ; 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 0006 | | .CONST 0x0006 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 004c | L | .CONST 0x004c ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0020 | | .CONST 0x0020 ; Number of locals 000b INIT_0008: 000b 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x0a4a,0x8000,0x0000,0x0059,0x8bf5,0x0000,0x0007 ; Debug Table 0x0.0x0 = 0xb,0xffff 000d 029a 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe 000f 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xf,0xfffd 0011 029a 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x11,0xfffc 0013 029a 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x13,0xfffb 0015 029a 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x15,0xfffa 0017 029a 031b | | Declare_Subprogram INIT_0318,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x17,0xfff9 0019 029a 03ab | | Declare_Subprogram INIT_03a8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x19,0xfff8 001b 029a 043b | ;| Declare_Subprogram INIT_0438,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x1b,0xfff7 001d 029a 04d3 | | Declare_Subprogram INIT_04d0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x1d,0xfff6 001f 029a 0523 | #| Declare_Subprogram INIT_0520,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xa = 0x1f,0xfff5 0021 029a 0573 | s| Declare_Subprogram INIT_0570,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xb = 0x21,0xfff4 0023 00bf | | Action Accept_Activation 0024 e001 | | Load 0x0,0x1 ; Debug Table 0x1 = .DEBUG 0x0024,0x0a64,0x8000,0x0000,0x0059,0x8e55,0x0000,0x0019 ; Debug Table 0x1.0x0 = 0x24,0xffff ; Debug Table 0x1.0x1 = 0x24,0xfffe 0025 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0026 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x2 = 0x26,0xfffd 0027 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0028 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x3 = 0x28,0xfffc 0029 1b0d | | Execute Package,Field_Read,Field_Number 0xd 002a e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x4 = 0x2a,0xfffb 002b 1928 | ( | Execute Package,Field_Reference,Field_Number 0x28 002c 029d 05cb | | Declare_Subprogram INIT_05c8,For_Outer_Call ; Debug Table 0x1.0x5 = 0x2c,0xfffa ; Debug Table 0x1.0x6 = 0x2c,0xfff9 ; Debug Table 0x1.0x7 = 0x2c,0xfff8 ; Debug Table 0x1.0x8 = 0x2c,0xfff7 ; Debug Table 0x1.0x9 = 0x2c,0xfff6 002e 029d 05e3 | | Declare_Subprogram INIT_05e0,For_Outer_Call ; Debug Table 0x1.0xa = 0x2e,0xfff5 0030 029d 064b | K| Declare_Subprogram INIT_0648,For_Outer_Call ; Debug Table 0x1.0xb = 0x30,0xfff4 0032 029d 06b3 | | Declare_Subprogram INIT_06b0,For_Outer_Call ; Debug Table 0x1.0xc = 0x32,0xfff3 0034 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0xd = 0x34,0xfff2 0035 00c7 | | Action Elaborate_Subprogram 0036 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0xe = 0x36,0xfff1 0037 00c7 | | Action Elaborate_Subprogram 0038 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0xf = 0x38,0xfff0 0039 00c7 | | Action Elaborate_Subprogram 003a 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x10 = 0x3a,0xffef 003b 00c7 | | Action Elaborate_Subprogram 003c 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x11 = 0x3c,0xffee 003d 00c7 | | Action Elaborate_Subprogram 003e 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x12 = 0x3e,0xffed 003f 00c7 | | Action Elaborate_Subprogram 0040 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x13 = 0x40,0xffec 0041 00c7 | | Action Elaborate_Subprogram 0042 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x14 = 0x42,0xffeb 0043 00c7 | | Action Elaborate_Subprogram 0044 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x15 = 0x44,0xffea 0045 00c7 | | Action Elaborate_Subprogram 0046 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x16 = 0x46,0xffe9 0047 00c7 | | Action Elaborate_Subprogram 0048 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x17 = 0x48,0xffe8 0049 00c7 | | Action Elaborate_Subprogram 004a 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0x18 = 0x4a,0xffe7 004b 00c7 | | Action Elaborate_Subprogram 004c BODY_0008: 004c 0092 0974 | t| Action Push_String_Extended,0x974 ; "Too far to convert." ; Debug Table 0x1.0x19 = 0x4c,0x1 004e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x1a = 0x4e,0x401 004f e001 | | Load 0x0,0x1 0050 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0051 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0052 00d0 | | Action Swap_Control 0053 00d1 | | Pop_Control Pop_Count_1 0054 a219 | | Store_Unchecked 0x1,0x19 ; Debug Table 0x1.0x1b = 0x54,0x1 0055 0092 0975 | u| Action Push_String_Extended,0x975 ; "No current selection." ; Debug Table 0x1.0x1c = 0x55,0x2 0057 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x1d = 0x57,0x801 0058 e001 | | Load 0x0,0x1 0059 1b0d | | Execute Package,Field_Read,Field_Number 0xd 005a 03b6 | | Declare_Variable Access,By_Allocation,With_Value 005b 00d0 | | Action Swap_Control 005c 00d1 | | Pop_Control Pop_Count_1 005d a21a | | Store_Unchecked 0x1,0x1a ; Debug Table 0x1.0x1e = 0x5d,0x2 005e 0092 0976 | v| Action Push_String_Extended,0x976 ; "Current selection is not in this window." ; Debug Table 0x1.0x1f = 0x5e,0x3 0060 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x20 = 0x60,0xc01 0061 e001 | | Load 0x0,0x1 0062 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0063 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0064 00d0 | | Action Swap_Control 0065 00d1 | | Pop_Control Pop_Count_1 0066 a21b | | Store_Unchecked 0x1,0x1b ; Debug Table 0x1.0x21 = 0x66,0x3 0067 00bc | | Action Signal_Activated 0068 00bb | | Action Signal_Completion 0069 0000 0000 | | .BLANK 0000[0x7] 0070 ; -------------------------------------------------------------------------------------- 0070 ; SUBPROGRAM 0070 ; -------------------------------------------------------------------------------------- 0070 007b | { | .CONST 0x007b ; Address of begin 0071 00d5 | | .CONST 0x00d5 ; Address of exception handler 0072 0002 | | .CONST 0x0002 ; Number of locals 0073 INIT_0070: 0073 e002 | | Load 0x0,0x2 ; Debug Table 0x2 = .DEBUG 0x0073,0x0aaa,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x0008 ; Debug Table 0x2.0x0 = 0x73,0xffff 0074 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0075 0322 | " | Declare_Variable Record 0076 e5fe | | Load 0x2,-0x2 0077 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0078 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0079 00d9 | | Load_Top At_Offset_1 007a 017d | } | Execute Record,Structure_Write 007b BODY_0070: 007b 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x1 = 0x7b,0x1 007c 0c01 | | Execute_Immediate Greater_Equal,0x1 007d 6840 |h@ | Jump_Zero 0xbe 007e e5fe | | Load 0x2,-0x2 ; Debug Table 0x2.0x2 = 0x7e,0x2 007f 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0080 00d8 | | Load_Top At_Offset_0 0081 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0082 00d8 | | Load_Top At_Offset_0 0083 00d8 | | Load_Top At_Offset_0 0084 e5ff | | Load 0x2,-0x1 0085 0aff | | Execute_Immediate Plus,-0x1 0086 00e3 | | Load_Encached Natural_Cache 0087 025b | [ | Execute Discrete,Check_In_Type 0088 e003 | | Load 0x0,0x3 0089 1812 | | Execute Package,Field_Execute,Field_Number 0x12 008a 00d2 | | Pop_Control Pop_Count_2 008b 00d0 | | Action Swap_Control 008c 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 008d e5fe | | Load 0x2,-0x2 ; Debug Table 0x2.0x3 = 0x8d,0x3 008e 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 008f 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0090 e003 | | Load 0x0,0x3 0091 180d | | Execute Package,Field_Execute,Field_Number 0xd 0092 6817 |h | Jump_Zero 0xaa 0093 e5fe | | Load 0x2,-0x2 ; Debug Table 0x2.0x4 = 0x93,0x4 0094 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0095 00d8 | | Load_Top At_Offset_0 0096 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0097 00d8 | | Load_Top At_Offset_0 0098 e5fe | | Load 0x2,-0x2 0099 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 009a 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 009b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x5 = 0x9b,0x401 009c 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 009d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 009e 0a01 | | Execute_Immediate Plus,0x1 009f 00d9 | | Load_Top At_Offset_1 00a0 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 00a1 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00a2 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x6 = 0xa2,0x402 00a3 00d9 | | Load_Top At_Offset_1 00a4 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 00a5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00a6 00d2 | | Pop_Control Pop_Count_2 00a7 00d0 | | Action Swap_Control 00a8 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 00a9 780c |x | Jump 0xb6 00aa e5fe | | Load 0x2,-0x2 ; Debug Table 0x2.0x7 = 0xaa,0x5 00ab 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 00ac 00d8 | | Load_Top At_Offset_0 00ad 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 00ae 00d8 | | Load_Top At_Offset_0 00af 00d8 | | Load_Top At_Offset_0 00b0 4801 |H | Short_Literal 0x1 00b1 e002 | | Load 0x0,0x2 00b2 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 00b3 00d2 | | Pop_Control Pop_Count_2 00b4 00d0 | | Action Swap_Control 00b5 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 00b6 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x8 = 0xb6,0x6 00b7 e5fe | | Load 0x2,-0x2 00b8 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 00b9 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 00ba 00da | | Load_Top At_Offset_2 00bb e5fe | | Load 0x2,-0x2 00bc 821e | | Call 0x1,0x1e 00bd 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00be e5fe | | Load 0x2,-0x2 ; Debug Table 0x2.0x9 = 0xbe,0x7 00bf 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 00c0 00d8 | | Load_Top At_Offset_0 00c1 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 00c2 00d8 | | Load_Top At_Offset_0 00c3 00d8 | | Load_Top At_Offset_0 00c4 e5ff | | Load 0x2,-0x1 00c5 0275 | u | Execute Discrete,Unary_Minus 00c6 00e3 | | Load_Encached Natural_Cache 00c7 025b | [ | Execute Discrete,Check_In_Type 00c8 e003 | | Load 0x0,0x3 00c9 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00ca 00d2 | | Pop_Control Pop_Count_2 00cb 00d0 | | Action Swap_Control 00cc 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 00cd 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0xa = 0xcd,0x8 00ce 00d9 | | Load_Top At_Offset_1 00cf e5fe | | Load 0x2,-0x2 00d0 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 00d1 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 00d2 e5fe | | Load 0x2,-0x2 00d3 821e | | Call 0x1,0x1e 00d4 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00d5 TRAP_0070: 00d5 010e | | Execute Exception,Is_Constraint_Error 00d6 6811 |h | Jump_Zero 0xe8 00d7 e219 | | Load 0x1,0x19 ; Debug Table 0x2.0xb = 0xd7,0x9 00d8 e5fe | | Load 0x2,-0x2 ; Debug Table 0x2.0xc = 0xd8,0x801 00d9 00d9 | | Load_Top At_Offset_1 00da 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0xd = 0xda,0xc01 00db 0227 | ' | Execute Access,All_Reference 00dc 0335 | 5 | Declare_Variable Array,Duplicate 00dd 00d0 | | Action Swap_Control 00de 00d1 | | Pop_Control Pop_Count_1 00df 00d0 | | Action Swap_Control 00e0 00d1 | | Pop_Control Pop_Count_1 00e1 e004 | | Load 0x0,0x4 ; Debug Table 0x2.0xe = 0xe1,0x801 00e2 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00e3 00d1 | | Pop_Control Pop_Count_1 00e4 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0xf = 0xe4,0x802 00e5 e5fe | | Load 0x2,-0x2 00e6 380f |8 | Execute Record,Field_Write,Field_Number 0xf 00e7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00e8 0100 | | Execute Exception,Raise 00e9 0000 0000 | | .BLANK 0000[0x7] 00f0 ; -------------------------------------------------------------------------------------- 00f0 ; SUBPROGRAM 00f0 ; -------------------------------------------------------------------------------------- 00f0 00fb | | .CONST 0x00fb ; Address of begin 00f1 0155 | U | .CONST 0x0155 ; Address of exception handler 00f2 0002 | | .CONST 0x0002 ; Number of locals 00f3 INIT_00f0: 00f3 e002 | | Load 0x0,0x2 ; Debug Table 0x3 = .DEBUG 0x00f3,0x0acc,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x0017 ; Debug Table 0x3.0x0 = 0xf3,0xffff 00f4 1b14 | | Execute Package,Field_Read,Field_Number 0x14 00f5 0322 | " | Declare_Variable Record 00f6 e5fe | | Load 0x2,-0x2 00f7 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 00f8 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 00f9 00d9 | | Load_Top At_Offset_1 00fa 017d | } | Execute Record,Structure_Write 00fb BODY_00f0: 00fb 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x1 = 0xfb,0x1 00fc 0c01 | | Execute_Immediate Greater_Equal,0x1 00fd 6840 |h@ | Jump_Zero 0x13e 00fe e5fe | | Load 0x2,-0x2 ; Debug Table 0x3.0x2 = 0xfe,0x2 00ff 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0100 00d8 | | Load_Top At_Offset_0 0101 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0102 00d8 | | Load_Top At_Offset_0 0103 00d8 | | Load_Top At_Offset_0 0104 e5ff | | Load 0x2,-0x1 0105 0aff | | Execute_Immediate Plus,-0x1 0106 00e3 | | Load_Encached Natural_Cache 0107 025b | [ | Execute Discrete,Check_In_Type 0108 e003 | | Load 0x0,0x3 0109 1812 | | Execute Package,Field_Execute,Field_Number 0x12 010a 00d2 | | Pop_Control Pop_Count_2 010b 00d0 | | Action Swap_Control 010c 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 010d e5fe | | Load 0x2,-0x2 ; Debug Table 0x3.0x3 = 0x10d,0x3 010e 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 010f 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0110 e003 | | Load 0x0,0x3 0111 180d | | Execute Package,Field_Execute,Field_Number 0xd 0112 6817 |h | Jump_Zero 0x12a 0113 e5fe | | Load 0x2,-0x2 ; Debug Table 0x3.0x4 = 0x113,0x4 0114 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0115 00d8 | | Load_Top At_Offset_0 0116 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0117 00d8 | | Load_Top At_Offset_0 0118 e5fe | | Load 0x2,-0x2 0119 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 011a 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 011b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x5 = 0x11b,0x401 011c 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 011d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 011e 0a01 | | Execute_Immediate Plus,0x1 011f 00d9 | | Load_Top At_Offset_1 0120 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0121 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0122 4801 |H | Short_Literal 0x1 ; Debug Table 0x3.0x6 = 0x122,0x402 0123 00d9 | | Load_Top At_Offset_1 0124 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0125 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0126 00d2 | | Pop_Control Pop_Count_2 0127 00d0 | | Action Swap_Control 0128 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 0129 780c |x | Jump 0x136 012a e5fe | | Load 0x2,-0x2 ; Debug Table 0x3.0x7 = 0x12a,0x5 012b 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 012c 00d8 | | Load_Top At_Offset_0 012d 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 012e 00d8 | | Load_Top At_Offset_0 012f 00d8 | | Load_Top At_Offset_0 0130 4801 |H | Short_Literal 0x1 0131 e002 | | Load 0x0,0x2 0132 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0133 00d2 | | Pop_Control Pop_Count_2 0134 00d0 | | Action Swap_Control 0135 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 0136 4801 |H | Short_Literal 0x1 ; Debug Table 0x3.0x8 = 0x136,0x6 0137 e5fe | | Load 0x2,-0x2 0138 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0139 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 013a 00da | | Load_Top At_Offset_2 013b e5fe | | Load 0x2,-0x2 013c 821f | | Call 0x1,0x1f 013d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 013e e5fe | | Load 0x2,-0x2 ; Debug Table 0x3.0x9 = 0x13e,0x7 013f 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0140 00d8 | | Load_Top At_Offset_0 0141 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0142 00d8 | | Load_Top At_Offset_0 0143 00d8 | | Load_Top At_Offset_0 0144 e5ff | | Load 0x2,-0x1 0145 0275 | u | Execute Discrete,Unary_Minus 0146 00e3 | | Load_Encached Natural_Cache 0147 025b | [ | Execute Discrete,Check_In_Type 0148 e003 | | Load 0x0,0x3 0149 1813 | | Execute Package,Field_Execute,Field_Number 0x13 014a 00d2 | | Pop_Control Pop_Count_2 014b 00d0 | | Action Swap_Control 014c 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 014d 4801 |H | Short_Literal 0x1 ; Debug Table 0x3.0xa = 0x14d,0x8 014e 00d9 | | Load_Top At_Offset_1 014f e5fe | | Load 0x2,-0x2 0150 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0151 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0152 e5fe | | Load 0x2,-0x2 0153 821f | | Call 0x1,0x1f 0154 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0155 TRAP_00f0: 0155 010e | | Execute Exception,Is_Constraint_Error 0156 6811 |h | Jump_Zero 0x168 0157 e219 | | Load 0x1,0x19 ; Debug Table 0x3.0xb = 0x157,0x9 0158 e5fe | | Load 0x2,-0x2 ; Debug Table 0x3.0xc = 0x158,0x801 0159 00d9 | | Load_Top At_Offset_1 015a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0xd = 0x15a,0xc01 015b 0227 | ' | Execute Access,All_Reference 015c 0335 | 5 | Declare_Variable Array,Duplicate 015d 00d0 | | Action Swap_Control 015e 00d1 | | Pop_Control Pop_Count_1 015f 00d0 | | Action Swap_Control 0160 00d1 | | Pop_Control Pop_Count_1 0161 e004 | | Load 0x0,0x4 ; Debug Table 0x3.0xe = 0x161,0x801 0162 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0163 00d1 | | Pop_Control Pop_Count_1 0164 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0xf = 0x164,0x802 0165 e5fe | | Load 0x2,-0x2 0166 380f |8 | Execute Record,Field_Write,Field_Number 0xf 0167 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0168 0100 | | Execute Exception,Raise 0169 0000 0000 | | .BLANK 0000[0x7] 0170 ; -------------------------------------------------------------------------------------- 0170 ; SUBPROGRAM 0170 ; -------------------------------------------------------------------------------------- 0170 017b | { | .CONST 0x017b ; Address of begin 0171 01dd | | .CONST 0x01dd ; Address of exception handler 0172 0002 | | .CONST 0x0002 ; Number of locals 0173 INIT_0170: 0173 e002 | | Load 0x0,0x2 ; Debug Table 0x4 = .DEBUG 0x0173,0x0aee,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x0026 ; Debug Table 0x4.0x0 = 0x173,0xffff 0174 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0175 0322 | " | Declare_Variable Record 0176 e5fe | | Load 0x2,-0x2 0177 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0178 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0179 00d9 | | Load_Top At_Offset_1 017a 017d | } | Execute Record,Structure_Write 017b BODY_0170: 017b 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x1 = 0x17b,0x1 017c 0c01 | | Execute_Immediate Greater_Equal,0x1 017d 6844 |hD | Jump_Zero 0x1c2 017e e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0x2 = 0x17e,0x2 017f 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0180 00d8 | | Load_Top At_Offset_0 0181 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0182 00d8 | | Load_Top At_Offset_0 0183 00d8 | | Load_Top At_Offset_0 0184 e5ff | | Load 0x2,-0x1 0185 0aff | | Execute_Immediate Plus,-0x1 0186 00e3 | | Load_Encached Natural_Cache 0187 025b | [ | Execute Discrete,Check_In_Type 0188 e003 | | Load 0x0,0x3 0189 1812 | | Execute Package,Field_Execute,Field_Number 0x12 018a 00d2 | | Pop_Control Pop_Count_2 018b 00d0 | | Action Swap_Control 018c 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 018d e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0x3 = 0x18d,0x3 018e 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 018f 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0190 e003 | | Load 0x0,0x3 0191 180d | | Execute Package,Field_Execute,Field_Number 0xd 0192 6817 |h | Jump_Zero 0x1aa 0193 e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0x4 = 0x193,0x4 0194 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0195 00d8 | | Load_Top At_Offset_0 0196 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0197 00d8 | | Load_Top At_Offset_0 0198 e5fe | | Load 0x2,-0x2 0199 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 019a 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 019b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x5 = 0x19b,0x401 019c 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 019d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 019e 0a01 | | Execute_Immediate Plus,0x1 019f 00d9 | | Load_Top At_Offset_1 01a0 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 01a1 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01a2 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0x6 = 0x1a2,0x402 01a3 00d9 | | Load_Top At_Offset_1 01a4 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 01a5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 01a6 00d2 | | Pop_Control Pop_Count_2 01a7 00d0 | | Action Swap_Control 01a8 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 01a9 780c |x | Jump 0x1b6 01aa e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0x7 = 0x1aa,0x5 01ab 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 01ac 00d8 | | Load_Top At_Offset_0 01ad 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 01ae 00d8 | | Load_Top At_Offset_0 01af 00d8 | | Load_Top At_Offset_0 01b0 4801 |H | Short_Literal 0x1 01b1 e002 | | Load 0x0,0x2 01b2 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 01b3 00d2 | | Pop_Control Pop_Count_2 01b4 00d0 | | Action Swap_Control 01b5 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 01b6 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0x8 = 0x1b6,0x6 01b7 e5fe | | Load 0x2,-0x2 01b8 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 01b9 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 01ba 00da | | Load_Top At_Offset_2 01bb e5fe | | Load 0x2,-0x2 01bc 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 01bd e002 | | Load 0x0,0x2 01be 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 01bf e5fe | | Load 0x2,-0x2 01c0 8220 | | Call 0x1,0x20 01c1 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01c2 e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0x9 = 0x1c2,0x7 01c3 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 01c4 00d8 | | Load_Top At_Offset_0 01c5 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 01c6 00d8 | | Load_Top At_Offset_0 01c7 00d8 | | Load_Top At_Offset_0 01c8 e5ff | | Load 0x2,-0x1 01c9 0275 | u | Execute Discrete,Unary_Minus 01ca 00e3 | | Load_Encached Natural_Cache 01cb 025b | [ | Execute Discrete,Check_In_Type 01cc e003 | | Load 0x0,0x3 01cd 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01ce 00d2 | | Pop_Control Pop_Count_2 01cf 00d0 | | Action Swap_Control 01d0 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 01d1 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0xa = 0x1d1,0x8 01d2 00d9 | | Load_Top At_Offset_1 01d3 e5fe | | Load 0x2,-0x2 01d4 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 01d5 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 01d6 e5fe | | Load 0x2,-0x2 01d7 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 01d8 e002 | | Load 0x0,0x2 01d9 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 01da e5fe | | Load 0x2,-0x2 01db 8220 | | Call 0x1,0x20 01dc 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01dd TRAP_0170: 01dd 010e | | Execute Exception,Is_Constraint_Error 01de 6811 |h | Jump_Zero 0x1f0 01df e219 | | Load 0x1,0x19 ; Debug Table 0x4.0xb = 0x1df,0x9 01e0 e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0xc = 0x1e0,0x801 01e1 00d9 | | Load_Top At_Offset_1 01e2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0xd = 0x1e2,0xc01 01e3 0227 | ' | Execute Access,All_Reference 01e4 0335 | 5 | Declare_Variable Array,Duplicate 01e5 00d0 | | Action Swap_Control 01e6 00d1 | | Pop_Control Pop_Count_1 01e7 00d0 | | Action Swap_Control 01e8 00d1 | | Pop_Control Pop_Count_1 01e9 e004 | | Load 0x0,0x4 ; Debug Table 0x4.0xe = 0x1e9,0x801 01ea 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01eb 00d1 | | Pop_Control Pop_Count_1 01ec 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0xf = 0x1ec,0x802 01ed e5fe | | Load 0x2,-0x2 01ee 380f |8 | Execute Record,Field_Write,Field_Number 0xf 01ef 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01f0 0100 | | Execute Exception,Raise 01f1 0000 0000 | | .BLANK 0000[0x7] 01f8 ; -------------------------------------------------------------------------------------- 01f8 ; SUBPROGRAM 01f8 ; -------------------------------------------------------------------------------------- 01f8 0203 | | .CONST 0x0203 ; Address of begin 01f9 023d | = | .CONST 0x023d ; Address of exception handler 01fa 0002 | | .CONST 0x0002 ; Number of locals 01fb INIT_01f8: 01fb e002 | | Load 0x0,0x2 ; Debug Table 0x5 = .DEBUG 0x01fb,0x0b10,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x0035 ; Debug Table 0x5.0x0 = 0x1fb,0xffff 01fc 1b14 | | Execute Package,Field_Read,Field_Number 0x14 01fd 0322 | " | Declare_Variable Record 01fe e5fe | | Load 0x2,-0x2 01ff 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0200 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0201 00d9 | | Load_Top At_Offset_1 0202 017d | } | Execute Record,Structure_Write 0203 BODY_01f8: 0203 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x1 = 0x203,0x1 0204 0c01 | | Execute_Immediate Greater_Equal,0x1 0205 681b |h | Jump_Zero 0x221 0206 e5fe | | Load 0x2,-0x2 ; Debug Table 0x5.0x2 = 0x206,0x2 0207 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0208 00d8 | | Load_Top At_Offset_0 0209 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 020a 00d8 | | Load_Top At_Offset_0 020b 00d8 | | Load_Top At_Offset_0 020c 4801 |H | Short_Literal 0x1 020d e5ff | | Load 0x2,-0x1 020e 00e3 | | Load_Encached Natural_Cache 020f 025b | [ | Execute Discrete,Check_In_Type 0210 e5fe | | Load 0x2,-0x2 0211 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0212 e002 | | Load 0x0,0x2 0213 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 0214 e003 | | Load 0x0,0x3 0215 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0216 00d2 | | Pop_Control Pop_Count_2 0217 00d0 | | Action Swap_Control 0218 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 0219 4801 |H | Short_Literal 0x1 ; Debug Table 0x5.0x3 = 0x219,0x3 021a e5fe | | Load 0x2,-0x2 021b 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 021c 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 021d 00da | | Load_Top At_Offset_2 021e e5fe | | Load 0x2,-0x2 021f 821e | | Call 0x1,0x1e 0220 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0221 e5fe | | Load 0x2,-0x2 ; Debug Table 0x5.0x4 = 0x221,0x4 0222 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0223 00d8 | | Load_Top At_Offset_0 0224 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0225 00d8 | | Load_Top At_Offset_0 0226 00d8 | | Load_Top At_Offset_0 0227 4801 |H | Short_Literal 0x1 0228 e5ff | | Load 0x2,-0x1 0229 0275 | u | Execute Discrete,Unary_Minus 022a 00e3 | | Load_Encached Natural_Cache 022b 025b | [ | Execute Discrete,Check_In_Type 022c e5fe | | Load 0x2,-0x2 022d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 022e e002 | | Load 0x0,0x2 022f 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 0230 e003 | | Load 0x0,0x3 0231 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0232 00d2 | | Pop_Control Pop_Count_2 0233 00d0 | | Action Swap_Control 0234 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 0235 4801 |H | Short_Literal 0x1 ; Debug Table 0x5.0x5 = 0x235,0x5 0236 00d9 | | Load_Top At_Offset_1 0237 e5fe | | Load 0x2,-0x2 0238 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0239 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 023a e5fe | | Load 0x2,-0x2 023b 821e | | Call 0x1,0x1e 023c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 023d TRAP_01f8: 023d 010e | | Execute Exception,Is_Constraint_Error 023e 6811 |h | Jump_Zero 0x250 023f e219 | | Load 0x1,0x19 ; Debug Table 0x5.0x6 = 0x23f,0x6 0240 e5fe | | Load 0x2,-0x2 ; Debug Table 0x5.0x7 = 0x240,0x401 0241 00d9 | | Load_Top At_Offset_1 0242 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x8 = 0x242,0x801 0243 0227 | ' | Execute Access,All_Reference 0244 0335 | 5 | Declare_Variable Array,Duplicate 0245 00d0 | | Action Swap_Control 0246 00d1 | | Pop_Control Pop_Count_1 0247 00d0 | | Action Swap_Control 0248 00d1 | | Pop_Control Pop_Count_1 0249 e004 | | Load 0x0,0x4 ; Debug Table 0x5.0x9 = 0x249,0x401 024a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 024b 00d1 | | Pop_Control Pop_Count_1 024c 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0xa = 0x24c,0x402 024d e5fe | | Load 0x2,-0x2 024e 380f |8 | Execute Record,Field_Write,Field_Number 0xf 024f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0250 0100 | | Execute Exception,Raise 0251 0000 0000 | | .BLANK 0000[0x7] 0258 ; -------------------------------------------------------------------------------------- 0258 ; SUBPROGRAM 0258 ; -------------------------------------------------------------------------------------- 0258 0263 | c | .CONST 0x0263 ; Address of begin 0259 029d | | .CONST 0x029d ; Address of exception handler 025a 0002 | | .CONST 0x0002 ; Number of locals 025b INIT_0258: 025b e002 | | Load 0x0,0x2 ; Debug Table 0x6 = .DEBUG 0x025b,0x0b28,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x0044 ; Debug Table 0x6.0x0 = 0x25b,0xffff 025c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 025d 0322 | " | Declare_Variable Record 025e e5fe | | Load 0x2,-0x2 025f 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0260 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0261 00d9 | | Load_Top At_Offset_1 0262 017d | } | Execute Record,Structure_Write 0263 BODY_0258: 0263 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x1 = 0x263,0x1 0264 0c01 | | Execute_Immediate Greater_Equal,0x1 0265 681b |h | Jump_Zero 0x281 0266 e5fe | | Load 0x2,-0x2 ; Debug Table 0x6.0x2 = 0x266,0x2 0267 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0268 00d8 | | Load_Top At_Offset_0 0269 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 026a 00d8 | | Load_Top At_Offset_0 026b 00d8 | | Load_Top At_Offset_0 026c 4801 |H | Short_Literal 0x1 026d e5ff | | Load 0x2,-0x1 026e 00e3 | | Load_Encached Natural_Cache 026f 025b | [ | Execute Discrete,Check_In_Type 0270 e5fe | | Load 0x2,-0x2 0271 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0272 e002 | | Load 0x0,0x2 0273 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 0274 e003 | | Load 0x0,0x3 0275 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0276 00d2 | | Pop_Control Pop_Count_2 0277 00d0 | | Action Swap_Control 0278 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 0279 4801 |H | Short_Literal 0x1 ; Debug Table 0x6.0x3 = 0x279,0x3 027a e5fe | | Load 0x2,-0x2 027b 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 027c 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 027d 00da | | Load_Top At_Offset_2 027e e5fe | | Load 0x2,-0x2 027f 821f | | Call 0x1,0x1f 0280 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0281 e5fe | | Load 0x2,-0x2 ; Debug Table 0x6.0x4 = 0x281,0x4 0282 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0283 00d8 | | Load_Top At_Offset_0 0284 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0285 00d8 | | Load_Top At_Offset_0 0286 00d8 | | Load_Top At_Offset_0 0287 4801 |H | Short_Literal 0x1 0288 e5ff | | Load 0x2,-0x1 0289 0275 | u | Execute Discrete,Unary_Minus 028a 00e3 | | Load_Encached Natural_Cache 028b 025b | [ | Execute Discrete,Check_In_Type 028c e5fe | | Load 0x2,-0x2 028d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 028e e002 | | Load 0x0,0x2 028f 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 0290 e003 | | Load 0x0,0x3 0291 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0292 00d2 | | Pop_Control Pop_Count_2 0293 00d0 | | Action Swap_Control 0294 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 0295 4801 |H | Short_Literal 0x1 ; Debug Table 0x6.0x5 = 0x295,0x5 0296 00d9 | | Load_Top At_Offset_1 0297 e5fe | | Load 0x2,-0x2 0298 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0299 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 029a e5fe | | Load 0x2,-0x2 029b 821f | | Call 0x1,0x1f 029c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 029d TRAP_0258: 029d 010e | | Execute Exception,Is_Constraint_Error 029e 6811 |h | Jump_Zero 0x2b0 029f e219 | | Load 0x1,0x19 ; Debug Table 0x6.0x6 = 0x29f,0x6 02a0 e5fe | | Load 0x2,-0x2 ; Debug Table 0x6.0x7 = 0x2a0,0x401 02a1 00d9 | | Load_Top At_Offset_1 02a2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x8 = 0x2a2,0x801 02a3 0227 | ' | Execute Access,All_Reference 02a4 0335 | 5 | Declare_Variable Array,Duplicate 02a5 00d0 | | Action Swap_Control 02a6 00d1 | | Pop_Control Pop_Count_1 02a7 00d0 | | Action Swap_Control 02a8 00d1 | | Pop_Control Pop_Count_1 02a9 e004 | | Load 0x0,0x4 ; Debug Table 0x6.0x9 = 0x2a9,0x401 02aa 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02ab 00d1 | | Pop_Control Pop_Count_1 02ac 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0xa = 0x2ac,0x402 02ad e5fe | | Load 0x2,-0x2 02ae 380f |8 | Execute Record,Field_Write,Field_Number 0xf 02af 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02b0 0100 | | Execute Exception,Raise 02b1 0000 0000 | | .BLANK 0000[0x7] 02b8 ; -------------------------------------------------------------------------------------- 02b8 ; SUBPROGRAM 02b8 ; -------------------------------------------------------------------------------------- 02b8 02cc | | .CONST 0x02cc ; Address of begin 02b9 0302 | | .CONST 0x0302 ; Address of exception handler 02ba 0003 | | .CONST 0x0003 ; Number of locals 02bb INIT_02b8: 02bb e002 | | Load 0x0,0x2 ; Debug Table 0x7 = .DEBUG 0x02bb,0x0b40,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x0053 ; Debug Table 0x7.0x0 = 0x2bb,0xffff 02bc 1b14 | | Execute Package,Field_Read,Field_Number 0x14 02bd 0322 | " | Declare_Variable Record 02be e5fe | | Load 0x2,-0x2 02bf 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 02c0 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 02c1 00d9 | | Load_Top At_Offset_1 02c2 017d | } | Execute Record,Structure_Write 02c3 e005 | | Load 0x0,0x5 ; Debug Table 0x7.0x1 = 0x2c3,0xfffe 02c4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02c5 0337 | 7 | Declare_Variable Array 02c6 e5fe | | Load 0x2,-0x2 02c7 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 02c8 e002 | | Load 0x0,0x2 02c9 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 02ca 00d9 | | Load_Top At_Offset_1 02cb 01d4 | | Execute Vector,Structure_Write 02cc BODY_02b8: 02cc e5ff | | Load 0x2,-0x1 ; Debug Table 0x7.0x2 = 0x2cc,0x1 02cd 0c01 | | Execute_Immediate Greater_Equal,0x1 02ce 6819 |h | Jump_Zero 0x2e8 02cf e5fe | | Load 0x2,-0x2 ; Debug Table 0x7.0x3 = 0x2cf,0x2 02d0 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 02d1 00d8 | | Load_Top At_Offset_0 02d2 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 02d3 00d8 | | Load_Top At_Offset_0 02d4 00d8 | | Load_Top At_Offset_0 02d5 4801 |H | Short_Literal 0x1 02d6 e5ff | | Load 0x2,-0x1 02d7 00e3 | | Load_Encached Natural_Cache 02d8 025b | [ | Execute Discrete,Check_In_Type 02d9 e403 | | Load 0x2,0x3 02da e003 | | Load 0x0,0x3 02db 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 02dc 00d2 | | Pop_Control Pop_Count_2 02dd 00d0 | | Action Swap_Control 02de 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 02df 4801 |H | Short_Literal 0x1 ; Debug Table 0x7.0x4 = 0x2df,0x3 02e0 e5fe | | Load 0x2,-0x2 02e1 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 02e2 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 02e3 00db | | Load_Top At_Offset_3 02e4 00db | | Load_Top At_Offset_3 02e5 e5fe | | Load 0x2,-0x2 02e6 8220 | | Call 0x1,0x20 02e7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02e8 e5fe | | Load 0x2,-0x2 ; Debug Table 0x7.0x5 = 0x2e8,0x4 02e9 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 02ea 00d8 | | Load_Top At_Offset_0 02eb 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 02ec 00d8 | | Load_Top At_Offset_0 02ed 00d8 | | Load_Top At_Offset_0 02ee 4801 |H | Short_Literal 0x1 02ef e5ff | | Load 0x2,-0x1 02f0 0275 | u | Execute Discrete,Unary_Minus 02f1 00e3 | | Load_Encached Natural_Cache 02f2 025b | [ | Execute Discrete,Check_In_Type 02f3 e403 | | Load 0x2,0x3 02f4 e003 | | Load 0x0,0x3 02f5 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 02f6 00d2 | | Pop_Control Pop_Count_2 02f7 00d0 | | Action Swap_Control 02f8 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 02f9 4801 |H | Short_Literal 0x1 ; Debug Table 0x7.0x6 = 0x2f9,0x5 02fa 00da | | Load_Top At_Offset_2 02fb e5fe | | Load 0x2,-0x2 02fc 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 02fd 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 02fe 00db | | Load_Top At_Offset_3 02ff e5fe | | Load 0x2,-0x2 0300 8220 | | Call 0x1,0x20 0301 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0302 TRAP_02b8: 0302 010e | | Execute Exception,Is_Constraint_Error 0303 6811 |h | Jump_Zero 0x315 0304 e219 | | Load 0x1,0x19 ; Debug Table 0x7.0x7 = 0x304,0x6 0305 e5fe | | Load 0x2,-0x2 ; Debug Table 0x7.0x8 = 0x305,0x401 0306 00d9 | | Load_Top At_Offset_1 0307 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x9 = 0x307,0x801 0308 0227 | ' | Execute Access,All_Reference 0309 0335 | 5 | Declare_Variable Array,Duplicate 030a 00d0 | | Action Swap_Control 030b 00d1 | | Pop_Control Pop_Count_1 030c 00d0 | | Action Swap_Control 030d 00d1 | | Pop_Control Pop_Count_1 030e e004 | | Load 0x0,0x4 ; Debug Table 0x7.0xa = 0x30e,0x401 030f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0310 00d1 | | Pop_Control Pop_Count_1 0311 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0xb = 0x311,0x402 0312 e5fe | | Load 0x2,-0x2 0313 380f |8 | Execute Record,Field_Write,Field_Number 0xf 0314 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0315 0100 | | Execute Exception,Raise 0316 0000 0000 | | .XXX[0x2] 0318 ; -------------------------------------------------------------------------------------- 0318 ; SUBPROGRAM 0318 ; -------------------------------------------------------------------------------------- 0318 0323 | # | .CONST 0x0323 ; Address of begin 0319 038f | | .CONST 0x038f ; Address of exception handler 031a 0002 | | .CONST 0x0002 ; Number of locals 031b INIT_0318: 031b e002 | | Load 0x0,0x2 ; Debug Table 0x8 = .DEBUG 0x031b,0x0b5a,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x0062 ; Debug Table 0x8.0x0 = 0x31b,0xffff 031c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 031d 0322 | " | Declare_Variable Record 031e e5fe | | Load 0x2,-0x2 031f 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0320 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0321 00d9 | | Load_Top At_Offset_1 0322 017d | } | Execute Record,Structure_Write 0323 BODY_0318: 0323 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x1 = 0x323,0x1 0324 0c01 | | Execute_Immediate Greater_Equal,0x1 0325 683c |h< | Jump_Zero 0x362 0326 e5fe | | Load 0x2,-0x2 ; Debug Table 0x8.0x2 = 0x326,0x2 0327 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0328 00d8 | | Load_Top At_Offset_0 0329 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 032a 00d8 | | Load_Top At_Offset_0 032b 00d8 | | Load_Top At_Offset_0 032c e5ff | | Load 0x2,-0x1 032d 0aff | | Execute_Immediate Plus,-0x1 032e 0248 | H | Execute Discrete,Check_In_Integer 032f e002 | | Load 0x0,0x2 0330 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0331 00d2 | | Pop_Control Pop_Count_2 0332 00d0 | | Action Swap_Control 0333 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 0334 e5fe | | Load 0x2,-0x2 ; Debug Table 0x8.0x3 = 0x334,0x3 0335 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0336 00d8 | | Load_Top At_Offset_0 0337 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0338 00d8 | | Load_Top At_Offset_0 0339 00d8 | | Load_Top At_Offset_0 033a e5fe | | Load 0x2,-0x2 033b 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 033c 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 033d e002 | | Load 0x0,0x2 033e 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 033f e002 | | Load 0x0,0x2 0340 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0341 00d2 | | Pop_Control Pop_Count_2 0342 00d0 | | Action Swap_Control 0343 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 0344 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x4 = 0x344,0x4 0345 e5fe | | Load 0x2,-0x2 0346 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0347 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0348 00da | | Load_Top At_Offset_2 0349 e5fe | | Load 0x2,-0x2 034a 821e | | Call 0x1,0x1e 034b e5fe | | Load 0x2,-0x2 ; Debug Table 0x8.0x5 = 0x34b,0x5 034c 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 034d 00d8 | | Load_Top At_Offset_0 034e 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 034f 00d8 | | Load_Top At_Offset_0 0350 e5fe | | Load 0x2,-0x2 0351 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0352 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0353 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x6 = 0x353,0x401 0354 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0355 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0356 0a01 | | Execute_Immediate Plus,0x1 0357 00d9 | | Load_Top At_Offset_1 0358 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0359 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 035a 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x7 = 0x35a,0x402 035b 00d9 | | Load_Top At_Offset_1 035c 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 035d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 035e 00d2 | | Pop_Control Pop_Count_2 035f 00d0 | | Action Swap_Control 0360 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 0361 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0362 e5fe | | Load 0x2,-0x2 ; Debug Table 0x8.0x8 = 0x362,0x6 0363 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0364 00d8 | | Load_Top At_Offset_0 0365 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0366 00d8 | | Load_Top At_Offset_0 0367 00d8 | | Load_Top At_Offset_0 0368 e5ff | | Load 0x2,-0x1 0369 0275 | u | Execute Discrete,Unary_Minus 036a 0aff | | Execute_Immediate Plus,-0x1 036b 0248 | H | Execute Discrete,Check_In_Integer 036c e002 | | Load 0x0,0x2 036d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 036e 00d2 | | Pop_Control Pop_Count_2 036f 00d0 | | Action Swap_Control 0370 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 0371 e5fe | | Load 0x2,-0x2 ; Debug Table 0x8.0x9 = 0x371,0x7 0372 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0373 00d8 | | Load_Top At_Offset_0 0374 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0375 00d8 | | Load_Top At_Offset_0 0376 00d8 | | Load_Top At_Offset_0 0377 4801 |H | Short_Literal 0x1 0378 e002 | | Load 0x0,0x2 0379 181b | | Execute Package,Field_Execute,Field_Number 0x1b 037a 00d2 | | Pop_Control Pop_Count_2 037b 00d0 | | Action Swap_Control 037c 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 037d 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0xa = 0x37d,0x8 037e 00d9 | | Load_Top At_Offset_1 037f e5fe | | Load 0x2,-0x2 0380 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0381 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0382 e5fe | | Load 0x2,-0x2 0383 821e | | Call 0x1,0x1e 0384 e5fe | | Load 0x2,-0x2 ; Debug Table 0x8.0xb = 0x384,0x9 0385 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0386 00d8 | | Load_Top At_Offset_0 0387 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0388 00d8 | | Load_Top At_Offset_0 0389 00d8 | | Load_Top At_Offset_0 038a 821d | | Call 0x1,0x1d 038b 00d2 | | Pop_Control Pop_Count_2 038c 00d0 | | Action Swap_Control 038d 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 038e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 038f TRAP_0318: 038f 010e | | Execute Exception,Is_Constraint_Error 0390 6811 |h | Jump_Zero 0x3a2 0391 e219 | | Load 0x1,0x19 ; Debug Table 0x8.0xc = 0x391,0xa 0392 e5fe | | Load 0x2,-0x2 ; Debug Table 0x8.0xd = 0x392,0x801 0393 00d9 | | Load_Top At_Offset_1 0394 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0xe = 0x394,0xc01 0395 0227 | ' | Execute Access,All_Reference 0396 0335 | 5 | Declare_Variable Array,Duplicate 0397 00d0 | | Action Swap_Control 0398 00d1 | | Pop_Control Pop_Count_1 0399 00d0 | | Action Swap_Control 039a 00d1 | | Pop_Control Pop_Count_1 039b e004 | | Load 0x0,0x4 ; Debug Table 0x8.0xf = 0x39b,0x801 039c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 039d 00d1 | | Pop_Control Pop_Count_1 039e 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x10 = 0x39e,0x802 039f e5fe | | Load 0x2,-0x2 03a0 380f |8 | Execute Record,Field_Write,Field_Number 0xf 03a1 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03a2 0100 | | Execute Exception,Raise 03a3 0000 0000 | | .BLANK 0000[0x5] 03a8 ; -------------------------------------------------------------------------------------- 03a8 ; SUBPROGRAM 03a8 ; -------------------------------------------------------------------------------------- 03a8 03b3 | | .CONST 0x03b3 ; Address of begin 03a9 041f | | .CONST 0x041f ; Address of exception handler 03aa 0002 | | .CONST 0x0002 ; Number of locals 03ab INIT_03a8: 03ab e002 | | Load 0x0,0x2 ; Debug Table 0x9 = .DEBUG 0x03ab,0x0b7e,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x0071 ; Debug Table 0x9.0x0 = 0x3ab,0xffff 03ac 1b14 | | Execute Package,Field_Read,Field_Number 0x14 03ad 0322 | " | Declare_Variable Record 03ae e5fe | | Load 0x2,-0x2 03af 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 03b0 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 03b1 00d9 | | Load_Top At_Offset_1 03b2 017d | } | Execute Record,Structure_Write 03b3 BODY_03a8: 03b3 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x1 = 0x3b3,0x1 03b4 0c01 | | Execute_Immediate Greater_Equal,0x1 03b5 683c |h< | Jump_Zero 0x3f2 03b6 e5fe | | Load 0x2,-0x2 ; Debug Table 0x9.0x2 = 0x3b6,0x2 03b7 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 03b8 00d8 | | Load_Top At_Offset_0 03b9 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 03ba 00d8 | | Load_Top At_Offset_0 03bb 00d8 | | Load_Top At_Offset_0 03bc e5ff | | Load 0x2,-0x1 03bd 0aff | | Execute_Immediate Plus,-0x1 03be 0248 | H | Execute Discrete,Check_In_Integer 03bf e002 | | Load 0x0,0x2 03c0 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 03c1 00d2 | | Pop_Control Pop_Count_2 03c2 00d0 | | Action Swap_Control 03c3 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 03c4 e5fe | | Load 0x2,-0x2 ; Debug Table 0x9.0x3 = 0x3c4,0x3 03c5 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 03c6 00d8 | | Load_Top At_Offset_0 03c7 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 03c8 00d8 | | Load_Top At_Offset_0 03c9 00d8 | | Load_Top At_Offset_0 03ca e5fe | | Load 0x2,-0x2 03cb 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 03cc 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 03cd e002 | | Load 0x0,0x2 03ce 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 03cf e002 | | Load 0x0,0x2 03d0 181b | | Execute Package,Field_Execute,Field_Number 0x1b 03d1 00d2 | | Pop_Control Pop_Count_2 03d2 00d0 | | Action Swap_Control 03d3 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 03d4 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x4 = 0x3d4,0x4 03d5 e5fe | | Load 0x2,-0x2 03d6 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 03d7 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 03d8 00da | | Load_Top At_Offset_2 03d9 e5fe | | Load 0x2,-0x2 03da 821f | | Call 0x1,0x1f 03db e5fe | | Load 0x2,-0x2 ; Debug Table 0x9.0x5 = 0x3db,0x5 03dc 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 03dd 00d8 | | Load_Top At_Offset_0 03de 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 03df 00d8 | | Load_Top At_Offset_0 03e0 e5fe | | Load 0x2,-0x2 03e1 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 03e2 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 03e3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x6 = 0x3e3,0x401 03e4 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 03e5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03e6 0a01 | | Execute_Immediate Plus,0x1 03e7 00d9 | | Load_Top At_Offset_1 03e8 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 03e9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 03ea 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x7 = 0x3ea,0x402 03eb 00d9 | | Load_Top At_Offset_1 03ec 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 03ed 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 03ee 00d2 | | Pop_Control Pop_Count_2 03ef 00d0 | | Action Swap_Control 03f0 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 03f1 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03f2 e5fe | | Load 0x2,-0x2 ; Debug Table 0x9.0x8 = 0x3f2,0x6 03f3 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 03f4 00d8 | | Load_Top At_Offset_0 03f5 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 03f6 00d8 | | Load_Top At_Offset_0 03f7 00d8 | | Load_Top At_Offset_0 03f8 e5ff | | Load 0x2,-0x1 03f9 0275 | u | Execute Discrete,Unary_Minus 03fa 0aff | | Execute_Immediate Plus,-0x1 03fb 0248 | H | Execute Discrete,Check_In_Integer 03fc e002 | | Load 0x0,0x2 03fd 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 03fe 00d2 | | Pop_Control Pop_Count_2 03ff 00d0 | | Action Swap_Control 0400 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 0401 e5fe | | Load 0x2,-0x2 ; Debug Table 0x9.0x9 = 0x401,0x7 0402 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0403 00d8 | | Load_Top At_Offset_0 0404 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0405 00d8 | | Load_Top At_Offset_0 0406 00d8 | | Load_Top At_Offset_0 0407 4801 |H | Short_Literal 0x1 0408 e002 | | Load 0x0,0x2 0409 181b | | Execute Package,Field_Execute,Field_Number 0x1b 040a 00d2 | | Pop_Control Pop_Count_2 040b 00d0 | | Action Swap_Control 040c 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 040d 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0xa = 0x40d,0x8 040e 00d9 | | Load_Top At_Offset_1 040f e5fe | | Load 0x2,-0x2 0410 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0411 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0412 e5fe | | Load 0x2,-0x2 0413 821f | | Call 0x1,0x1f 0414 e5fe | | Load 0x2,-0x2 ; Debug Table 0x9.0xb = 0x414,0x9 0415 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0416 00d8 | | Load_Top At_Offset_0 0417 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0418 00d8 | | Load_Top At_Offset_0 0419 00d8 | | Load_Top At_Offset_0 041a 821d | | Call 0x1,0x1d 041b 00d2 | | Pop_Control Pop_Count_2 041c 00d0 | | Action Swap_Control 041d 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 041e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 041f TRAP_03a8: 041f 010e | | Execute Exception,Is_Constraint_Error 0420 6811 |h | Jump_Zero 0x432 0421 e219 | | Load 0x1,0x19 ; Debug Table 0x9.0xc = 0x421,0xa 0422 e5fe | | Load 0x2,-0x2 ; Debug Table 0x9.0xd = 0x422,0x801 0423 00d9 | | Load_Top At_Offset_1 0424 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0xe = 0x424,0xc01 0425 0227 | ' | Execute Access,All_Reference 0426 0335 | 5 | Declare_Variable Array,Duplicate 0427 00d0 | | Action Swap_Control 0428 00d1 | | Pop_Control Pop_Count_1 0429 00d0 | | Action Swap_Control 042a 00d1 | | Pop_Control Pop_Count_1 042b e004 | | Load 0x0,0x4 ; Debug Table 0x9.0xf = 0x42b,0x801 042c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 042d 00d1 | | Pop_Control Pop_Count_1 042e 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x10 = 0x42e,0x802 042f e5fe | | Load 0x2,-0x2 0430 380f |8 | Execute Record,Field_Write,Field_Number 0xf 0431 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0432 0100 | | Execute Exception,Raise 0433 0000 0000 | | .BLANK 0000[0x5] 0438 ; -------------------------------------------------------------------------------------- 0438 ; SUBPROGRAM 0438 ; -------------------------------------------------------------------------------------- 0438 044c | L | .CONST 0x044c ; Address of begin 0439 04ba | | .CONST 0x04ba ; Address of exception handler 043a 0003 | | .CONST 0x0003 ; Number of locals 043b INIT_0438: 043b e002 | | Load 0x0,0x2 ; Debug Table 0xa = .DEBUG 0x043b,0x0ba2,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x0080 ; Debug Table 0xa.0x0 = 0x43b,0xffff 043c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 043d 0322 | " | Declare_Variable Record 043e e5fe | | Load 0x2,-0x2 043f 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0440 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0441 00d9 | | Load_Top At_Offset_1 0442 017d | } | Execute Record,Structure_Write 0443 e005 | | Load 0x0,0x5 ; Debug Table 0xa.0x1 = 0x443,0xfffe 0444 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0445 0337 | 7 | Declare_Variable Array 0446 e5fe | | Load 0x2,-0x2 0447 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0448 e002 | | Load 0x0,0x2 0449 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 044a 00d9 | | Load_Top At_Offset_1 044b 01d4 | | Execute Vector,Structure_Write 044c BODY_0438: 044c e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0x2 = 0x44c,0x1 044d 0c01 | | Execute_Immediate Greater_Equal,0x1 044e 683d |h= | Jump_Zero 0x48c 044f e5fe | | Load 0x2,-0x2 ; Debug Table 0xa.0x3 = 0x44f,0x2 0450 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0451 00d8 | | Load_Top At_Offset_0 0452 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0453 00d8 | | Load_Top At_Offset_0 0454 00d8 | | Load_Top At_Offset_0 0455 e5ff | | Load 0x2,-0x1 0456 0aff | | Execute_Immediate Plus,-0x1 0457 0248 | H | Execute Discrete,Check_In_Integer 0458 e002 | | Load 0x0,0x2 0459 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 045a 00d2 | | Pop_Control Pop_Count_2 045b 00d0 | | Action Swap_Control 045c 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 045d e5fe | | Load 0x2,-0x2 ; Debug Table 0xa.0x4 = 0x45d,0x3 045e 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 045f 00d8 | | Load_Top At_Offset_0 0460 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0461 00d8 | | Load_Top At_Offset_0 0462 00d8 | | Load_Top At_Offset_0 0463 e5fe | | Load 0x2,-0x2 0464 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0465 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0466 e002 | | Load 0x0,0x2 0467 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 0468 e002 | | Load 0x0,0x2 0469 181b | | Execute Package,Field_Execute,Field_Number 0x1b 046a 00d2 | | Pop_Control Pop_Count_2 046b 00d0 | | Action Swap_Control 046c 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 046d 4801 |H | Short_Literal 0x1 ; Debug Table 0xa.0x5 = 0x46d,0x4 046e e5fe | | Load 0x2,-0x2 046f 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 0470 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 0471 00db | | Load_Top At_Offset_3 0472 00db | | Load_Top At_Offset_3 0473 e5fe | | Load 0x2,-0x2 0474 8220 | | Call 0x1,0x20 0475 e5fe | | Load 0x2,-0x2 ; Debug Table 0xa.0x6 = 0x475,0x5 0476 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0477 00d8 | | Load_Top At_Offset_0 0478 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0479 00d8 | | Load_Top At_Offset_0 047a e5fe | | Load 0x2,-0x2 047b 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 047c 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 047d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x7 = 0x47d,0x401 047e 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 047f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0480 0a01 | | Execute_Immediate Plus,0x1 0481 00d9 | | Load_Top At_Offset_1 0482 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0483 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0484 4801 |H | Short_Literal 0x1 ; Debug Table 0xa.0x8 = 0x484,0x402 0485 00d9 | | Load_Top At_Offset_1 0486 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0487 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0488 00d2 | | Pop_Control Pop_Count_2 0489 00d0 | | Action Swap_Control 048a 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 048b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 048c e5fe | | Load 0x2,-0x2 ; Debug Table 0xa.0x9 = 0x48c,0x6 048d 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 048e 00d8 | | Load_Top At_Offset_0 048f 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0490 00d8 | | Load_Top At_Offset_0 0491 00d8 | | Load_Top At_Offset_0 0492 e5ff | | Load 0x2,-0x1 0493 0275 | u | Execute Discrete,Unary_Minus 0494 0aff | | Execute_Immediate Plus,-0x1 0495 0248 | H | Execute Discrete,Check_In_Integer 0496 e002 | | Load 0x0,0x2 0497 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0498 00d2 | | Pop_Control Pop_Count_2 0499 00d0 | | Action Swap_Control 049a 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 049b e5fe | | Load 0x2,-0x2 ; Debug Table 0xa.0xa = 0x49b,0x7 049c 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 049d 00d8 | | Load_Top At_Offset_0 049e 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 049f 00d8 | | Load_Top At_Offset_0 04a0 00d8 | | Load_Top At_Offset_0 04a1 4801 |H | Short_Literal 0x1 04a2 e002 | | Load 0x0,0x2 04a3 181b | | Execute Package,Field_Execute,Field_Number 0x1b 04a4 00d2 | | Pop_Control Pop_Count_2 04a5 00d0 | | Action Swap_Control 04a6 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 04a7 4801 |H | Short_Literal 0x1 ; Debug Table 0xa.0xb = 0x4a7,0x8 04a8 00da | | Load_Top At_Offset_2 04a9 e5fe | | Load 0x2,-0x2 04aa 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 04ab 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 04ac 00db | | Load_Top At_Offset_3 04ad e5fe | | Load 0x2,-0x2 04ae 8220 | | Call 0x1,0x20 04af e5fe | | Load 0x2,-0x2 ; Debug Table 0xa.0xc = 0x4af,0x9 04b0 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 04b1 00d8 | | Load_Top At_Offset_0 04b2 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 04b3 00d8 | | Load_Top At_Offset_0 04b4 00d8 | | Load_Top At_Offset_0 04b5 821d | | Call 0x1,0x1d 04b6 00d2 | | Pop_Control Pop_Count_2 04b7 00d0 | | Action Swap_Control 04b8 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 04b9 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04ba TRAP_0438: 04ba 010e | | Execute Exception,Is_Constraint_Error 04bb 6811 |h | Jump_Zero 0x4cd 04bc e219 | | Load 0x1,0x19 ; Debug Table 0xa.0xd = 0x4bc,0xa 04bd e5fe | | Load 0x2,-0x2 ; Debug Table 0xa.0xe = 0x4bd,0x801 04be 00d9 | | Load_Top At_Offset_1 04bf 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0xf = 0x4bf,0xc01 04c0 0227 | ' | Execute Access,All_Reference 04c1 0335 | 5 | Declare_Variable Array,Duplicate 04c2 00d0 | | Action Swap_Control 04c3 00d1 | | Pop_Control Pop_Count_1 04c4 00d0 | | Action Swap_Control 04c5 00d1 | | Pop_Control Pop_Count_1 04c6 e004 | | Load 0x0,0x4 ; Debug Table 0xa.0x10 = 0x4c6,0x801 04c7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04c8 00d1 | | Pop_Control Pop_Count_1 04c9 4800 |H | Short_Literal 0x0 ; Debug Table 0xa.0x11 = 0x4c9,0x802 04ca e5fe | | Load 0x2,-0x2 04cb 380f |8 | Execute Record,Field_Write,Field_Number 0xf 04cc 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04cd 0100 | | Execute Exception,Raise 04ce 0000 0000 | | .XXX[0x2] 04d0 ; -------------------------------------------------------------------------------------- 04d0 ; SUBPROGRAM 04d0 ; -------------------------------------------------------------------------------------- 04d0 04de | | .CONST 0x04de ; Address of begin 04d1 0004 | | .CONST 0x0004 ; Address of exception handler 04d2 0004 | | .CONST 0x0004 ; Number of locals 04d3 INIT_04d0: 04d3 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xb = .DEBUG 0x04d3,0x0bc8,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x008f ; Debug Table 0xb.0x0 = 0x4d3,0xffff 04d4 e002 | | Load 0x0,0x2 ; Debug Table 0xb.0x1 = 0x4d4,0xfffe 04d5 1b14 | | Execute Package,Field_Read,Field_Number 0x14 04d6 0322 | " | Declare_Variable Record 04d7 00d8 | | Load_Top At_Offset_0 04d8 1c00 | | Execute_Immediate Run_Utility,0x0 04d9 e002 | | Load 0x0,0x2 ; Debug Table 0xb.0x2 = 0x4d9,0xfffd 04da 1b14 | | Execute Package,Field_Read,Field_Number 0x14 04db 0322 | " | Declare_Variable Record 04dc 00d8 | | Load_Top At_Offset_0 04dd 1c00 | | Execute_Immediate Run_Utility,0x0 04de BODY_04d0: 04de 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x3 = 0x4de,0x1 04df 00da | | Load_Top At_Offset_2 04e0 00e1 | | Load_Encached Boolean_Cache 04e1 e5ff | | Load 0x2,-0x1 04e2 e006 | | Load 0x0,0x6 04e3 181c | | Execute Package,Field_Execute,Field_Number 0x1c 04e4 c402 | | Store 0x2,0x2 04e5 00d2 | | Pop_Control Pop_Count_2 04e6 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x4 = 0x4e6,0x2 04e7 6825 |h% | Jump_Zero 0x50d 04e8 e5fe | | Load 0x2,-0x2 ; Debug Table 0xb.0x5 = 0x4e8,0x3 04e9 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 04ea 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 04eb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 04ec 00da | | Load_Top At_Offset_2 04ed 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 04ee 012e | . | Execute Any,Not_Equal 04ef 6812 |h | Jump_Zero 0x502 04f0 e21b | | Load 0x1,0x1b ; Debug Table 0xb.0x6 = 0x4f0,0x4 04f1 e5fe | | Load 0x2,-0x2 ; Debug Table 0xb.0x7 = 0x4f1,0x401 04f2 00d9 | | Load_Top At_Offset_1 04f3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x8 = 0x4f3,0x801 04f4 0227 | ' | Execute Access,All_Reference 04f5 0335 | 5 | Declare_Variable Array,Duplicate 04f6 00d0 | | Action Swap_Control 04f7 00d1 | | Pop_Control Pop_Count_1 04f8 00d0 | | Action Swap_Control 04f9 00d1 | | Pop_Control Pop_Count_1 04fa e004 | | Load 0x0,0x4 ; Debug Table 0xb.0x9 = 0x4fa,0x401 04fb 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04fc 00d1 | | Pop_Control Pop_Count_1 04fd 4800 |H | Short_Literal 0x0 ; Debug Table 0xb.0xa = 0x4fd,0x402 04fe e5fe | | Load 0x2,-0x2 04ff 380f |8 | Execute Record,Field_Write,Field_Number 0xf 0500 00d1 | | Pop_Control Pop_Count_1 0501 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0502 4800 |H | Short_Literal 0x0 ; Debug Table 0xb.0xb = 0x502,0x5 0503 00d9 | | Load_Top At_Offset_1 0504 00db | | Load_Top At_Offset_3 0505 e5fe | | Load 0x2,-0x2 0506 821e | | Call 0x1,0x1e 0507 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0xc = 0x507,0x6 0508 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0509 00da | | Load_Top At_Offset_2 050a e002 | | Load 0x0,0x2 050b 1855 | U | Execute Package,Field_Execute,Field_Number 0x55 050c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 050d e21a | | Load 0x1,0x1a ; Debug Table 0xb.0xd = 0x50d,0x7 050e e5fe | | Load 0x2,-0x2 ; Debug Table 0xb.0xe = 0x50e,0xc01 050f 00d9 | | Load_Top At_Offset_1 0510 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0xf = 0x510,0x1001 0511 0227 | ' | Execute Access,All_Reference 0512 0335 | 5 | Declare_Variable Array,Duplicate 0513 00d0 | | Action Swap_Control 0514 00d1 | | Pop_Control Pop_Count_1 0515 00d0 | | Action Swap_Control 0516 00d1 | | Pop_Control Pop_Count_1 0517 e004 | | Load 0x0,0x4 ; Debug Table 0xb.0x10 = 0x517,0xc01 0518 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0519 00d1 | | Pop_Control Pop_Count_1 051a 4800 |H | Short_Literal 0x0 ; Debug Table 0xb.0x11 = 0x51a,0xc02 051b e5fe | | Load 0x2,-0x2 051c 380f |8 | Execute Record,Field_Write,Field_Number 0xf 051d 00d1 | | Pop_Control Pop_Count_1 051e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 051f 0000 | | .XXX[0x1] 0520 ; -------------------------------------------------------------------------------------- 0520 ; SUBPROGRAM 0520 ; -------------------------------------------------------------------------------------- 0520 052e | . | .CONST 0x052e ; Address of begin 0521 0004 | | .CONST 0x0004 ; Address of exception handler 0522 0004 | | .CONST 0x0004 ; Number of locals 0523 INIT_0520: 0523 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xc = .DEBUG 0x0523,0x0bee,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x009f ; Debug Table 0xc.0x0 = 0x523,0xffff 0524 e002 | | Load 0x0,0x2 ; Debug Table 0xc.0x1 = 0x524,0xfffe 0525 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0526 0322 | " | Declare_Variable Record 0527 00d8 | | Load_Top At_Offset_0 0528 1c00 | | Execute_Immediate Run_Utility,0x0 0529 e002 | | Load 0x0,0x2 ; Debug Table 0xc.0x2 = 0x529,0xfffd 052a 1b14 | | Execute Package,Field_Read,Field_Number 0x14 052b 0322 | " | Declare_Variable Record 052c 00d8 | | Load_Top At_Offset_0 052d 1c00 | | Execute_Immediate Run_Utility,0x0 052e BODY_0520: 052e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x3 = 0x52e,0x1 052f 00da | | Load_Top At_Offset_2 0530 00e1 | | Load_Encached Boolean_Cache 0531 e5ff | | Load 0x2,-0x1 0532 e006 | | Load 0x0,0x6 0533 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0534 c402 | | Store 0x2,0x2 0535 00d2 | | Pop_Control Pop_Count_2 0536 00da | | Load_Top At_Offset_2 ; Debug Table 0xc.0x4 = 0x536,0x2 0537 6825 |h% | Jump_Zero 0x55d 0538 e5fe | | Load 0x2,-0x2 ; Debug Table 0xc.0x5 = 0x538,0x3 0539 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 053a 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 053b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 053c 00da | | Load_Top At_Offset_2 053d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 053e 012e | . | Execute Any,Not_Equal 053f 6812 |h | Jump_Zero 0x552 0540 e21b | | Load 0x1,0x1b ; Debug Table 0xc.0x6 = 0x540,0x4 0541 e5fe | | Load 0x2,-0x2 ; Debug Table 0xc.0x7 = 0x541,0x401 0542 00d9 | | Load_Top At_Offset_1 0543 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x8 = 0x543,0x801 0544 0227 | ' | Execute Access,All_Reference 0545 0335 | 5 | Declare_Variable Array,Duplicate 0546 00d0 | | Action Swap_Control 0547 00d1 | | Pop_Control Pop_Count_1 0548 00d0 | | Action Swap_Control 0549 00d1 | | Pop_Control Pop_Count_1 054a e004 | | Load 0x0,0x4 ; Debug Table 0xc.0x9 = 0x54a,0x401 054b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 054c 00d1 | | Pop_Control Pop_Count_1 054d 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0xa = 0x54d,0x402 054e e5fe | | Load 0x2,-0x2 054f 380f |8 | Execute Record,Field_Write,Field_Number 0xf 0550 00d1 | | Pop_Control Pop_Count_1 0551 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0552 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0xb = 0x552,0x5 0553 00d9 | | Load_Top At_Offset_1 0554 00db | | Load_Top At_Offset_3 0555 e5fe | | Load 0x2,-0x2 0556 821f | | Call 0x1,0x1f 0557 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0xc = 0x557,0x6 0558 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0559 00da | | Load_Top At_Offset_2 055a e002 | | Load 0x0,0x2 055b 1855 | U | Execute Package,Field_Execute,Field_Number 0x55 055c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 055d e21a | | Load 0x1,0x1a ; Debug Table 0xc.0xd = 0x55d,0x7 055e e5fe | | Load 0x2,-0x2 ; Debug Table 0xc.0xe = 0x55e,0xc01 055f 00d9 | | Load_Top At_Offset_1 0560 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0xf = 0x560,0x1001 0561 0227 | ' | Execute Access,All_Reference 0562 0335 | 5 | Declare_Variable Array,Duplicate 0563 00d0 | | Action Swap_Control 0564 00d1 | | Pop_Control Pop_Count_1 0565 00d0 | | Action Swap_Control 0566 00d1 | | Pop_Control Pop_Count_1 0567 e004 | | Load 0x0,0x4 ; Debug Table 0xc.0x10 = 0x567,0xc01 0568 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0569 00d1 | | Pop_Control Pop_Count_1 056a 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0x11 = 0x56a,0xc02 056b e5fe | | Load 0x2,-0x2 056c 380f |8 | Execute Record,Field_Write,Field_Number 0xf 056d 00d1 | | Pop_Control Pop_Count_1 056e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 056f 0000 | | .XXX[0x1] 0570 ; -------------------------------------------------------------------------------------- 0570 ; SUBPROGRAM 0570 ; -------------------------------------------------------------------------------------- 0570 057e | ~ | .CONST 0x057e ; Address of begin 0571 0004 | | .CONST 0x0004 ; Address of exception handler 0572 0004 | | .CONST 0x0004 ; Number of locals 0573 INIT_0570: 0573 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xd = .DEBUG 0x0573,0x0c14,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x00af ; Debug Table 0xd.0x0 = 0x573,0xffff 0574 e002 | | Load 0x0,0x2 ; Debug Table 0xd.0x1 = 0x574,0xfffe 0575 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0576 0322 | " | Declare_Variable Record 0577 00d8 | | Load_Top At_Offset_0 0578 1c00 | | Execute_Immediate Run_Utility,0x0 0579 e002 | | Load 0x0,0x2 ; Debug Table 0xd.0x2 = 0x579,0xfffd 057a 1b14 | | Execute Package,Field_Read,Field_Number 0x14 057b 0322 | " | Declare_Variable Record 057c 00d8 | | Load_Top At_Offset_0 057d 1c00 | | Execute_Immediate Run_Utility,0x0 057e BODY_0570: 057e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x3 = 0x57e,0x1 057f 00da | | Load_Top At_Offset_2 0580 00e1 | | Load_Encached Boolean_Cache 0581 e5ff | | Load 0x2,-0x1 0582 e006 | | Load 0x0,0x6 0583 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0584 c402 | | Store 0x2,0x2 0585 00d2 | | Pop_Control Pop_Count_2 0586 00da | | Load_Top At_Offset_2 ; Debug Table 0xd.0x4 = 0x586,0x2 0587 6829 |h) | Jump_Zero 0x5b1 0588 e5fe | | Load 0x2,-0x2 ; Debug Table 0xd.0x5 = 0x588,0x3 0589 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 058a 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 058b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 058c 00da | | Load_Top At_Offset_2 058d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 058e 012e | . | Execute Any,Not_Equal 058f 6812 |h | Jump_Zero 0x5a2 0590 e21b | | Load 0x1,0x1b ; Debug Table 0xd.0x6 = 0x590,0x4 0591 e5fe | | Load 0x2,-0x2 ; Debug Table 0xd.0x7 = 0x591,0x401 0592 00d9 | | Load_Top At_Offset_1 0593 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x8 = 0x593,0x801 0594 0227 | ' | Execute Access,All_Reference 0595 0335 | 5 | Declare_Variable Array,Duplicate 0596 00d0 | | Action Swap_Control 0597 00d1 | | Pop_Control Pop_Count_1 0598 00d0 | | Action Swap_Control 0599 00d1 | | Pop_Control Pop_Count_1 059a e004 | | Load 0x0,0x4 ; Debug Table 0xd.0x9 = 0x59a,0x401 059b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 059c 00d1 | | Pop_Control Pop_Count_1 059d 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0xa = 0x59d,0x402 059e e5fe | | Load 0x2,-0x2 059f 380f |8 | Execute Record,Field_Write,Field_Number 0xf 05a0 00d1 | | Pop_Control Pop_Count_1 05a1 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05a2 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0xb = 0x5a2,0x5 05a3 00d9 | | Load_Top At_Offset_1 05a4 00db | | Load_Top At_Offset_3 05a5 e5fe | | Load 0x2,-0x2 05a6 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 05a7 e002 | | Load 0x0,0x2 05a8 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 05a9 e5fe | | Load 0x2,-0x2 05aa 8220 | | Call 0x1,0x20 05ab 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0xc = 0x5ab,0x6 05ac 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 05ad 00da | | Load_Top At_Offset_2 05ae e002 | | Load 0x0,0x2 05af 1855 | U | Execute Package,Field_Execute,Field_Number 0x55 05b0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05b1 e21a | | Load 0x1,0x1a ; Debug Table 0xd.0xd = 0x5b1,0x7 05b2 e5fe | | Load 0x2,-0x2 ; Debug Table 0xd.0xe = 0x5b2,0xc01 05b3 00d9 | | Load_Top At_Offset_1 05b4 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0xf = 0x5b4,0x1001 05b5 0227 | ' | Execute Access,All_Reference 05b6 0335 | 5 | Declare_Variable Array,Duplicate 05b7 00d0 | | Action Swap_Control 05b8 00d1 | | Pop_Control Pop_Count_1 05b9 00d0 | | Action Swap_Control 05ba 00d1 | | Pop_Control Pop_Count_1 05bb e004 | | Load 0x0,0x4 ; Debug Table 0xd.0x10 = 0x5bb,0xc01 05bc 1813 | | Execute Package,Field_Execute,Field_Number 0x13 05bd 00d1 | | Pop_Control Pop_Count_1 05be 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0x11 = 0x5be,0xc02 05bf e5fe | | Load 0x2,-0x2 05c0 380f |8 | Execute Record,Field_Write,Field_Number 0xf 05c1 00d1 | | Pop_Control Pop_Count_1 05c2 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05c3 0000 0000 | | .BLANK 0000[0x5] 05c8 ; -------------------------------------------------------------------------------------- 05c8 ; SUBPROGRAM 05c8 ; -------------------------------------------------------------------------------------- 05c8 05cb | | .CONST 0x05cb ; Address of begin 05c9 05d7 | | .CONST 0x05d7 ; Address of exception handler 05ca 0001 | | .CONST 0x0001 ; Number of locals 05cb BODY_05c8: 05cb INIT_05c8: 05cb 00da | | Load_Top At_Offset_2 ; Debug Table 0xe = .DEBUG 0x05cb,0x0c3a,0x0001,0x0000,0x0059,0x8e55,0x0000,0x0083 ; Debug Table 0xe.0x0 = 0x5cb,0x1 05cc 4801 |H | Short_Literal 0x1 05cd e002 | | Load 0x0,0x2 05ce 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 05cf 00d1 | | Pop_Control Pop_Count_1 05d0 00da | | Load_Top At_Offset_2 ; Debug Table 0xe.0x1 = 0x5d0,0x2 05d1 00db | | Load_Top At_Offset_3 05d2 e002 | | Load 0x0,0x2 05d3 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 05d4 e002 | | Load 0x0,0x2 05d5 181b | | Execute Package,Field_Execute,Field_Number 0x1b 05d6 4501 |E | Exit_Suprogram New_Top_Offset 0x1 05d7 TRAP_05c8: 05d7 010e | | Execute Exception,Is_Constraint_Error 05d8 6801 |h | Jump_Zero 0x5da 05d9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0xe.0x2 = 0x5d9,0x3 05da 0100 | | Execute Exception,Raise 05db 0000 0000 | | .BLANK 0000[0x5] 05e0 ; -------------------------------------------------------------------------------------- 05e0 ; SUBPROGRAM 05e0 ; -------------------------------------------------------------------------------------- 05e0 060e | | .CONST 0x060e ; Address of begin 05e1 0004 | | .CONST 0x0004 ; Address of exception handler 05e2 000f | | .CONST 0x000f ; Number of locals 05e3 INIT_05e0: 05e3 e002 | | Load 0x0,0x2 ; Debug Table 0xf = .DEBUG 0x05e3,0x0c42,0x0001,0x0000,0x0059,0x8e55,0x0000,0x00a9 ; Debug Table 0xf.0x0 = 0x5e3,0xffff 05e4 1b14 | | Execute Package,Field_Read,Field_Number 0x14 05e5 0322 | " | Declare_Variable Record 05e6 e5fe | | Load 0x2,-0x2 05e7 00d9 | | Load_Top At_Offset_1 05e8 017d | } | Execute Record,Structure_Write 05e9 e002 | | Load 0x0,0x2 ; Debug Table 0xf.0x1 = 0x5e9,0xfffe 05ea 1b14 | | Execute Package,Field_Read,Field_Number 0x14 05eb 0322 | " | Declare_Variable Record 05ec 00d8 | | Load_Top At_Offset_0 05ed 1c00 | | Execute_Immediate Run_Utility,0x0 05ee 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xf.0x2 = 0x5ee,0xfffd 05ef 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xf.0x3 = 0x5ef,0xfffc 05f0 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xf.0x4 = 0x5f0,0xfffb 05f1 e402 | | Load 0x2,0x2 ; Debug Table 0xf.0x5 = 0x5f1,0xfffa 05f2 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 05f3 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 05f4 e402 | | Load 0x2,0x2 ; Debug Table 0xf.0x6 = 0x5f4,0xfff9 05f5 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 05f6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 05f7 e5fd | | Load 0x2,-0x3 ; Debug Table 0xf.0x7 = 0x5f7,0xfff8 05f8 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 05f9 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 05fa 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xf.0x8 = 0x5fa,0xfff7 05fb 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 05fc e002 | | Load 0x0,0x2 ; Debug Table 0xf.0x9 = 0x5fc,0xfff6 05fd 1b12 | | Execute Package,Field_Read,Field_Number 0x12 05fe 02c7 | | Declare_Variable Any 05ff 00d8 | | Load_Top At_Offset_0 0600 1c00 | | Execute_Immediate Run_Utility,0x0 0601 e007 | | Load 0x0,0x7 ; Debug Table 0xf.0xa = 0x601,0xfff5 0602 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0603 0322 | " | Declare_Variable Record 0604 e007 | | Load 0x0,0x7 ; Debug Table 0xf.0xb = 0x604,0xfff4 0605 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0606 0322 | " | Declare_Variable Record 0607 e002 | | Load 0x0,0x2 ; Debug Table 0xf.0xc = 0x607,0xfff3 0608 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0609 0322 | " | Declare_Variable Record 060a 00d8 | | Load_Top At_Offset_0 060b 1c00 | | Execute_Immediate Run_Utility,0x0 060c 029f 071b | | Declare_Subprogram INIT_0718,For_Call 060e BODY_05e0: 060e e5fc | | Load 0x2,-0x4 ; Debug Table 0xf.0xd = 0x60e,0x1 060f 6829 |h) | Jump_Zero 0x639 0610 00da | | Load_Top At_Offset_2 ; Debug Table 0xf.0xe = 0x610,0x2 0611 e40c | | Load 0x2,0xc 0612 e40b | | Load 0x2,0xb 0613 0120 | | Execute Any,Is_Value 0614 6803 |h | Jump_Zero 0x618 0615 e002 | | Load 0x0,0x2 0616 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0617 7801 |x | Jump 0x619 0618 e40b | | Load 0x2,0xb 0619 e5ff | | Load 0x2,-0x1 061a 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 061b e002 | | Load 0x0,0x2 061c 188a | | Execute Package,Field_Execute,Field_Number 0x8a 061d c40b | | Store 0x2,0xb 061e 00d2 | | Pop_Control Pop_Count_2 061f e40b | | Load 0x2,0xb ; Debug Table 0xf.0xf = 0x61f,0x3 0620 e002 | | Load 0x0,0x2 0621 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0622 012f | / | Execute Any,Equal 0623 7015 |p | Jump_Nonzero 0x639 0624 e40b | | Load 0x2,0xb 0625 e5fe | | Load 0x2,-0x2 0626 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0627 012f | / | Execute Any,Equal 0628 6810 |h | Jump_Zero 0x639 0629 e002 | | Load 0x0,0x2 ; Debug Table 0xf.0x10 = 0x629,0x4 062a 1b14 | | Execute Package,Field_Read,Field_Number 0x14 062b 0322 | " | Declare_Variable Record 062c e40b | | Load 0x2,0xb 062d e002 | | Load 0x0,0x2 062e 1b12 | | Execute Package,Field_Read,Field_Number 0x12 062f 0119 | | Execute Any,Check_In_Formal_Type 0630 00d9 | | Load_Top At_Offset_1 0631 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0632 e40c | | Load 0x2,0xc 0633 00d9 | | Load_Top At_Offset_1 0634 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0635 00da | | Load_Top At_Offset_2 0636 017d | } | Execute Record,Structure_Write 0637 4801 |H | Short_Literal 0x1 ; Debug Table 0xf.0x11 = 0x637,0x5 0638 a40a | | Store_Unchecked 0x2,0xa 0639 840f | | Call 0x2,0xf ; Debug Table 0xf.0x12 = 0x639,0x6 063a e40a | | Load 0x2,0xa ; Debug Table 0xf.0x13 = 0x63a,0x7 063b 6804 |h | Jump_Zero 0x640 063c 00da | | Load_Top At_Offset_2 ; Debug Table 0xf.0x14 = 0x63c,0x8 063d 00da | | Load_Top At_Offset_2 063e e002 | | Load 0x0,0x2 063f 1855 | U | Execute Package,Field_Execute,Field_Number 0x55 0640 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0641 0000 0000 | | .BLANK 0000[0x7] 0648 ; -------------------------------------------------------------------------------------- 0648 ; SUBPROGRAM 0648 ; -------------------------------------------------------------------------------------- 0648 0676 | v | .CONST 0x0676 ; Address of begin 0649 0004 | | .CONST 0x0004 ; Address of exception handler 064a 000f | | .CONST 0x000f ; Number of locals 064b INIT_0648: 064b e002 | | Load 0x0,0x2 ; Debug Table 0x10 = .DEBUG 0x064b,0x0c6e,0x0001,0x0000,0x0059,0x8e55,0x0000,0x0253 ; Debug Table 0x10.0x0 = 0x64b,0xffff 064c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 064d 0322 | " | Declare_Variable Record 064e e5fe | | Load 0x2,-0x2 064f 00d9 | | Load_Top At_Offset_1 0650 017d | } | Execute Record,Structure_Write 0651 e002 | | Load 0x0,0x2 ; Debug Table 0x10.0x1 = 0x651,0xfffe 0652 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0653 0322 | " | Declare_Variable Record 0654 00d8 | | Load_Top At_Offset_0 0655 1c00 | | Execute_Immediate Run_Utility,0x0 0656 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x10.0x2 = 0x656,0xfffd 0657 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x10.0x3 = 0x657,0xfffc 0658 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x10.0x4 = 0x658,0xfffb 0659 e402 | | Load 0x2,0x2 ; Debug Table 0x10.0x5 = 0x659,0xfffa 065a 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 065b 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 065c e402 | | Load 0x2,0x2 ; Debug Table 0x10.0x6 = 0x65c,0xfff9 065d 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 065e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 065f e5fd | | Load 0x2,-0x3 ; Debug Table 0x10.0x7 = 0x65f,0xfff8 0660 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0661 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0662 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x10.0x8 = 0x662,0xfff7 0663 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0664 e002 | | Load 0x0,0x2 ; Debug Table 0x10.0x9 = 0x664,0xfff6 0665 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0666 02c7 | | Declare_Variable Any 0667 00d8 | | Load_Top At_Offset_0 0668 1c00 | | Execute_Immediate Run_Utility,0x0 0669 e007 | | Load 0x0,0x7 ; Debug Table 0x10.0xa = 0x669,0xfff5 066a 1b13 | | Execute Package,Field_Read,Field_Number 0x13 066b 0322 | " | Declare_Variable Record 066c e007 | | Load 0x0,0x7 ; Debug Table 0x10.0xb = 0x66c,0xfff4 066d 1b13 | | Execute Package,Field_Read,Field_Number 0x13 066e 0322 | " | Declare_Variable Record 066f e002 | | Load 0x0,0x2 ; Debug Table 0x10.0xc = 0x66f,0xfff3 0670 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0671 0322 | " | Declare_Variable Record 0672 00d8 | | Load_Top At_Offset_0 0673 1c00 | | Execute_Immediate Run_Utility,0x0 0674 029f 07b3 | | Declare_Subprogram INIT_07b0,For_Call 0676 BODY_0648: 0676 e5fc | | Load 0x2,-0x4 ; Debug Table 0x10.0xd = 0x676,0x1 0677 6829 |h) | Jump_Zero 0x6a1 0678 00da | | Load_Top At_Offset_2 ; Debug Table 0x10.0xe = 0x678,0x2 0679 e40c | | Load 0x2,0xc 067a e40b | | Load 0x2,0xb 067b 0120 | | Execute Any,Is_Value 067c 6803 |h | Jump_Zero 0x680 067d e002 | | Load 0x0,0x2 067e 1b12 | | Execute Package,Field_Read,Field_Number 0x12 067f 7801 |x | Jump 0x681 0680 e40b | | Load 0x2,0xb 0681 e5ff | | Load 0x2,-0x1 0682 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0683 e002 | | Load 0x0,0x2 0684 188a | | Execute Package,Field_Execute,Field_Number 0x8a 0685 c40b | | Store 0x2,0xb 0686 00d2 | | Pop_Control Pop_Count_2 0687 e40b | | Load 0x2,0xb ; Debug Table 0x10.0xf = 0x687,0x3 0688 e002 | | Load 0x0,0x2 0689 1b13 | | Execute Package,Field_Read,Field_Number 0x13 068a 012f | / | Execute Any,Equal 068b 7015 |p | Jump_Nonzero 0x6a1 068c e40b | | Load 0x2,0xb 068d e5fe | | Load 0x2,-0x2 068e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 068f 012f | / | Execute Any,Equal 0690 6810 |h | Jump_Zero 0x6a1 0691 e002 | | Load 0x0,0x2 ; Debug Table 0x10.0x10 = 0x691,0x4 0692 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0693 0322 | " | Declare_Variable Record 0694 e40b | | Load 0x2,0xb 0695 e002 | | Load 0x0,0x2 0696 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0697 0119 | | Execute Any,Check_In_Formal_Type 0698 00d9 | | Load_Top At_Offset_1 0699 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 069a e40c | | Load 0x2,0xc 069b 00d9 | | Load_Top At_Offset_1 069c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 069d 00da | | Load_Top At_Offset_2 069e 017d | } | Execute Record,Structure_Write 069f 4801 |H | Short_Literal 0x1 ; Debug Table 0x10.0x11 = 0x69f,0x5 06a0 a40a | | Store_Unchecked 0x2,0xa 06a1 840f | | Call 0x2,0xf ; Debug Table 0x10.0x12 = 0x6a1,0x6 06a2 e40a | | Load 0x2,0xa ; Debug Table 0x10.0x13 = 0x6a2,0x7 06a3 6804 |h | Jump_Zero 0x6a8 06a4 00da | | Load_Top At_Offset_2 ; Debug Table 0x10.0x14 = 0x6a4,0x8 06a5 00da | | Load_Top At_Offset_2 06a6 e002 | | Load 0x0,0x2 06a7 1855 | U | Execute Package,Field_Execute,Field_Number 0x55 06a8 4505 |E | Exit_Suprogram New_Top_Offset 0x5 06a9 0000 0000 | | .BLANK 0000[0x7] 06b0 ; -------------------------------------------------------------------------------------- 06b0 ; SUBPROGRAM 06b0 ; -------------------------------------------------------------------------------------- 06b0 06df | | .CONST 0x06df ; Address of begin 06b1 0004 | | .CONST 0x0004 ; Address of exception handler 06b2 0010 | | .CONST 0x0010 ; Number of locals 06b3 INIT_06b0: 06b3 e002 | | Load 0x0,0x2 ; Debug Table 0x11 = .DEBUG 0x06b3,0x0c9a,0x0001,0x0000,0x0059,0x8e55,0x0000,0x03fd ; Debug Table 0x11.0x0 = 0x6b3,0xffff 06b4 1b14 | | Execute Package,Field_Read,Field_Number 0x14 06b5 0322 | " | Declare_Variable Record 06b6 e5fd | | Load 0x2,-0x3 06b7 00d9 | | Load_Top At_Offset_1 06b8 017d | } | Execute Record,Structure_Write 06b9 e002 | | Load 0x0,0x2 ; Debug Table 0x11.0x1 = 0x6b9,0xfffe 06ba 1b14 | | Execute Package,Field_Read,Field_Number 0x14 06bb 0322 | " | Declare_Variable Record 06bc 00d8 | | Load_Top At_Offset_0 06bd 1c00 | | Execute_Immediate Run_Utility,0x0 06be 00e8 | | Load_Encached Character_Cache ; Debug Table 0x11.0x2 = 0x6be,0xfffd 06bf 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x11.0x3 = 0x6bf,0xfffc 06c0 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x11.0x4 = 0x6c0,0xfffb 06c1 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x11.0x5 = 0x6c1,0xfffa 06c2 e402 | | Load 0x2,0x2 ; Debug Table 0x11.0x6 = 0x6c2,0xfff9 06c3 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 06c4 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 06c5 e402 | | Load 0x2,0x2 ; Debug Table 0x11.0x7 = 0x6c5,0xfff8 06c6 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 06c7 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 06c8 e5fc | | Load 0x2,-0x4 ; Debug Table 0x11.0x8 = 0x6c8,0xfff7 06c9 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 06ca 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 06cb 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x11.0x9 = 0x6cb,0xfff6 06cc 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 06cd e002 | | Load 0x0,0x2 ; Debug Table 0x11.0xa = 0x6cd,0xfff5 06ce 1b12 | | Execute Package,Field_Read,Field_Number 0x12 06cf 02c7 | | Declare_Variable Any 06d0 00d8 | | Load_Top At_Offset_0 06d1 1c00 | | Execute_Immediate Run_Utility,0x0 06d2 e007 | | Load 0x0,0x7 ; Debug Table 0x11.0xb = 0x6d2,0xfff4 06d3 1b13 | | Execute Package,Field_Read,Field_Number 0x13 06d4 0322 | " | Declare_Variable Record 06d5 e007 | | Load 0x0,0x7 ; Debug Table 0x11.0xc = 0x6d5,0xfff3 06d6 1b13 | | Execute Package,Field_Read,Field_Number 0x13 06d7 0322 | " | Declare_Variable Record 06d8 e002 | | Load 0x0,0x2 ; Debug Table 0x11.0xd = 0x6d8,0xfff2 06d9 1b14 | | Execute Package,Field_Read,Field_Number 0x14 06da 0322 | " | Declare_Variable Record 06db 00d8 | | Load_Top At_Offset_0 06dc 1c00 | | Execute_Immediate Run_Utility,0x0 06dd 029f 084b | K| Declare_Subprogram INIT_0848,For_Call 06df BODY_06b0: 06df e5fb | | Load 0x2,-0x5 ; Debug Table 0x11.0xe = 0x6df,0x1 06e0 6829 |h) | Jump_Zero 0x70a 06e1 00da | | Load_Top At_Offset_2 ; Debug Table 0x11.0xf = 0x6e1,0x2 06e2 e40d | | Load 0x2,0xd 06e3 e40c | | Load 0x2,0xc 06e4 0120 | | Execute Any,Is_Value 06e5 6803 |h | Jump_Zero 0x6e9 06e6 e002 | | Load 0x0,0x2 06e7 1b12 | | Execute Package,Field_Read,Field_Number 0x12 06e8 7801 |x | Jump 0x6ea 06e9 e40c | | Load 0x2,0xc 06ea e5ff | | Load 0x2,-0x1 06eb 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 06ec e002 | | Load 0x0,0x2 06ed 188a | | Execute Package,Field_Execute,Field_Number 0x8a 06ee c40c | | Store 0x2,0xc 06ef 00d2 | | Pop_Control Pop_Count_2 06f0 e40c | | Load 0x2,0xc ; Debug Table 0x11.0x10 = 0x6f0,0x3 06f1 e002 | | Load 0x0,0x2 06f2 1b13 | | Execute Package,Field_Read,Field_Number 0x13 06f3 012f | / | Execute Any,Equal 06f4 7015 |p | Jump_Nonzero 0x70a 06f5 e40c | | Load 0x2,0xc 06f6 e5fd | | Load 0x2,-0x3 06f7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 06f8 012f | / | Execute Any,Equal 06f9 6810 |h | Jump_Zero 0x70a 06fa e002 | | Load 0x0,0x2 ; Debug Table 0x11.0x11 = 0x6fa,0x4 06fb 1b14 | | Execute Package,Field_Read,Field_Number 0x14 06fc 0322 | " | Declare_Variable Record 06fd e40c | | Load 0x2,0xc 06fe e002 | | Load 0x0,0x2 06ff 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0700 0119 | | Execute Any,Check_In_Formal_Type 0701 00d9 | | Load_Top At_Offset_1 0702 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0703 e40d | | Load 0x2,0xd 0704 00d9 | | Load_Top At_Offset_1 0705 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0706 00da | | Load_Top At_Offset_2 0707 017d | } | Execute Record,Structure_Write 0708 4801 |H | Short_Literal 0x1 ; Debug Table 0x11.0x12 = 0x708,0x5 0709 a40b | | Store_Unchecked 0x2,0xb 070a 8410 | | Call 0x2,0x10 ; Debug Table 0x11.0x13 = 0x70a,0x6 070b e40b | | Load 0x2,0xb ; Debug Table 0x11.0x14 = 0x70b,0x7 070c 6804 |h | Jump_Zero 0x711 070d 00da | | Load_Top At_Offset_2 ; Debug Table 0x11.0x15 = 0x70d,0x8 070e 00da | | Load_Top At_Offset_2 070f e002 | | Load 0x0,0x2 0710 1855 | U | Execute Package,Field_Execute,Field_Number 0x55 0711 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0712 0000 0000 | | .BLANK 0000[0x6] 0718 ; -------------------------------------------------------------------------------------- 0718 ; SUBPROGRAM 0718 ; -------------------------------------------------------------------------------------- 0718 071b | | .CONST 0x071b ; Address of begin 0719 07a8 | | .CONST 0x07a8 ; Address of exception handler 071a 0001 | | .CONST 0x0001 ; Number of locals 071b BODY_0718: 071b INIT_0718: 071b 00cf | | Action Mark_Auxiliary ; Debug Table 0x12 = .DEBUG 0x071b,0x0cc8,0x0004,0x0000,0x0059,0x8e55,0x0000,0x0243 071c 7886 |x | Jump 0x7a3 071d e402 | | Load 0x2,0x2 ; Debug Table 0x12.0x0 = 0x71d,0x2 071e e002 | | Load 0x0,0x2 071f 184d | M | Execute Package,Field_Execute,Field_Number 0x4d 0720 a405 | | Store_Unchecked 0x2,0x5 0721 e408 | | Load 0x2,0x8 ; Debug Table 0x12.0x1 = 0x721,0x3 0722 e409 | | Load 0x2,0x9 0723 027f | | Execute Discrete,Equal 0724 6809 |h | Jump_Zero 0x72e 0725 e5fd | | Load 0x2,-0x3 ; Debug Table 0x12.0x2 = 0x725,0x4 0726 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0727 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0728 0aff | | Execute_Immediate Plus,-0x1 0729 0248 | H | Execute Discrete,Check_In_Integer 072a e405 | | Load 0x2,0x5 072b e008 | | Load 0x0,0x8 072c 180e | | Execute Package,Field_Execute,Field_Number 0xe 072d c405 | | Store 0x2,0x5 072e 4800 |H | Short_Literal 0x0 ; Debug Table 0x12.0x3 = 0x72e,0x5 072f a404 | | Store_Unchecked 0x2,0x4 0730 4800 |H | Short_Literal 0x0 ; Debug Table 0x12.0x4 = 0x730,0x6 0731 a406 | | Store_Unchecked 0x2,0x6 0732 e402 | | Load 0x2,0x2 ; Debug Table 0x12.0x5 = 0x732,0x7 0733 e403 | | Load 0x2,0x3 0734 017d | } | Execute Record,Structure_Write 0735 e405 | | Load 0x2,0x5 ; Debug Table 0x12.0x6 = 0x735,0x8 0736 0c01 | | Execute_Immediate Greater_Equal,0x1 0737 6865 |he | Jump_Zero 0x79d 0738 00cf | | Action Mark_Auxiliary ; Debug Table 0x12.0x7 = 0x738,0x9 0739 e405 | | Load 0x2,0x5 ; Debug Table 0x12.0x8 = 0x739,0xfbff 073a 00e4 | | Load_Encached Positive_Cache 073b 025b | [ | Execute Discrete,Check_In_Type 073c e407 | | Load 0x2,0x7 073d 00e4 | | Load_Encached Positive_Cache 073e 025b | [ | Execute Discrete,Check_In_Type 073f e403 | | Load 0x2,0x3 0740 e009 | | Load 0x0,0x9 0741 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0742 e407 | | Load 0x2,0x7 ; Debug Table 0x12.0x9 = 0x742,0xfbfe 0743 e407 | | Load 0x2,0x7 0744 00da | | Load_Top At_Offset_2 0745 01db | | Execute Vector,Length 0746 0273 | s | Execute Discrete,Plus 0747 0aff | | Execute_Immediate Plus,-0x1 0748 0248 | H | Execute Discrete,Check_In_Integer 0749 00e9 | | Load_Encached String_Cache 074a 035b | [ | Declare_Type Array,Constrained 074b 0337 | 7 | Declare_Variable Array 074c 00d9 | | Load_Top At_Offset_1 074d e00a | | Load 0x0,0xa 074e 1815 | | Execute Package,Field_Execute,Field_Number 0x15 074f 00d9 | | Load_Top At_Offset_1 0750 01d4 | | Execute Vector,Structure_Write 0751 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0xa = 0x751,0xfbfd 0752 01da | | Execute Vector,Bounds 0753 e002 | | Load 0x0,0x2 0754 1b4a | J | Execute Package,Field_Read,Field_Number 0x4a 0755 035b | [ | Declare_Type Array,Constrained 0756 0337 | 7 | Declare_Variable Array 0757 e405 | | Load 0x2,0x5 0758 e407 | | Load 0x2,0x7 0759 0272 | r | Execute Discrete,Minus 075a 0248 | H | Execute Discrete,Check_In_Integer 075b 0a01 | | Execute_Immediate Plus,0x1 075c 00e3 | | Load_Encached Natural_Cache 075d 025b | [ | Execute Discrete,Check_In_Type 075e e403 | | Load 0x2,0x3 075f e002 | | Load 0x0,0x2 0760 1850 | P | Execute Package,Field_Execute,Field_Number 0x50 0761 00d9 | | Load_Top At_Offset_1 0762 01d4 | | Execute Vector,Structure_Write 0763 00cf | | Action Mark_Auxiliary 0764 7820 |x | Jump 0x785 0765 e407 | | Load 0x2,0x7 ; Debug Table 0x12.0xb = 0x765,0x402 0766 00da | | Load_Top At_Offset_2 0767 01d5 | | Execute Vector,Field_Reference 0768 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0769 4602 |F | Jump_Case 0x3 076a 7814 |x | Jump 0x77f ; case 0x0 076b 7803 |x | Jump 0x76f ; case 0x1 076c 7800 |x | Jump 0x76d ; case 0x2 076d 6202 |b | Indirect_Literal Discrete,0x970,{0x00000000, 0x59898502} ; Debug Table 0x12.0xc = 0x76d,0x403 076e 0257 | W | Execute Discrete,Raise 076f e404 | | Load 0x2,0x4 ; Debug Table 0x12.0xd = 0x76f,0x404 0770 7006 |p | Jump_Nonzero 0x777 0771 e402 | | Load 0x2,0x2 ; Debug Table 0x12.0xe = 0x771,0x405 0772 e009 | | Load 0x0,0x9 0773 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0774 00d1 | | Pop_Control Pop_Count_1 0775 4801 |H | Short_Literal 0x1 ; Debug Table 0x12.0xf = 0x775,0x406 0776 a404 | | Store_Unchecked 0x2,0x4 0777 e002 | | Load 0x0,0x2 ; Debug Table 0x12.0x10 = 0x777,0x407 0778 1b4b | K | Execute Package,Field_Read,Field_Number 0x4b 0779 e407 | | Load 0x2,0x7 077a 00db | | Load_Top At_Offset_3 077b 01d6 | | Execute Vector,Field_Write 077c 4801 |H | Short_Literal 0x1 ; Debug Table 0x12.0x11 = 0x77c,0x408 077d a406 | | Store_Unchecked 0x2,0x6 077e 7802 |x | Jump 0x781 077f 4800 |H | Short_Literal 0x0 ; Debug Table 0x12.0x12 = 0x77f,0x409 0780 a404 | | Store_Unchecked 0x2,0x4 0781 e407 | | Load 0x2,0x7 ; Debug Table 0x12.0x13 = 0x781,0x40a 0782 0a01 | | Execute_Immediate Plus,0x1 0783 c407 | | Store 0x2,0x7 0784 00c9 | | Action Pop_Auxiliary_Loop 0785 e407 | | Load 0x2,0x7 ; Debug Table 0x12.0x14 = 0x785,0x401 0786 e405 | | Load 0x2,0x5 0787 027a | z | Execute Discrete,Less_Equal 0788 77dc |w | Jump_Nonzero 0x765 0789 00ce | | Action Pop_Auxiliary 078a e406 | | Load 0x2,0x6 ; Debug Table 0x12.0x15 = 0x78a,0x40b 078b 7004 |p | Jump_Nonzero 0x790 078c 00d9 | | Load_Top At_Offset_1 078d 00db | | Load_Top At_Offset_3 078e 01de | | Execute Vector,Not_Equal 078f 680b |h | Jump_Zero 0x79b 0790 e403 | | Load 0x2,0x3 ; Debug Table 0x12.0x16 = 0x790,0x40c 0791 e403 | | Load 0x2,0x3 0792 00da | | Load_Top At_Offset_2 0793 e605 | | Load 0x3,0x5 0794 e605 | | Load 0x3,0x5 0795 01db | | Execute Vector,Length 0796 00e3 | | Load_Encached Natural_Cache 0797 025b | [ | Execute Discrete,Check_In_Type 0798 e009 | | Load 0x0,0x9 0799 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 079a 00d2 | | Pop_Control Pop_Count_2 079b 00d3 | | Pop_Control Pop_Count_3 079c 00ce | | Action Pop_Auxiliary 079d e408 | | Load 0x2,0x8 ; Debug Table 0x12.0x17 = 0x79d,0xa 079e 0a01 | | Execute_Immediate Plus,0x1 079f c408 | | Store 0x2,0x8 07a0 4801 |H | Short_Literal 0x1 ; Debug Table 0x12.0x18 = 0x7a0,0xb 07a1 a407 | | Store_Unchecked 0x2,0x7 07a2 00c9 | | Action Pop_Auxiliary_Loop 07a3 e408 | | Load 0x2,0x8 ; Debug Table 0x12.0x19 = 0x7a3,0x1 07a4 e409 | | Load 0x2,0x9 07a5 027a | z | Execute Discrete,Less_Equal 07a6 7776 |wv | Jump_Nonzero 0x71d 07a7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 07a8 TRAP_0718: 07a8 0007 | | Action Break_Optional 07a9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x12.0x1a = 0x7a9,0xc 07aa 0000 0000 | | .BLANK 0000[0x6] 07b0 ; -------------------------------------------------------------------------------------- 07b0 ; SUBPROGRAM 07b0 ; -------------------------------------------------------------------------------------- 07b0 07b3 | | .CONST 0x07b3 ; Address of begin 07b1 0840 | @ | .CONST 0x0840 ; Address of exception handler 07b2 0001 | | .CONST 0x0001 ; Number of locals 07b3 BODY_07b0: 07b3 INIT_07b0: 07b3 00cf | | Action Mark_Auxiliary ; Debug Table 0x13 = .DEBUG 0x07b3,0x0d00,0x0004,0x0000,0x0059,0x8e55,0x0000,0x03ed 07b4 7886 |x | Jump 0x83b 07b5 e402 | | Load 0x2,0x2 ; Debug Table 0x13.0x0 = 0x7b5,0x2 07b6 e002 | | Load 0x0,0x2 07b7 184d | M | Execute Package,Field_Execute,Field_Number 0x4d 07b8 a405 | | Store_Unchecked 0x2,0x5 07b9 e408 | | Load 0x2,0x8 ; Debug Table 0x13.0x1 = 0x7b9,0x3 07ba e409 | | Load 0x2,0x9 07bb 027f | | Execute Discrete,Equal 07bc 6809 |h | Jump_Zero 0x7c6 07bd e5fd | | Load 0x2,-0x3 ; Debug Table 0x13.0x2 = 0x7bd,0x4 07be 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 07bf 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 07c0 0aff | | Execute_Immediate Plus,-0x1 07c1 0248 | H | Execute Discrete,Check_In_Integer 07c2 e405 | | Load 0x2,0x5 07c3 e008 | | Load 0x0,0x8 07c4 180e | | Execute Package,Field_Execute,Field_Number 0xe 07c5 c405 | | Store 0x2,0x5 07c6 4800 |H | Short_Literal 0x0 ; Debug Table 0x13.0x3 = 0x7c6,0x5 07c7 a404 | | Store_Unchecked 0x2,0x4 07c8 4800 |H | Short_Literal 0x0 ; Debug Table 0x13.0x4 = 0x7c8,0x6 07c9 a406 | | Store_Unchecked 0x2,0x6 07ca e402 | | Load 0x2,0x2 ; Debug Table 0x13.0x5 = 0x7ca,0x7 07cb e403 | | Load 0x2,0x3 07cc 017d | } | Execute Record,Structure_Write 07cd e405 | | Load 0x2,0x5 ; Debug Table 0x13.0x6 = 0x7cd,0x8 07ce 0c01 | | Execute_Immediate Greater_Equal,0x1 07cf 6865 |he | Jump_Zero 0x835 07d0 00cf | | Action Mark_Auxiliary ; Debug Table 0x13.0x7 = 0x7d0,0x9 07d1 e405 | | Load 0x2,0x5 ; Debug Table 0x13.0x8 = 0x7d1,0xfbff 07d2 00e4 | | Load_Encached Positive_Cache 07d3 025b | [ | Execute Discrete,Check_In_Type 07d4 e407 | | Load 0x2,0x7 07d5 00e4 | | Load_Encached Positive_Cache 07d6 025b | [ | Execute Discrete,Check_In_Type 07d7 e403 | | Load 0x2,0x3 07d8 e009 | | Load 0x0,0x9 07d9 1811 | | Execute Package,Field_Execute,Field_Number 0x11 07da e407 | | Load 0x2,0x7 ; Debug Table 0x13.0x9 = 0x7da,0xfbfe 07db e407 | | Load 0x2,0x7 07dc 00da | | Load_Top At_Offset_2 07dd 01db | | Execute Vector,Length 07de 0273 | s | Execute Discrete,Plus 07df 0aff | | Execute_Immediate Plus,-0x1 07e0 0248 | H | Execute Discrete,Check_In_Integer 07e1 00e9 | | Load_Encached String_Cache 07e2 035b | [ | Declare_Type Array,Constrained 07e3 0337 | 7 | Declare_Variable Array 07e4 00d9 | | Load_Top At_Offset_1 07e5 e00a | | Load 0x0,0xa 07e6 1814 | | Execute Package,Field_Execute,Field_Number 0x14 07e7 00d9 | | Load_Top At_Offset_1 07e8 01d4 | | Execute Vector,Structure_Write 07e9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0xa = 0x7e9,0xfbfd 07ea 01da | | Execute Vector,Bounds 07eb e002 | | Load 0x0,0x2 07ec 1b4a | J | Execute Package,Field_Read,Field_Number 0x4a 07ed 035b | [ | Declare_Type Array,Constrained 07ee 0337 | 7 | Declare_Variable Array 07ef e405 | | Load 0x2,0x5 07f0 e407 | | Load 0x2,0x7 07f1 0272 | r | Execute Discrete,Minus 07f2 0248 | H | Execute Discrete,Check_In_Integer 07f3 0a01 | | Execute_Immediate Plus,0x1 07f4 00e3 | | Load_Encached Natural_Cache 07f5 025b | [ | Execute Discrete,Check_In_Type 07f6 e403 | | Load 0x2,0x3 07f7 e002 | | Load 0x0,0x2 07f8 1850 | P | Execute Package,Field_Execute,Field_Number 0x50 07f9 00d9 | | Load_Top At_Offset_1 07fa 01d4 | | Execute Vector,Structure_Write 07fb 00cf | | Action Mark_Auxiliary 07fc 7820 |x | Jump 0x81d 07fd e407 | | Load 0x2,0x7 ; Debug Table 0x13.0xb = 0x7fd,0x402 07fe 00da | | Load_Top At_Offset_2 07ff 01d5 | | Execute Vector,Field_Reference 0800 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0801 4602 |F | Jump_Case 0x3 0802 7814 |x | Jump 0x817 ; case 0x0 0803 7803 |x | Jump 0x807 ; case 0x1 0804 7800 |x | Jump 0x805 ; case 0x2 0805 616a |aj | Indirect_Literal Discrete,0x970,{0x00000000, 0x59898502} ; Debug Table 0x13.0xc = 0x805,0x403 0806 0257 | W | Execute Discrete,Raise 0807 e404 | | Load 0x2,0x4 ; Debug Table 0x13.0xd = 0x807,0x404 0808 7006 |p | Jump_Nonzero 0x80f 0809 e402 | | Load 0x2,0x2 ; Debug Table 0x13.0xe = 0x809,0x405 080a e009 | | Load 0x0,0x9 080b 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 080c 00d1 | | Pop_Control Pop_Count_1 080d 4801 |H | Short_Literal 0x1 ; Debug Table 0x13.0xf = 0x80d,0x406 080e a404 | | Store_Unchecked 0x2,0x4 080f e002 | | Load 0x0,0x2 ; Debug Table 0x13.0x10 = 0x80f,0x407 0810 1b4b | K | Execute Package,Field_Read,Field_Number 0x4b 0811 e407 | | Load 0x2,0x7 0812 00db | | Load_Top At_Offset_3 0813 01d6 | | Execute Vector,Field_Write 0814 4801 |H | Short_Literal 0x1 ; Debug Table 0x13.0x11 = 0x814,0x408 0815 a406 | | Store_Unchecked 0x2,0x6 0816 7802 |x | Jump 0x819 0817 4800 |H | Short_Literal 0x0 ; Debug Table 0x13.0x12 = 0x817,0x409 0818 a404 | | Store_Unchecked 0x2,0x4 0819 e407 | | Load 0x2,0x7 ; Debug Table 0x13.0x13 = 0x819,0x40a 081a 0a01 | | Execute_Immediate Plus,0x1 081b c407 | | Store 0x2,0x7 081c 00c9 | | Action Pop_Auxiliary_Loop 081d e407 | | Load 0x2,0x7 ; Debug Table 0x13.0x14 = 0x81d,0x401 081e e405 | | Load 0x2,0x5 081f 027a | z | Execute Discrete,Less_Equal 0820 77dc |w | Jump_Nonzero 0x7fd 0821 00ce | | Action Pop_Auxiliary 0822 e406 | | Load 0x2,0x6 ; Debug Table 0x13.0x15 = 0x822,0x40b 0823 7004 |p | Jump_Nonzero 0x828 0824 00d9 | | Load_Top At_Offset_1 0825 00db | | Load_Top At_Offset_3 0826 01de | | Execute Vector,Not_Equal 0827 680b |h | Jump_Zero 0x833 0828 e403 | | Load 0x2,0x3 ; Debug Table 0x13.0x16 = 0x828,0x40c 0829 e403 | | Load 0x2,0x3 082a 00da | | Load_Top At_Offset_2 082b e605 | | Load 0x3,0x5 082c e605 | | Load 0x3,0x5 082d 01db | | Execute Vector,Length 082e 00e3 | | Load_Encached Natural_Cache 082f 025b | [ | Execute Discrete,Check_In_Type 0830 e009 | | Load 0x0,0x9 0831 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0832 00d2 | | Pop_Control Pop_Count_2 0833 00d3 | | Pop_Control Pop_Count_3 0834 00ce | | Action Pop_Auxiliary 0835 e408 | | Load 0x2,0x8 ; Debug Table 0x13.0x17 = 0x835,0xa 0836 0a01 | | Execute_Immediate Plus,0x1 0837 c408 | | Store 0x2,0x8 0838 4801 |H | Short_Literal 0x1 ; Debug Table 0x13.0x18 = 0x838,0xb 0839 a407 | | Store_Unchecked 0x2,0x7 083a 00c9 | | Action Pop_Auxiliary_Loop 083b e408 | | Load 0x2,0x8 ; Debug Table 0x13.0x19 = 0x83b,0x1 083c e409 | | Load 0x2,0x9 083d 027a | z | Execute Discrete,Less_Equal 083e 7776 |wv | Jump_Nonzero 0x7b5 083f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0840 TRAP_07b0: 0840 0007 | | Action Break_Optional 0841 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x13.0x1a = 0x841,0xc 0842 0000 0000 | | .BLANK 0000[0x6] 0848 ; -------------------------------------------------------------------------------------- 0848 ; SUBPROGRAM 0848 ; -------------------------------------------------------------------------------------- 0848 084b | K | .CONST 0x084b ; Address of begin 0849 096d | m | .CONST 0x096d ; Address of exception handler 084a 0001 | | .CONST 0x0001 ; Number of locals 084b BODY_0848: 084b INIT_0848: 084b 00cf | | Action Mark_Auxiliary ; Debug Table 0x14 = .DEBUG 0x084b,0x0d38,0x0004,0x0000,0x0059,0x8e55,0x0000,0x06cc 084c 791b |y | Jump 0x968 084d e402 | | Load 0x2,0x2 ; Debug Table 0x14.0x0 = 0x84d,0x2 084e e002 | | Load 0x0,0x2 084f 184d | M | Execute Package,Field_Execute,Field_Number 0x4d 0850 a407 | | Store_Unchecked 0x2,0x7 0851 e409 | | Load 0x2,0x9 ; Debug Table 0x14.0x1 = 0x851,0x3 0852 e40a | | Load 0x2,0xa 0853 027f | | Execute Discrete,Equal 0854 6809 |h | Jump_Zero 0x85e 0855 e5fc | | Load 0x2,-0x4 ; Debug Table 0x14.0x2 = 0x855,0x4 0856 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0857 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0858 0aff | | Execute_Immediate Plus,-0x1 0859 0248 | H | Execute Discrete,Check_In_Integer 085a e407 | | Load 0x2,0x7 085b e008 | | Load 0x0,0x8 085c 180e | | Execute Package,Field_Execute,Field_Number 0xe 085d c407 | | Store 0x2,0x7 085e 4800 |H | Short_Literal 0x0 ; Debug Table 0x14.0x3 = 0x85e,0x5 085f a405 | | Store_Unchecked 0x2,0x5 0860 4800 |H | Short_Literal 0x0 ; Debug Table 0x14.0x4 = 0x860,0x6 0861 a406 | | Store_Unchecked 0x2,0x6 0862 e402 | | Load 0x2,0x2 ; Debug Table 0x14.0x5 = 0x862,0x7 0863 e403 | | Load 0x2,0x3 0864 017d | } | Execute Record,Structure_Write 0865 e407 | | Load 0x2,0x7 ; Debug Table 0x14.0x6 = 0x865,0x8 0866 0c01 | | Execute_Immediate Greater_Equal,0x1 0867 68fa |h | Jump_Zero 0x962 0868 00cf | | Action Mark_Auxiliary ; Debug Table 0x14.0x7 = 0x868,0x9 0869 e407 | | Load 0x2,0x7 ; Debug Table 0x14.0x8 = 0x869,0xfbff 086a 00e4 | | Load_Encached Positive_Cache 086b 025b | [ | Execute Discrete,Check_In_Type 086c e408 | | Load 0x2,0x8 086d 00e4 | | Load_Encached Positive_Cache 086e 025b | [ | Execute Discrete,Check_In_Type 086f e403 | | Load 0x2,0x3 0870 e009 | | Load 0x0,0x9 0871 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0872 e408 | | Load 0x2,0x8 ; Debug Table 0x14.0x9 = 0x872,0xfbfe 0873 e408 | | Load 0x2,0x8 0874 00da | | Load_Top At_Offset_2 0875 01db | | Execute Vector,Length 0876 0273 | s | Execute Discrete,Plus 0877 0aff | | Execute_Immediate Plus,-0x1 0878 0248 | H | Execute Discrete,Check_In_Integer 0879 00e9 | | Load_Encached String_Cache 087a 035b | [ | Declare_Type Array,Constrained 087b 0337 | 7 | Declare_Variable Array 087c 00d9 | | Load_Top At_Offset_1 087d 00d9 | | Load_Top At_Offset_1 087e 01d4 | | Execute Vector,Structure_Write 087f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0xa = 0x87f,0xfbfd 0880 01da | | Execute Vector,Bounds 0881 e002 | | Load 0x0,0x2 0882 1b4a | J | Execute Package,Field_Read,Field_Number 0x4a 0883 035b | [ | Declare_Type Array,Constrained 0884 0337 | 7 | Declare_Variable Array 0885 e407 | | Load 0x2,0x7 0886 e408 | | Load 0x2,0x8 0887 0272 | r | Execute Discrete,Minus 0888 0248 | H | Execute Discrete,Check_In_Integer 0889 0a01 | | Execute_Immediate Plus,0x1 088a 00e3 | | Load_Encached Natural_Cache 088b 025b | [ | Execute Discrete,Check_In_Type 088c e403 | | Load 0x2,0x3 088d e002 | | Load 0x0,0x2 088e 1850 | P | Execute Package,Field_Execute,Field_Number 0x50 088f 00d9 | | Load_Top At_Offset_1 0890 01d4 | | Execute Vector,Structure_Write 0891 00cf | | Action Mark_Auxiliary 0892 78ad |x | Jump 0x940 0893 00cf | | Action Mark_Auxiliary 0894 e408 | | Load 0x2,0x8 ; Debug Table 0x14.0xb = 0x894,0x402 ; Debug Table 0x14.0xc = 0x894,0x403 0895 e605 | | Load 0x3,0x5 0896 01d7 | | Execute Vector,Field_Read 0897 a404 | | Store_Unchecked 0x2,0x4 0898 e404 | | Load 0x2,0x4 ; Debug Table 0x14.0xd = 0x898,0x404 0899 e5fe | | Load 0x2,-0x2 089a 01d7 | | Execute Vector,Field_Read 089b 707e |p~ | Jump_Nonzero 0x91a 089c e404 | | Load 0x2,0x4 ; Debug Table 0x14.0xe = 0x89c,0x405 089d 4861 |Ha | Short_Literal 0x61 089e 487a |Hz | Short_Literal 0x7a 089f 0262 | b | Execute Discrete,In_Range 08a0 6810 |h | Jump_Zero 0x8b1 08a1 e408 | | Load 0x2,0x8 08a2 00db | | Load_Top At_Offset_3 08a3 01d5 | | Execute Vector,Field_Reference 08a4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 08a5 0f02 | | Execute_Immediate Equal,0x2 08a6 700a |p | Jump_Nonzero 0x8b1 08a7 e404 | | Load 0x2,0x4 ; Debug Table 0x14.0xf = 0x8a7,0x406 08a8 e00a | | Load 0x0,0xa 08a9 1810 | | Execute Package,Field_Execute,Field_Number 0x10 08aa e408 | | Load 0x2,0x8 08ab e605 | | Load 0x3,0x5 08ac 01d6 | | Execute Vector,Field_Write 08ad e405 | | Load 0x2,0x5 ; Debug Table 0x14.0x10 = 0x8ad,0x407 08ae 7002 |p | Jump_Nonzero 0x8b1 08af e408 | | Load 0x2,0x8 ; Debug Table 0x14.0x11 = 0x8af,0x408 08b0 a405 | | Store_Unchecked 0x2,0x5 08b1 e408 | | Load 0x2,0x8 ; Debug Table 0x14.0x12 = 0x8b1,0x409 08b2 00db | | Load_Top At_Offset_3 08b3 01d5 | | Execute Vector,Field_Reference 08b4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 08b5 0f01 | | Execute_Immediate Equal,0x1 08b6 6812 |h | Jump_Zero 0x8c9 08b7 e406 | | Load 0x2,0x6 ; Debug Table 0x14.0x13 = 0x8b7,0x40a 08b8 700a |p | Jump_Nonzero 0x8c3 08b9 e402 | | Load 0x2,0x2 ; Debug Table 0x14.0x14 = 0x8b9,0x40b 08ba e009 | | Load 0x0,0x9 08bb 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 08bc 00d1 | | Pop_Control Pop_Count_1 08bd 4801 |H | Short_Literal 0x1 ; Debug Table 0x14.0x15 = 0x8bd,0x40c 08be a406 | | Store_Unchecked 0x2,0x6 08bf e405 | | Load 0x2,0x5 ; Debug Table 0x14.0x16 = 0x8bf,0x40d 08c0 7002 |p | Jump_Nonzero 0x8c3 08c1 e408 | | Load 0x2,0x8 ; Debug Table 0x14.0x17 = 0x8c1,0x40e 08c2 a405 | | Store_Unchecked 0x2,0x5 08c3 e002 | | Load 0x0,0x2 ; Debug Table 0x14.0x18 = 0x8c3,0x40f 08c4 1b4b | K | Execute Package,Field_Read,Field_Number 0x4b 08c5 e408 | | Load 0x2,0x8 08c6 e606 | | Load 0x3,0x6 08c7 01d6 | | Execute Vector,Field_Write 08c8 7802 |x | Jump 0x8cb 08c9 4800 |H | Short_Literal 0x0 ; Debug Table 0x14.0x19 = 0x8c9,0x410 08ca a406 | | Store_Unchecked 0x2,0x6 08cb e408 | | Load 0x2,0x8 ; Debug Table 0x14.0x1a = 0x8cb,0x411 08cc 0a01 | | Execute_Immediate Plus,0x1 08cd c408 | | Store 0x2,0x8 08ce e408 | | Load 0x2,0x8 ; Debug Table 0x14.0x1b = 0x8ce,0x412 08cf e407 | | Load 0x2,0x7 08d0 027a | z | Execute Discrete,Less_Equal 08d1 686c |hl | Jump_Zero 0x93e 08d2 e408 | | Load 0x2,0x8 ; Debug Table 0x14.0x1c = 0x8d2,0x413 08d3 e605 | | Load 0x3,0x5 08d4 01d7 | | Execute Vector,Field_Read 08d5 a404 | | Store_Unchecked 0x2,0x4 08d6 00cf | | Action Mark_Auxiliary 08d7 783c |x< | Jump 0x914 08d8 e404 | | Load 0x2,0x4 ; Debug Table 0x14.0x1d = 0x8d8,0x415 08d9 4841 |HA | Short_Literal 0x41 08da 485a |HZ | Short_Literal 0x5a 08db 0262 | b | Execute Discrete,In_Range 08dc 6810 |h | Jump_Zero 0x8ed 08dd e408 | | Load 0x2,0x8 08de e606 | | Load 0x3,0x6 08df 01d5 | | Execute Vector,Field_Reference 08e0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 08e1 0f02 | | Execute_Immediate Equal,0x2 08e2 700a |p | Jump_Nonzero 0x8ed 08e3 e404 | | Load 0x2,0x4 ; Debug Table 0x14.0x1e = 0x8e3,0x416 08e4 e00a | | Load 0x0,0xa 08e5 1811 | | Execute Package,Field_Execute,Field_Number 0x11 08e6 e408 | | Load 0x2,0x8 08e7 e605 | | Load 0x3,0x5 08e8 01d6 | | Execute Vector,Field_Write 08e9 e405 | | Load 0x2,0x5 ; Debug Table 0x14.0x1f = 0x8e9,0x417 08ea 7002 |p | Jump_Nonzero 0x8ed 08eb e408 | | Load 0x2,0x8 ; Debug Table 0x14.0x20 = 0x8eb,0x418 08ec a405 | | Store_Unchecked 0x2,0x5 08ed e408 | | Load 0x2,0x8 ; Debug Table 0x14.0x21 = 0x8ed,0x419 08ee e606 | | Load 0x3,0x6 08ef 01d5 | | Execute Vector,Field_Reference 08f0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 08f1 0f01 | | Execute_Immediate Equal,0x1 08f2 6812 |h | Jump_Zero 0x905 08f3 e406 | | Load 0x2,0x6 ; Debug Table 0x14.0x22 = 0x8f3,0x41a 08f4 700a |p | Jump_Nonzero 0x8ff 08f5 e402 | | Load 0x2,0x2 ; Debug Table 0x14.0x23 = 0x8f5,0x41b 08f6 e009 | | Load 0x0,0x9 08f7 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 08f8 00d1 | | Pop_Control Pop_Count_1 08f9 4801 |H | Short_Literal 0x1 ; Debug Table 0x14.0x24 = 0x8f9,0x41c 08fa a406 | | Store_Unchecked 0x2,0x6 08fb e405 | | Load 0x2,0x5 ; Debug Table 0x14.0x25 = 0x8fb,0x41d 08fc 7002 |p | Jump_Nonzero 0x8ff 08fd e408 | | Load 0x2,0x8 ; Debug Table 0x14.0x26 = 0x8fd,0x41e 08fe a405 | | Store_Unchecked 0x2,0x5 08ff e002 | | Load 0x0,0x2 ; Debug Table 0x14.0x27 = 0x8ff,0x41f 0900 1b4b | K | Execute Package,Field_Read,Field_Number 0x4b 0901 e408 | | Load 0x2,0x8 0902 e606 | | Load 0x3,0x6 0903 01d6 | | Execute Vector,Field_Write 0904 7802 |x | Jump 0x907 0905 4800 |H | Short_Literal 0x0 ; Debug Table 0x14.0x28 = 0x905,0x420 0906 a406 | | Store_Unchecked 0x2,0x6 0907 e408 | | Load 0x2,0x8 ; Debug Table 0x14.0x29 = 0x907,0x421 0908 0a01 | | Execute_Immediate Plus,0x1 0909 c408 | | Store 0x2,0x8 090a e408 | | Load 0x2,0x8 ; Debug Table 0x14.0x2a = 0x90a,0x422 090b e407 | | Load 0x2,0x7 090c 027d | } | Execute Discrete,Greater 090d 6801 |h | Jump_Zero 0x90f 090e 7809 |x | Jump 0x918 ; Debug Table 0x14.0x2b = 0x90e,0x423 090f e408 | | Load 0x2,0x8 ; Debug Table 0x14.0x2c = 0x90f,0x424 0910 e605 | | Load 0x3,0x5 0911 01d7 | | Execute Vector,Field_Read 0912 a404 | | Store_Unchecked 0x2,0x4 0913 00c9 | | Action Pop_Auxiliary_Loop 0914 e404 | | Load 0x2,0x4 ; Debug Table 0x14.0x2d = 0x914,0x414 0915 e5fe | | Load 0x2,-0x2 0916 01d7 | | Execute Vector,Field_Read 0917 6fc0 |o | Jump_Zero 0x8d8 0918 00ce | | Action Pop_Auxiliary 0919 7824 |x$ | Jump 0x93e ; Debug Table 0x14.0x2e = 0x919,0x425 091a e408 | | Load 0x2,0x8 ; Debug Table 0x14.0x2f = 0x91a,0x426 091b 00db | | Load_Top At_Offset_3 091c 01d5 | | Execute Vector,Field_Reference 091d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 091e 0f01 | | Execute_Immediate Equal,0x1 091f 6812 |h | Jump_Zero 0x932 0920 e406 | | Load 0x2,0x6 ; Debug Table 0x14.0x30 = 0x920,0x427 0921 700a |p | Jump_Nonzero 0x92c 0922 e402 | | Load 0x2,0x2 ; Debug Table 0x14.0x31 = 0x922,0x428 0923 e009 | | Load 0x0,0x9 0924 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0925 00d1 | | Pop_Control Pop_Count_1 0926 4801 |H | Short_Literal 0x1 ; Debug Table 0x14.0x32 = 0x926,0x429 0927 a406 | | Store_Unchecked 0x2,0x6 0928 e405 | | Load 0x2,0x5 ; Debug Table 0x14.0x33 = 0x928,0x42a 0929 7002 |p | Jump_Nonzero 0x92c 092a e408 | | Load 0x2,0x8 ; Debug Table 0x14.0x34 = 0x92a,0x42b 092b a405 | | Store_Unchecked 0x2,0x5 092c e002 | | Load 0x0,0x2 ; Debug Table 0x14.0x35 = 0x92c,0x42c 092d 1b4b | K | Execute Package,Field_Read,Field_Number 0x4b 092e e408 | | Load 0x2,0x8 092f e606 | | Load 0x3,0x6 0930 01d6 | | Execute Vector,Field_Write 0931 7802 |x | Jump 0x934 0932 4800 |H | Short_Literal 0x0 ; Debug Table 0x14.0x36 = 0x932,0x42d 0933 a406 | | Store_Unchecked 0x2,0x6 0934 e408 | | Load 0x2,0x8 ; Debug Table 0x14.0x37 = 0x934,0x42e 0935 0a01 | | Execute_Immediate Plus,0x1 0936 c408 | | Store 0x2,0x8 0937 e408 | | Load 0x2,0x8 ; Debug Table 0x14.0x38 = 0x937,0x42f 0938 e407 | | Load 0x2,0x7 0939 027d | } | Execute Discrete,Greater 093a 6801 |h | Jump_Zero 0x93c 093b 7802 |x | Jump 0x93e ; Debug Table 0x14.0x39 = 0x93b,0x430 093c 00c9 | | Action Pop_Auxiliary_Loop 093d 7f56 | V | Jump 0x894 093e 00ce | | Action Pop_Auxiliary 093f 00c9 | | Action Pop_Auxiliary_Loop 0940 e408 | | Load 0x2,0x8 ; Debug Table 0x14.0x3a = 0x940,0x401 0941 e407 | | Load 0x2,0x7 0942 027a | z | Execute Discrete,Less_Equal 0943 774f |wO | Jump_Nonzero 0x893 0944 00ce | | Action Pop_Auxiliary 0945 e405 | | Load 0x2,0x5 ; Debug Table 0x14.0x3b = 0x945,0x431 0946 0c01 | | Execute_Immediate Greater_Equal,0x1 0947 6818 |h | Jump_Zero 0x960 0948 e405 | | Load 0x2,0x5 ; Debug Table 0x14.0x3c = 0x948,0x432 0949 e403 | | Load 0x2,0x3 094a 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 094b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 094c e403 | | Load 0x2,0x3 ; Debug Table 0x14.0x3d = 0x94c,0x433 094d e403 | | Load 0x2,0x3 094e e405 | | Load 0x2,0x5 094f e407 | | Load 0x2,0x7 0950 e606 | | Load 0x3,0x6 0951 01cf | | Execute Vector,Slice_Read 0952 e405 | | Load 0x2,0x5 0953 e407 | | Load 0x2,0x7 0954 e605 | | Load 0x3,0x5 0955 01cf | | Execute Vector,Slice_Read 0956 e407 | | Load 0x2,0x7 0957 e405 | | Load 0x2,0x5 0958 0272 | r | Execute Discrete,Minus 0959 0248 | H | Execute Discrete,Check_In_Integer 095a 0a01 | | Execute_Immediate Plus,0x1 095b 00e3 | | Load_Encached Natural_Cache 095c 025b | [ | Execute Discrete,Check_In_Type 095d e009 | | Load 0x0,0x9 095e 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 095f 00d2 | | Pop_Control Pop_Count_2 0960 00d3 | | Pop_Control Pop_Count_3 0961 00ce | | Action Pop_Auxiliary 0962 e409 | | Load 0x2,0x9 ; Debug Table 0x14.0x3e = 0x962,0xa 0963 0a01 | | Execute_Immediate Plus,0x1 0964 c409 | | Store 0x2,0x9 0965 4801 |H | Short_Literal 0x1 ; Debug Table 0x14.0x3f = 0x965,0xb 0966 a408 | | Store_Unchecked 0x2,0x8 0967 00c9 | | Action Pop_Auxiliary_Loop 0968 e409 | | Load 0x2,0x9 ; Debug Table 0x14.0x40 = 0x968,0x1 0969 e40a | | Load 0x2,0xa 096a 027a | z | Execute Discrete,Less_Equal 096b 76e1 |v | Jump_Nonzero 0x84d 096c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 096d TRAP_0848: 096d 0007 | | Action Break_Optional 096e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x14.0x41 = 0x96e,0xc 096f 0000 | | .XXX[0x1] 0970 0000 0000 | | .LITERAL {0x00000000, 0x59898502} 0974 ; -------------------------------------------------------------------------------------- 0974 ; STRING TABLE 0974 ; -------------------------------------------------------------------------------------- 0974 0008 | | .STRTAB 0x0008->0x0978 ; "Too far to convert." 0975 0019 | | .STRTAB 0x0019->0x0981 ; "No current selection." 0976 002c | , | .STRTAB 0x002c->0x098c ; "Current selection is not in this window." 0977 0052 | R | .STREND 0x0052->0x09a0 0978 546f 6f20 |Too | .STRTAB_STRINGS 09a0 ; -------------------------------------------------------------------------------------- 09a0 ; Debug Table 09a0 ; -------------------------------------------------------------------------------------- 09a0 0003 0015 | | .CONST 0x0003,0x0015 09a2 000b 0a4a | J| .DEBUG 0x000b,0x0a4a,0x8000,0x0000,0x0059,0x8bf5,0x0000,0x0007 09aa 0024 0a64 | $ d| .DEBUG 0x0024,0x0a64,0x8000,0x0000,0x0059,0x8e55,0x0000,0x0019 09b2 0073 0aaa | s | .DEBUG 0x0073,0x0aaa,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x0008 09ba 00f3 0acc | | .DEBUG 0x00f3,0x0acc,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x0017 09c2 0173 0aee | s | .DEBUG 0x0173,0x0aee,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x0026 09ca 01fb 0b10 | | .DEBUG 0x01fb,0x0b10,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x0035 09d2 025b 0b28 | [ (| .DEBUG 0x025b,0x0b28,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x0044 09da 02bb 0b40 | @| .DEBUG 0x02bb,0x0b40,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x0053 09e2 031b 0b5a | Z| .DEBUG 0x031b,0x0b5a,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x0062 09ea 03ab 0b7e | ~| .DEBUG 0x03ab,0x0b7e,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x0071 09f2 043b 0ba2 | ; | .DEBUG 0x043b,0x0ba2,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x0080 09fa 04d3 0bc8 | | .DEBUG 0x04d3,0x0bc8,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x008f 0a02 0523 0bee | # | .DEBUG 0x0523,0x0bee,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x009f 0a0a 0573 0c14 | s | .DEBUG 0x0573,0x0c14,0x0001,0x0000,0x0059,0x8bf5,0x0000,0x00af 0a12 05cb 0c3a | :| .DEBUG 0x05cb,0x0c3a,0x0001,0x0000,0x0059,0x8e55,0x0000,0x0083 0a1a 05e3 0c42 | B| .DEBUG 0x05e3,0x0c42,0x0001,0x0000,0x0059,0x8e55,0x0000,0x00a9 0a22 064b 0c6e | K n| .DEBUG 0x064b,0x0c6e,0x0001,0x0000,0x0059,0x8e55,0x0000,0x0253 0a2a 06b3 0c9a | | .DEBUG 0x06b3,0x0c9a,0x0001,0x0000,0x0059,0x8e55,0x0000,0x03fd 0a32 071b 0cc8 | | .DEBUG 0x071b,0x0cc8,0x0004,0x0000,0x0059,0x8e55,0x0000,0x0243 0a3a 07b3 0d00 | | .DEBUG 0x07b3,0x0d00,0x0004,0x0000,0x0059,0x8e55,0x0000,0x03ed 0a42 084b 0d38 | K 8| .DEBUG 0x084b,0x0d38,0x0004,0x0000,0x0059,0x8e55,0x0000,0x06cc 0a4a ; -------------------------------------------------------------------------------------- 0a4a ; Debug3 Subtable 0x0 0a4a ; -------------------------------------------------------------------------------------- 0a4a 000c 0000 | | .DBG3TAB 0x000c,0x0000 0a4c 000b ffff | | .CONST 0x000b,0xffff 0a4e 000d fffe | | .CONST 0x000d,0xfffe 0a50 000f fffd | | .CONST 0x000f,0xfffd 0a52 0011 fffc | | .CONST 0x0011,0xfffc 0a54 0013 fffb | | .CONST 0x0013,0xfffb 0a56 0015 fffa | | .CONST 0x0015,0xfffa 0a58 0017 fff9 | | .CONST 0x0017,0xfff9 0a5a 0019 fff8 | | .CONST 0x0019,0xfff8 0a5c 001b fff7 | | .CONST 0x001b,0xfff7 0a5e 001d fff6 | | .CONST 0x001d,0xfff6 0a60 001f fff5 | | .CONST 0x001f,0xfff5 0a62 0021 fff4 | ! | .CONST 0x0021,0xfff4 0a64 ; -------------------------------------------------------------------------------------- 0a64 ; Debug3 Subtable 0x1 0a64 ; -------------------------------------------------------------------------------------- 0a64 0019 0009 | | .DBG3TAB 0x0019,0x0009 0a66 0024 ffff | $ | .CONST 0x0024,0xffff 0a68 0024 fffe | $ | .CONST 0x0024,0xfffe 0a6a 0026 fffd | & | .CONST 0x0026,0xfffd 0a6c 0028 fffc | ( | .CONST 0x0028,0xfffc 0a6e 002a fffb | * | .CONST 0x002a,0xfffb 0a70 002c fffa | , | .CONST 0x002c,0xfffa 0a72 002c fff9 | , | .CONST 0x002c,0xfff9 0a74 002c fff8 | , | .CONST 0x002c,0xfff8 0a76 002c fff7 | , | .CONST 0x002c,0xfff7 0a78 002c fff6 | , | .CONST 0x002c,0xfff6 0a7a 002e fff5 | . | .CONST 0x002e,0xfff5 0a7c 0030 fff4 | 0 | .CONST 0x0030,0xfff4 0a7e 0032 fff3 | 2 | .CONST 0x0032,0xfff3 0a80 0034 fff2 | 4 | .CONST 0x0034,0xfff2 0a82 0036 fff1 | 6 | .CONST 0x0036,0xfff1 0a84 0038 fff0 | 8 | .CONST 0x0038,0xfff0 0a86 003a ffef | : | .CONST 0x003a,0xffef 0a88 003c ffee | < | .CONST 0x003c,0xffee 0a8a 003e ffed | > | .CONST 0x003e,0xffed 0a8c 0040 ffec | @ | .CONST 0x0040,0xffec 0a8e 0042 ffeb | B | .CONST 0x0042,0xffeb 0a90 0044 ffea | D | .CONST 0x0044,0xffea 0a92 0046 ffe9 | F | .CONST 0x0046,0xffe9 0a94 0048 ffe8 | H | .CONST 0x0048,0xffe8 0a96 004a ffe7 | J | .CONST 0x004a,0xffe7 0a98 004c 0001 | L | .CONST 0x004c,0x0001 0a9a 004e 0401 | N | .CONST 0x004e,0x0401 0a9c 0054 0001 | T | .CONST 0x0054,0x0001 0a9e 0055 0002 | U | .CONST 0x0055,0x0002 0aa0 0057 0801 | W | .CONST 0x0057,0x0801 0aa2 005d 0002 | ] | .CONST 0x005d,0x0002 0aa4 005e 0003 | ^ | .CONST 0x005e,0x0003 0aa6 0060 0c01 | ` | .CONST 0x0060,0x0c01 0aa8 0066 0003 | f | .CONST 0x0066,0x0003 0aaa ; -------------------------------------------------------------------------------------- 0aaa ; Debug3 Subtable 0x2 0aaa ; -------------------------------------------------------------------------------------- 0aaa 0001 000f | | .DBG3TAB 0x0001,0x000f 0aac 0073 ffff | s | .CONST 0x0073,0xffff 0aae 007b 0001 | { | .CONST 0x007b,0x0001 0ab0 007e 0002 | ~ | .CONST 0x007e,0x0002 0ab2 008d 0003 | | .CONST 0x008d,0x0003 0ab4 0093 0004 | | .CONST 0x0093,0x0004 0ab6 009b 0401 | | .CONST 0x009b,0x0401 0ab8 00a2 0402 | | .CONST 0x00a2,0x0402 0aba 00aa 0005 | | .CONST 0x00aa,0x0005 0abc 00b6 0006 | | .CONST 0x00b6,0x0006 0abe 00be 0007 | | .CONST 0x00be,0x0007 0ac0 00cd 0008 | | .CONST 0x00cd,0x0008 0ac2 00d7 0009 | | .CONST 0x00d7,0x0009 0ac4 00d8 0801 | | .CONST 0x00d8,0x0801 0ac6 00da 0c01 | | .CONST 0x00da,0x0c01 0ac8 00e1 0801 | | .CONST 0x00e1,0x0801 0aca 00e4 0802 | | .CONST 0x00e4,0x0802 0acc ; -------------------------------------------------------------------------------------- 0acc ; Debug3 Subtable 0x3 0acc ; -------------------------------------------------------------------------------------- 0acc 0001 000f | | .DBG3TAB 0x0001,0x000f 0ace 00f3 ffff | | .CONST 0x00f3,0xffff 0ad0 00fb 0001 | | .CONST 0x00fb,0x0001 0ad2 00fe 0002 | | .CONST 0x00fe,0x0002 0ad4 010d 0003 | | .CONST 0x010d,0x0003 0ad6 0113 0004 | | .CONST 0x0113,0x0004 0ad8 011b 0401 | | .CONST 0x011b,0x0401 0ada 0122 0402 | " | .CONST 0x0122,0x0402 0adc 012a 0005 | * | .CONST 0x012a,0x0005 0ade 0136 0006 | 6 | .CONST 0x0136,0x0006 0ae0 013e 0007 | > | .CONST 0x013e,0x0007 0ae2 014d 0008 | M | .CONST 0x014d,0x0008 0ae4 0157 0009 | W | .CONST 0x0157,0x0009 0ae6 0158 0801 | X | .CONST 0x0158,0x0801 0ae8 015a 0c01 | Z | .CONST 0x015a,0x0c01 0aea 0161 0801 | a | .CONST 0x0161,0x0801 0aec 0164 0802 | d | .CONST 0x0164,0x0802 0aee ; -------------------------------------------------------------------------------------- 0aee ; Debug3 Subtable 0x4 0aee ; -------------------------------------------------------------------------------------- 0aee 0001 000f | | .DBG3TAB 0x0001,0x000f 0af0 0173 ffff | s | .CONST 0x0173,0xffff 0af2 017b 0001 | { | .CONST 0x017b,0x0001 0af4 017e 0002 | ~ | .CONST 0x017e,0x0002 0af6 018d 0003 | | .CONST 0x018d,0x0003 0af8 0193 0004 | | .CONST 0x0193,0x0004 0afa 019b 0401 | | .CONST 0x019b,0x0401 0afc 01a2 0402 | | .CONST 0x01a2,0x0402 0afe 01aa 0005 | | .CONST 0x01aa,0x0005 0b00 01b6 0006 | | .CONST 0x01b6,0x0006 0b02 01c2 0007 | | .CONST 0x01c2,0x0007 0b04 01d1 0008 | | .CONST 0x01d1,0x0008 0b06 01df 0009 | | .CONST 0x01df,0x0009 0b08 01e0 0801 | | .CONST 0x01e0,0x0801 0b0a 01e2 0c01 | | .CONST 0x01e2,0x0c01 0b0c 01e9 0801 | | .CONST 0x01e9,0x0801 0b0e 01ec 0802 | | .CONST 0x01ec,0x0802 0b10 ; -------------------------------------------------------------------------------------- 0b10 ; Debug3 Subtable 0x5 0b10 ; -------------------------------------------------------------------------------------- 0b10 0001 000a | | .DBG3TAB 0x0001,0x000a 0b12 01fb ffff | | .CONST 0x01fb,0xffff 0b14 0203 0001 | | .CONST 0x0203,0x0001 0b16 0206 0002 | | .CONST 0x0206,0x0002 0b18 0219 0003 | | .CONST 0x0219,0x0003 0b1a 0221 0004 | ! | .CONST 0x0221,0x0004 0b1c 0235 0005 | 5 | .CONST 0x0235,0x0005 0b1e 023f 0006 | ? | .CONST 0x023f,0x0006 0b20 0240 0401 | @ | .CONST 0x0240,0x0401 0b22 0242 0801 | B | .CONST 0x0242,0x0801 0b24 0249 0401 | I | .CONST 0x0249,0x0401 0b26 024c 0402 | L | .CONST 0x024c,0x0402 0b28 ; -------------------------------------------------------------------------------------- 0b28 ; Debug3 Subtable 0x6 0b28 ; -------------------------------------------------------------------------------------- 0b28 0001 000a | | .DBG3TAB 0x0001,0x000a 0b2a 025b ffff | [ | .CONST 0x025b,0xffff 0b2c 0263 0001 | c | .CONST 0x0263,0x0001 0b2e 0266 0002 | f | .CONST 0x0266,0x0002 0b30 0279 0003 | y | .CONST 0x0279,0x0003 0b32 0281 0004 | | .CONST 0x0281,0x0004 0b34 0295 0005 | | .CONST 0x0295,0x0005 0b36 029f 0006 | | .CONST 0x029f,0x0006 0b38 02a0 0401 | | .CONST 0x02a0,0x0401 0b3a 02a2 0801 | | .CONST 0x02a2,0x0801 0b3c 02a9 0401 | | .CONST 0x02a9,0x0401 0b3e 02ac 0402 | | .CONST 0x02ac,0x0402 0b40 ; -------------------------------------------------------------------------------------- 0b40 ; Debug3 Subtable 0x7 0b40 ; -------------------------------------------------------------------------------------- 0b40 0002 000a | | .DBG3TAB 0x0002,0x000a 0b42 02bb ffff | | .CONST 0x02bb,0xffff 0b44 02c3 fffe | | .CONST 0x02c3,0xfffe 0b46 02cc 0001 | | .CONST 0x02cc,0x0001 0b48 02cf 0002 | | .CONST 0x02cf,0x0002 0b4a 02df 0003 | | .CONST 0x02df,0x0003 0b4c 02e8 0004 | | .CONST 0x02e8,0x0004 0b4e 02f9 0005 | | .CONST 0x02f9,0x0005 0b50 0304 0006 | | .CONST 0x0304,0x0006 0b52 0305 0401 | | .CONST 0x0305,0x0401 0b54 0307 0801 | | .CONST 0x0307,0x0801 0b56 030e 0401 | | .CONST 0x030e,0x0401 0b58 0311 0402 | | .CONST 0x0311,0x0402 0b5a ; -------------------------------------------------------------------------------------- 0b5a ; Debug3 Subtable 0x8 0b5a ; -------------------------------------------------------------------------------------- 0b5a 0001 0010 | | .DBG3TAB 0x0001,0x0010 0b5c 031b ffff | | .CONST 0x031b,0xffff 0b5e 0323 0001 | # | .CONST 0x0323,0x0001 0b60 0326 0002 | & | .CONST 0x0326,0x0002 0b62 0334 0003 | 4 | .CONST 0x0334,0x0003 0b64 0344 0004 | D | .CONST 0x0344,0x0004 0b66 034b 0005 | K | .CONST 0x034b,0x0005 0b68 0353 0401 | S | .CONST 0x0353,0x0401 0b6a 035a 0402 | Z | .CONST 0x035a,0x0402 0b6c 0362 0006 | b | .CONST 0x0362,0x0006 0b6e 0371 0007 | q | .CONST 0x0371,0x0007 0b70 037d 0008 | } | .CONST 0x037d,0x0008 0b72 0384 0009 | | .CONST 0x0384,0x0009 0b74 0391 000a | | .CONST 0x0391,0x000a 0b76 0392 0801 | | .CONST 0x0392,0x0801 0b78 0394 0c01 | | .CONST 0x0394,0x0c01 0b7a 039b 0801 | | .CONST 0x039b,0x0801 0b7c 039e 0802 | | .CONST 0x039e,0x0802 0b7e ; -------------------------------------------------------------------------------------- 0b7e ; Debug3 Subtable 0x9 0b7e ; -------------------------------------------------------------------------------------- 0b7e 0001 0010 | | .DBG3TAB 0x0001,0x0010 0b80 03ab ffff | | .CONST 0x03ab,0xffff 0b82 03b3 0001 | | .CONST 0x03b3,0x0001 0b84 03b6 0002 | | .CONST 0x03b6,0x0002 0b86 03c4 0003 | | .CONST 0x03c4,0x0003 0b88 03d4 0004 | | .CONST 0x03d4,0x0004 0b8a 03db 0005 | | .CONST 0x03db,0x0005 0b8c 03e3 0401 | | .CONST 0x03e3,0x0401 0b8e 03ea 0402 | | .CONST 0x03ea,0x0402 0b90 03f2 0006 | | .CONST 0x03f2,0x0006 0b92 0401 0007 | | .CONST 0x0401,0x0007 0b94 040d 0008 | | .CONST 0x040d,0x0008 0b96 0414 0009 | | .CONST 0x0414,0x0009 0b98 0421 000a | ! | .CONST 0x0421,0x000a 0b9a 0422 0801 | " | .CONST 0x0422,0x0801 0b9c 0424 0c01 | $ | .CONST 0x0424,0x0c01 0b9e 042b 0801 | + | .CONST 0x042b,0x0801 0ba0 042e 0802 | . | .CONST 0x042e,0x0802 0ba2 ; -------------------------------------------------------------------------------------- 0ba2 ; Debug3 Subtable 0xa 0ba2 ; -------------------------------------------------------------------------------------- 0ba2 0002 0010 | | .DBG3TAB 0x0002,0x0010 0ba4 043b ffff | ; | .CONST 0x043b,0xffff 0ba6 0443 fffe | C | .CONST 0x0443,0xfffe 0ba8 044c 0001 | L | .CONST 0x044c,0x0001 0baa 044f 0002 | O | .CONST 0x044f,0x0002 0bac 045d 0003 | ] | .CONST 0x045d,0x0003 0bae 046d 0004 | m | .CONST 0x046d,0x0004 0bb0 0475 0005 | u | .CONST 0x0475,0x0005 0bb2 047d 0401 | } | .CONST 0x047d,0x0401 0bb4 0484 0402 | | .CONST 0x0484,0x0402 0bb6 048c 0006 | | .CONST 0x048c,0x0006 0bb8 049b 0007 | | .CONST 0x049b,0x0007 0bba 04a7 0008 | | .CONST 0x04a7,0x0008 0bbc 04af 0009 | | .CONST 0x04af,0x0009 0bbe 04bc 000a | | .CONST 0x04bc,0x000a 0bc0 04bd 0801 | | .CONST 0x04bd,0x0801 0bc2 04bf 0c01 | | .CONST 0x04bf,0x0c01 0bc4 04c6 0801 | | .CONST 0x04c6,0x0801 0bc6 04c9 0802 | | .CONST 0x04c9,0x0802 0bc8 ; -------------------------------------------------------------------------------------- 0bc8 ; Debug3 Subtable 0xb 0bc8 ; -------------------------------------------------------------------------------------- 0bc8 0003 000f | | .DBG3TAB 0x0003,0x000f 0bca 04d3 ffff | | .CONST 0x04d3,0xffff 0bcc 04d4 fffe | | .CONST 0x04d4,0xfffe 0bce 04d9 fffd | | .CONST 0x04d9,0xfffd 0bd0 04de 0001 | | .CONST 0x04de,0x0001 0bd2 04e6 0002 | | .CONST 0x04e6,0x0002 0bd4 04e8 0003 | | .CONST 0x04e8,0x0003 0bd6 04f0 0004 | | .CONST 0x04f0,0x0004 0bd8 04f1 0401 | | .CONST 0x04f1,0x0401 0bda 04f3 0801 | | .CONST 0x04f3,0x0801 0bdc 04fa 0401 | | .CONST 0x04fa,0x0401 0bde 04fd 0402 | | .CONST 0x04fd,0x0402 0be0 0502 0005 | | .CONST 0x0502,0x0005 0be2 0507 0006 | | .CONST 0x0507,0x0006 0be4 050d 0007 | | .CONST 0x050d,0x0007 0be6 050e 0c01 | | .CONST 0x050e,0x0c01 0be8 0510 1001 | | .CONST 0x0510,0x1001 0bea 0517 0c01 | | .CONST 0x0517,0x0c01 0bec 051a 0c02 | | .CONST 0x051a,0x0c02 0bee ; -------------------------------------------------------------------------------------- 0bee ; Debug3 Subtable 0xc 0bee ; -------------------------------------------------------------------------------------- 0bee 0003 000f | | .DBG3TAB 0x0003,0x000f 0bf0 0523 ffff | # | .CONST 0x0523,0xffff 0bf2 0524 fffe | $ | .CONST 0x0524,0xfffe 0bf4 0529 fffd | ) | .CONST 0x0529,0xfffd 0bf6 052e 0001 | . | .CONST 0x052e,0x0001 0bf8 0536 0002 | 6 | .CONST 0x0536,0x0002 0bfa 0538 0003 | 8 | .CONST 0x0538,0x0003 0bfc 0540 0004 | @ | .CONST 0x0540,0x0004 0bfe 0541 0401 | A | .CONST 0x0541,0x0401 0c00 0543 0801 | C | .CONST 0x0543,0x0801 0c02 054a 0401 | J | .CONST 0x054a,0x0401 0c04 054d 0402 | M | .CONST 0x054d,0x0402 0c06 0552 0005 | R | .CONST 0x0552,0x0005 0c08 0557 0006 | W | .CONST 0x0557,0x0006 0c0a 055d 0007 | ] | .CONST 0x055d,0x0007 0c0c 055e 0c01 | ^ | .CONST 0x055e,0x0c01 0c0e 0560 1001 | ` | .CONST 0x0560,0x1001 0c10 0567 0c01 | g | .CONST 0x0567,0x0c01 0c12 056a 0c02 | j | .CONST 0x056a,0x0c02 0c14 ; -------------------------------------------------------------------------------------- 0c14 ; Debug3 Subtable 0xd 0c14 ; -------------------------------------------------------------------------------------- 0c14 0003 000f | | .DBG3TAB 0x0003,0x000f 0c16 0573 ffff | s | .CONST 0x0573,0xffff 0c18 0574 fffe | t | .CONST 0x0574,0xfffe 0c1a 0579 fffd | y | .CONST 0x0579,0xfffd 0c1c 057e 0001 | ~ | .CONST 0x057e,0x0001 0c1e 0586 0002 | | .CONST 0x0586,0x0002 0c20 0588 0003 | | .CONST 0x0588,0x0003 0c22 0590 0004 | | .CONST 0x0590,0x0004 0c24 0591 0401 | | .CONST 0x0591,0x0401 0c26 0593 0801 | | .CONST 0x0593,0x0801 0c28 059a 0401 | | .CONST 0x059a,0x0401 0c2a 059d 0402 | | .CONST 0x059d,0x0402 0c2c 05a2 0005 | | .CONST 0x05a2,0x0005 0c2e 05ab 0006 | | .CONST 0x05ab,0x0006 0c30 05b1 0007 | | .CONST 0x05b1,0x0007 0c32 05b2 0c01 | | .CONST 0x05b2,0x0c01 0c34 05b4 1001 | | .CONST 0x05b4,0x1001 0c36 05bb 0c01 | | .CONST 0x05bb,0x0c01 0c38 05be 0c02 | | .CONST 0x05be,0x0c02 0c3a ; -------------------------------------------------------------------------------------- 0c3a ; Debug3 Subtable 0xe 0c3a ; -------------------------------------------------------------------------------------- 0c3a 0000 0003 | | .DBG3TAB 0x0000,0x0003 0c3c 05cb 0001 | | .CONST 0x05cb,0x0001 0c3e 05d0 0002 | | .CONST 0x05d0,0x0002 0c40 05d9 0003 | | .CONST 0x05d9,0x0003 0c42 ; -------------------------------------------------------------------------------------- 0c42 ; Debug3 Subtable 0xf 0c42 ; -------------------------------------------------------------------------------------- 0c42 000d 0008 | | .DBG3TAB 0x000d,0x0008 0c44 05e3 ffff | | .CONST 0x05e3,0xffff 0c46 05e9 fffe | | .CONST 0x05e9,0xfffe 0c48 05ee fffd | | .CONST 0x05ee,0xfffd 0c4a 05ef fffc | | .CONST 0x05ef,0xfffc 0c4c 05f0 fffb | | .CONST 0x05f0,0xfffb 0c4e 05f1 fffa | | .CONST 0x05f1,0xfffa 0c50 05f4 fff9 | | .CONST 0x05f4,0xfff9 0c52 05f7 fff8 | | .CONST 0x05f7,0xfff8 0c54 05fa fff7 | | .CONST 0x05fa,0xfff7 0c56 05fc fff6 | | .CONST 0x05fc,0xfff6 0c58 0601 fff5 | | .CONST 0x0601,0xfff5 0c5a 0604 fff4 | | .CONST 0x0604,0xfff4 0c5c 0607 fff3 | | .CONST 0x0607,0xfff3 0c5e 060e 0001 | | .CONST 0x060e,0x0001 0c60 0610 0002 | | .CONST 0x0610,0x0002 0c62 061f 0003 | | .CONST 0x061f,0x0003 0c64 0629 0004 | ) | .CONST 0x0629,0x0004 0c66 0637 0005 | 7 | .CONST 0x0637,0x0005 0c68 0639 0006 | 9 | .CONST 0x0639,0x0006 0c6a 063a 0007 | : | .CONST 0x063a,0x0007 0c6c 063c 0008 | < | .CONST 0x063c,0x0008 0c6e ; -------------------------------------------------------------------------------------- 0c6e ; Debug3 Subtable 0x10 0c6e ; -------------------------------------------------------------------------------------- 0c6e 000d 0008 | | .DBG3TAB 0x000d,0x0008 0c70 064b ffff | K | .CONST 0x064b,0xffff 0c72 0651 fffe | Q | .CONST 0x0651,0xfffe 0c74 0656 fffd | V | .CONST 0x0656,0xfffd 0c76 0657 fffc | W | .CONST 0x0657,0xfffc 0c78 0658 fffb | X | .CONST 0x0658,0xfffb 0c7a 0659 fffa | Y | .CONST 0x0659,0xfffa 0c7c 065c fff9 | \ | .CONST 0x065c,0xfff9 0c7e 065f fff8 | _ | .CONST 0x065f,0xfff8 0c80 0662 fff7 | b | .CONST 0x0662,0xfff7 0c82 0664 fff6 | d | .CONST 0x0664,0xfff6 0c84 0669 fff5 | i | .CONST 0x0669,0xfff5 0c86 066c fff4 | l | .CONST 0x066c,0xfff4 0c88 066f fff3 | o | .CONST 0x066f,0xfff3 0c8a 0676 0001 | v | .CONST 0x0676,0x0001 0c8c 0678 0002 | x | .CONST 0x0678,0x0002 0c8e 0687 0003 | | .CONST 0x0687,0x0003 0c90 0691 0004 | | .CONST 0x0691,0x0004 0c92 069f 0005 | | .CONST 0x069f,0x0005 0c94 06a1 0006 | | .CONST 0x06a1,0x0006 0c96 06a2 0007 | | .CONST 0x06a2,0x0007 0c98 06a4 0008 | | .CONST 0x06a4,0x0008 0c9a ; -------------------------------------------------------------------------------------- 0c9a ; Debug3 Subtable 0x11 0c9a ; -------------------------------------------------------------------------------------- 0c9a 000e 0008 | | .DBG3TAB 0x000e,0x0008 0c9c 06b3 ffff | | .CONST 0x06b3,0xffff 0c9e 06b9 fffe | | .CONST 0x06b9,0xfffe 0ca0 06be fffd | | .CONST 0x06be,0xfffd 0ca2 06bf fffc | | .CONST 0x06bf,0xfffc 0ca4 06c0 fffb | | .CONST 0x06c0,0xfffb 0ca6 06c1 fffa | | .CONST 0x06c1,0xfffa 0ca8 06c2 fff9 | | .CONST 0x06c2,0xfff9 0caa 06c5 fff8 | | .CONST 0x06c5,0xfff8 0cac 06c8 fff7 | | .CONST 0x06c8,0xfff7 0cae 06cb fff6 | | .CONST 0x06cb,0xfff6 0cb0 06cd fff5 | | .CONST 0x06cd,0xfff5 0cb2 06d2 fff4 | | .CONST 0x06d2,0xfff4 0cb4 06d5 fff3 | | .CONST 0x06d5,0xfff3 0cb6 06d8 fff2 | | .CONST 0x06d8,0xfff2 0cb8 06df 0001 | | .CONST 0x06df,0x0001 0cba 06e1 0002 | | .CONST 0x06e1,0x0002 0cbc 06f0 0003 | | .CONST 0x06f0,0x0003 0cbe 06fa 0004 | | .CONST 0x06fa,0x0004 0cc0 0708 0005 | | .CONST 0x0708,0x0005 0cc2 070a 0006 | | .CONST 0x070a,0x0006 0cc4 070b 0007 | | .CONST 0x070b,0x0007 0cc6 070d 0008 | | .CONST 0x070d,0x0008 0cc8 ; -------------------------------------------------------------------------------------- 0cc8 ; Debug3 Subtable 0x12 0cc8 ; -------------------------------------------------------------------------------------- 0cc8 0003 0018 | | .DBG3TAB 0x0003,0x0018 0cca 071d 0002 | | .CONST 0x071d,0x0002 0ccc 0721 0003 | ! | .CONST 0x0721,0x0003 0cce 0725 0004 | % | .CONST 0x0725,0x0004 0cd0 072e 0005 | . | .CONST 0x072e,0x0005 0cd2 0730 0006 | 0 | .CONST 0x0730,0x0006 0cd4 0732 0007 | 2 | .CONST 0x0732,0x0007 0cd6 0735 0008 | 5 | .CONST 0x0735,0x0008 0cd8 0738 0009 | 8 | .CONST 0x0738,0x0009 0cda 0739 fbff | 9 | .CONST 0x0739,0xfbff 0cdc 0742 fbfe | B | .CONST 0x0742,0xfbfe 0cde 0751 fbfd | Q | .CONST 0x0751,0xfbfd 0ce0 0765 0402 | e | .CONST 0x0765,0x0402 0ce2 076d 0403 | m | .CONST 0x076d,0x0403 0ce4 076f 0404 | o | .CONST 0x076f,0x0404 0ce6 0771 0405 | q | .CONST 0x0771,0x0405 0ce8 0775 0406 | u | .CONST 0x0775,0x0406 0cea 0777 0407 | w | .CONST 0x0777,0x0407 0cec 077c 0408 | | | .CONST 0x077c,0x0408 0cee 077f 0409 | | .CONST 0x077f,0x0409 0cf0 0781 040a | | .CONST 0x0781,0x040a 0cf2 0785 0401 | | .CONST 0x0785,0x0401 0cf4 078a 040b | | .CONST 0x078a,0x040b 0cf6 0790 040c | | .CONST 0x0790,0x040c 0cf8 079d 000a | | .CONST 0x079d,0x000a 0cfa 07a0 000b | | .CONST 0x07a0,0x000b 0cfc 07a3 0001 | | .CONST 0x07a3,0x0001 0cfe 07a9 000c | | .CONST 0x07a9,0x000c 0d00 ; -------------------------------------------------------------------------------------- 0d00 ; Debug3 Subtable 0x13 0d00 ; -------------------------------------------------------------------------------------- 0d00 0003 0018 | | .DBG3TAB 0x0003,0x0018 0d02 07b5 0002 | | .CONST 0x07b5,0x0002 0d04 07b9 0003 | | .CONST 0x07b9,0x0003 0d06 07bd 0004 | | .CONST 0x07bd,0x0004 0d08 07c6 0005 | | .CONST 0x07c6,0x0005 0d0a 07c8 0006 | | .CONST 0x07c8,0x0006 0d0c 07ca 0007 | | .CONST 0x07ca,0x0007 0d0e 07cd 0008 | | .CONST 0x07cd,0x0008 0d10 07d0 0009 | | .CONST 0x07d0,0x0009 0d12 07d1 fbff | | .CONST 0x07d1,0xfbff 0d14 07da fbfe | | .CONST 0x07da,0xfbfe 0d16 07e9 fbfd | | .CONST 0x07e9,0xfbfd 0d18 07fd 0402 | | .CONST 0x07fd,0x0402 0d1a 0805 0403 | | .CONST 0x0805,0x0403 0d1c 0807 0404 | | .CONST 0x0807,0x0404 0d1e 0809 0405 | | .CONST 0x0809,0x0405 0d20 080d 0406 | | .CONST 0x080d,0x0406 0d22 080f 0407 | | .CONST 0x080f,0x0407 0d24 0814 0408 | | .CONST 0x0814,0x0408 0d26 0817 0409 | | .CONST 0x0817,0x0409 0d28 0819 040a | | .CONST 0x0819,0x040a 0d2a 081d 0401 | | .CONST 0x081d,0x0401 0d2c 0822 040b | " | .CONST 0x0822,0x040b 0d2e 0828 040c | ( | .CONST 0x0828,0x040c 0d30 0835 000a | 5 | .CONST 0x0835,0x000a 0d32 0838 000b | 8 | .CONST 0x0838,0x000b 0d34 083b 0001 | ; | .CONST 0x083b,0x0001 0d36 0841 000c | A | .CONST 0x0841,0x000c 0d38 ; -------------------------------------------------------------------------------------- 0d38 ; Debug3 Subtable 0x14 0d38 ; -------------------------------------------------------------------------------------- 0d38 0003 003f | ?| .DBG3TAB 0x0003,0x003f 0d3a 084d 0002 | M | .CONST 0x084d,0x0002 0d3c 0851 0003 | Q | .CONST 0x0851,0x0003 0d3e 0855 0004 | U | .CONST 0x0855,0x0004 0d40 085e 0005 | ^ | .CONST 0x085e,0x0005 0d42 0860 0006 | ` | .CONST 0x0860,0x0006 0d44 0862 0007 | b | .CONST 0x0862,0x0007 0d46 0865 0008 | e | .CONST 0x0865,0x0008 0d48 0868 0009 | h | .CONST 0x0868,0x0009 0d4a 0869 fbff | i | .CONST 0x0869,0xfbff 0d4c 0872 fbfe | r | .CONST 0x0872,0xfbfe 0d4e 087f fbfd | | .CONST 0x087f,0xfbfd 0d50 0894 0402 | | .CONST 0x0894,0x0402 0d52 0894 0403 | | .CONST 0x0894,0x0403 0d54 0898 0404 | | .CONST 0x0898,0x0404 0d56 089c 0405 | | .CONST 0x089c,0x0405 0d58 08a7 0406 | | .CONST 0x08a7,0x0406 0d5a 08ad 0407 | | .CONST 0x08ad,0x0407 0d5c 08af 0408 | | .CONST 0x08af,0x0408 0d5e 08b1 0409 | | .CONST 0x08b1,0x0409 0d60 08b7 040a | | .CONST 0x08b7,0x040a 0d62 08b9 040b | | .CONST 0x08b9,0x040b 0d64 08bd 040c | | .CONST 0x08bd,0x040c 0d66 08bf 040d | | .CONST 0x08bf,0x040d 0d68 08c1 040e | | .CONST 0x08c1,0x040e 0d6a 08c3 040f | | .CONST 0x08c3,0x040f 0d6c 08c9 0410 | | .CONST 0x08c9,0x0410 0d6e 08cb 0411 | | .CONST 0x08cb,0x0411 0d70 08ce 0412 | | .CONST 0x08ce,0x0412 0d72 08d2 0413 | | .CONST 0x08d2,0x0413 0d74 08d8 0415 | | .CONST 0x08d8,0x0415 0d76 08e3 0416 | | .CONST 0x08e3,0x0416 0d78 08e9 0417 | | .CONST 0x08e9,0x0417 0d7a 08eb 0418 | | .CONST 0x08eb,0x0418 0d7c 08ed 0419 | | .CONST 0x08ed,0x0419 0d7e 08f3 041a | | .CONST 0x08f3,0x041a 0d80 08f5 041b | | .CONST 0x08f5,0x041b 0d82 08f9 041c | | .CONST 0x08f9,0x041c 0d84 08fb 041d | | .CONST 0x08fb,0x041d 0d86 08fd 041e | | .CONST 0x08fd,0x041e 0d88 08ff 041f | | .CONST 0x08ff,0x041f 0d8a 0905 0420 | | .CONST 0x0905,0x0420 0d8c 0907 0421 | !| .CONST 0x0907,0x0421 0d8e 090a 0422 | "| .CONST 0x090a,0x0422 0d90 090e 0423 | #| .CONST 0x090e,0x0423 0d92 090f 0424 | $| .CONST 0x090f,0x0424 0d94 0914 0414 | | .CONST 0x0914,0x0414 0d96 0919 0425 | %| .CONST 0x0919,0x0425 0d98 091a 0426 | &| .CONST 0x091a,0x0426 0d9a 0920 0427 | '| .CONST 0x0920,0x0427 0d9c 0922 0428 | " (| .CONST 0x0922,0x0428 0d9e 0926 0429 | & )| .CONST 0x0926,0x0429 0da0 0928 042a | ( *| .CONST 0x0928,0x042a 0da2 092a 042b | * +| .CONST 0x092a,0x042b 0da4 092c 042c | , ,| .CONST 0x092c,0x042c 0da6 0932 042d | 2 -| .CONST 0x0932,0x042d 0da8 0934 042e | 4 .| .CONST 0x0934,0x042e 0daa 0937 042f | 7 /| .CONST 0x0937,0x042f 0dac 093b 0430 | ; 0| .CONST 0x093b,0x0430 0dae 0940 0401 | @ | .CONST 0x0940,0x0401 0db0 0945 0431 | E 1| .CONST 0x0945,0x0431 0db2 0948 0432 | H 2| .CONST 0x0948,0x0432 0db4 094c 0433 | L 3| .CONST 0x094c,0x0433 0db6 0962 000a | b | .CONST 0x0962,0x000a 0db8 0965 000b | e | .CONST 0x0965,0x000b 0dba 0968 0001 | h | .CONST 0x0968,0x0001 0dbc 096e 000c | n | .CONST 0x096e,0x000c 0dbe 0000 0000 | | .BLANK 0000[0x42]