|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 DFS Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 DFS Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 4096 (0x1000)
Types: SEG
Notes: 5808_R1K_CODE
Names: »13000721.SEG«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »13000721.SEG«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »13000721.SEG«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »13000721.SEG«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »13000721.SEG«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »13000721.SEG«
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5808 |X | .CONST 0x5808 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0408 | | .CONST 0x0408 ; 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 0103 | | .CONST 0x0103 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0083 | | .CONST 0x0083 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0022 | " | .CONST 0x0022 ; Number of locals
000b INIT_0008:
000b 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x0 = .DEBUG 0x000b,0x04a2,0x8000,0x0000,0x000e,0x48e4,0x0000,0x000a
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0266 | f | Execute Discrete,Bounds
000d e001 | | Load 0x0,0x1
000e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
000f 02a0 | | Declare_Subprogram Null_Subprogram
0010 4801 |H | Short_Literal 0x1
0011 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
0012 00e4 | | Load_Encached Positive_Cache ; Debug Table 0x0.0x1 = 0x12,0xfffe
0013 4800 |H | Short_Literal 0x0
0014 4801 |H | Short_Literal 0x1
0015 4801 |H | Short_Literal 0x1
0016 4802 |H | Short_Literal 0x2
0017 0319 | | Declare_Type Variant_Record,Incomplete,Visible
0018 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0x18,0xfffd
001a 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x1a,0xfffc
001c 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x1c,0xfffb
001e 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x1e,0xfffa
0020 029a 00e3 | | Declare_Subprogram INIT_00e0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x20,0xfff9
0022 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x22,0xfff8
0024 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x24,0xfff7
0026 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x26,0xfff6
0028 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xa = 0x28,0xfff5
002a 029a 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xb = 0x2a,0xfff4
002c 0007 | | Action Break_Optional ; Debug Table 0x0.0xc = 0x2c,0xfff3
002d 0007 | | Action Break_Optional ; Debug Table 0x0.0xd = 0x2d,0xfff2
002e 029a 02c3 | | Declare_Subprogram INIT_02c0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xe = 0x2e,0xfff1
0030 e002 | | Load 0x0,0x2 ; Debug Table 0x0.0xf = 0x30,0xfff0
0031 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0032 e001 | | Load 0x0,0x1
0033 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
0034 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call
0036 4802 |H | Short_Literal 0x2
0037 032d | - | Declare_Type Record,Defined
0038 00e4 | | Load_Encached Positive_Cache ; Debug Table 0x0.0x10 = 0x38,0xffef
0039 0266 | f | Execute Discrete,Bounds
003a e21a | | Load 0x1,0x1a
003b 029f 030b | | Declare_Subprogram INIT_0308,For_Call
003d 4801 |H | Short_Literal 0x1
003e 0350 | P | Declare_Type Array,Defined,Bounds_With_Object
003f e21a | | Load 0x1,0x1a ; Debug Table 0x0.0x11 = 0x3f,0xffee
0040 0322 | " | Declare_Variable Record
0041 e21c | | Load 0x1,0x1c
0042 1c01 | | Execute_Immediate Run_Utility,0x1
0043 e002 | | Load 0x0,0x2
0044 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0045 e21c | | Load 0x1,0x1c
0046 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0047 4800 |H | Short_Literal 0x0
0048 e21c | | Load 0x1,0x1c
0049 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
004a 629d |b | Indirect_Literal Discrete,0x2e8,{0x00000000, 0x000e48e4} ; Debug Table 0x0.0x12 = 0x4a,0xffed
004b 4923 |I# | Short_Literal 0x123
004c e21a | | Load 0x1,0x1a
004d e21b | | Load 0x1,0x1b
004e e21c | | Load 0x1,0x1c
004f 6294 |b | Indirect_Literal Discrete,0x2e4,{0x00000000, 0x7fffffff}
0050 e003 | | Load 0x0,0x3
0051 0387 | | Declare_Variable Package
0052 00d8 | | Load_Top At_Offset_0
0053 020f | | Execute Module,Activate
0054 e21d | | Load 0x1,0x1d ; Debug Table 0x0.0x13 = 0x54,0xffec
0055 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0056 029f 0333 | 3| Declare_Subprogram INIT_0330,For_Call
0058 4800 |H | Short_Literal 0x0
0059 4801 |H | Short_Literal 0x1
005a 4800 |H | Short_Literal 0x0
005b e20e | | Load 0x1,0xe
005c 0307 | | Complete_Type Variant_Record,By_Defining
005d 00bf | | Action Accept_Activation
005e 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x005e,0x04cc,0x8000,0x0000,0x000e,0x4b24,0x0000,0x000b
; Debug Table 0x1.0x0 = 0x5e,0xffff
005f 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x5f,0xfffe
0060 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x60,0xfffd
0061 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x61,0xfffc
0062 0007 | | Action Break_Optional ; Debug Table 0x1.0x4 = 0x62,0xfffb
0063 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x1.0x5 = 0x63,0xfffa
0064 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0065 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x1.0x6 = 0x65,0xfff9
0066 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0067 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x7 = 0x67,0xfff8
0068 00c7 | | Action Elaborate_Subprogram
0069 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x8 = 0x69,0xfff7
006a 00c7 | | Action Elaborate_Subprogram
006b 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x9 = 0x6b,0xfff6
006c 00c7 | | Action Elaborate_Subprogram
006d 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0xa = 0x6d,0xfff5
006e 00c7 | | Action Elaborate_Subprogram
006f 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0xb = 0x6f,0xfff4
0070 00c7 | | Action Elaborate_Subprogram
0071 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0xc = 0x71,0xfff3
0072 00c7 | | Action Elaborate_Subprogram
0073 029d 0363 | c| Declare_Subprogram INIT_0360,For_Outer_Call ; Debug Table 0x1.0xd = 0x73,0xfff2
0075 029d 03cb | | Declare_Subprogram INIT_03c8,For_Outer_Call ; Debug Table 0x1.0xe = 0x75,0xfff1
0077 029d 03e3 | | Declare_Subprogram INIT_03e0,For_Outer_Call ; Debug Table 0x1.0xf = 0x77,0xfff0
0079 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x10 = 0x79,0xffef
007a 00c7 | | Action Elaborate_Subprogram
007b 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0x11 = 0x7b,0xffee
007c 00c7 | | Action Elaborate_Subprogram
007d 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x12 = 0x7d,0xffed
007e 00c7 | | Action Elaborate_Subprogram
007f 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x13 = 0x7f,0xffec
0080 00c7 | | Action Elaborate_Subprogram
0081 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0x14 = 0x81,0xffeb
0082 00c7 | | Action Elaborate_Subprogram
0083 BODY_0008:
0083 00bc | | Action Signal_Activated
0084 00bb | | Action Signal_Completion
0085 0000 0000 | | .XXX[0x3]
0087 0000 | |
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008b | | .CONST 0x008b ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0001 | | .CONST 0x0001 ; Number of locals
008b BODY_0088:
008b INIT_0088:
008b e5ff | | Load 0x2,-0x1 ; Debug Table 0x2 = .DEBUG 0x008b,0x04f8,0x0002,0x0000,0x000e,0x48e4,0x0000,0x0020
; Debug Table 0x2.0x0 = 0x8b,0x1
008c 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
008d e21d | | Load 0x1,0x1d
008e 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
008f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0093 | | .CONST 0x0093 ; Address of begin
0091 0004 | | .CONST 0x0004 ; Address of exception handler
0092 0001 | | .CONST 0x0001 ; Number of locals
0093 BODY_0090:
0093 INIT_0090:
0093 e5fe | | Load 0x2,-0x2 ; Debug Table 0x3 = .DEBUG 0x0093,0x04fc,0x0002,0x0000,0x000e,0x48e4,0x0000,0x0029
; Debug Table 0x3.0x0 = 0x93,0x1
0094 00e4 | | Load_Encached Positive_Cache
0095 025b | [ | Execute Discrete,Check_In_Type
0096 e5ff | | Load 0x2,-0x1
0097 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0098 e21d | | Load 0x1,0x1d
0099 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
009a 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
009b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
009c 0000 0000 | | .BLANK 0000[0x4]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a9 | | .CONST 0x00a9 ; Address of begin
00a1 00c6 | | .CONST 0x00c6 ; Address of exception handler
00a2 0003 | | .CONST 0x0003 ; Number of locals
00a3 INIT_00a0:
00a3 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x4 = .DEBUG 0x00a3,0x0500,0x0001,0x0000,0x000e,0x48e4,0x0000,0x0038
; Debug Table 0x4.0x0 = 0xa3,0xffff
00a4 e002 | | Load 0x0,0x2 ; Debug Table 0x4.0x1 = 0xa4,0xfffe
00a5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00a6 0322 | " | Declare_Variable Record
00a7 e403 | | Load 0x2,0x3
00a8 1c00 | | Execute_Immediate Run_Utility,0x0
00a9 BODY_00a0:
00a9 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0x2 = 0xa9,0x1
00aa a402 | | Store_Unchecked 0x2,0x2
00ab 0007 | | Action Break_Optional ; Debug Table 0x4.0x3 = 0xab,0x2
00ac e402 | | Load 0x2,0x2 ; Debug Table 0x4.0x4 = 0xac,0x3
00ad 00e4 | | Load_Encached Positive_Cache
00ae 025b | [ | Execute Discrete,Check_In_Type
00af e5ff | | Load 0x2,-0x1
00b0 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
00b1 e21d | | Load 0x1,0x1d
00b2 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
00b3 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
00b4 e403 | | Load 0x2,0x3
00b5 017d | } | Execute Record,Structure_Write
00b6 e403 | | Load 0x2,0x3 ; Debug Table 0x4.0x5 = 0xb6,0x4
00b7 e002 | | Load 0x0,0x2
00b8 181f | | Execute Package,Field_Execute,Field_Number 0x1f
00b9 e5fe | | Load 0x2,-0x2
00ba 027f | | Execute Discrete,Equal
00bb 6806 |h | Jump_Zero 0xc2
00bc 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0x6 = 0xbc,0x5
00bd a5fc | | Store_Unchecked 0x2,-0x4
00be e403 | | Load 0x2,0x3 ; Debug Table 0x4.0x7 = 0xbe,0x6
00bf e5fd | | Load 0x2,-0x3
00c0 017d | } | Execute Record,Structure_Write
00c1 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x4.0x8 = 0xc1,0x7
00c2 e402 | | Load 0x2,0x2 ; Debug Table 0x4.0x9 = 0xc2,0x8
00c3 0a01 | | Execute_Immediate Plus,0x1
00c4 c402 | | Store 0x2,0x2
00c5 7fe6 | | Jump 0xac
00c6 TRAP_00a0:
00c6 0007 | | Action Break_Optional
00c7 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0xa = 0xc7,0x9
00c8 a5fc | | Store_Unchecked 0x2,-0x4
00c9 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00ca 0000 0000 | | .BLANK 0000[0x6]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d3 | | .CONST 0x00d3 ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 0001 | | .CONST 0x0001 ; Number of locals
00d3 BODY_00d0:
00d3 INIT_00d0:
00d3 e5ff | | Load 0x2,-0x1 ; Debug Table 0x5 = .DEBUG 0x00d3,0x0518,0x0001,0x0000,0x000e,0x48e4,0x0000,0x0050
; Debug Table 0x5.0x0 = 0xd3,0x1
00d4 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
00d5 e21d | | Load 0x1,0x1d
00d6 1b11 | | Execute Package,Field_Read,Field_Number 0x11
00d7 4800 |H | Short_Literal 0x0
00d8 e21d | | Load 0x1,0x1d
00d9 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
00da 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00db 0000 0000 | | .BLANK 0000[0x5]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e9 | | .CONST 0x00e9 ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0003 | | .CONST 0x0003 ; Number of locals
00e3 INIT_00e0:
00e3 e002 | | Load 0x0,0x2 ; Debug Table 0x6 = .DEBUG 0x00e3,0x051c,0x0001,0x0000,0x000e,0x48e4,0x0000,0x0058
; Debug Table 0x6.0x0 = 0xe3,0xffff
00e4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00e5 0322 | " | Declare_Variable Record
00e6 e402 | | Load 0x2,0x2
00e7 1c00 | | Execute_Immediate Run_Utility,0x0
00e8 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x6.0x1 = 0xe8,0xfffe
00e9 BODY_00e0:
00e9 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x6.0x2 = 0xe9,0x1
00ea e402 | | Load 0x2,0x2
00eb e5ff | | Load 0x2,-0x1
00ec e002 | | Load 0x0,0x2
00ed 181f | | Execute Package,Field_Execute,Field_Number 0x1f
00ee e5fd | | Load 0x2,-0x3
00ef 8211 | | Call 0x1,0x11
00f0 00d1 | | Pop_Control Pop_Count_1
00f1 c403 | | Store 0x2,0x3
00f2 e403 | | Load 0x2,0x3 ; Debug Table 0x6.0x3 = 0xf2,0x2
00f3 700f |p | Jump_Nonzero 0x103
00f4 e5fd | | Load 0x2,-0x3 ; Debug Table 0x6.0x4 = 0xf4,0x3
00f5 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
00f6 e21a | | Load 0x1,0x1a
00f7 0322 | " | Declare_Variable Record
00f8 e405 | | Load 0x2,0x5
00f9 1c01 | | Execute_Immediate Run_Utility,0x1
00fa e5ff | | Load 0x2,-0x1
00fb e405 | | Load 0x2,0x5
00fc 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00fd e5fe | | Load 0x2,-0x2
00fe e405 | | Load 0x2,0x5
00ff 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0100 e21d | | Load 0x1,0x1d
0101 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0102 00d1 | | Pop_Control Pop_Count_1
0103 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0104 0000 0000 | | .BLANK 0000[0x4]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 0111 | | .CONST 0x0111 ; Address of begin
0109 0132 | 2 | .CONST 0x0132 ; Address of exception handler
010a 0003 | | .CONST 0x0003 ; Number of locals
010b INIT_0108:
010b 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x7 = .DEBUG 0x010b,0x0528,0x0001,0x0000,0x000e,0x48e4,0x0000,0x006f
; Debug Table 0x7.0x0 = 0x10b,0xffff
010c e002 | | Load 0x0,0x2 ; Debug Table 0x7.0x1 = 0x10c,0xfffe
010d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
010e 0322 | " | Declare_Variable Record
010f e403 | | Load 0x2,0x3
0110 1c00 | | Execute_Immediate Run_Utility,0x0
0111 BODY_0108:
0111 4801 |H | Short_Literal 0x1 ; Debug Table 0x7.0x2 = 0x111,0x1
0112 a402 | | Store_Unchecked 0x2,0x2
0113 0007 | | Action Break_Optional ; Debug Table 0x7.0x3 = 0x113,0x2
0114 e402 | | Load 0x2,0x2 ; Debug Table 0x7.0x4 = 0x114,0x3
0115 00e4 | | Load_Encached Positive_Cache
0116 025b | [ | Execute Discrete,Check_In_Type
0117 e5fe | | Load 0x2,-0x2
0118 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0119 e21d | | Load 0x1,0x1d
011a 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
011b 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
011c e403 | | Load 0x2,0x3
011d 017d | } | Execute Record,Structure_Write
011e e403 | | Load 0x2,0x3 ; Debug Table 0x7.0x5 = 0x11e,0x4
011f e002 | | Load 0x0,0x2
0120 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0121 e5ff | | Load 0x2,-0x1
0122 027f | | Execute Discrete,Equal
0123 680a |h | Jump_Zero 0x12e
0124 e5fe | | Load 0x2,-0x2 ; Debug Table 0x7.0x6 = 0x124,0x5
0125 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0126 4801 |H | Short_Literal 0x1
0127 e402 | | Load 0x2,0x2
0128 00e4 | | Load_Encached Positive_Cache
0129 025b | [ | Execute Discrete,Check_In_Type
012a e21d | | Load 0x1,0x1d
012b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
012c 00d1 | | Pop_Control Pop_Count_1
012d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x7.0x7 = 0x12d,0x6
012e e402 | | Load 0x2,0x2 ; Debug Table 0x7.0x8 = 0x12e,0x7
012f 0a01 | | Execute_Immediate Plus,0x1
0130 c402 | | Store 0x2,0x2
0131 7fe2 | | Jump 0x114
0132 TRAP_0108:
0132 0007 | | Action Break_Optional
0133 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x7.0x9 = 0x133,0x8
0134 0000 0000 | | .BLANK 0000[0x4]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 0142 | B | .CONST 0x0142 ; Address of begin
0139 0172 | r | .CONST 0x0172 ; Address of exception handler
013a 0005 | | .CONST 0x0005 ; Number of locals
013b INIT_0138:
013b 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8 = .DEBUG 0x013b,0x053e,0x0002,0x0000,0x000e,0x48e4,0x0000,0x007d
; Debug Table 0x8.0x0 = 0x13b,0xffff
013c e004 | | Load 0x0,0x4 ; Debug Table 0x8.0x1 = 0x13c,0xfffe
013d 1b11 | | Execute Package,Field_Read,Field_Number 0x11
013e e004 | | Load 0x0,0x4 ; Debug Table 0x8.0x2 = 0x13e,0xfffd
013f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0140 e004 | | Load 0x0,0x4 ; Debug Table 0x8.0x3 = 0x140,0xfffc
0141 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0142 BODY_0138:
0142 e004 | | Load 0x0,0x4 ; Debug Table 0x8.0x4 = 0x142,0x1
0143 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0144 e004 | | Load 0x0,0x4
0145 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0146 e004 | | Load 0x0,0x4
0147 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0148 e5fd | | Load 0x2,-0x3
0149 e005 | | Load 0x0,0x5
014a 1820 | | Execute Package,Field_Execute,Field_Number 0x20
014b c403 | | Store 0x2,0x3
014c c404 | | Store 0x2,0x4
014d c405 | | Store 0x2,0x5
014e 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x5 = 0x14e,0x2
014f a402 | | Store_Unchecked 0x2,0x2
0150 0007 | | Action Break_Optional ; Debug Table 0x8.0x6 = 0x150,0x3
0151 e402 | | Load 0x2,0x2 ; Debug Table 0x8.0x7 = 0x151,0x4
0152 e5ff | | Load 0x2,-0x1
0153 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0154 e21d | | Load 0x1,0x1d
0155 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0156 027d | } | Execute Discrete,Greater
0157 7018 |p | Jump_Nonzero 0x170
0158 e21e | | Load 0x1,0x1e ; Debug Table 0x8.0x8 = 0x158,0x5
0159 0a01 | | Execute_Immediate Plus,0x1
015a c21e | | Store 0x1,0x1e
015b e405 | | Load 0x2,0x5 ; Debug Table 0x8.0x9 = 0x15b,0x6
015c e404 | | Load 0x2,0x4
015d e403 | | Load 0x2,0x3
015e e5fe | | Load 0x2,-0x2
015f e402 | | Load 0x2,0x2
0160 00e4 | | Load_Encached Positive_Cache
0161 025b | [ | Execute Discrete,Check_In_Type
0162 e5ff | | Load 0x2,-0x1
0163 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0164 e21d | | Load 0x1,0x1d
0165 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0166 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0167 e002 | | Load 0x0,0x2
0168 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
0169 6802 |h | Jump_Zero 0x16c
016a 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0xa = 0x16a,0x7
016b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
016c e402 | | Load 0x2,0x2 ; Debug Table 0x8.0xb = 0x16c,0x8
016d 0a01 | | Execute_Immediate Plus,0x1
016e c402 | | Store 0x2,0x2
016f 7fe1 | | Jump 0x151
0170 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0xc = 0x170,0x9
0171 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0172 TRAP_0138:
0172 0007 | | Action Break_Optional
0173 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0xd = 0x173,0xa
0174 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0175 0000 0000 | | .XXX[0x3]
0177 0000 | |
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017c | | | .CONST 0x017c ; Address of begin
0179 019e | | .CONST 0x019e ; Address of exception handler
017a 0002 | | .CONST 0x0002 ; Number of locals
017b INIT_0178:
017b 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x9 = .DEBUG 0x017b,0x055c,0x0002,0x0000,0x000e,0x48e4,0x0000,0x0092
; Debug Table 0x9.0x0 = 0x17b,0xffff
017c BODY_0178:
017c 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x1 = 0x17c,0x1
017d a402 | | Store_Unchecked 0x2,0x2
017e 0007 | | Action Break_Optional ; Debug Table 0x9.0x2 = 0x17e,0x2
017f e402 | | Load 0x2,0x2 ; Debug Table 0x9.0x3 = 0x17f,0x3
0180 e5ff | | Load 0x2,-0x1
0181 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0182 e21d | | Load 0x1,0x1d
0183 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0184 027d | } | Execute Discrete,Greater
0185 7016 |p | Jump_Nonzero 0x19c
0186 e21f | | Load 0x1,0x1f ; Debug Table 0x9.0x4 = 0x186,0x4
0187 0a01 | | Execute_Immediate Plus,0x1
0188 c21f | | Store 0x1,0x1f
0189 e5fd | | Load 0x2,-0x3 ; Debug Table 0x9.0x5 = 0x189,0x5
018a e5fe | | Load 0x2,-0x2
018b e402 | | Load 0x2,0x2
018c 00e4 | | Load_Encached Positive_Cache
018d 025b | [ | Execute Discrete,Check_In_Type
018e e5ff | | Load 0x2,-0x1
018f 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0190 e21d | | Load 0x1,0x1d
0191 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0192 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0193 e002 | | Load 0x0,0x2
0194 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
0195 6802 |h | Jump_Zero 0x198
0196 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x6 = 0x196,0x6
0197 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0198 e402 | | Load 0x2,0x2 ; Debug Table 0x9.0x7 = 0x198,0x7
0199 0a01 | | Execute_Immediate Plus,0x1
019a c402 | | Store 0x2,0x2
019b 7fe3 | | Jump 0x17f
019c 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x8 = 0x19c,0x8
019d 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
019e TRAP_0178:
019e 0007 | | Action Break_Optional
019f 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x9 = 0x19f,0x9
01a0 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
01a1 0000 0000 | | .BLANK 0000[0x7]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01bb | | .CONST 0x01bb ; Address of begin
01a9 026d | m | .CONST 0x026d ; Address of exception handler
01aa 0009 | | .CONST 0x0009 ; Number of locals
01ab INIT_01a8:
01ab 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xa = .DEBUG 0x01ab,0x0572,0x0001,0x0000,0x000e,0x48e4,0x0000,0x00a7
; Debug Table 0xa.0x0 = 0x1ab,0xffff
01ac e002 | | Load 0x0,0x2 ; Debug Table 0xa.0x1 = 0x1ac,0xfffe
01ad 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01ae 0322 | " | Declare_Variable Record
01af e403 | | Load 0x2,0x3
01b0 1c00 | | Execute_Immediate Run_Utility,0x0
01b1 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xa.0x2 = 0x1b1,0xfffd
01b2 e004 | | Load 0x0,0x4 ; Debug Table 0xa.0x3 = 0x1b2,0xfffc
01b3 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01b4 e004 | | Load 0x0,0x4 ; Debug Table 0xa.0x4 = 0x1b4,0xfffb
01b5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01b6 e004 | | Load 0x0,0x4 ; Debug Table 0xa.0x5 = 0x1b6,0xfffa
01b7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01b8 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xa.0x6 = 0x1b8,0xfff9
01b9 e001 | | Load 0x0,0x1 ; Debug Table 0xa.0x7 = 0x1b9,0xfff8
01ba 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
01bb BODY_01a8:
01bb e5fd | | Load 0x2,-0x3 ; Debug Table 0xa.0x8 = 0x1bb,0x1
01bc 820f | | Call 0x1,0xf
01bd a404 | | Store_Unchecked 0x2,0x4
01be e004 | | Load 0x0,0x4 ; Debug Table 0xa.0x9 = 0x1be,0x2
01bf 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01c0 e004 | | Load 0x0,0x4
01c1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01c2 e004 | | Load 0x0,0x4
01c3 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01c4 e5fb | | Load 0x2,-0x5
01c5 e005 | | Load 0x0,0x5
01c6 1820 | | Execute Package,Field_Execute,Field_Number 0x20
01c7 c405 | | Store 0x2,0x5
01c8 c406 | | Store 0x2,0x6
01c9 c407 | | Store 0x2,0x7
01ca 4801 |H | Short_Literal 0x1 ; Debug Table 0xa.0xa = 0x1ca,0x3
01cb a402 | | Store_Unchecked 0x2,0x2
01cc 0007 | | Action Break_Optional ; Debug Table 0xa.0xb = 0x1cc,0x4
01cd e402 | | Load 0x2,0x2 ; Debug Table 0xa.0xc = 0x1cd,0x5
01ce e5fc | | Load 0x2,-0x4
01cf 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
01d0 e21d | | Load 0x1,0x1d
01d1 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
01d2 027d | } | Execute Discrete,Greater
01d3 7098 |p | Jump_Nonzero 0x26c
01d4 e402 | | Load 0x2,0x2 ; Debug Table 0xa.0xd = 0x1d4,0x6
01d5 00e4 | | Load_Encached Positive_Cache
01d6 025b | [ | Execute Discrete,Check_In_Type
01d7 e5fc | | Load 0x2,-0x4
01d8 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
01d9 e21d | | Load 0x1,0x1d
01da 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
01db 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01dc e403 | | Load 0x2,0x3
01dd 017d | } | Execute Record,Structure_Write
01de e402 | | Load 0x2,0x2 ; Debug Table 0xa.0xe = 0x1de,0x7
01df 00e4 | | Load_Encached Positive_Cache
01e0 025b | [ | Execute Discrete,Check_In_Type
01e1 e5fc | | Load 0x2,-0x4
01e2 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
01e3 e21d | | Load 0x1,0x1d
01e4 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
01e5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01e6 a409 | | Store_Unchecked 0x2,0x9
01e7 e21e | | Load 0x1,0x1e ; Debug Table 0xa.0xf = 0x1e7,0x8
01e8 0a01 | | Execute_Immediate Plus,0x1
01e9 c21e | | Store 0x1,0x1e
01ea e407 | | Load 0x2,0x7 ; Debug Table 0xa.0x10 = 0x1ea,0x9
01eb e406 | | Load 0x2,0x6
01ec e405 | | Load 0x2,0x5
01ed e5ff | | Load 0x2,-0x1
01ee e403 | | Load 0x2,0x3
01ef e002 | | Load 0x0,0x2
01f0 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
01f1 6876 |hv | Jump_Zero 0x268
01f2 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xa.0x11 = 0x1f2,0xa
01f3 e5fb | | Load 0x2,-0x5
01f4 e403 | | Load 0x2,0x3
01f5 e002 | | Load 0x0,0x2
01f6 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
01f7 e5ff | | Load 0x2,-0x1
01f8 8220 | | Call 0x1,0x20
01f9 00d1 | | Pop_Control Pop_Count_1
01fa c408 | | Store 0x2,0x8
01fb e408 | | Load 0x2,0x8 ; Debug Table 0xa.0x12 = 0x1fb,0xb
01fc 686b |hk | Jump_Zero 0x268
01fd e5fb | | Load 0x2,-0x5
01fe e403 | | Load 0x2,0x3
01ff 8221 | ! | Call 0x1,0x21
0200 6867 |hg | Jump_Zero 0x268
0201 e5fb | | Load 0x2,-0x5
0202 e409 | | Load 0x2,0x9
0203 8222 | " | Call 0x1,0x22
0204 6863 |hc | Jump_Zero 0x268
0205 e403 | | Load 0x2,0x3 ; Debug Table 0xa.0x13 = 0x205,0xc
0206 e002 | | Load 0x0,0x2
0207 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0208 4602 |F | Jump_Case 0x3
0209 7802 |x | Jump 0x20c ; case 0x0
020a 785d |x] | Jump 0x268 ; case 0x1
020b 785c |x\ | Jump 0x268 ; case 0x2
020c e403 | | Load 0x2,0x3 ; Debug Table 0xa.0x14 = 0x20c,0xd
020d e002 | | Load 0x0,0x2
020e 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
020f 0f01 | | Execute_Immediate Equal,0x1
0210 683c |h< | Jump_Zero 0x24d
0211 e403 | | Load 0x2,0x3 ; Debug Table 0xa.0x15 = 0x211,0xe
0212 e002 | | Load 0x0,0x2
0213 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0214 7012 |p | Jump_Nonzero 0x227
0215 e5fe | | Load 0x2,-0x2 ; Debug Table 0xa.0x16 = 0x215,0xf
0216 680e |h | Jump_Zero 0x225
0217 e5f9 | | Load 0x2,-0x7 ; Debug Table 0xa.0x17 = 0x217,0x10
0218 e5fa | | Load 0x2,-0x6
0219 e5fc | | Load 0x2,-0x4
021a e403 | | Load 0x2,0x3
021b e002 | | Load 0x0,0x2
021c 181f | | Execute Package,Field_Execute,Field_Number 0x1f
021d e006 | | Load 0x0,0x6
021e 180e | | Execute Package,Field_Execute,Field_Number 0xe
021f 00d2 | | Pop_Control Pop_Count_2
0220 c5f9 | | Store 0x2,-0x7
0221 e402 | | Load 0x2,0x2 ; Debug Table 0xa.0x18 = 0x221,0x11
0222 0aff | | Execute_Immediate Plus,-0x1
0223 c402 | | Store 0x2,0x2
0224 7822 |x" | Jump 0x247
0225 60ba |` | Indirect_Literal Discrete,0x2e0,{0x00000000, 0x0e48e401} ; Debug Table 0xa.0x19 = 0x225,0x12
0226 0257 | W | Execute Discrete,Raise
0227 e403 | | Load 0x2,0x3 ; Debug Table 0xa.0x1a = 0x227,0x13
0228 e002 | | Load 0x0,0x2
0229 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
022a 0e01 | | Execute_Immediate Not_Equal,0x1
022b 681b |h | Jump_Zero 0x247
022c e5fe | | Load 0x2,-0x2 ; Debug Table 0xa.0x1b = 0x22c,0x14
022d 6817 |h | Jump_Zero 0x245
022e e403 | | Load 0x2,0x3 ; Debug Table 0xa.0x1c = 0x22e,0x15
022f e002 | | Load 0x0,0x2
0230 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
0231 00d1 | | Pop_Control Pop_Count_1
0232 e5fc | | Load 0x2,-0x4 ; Debug Table 0xa.0x1d = 0x232,0x16
0233 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0234 e21a | | Load 0x1,0x1a
0235 0322 | " | Declare_Variable Record
0236 e40b | | Load 0x2,0xb
0237 1c01 | | Execute_Immediate Run_Utility,0x1
0238 e403 | | Load 0x2,0x3
0239 e40b | | Load 0x2,0xb
023a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
023b e409 | | Load 0x2,0x9
023c e40b | | Load 0x2,0xb
023d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
023e e402 | | Load 0x2,0x2
023f 00e4 | | Load_Encached Positive_Cache
0240 025b | [ | Execute Discrete,Check_In_Type
0241 e21d | | Load 0x1,0x1d
0242 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0243 00d1 | | Pop_Control Pop_Count_1
0244 7802 |x | Jump 0x247
0245 609a |` | Indirect_Literal Discrete,0x2e0,{0x00000000, 0x0e48e401} ; Debug Table 0xa.0x1e = 0x245,0x17
0246 0257 | W | Execute Discrete,Raise
0247 e5fd | | Load 0x2,-0x3 ; Debug Table 0xa.0x1f = 0x247,0x18
0248 4800 |H | Short_Literal 0x0
0249 e403 | | Load 0x2,0x3
024a 8213 | | Call 0x1,0x13
024b 00d1 | | Pop_Control Pop_Count_1
024c 781b |x | Jump 0x268
024d e5fe | | Load 0x2,-0x2 ; Debug Table 0xa.0x20 = 0x24d,0x19
024e 6817 |h | Jump_Zero 0x266
024f e403 | | Load 0x2,0x3 ; Debug Table 0xa.0x21 = 0x24f,0x1a
0250 e002 | | Load 0x0,0x2
0251 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
0252 00d1 | | Pop_Control Pop_Count_1
0253 e5fc | | Load 0x2,-0x4 ; Debug Table 0xa.0x22 = 0x253,0x1b
0254 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0255 e21a | | Load 0x1,0x1a
0256 0322 | " | Declare_Variable Record
0257 e40b | | Load 0x2,0xb
0258 1c01 | | Execute_Immediate Run_Utility,0x1
0259 e403 | | Load 0x2,0x3
025a e40b | | Load 0x2,0xb
025b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
025c e409 | | Load 0x2,0x9
025d e40b | | Load 0x2,0xb
025e 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
025f e402 | | Load 0x2,0x2
0260 00e4 | | Load_Encached Positive_Cache
0261 025b | [ | Execute Discrete,Check_In_Type
0262 e21d | | Load 0x1,0x1d
0263 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0264 00d1 | | Pop_Control Pop_Count_1
0265 7802 |x | Jump 0x268
0266 6079 |`y | Indirect_Literal Discrete,0x2e0,{0x00000000, 0x0e48e401} ; Debug Table 0xa.0x23 = 0x266,0x1c
0267 0257 | W | Execute Discrete,Raise
0268 e402 | | Load 0x2,0x2 ; Debug Table 0xa.0x24 = 0x268,0x1e
0269 0a01 | | Execute_Immediate Plus,0x1
026a c402 | | Store 0x2,0x2
026b 7f61 | a | Jump 0x1cd
026c 4503 |E | Exit_Suprogram New_Top_Offset 0x3
026d TRAP_01a8:
026d 0007 | | Action Break_Optional
026e e5fd | | Load 0x2,-0x3 ; Debug Table 0xa.0x25 = 0x26e,0x1f
026f 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0270 e21d | | Load 0x1,0x1d
0271 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0272 e404 | | Load 0x2,0x4
0273 e21d | | Load 0x1,0x1d
0274 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0275 00d1 | | Pop_Control Pop_Count_1
0276 e40a | | Load 0x2,0xa ; Debug Table 0xa.0x26 = 0x276,0x20
0277 0101 | | Execute Exception,Reraise
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 0282 | | .CONST 0x0282 ; Address of begin
0279 02b3 | | .CONST 0x02b3 ; Address of exception handler
027a 0004 | | .CONST 0x0004 ; Number of locals
027b INIT_0278:
027b 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xb = .DEBUG 0x027b,0x05c2,0x0001,0x0000,0x000e,0x48e4,0x0000,0x00cc
; Debug Table 0xb.0x0 = 0x27b,0xffff
027c e002 | | Load 0x0,0x2 ; Debug Table 0xb.0x1 = 0x27c,0xfffe
027d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
027e 0322 | " | Declare_Variable Record
027f e403 | | Load 0x2,0x3
0280 1c00 | | Execute_Immediate Run_Utility,0x0
0281 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xb.0x2 = 0x281,0xfffd
0282 BODY_0278:
0282 e5fc | | Load 0x2,-0x4 ; Debug Table 0xb.0x3 = 0x282,0x1
0283 820f | | Call 0x1,0xf
0284 a404 | | Store_Unchecked 0x2,0x4
0285 4801 |H | Short_Literal 0x1 ; Debug Table 0xb.0x4 = 0x285,0x2
0286 a402 | | Store_Unchecked 0x2,0x2
0287 0007 | | Action Break_Optional ; Debug Table 0xb.0x5 = 0x287,0x3
0288 e402 | | Load 0x2,0x2 ; Debug Table 0xb.0x6 = 0x288,0x4
0289 e5fb | | Load 0x2,-0x5
028a 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
028b e21d | | Load 0x1,0x1d
028c 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
028d 027d | } | Execute Discrete,Greater
028e 7023 |p# | Jump_Nonzero 0x2b2
028f e402 | | Load 0x2,0x2 ; Debug Table 0xb.0x7 = 0x28f,0x5
0290 00e4 | | Load_Encached Positive_Cache
0291 025b | [ | Execute Discrete,Check_In_Type
0292 e5fb | | Load 0x2,-0x5
0293 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0294 e21d | | Load 0x1,0x1d
0295 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0296 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0297 e403 | | Load 0x2,0x3
0298 017d | } | Execute Record,Structure_Write
0299 e21f | | Load 0x1,0x1f ; Debug Table 0xb.0x8 = 0x299,0x6
029a 0a01 | | Execute_Immediate Plus,0x1
029b c21f | | Store 0x1,0x1f
029c e5fe | | Load 0x2,-0x2 ; Debug Table 0xb.0x9 = 0x29c,0x7
029d e5ff | | Load 0x2,-0x1
029e e403 | | Load 0x2,0x3
029f e002 | | Load 0x0,0x2
02a0 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
02a1 680c |h | Jump_Zero 0x2ae
02a2 e403 | | Load 0x2,0x3 ; Debug Table 0xb.0xa = 0x2a2,0x8
02a3 e002 | | Load 0x0,0x2
02a4 181e | | Execute Package,Field_Execute,Field_Number 0x1e
02a5 4602 |F | Jump_Case 0x3
02a6 7807 |x | Jump 0x2ae ; case 0x0
02a7 7801 |x | Jump 0x2a9 ; case 0x1
02a8 7805 |x | Jump 0x2ae ; case 0x2
02a9 e5fc | | Load 0x2,-0x4 ; Debug Table 0xb.0xb = 0x2a9,0x9
02aa 4800 |H | Short_Literal 0x0
02ab e403 | | Load 0x2,0x3
02ac 8213 | | Call 0x1,0x13
02ad 00d1 | | Pop_Control Pop_Count_1
02ae e402 | | Load 0x2,0x2 ; Debug Table 0xb.0xc = 0x2ae,0xb
02af 0a01 | | Execute_Immediate Plus,0x1
02b0 c402 | | Store 0x2,0x2
02b1 7fd6 | | Jump 0x288
02b2 4504 |E | Exit_Suprogram New_Top_Offset 0x4
02b3 TRAP_0278:
02b3 0007 | | Action Break_Optional
02b4 e5fc | | Load 0x2,-0x4 ; Debug Table 0xb.0xd = 0x2b4,0xc
02b5 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
02b6 e21d | | Load 0x1,0x1d
02b7 1b11 | | Execute Package,Field_Read,Field_Number 0x11
02b8 e404 | | Load 0x2,0x4
02b9 e21d | | Load 0x1,0x1d
02ba 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
02bb 00d1 | | Pop_Control Pop_Count_1
02bc e405 | | Load 0x2,0x5 ; Debug Table 0xb.0xe = 0x2bc,0xd
02bd 0101 | | Execute Exception,Reraise
02be 0000 0000 | | .XXX[0x2]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c3 | | .CONST 0x02c3 ; Address of begin
02c1 0004 | | .CONST 0x0004 ; Address of exception handler
02c2 0001 | | .CONST 0x0001 ; Number of locals
02c3 BODY_02c0:
02c3 INIT_02c0:
02c3 4800 |H | Short_Literal 0x0 ; Debug Table 0xc = .DEBUG 0x02c3,0x05e2,0x0001,0x0000,0x000e,0x48e4,0x0000,0x00ef
; Debug Table 0xc.0x0 = 0x2c3,0x1
02c4 0092 03ef | | Action Push_String_Extended,0x3ef ; "Items.Check* calls = "
02c6 e007 | | Load 0x0,0x7
02c7 180d | | Execute Package,Field_Execute,Field_Number 0xd
02c8 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0x1 = 0x2c8,0x2
02c9 480a |H | Short_Literal 0xa
02ca e21e | | Load 0x1,0x1e
02cb e007 | | Load 0x0,0x7
02cc 180f | | Execute Package,Field_Execute,Field_Number 0xf
02cd 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0x2 = 0x2cd,0x3
02ce e007 | | Load 0x0,0x7
02cf 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02d0 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0x3 = 0x2d0,0x4
02d1 0092 03f0 | | Action Push_String_Extended,0x3f0 ; "Items.Check(Exc)* = "
02d3 e007 | | Load 0x0,0x7
02d4 180d | | Execute Package,Field_Execute,Field_Number 0xd
02d5 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0x4 = 0x2d5,0x5
02d6 480a |H | Short_Literal 0xa
02d7 e21f | | Load 0x1,0x1f
02d8 e007 | | Load 0x0,0x7
02d9 180f | | Execute Package,Field_Execute,Field_Number 0xf
02da 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0x5 = 0x2da,0x6
02db e007 | | Load 0x0,0x7
02dc 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02dd 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02de 0000 0000 | | .XXX[0x2]
02e0 0000 0000 | | .LITERAL {0x00000000, 0x0e48e401}
02e4 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
02e8 0000 0000 | | .LITERAL {0x00000000, 0x000e48e4}
02ec 0000 0000 | | .BLANK 0000[0x4]
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 02f3 | | .CONST 0x02f3 ; Address of begin
02f1 0004 | | .CONST 0x0004 ; Address of exception handler
02f2 0001 | | .CONST 0x0001 ; Number of locals
02f3 BODY_02f0:
02f3 INIT_02f0:
02f3 4608 |F | Jump_Case 0x9 ; Debug Table 0xd = .DEBUG 0x02f3,0x05f0,0x0005,0x0000,0x000e,0x48e4,0x0000,0x00f4
02f4 7808 |x | Jump 0x2fd ; case 0x0
02f5 780b |x | Jump 0x301 ; case 0x1
02f6 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
02f7 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
02f8 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
02f9 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5
02fa 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6
02fb 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7
02fc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x8
02fd e5ff | | Load 0x2,-0x1
02fe 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02ff 1c00 | | Execute_Immediate Run_Utility,0x0
0300 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0301 e5ff | | Load 0x2,-0x1
0302 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0303 1c01 | | Execute_Immediate Run_Utility,0x1
0304 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0305 0000 0000 | | .XXX[0x3]
0307 0000 | |
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 030b | | .CONST 0x030b ; Address of begin
0309 0004 | | .CONST 0x0004 ; Address of exception handler
030a 0001 | | .CONST 0x0001 ; Number of locals
030b BODY_0308:
030b INIT_0308:
030b 4605 |F | Jump_Case 0x6 ; Debug Table 0xe = .DEBUG 0x030b,0x05f2,0x0005,0x0000,0x000e,0x48e4,0x0000,0x0108
030c 7804 |x | Jump 0x311 ; case 0x0
030d 7815 |x | Jump 0x323 ; case 0x1
030e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
030f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
0310 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
0311 e5ff | | Load 0x2,-0x1 ; case 0x5
0312 01d8 | | Execute Vector,Element_Type
0313 0322 | " | Declare_Variable Record
0314 00d8 | | Load_Top At_Offset_0
0315 1c00 | | Execute_Immediate Run_Utility,0x0
0316 e5ff | | Load 0x2,-0x1
0317 01dc | | Execute Vector,Last
0318 e5ff | | Load 0x2,-0x1
0319 01dd | | Execute Vector,First
031a 0263 | c | Execute Discrete,Above_Bound
031b 7006 |p | Jump_Nonzero 0x322
031c e402 | | Load 0x2,0x2
031d e404 | | Load 0x2,0x4
031e e5ff | | Load 0x2,-0x1
031f 01d6 | | Execute Vector,Field_Write
0320 0a01 | | Execute_Immediate Plus,0x1
0321 7ff8 | | Jump 0x31a
0322 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0323 e5ff | | Load 0x2,-0x1
0324 01dc | | Execute Vector,Last
0325 e5ff | | Load 0x2,-0x1
0326 01dd | | Execute Vector,First
0327 0263 | c | Execute Discrete,Above_Bound
0328 7006 |p | Jump_Nonzero 0x32f
0329 e403 | | Load 0x2,0x3
032a e5ff | | Load 0x2,-0x1
032b 01d7 | | Execute Vector,Field_Read
032c 1c01 | | Execute_Immediate Run_Utility,0x1
032d 0a01 | | Execute_Immediate Plus,0x1
032e 7ff8 | | Jump 0x327
032f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0330 ; --------------------------------------------------------------------------------------
0330 ; SUBPROGRAM
0330 ; --------------------------------------------------------------------------------------
0330 0333 | 3 | .CONST 0x0333 ; Address of begin
0331 0004 | | .CONST 0x0004 ; Address of exception handler
0332 0001 | | .CONST 0x0001 ; Number of locals
0333 BODY_0330:
0333 INIT_0330:
0333 4608 |F | Jump_Case 0x9 ; Debug Table 0xf = .DEBUG 0x0333,0x05f4,0x0005,0x0000,0x000e,0x48e4,0x0000,0x012b
0334 7808 |x | Jump 0x33d ; case 0x0
0335 780d |x | Jump 0x343 ; case 0x1
0336 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
0337 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
0338 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
0339 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5
033a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6
033b 780d |x | Jump 0x349 ; case 0x7
033c 7815 |x | Jump 0x352 ; case 0x8
033d e5ff | | Load 0x2,-0x1
033e 2202 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x2
033f e5ff | | Load 0x2,-0x1
0340 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0341 1c00 | | Execute_Immediate Run_Utility,0x0
0342 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0343 e5ff | | Load 0x2,-0x1
0344 2202 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x2
0345 e5ff | | Load 0x2,-0x1
0346 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0347 1c01 | | Execute_Immediate Run_Utility,0x1
0348 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0349 e5fe | | Load 0x2,-0x2
034a e5fe | | Load 0x2,-0x2
034b e21d | | Load 0x1,0x1d
034c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
034d 1c07 | | Execute_Immediate Run_Utility,0x7
034e 4801 |H | Short_Literal 0x1
034f e5ff | | Load 0x2,-0x1
0350 031b | | Declare_Type Variant_Record,Constrained
0351 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0352 e5fe | | Load 0x2,-0x2
0353 e5ff | | Load 0x2,-0x1
0354 02fc | | Declare_Variable Variant_Record,With_Constraint
0355 e5fe | | Load 0x2,-0x2
0356 e21d | | Load 0x1,0x1d
0357 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0358 1c08 | | Execute_Immediate Run_Utility,0x8
0359 2d02 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x2
035a 016a | j | QQ_execute Variant_Record,XXX
035b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
035c 0000 0000 | | .BLANK 0000[0x4]
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 0376 | v | .CONST 0x0376 ; Address of begin
0361 0004 | | .CONST 0x0004 ; Address of exception handler
0362 000a | | .CONST 0x000a ; Number of locals
0363 INIT_0360:
0363 e004 | | Load 0x0,0x4 ; Debug Table 0x10 = .DEBUG 0x0363,0x05f6,0x0001,0x0000,0x000e,0x4b24,0x0000,0x01af
; Debug Table 0x10.0x0 = 0x363,0xffff
0364 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0365 0322 | " | Declare_Variable Record
0366 e402 | | Load 0x2,0x2
0367 1c00 | | Execute_Immediate Run_Utility,0x0
0368 e004 | | Load 0x0,0x4 ; Debug Table 0x10.0x1 = 0x368,0xfffe
0369 1b11 | | Execute Package,Field_Read,Field_Number 0x11
036a 03e9 | | Declare_Variable Discrete,Duplicate
036b e004 | | Load 0x0,0x4 ; Debug Table 0x10.0x2 = 0x36b,0xfffd
036c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
036d 03e9 | | Declare_Variable Discrete,Duplicate
036e 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x10.0x3 = 0x36e,0xfffc
036f 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x10.0x4 = 0x36f,0xfffb
0370 e5fe | | Load 0x2,-0x2 ; Debug Table 0x10.0x5 = 0x370,0xfffa
0371 e004 | | Load 0x0,0x4
0372 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0373 00e3 | | Load_Encached Natural_Cache
0374 03f1 | | Declare_Variable Discrete,With_Value
0375 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x10.0x6 = 0x375,0xfff9
0376 BODY_0360:
0376 e409 | | Load 0x2,0x9 ; Debug Table 0x10.0x7 = 0x376,0x1
0377 7003 |p | Jump_Nonzero 0x37b
0378 4801 |H | Short_Literal 0x1 ; Debug Table 0x10.0x8 = 0x378,0x2
0379 a5fc | | Store_Unchecked 0x2,-0x4
037a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
037b e402 | | Load 0x2,0x2 ; Debug Table 0x10.0x9 = 0x37b,0x3
037c e5fd | | Load 0x2,-0x3
037d e008 | | Load 0x0,0x8
037e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
037f 00d2 | | Pop_Control Pop_Count_2
0380 e402 | | Load 0x2,0x2 ; Debug Table 0x10.0xa = 0x380,0x4
0381 e5fe | | Load 0x2,-0x2
0382 017f | | Execute Record,Equal
0383 6803 |h | Jump_Zero 0x387
0384 4801 |H | Short_Literal 0x1 ; Debug Table 0x10.0xb = 0x384,0x5
0385 a5fc | | Store_Unchecked 0x2,-0x4
0386 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0387 4801 |H | Short_Literal 0x1 ; Debug Table 0x10.0xc = 0x387,0x6
0388 a408 | | Store_Unchecked 0x2,0x8
0389 4801 |H | Short_Literal 0x1 ; Debug Table 0x10.0xd = 0x389,0x7
038a a407 | | Store_Unchecked 0x2,0x7
038b e402 | | Load 0x2,0x2 ; Debug Table 0x10.0xe = 0x38b,0x8
038c e004 | | Load 0x0,0x4
038d 181c | | Execute Package,Field_Execute,Field_Number 0x1c
038e a40a | | Store_Unchecked 0x2,0xa
038f 0007 | | Action Break_Optional ; Debug Table 0x10.0xf = 0x38f,0x9
0390 e408 | | Load 0x2,0x8 ; Debug Table 0x10.0x10 = 0x390,0xa
0391 e40a | | Load 0x2,0xa
0392 027d | } | Execute Discrete,Greater
0393 702b |p+ | Jump_Nonzero 0x3bf
0394 e407 | | Load 0x2,0x7 ; Debug Table 0x10.0x11 = 0x394,0xb
0395 e409 | | Load 0x2,0x9
0396 027d | } | Execute Discrete,Greater
0397 7027 |p' | Jump_Nonzero 0x3bf
0398 e004 | | Load 0x0,0x4 ; Debug Table 0x10.0x12 = 0x398,0xc
0399 1b10 | | Execute Package,Field_Read,Field_Number 0x10
039a e004 | | Load 0x0,0x4
039b 1b11 | | Execute Package,Field_Read,Field_Number 0x11
039c e407 | | Load 0x2,0x7
039d 00e4 | | Load_Encached Positive_Cache
039e 025b | [ | Execute Discrete,Check_In_Type
039f e5fe | | Load 0x2,-0x2
03a0 e004 | | Load 0x0,0x4
03a1 181e | | Execute Package,Field_Execute,Field_Number 0x1e
03a2 c403 | | Store 0x2,0x3
03a3 c405 | | Store 0x2,0x5
03a4 e004 | | Load 0x0,0x4 ; Debug Table 0x10.0x13 = 0x3a4,0xd
03a5 1b10 | | Execute Package,Field_Read,Field_Number 0x10
03a6 e004 | | Load 0x0,0x4
03a7 1b11 | | Execute Package,Field_Read,Field_Number 0x11
03a8 e408 | | Load 0x2,0x8
03a9 00e4 | | Load_Encached Positive_Cache
03aa 025b | [ | Execute Discrete,Check_In_Type
03ab e402 | | Load 0x2,0x2
03ac e004 | | Load 0x0,0x4
03ad 181e | | Execute Package,Field_Execute,Field_Number 0x1e
03ae c404 | | Store 0x2,0x4
03af c406 | | Store 0x2,0x6
03b0 e408 | | Load 0x2,0x8 ; Debug Table 0x10.0x14 = 0x3b0,0xe
03b1 0a01 | | Execute_Immediate Plus,0x1
03b2 c408 | | Store 0x2,0x8
03b3 e403 | | Load 0x2,0x3 ; Debug Table 0x10.0x15 = 0x3b3,0xf
03b4 e404 | | Load 0x2,0x4
03b5 027f | | Execute Discrete,Equal
03b6 6fd9 |o | Jump_Zero 0x390
03b7 e405 | | Load 0x2,0x5
03b8 e406 | | Load 0x2,0x6
03b9 027f | | Execute Discrete,Equal
03ba 6fd5 |o | Jump_Zero 0x390
03bb e407 | | Load 0x2,0x7 ; Debug Table 0x10.0x16 = 0x3bb,0x10
03bc 0a01 | | Execute_Immediate Plus,0x1
03bd c407 | | Store 0x2,0x7
03be 7fd1 | | Jump 0x390
03bf e407 | | Load 0x2,0x7 ; Debug Table 0x10.0x17 = 0x3bf,0x11
03c0 e409 | | Load 0x2,0x9
03c1 027d | } | Execute Discrete,Greater
03c2 a5fc | | Store_Unchecked 0x2,-0x4
03c3 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03c4 0000 0000 | | .BLANK 0000[0x4]
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03cb | | .CONST 0x03cb ; Address of begin
03c9 0004 | | .CONST 0x0004 ; Address of exception handler
03ca 0001 | | .CONST 0x0001 ; Number of locals
03cb BODY_03c8:
03cb INIT_03c8:
03cb e5ff | | Load 0x2,-0x1 ; Debug Table 0x11 = .DEBUG 0x03cb,0x0628,0x0002,0x0000,0x000e,0x4b24,0x0000,0x0271
; Debug Table 0x11.0x0 = 0x3cb,0x1
03cc e002 | | Load 0x0,0x2
03cd 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
03ce 680b |h | Jump_Zero 0x3da
03cf e5ff | | Load 0x2,-0x1
03d0 e002 | | Load 0x0,0x2
03d1 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
03d2 0f01 | | Execute_Immediate Equal,0x1
03d3 6804 |h | Jump_Zero 0x3d8
03d4 e5fe | | Load 0x2,-0x2
03d5 e005 | | Load 0x0,0x5
03d6 1812 | | Execute Package,Field_Execute,Field_Number 0x12
03d7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03d8 4800 |H | Short_Literal 0x0
03d9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03da 4801 |H | Short_Literal 0x1
03db 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03dc 0000 0000 | | .BLANK 0000[0x4]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03e3 | | .CONST 0x03e3 ; Address of begin
03e1 0004 | | .CONST 0x0004 ; Address of exception handler
03e2 0001 | | .CONST 0x0001 ; Number of locals
03e3 BODY_03e0:
03e3 INIT_03e0:
03e3 e5ff | | Load 0x2,-0x1 ; Debug Table 0x12 = .DEBUG 0x03e3,0x062c,0x0002,0x0000,0x000e,0x4b24,0x0000,0x02ad
; Debug Table 0x12.0x0 = 0x3e3,0x1
03e4 6808 |h | Jump_Zero 0x3ed
03e5 e5fe | | Load 0x2,-0x2
03e6 e005 | | Load 0x0,0x5
03e7 181f | | Execute Package,Field_Execute,Field_Number 0x1f
03e8 e001 | | Load 0x0,0x1
03e9 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
03ea e5ff | | Load 0x2,-0x1
03eb 027a | z | Execute Discrete,Less_Equal
03ec 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03ed 4801 |H | Short_Literal 0x1
03ee 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03ef ; --------------------------------------------------------------------------------------
03ef ; STRING TABLE
03ef ; --------------------------------------------------------------------------------------
03ef 0006 | | .STRTAB 0x0006->0x03f2 ; "Items.Check* calls = "
03f0 0019 | | .STRTAB 0x0019->0x03fc ; "Items.Check(Exc)* = "
03f1 002b | + | .STREND 0x002b->0x0406
03f2 4974 656d |Item| .STRTAB_STRINGS
0407 0000 | | .XXX[0x1]
0408 ; --------------------------------------------------------------------------------------
0408 ; Debug Table
0408 ; --------------------------------------------------------------------------------------
0408 0003 0013 | | .CONST 0x0003,0x0013
040a 000b 04a2 | | .DEBUG 0x000b,0x04a2,0x8000,0x0000,0x000e,0x48e4,0x0000,0x000a
0412 005e 04cc | ^ | .DEBUG 0x005e,0x04cc,0x8000,0x0000,0x000e,0x4b24,0x0000,0x000b
041a 008b 04f8 | | .DEBUG 0x008b,0x04f8,0x0002,0x0000,0x000e,0x48e4,0x0000,0x0020
0422 0093 04fc | | .DEBUG 0x0093,0x04fc,0x0002,0x0000,0x000e,0x48e4,0x0000,0x0029
042a 00a3 0500 | | .DEBUG 0x00a3,0x0500,0x0001,0x0000,0x000e,0x48e4,0x0000,0x0038
0432 00d3 0518 | | .DEBUG 0x00d3,0x0518,0x0001,0x0000,0x000e,0x48e4,0x0000,0x0050
043a 00e3 051c | | .DEBUG 0x00e3,0x051c,0x0001,0x0000,0x000e,0x48e4,0x0000,0x0058
0442 010b 0528 | (| .DEBUG 0x010b,0x0528,0x0001,0x0000,0x000e,0x48e4,0x0000,0x006f
044a 013b 053e | ; >| .DEBUG 0x013b,0x053e,0x0002,0x0000,0x000e,0x48e4,0x0000,0x007d
0452 017b 055c | { \| .DEBUG 0x017b,0x055c,0x0002,0x0000,0x000e,0x48e4,0x0000,0x0092
045a 01ab 0572 | r| .DEBUG 0x01ab,0x0572,0x0001,0x0000,0x000e,0x48e4,0x0000,0x00a7
0462 027b 05c2 | { | .DEBUG 0x027b,0x05c2,0x0001,0x0000,0x000e,0x48e4,0x0000,0x00cc
046a 02c3 05e2 | | .DEBUG 0x02c3,0x05e2,0x0001,0x0000,0x000e,0x48e4,0x0000,0x00ef
0472 02f3 05f0 | | .DEBUG 0x02f3,0x05f0,0x0005,0x0000,0x000e,0x48e4,0x0000,0x00f4
047a 030b 05f2 | | .DEBUG 0x030b,0x05f2,0x0005,0x0000,0x000e,0x48e4,0x0000,0x0108
0482 0333 05f4 | 3 | .DEBUG 0x0333,0x05f4,0x0005,0x0000,0x000e,0x48e4,0x0000,0x012b
048a 0363 05f6 | c | .DEBUG 0x0363,0x05f6,0x0001,0x0000,0x000e,0x4b24,0x0000,0x01af
0492 03cb 0628 | (| .DEBUG 0x03cb,0x0628,0x0002,0x0000,0x000e,0x4b24,0x0000,0x0271
049a 03e3 062c | ,| .DEBUG 0x03e3,0x062c,0x0002,0x0000,0x000e,0x4b24,0x0000,0x02ad
04a2 ; --------------------------------------------------------------------------------------
04a2 ; Debug3 Subtable 0x0
04a2 ; --------------------------------------------------------------------------------------
04a2 0014 0000 | | .DBG3TAB 0x0014,0x0000
04a4 000b ffff | | .CONST 0x000b,0xffff
04a6 0012 fffe | | .CONST 0x0012,0xfffe
04a8 0018 fffd | | .CONST 0x0018,0xfffd
04aa 001a fffc | | .CONST 0x001a,0xfffc
04ac 001c fffb | | .CONST 0x001c,0xfffb
04ae 001e fffa | | .CONST 0x001e,0xfffa
04b0 0020 fff9 | | .CONST 0x0020,0xfff9
04b2 0022 fff8 | " | .CONST 0x0022,0xfff8
04b4 0024 fff7 | $ | .CONST 0x0024,0xfff7
04b6 0026 fff6 | & | .CONST 0x0026,0xfff6
04b8 0028 fff5 | ( | .CONST 0x0028,0xfff5
04ba 002a fff4 | * | .CONST 0x002a,0xfff4
04bc 002c fff3 | , | .CONST 0x002c,0xfff3
04be 002d fff2 | - | .CONST 0x002d,0xfff2
04c0 002e fff1 | . | .CONST 0x002e,0xfff1
04c2 0030 fff0 | 0 | .CONST 0x0030,0xfff0
04c4 0038 ffef | 8 | .CONST 0x0038,0xffef
04c6 003f ffee | ? | .CONST 0x003f,0xffee
04c8 004a ffed | J | .CONST 0x004a,0xffed
04ca 0054 ffec | T | .CONST 0x0054,0xffec
04cc ; --------------------------------------------------------------------------------------
04cc ; Debug3 Subtable 0x1
04cc ; --------------------------------------------------------------------------------------
04cc 0015 0000 | | .DBG3TAB 0x0015,0x0000
04ce 005e ffff | ^ | .CONST 0x005e,0xffff
04d0 005f fffe | _ | .CONST 0x005f,0xfffe
04d2 0060 fffd | ` | .CONST 0x0060,0xfffd
04d4 0061 fffc | a | .CONST 0x0061,0xfffc
04d6 0062 fffb | b | .CONST 0x0062,0xfffb
04d8 0063 fffa | c | .CONST 0x0063,0xfffa
04da 0065 fff9 | e | .CONST 0x0065,0xfff9
04dc 0067 fff8 | g | .CONST 0x0067,0xfff8
04de 0069 fff7 | i | .CONST 0x0069,0xfff7
04e0 006b fff6 | k | .CONST 0x006b,0xfff6
04e2 006d fff5 | m | .CONST 0x006d,0xfff5
04e4 006f fff4 | o | .CONST 0x006f,0xfff4
04e6 0071 fff3 | q | .CONST 0x0071,0xfff3
04e8 0073 fff2 | s | .CONST 0x0073,0xfff2
04ea 0075 fff1 | u | .CONST 0x0075,0xfff1
04ec 0077 fff0 | w | .CONST 0x0077,0xfff0
04ee 0079 ffef | y | .CONST 0x0079,0xffef
04f0 007b ffee | { | .CONST 0x007b,0xffee
04f2 007d ffed | } | .CONST 0x007d,0xffed
04f4 007f ffec | | .CONST 0x007f,0xffec
04f6 0081 ffeb | | .CONST 0x0081,0xffeb
04f8 ; --------------------------------------------------------------------------------------
04f8 ; Debug3 Subtable 0x2
04f8 ; --------------------------------------------------------------------------------------
04f8 0000 0001 | | .DBG3TAB 0x0000,0x0001
04fa 008b 0001 | | .CONST 0x008b,0x0001
04fc ; --------------------------------------------------------------------------------------
04fc ; Debug3 Subtable 0x3
04fc ; --------------------------------------------------------------------------------------
04fc 0000 0001 | | .DBG3TAB 0x0000,0x0001
04fe 0093 0001 | | .CONST 0x0093,0x0001
0500 ; --------------------------------------------------------------------------------------
0500 ; Debug3 Subtable 0x4
0500 ; --------------------------------------------------------------------------------------
0500 0002 0009 | | .DBG3TAB 0x0002,0x0009
0502 00a3 ffff | | .CONST 0x00a3,0xffff
0504 00a4 fffe | | .CONST 0x00a4,0xfffe
0506 00a9 0001 | | .CONST 0x00a9,0x0001
0508 00ab 0002 | | .CONST 0x00ab,0x0002
050a 00ac 0003 | | .CONST 0x00ac,0x0003
050c 00b6 0004 | | .CONST 0x00b6,0x0004
050e 00bc 0005 | | .CONST 0x00bc,0x0005
0510 00be 0006 | | .CONST 0x00be,0x0006
0512 00c1 0007 | | .CONST 0x00c1,0x0007
0514 00c2 0008 | | .CONST 0x00c2,0x0008
0516 00c7 0009 | | .CONST 0x00c7,0x0009
0518 ; --------------------------------------------------------------------------------------
0518 ; Debug3 Subtable 0x5
0518 ; --------------------------------------------------------------------------------------
0518 0000 0001 | | .DBG3TAB 0x0000,0x0001
051a 00d3 0001 | | .CONST 0x00d3,0x0001
051c ; --------------------------------------------------------------------------------------
051c ; Debug3 Subtable 0x6
051c ; --------------------------------------------------------------------------------------
051c 0002 0003 | | .DBG3TAB 0x0002,0x0003
051e 00e3 ffff | | .CONST 0x00e3,0xffff
0520 00e8 fffe | | .CONST 0x00e8,0xfffe
0522 00e9 0001 | | .CONST 0x00e9,0x0001
0524 00f2 0002 | | .CONST 0x00f2,0x0002
0526 00f4 0003 | | .CONST 0x00f4,0x0003
0528 ; --------------------------------------------------------------------------------------
0528 ; Debug3 Subtable 0x7
0528 ; --------------------------------------------------------------------------------------
0528 0002 0008 | | .DBG3TAB 0x0002,0x0008
052a 010b ffff | | .CONST 0x010b,0xffff
052c 010c fffe | | .CONST 0x010c,0xfffe
052e 0111 0001 | | .CONST 0x0111,0x0001
0530 0113 0002 | | .CONST 0x0113,0x0002
0532 0114 0003 | | .CONST 0x0114,0x0003
0534 011e 0004 | | .CONST 0x011e,0x0004
0536 0124 0005 | $ | .CONST 0x0124,0x0005
0538 012d 0006 | - | .CONST 0x012d,0x0006
053a 012e 0007 | . | .CONST 0x012e,0x0007
053c 0133 0008 | 3 | .CONST 0x0133,0x0008
053e ; --------------------------------------------------------------------------------------
053e ; Debug3 Subtable 0x8
053e ; --------------------------------------------------------------------------------------
053e 0004 000a | | .DBG3TAB 0x0004,0x000a
0540 013b ffff | ; | .CONST 0x013b,0xffff
0542 013c fffe | < | .CONST 0x013c,0xfffe
0544 013e fffd | > | .CONST 0x013e,0xfffd
0546 0140 fffc | @ | .CONST 0x0140,0xfffc
0548 0142 0001 | B | .CONST 0x0142,0x0001
054a 014e 0002 | N | .CONST 0x014e,0x0002
054c 0150 0003 | P | .CONST 0x0150,0x0003
054e 0151 0004 | Q | .CONST 0x0151,0x0004
0550 0158 0005 | X | .CONST 0x0158,0x0005
0552 015b 0006 | [ | .CONST 0x015b,0x0006
0554 016a 0007 | j | .CONST 0x016a,0x0007
0556 016c 0008 | l | .CONST 0x016c,0x0008
0558 0170 0009 | p | .CONST 0x0170,0x0009
055a 0173 000a | s | .CONST 0x0173,0x000a
055c ; --------------------------------------------------------------------------------------
055c ; Debug3 Subtable 0x9
055c ; --------------------------------------------------------------------------------------
055c 0001 0009 | | .DBG3TAB 0x0001,0x0009
055e 017b ffff | { | .CONST 0x017b,0xffff
0560 017c 0001 | | | .CONST 0x017c,0x0001
0562 017e 0002 | ~ | .CONST 0x017e,0x0002
0564 017f 0003 | | .CONST 0x017f,0x0003
0566 0186 0004 | | .CONST 0x0186,0x0004
0568 0189 0005 | | .CONST 0x0189,0x0005
056a 0196 0006 | | .CONST 0x0196,0x0006
056c 0198 0007 | | .CONST 0x0198,0x0007
056e 019c 0008 | | .CONST 0x019c,0x0008
0570 019f 0009 | | .CONST 0x019f,0x0009
0572 ; --------------------------------------------------------------------------------------
0572 ; Debug3 Subtable 0xa
0572 ; --------------------------------------------------------------------------------------
0572 0008 001f | | .DBG3TAB 0x0008,0x001f
0574 01ab ffff | | .CONST 0x01ab,0xffff
0576 01ac fffe | | .CONST 0x01ac,0xfffe
0578 01b1 fffd | | .CONST 0x01b1,0xfffd
057a 01b2 fffc | | .CONST 0x01b2,0xfffc
057c 01b4 fffb | | .CONST 0x01b4,0xfffb
057e 01b6 fffa | | .CONST 0x01b6,0xfffa
0580 01b8 fff9 | | .CONST 0x01b8,0xfff9
0582 01b9 fff8 | | .CONST 0x01b9,0xfff8
0584 01bb 0001 | | .CONST 0x01bb,0x0001
0586 01be 0002 | | .CONST 0x01be,0x0002
0588 01ca 0003 | | .CONST 0x01ca,0x0003
058a 01cc 0004 | | .CONST 0x01cc,0x0004
058c 01cd 0005 | | .CONST 0x01cd,0x0005
058e 01d4 0006 | | .CONST 0x01d4,0x0006
0590 01de 0007 | | .CONST 0x01de,0x0007
0592 01e7 0008 | | .CONST 0x01e7,0x0008
0594 01ea 0009 | | .CONST 0x01ea,0x0009
0596 01f2 000a | | .CONST 0x01f2,0x000a
0598 01fb 000b | | .CONST 0x01fb,0x000b
059a 0205 000c | | .CONST 0x0205,0x000c
059c 020c 000d | | .CONST 0x020c,0x000d
059e 0211 000e | | .CONST 0x0211,0x000e
05a0 0215 000f | | .CONST 0x0215,0x000f
05a2 0217 0010 | | .CONST 0x0217,0x0010
05a4 0221 0011 | ! | .CONST 0x0221,0x0011
05a6 0225 0012 | % | .CONST 0x0225,0x0012
05a8 0227 0013 | ' | .CONST 0x0227,0x0013
05aa 022c 0014 | , | .CONST 0x022c,0x0014
05ac 022e 0015 | . | .CONST 0x022e,0x0015
05ae 0232 0016 | 2 | .CONST 0x0232,0x0016
05b0 0245 0017 | E | .CONST 0x0245,0x0017
05b2 0247 0018 | G | .CONST 0x0247,0x0018
05b4 024d 0019 | M | .CONST 0x024d,0x0019
05b6 024f 001a | O | .CONST 0x024f,0x001a
05b8 0253 001b | S | .CONST 0x0253,0x001b
05ba 0266 001c | f | .CONST 0x0266,0x001c
05bc 0268 001e | h | .CONST 0x0268,0x001e
05be 026e 001f | n | .CONST 0x026e,0x001f
05c0 0276 0020 | v | .CONST 0x0276,0x0020
05c2 ; --------------------------------------------------------------------------------------
05c2 ; Debug3 Subtable 0xb
05c2 ; --------------------------------------------------------------------------------------
05c2 0003 000c | | .DBG3TAB 0x0003,0x000c
05c4 027b ffff | { | .CONST 0x027b,0xffff
05c6 027c fffe | | | .CONST 0x027c,0xfffe
05c8 0281 fffd | | .CONST 0x0281,0xfffd
05ca 0282 0001 | | .CONST 0x0282,0x0001
05cc 0285 0002 | | .CONST 0x0285,0x0002
05ce 0287 0003 | | .CONST 0x0287,0x0003
05d0 0288 0004 | | .CONST 0x0288,0x0004
05d2 028f 0005 | | .CONST 0x028f,0x0005
05d4 0299 0006 | | .CONST 0x0299,0x0006
05d6 029c 0007 | | .CONST 0x029c,0x0007
05d8 02a2 0008 | | .CONST 0x02a2,0x0008
05da 02a9 0009 | | .CONST 0x02a9,0x0009
05dc 02ae 000b | | .CONST 0x02ae,0x000b
05de 02b4 000c | | .CONST 0x02b4,0x000c
05e0 02bc 000d | | .CONST 0x02bc,0x000d
05e2 ; --------------------------------------------------------------------------------------
05e2 ; Debug3 Subtable 0xc
05e2 ; --------------------------------------------------------------------------------------
05e2 0000 0006 | | .DBG3TAB 0x0000,0x0006
05e4 02c3 0001 | | .CONST 0x02c3,0x0001
05e6 02c8 0002 | | .CONST 0x02c8,0x0002
05e8 02cd 0003 | | .CONST 0x02cd,0x0003
05ea 02d0 0004 | | .CONST 0x02d0,0x0004
05ec 02d5 0005 | | .CONST 0x02d5,0x0005
05ee 02da 0006 | | .CONST 0x02da,0x0006
05f0 ; --------------------------------------------------------------------------------------
05f0 ; Debug3 Subtable 0xd
05f0 ; --------------------------------------------------------------------------------------
05f0 0000 0000 | | .DBG3TAB 0x0000,0x0000
05f2 ; --------------------------------------------------------------------------------------
05f2 ; Debug3 Subtable 0xe
05f2 ; --------------------------------------------------------------------------------------
05f2 0000 0000 | | .DBG3TAB 0x0000,0x0000
05f4 ; --------------------------------------------------------------------------------------
05f4 ; Debug3 Subtable 0xf
05f4 ; --------------------------------------------------------------------------------------
05f4 0000 0000 | | .DBG3TAB 0x0000,0x0000
05f6 ; --------------------------------------------------------------------------------------
05f6 ; Debug3 Subtable 0x10
05f6 ; --------------------------------------------------------------------------------------
05f6 0007 0011 | | .DBG3TAB 0x0007,0x0011
05f8 0363 ffff | c | .CONST 0x0363,0xffff
05fa 0368 fffe | h | .CONST 0x0368,0xfffe
05fc 036b fffd | k | .CONST 0x036b,0xfffd
05fe 036e fffc | n | .CONST 0x036e,0xfffc
0600 036f fffb | o | .CONST 0x036f,0xfffb
0602 0370 fffa | p | .CONST 0x0370,0xfffa
0604 0375 fff9 | u | .CONST 0x0375,0xfff9
0606 0376 0001 | v | .CONST 0x0376,0x0001
0608 0378 0002 | x | .CONST 0x0378,0x0002
060a 037b 0003 | { | .CONST 0x037b,0x0003
060c 0380 0004 | | .CONST 0x0380,0x0004
060e 0384 0005 | | .CONST 0x0384,0x0005
0610 0387 0006 | | .CONST 0x0387,0x0006
0612 0389 0007 | | .CONST 0x0389,0x0007
0614 038b 0008 | | .CONST 0x038b,0x0008
0616 038f 0009 | | .CONST 0x038f,0x0009
0618 0390 000a | | .CONST 0x0390,0x000a
061a 0394 000b | | .CONST 0x0394,0x000b
061c 0398 000c | | .CONST 0x0398,0x000c
061e 03a4 000d | | .CONST 0x03a4,0x000d
0620 03b0 000e | | .CONST 0x03b0,0x000e
0622 03b3 000f | | .CONST 0x03b3,0x000f
0624 03bb 0010 | | .CONST 0x03bb,0x0010
0626 03bf 0011 | | .CONST 0x03bf,0x0011
0628 ; --------------------------------------------------------------------------------------
0628 ; Debug3 Subtable 0x11
0628 ; --------------------------------------------------------------------------------------
0628 0000 0001 | | .DBG3TAB 0x0000,0x0001
062a 03cb 0001 | | .CONST 0x03cb,0x0001
062c ; --------------------------------------------------------------------------------------
062c ; Debug3 Subtable 0x12
062c ; --------------------------------------------------------------------------------------
062c 0000 0001 | | .DBG3TAB 0x0000,0x0001
062e 03e3 0001 | | .CONST 0x03e3,0x0001
0630 0000 0000 | | .BLANK 0000[0x1d0]