|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 3072 (0xc00)
Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0320 | | .CONST 0x0320 ; 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 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0061 | a | .CONST 0x0061 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 001e | | .CONST 0x001e ; Number of locals
000b INIT_0008:
000b e001 | | Load 0x0,0x1 ; Debug Table 0x0 = .DEBUG 0x000b,0x03e2,0x0000,0x0000,0x0056,0xda05,0x0000,0x0214
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
000d 0129 | ) | Execute Any,Make_Visible
000e 4811 |H | Short_Literal 0x11 ; Debug Table 0x0.0x1 = 0xe,0xfffe
000f 6210 |b | Indirect_Literal Discrete,0x220,{0x0047c00e, 0x000022b0}
0010 02a0 | | Declare_Subprogram Null_Subprogram
0011 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated
0012 029a 0073 | s| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0070 ; Debug Table 0x0.0x2 = 0x12,0xfffd
0014 029a 0093 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0090 ; Debug Table 0x0.0x3 = 0x14,0xfffc
0016 029a 00ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00a8 ; Debug Table 0x0.0x4 = 0x16,0xfffb
0018 029a 00c3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00c0 ; Debug Table 0x0.0x5 = 0x18,0xfffa
001a 029a 00e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00e0 ; Debug Table 0x0.0x6 = 0x1a,0xfff9
001c 029a 00fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00f8 ; Debug Table 0x0.0x7 = 0x1c,0xfff8
001e 029a 011b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0118 ; Debug Table 0x0.0x8 = 0x1e,0xfff7
0020 029a 013b | ;| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0138 ; Debug Table 0x0.0x9 = 0x20,0xfff6
0022 029a 015b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0158 ; Debug Table 0x0.0xa = 0x22,0xfff5
0024 029a 017b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0178 ; Debug Table 0x0.0xb = 0x24,0xfff4
0026 029a 019b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0198 ; Debug Table 0x0.0xc = 0x26,0xfff3
0028 029a 01bb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01b8 ; Debug Table 0x0.0xd = 0x28,0xfff2
002a 029a 01db | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01d8 ; Debug Table 0x0.0xe = 0x2a,0xfff1
002c 029a 01fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01f8 ; Debug Table 0x0.0xf = 0x2c,0xfff0
002e 00c4 | | Action Make_Default ; Debug Table 0x0.0x10 = 0x2e,0xffef
002f 029a 021b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0218 ; Debug Table 0x0.0x11 = 0x2f,0xffee
0031 0007 | | Action Break_Optional ; Debug Table 0x0.0x12 = 0x31,0xffed
0032 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x13 = 0x32,0xffec
0033 e20d | | Load 0x1,0xd
0034 03f0 | | Declare_Variable Discrete,Visible,With_Value
0035 c21d | | Store 0x1,0x1d
0036 00bf | | Action Accept_Activation
0037 e002 | | Load 0x0,0x2 ; Debug Table 0x1 = .DEBUG 0x0037,0x040c,0x0000,0x0000,0x0056,0xdc35,0x0000,0x0006
; Debug Table 0x1.0x0 = 0x37,0xffff
0038 e003 | | Load 0x0,0x3
0039 e004 | | Load 0x0,0x4
003a a005 | | Reference 0x0,0x5
003b a006 | | Reference 0x0,0x6
003c e007 | | Load 0x0,0x7
003d 4806 |H | Short_Literal 0x6
003e e20e | | Load 0x1,0xe
003f 020e | | Execute Module,Augment_Imports
0040 e20e | | Load 0x1,0xe
0041 020d | | Execute Module,Elaborate
0042 0007 | | Action Break_Optional
0043 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x1 = 0x43,0xfffe
0044 00c7 | | Action Elaborate_Subprogram
0045 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x2 = 0x45,0xfffd
0046 00c7 | | Action Elaborate_Subprogram
0047 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x3 = 0x47,0xfffc
0048 00c7 | | Action Elaborate_Subprogram
0049 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x4 = 0x49,0xfffb
004a 00c7 | | Action Elaborate_Subprogram
004b 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x5 = 0x4b,0xfffa
004c 00c7 | | Action Elaborate_Subprogram
004d 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x6 = 0x4d,0xfff9
004e 00c7 | | Action Elaborate_Subprogram
004f 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x7 = 0x4f,0xfff8
0050 00c7 | | Action Elaborate_Subprogram
0051 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x8 = 0x51,0xfff7
0052 00c7 | | Action Elaborate_Subprogram
0053 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x9 = 0x53,0xfff6
0054 00c7 | | Action Elaborate_Subprogram
0055 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0xa = 0x55,0xfff5
0056 00c7 | | Action Elaborate_Subprogram
0057 1d1c | | Execute_Immediate Reference_Lex_1,0x1c ; Debug Table 0x1.0xb = 0x57,0xfff4
0058 00c7 | | Action Elaborate_Subprogram
0059 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0xc = 0x59,0xfff3
005a 00c7 | | Action Elaborate_Subprogram
005b 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0xd = 0x5b,0xfff2
005c 00c7 | | Action Elaborate_Subprogram
005d 1d1b | | Execute_Immediate Reference_Lex_1,0x1b ; Debug Table 0x1.0xe = 0x5d,0xfff1
005e 00c7 | | Action Elaborate_Subprogram
005f 1d1e | | Execute_Immediate Reference_Lex_1,0x1e ; Debug Table 0x1.0xf = 0x5f,0xfff0
0060 00c7 | | Action Elaborate_Subprogram
0061 BODY_0008:
0061 e007 | | Load 0x0,0x7 ; Debug Table 0x1.0x10 = 0x61,0x1
0062 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0063 4864 |Hd | Short_Literal 0x64
0064 e007 | | Load 0x0,0x7
0065 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0066 c006 | | Store 0x0,0x6
0067 00bc | | Action Signal_Activated
0068 00bb | | Action Signal_Completion
0069 0000 0000 | | .BLANK 0000[0x7]
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 0075 | u | .CONST 0x0075 ; Address of begin
0071 0086 | | .CONST 0x0086 ; Address of exception handler
0072 0002 | | .CONST 0x0002 ; Number of locals
0073 INIT_0070:
0073 e003 | | Load 0x0,0x3 ; Debug Table 0x2 = .DEBUG 0x0073,0x0430,0x0002,0x0000,0x0056,0xda05,0x0000,0x02d5
; Debug Table 0x2.0x0 = 0x73,0xffff
0074 0007 | | Action Break_Optional
0075 BODY_0070:
0075 4820 |H | Short_Literal 0x20 ; Debug Table 0x2.0x1 = 0x75,0x1
0076 e5ff | | Load 0x2,-0x1
0077 e008 | | Load 0x0,0x8
0078 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0079 e008 | | Load 0x0,0x8
007a 1814 | | Execute Package,Field_Execute,Field_Number 0x14
007b e006 | | Load 0x0,0x6
007c e007 | | Load 0x0,0x7
007d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
007e 0039 | 9 | Store_Top Access,At_Offset_1
007f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x2 = 0x7f,0x2
0080 7003 |p | Jump_Nonzero 0x84
0081 e002 | | Load 0x0,0x2 ; Debug Table 0x2.0x3 = 0x81,0x3
0082 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0083 0257 | W | Execute Discrete,Raise
0084 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x4 = 0x84,0x4
0085 4401 |D | Exit_Subprogram With_Result,0x1
0086 TRAP_0070:
0086 e007 | | Load 0x0,0x7
0087 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0088 010f | | Execute Exception,Equal
0089 6803 |h | Jump_Zero 0x8d
008a e002 | | Load 0x0,0x2 ; Debug Table 0x2.0x5 = 0x8a,0x5
008b 1b16 | | Execute Package,Field_Read,Field_Number 0x16
008c 0257 | W | Execute Discrete,Raise
008d 0100 | | Execute Exception,Raise
008e 0000 0000 | | .XXX[0x2]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0097 | | .CONST 0x0097 ; Address of begin
0091 0004 | | .CONST 0x0004 ; Address of exception handler
0092 0002 | | .CONST 0x0002 ; Number of locals
0093 INIT_0090:
0093 e003 | | Load 0x0,0x3 ; Debug Table 0x3 = .DEBUG 0x0093,0x043e,0x0002,0x0000,0x0056,0xda05,0x0000,0x02de
; Debug Table 0x3.0x0 = 0x93,0xffff
0094 00db | | Load_Top At_Offset_3
0095 820f | | Call 0x1,0xf
0096 0039 | 9 | Store_Top Access,At_Offset_1
0097 BODY_0090:
0097 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x1 = 0x97,0x1
0098 0227 | ' | Execute Access,All_Reference
0099 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
009a 00d9 | | Load_Top At_Offset_1
009b 0227 | ' | Execute Access,All_Reference
009c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
009d e009 | | Load 0x0,0x9
009e 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
009f 00d8 | | Load_Top At_Offset_0
00a0 e009 | | Load 0x0,0x9
00a1 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
00a2 7003 |p | Jump_Nonzero 0xa6
00a3 e001 | | Load 0x0,0x1
00a4 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
00a5 0257 | W | Execute Discrete,Raise
00a6 180f | | Execute Package,Field_Execute,Field_Number 0xf
00a7 4401 |D | Exit_Subprogram With_Result,0x1
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00af | | .CONST 0x00af ; Address of begin
00a9 0004 | | .CONST 0x0004 ; Address of exception handler
00aa 0002 | | .CONST 0x0002 ; Number of locals
00ab INIT_00a8:
00ab e003 | | Load 0x0,0x3 ; Debug Table 0x4 = .DEBUG 0x00ab,0x0444,0x0002,0x0000,0x0056,0xda05,0x0000,0x02e7
; Debug Table 0x4.0x0 = 0xab,0xffff
00ac 00db | | Load_Top At_Offset_3
00ad 820f | | Call 0x1,0xf
00ae 0039 | 9 | Store_Top Access,At_Offset_1
00af BODY_00a8:
00af 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x1 = 0xaf,0x1
00b0 0227 | ' | Execute Access,All_Reference
00b1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00b2 00d9 | | Load_Top At_Offset_1
00b3 0227 | ' | Execute Access,All_Reference
00b4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00b5 e009 | | Load 0x0,0x9
00b6 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
00b7 00d8 | | Load_Top At_Offset_0
00b8 e009 | | Load 0x0,0x9
00b9 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
00ba 7003 |p | Jump_Nonzero 0xbe
00bb e001 | | Load 0x0,0x1
00bc 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
00bd 0257 | W | Execute Discrete,Raise
00be 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00bf 4401 |D | Exit_Subprogram With_Result,0x1
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c7 | | .CONST 0x00c7 ; Address of begin
00c1 0004 | | .CONST 0x0004 ; Address of exception handler
00c2 0002 | | .CONST 0x0002 ; Number of locals
00c3 INIT_00c0:
00c3 e003 | | Load 0x0,0x3 ; Debug Table 0x5 = .DEBUG 0x00c3,0x044a,0x0002,0x0000,0x0056,0xda05,0x0000,0x02f0
; Debug Table 0x5.0x0 = 0xc3,0xffff
00c4 e5fe | | Load 0x2,-0x2
00c5 820f | | Call 0x1,0xf
00c6 0039 | 9 | Store_Top Access,At_Offset_1
00c7 BODY_00c0:
00c7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x1 = 0xc7,0x1
00c8 0227 | ' | Execute Access,All_Reference
00c9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00ca e5ff | | Load 0x2,-0x1
00cb 00da | | Load_Top At_Offset_2
00cc 0227 | ' | Execute Access,All_Reference
00cd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00ce e009 | | Load 0x0,0x9
00cf 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
00d0 00d8 | | Load_Top At_Offset_0
00d1 e009 | | Load 0x0,0x9
00d2 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
00d3 7003 |p | Jump_Nonzero 0xd7
00d4 e001 | | Load 0x0,0x1
00d5 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
00d6 0257 | W | Execute Discrete,Raise
00d7 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00d8 4402 |D | Exit_Subprogram With_Result,0x2
00d9 0000 0000 | | .BLANK 0000[0x7]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e7 | | .CONST 0x00e7 ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0002 | | .CONST 0x0002 ; Number of locals
00e3 INIT_00e0:
00e3 e003 | | Load 0x0,0x3 ; Debug Table 0x6 = .DEBUG 0x00e3,0x0450,0x0002,0x0000,0x0056,0xda05,0x0000,0x02fd
; Debug Table 0x6.0x0 = 0xe3,0xffff
00e4 00db | | Load_Top At_Offset_3
00e5 820f | | Call 0x1,0xf
00e6 0039 | 9 | Store_Top Access,At_Offset_1
00e7 BODY_00e0:
00e7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x1 = 0xe7,0x1
00e8 0227 | ' | Execute Access,All_Reference
00e9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00ea 00d9 | | Load_Top At_Offset_1
00eb 0227 | ' | Execute Access,All_Reference
00ec 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00ed e009 | | Load 0x0,0x9
00ee 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
00ef 00d8 | | Load_Top At_Offset_0
00f0 e009 | | Load 0x0,0x9
00f1 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
00f2 7003 |p | Jump_Nonzero 0xf6
00f3 e001 | | Load 0x0,0x1
00f4 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
00f5 0257 | W | Execute Discrete,Raise
00f6 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00f7 4401 |D | Exit_Subprogram With_Result,0x1
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00ff | | .CONST 0x00ff ; Address of begin
00f9 0004 | | .CONST 0x0004 ; Address of exception handler
00fa 0002 | | .CONST 0x0002 ; Number of locals
00fb INIT_00f8:
00fb e003 | | Load 0x0,0x3 ; Debug Table 0x7 = .DEBUG 0x00fb,0x0456,0x0002,0x0000,0x0056,0xda05,0x0000,0x0306
; Debug Table 0x7.0x0 = 0xfb,0xffff
00fc 00db | | Load_Top At_Offset_3
00fd 820f | | Call 0x1,0xf
00fe 0039 | 9 | Store_Top Access,At_Offset_1
00ff BODY_00f8:
00ff e5fe | | Load 0x2,-0x2 ; Debug Table 0x7.0x1 = 0xff,0x1
0100 e002 | | Load 0x0,0x2
0101 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
0102 00d9 | | Load_Top At_Offset_1
0103 0227 | ' | Execute Access,All_Reference
0104 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0105 00da | | Load_Top At_Offset_2
0106 0227 | ' | Execute Access,All_Reference
0107 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0108 e009 | | Load 0x0,0x9
0109 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
010a 00d8 | | Load_Top At_Offset_0
010b e009 | | Load 0x0,0x9
010c 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
010d 7003 |p | Jump_Nonzero 0x111
010e e001 | | Load 0x0,0x1
010f 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0110 0257 | W | Execute Discrete,Raise
0111 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0112 4402 |D | Exit_Subprogram With_Result,0x2
0113 0000 0000 | | .BLANK 0000[0x5]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011f | | .CONST 0x011f ; Address of begin
0119 0004 | | .CONST 0x0004 ; Address of exception handler
011a 0002 | | .CONST 0x0002 ; Number of locals
011b INIT_0118:
011b e003 | | Load 0x0,0x3 ; Debug Table 0x8 = .DEBUG 0x011b,0x045c,0x0002,0x0000,0x0056,0xda05,0x0000,0x0313
; Debug Table 0x8.0x0 = 0x11b,0xffff
011c e5fe | | Load 0x2,-0x2
011d 820f | | Call 0x1,0xf
011e 0039 | 9 | Store_Top Access,At_Offset_1
011f BODY_0118:
011f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x1 = 0x11f,0x1
0120 0227 | ' | Execute Access,All_Reference
0121 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0122 e5ff | | Load 0x2,-0x1
0123 00da | | Load_Top At_Offset_2
0124 0227 | ' | Execute Access,All_Reference
0125 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0126 e009 | | Load 0x0,0x9
0127 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0128 00d8 | | Load_Top At_Offset_0
0129 e009 | | Load 0x0,0x9
012a 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
012b 7003 |p | Jump_Nonzero 0x12f
012c e001 | | Load 0x0,0x1
012d 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
012e 0257 | W | Execute Discrete,Raise
012f 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0130 4402 |D | Exit_Subprogram With_Result,0x2
0131 0000 0000 | | .BLANK 0000[0x7]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013f | ? | .CONST 0x013f ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0002 | | .CONST 0x0002 ; Number of locals
013b INIT_0138:
013b e003 | | Load 0x0,0x3 ; Debug Table 0x9 = .DEBUG 0x013b,0x0462,0x0001,0x0000,0x0056,0xda05,0x0000,0x0320
; Debug Table 0x9.0x0 = 0x13b,0xffff
013c e5fe | | Load 0x2,-0x2
013d 820f | | Call 0x1,0xf
013e 0039 | 9 | Store_Top Access,At_Offset_1
013f BODY_0138:
013f e5fd | | Load 0x2,-0x3 ; Debug Table 0x9.0x1 = 0x13f,0x1
0140 e002 | | Load 0x0,0x2
0141 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
0142 00d9 | | Load_Top At_Offset_1
0143 0227 | ' | Execute Access,All_Reference
0144 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0145 e5ff | | Load 0x2,-0x1
0146 00db | | Load_Top At_Offset_3
0147 0227 | ' | Execute Access,All_Reference
0148 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0149 e009 | | Load 0x0,0x9
014a 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
014b 00d8 | | Load_Top At_Offset_0
014c e009 | | Load 0x0,0x9
014d 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
014e 7003 |p | Jump_Nonzero 0x152
014f e001 | | Load 0x0,0x1
0150 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0151 0257 | W | Execute Discrete,Raise
0152 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0153 4504 |E | Exit_Subprogram 0x4
0154 0000 0000 | | .BLANK 0000[0x4]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015f | _ | .CONST 0x015f ; Address of begin
0159 0004 | | .CONST 0x0004 ; Address of exception handler
015a 0002 | | .CONST 0x0002 ; Number of locals
015b INIT_0158:
015b e003 | | Load 0x0,0x3 ; Debug Table 0xa = .DEBUG 0x015b,0x0468,0x0002,0x0000,0x0056,0xda05,0x0000,0x0330
; Debug Table 0xa.0x0 = 0x15b,0xffff
015c 00db | | Load_Top At_Offset_3
015d 820f | | Call 0x1,0xf
015e 0039 | 9 | Store_Top Access,At_Offset_1
015f BODY_0158:
015f e5fe | | Load 0x2,-0x2 ; Debug Table 0xa.0x1 = 0x15f,0x1
0160 e002 | | Load 0x0,0x2
0161 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
0162 00d9 | | Load_Top At_Offset_1
0163 0227 | ' | Execute Access,All_Reference
0164 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0165 00da | | Load_Top At_Offset_2
0166 0227 | ' | Execute Access,All_Reference
0167 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0168 e009 | | Load 0x0,0x9
0169 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
016a 00d8 | | Load_Top At_Offset_0
016b e009 | | Load 0x0,0x9
016c 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
016d 7003 |p | Jump_Nonzero 0x171
016e e001 | | Load 0x0,0x1
016f 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0170 0257 | W | Execute Discrete,Raise
0171 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0172 4402 |D | Exit_Subprogram With_Result,0x2
0173 0000 0000 | | .BLANK 0000[0x5]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017f | | .CONST 0x017f ; Address of begin
0179 0004 | | .CONST 0x0004 ; Address of exception handler
017a 0002 | | .CONST 0x0002 ; Number of locals
017b INIT_0178:
017b e003 | | Load 0x0,0x3 ; Debug Table 0xb = .DEBUG 0x017b,0x046e,0x0002,0x0000,0x0056,0xda05,0x0000,0x033d
; Debug Table 0xb.0x0 = 0x17b,0xffff
017c 00db | | Load_Top At_Offset_3
017d 820f | | Call 0x1,0xf
017e 0039 | 9 | Store_Top Access,At_Offset_1
017f BODY_0178:
017f e5fe | | Load 0x2,-0x2 ; Debug Table 0xb.0x1 = 0x17f,0x1
0180 e002 | | Load 0x0,0x2
0181 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
0182 00d9 | | Load_Top At_Offset_1
0183 0227 | ' | Execute Access,All_Reference
0184 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0185 00da | | Load_Top At_Offset_2
0186 0227 | ' | Execute Access,All_Reference
0187 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0188 e009 | | Load 0x0,0x9
0189 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
018a 00d8 | | Load_Top At_Offset_0
018b e009 | | Load 0x0,0x9
018c 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
018d 7003 |p | Jump_Nonzero 0x191
018e e001 | | Load 0x0,0x1
018f 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0190 0257 | W | Execute Discrete,Raise
0191 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0192 4402 |D | Exit_Subprogram With_Result,0x2
0193 0000 0000 | | .BLANK 0000[0x5]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019f | | .CONST 0x019f ; Address of begin
0199 0004 | | .CONST 0x0004 ; Address of exception handler
019a 0002 | | .CONST 0x0002 ; Number of locals
019b INIT_0198:
019b e003 | | Load 0x0,0x3 ; Debug Table 0xc = .DEBUG 0x019b,0x0474,0x0002,0x0000,0x0056,0xda05,0x0000,0x034a
; Debug Table 0xc.0x0 = 0x19b,0xffff
019c e5fe | | Load 0x2,-0x2
019d 820f | | Call 0x1,0xf
019e 0039 | 9 | Store_Top Access,At_Offset_1
019f BODY_0198:
019f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x1 = 0x19f,0x1
01a0 0227 | ' | Execute Access,All_Reference
01a1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01a2 e5ff | | Load 0x2,-0x1
01a3 00da | | Load_Top At_Offset_2
01a4 0227 | ' | Execute Access,All_Reference
01a5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01a6 e009 | | Load 0x0,0x9
01a7 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
01a8 00d8 | | Load_Top At_Offset_0
01a9 e009 | | Load 0x0,0x9
01aa 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
01ab 7003 |p | Jump_Nonzero 0x1af
01ac e001 | | Load 0x0,0x1
01ad 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
01ae 0257 | W | Execute Discrete,Raise
01af 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01b0 00e1 | | Load_Encached Boolean_Cache
01b1 00e0 | | Load_Encached Standard_Cache
01b2 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01b3 4402 |D | Exit_Subprogram With_Result,0x2
01b4 0000 0000 | | .BLANK 0000[0x4]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bf | | .CONST 0x01bf ; Address of begin
01b9 0004 | | .CONST 0x0004 ; Address of exception handler
01ba 0002 | | .CONST 0x0002 ; Number of locals
01bb INIT_01b8:
01bb e003 | | Load 0x0,0x3 ; Debug Table 0xd = .DEBUG 0x01bb,0x047a,0x0002,0x0000,0x0056,0xda05,0x0000,0x0357
; Debug Table 0xd.0x0 = 0x1bb,0xffff
01bc e5fe | | Load 0x2,-0x2
01bd 820f | | Call 0x1,0xf
01be 0039 | 9 | Store_Top Access,At_Offset_1
01bf BODY_01b8:
01bf 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x1 = 0x1bf,0x1
01c0 0227 | ' | Execute Access,All_Reference
01c1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01c2 e5ff | | Load 0x2,-0x1
01c3 00da | | Load_Top At_Offset_2
01c4 0227 | ' | Execute Access,All_Reference
01c5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01c6 e009 | | Load 0x0,0x9
01c7 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
01c8 00d8 | | Load_Top At_Offset_0
01c9 e009 | | Load 0x0,0x9
01ca 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
01cb 7003 |p | Jump_Nonzero 0x1cf
01cc e001 | | Load 0x0,0x1
01cd 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
01ce 0257 | W | Execute Discrete,Raise
01cf 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01d0 00e2 | | Load_Encached Integer_Cache
01d1 00e0 | | Load_Encached Standard_Cache
01d2 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01d3 4402 |D | Exit_Subprogram With_Result,0x2
01d4 0000 0000 | | .BLANK 0000[0x4]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01df | | .CONST 0x01df ; Address of begin
01d9 0004 | | .CONST 0x0004 ; Address of exception handler
01da 0002 | | .CONST 0x0002 ; Number of locals
01db INIT_01d8:
01db e003 | | Load 0x0,0x3 ; Debug Table 0xe = .DEBUG 0x01db,0x0480,0x0002,0x0000,0x0056,0xda05,0x0000,0x0364
; Debug Table 0xe.0x0 = 0x1db,0xffff
01dc e5fe | | Load 0x2,-0x2
01dd 820f | | Call 0x1,0xf
01de 0039 | 9 | Store_Top Access,At_Offset_1
01df BODY_01d8:
01df 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x1 = 0x1df,0x1
01e0 0227 | ' | Execute Access,All_Reference
01e1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01e2 e5ff | | Load 0x2,-0x1
01e3 00da | | Load_Top At_Offset_2
01e4 0227 | ' | Execute Access,All_Reference
01e5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01e6 e009 | | Load 0x0,0x9
01e7 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
01e8 00d8 | | Load_Top At_Offset_0
01e9 e009 | | Load 0x0,0x9
01ea 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
01eb 7003 |p | Jump_Nonzero 0x1ef
01ec e001 | | Load 0x0,0x1
01ed 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
01ee 0257 | W | Execute Discrete,Raise
01ef 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01f0 800a | | Call 0x0,0xa
01f1 4402 |D | Exit_Subprogram With_Result,0x2
01f2 0000 0000 | | .BLANK 0000[0x6]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01ff | | .CONST 0x01ff ; Address of begin
01f9 0004 | | .CONST 0x0004 ; Address of exception handler
01fa 0002 | | .CONST 0x0002 ; Number of locals
01fb INIT_01f8:
01fb e003 | | Load 0x0,0x3 ; Debug Table 0xf = .DEBUG 0x01fb,0x0486,0x0002,0x0000,0x0056,0xda05,0x0000,0x0371
; Debug Table 0xf.0x0 = 0x1fb,0xffff
01fc 00db | | Load_Top At_Offset_3
01fd 820f | | Call 0x1,0xf
01fe 0039 | 9 | Store_Top Access,At_Offset_1
01ff BODY_01f8:
01ff e5fe | | Load 0x2,-0x2 ; Debug Table 0xf.0x1 = 0x1ff,0x1
0200 e002 | | Load 0x0,0x2
0201 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
0202 00d9 | | Load_Top At_Offset_1
0203 0227 | ' | Execute Access,All_Reference
0204 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0205 00da | | Load_Top At_Offset_2
0206 0227 | ' | Execute Access,All_Reference
0207 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0208 e009 | | Load 0x0,0x9
0209 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
020a 00d8 | | Load_Top At_Offset_0
020b e009 | | Load 0x0,0x9
020c 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
020d 7003 |p | Jump_Nonzero 0x211
020e e001 | | Load 0x0,0x1
020f 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0210 0257 | W | Execute Discrete,Raise
0211 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0212 4402 |D | Exit_Subprogram With_Result,0x2
0213 0000 0000 | | .BLANK 0000[0x5]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 021b | | .CONST 0x021b ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0001 | | .CONST 0x0001 ; Number of locals
021b BODY_0218:
021b INIT_0218:
021b 00da | | Load_Top At_Offset_2 ; Debug Table 0x10 = .DEBUG 0x021b,0x048c,0x0002,0x0000,0x0056,0xda05,0x0000,0x0382
; Debug Table 0x10.0x0 = 0x21b,0x1
021c e00b | | Load 0x0,0xb
021d 180d | | Execute Package,Field_Execute,Field_Number 0xd
021e 4401 |D | Exit_Subprogram With_Result,0x1
021f 0000 | | .XXX[0x1]
0220 0047 c00e | G | .LITERAL {0x0047c00e, 0x000022b0}
0224 0000 0000 | | .BLANK 0000[0x4]
0228 0235 0004 | 5 | .XXX[0x3]
022a 0020 | |
022b 029c 0243 | C| Declare_Subprogram For_Outer_Call,Visible,INIT_0240 ; Debug Table 0x11 = .DEBUG 0x022b,0x0490,0x4000,0x0000,0x0056,0xda05,0x0000,0x0219
; Debug Table 0x11.0x0 = 0x22b,0xffff
022d 0007 | | Action Break_Optional ; Debug Table 0x11.0x1 = 0x22d,0xfffe
022e 029a 024b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0248 ; Debug Table 0x11.0x2 = 0x22e,0xfffd
0230 00bf | | Action Accept_Activation
0231 029d 0283 | | Declare_Subprogram For_Outer_Call,INIT_0280 ; Debug Table 0x12 = .DEBUG 0x0231,0x0498,0x4000,0x0000,0x0056,0xdc35,0x0000,0x0007
; Debug Table 0x12.0x0 = 0x231,0xffff
0233 1d1f | | Execute_Immediate Reference_Lex_1,0x1f ; Debug Table 0x12.0x1 = 0x233,0xfffe
0234 00c7 | | Action Elaborate_Subprogram
0235 e21c | | Load 0x1,0x1c ; Debug Table 0x12.0x2 = 0x235,0x1
0236 6805 |h | Jump_Zero 0x23c
0237 4800 |H | Short_Literal 0x0 ; Debug Table 0x12.0x3 = 0x237,0x2
0238 e21b | | Load 0x1,0x1b
0239 e21a | | Load 0x1,0x1a
023a e219 | | Load 0x1,0x19
023b 821f | | Call 0x1,0x1f
023c 00bc | | Action Signal_Activated
023d 00bb | | Action Signal_Completion
023e 0000 0000 | | .XXX[0x2]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0243 | C | .CONST 0x0243 ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0001 | | .CONST 0x0001 ; Number of locals
0243 BODY_0240:
0243 INIT_0240:
0243 00b6 | | Action Make_Scope ; Debug Table 0x13 = .DEBUG 0x0243,0x04a2,0x1002,0x0000,0x0056,0xda05,0x0000,0x02b4
0244 020a | | Execute Module,Get_Name
0245 00ca | | Action Exit_Nullary_Function
0246 0000 0000 | | .XXX[0x2]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 026b | k | .CONST 0x026b ; Address of begin
0249 0004 | | .CONST 0x0004 ; Address of exception handler
024a 0007 | | .CONST 0x0007 ; Number of locals
024b INIT_0248:
024b e5fd | | Load 0x2,-0x3 ; Debug Table 0x14 = .DEBUG 0x024b,0x04a4,0x1001,0x0000,0x0056,0xda05,0x0000,0x02bd
; Debug Table 0x14.0x0 = 0x24b,0xffff
024c e001 | | Load 0x0,0x1
024d 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
024e e5fe | | Load 0x2,-0x2 ; Debug Table 0x14.0x1 = 0x24e,0xfffe
024f e001 | | Load 0x0,0x1
0250 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
0251 0092 0316 | | Action Push_String_Extended,0x316 ; "."
0253 01cc | | Execute Vector,Catenate
0254 00d9 | | Load_Top At_Offset_1
0255 01cc | | Execute Vector,Catenate
0256 0007 | | Action Break_Optional
0257 e002 | | Load 0x0,0x2 ; Debug Table 0x14.0x2 = 0x257,0xfffd
0258 e003 | | Load 0x0,0x3
0259 0322 | " | Declare_Variable Record
025a 821e | | Call 0x1,0x1e
025b 00d9 | | Load_Top At_Offset_1
025c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
025d e5fc | | Load 0x2,-0x4
025e 00d9 | | Load_Top At_Offset_1
025f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0260 e5ff | | Load 0x2,-0x1
0261 00d9 | | Load_Top At_Offset_1
0262 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0263 e002 | | Load 0x0,0x2
0264 03b6 | | Declare_Variable Access,By_Allocation,With_Value
0265 0039 | 9 | Store_Top Access,At_Offset_1
0266 e002 | | Load 0x0,0x2 ; Debug Table 0x14.0x3 = 0x266,0xfffc
0267 029f 029b | | Declare_Subprogram For_Call,INIT_0298
0269 029f 02c3 | | Declare_Subprogram For_Call,INIT_02c0
026b BODY_0248:
026b e004 | | Load 0x0,0x4 ; Debug Table 0x14.0x4 = 0x26b,0x1
026c 0a01 | | Execute_Immediate Plus,0x1
026d c004 | | Store 0x0,0x4
026e 8406 | | Call 0x2,0x6 ; Debug Table 0x14.0x5 = 0x26e,0x2
026f 4801 |H | Short_Literal 0x1 ; Debug Table 0x14.0x6 = 0x26f,0x3
0270 00ea | | Load_Encached Null_String_Cache
0271 e5fc | | Load 0x2,-0x4
0272 820f | | Call 0x1,0xf
0273 8220 | | Call 0x1,0x20
0274 e403 | | Load 0x2,0x3
0275 e004 | | Load 0x0,0x4
0276 e001 | | Load 0x0,0x1
0277 1b4f | O | Execute Package,Field_Read,Field_Number 0x4f
0278 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0279 8407 | | Call 0x2,0x7 ; Debug Table 0x14.0x7 = 0x279,0x4
027a 4505 |E | Exit_Subprogram 0x5
027b 0000 0000 | | .BLANK 0000[0x5]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0283 | | .CONST 0x0283 ; Address of begin
0281 0004 | | .CONST 0x0004 ; Address of exception handler
0282 0001 | | .CONST 0x0001 ; Number of locals
0283 BODY_0280:
0283 INIT_0280:
0283 00da | | Load_Top At_Offset_2 ; Debug Table 0x15 = .DEBUG 0x0283,0x04b6,0x1002,0x0000,0x0056,0xdc35,0x0000,0x0008
; Debug Table 0x15.0x0 = 0x283,0x1
0284 4605 |F | Jump_Case 0x5
0285 7805 |x | Jump 0x28b ; case 0x0
0286 7806 |x | Jump 0x28d ; case 0x1
0287 7807 |x | Jump 0x28f ; case 0x2
0288 7806 |x | Jump 0x28f ; case 0x3
0289 7805 |x | Jump 0x28f ; case 0x4
028a 7804 |x | Jump 0x28f ; case 0x5
028b 4802 |H | Short_Literal 0x2 ; Debug Table 0x15.0x1 = 0x28b,0x2
028c 4401 |D | Exit_Subprogram With_Result,0x1
028d 4803 |H | Short_Literal 0x3 ; Debug Table 0x15.0x2 = 0x28d,0x3
028e 4401 |D | Exit_Subprogram With_Result,0x1
028f 4800 |H | Short_Literal 0x0 ; Debug Table 0x15.0x3 = 0x28f,0x4
0290 4401 |D | Exit_Subprogram With_Result,0x1
0291 0000 0000 | | .BLANK 0000[0x7]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029b | | .CONST 0x029b ; Address of begin
0299 02a3 | | .CONST 0x02a3 ; Address of exception handler
029a 0001 | | .CONST 0x0001 ; Number of locals
029b BODY_0298:
029b INIT_0298:
029b e005 | | Load 0x0,0x5 ; Debug Table 0x16 = .DEBUG 0x029b,0x04c0,0x1004,0x0000,0x0056,0xdc35,0x0000,0x00b9
; Debug Table 0x16.0x0 = 0x29b,0x1
029c 4801 |H | Short_Literal 0x1
029d e404 | | Load 0x2,0x4
029e e403 | | Load 0x2,0x3
029f e006 | | Load 0x0,0x6
02a0 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02a1 c005 | | Store 0x0,0x5
02a2 4501 |E | Exit_Subprogram 0x1
02a3 TRAP_0298:
02a3 e006 | | Load 0x0,0x6
02a4 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
02a5 010f | | Execute Exception,Equal
02a6 6815 |h | Jump_Zero 0x2bc
02a7 e21d | | Load 0x1,0x1d ; Debug Table 0x16.0x1 = 0x2a7,0x2
02a8 6811 |h | Jump_Zero 0x2ba
02a9 e403 | | Load 0x2,0x3 ; Debug Table 0x16.0x2 = 0x2a9,0x3
02aa e005 | | Load 0x0,0x5
02ab e006 | | Load 0x0,0x6
02ac 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02ad a405 | | Store_Unchecked 0x2,0x5
02ae e005 | | Load 0x0,0x5 ; Debug Table 0x16.0x3 = 0x2ae,0x4
02af 4800 |H | Short_Literal 0x0
02b0 e404 | | Load 0x2,0x4
02b1 e403 | | Load 0x2,0x3
02b2 e006 | | Load 0x0,0x6
02b3 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02b4 c005 | | Store 0x0,0x5
02b5 e403 | | Load 0x2,0x3 ; Debug Table 0x16.0x4 = 0x2b5,0x5
02b6 e001 | | Load 0x0,0x1
02b7 1b4f | O | Execute Package,Field_Read,Field_Number 0x4f
02b8 181a | | Execute Package,Field_Execute,Field_Number 0x1a
02b9 4501 |E | Exit_Subprogram 0x1
02ba 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x5 = 0x2ba,0x6
02bb 0101 | | Execute Exception,Reraise
02bc 0100 | | Execute Exception,Raise
02bd 0000 0000 | | .XXX[0x3]
02bf 0000 | |
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c5 | | .CONST 0x02c5 ; Address of begin
02c1 02d7 | | .CONST 0x02d7 ; Address of exception handler
02c2 0002 | | .CONST 0x0002 ; Number of locals
02c3 INIT_02c0:
02c3 e002 | | Load 0x0,0x2 ; Debug Table 0x17 = .DEBUG 0x02c3,0x04ce,0x1004,0x0000,0x0056,0xdc35,0x0000,0x017d
; Debug Table 0x17.0x0 = 0x2c3,0xffff
02c4 0007 | | Action Break_Optional
02c5 BODY_02c0:
02c5 e005 | | Load 0x0,0x5 ; Debug Table 0x17.0x1 = 0x2c5,0x1
02c6 4801 |H | Short_Literal 0x1
02c7 e404 | | Load 0x2,0x4
02c8 e402 | | Load 0x2,0x2
02c9 e006 | | Load 0x0,0x6
02ca 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02cb c005 | | Store 0x0,0x5
02cc 4801 |H | Short_Literal 0x1 ; Debug Table 0x17.0x2 = 0x2cc,0x2
02cd 00ea | | Load_Encached Null_String_Cache
02ce e5fc | | Load 0x2,-0x4
02cf 820f | | Call 0x1,0xf
02d0 8220 | | Call 0x1,0x20
02d1 e402 | | Load 0x2,0x2
02d2 e004 | | Load 0x0,0x4
02d3 e001 | | Load 0x0,0x1
02d4 1b4f | O | Execute Package,Field_Read,Field_Number 0x4f
02d5 1819 | | Execute Package,Field_Execute,Field_Number 0x19
02d6 4501 |E | Exit_Subprogram 0x1
02d7 TRAP_02c0:
02d7 e006 | | Load 0x0,0x6
02d8 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
02d9 010f | | Execute Exception,Equal
02da 683a |h: | Jump_Zero 0x315
02db e402 | | Load 0x2,0x2 ; Debug Table 0x17.0x3 = 0x2db,0x3
02dc e005 | | Load 0x0,0x5
02dd e006 | | Load 0x0,0x6
02de 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02df 003a | : | Store_Top Access,At_Offset_2
02e0 e405 | | Load 0x2,0x5 ; Debug Table 0x17.0x4 = 0x2e0,0x4
02e1 6820 |h | Jump_Zero 0x302
02e2 00d9 | | Load_Top At_Offset_1
02e3 681e |h | Jump_Zero 0x302
02e4 00d9 | | Load_Top At_Offset_1
02e5 0227 | ' | Execute Access,All_Reference
02e6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02e7 e405 | | Load 0x2,0x5
02e8 0227 | ' | Execute Access,All_Reference
02e9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02ea 027f | | Execute Discrete,Equal
02eb 6816 |h | Jump_Zero 0x302
02ec e005 | | Load 0x0,0x5 ; Debug Table 0x17.0x5 = 0x2ec,0x5
02ed 4800 |H | Short_Literal 0x0
02ee e404 | | Load 0x2,0x4
02ef e402 | | Load 0x2,0x2
02f0 e006 | | Load 0x0,0x6
02f1 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02f2 c005 | | Store 0x0,0x5
02f3 e402 | | Load 0x2,0x2 ; Debug Table 0x17.0x6 = 0x2f3,0x6
02f4 e001 | | Load 0x0,0x1
02f5 1b4f | O | Execute Package,Field_Read,Field_Number 0x4f
02f6 181a | | Execute Package,Field_Execute,Field_Number 0x1a
02f7 4801 |H | Short_Literal 0x1 ; Debug Table 0x17.0x7 = 0x2f7,0x7
02f8 00ea | | Load_Encached Null_String_Cache
02f9 e5fc | | Load 0x2,-0x4
02fa 820f | | Call 0x1,0xf
02fb 8220 | | Call 0x1,0x20
02fc e402 | | Load 0x2,0x2
02fd e004 | | Load 0x0,0x4
02fe e001 | | Load 0x0,0x1
02ff 1b4f | O | Execute Package,Field_Read,Field_Number 0x4f
0300 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0301 4501 |E | Exit_Subprogram 0x1
0302 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x17.0x8 = 0x302,0x8
0303 6810 |h | Jump_Zero 0x314
0304 e005 | | Load 0x0,0x5 ; Debug Table 0x17.0x9 = 0x304,0x9
0305 e402 | | Load 0x2,0x2
0306 e006 | | Load 0x0,0x6
0307 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0308 c005 | | Store 0x0,0x5
0309 e005 | | Load 0x0,0x5 ; Debug Table 0x17.0xa = 0x309,0xa
030a 4800 |H | Short_Literal 0x0
030b e002 | | Load 0x0,0x2
030c e402 | | Load 0x2,0x2
030d e006 | | Load 0x0,0x6
030e 1815 | | Execute Package,Field_Execute,Field_Number 0x15
030f c005 | | Store 0x0,0x5
0310 e402 | | Load 0x2,0x2 ; Debug Table 0x17.0xb = 0x310,0xb
0311 e001 | | Load 0x0,0x1
0312 1b4f | O | Execute Package,Field_Read,Field_Number 0x4f
0313 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0314 4501 |E | Exit_Subprogram 0x1
0315 0100 | | Execute Exception,Raise
0316 ; --------------------------------------------------------------------------------------
0316 ; STRING TABLE
0316 ; --------------------------------------------------------------------------------------
0316 0004 | | .STRTAB 0x0004->0x0318 ; "."
0317 0003 | | .STREND 0x0003->0x0318
0318 2e00 |. | .STRTAB_STRINGS
0319 0000 0000 | | .BLANK 0000[0x7]
0320 ; --------------------------------------------------------------------------------------
0320 ; Debug Table
0320 ; --------------------------------------------------------------------------------------
0320 0003 0018 | | .CONST 0x0003,0x0018
0322 000b 03e2 | | .DEBUG 0x000b,0x03e2,0x0000,0x0000,0x0056,0xda05,0x0000,0x0214
032a 0037 040c | 7 | .DEBUG 0x0037,0x040c,0x0000,0x0000,0x0056,0xdc35,0x0000,0x0006
0332 0073 0430 | s 0| .DEBUG 0x0073,0x0430,0x0002,0x0000,0x0056,0xda05,0x0000,0x02d5
033a 0093 043e | >| .DEBUG 0x0093,0x043e,0x0002,0x0000,0x0056,0xda05,0x0000,0x02de
0342 00ab 0444 | D| .DEBUG 0x00ab,0x0444,0x0002,0x0000,0x0056,0xda05,0x0000,0x02e7
034a 00c3 044a | J| .DEBUG 0x00c3,0x044a,0x0002,0x0000,0x0056,0xda05,0x0000,0x02f0
0352 00e3 0450 | P| .DEBUG 0x00e3,0x0450,0x0002,0x0000,0x0056,0xda05,0x0000,0x02fd
035a 00fb 0456 | V| .DEBUG 0x00fb,0x0456,0x0002,0x0000,0x0056,0xda05,0x0000,0x0306
0362 011b 045c | \| .DEBUG 0x011b,0x045c,0x0002,0x0000,0x0056,0xda05,0x0000,0x0313
036a 013b 0462 | ; b| .DEBUG 0x013b,0x0462,0x0001,0x0000,0x0056,0xda05,0x0000,0x0320
0372 015b 0468 | [ h| .DEBUG 0x015b,0x0468,0x0002,0x0000,0x0056,0xda05,0x0000,0x0330
037a 017b 046e | { n| .DEBUG 0x017b,0x046e,0x0002,0x0000,0x0056,0xda05,0x0000,0x033d
0382 019b 0474 | t| .DEBUG 0x019b,0x0474,0x0002,0x0000,0x0056,0xda05,0x0000,0x034a
038a 01bb 047a | z| .DEBUG 0x01bb,0x047a,0x0002,0x0000,0x0056,0xda05,0x0000,0x0357
0392 01db 0480 | | .DEBUG 0x01db,0x0480,0x0002,0x0000,0x0056,0xda05,0x0000,0x0364
039a 01fb 0486 | | .DEBUG 0x01fb,0x0486,0x0002,0x0000,0x0056,0xda05,0x0000,0x0371
03a2 021b 048c | | .DEBUG 0x021b,0x048c,0x0002,0x0000,0x0056,0xda05,0x0000,0x0382
03aa 022b 0490 | + | .DEBUG 0x022b,0x0490,0x4000,0x0000,0x0056,0xda05,0x0000,0x0219
03b2 0231 0498 | 1 | .DEBUG 0x0231,0x0498,0x4000,0x0000,0x0056,0xdc35,0x0000,0x0007
03ba 0243 04a2 | C | .DEBUG 0x0243,0x04a2,0x1002,0x0000,0x0056,0xda05,0x0000,0x02b4
03c2 024b 04a4 | K | .DEBUG 0x024b,0x04a4,0x1001,0x0000,0x0056,0xda05,0x0000,0x02bd
03ca 0283 04b6 | | .DEBUG 0x0283,0x04b6,0x1002,0x0000,0x0056,0xdc35,0x0000,0x0008
03d2 029b 04c0 | | .DEBUG 0x029b,0x04c0,0x1004,0x0000,0x0056,0xdc35,0x0000,0x00b9
03da 02c3 04ce | | .DEBUG 0x02c3,0x04ce,0x1004,0x0000,0x0056,0xdc35,0x0000,0x017d
03e2 ; --------------------------------------------------------------------------------------
03e2 ; Debug3 Subtable 0x0
03e2 ; --------------------------------------------------------------------------------------
03e2 0014 0000 | | .DBG3TAB 0x0014,0x0000
03e4 000b ffff | | .CONST 0x000b,0xffff
03e6 000e fffe | | .CONST 0x000e,0xfffe
03e8 0012 fffd | | .CONST 0x0012,0xfffd
03ea 0014 fffc | | .CONST 0x0014,0xfffc
03ec 0016 fffb | | .CONST 0x0016,0xfffb
03ee 0018 fffa | | .CONST 0x0018,0xfffa
03f0 001a fff9 | | .CONST 0x001a,0xfff9
03f2 001c fff8 | | .CONST 0x001c,0xfff8
03f4 001e fff7 | | .CONST 0x001e,0xfff7
03f6 0020 fff6 | | .CONST 0x0020,0xfff6
03f8 0022 fff5 | " | .CONST 0x0022,0xfff5
03fa 0024 fff4 | $ | .CONST 0x0024,0xfff4
03fc 0026 fff3 | & | .CONST 0x0026,0xfff3
03fe 0028 fff2 | ( | .CONST 0x0028,0xfff2
0400 002a fff1 | * | .CONST 0x002a,0xfff1
0402 002c fff0 | , | .CONST 0x002c,0xfff0
0404 002e ffef | . | .CONST 0x002e,0xffef
0406 002f ffee | / | .CONST 0x002f,0xffee
0408 0031 ffed | 1 | .CONST 0x0031,0xffed
040a 0032 ffec | 2 | .CONST 0x0032,0xffec
040c ; --------------------------------------------------------------------------------------
040c ; Debug3 Subtable 0x1
040c ; --------------------------------------------------------------------------------------
040c 0010 0001 | | .DBG3TAB 0x0010,0x0001
040e 0037 ffff | 7 | .CONST 0x0037,0xffff
0410 0043 fffe | C | .CONST 0x0043,0xfffe
0412 0045 fffd | E | .CONST 0x0045,0xfffd
0414 0047 fffc | G | .CONST 0x0047,0xfffc
0416 0049 fffb | I | .CONST 0x0049,0xfffb
0418 004b fffa | K | .CONST 0x004b,0xfffa
041a 004d fff9 | M | .CONST 0x004d,0xfff9
041c 004f fff8 | O | .CONST 0x004f,0xfff8
041e 0051 fff7 | Q | .CONST 0x0051,0xfff7
0420 0053 fff6 | S | .CONST 0x0053,0xfff6
0422 0055 fff5 | U | .CONST 0x0055,0xfff5
0424 0057 fff4 | W | .CONST 0x0057,0xfff4
0426 0059 fff3 | Y | .CONST 0x0059,0xfff3
0428 005b fff2 | [ | .CONST 0x005b,0xfff2
042a 005d fff1 | ] | .CONST 0x005d,0xfff1
042c 005f fff0 | _ | .CONST 0x005f,0xfff0
042e 0061 0001 | a | .CONST 0x0061,0x0001
0430 ; --------------------------------------------------------------------------------------
0430 ; Debug3 Subtable 0x2
0430 ; --------------------------------------------------------------------------------------
0430 0001 0005 | | .DBG3TAB 0x0001,0x0005
0432 0073 ffff | s | .CONST 0x0073,0xffff
0434 0075 0001 | u | .CONST 0x0075,0x0001
0436 007f 0002 | | .CONST 0x007f,0x0002
0438 0081 0003 | | .CONST 0x0081,0x0003
043a 0084 0004 | | .CONST 0x0084,0x0004
043c 008a 0005 | | .CONST 0x008a,0x0005
043e ; --------------------------------------------------------------------------------------
043e ; Debug3 Subtable 0x3
043e ; --------------------------------------------------------------------------------------
043e 0001 0001 | | .DBG3TAB 0x0001,0x0001
0440 0093 ffff | | .CONST 0x0093,0xffff
0442 0097 0001 | | .CONST 0x0097,0x0001
0444 ; --------------------------------------------------------------------------------------
0444 ; Debug3 Subtable 0x4
0444 ; --------------------------------------------------------------------------------------
0444 0001 0001 | | .DBG3TAB 0x0001,0x0001
0446 00ab ffff | | .CONST 0x00ab,0xffff
0448 00af 0001 | | .CONST 0x00af,0x0001
044a ; --------------------------------------------------------------------------------------
044a ; Debug3 Subtable 0x5
044a ; --------------------------------------------------------------------------------------
044a 0001 0001 | | .DBG3TAB 0x0001,0x0001
044c 00c3 ffff | | .CONST 0x00c3,0xffff
044e 00c7 0001 | | .CONST 0x00c7,0x0001
0450 ; --------------------------------------------------------------------------------------
0450 ; Debug3 Subtable 0x6
0450 ; --------------------------------------------------------------------------------------
0450 0001 0001 | | .DBG3TAB 0x0001,0x0001
0452 00e3 ffff | | .CONST 0x00e3,0xffff
0454 00e7 0001 | | .CONST 0x00e7,0x0001
0456 ; --------------------------------------------------------------------------------------
0456 ; Debug3 Subtable 0x7
0456 ; --------------------------------------------------------------------------------------
0456 0001 0001 | | .DBG3TAB 0x0001,0x0001
0458 00fb ffff | | .CONST 0x00fb,0xffff
045a 00ff 0001 | | .CONST 0x00ff,0x0001
045c ; --------------------------------------------------------------------------------------
045c ; Debug3 Subtable 0x8
045c ; --------------------------------------------------------------------------------------
045c 0001 0001 | | .DBG3TAB 0x0001,0x0001
045e 011b ffff | | .CONST 0x011b,0xffff
0460 011f 0001 | | .CONST 0x011f,0x0001
0462 ; --------------------------------------------------------------------------------------
0462 ; Debug3 Subtable 0x9
0462 ; --------------------------------------------------------------------------------------
0462 0001 0001 | | .DBG3TAB 0x0001,0x0001
0464 013b ffff | ; | .CONST 0x013b,0xffff
0466 013f 0001 | ? | .CONST 0x013f,0x0001
0468 ; --------------------------------------------------------------------------------------
0468 ; Debug3 Subtable 0xa
0468 ; --------------------------------------------------------------------------------------
0468 0001 0001 | | .DBG3TAB 0x0001,0x0001
046a 015b ffff | [ | .CONST 0x015b,0xffff
046c 015f 0001 | _ | .CONST 0x015f,0x0001
046e ; --------------------------------------------------------------------------------------
046e ; Debug3 Subtable 0xb
046e ; --------------------------------------------------------------------------------------
046e 0001 0001 | | .DBG3TAB 0x0001,0x0001
0470 017b ffff | { | .CONST 0x017b,0xffff
0472 017f 0001 | | .CONST 0x017f,0x0001
0474 ; --------------------------------------------------------------------------------------
0474 ; Debug3 Subtable 0xc
0474 ; --------------------------------------------------------------------------------------
0474 0001 0001 | | .DBG3TAB 0x0001,0x0001
0476 019b ffff | | .CONST 0x019b,0xffff
0478 019f 0001 | | .CONST 0x019f,0x0001
047a ; --------------------------------------------------------------------------------------
047a ; Debug3 Subtable 0xd
047a ; --------------------------------------------------------------------------------------
047a 0001 0001 | | .DBG3TAB 0x0001,0x0001
047c 01bb ffff | | .CONST 0x01bb,0xffff
047e 01bf 0001 | | .CONST 0x01bf,0x0001
0480 ; --------------------------------------------------------------------------------------
0480 ; Debug3 Subtable 0xe
0480 ; --------------------------------------------------------------------------------------
0480 0001 0001 | | .DBG3TAB 0x0001,0x0001
0482 01db ffff | | .CONST 0x01db,0xffff
0484 01df 0001 | | .CONST 0x01df,0x0001
0486 ; --------------------------------------------------------------------------------------
0486 ; Debug3 Subtable 0xf
0486 ; --------------------------------------------------------------------------------------
0486 0001 0001 | | .DBG3TAB 0x0001,0x0001
0488 01fb ffff | | .CONST 0x01fb,0xffff
048a 01ff 0001 | | .CONST 0x01ff,0x0001
048c ; --------------------------------------------------------------------------------------
048c ; Debug3 Subtable 0x10
048c ; --------------------------------------------------------------------------------------
048c 0000 0001 | | .DBG3TAB 0x0000,0x0001
048e 021b 0001 | | .CONST 0x021b,0x0001
0490 ; --------------------------------------------------------------------------------------
0490 ; Debug3 Subtable 0x11
0490 ; --------------------------------------------------------------------------------------
0490 0003 0000 | | .DBG3TAB 0x0003,0x0000
0492 022b ffff | + | .CONST 0x022b,0xffff
0494 022d fffe | - | .CONST 0x022d,0xfffe
0496 022e fffd | . | .CONST 0x022e,0xfffd
0498 ; --------------------------------------------------------------------------------------
0498 ; Debug3 Subtable 0x12
0498 ; --------------------------------------------------------------------------------------
0498 0002 0002 | | .DBG3TAB 0x0002,0x0002
049a 0231 ffff | 1 | .CONST 0x0231,0xffff
049c 0233 fffe | 3 | .CONST 0x0233,0xfffe
049e 0235 0001 | 5 | .CONST 0x0235,0x0001
04a0 0237 0002 | 7 | .CONST 0x0237,0x0002
04a2 ; --------------------------------------------------------------------------------------
04a2 ; Debug3 Subtable 0x13
04a2 ; --------------------------------------------------------------------------------------
04a2 0000 0000 | | .DBG3TAB 0x0000,0x0000
04a4 ; --------------------------------------------------------------------------------------
04a4 ; Debug3 Subtable 0x14
04a4 ; --------------------------------------------------------------------------------------
04a4 0004 0004 | | .DBG3TAB 0x0004,0x0004
04a6 024b ffff | K | .CONST 0x024b,0xffff
04a8 024e fffe | N | .CONST 0x024e,0xfffe
04aa 0257 fffd | W | .CONST 0x0257,0xfffd
04ac 0266 fffc | f | .CONST 0x0266,0xfffc
04ae 026b 0001 | k | .CONST 0x026b,0x0001
04b0 026e 0002 | n | .CONST 0x026e,0x0002
04b2 026f 0003 | o | .CONST 0x026f,0x0003
04b4 0279 0004 | y | .CONST 0x0279,0x0004
04b6 ; --------------------------------------------------------------------------------------
04b6 ; Debug3 Subtable 0x15
04b6 ; --------------------------------------------------------------------------------------
04b6 0000 0004 | | .DBG3TAB 0x0000,0x0004
04b8 0283 0001 | | .CONST 0x0283,0x0001
04ba 028b 0002 | | .CONST 0x028b,0x0002
04bc 028d 0003 | | .CONST 0x028d,0x0003
04be 028f 0004 | | .CONST 0x028f,0x0004
04c0 ; --------------------------------------------------------------------------------------
04c0 ; Debug3 Subtable 0x16
04c0 ; --------------------------------------------------------------------------------------
04c0 0000 0006 | | .DBG3TAB 0x0000,0x0006
04c2 029b 0001 | | .CONST 0x029b,0x0001
04c4 02a7 0002 | | .CONST 0x02a7,0x0002
04c6 02a9 0003 | | .CONST 0x02a9,0x0003
04c8 02ae 0004 | | .CONST 0x02ae,0x0004
04ca 02b5 0005 | | .CONST 0x02b5,0x0005
04cc 02ba 0006 | | .CONST 0x02ba,0x0006
04ce ; --------------------------------------------------------------------------------------
04ce ; Debug3 Subtable 0x17
04ce ; --------------------------------------------------------------------------------------
04ce 0001 000b | | .DBG3TAB 0x0001,0x000b
04d0 02c3 ffff | | .CONST 0x02c3,0xffff
04d2 02c5 0001 | | .CONST 0x02c5,0x0001
04d4 02cc 0002 | | .CONST 0x02cc,0x0002
04d6 02db 0003 | | .CONST 0x02db,0x0003
04d8 02e0 0004 | | .CONST 0x02e0,0x0004
04da 02ec 0005 | | .CONST 0x02ec,0x0005
04dc 02f3 0006 | | .CONST 0x02f3,0x0006
04de 02f7 0007 | | .CONST 0x02f7,0x0007
04e0 0302 0008 | | .CONST 0x0302,0x0008
04e2 0304 0009 | | .CONST 0x0304,0x0009
04e4 0309 000a | | .CONST 0x0309,0x000a
04e6 0310 000b | | .CONST 0x0310,0x000b
04e8 0000 0000 | | .BLANK 0000[0x118]