|
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, 5811_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 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 02d8 | | .CONST 0x02d8 ; 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 007b | { | .CONST 0x007b ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0020 | | .CONST 0x0020 ; Number of locals
000b INIT_0008:
000b 0007 | | Action Break_Optional ; Debug Table 0x0 = .DEBUG 0x000b,0x03aa,0x8000,0x0000,0x0037,0x0054,0x0000,0x0018
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007 | | Action Break_Optional ; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 0007 | | Action Break_Optional ; Debug Table 0x0.0x2 = 0xd,0xfffd
000e 4806 |H | Short_Literal 0x6 ; Debug Table 0x0.0x3 = 0xe,0xfffc
000f 032b | + | Declare_Type Record,Incomplete,Visible
0010 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x4 = 0x10,0xfffb
0011 02a0 | | Declare_Subprogram Null_Subprogram
0012 4818 |H | Short_Literal 0x18
0013 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected
0014 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x5 = 0x14,0xfffa
0015 e001 | | Load 0x0,0x1
0016 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0017 e002 | | Load 0x0,0x2
0018 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0019 4900 |I | Short_Literal 0x100
001a e003 | | Load 0x0,0x3
001b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
001c 1c07 | | Execute_Immediate Run_Utility,0x7
001d 0129 | ) | Execute Any,Make_Visible
001e e004 | | Load 0x0,0x4
001f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0020 00e1 | | Load_Encached Boolean_Cache
0021 029f 008b | | Declare_Subprogram For_Call,INIT_0088
0023 e20d | | Load 0x1,0xd
0024 0326 | & | Complete_Type Record,By_Defining
0025 617e |a~ | Indirect_Literal Discrete,0x1a4,{0x00000000, 0x37005401} ; Debug Table 0x0.0x6 = 0x25,0xfff9
0026 0129 | ) | Execute Any,Make_Visible
0027 029a 00b3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00b0 ; Debug Table 0x0.0x7 = 0x27,0xfff8
0029 029a 00bb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00b8 ; Debug Table 0x0.0x8 = 0x29,0xfff7
002b e005 | | Load 0x0,0x5 ; Debug Table 0x0.0x9 = 0x2b,0xfff6
002c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
002d 02a0 | | Declare_Subprogram Null_Subprogram
002e 4801 |H | Short_Literal 0x1
002f 032e | . | Declare_Type Record,Defined,Visible
0030 029a 00e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00e0 ; Debug Table 0x0.0xa = 0x30,0xfff5
0032 4804 |H | Short_Literal 0x4 ; Debug Table 0x0.0xb = 0x32,0xfff4
0033 032b | + | Declare_Type Record,Incomplete,Visible
0034 029a 00f3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00f0 ; Debug Table 0x0.0xc = 0x34,0xfff3
0036 029a 00fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00f8 ; Debug Table 0x0.0xd = 0x36,0xfff2
0038 029a 0103 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0100 ; Debug Table 0x0.0xe = 0x38,0xfff1
003a 029a 010b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0108 ; Debug Table 0x0.0xf = 0x3a,0xfff0
003c 029a 0113 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0110 ; Debug Table 0x0.0x10 = 0x3c,0xffef
003e 0007 | | Action Break_Optional ; Debug Table 0x0.0x11 = 0x3e,0xffee
003f 029b 0133 | 3| Declare_Subprogram For_Outer_Call,Unelaborated,INIT_0130 ; Debug Table 0x0.0x12 = 0x3f,0xffed
0041 615e |a^ | Indirect_Literal Discrete,0x1a0,{0x00000000, 0x00370054} ; Debug Table 0x0.0x13 = 0x41,0xffec
0042 48ea |H | Short_Literal 0xea
0043 4814 |H | Short_Literal 0x14
0044 e212 | | Load 0x1,0x12
0045 e20e | | Load 0x1,0xe
0046 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0047 e006 | | Load 0x0,0x6
0048 0387 | | Declare_Variable Package
0049 00d8 | | Load_Top At_Offset_0
004a 020f | | Execute Module,Activate
004b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x14 = 0x4b,0xffeb
004c 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
004d e214 | | Load 0x1,0x14
004e 0325 | % | Complete_Type Record,By_Renaming
004f 00bf | | Action Accept_Activation
0050 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0050,0x03d6,0x8000,0x0000,0x0037,0x00c4,0x0000,0x000b
; Debug Table 0x1.0x0 = 0x50,0xffff
0051 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x1 = 0x51,0xfffe
0052 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0053 029d 013b | ;| Declare_Subprogram For_Outer_Call,INIT_0138 ; Debug Table 0x1.0x2 = 0x53,0xfffd
0055 029d 014b | K| Declare_Subprogram For_Outer_Call,INIT_0148 ; Debug Table 0x1.0x3 = 0x55,0xfffc
0057 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0x4 = 0x57,0xfffb
0058 00c7 | | Action Elaborate_Subprogram
0059 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x5 = 0x59,0xfffa
005a 1936 | 6 | Execute Package,Field_Reference,Field_Number 0x36
005b 0007 | | Action Break_Optional
005c 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x6 = 0x5c,0xfff9
005d 00c7 | | Action Elaborate_Subprogram
005e 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x7 = 0x5e,0xfff8
005f 00c7 | | Action Elaborate_Subprogram
0060 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x8 = 0x60,0xfff7
0061 00c7 | | Action Elaborate_Subprogram
0062 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x9 = 0x62,0xfff6
0063 00c7 | | Action Elaborate_Subprogram
0064 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0xa = 0x64,0xfff5
0065 00c7 | | Action Elaborate_Subprogram
0066 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0xb = 0x66,0xfff4
0067 6134 |a4 | Indirect_Literal Discrete,0x19c,{0x000ea813, 0x00001ab0}
0068 02a0 | | Declare_Subprogram Null_Subprogram
0069 037d | } | Declare_Type Task,Defined
006a 036f | o | Declare_Variable Task
006b e002 | | Load 0x0,0x2 ; Debug Table 0x1.0xc = 0x6b,0xfff3
006c 00b6 | | Action Make_Scope
006d e21b | | Load 0x1,0x1b
006e 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
006f 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0070 e007 | | Load 0x0,0x7
0071 4806 |H | Short_Literal 0x6
0072 e220 | | Load 0x1,0x20
0073 020e | | Execute Module,Augment_Imports
0074 0007 | | Action Break_Optional
0075 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0xd = 0x75,0xfff2
0076 00c7 | | Action Elaborate_Subprogram
0077 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0xe = 0x77,0xfff1
0078 00c7 | | Action Elaborate_Subprogram
0079 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0xf = 0x79,0xfff0
007a 00c7 | | Action Elaborate_Subprogram
007b BODY_0008:
007b 00be | | Action Activate_Tasks
007c e21b | | Load 0x1,0x1b ; Debug Table 0x1.0x10 = 0x7c,0x1
007d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
007e e21b | | Load 0x1,0x1b
007f 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0080 c21c | | Store 0x1,0x1c
0081 00bc | | Action Signal_Activated
0082 00bb | | Action Signal_Completion
0083 0000 0000 | | .BLANK 0000[0x5]
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 4608 |F | Jump_Case 0x8 ; Debug Table 0x2 = .DEBUG 0x008b,0x03fa,0x0005,0x0000,0x0037,0x0054,0x0000,0x0038
008c 7808 |x | Jump 0x95 ; case 0x0
008d 7817 |x | Jump 0xa5 ; case 0x1
008e 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x2
008f 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x3
0090 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x4
0091 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x5
0092 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x6
0093 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x7
0094 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x8
0095 00da | | Load_Top At_Offset_2
0096 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0097 0125 | % | Execute Any,Set_Constraint
0098 00da | | Load_Top At_Offset_2
0099 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
009a 1c00 | | Execute_Immediate Run_Utility,0x0
009b 00da | | Load_Top At_Offset_2
009c 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
009d 1c00 | | Execute_Immediate Run_Utility,0x0
009e 00da | | Load_Top At_Offset_2
009f 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
00a0 0125 | % | Execute Any,Set_Constraint
00a1 00da | | Load_Top At_Offset_2
00a2 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
00a3 1c00 | | Execute_Immediate Run_Utility,0x0
00a4 4302 |C | Exit_Subprogram From_Utility,0x2
00a5 00da | | Load_Top At_Offset_2
00a6 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
00a7 0125 | % | Execute Any,Set_Constraint
00a8 00da | | Load_Top At_Offset_2
00a9 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
00aa 0125 | % | Execute Any,Set_Constraint
00ab 4302 |C | Exit_Subprogram From_Utility,0x2
00ac 0000 0000 | | .BLANK 0000[0x4]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3 | | .CONST 0x00b3 ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0001 | | .CONST 0x0001 ; Number of locals
00b3 BODY_00b0:
00b3 INIT_00b0:
00b3 4801 |H | Short_Literal 0x1 ; Debug Table 0x3 = .DEBUG 0x00b3,0x03fc,0x0002,0x0000,0x0037,0x0054,0x0000,0x006b
; Debug Table 0x3.0x0 = 0xb3,0x1
00b4 00db | | Load_Top At_Offset_3
00b5 8211 | | Call 0x1,0x11
00b6 4401 |D | Exit_Subprogram With_Result,0x1
00b7 0000 | | .XXX[0x1]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00be | | .CONST 0x00be ; Address of begin
00b9 0004 | | .CONST 0x0004 ; Address of exception handler
00ba 0003 | | .CONST 0x0003 ; Number of locals
00bb INIT_00b8:
00bb e20e | | Load 0x1,0xe ; Debug Table 0x4 = .DEBUG 0x00bb,0x0400,0x0002,0x0000,0x0037,0x0054,0x0000,0x0076
; Debug Table 0x4.0x0 = 0xbb,0xffff
00bc 029f 0163 | c| Declare_Subprogram For_Call,INIT_0160
00be BODY_00b8:
00be 8403 | | Call 0x2,0x3 ; Debug Table 0x4.0x1 = 0xbe,0x1
00bf e20e | | Load 0x1,0xe ; Debug Table 0x4.0x2 = 0xbf,0x2
00c0 e007 | | Load 0x0,0x7
00c1 1b16 | | Execute Package,Field_Read,Field_Number 0x16
00c2 e007 | | Load 0x0,0x7
00c3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00c4 e5fe | | Load 0x2,-0x2
00c5 821d | | Call 0x1,0x1d
00c6 4805 |H | Short_Literal 0x5
00c7 e220 | | Load 0x1,0x20
00c8 170d | | Execute Task,Entry_Call,Field_Number 0xd
00c9 003a | : | Store_Top Access,At_Offset_2
00ca 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x3 = 0xca,0x3
00cb 7002 |p | Jump_Nonzero 0xce
00cc e20f | | Load 0x1,0xf ; Debug Table 0x4.0x4 = 0xcc,0x4
00cd 0257 | W | Execute Discrete,Raise
00ce e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0x5 = 0xce,0x5
00cf 6808 |h | Jump_Zero 0xd8
00d0 0007 | | Action Break_Optional ; Debug Table 0x4.0x6 = 0xd0,0x6
00d1 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x7 = 0xd1,0x7
00d2 0227 | ' | Execute Access,All_Reference
00d3 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
00d4 821f | | Call 0x1,0x1f
00d5 7002 |p | Jump_Nonzero 0xd8
00d6 4887 |H | Short_Literal 0x87
00d7 0257 | W | Execute Discrete,Raise
00d8 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x8 = 0xd8,0x8
00d9 4402 |D | Exit_Subprogram With_Result,0x2
00da 0000 0000 | | .BLANK 0000[0x6]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3 | | .CONST 0x00e3 ; Address of begin
00e1 00e8 | | .CONST 0x00e8 ; Address of exception handler
00e2 0001 | | .CONST 0x0001 ; Number of locals
00e3 BODY_00e0:
00e3 INIT_00e0:
00e3 00da | | Load_Top At_Offset_2 ; Debug Table 0x5 = .DEBUG 0x00e3,0x0414,0x0002,0x0000,0x0037,0x0054,0x0000,0x0091
; Debug Table 0x5.0x0 = 0xe3,0x1
00e4 e21c | | Load 0x1,0x1c
00e5 e21b | | Load 0x1,0x1b
00e6 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00e7 4401 |D | Exit_Subprogram With_Result,0x1
00e8 TRAP_00e0:
00e8 e21b | | Load 0x1,0x1b
00e9 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
00ea 010f | | Execute Exception,Equal
00eb 6802 |h | Jump_Zero 0xee
00ec e20e | | Load 0x1,0xe ; Debug Table 0x5.0x1 = 0xec,0x2
00ed 4401 |D | Exit_Subprogram With_Result,0x1
00ee 0100 | | Execute Exception,Raise
00ef 0000 | | .XXX[0x1]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f3 | | .CONST 0x00f3 ; Address of begin
00f1 0004 | | .CONST 0x0004 ; Address of exception handler
00f2 0001 | | .CONST 0x0001 ; Number of locals
00f3 BODY_00f0:
00f3 INIT_00f0:
00f3 00da | | Load_Top At_Offset_2 ; Debug Table 0x6 = .DEBUG 0x00f3,0x041a,0x0001,0x0000,0x0037,0x0054,0x0000,0x009e
; Debug Table 0x6.0x0 = 0xf3,0x1
00f4 e21c | | Load 0x1,0x1c
00f5 e21b | | Load 0x1,0x1b
00f6 181f | | Execute Package,Field_Execute,Field_Number 0x1f
00f7 4501 |E | Exit_Subprogram 0x1
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00fb | | .CONST 0x00fb ; Address of begin
00f9 0004 | | .CONST 0x0004 ; Address of exception handler
00fa 0001 | | .CONST 0x0001 ; Number of locals
00fb BODY_00f8:
00fb INIT_00f8:
00fb 00da | | Load_Top At_Offset_2 ; Debug Table 0x7 = .DEBUG 0x00fb,0x041e,0x0001,0x0000,0x0037,0x0054,0x0000,0x00a6
; Debug Table 0x7.0x0 = 0xfb,0x1
00fc e21b | | Load 0x1,0x1b
00fd 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00fe 4501 |E | Exit_Subprogram 0x1
00ff 0000 | | .XXX[0x1]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0103 | | .CONST 0x0103 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0001 | | .CONST 0x0001 ; Number of locals
0103 BODY_0100:
0103 INIT_0100:
0103 00da | | Load_Top At_Offset_2 ; Debug Table 0x8 = .DEBUG 0x0103,0x0422,0x0002,0x0000,0x0037,0x0054,0x0000,0x00ae
; Debug Table 0x8.0x0 = 0x103,0x1
0104 e21b | | Load 0x1,0x1b
0105 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0106 4401 |D | Exit_Subprogram With_Result,0x1
0107 0000 | | .XXX[0x1]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010b | | .CONST 0x010b ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 0001 | | .CONST 0x0001 ; Number of locals
010b BODY_0108:
010b INIT_0108:
010b 00da | | Load_Top At_Offset_2 ; Debug Table 0x9 = .DEBUG 0x010b,0x0426,0x0002,0x0000,0x0037,0x0054,0x0000,0x00b7
; Debug Table 0x9.0x0 = 0x10b,0x1
010c e21b | | Load 0x1,0x1b
010d 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
010e 4401 |D | Exit_Subprogram With_Result,0x1
010f 0000 | | .XXX[0x1]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0116 | | .CONST 0x0116 ; Address of begin
0111 0004 | | .CONST 0x0004 ; Address of exception handler
0112 0003 | | .CONST 0x0003 ; Number of locals
0113 INIT_0110:
0113 e20e | | Load 0x1,0xe ; Debug Table 0xa = .DEBUG 0x0113,0x042a,0x0002,0x0000,0x0037,0x0054,0x0000,0x00c0
; Debug Table 0xa.0x0 = 0x113,0xffff
0114 029f 0183 | | Declare_Subprogram For_Call,INIT_0180
0116 BODY_0110:
0116 8403 | | Call 0x2,0x3 ; Debug Table 0xa.0x1 = 0x116,0x1
0117 e20e | | Load 0x1,0xe ; Debug Table 0xa.0x2 = 0x117,0x2
0118 e5fd | | Load 0x2,-0x3
0119 e5fe | | Load 0x2,-0x2
011a 4801 |H | Short_Literal 0x1
011b 821d | | Call 0x1,0x1d
011c 4805 |H | Short_Literal 0x5
011d e220 | | Load 0x1,0x20
011e 170d | | Execute Task,Entry_Call,Field_Number 0xd
011f 003a | : | Store_Top Access,At_Offset_2
0120 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0x3 = 0x120,0x3
0121 7002 |p | Jump_Nonzero 0x124
0122 e20f | | Load 0x1,0xf ; Debug Table 0xa.0x4 = 0x122,0x4
0123 0257 | W | Execute Discrete,Raise
0124 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0x5 = 0x124,0x5
0125 0227 | ' | Execute Access,All_Reference
0126 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0127 821f | | Call 0x1,0x1f
0128 7002 |p | Jump_Nonzero 0x12b
0129 4887 |H | Short_Literal 0x87
012a 0257 | W | Execute Discrete,Raise
012b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0x6 = 0x12b,0x6
012c 4403 |D | Exit_Subprogram With_Result,0x3
012d 0000 0000 | | .XXX[0x3]
012f 0000 | |
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0133 | 3 | .CONST 0x0133 ; Address of begin
0131 0004 | | .CONST 0x0004 ; Address of exception handler
0132 0001 | | .CONST 0x0001 ; Number of locals
0133 BODY_0130:
0133 INIT_0130:
0133 00da | | Load_Top At_Offset_2 ; Debug Table 0xb = .DEBUG 0x0133,0x043a,0x0002,0x0000,0x0037,0x0054,0x0000,0x00e1
; Debug Table 0xb.0x0 = 0x133,0x1
0134 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0135 4814 |H | Short_Literal 0x14
0136 026e | n | Execute Discrete,Modulo
0137 4401 |D | Exit_Subprogram With_Result,0x1
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013b | ; | .CONST 0x013b ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0001 | | .CONST 0x0001 ; Number of locals
013b BODY_0138:
013b INIT_0138:
013b e212 | | Load 0x1,0x12 ; Debug Table 0xc = .DEBUG 0x013b,0x043e,0x0002,0x0000,0x0037,0x00c4,0x0000,0x001d
; Debug Table 0xc.0x0 = 0x13b,0x1
013c 0322 | " | Declare_Variable Record
013d e008 | | Load 0x0,0x8
013e 180f | | Execute Package,Field_Execute,Field_Number 0xf
013f 00d9 | | Load_Top At_Offset_1
0140 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0141 00ca | | Action Exit_Nullary_Function
0142 0000 0000 | | .BLANK 0000[0x6]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 0150 | P | .CONST 0x0150 ; Address of begin
0149 0004 | | .CONST 0x0004 ; Address of exception handler
014a 0002 | | .CONST 0x0002 ; Number of locals
014b INIT_0148:
014b e009 | | Load 0x0,0x9 ; Debug Table 0xd = .DEBUG 0x014b,0x0442,0x0002,0x0000,0x0037,0x00c4,0x0000,0x002e
; Debug Table 0xd.0x0 = 0x14b,0xffff
014c 1b32 | 2 | Execute Package,Field_Read,Field_Number 0x32
014d 02c7 | | Declare_Variable Any
014e 00d8 | | Load_Top At_Offset_0
014f 1c00 | | Execute_Immediate Run_Utility,0x0
0150 BODY_0148:
0150 00be | | Action Activate_Tasks
0151 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x1 = 0x151,0x1
0152 e5ff | | Load 0x2,-0x1
0153 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0154 e009 | | Load 0x0,0x9
0155 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0156 c402 | | Store 0x2,0x2
0157 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x2 = 0x157,0x2
0158 e009 | | Load 0x0,0x9
0159 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
015a 4401 |D | Exit_Subprogram With_Result,0x1
015b 0000 0000 | | .BLANK 0000[0x5]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163 | c | .CONST 0x0163 ; Address of begin
0161 0177 | w | .CONST 0x0177 ; Address of exception handler
0162 0001 | | .CONST 0x0001 ; Number of locals
0163 BODY_0160:
0163 INIT_0160:
0163 821d | | Call 0x1,0x1d ; Debug Table 0xe = .DEBUG 0x0163,0x044a,0x0004,0x0000,0x0037,0x00c4,0x0000,0x036d
; Debug Table 0xe.0x0 = 0x163,0x1
0164 e21c | | Load 0x1,0x1c
0165 e21b | | Load 0x1,0x1b
0166 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0167 a402 | | Store_Unchecked 0x2,0x2
0168 e5fe | | Load 0x2,-0x2 ; Debug Table 0xe.0x1 = 0x168,0x2
0169 6805 |h | Jump_Zero 0x16f
016a e402 | | Load 0x2,0x2
016b 0227 | ' | Execute Access,All_Reference
016c 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
016d 821f | | Call 0x1,0x1f
016e 6807 |h | Jump_Zero 0x176
016f e402 | | Load 0x2,0x2 ; Debug Table 0xe.0x2 = 0x16f,0x3
0170 7002 |p | Jump_Nonzero 0x173
0171 4887 |H | Short_Literal 0x87
0172 0257 | W | Execute Discrete,Raise
0173 e402 | | Load 0x2,0x2 ; Debug Table 0xe.0x3 = 0x173,0x4
0174 00cb | | Action Pop_Block_With_Result
0175 4402 |D | Exit_Subprogram With_Result,0x2
0176 4501 |E | Exit_Subprogram 0x1
0177 TRAP_0160:
0177 e21b | | Load 0x1,0x1b
0178 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
0179 010f | | Execute Exception,Equal
017a 6801 |h | Jump_Zero 0x17c
017b 4501 |E | Exit_Subprogram 0x1 ; Debug Table 0xe.0x4 = 0x17b,0x5
017c 0100 | | Execute Exception,Raise
017d 0000 0000 | | .XXX[0x3]
017f 0000 | |
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0183 | | .CONST 0x0183 ; Address of begin
0181 0195 | | .CONST 0x0195 ; Address of exception handler
0182 0001 | | .CONST 0x0001 ; Number of locals
0183 BODY_0180:
0183 INIT_0180:
0183 821d | | Call 0x1,0x1d ; Debug Table 0xf = .DEBUG 0x0183,0x0456,0x0004,0x0000,0x0037,0x00c4,0x0000,0x0305
; Debug Table 0xf.0x0 = 0x183,0x1
0184 e21c | | Load 0x1,0x1c
0185 e21b | | Load 0x1,0x1b
0186 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0187 a402 | | Store_Unchecked 0x2,0x2
0188 e402 | | Load 0x2,0x2 ; Debug Table 0xf.0x1 = 0x188,0x2
0189 0227 | ' | Execute Access,All_Reference
018a 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
018b 821f | | Call 0x1,0x1f
018c 6807 |h | Jump_Zero 0x194
018d e402 | | Load 0x2,0x2 ; Debug Table 0xf.0x2 = 0x18d,0x3
018e 7002 |p | Jump_Nonzero 0x191
018f 4887 |H | Short_Literal 0x87
0190 0257 | W | Execute Discrete,Raise
0191 e402 | | Load 0x2,0x2 ; Debug Table 0xf.0x3 = 0x191,0x4
0192 00cb | | Action Pop_Block_With_Result
0193 4403 |D | Exit_Subprogram With_Result,0x3
0194 4501 |E | Exit_Subprogram 0x1
0195 TRAP_0180:
0195 e21b | | Load 0x1,0x1b
0196 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
0197 010f | | Execute Exception,Equal
0198 6801 |h | Jump_Zero 0x19a
0199 4501 |E | Exit_Subprogram 0x1 ; Debug Table 0xf.0x4 = 0x199,0x5
019a 0100 | | Execute Exception,Raise
019b 0000 | | .XXX[0x1]
019c 000e a813 | | .LITERAL {0x000ea813, 0x00001ab0}
01a0 0000 0000 | | .LITERAL {0x00000000, 0x00370054}
01a4 0000 0000 | | .LITERAL {0x00000000, 0x37005401}
01a8 01ba 0004 | | .XXX[0x3]
01aa 0012 | |
01ab 4805 |H | Short_Literal 0x5 ; Debug Table 0x10 = .DEBUG 0x01ab,0x0462,0x0000,0x0000,0x0037,0x00c4,0x0000,0x00f7
01ac 02cb | | Declare_Variable Entry
01ad 00bf | | Action Accept_Activation
01ae 0007 | | Action Break_Optional ; Debug Table 0x11 = .DEBUG 0x01ae,0x0464,0x0000,0x0000,0x0037,0x00c4,0x0000,0x011d
; Debug Table 0x11.0x0 = 0x1ae,0xffff
01af 029d 01c3 | | Declare_Subprogram For_Outer_Call,INIT_01c0 ; Debug Table 0x11.0x1 = 0x1af,0xfffe
01b1 029d 01d3 | | Declare_Subprogram For_Outer_Call,INIT_01d0 ; Debug Table 0x11.0x2 = 0x1b1,0xfffd
01b3 029d 01eb | | Declare_Subprogram For_Outer_Call,INIT_01e8 ; Debug Table 0x11.0x3 = 0x1b3,0xfffc
01b5 029d 021b | | Declare_Subprogram For_Outer_Call,INIT_0218 ; Debug Table 0x11.0x4 = 0x1b5,0xfffb
01b7 029f 0243 | C| Declare_Subprogram For_Call,INIT_0240
01b9 00bc | | Action Signal_Activated
01ba 00cf | | Action Mark_Auxiliary
01bb 0007 | | Action Break_Optional ; Debug Table 0x11.0x5 = 0x1bb,0x1
01bc 8212 | | Call 0x1,0x12 ; Debug Table 0x11.0x6 = 0x1bc,0x2
01bd 00c9 | | Action Pop_Auxiliary_Loop
01be 7ffd | | Jump 0x1bc
01bf 0000 | | .XXX[0x1]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c3 | | .CONST 0x01c3 ; Address of begin
01c1 0004 | | .CONST 0x0004 ; Address of exception handler
01c2 0001 | | .CONST 0x0001 ; Number of locals
01c3 BODY_01c0:
01c3 INIT_01c0:
01c3 00da | | Load_Top At_Offset_2 ; Debug Table 0x12 = .DEBUG 0x01c3,0x0474,0x0001,0x0000,0x0037,0x00c4,0x0000,0x012e
; Debug Table 0x12.0x0 = 0x1c3,0x1
01c4 0227 | ' | Execute Access,All_Reference
01c5 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
01c6 e001 | | Load 0x0,0x1
01c7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01c8 4502 |E | Exit_Subprogram 0x2
01c9 0000 0000 | | .BLANK 0000[0x7]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d5 | | .CONST 0x01d5 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0002 | | .CONST 0x0002 ; Number of locals
01d3 INIT_01d0:
01d3 e002 | | Load 0x0,0x2 ; Debug Table 0x13 = .DEBUG 0x01d3,0x0478,0x0002,0x0000,0x0037,0x00c4,0x0000,0x0142
; Debug Table 0x13.0x0 = 0x1d3,0xffff
01d4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01d5 BODY_01d0:
01d5 e002 | | Load 0x0,0x2 ; Debug Table 0x13.0x1 = 0x1d5,0x1
01d6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01d7 03bc | | Declare_Variable Access,By_Allocation
01d8 00d8 | | Load_Top At_Offset_0
01d9 0227 | ' | Execute Access,All_Reference
01da 1c00 | | Execute_Immediate Run_Utility,0x0
01db 0039 | 9 | Store_Top Access,At_Offset_1
01dc e002 | | Load 0x0,0x2 ; Debug Table 0x13.0x2 = 0x1dc,0x2
01dd 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01de 00d9 | | Load_Top At_Offset_1
01df 0227 | ' | Execute Access,All_Reference
01e0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01e1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x3 = 0x1e1,0x3
01e2 00ca | | Action Exit_Nullary_Function
01e3 0000 0000 | | .BLANK 0000[0x5]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01f3 | | .CONST 0x01f3 ; Address of begin
01e9 0004 | | .CONST 0x0004 ; Address of exception handler
01ea 0004 | | .CONST 0x0004 ; Number of locals
01eb INIT_01e8:
01eb e003 | | Load 0x0,0x3 ; Debug Table 0x14 = .DEBUG 0x01eb,0x0482,0x0001,0x0000,0x0037,0x00c4,0x0000,0x015c
; Debug Table 0x14.0x0 = 0x1eb,0xffff
01ec 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
01ed 0322 | " | Declare_Variable Record
01ee e002 | | Load 0x0,0x2 ; Debug Table 0x14.0x1 = 0x1ee,0xfffe
01ef 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01f0 0322 | " | Declare_Variable Record
01f1 e002 | | Load 0x0,0x2 ; Debug Table 0x14.0x2 = 0x1f1,0xfffd
01f2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01f3 BODY_01e8:
01f3 00da | | Load_Top At_Offset_2 ; Debug Table 0x14.0x3 = 0x1f3,0x1
01f4 e004 | | Load 0x0,0x4
01f5 e003 | | Load 0x0,0x3
01f6 181f | | Execute Package,Field_Execute,Field_Number 0x1f
01f7 00d1 | | Pop_Control Pop_Count_1
01f8 00cf | | Action Mark_Auxiliary
01f9 7814 |x | Jump 0x20e
01fa 00db | | Load_Top At_Offset_3 ; Debug Table 0x14.0x4 = 0x1fa,0x3
01fb e003 | | Load 0x0,0x3
01fc 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
01fd 00db | | Load_Top At_Offset_3
01fe 017d | } | Execute Record,Structure_Write
01ff 00da | | Load_Top At_Offset_2 ; Debug Table 0x14.0x5 = 0x1ff,0x4
0200 8005 | | Call 0x0,0x5
0201 6807 |h | Jump_Zero 0x209
0202 00da | | Load_Top At_Offset_2 ; Debug Table 0x14.0x6 = 0x202,0x5
0203 e004 | | Load 0x0,0x4
0204 e003 | | Load 0x0,0x3
0205 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0206 003a | : | Store_Top Access,At_Offset_2
0207 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x14.0x7 = 0x207,0x6
0208 820e | | Call 0x1,0xe
0209 00db | | Load_Top At_Offset_3 ; Debug Table 0x14.0x8 = 0x209,0x7
020a e003 | | Load 0x0,0x3
020b 1820 | | Execute Package,Field_Execute,Field_Number 0x20
020c 00d1 | | Pop_Control Pop_Count_1
020d 00c9 | | Action Pop_Auxiliary_Loop
020e 00db | | Load_Top At_Offset_3 ; Debug Table 0x14.0x9 = 0x20e,0x2
020f e003 | | Load 0x0,0x3
0210 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0211 6fe8 |o | Jump_Zero 0x1fa
0212 4501 |E | Exit_Subprogram 0x1
0213 0000 0000 | | .BLANK 0000[0x5]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 021f | | .CONST 0x021f ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0003 | | .CONST 0x0003 ; Number of locals
021b INIT_0218:
021b e006 | | Load 0x0,0x6 ; Debug Table 0x15 = .DEBUG 0x021b,0x0498,0x0002,0x0000,0x0037,0x00c4,0x0000,0x01aa
; Debug Table 0x15.0x0 = 0x21b,0xffff
021c 1b19 | | Execute Package,Field_Read,Field_Number 0x19
021d 029f 027b | {| Declare_Subprogram For_Call,INIT_0278 ; Debug Table 0x15.0x1 = 0x21d,0xfffe
021f BODY_0218:
021f e5fe | | Load 0x2,-0x2 ; Debug Table 0x15.0x2 = 0x21f,0x1
0220 681c |h | Jump_Zero 0x23d
0221 e5ff | | Load 0x2,-0x1
0222 681a |h | Jump_Zero 0x23d
0223 e5ff | | Load 0x2,-0x1
0224 0227 | ' | Execute Access,All_Reference
0225 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0226 e001 | | Load 0x0,0x1
0227 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
0228 7014 |p | Jump_Nonzero 0x23d
0229 8403 | | Call 0x2,0x3 ; Debug Table 0x15.0x3 = 0x229,0x2
022a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x15.0x4 = 0x22a,0x3
022b 6811 |h | Jump_Zero 0x23d
022c e5ff | | Load 0x2,-0x1 ; Debug Table 0x15.0x5 = 0x22c,0x4
022d 0227 | ' | Execute Access,All_Reference
022e 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
022f e001 | | Load 0x0,0x1
0230 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0231 8210 | | Call 0x1,0x10 ; Debug Table 0x15.0x6 = 0x231,0x5
0232 8403 | | Call 0x2,0x3 ; Debug Table 0x15.0x7 = 0x232,0x6
0233 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x15.0x8 = 0x233,0x7
0234 6808 |h | Jump_Zero 0x23d
0235 e5ff | | Load 0x2,-0x1 ; Debug Table 0x15.0x9 = 0x235,0x8
0236 0227 | ' | Execute Access,All_Reference
0237 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0238 e001 | | Load 0x0,0x1
0239 1810 | | Execute Package,Field_Execute,Field_Number 0x10
023a e002 | | Load 0x0,0x2 ; Debug Table 0x15.0xa = 0x23a,0x9
023b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
023c 4404 |D | Exit_Subprogram With_Result,0x4
023d e5ff | | Load 0x2,-0x1 ; Debug Table 0x15.0xb = 0x23d,0xa
023e 4404 |D | Exit_Subprogram With_Result,0x4
023f 0000 | | .XXX[0x1]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 024a | J | .CONST 0x024a ; Address of begin
0241 0270 | p | .CONST 0x0270 ; Address of exception handler
0242 0002 | | .CONST 0x0002 ; Number of locals
0243 INIT_0240:
0243 480d 4854 |H HT| Declare_Variable Select 0x000, 0x001, ; Debug Table 0x16 = .DEBUG 0x0243,0x04b2,0x0004,0x0000,0x0037,0x00c4,0x0000,0x02b9
0245 4801 4800 |H H | [0x001]: 0x000 = 0x0000,
0247 4800 4801 |H H | [0x00d]: 0x054 = 0x02a0
0249 02cf | |
024a BODY_0240:
024a 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x16.0x0 = 0x24a,0x1
024b 4800 |H | Short_Literal 0x0
024c c403 | | Store 0x2,0x3
024d 00e7 | | Load_Encached Duration_Cache
024e 00e3 | | Load_Encached Natural_Cache
024f 6080 |` | Indirect_Literal Discrete,0x2d0,{0x00000000, 0x00960000}
0250 00db | | Load_Top At_Offset_3
0251 7002 |p | Jump_Nonzero 0x254
0252 c404 | | Store 0x2,0x4
0253 7805 |x | Jump 0x259
0254 00d8 | | Load_Top At_Offset_0
0255 00db | | Load_Top At_Offset_3
0256 027c | | | Execute Discrete,Less
0257 6806 |h | Jump_Zero 0x25e
0258 c404 | | Store 0x2,0x4
0259 4801 |H | Short_Literal 0x1
025a c403 | | Store 0x2,0x3
025b 4801 |H | Short_Literal 0x1
025c c405 | | Store 0x2,0x5
025d 7801 |x | Jump 0x25f
025e 00d1 | | Pop_Control Pop_Count_1
025f 00da | | Load_Top At_Offset_2
0260 00d8 | | Load_Top At_Offset_0
0261 e402 | | Load 0x2,0x2
0262 013e | > | Execute Select,Timed_Guard_Write
0263 6804 |h | Jump_Zero 0x268
0264 00d8 | | Load_Top At_Offset_0
0265 00da | | Load_Top At_Offset_2
0266 e402 | | Load 0x2,0x2
0267 013d | = | Execute Select,Timed_Duration_Write
0268 00d3 | | Pop_Control Pop_Count_3
0269 00d8 | | Load_Top At_Offset_0
026a 013f | ? | Execute Select,Rendezvous
026b 4602 |F | Jump_Case 0x2
026c 4501 |E | Exit_Subprogram 0x1 ; case 0x0
026d 7800 |x | Jump 0x26e ; case 0x1
026e 8210 | | Call 0x1,0x10 ; case 0x2
; Debug Table 0x16.0x1 = 0x26e,0x3
026f 4501 |E | Exit_Subprogram 0x1
0270 TRAP_0240:
0270 0007 | | Action Break_Optional
0271 4501 |E | Exit_Subprogram 0x1 ; Debug Table 0x16.0x2 = 0x271,0x4
0272 0000 0000 | | .BLANK 0000[0x6]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027b | { | .CONST 0x027b ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 0001 | | .CONST 0x0001 ; Number of locals
027b BODY_0278:
027b INIT_0278:
027b e5fd | | Load 0x2,-0x3 ; Debug Table 0x17 = .DEBUG 0x027b,0x04ba,0x0001,0x0000,0x0037,0x00c4,0x0000,0x01c9
; Debug Table 0x17.0x0 = 0x27b,0x1
027c e006 | | Load 0x0,0x6
027d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
027e 01df | | Execute Vector,Equal
027f 680c |h | Jump_Zero 0x28c
0280 e5ff | | Load 0x2,-0x1 ; Debug Table 0x17.0x1 = 0x280,0x2
0281 0229 | ) | Execute Access,All_Read
0282 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0283 e006 | | Load 0x0,0x6
0284 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0285 00d9 | | Load_Top At_Offset_1
0286 e001 | | Load 0x0,0x1
0287 180f | | Execute Package,Field_Execute,Field_Number 0xf
0288 00d1 | | Pop_Control Pop_Count_1
0289 c402 | | Store 0x2,0x2
028a 00d1 | | Pop_Control Pop_Count_1
028b 4501 |E | Exit_Subprogram 0x1
028c e5ff | | Load 0x2,-0x1 ; Debug Table 0x17.0x2 = 0x28c,0x3
028d 0229 | ) | Execute Access,All_Read
028e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
028f e006 | | Load 0x0,0x6
0290 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0291 00d9 | | Load_Top At_Offset_1
0292 e5fc | | Load 0x2,-0x4
0293 e5fd | | Load 0x2,-0x3
0294 e001 | | Load 0x0,0x1
0295 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
0296 00d1 | | Pop_Control Pop_Count_1
0297 c402 | | Store 0x2,0x2
0298 00d1 | | Pop_Control Pop_Count_1
0299 4501 |E | Exit_Subprogram 0x1
029a 0000 0000 | | .BLANK 0000[0x6]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; See instruction 0x02cf at 0x243, index=0xd
02a0 ; --------------------------------------------------------------------------------------
02a0 02a3 | | .CONST 0x02a3 ; Address of begin
02a1 0004 | | .CONST 0x0004 ; Address of exception handler
02a2 0001 | | .CONST 0x0001 ; Number of locals
02a3 BODY_02a0:
02a3 INIT_02a0:
02a3 029f 02ab | | Declare_Subprogram For_Call,INIT_02a8 ; Debug Table 0x18 = .DEBUG 0x02a3,0x04c2,0x0003,0x0000,0x0037,0x00c4,0x0000,0x02a5
02a5 8602 | | Call 0x3,0x2 ; Debug Table 0x18.0x0 = 0x2a5,0x1
02a6 4101 |A | End_Rendezvous 0x1
02a7 0000 | | .XXX[0x1]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ad | | .CONST 0x02ad ; Address of begin
02a9 02b9 | | .CONST 0x02b9 ; Address of exception handler
02aa 0002 | | .CONST 0x0002 ; Number of locals
02ab INIT_02a8:
02ab e002 | | Load 0x0,0x2 ; Debug Table 0x19 = .DEBUG 0x02ab,0x04c6,0x0004,0x0000,0x0037,0x00c4,0x0000,0x02a3
; Debug Table 0x19.0x0 = 0x2ab,0xffff
02ac 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02ad BODY_02a8:
02ad e7fe | | Load 0x3,-0x2 ; Debug Table 0x19.0x1 = 0x2ad,0x1
02ae e004 | | Load 0x0,0x4
02af e003 | | Load 0x0,0x3
02b0 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02b1 0039 | 9 | Store_Top Access,At_Offset_1
02b2 e7fb | | Load 0x3,-0x5 ; Debug Table 0x19.0x2 = 0x2b2,0x2
02b3 e7fc | | Load 0x3,-0x4
02b4 e7fd | | Load 0x3,-0x3
02b5 00db | | Load_Top At_Offset_3
02b6 8211 | | Call 0x1,0x11
02b7 a7fa | | Store_Unchecked 0x3,-0x6
02b8 4501 |E | Exit_Subprogram 0x1
02b9 TRAP_02a8:
02b9 e003 | | Load 0x0,0x3
02ba 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
02bb 010f | | Execute Exception,Equal
02bc 6812 |h | Jump_Zero 0x2cf
02bd 820f | | Call 0x1,0xf ; Debug Table 0x19.0x3 = 0x2bd,0x3
02be 003a | : | Store_Top Access,At_Offset_2
02bf 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x19.0x4 = 0x2bf,0x4
02c0 6807 |h | Jump_Zero 0x2c8
02c1 e004 | | Load 0x0,0x4 ; Debug Table 0x19.0x5 = 0x2c1,0x5
02c2 4801 |H | Short_Literal 0x1
02c3 00db | | Load_Top At_Offset_3
02c4 e7fe | | Load 0x3,-0x2
02c5 e003 | | Load 0x0,0x3
02c6 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02c7 c004 | | Store 0x0,0x4
02c8 e7fb | | Load 0x3,-0x5 ; Debug Table 0x19.0x6 = 0x2c8,0x6
02c9 e7fc | | Load 0x3,-0x4
02ca e7fd | | Load 0x3,-0x3
02cb e802 | | Load 0x4,0x2
02cc 8211 | | Call 0x1,0x11
02cd a7fa | | Store_Unchecked 0x3,-0x6
02ce 4501 |E | Exit_Subprogram 0x1
02cf 0100 | | Execute Exception,Raise
02d0 0000 0000 | | .LITERAL {0x00000000, 0x00960000}
02d4 0000 0000 | | .BLANK 0000[0x4]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; Debug Table
02d8 ; --------------------------------------------------------------------------------------
02d8 0003 001a | | .CONST 0x0003,0x001a
02da 000b 03aa | | .DEBUG 0x000b,0x03aa,0x8000,0x0000,0x0037,0x0054,0x0000,0x0018
02e2 0050 03d6 | P | .DEBUG 0x0050,0x03d6,0x8000,0x0000,0x0037,0x00c4,0x0000,0x000b
02ea 008b 03fa | | .DEBUG 0x008b,0x03fa,0x0005,0x0000,0x0037,0x0054,0x0000,0x0038
02f2 00b3 03fc | | .DEBUG 0x00b3,0x03fc,0x0002,0x0000,0x0037,0x0054,0x0000,0x006b
02fa 00bb 0400 | | .DEBUG 0x00bb,0x0400,0x0002,0x0000,0x0037,0x0054,0x0000,0x0076
0302 00e3 0414 | | .DEBUG 0x00e3,0x0414,0x0002,0x0000,0x0037,0x0054,0x0000,0x0091
030a 00f3 041a | | .DEBUG 0x00f3,0x041a,0x0001,0x0000,0x0037,0x0054,0x0000,0x009e
0312 00fb 041e | | .DEBUG 0x00fb,0x041e,0x0001,0x0000,0x0037,0x0054,0x0000,0x00a6
031a 0103 0422 | "| .DEBUG 0x0103,0x0422,0x0002,0x0000,0x0037,0x0054,0x0000,0x00ae
0322 010b 0426 | &| .DEBUG 0x010b,0x0426,0x0002,0x0000,0x0037,0x0054,0x0000,0x00b7
032a 0113 042a | *| .DEBUG 0x0113,0x042a,0x0002,0x0000,0x0037,0x0054,0x0000,0x00c0
0332 0133 043a | 3 :| .DEBUG 0x0133,0x043a,0x0002,0x0000,0x0037,0x0054,0x0000,0x00e1
033a 013b 043e | ; >| .DEBUG 0x013b,0x043e,0x0002,0x0000,0x0037,0x00c4,0x0000,0x001d
0342 014b 0442 | K B| .DEBUG 0x014b,0x0442,0x0002,0x0000,0x0037,0x00c4,0x0000,0x002e
034a 0163 044a | c J| .DEBUG 0x0163,0x044a,0x0004,0x0000,0x0037,0x00c4,0x0000,0x036d
0352 0183 0456 | V| .DEBUG 0x0183,0x0456,0x0004,0x0000,0x0037,0x00c4,0x0000,0x0305
035a 01ab 0462 | b| .DEBUG 0x01ab,0x0462,0x0000,0x0000,0x0037,0x00c4,0x0000,0x00f7
0362 01ae 0464 | d| .DEBUG 0x01ae,0x0464,0x0000,0x0000,0x0037,0x00c4,0x0000,0x011d
036a 01c3 0474 | t| .DEBUG 0x01c3,0x0474,0x0001,0x0000,0x0037,0x00c4,0x0000,0x012e
0372 01d3 0478 | x| .DEBUG 0x01d3,0x0478,0x0002,0x0000,0x0037,0x00c4,0x0000,0x0142
037a 01eb 0482 | | .DEBUG 0x01eb,0x0482,0x0001,0x0000,0x0037,0x00c4,0x0000,0x015c
0382 021b 0498 | | .DEBUG 0x021b,0x0498,0x0002,0x0000,0x0037,0x00c4,0x0000,0x01aa
038a 0243 04b2 | C | .DEBUG 0x0243,0x04b2,0x0004,0x0000,0x0037,0x00c4,0x0000,0x02b9
0392 027b 04ba | { | .DEBUG 0x027b,0x04ba,0x0001,0x0000,0x0037,0x00c4,0x0000,0x01c9
039a 02a3 04c2 | | .DEBUG 0x02a3,0x04c2,0x0003,0x0000,0x0037,0x00c4,0x0000,0x02a5
03a2 02ab 04c6 | | .DEBUG 0x02ab,0x04c6,0x0004,0x0000,0x0037,0x00c4,0x0000,0x02a3
03aa ; --------------------------------------------------------------------------------------
03aa ; Debug3 Subtable 0x0
03aa ; --------------------------------------------------------------------------------------
03aa 0015 0000 | | .DBG3TAB 0x0015,0x0000
03ac 000b ffff | | .CONST 0x000b,0xffff
03ae 000c fffe | | .CONST 0x000c,0xfffe
03b0 000d fffd | | .CONST 0x000d,0xfffd
03b2 000e fffc | | .CONST 0x000e,0xfffc
03b4 0010 fffb | | .CONST 0x0010,0xfffb
03b6 0014 fffa | | .CONST 0x0014,0xfffa
03b8 0025 fff9 | % | .CONST 0x0025,0xfff9
03ba 0027 fff8 | ' | .CONST 0x0027,0xfff8
03bc 0029 fff7 | ) | .CONST 0x0029,0xfff7
03be 002b fff6 | + | .CONST 0x002b,0xfff6
03c0 0030 fff5 | 0 | .CONST 0x0030,0xfff5
03c2 0032 fff4 | 2 | .CONST 0x0032,0xfff4
03c4 0034 fff3 | 4 | .CONST 0x0034,0xfff3
03c6 0036 fff2 | 6 | .CONST 0x0036,0xfff2
03c8 0038 fff1 | 8 | .CONST 0x0038,0xfff1
03ca 003a fff0 | : | .CONST 0x003a,0xfff0
03cc 003c ffef | < | .CONST 0x003c,0xffef
03ce 003e ffee | > | .CONST 0x003e,0xffee
03d0 003f ffed | ? | .CONST 0x003f,0xffed
03d2 0041 ffec | A | .CONST 0x0041,0xffec
03d4 004b ffeb | K | .CONST 0x004b,0xffeb
03d6 ; --------------------------------------------------------------------------------------
03d6 ; Debug3 Subtable 0x1
03d6 ; --------------------------------------------------------------------------------------
03d6 0010 0001 | | .DBG3TAB 0x0010,0x0001
03d8 0050 ffff | P | .CONST 0x0050,0xffff
03da 0051 fffe | Q | .CONST 0x0051,0xfffe
03dc 0053 fffd | S | .CONST 0x0053,0xfffd
03de 0055 fffc | U | .CONST 0x0055,0xfffc
03e0 0057 fffb | W | .CONST 0x0057,0xfffb
03e2 0059 fffa | Y | .CONST 0x0059,0xfffa
03e4 005c fff9 | \ | .CONST 0x005c,0xfff9
03e6 005e fff8 | ^ | .CONST 0x005e,0xfff8
03e8 0060 fff7 | ` | .CONST 0x0060,0xfff7
03ea 0062 fff6 | b | .CONST 0x0062,0xfff6
03ec 0064 fff5 | d | .CONST 0x0064,0xfff5
03ee 0066 fff4 | f | .CONST 0x0066,0xfff4
03f0 006b fff3 | k | .CONST 0x006b,0xfff3
03f2 0075 fff2 | u | .CONST 0x0075,0xfff2
03f4 0077 fff1 | w | .CONST 0x0077,0xfff1
03f6 0079 fff0 | y | .CONST 0x0079,0xfff0
03f8 007c 0001 | | | .CONST 0x007c,0x0001
03fa ; --------------------------------------------------------------------------------------
03fa ; Debug3 Subtable 0x2
03fa ; --------------------------------------------------------------------------------------
03fa 0000 0000 | | .DBG3TAB 0x0000,0x0000
03fc ; --------------------------------------------------------------------------------------
03fc ; Debug3 Subtable 0x3
03fc ; --------------------------------------------------------------------------------------
03fc 0000 0001 | | .DBG3TAB 0x0000,0x0001
03fe 00b3 0001 | | .CONST 0x00b3,0x0001
0400 ; --------------------------------------------------------------------------------------
0400 ; Debug3 Subtable 0x4
0400 ; --------------------------------------------------------------------------------------
0400 0001 0008 | | .DBG3TAB 0x0001,0x0008
0402 00bb ffff | | .CONST 0x00bb,0xffff
0404 00be 0001 | | .CONST 0x00be,0x0001
0406 00bf 0002 | | .CONST 0x00bf,0x0002
0408 00ca 0003 | | .CONST 0x00ca,0x0003
040a 00cc 0004 | | .CONST 0x00cc,0x0004
040c 00ce 0005 | | .CONST 0x00ce,0x0005
040e 00d0 0006 | | .CONST 0x00d0,0x0006
0410 00d1 0007 | | .CONST 0x00d1,0x0007
0412 00d8 0008 | | .CONST 0x00d8,0x0008
0414 ; --------------------------------------------------------------------------------------
0414 ; Debug3 Subtable 0x5
0414 ; --------------------------------------------------------------------------------------
0414 0000 0002 | | .DBG3TAB 0x0000,0x0002
0416 00e3 0001 | | .CONST 0x00e3,0x0001
0418 00ec 0002 | | .CONST 0x00ec,0x0002
041a ; --------------------------------------------------------------------------------------
041a ; Debug3 Subtable 0x6
041a ; --------------------------------------------------------------------------------------
041a 0000 0001 | | .DBG3TAB 0x0000,0x0001
041c 00f3 0001 | | .CONST 0x00f3,0x0001
041e ; --------------------------------------------------------------------------------------
041e ; Debug3 Subtable 0x7
041e ; --------------------------------------------------------------------------------------
041e 0000 0001 | | .DBG3TAB 0x0000,0x0001
0420 00fb 0001 | | .CONST 0x00fb,0x0001
0422 ; --------------------------------------------------------------------------------------
0422 ; Debug3 Subtable 0x8
0422 ; --------------------------------------------------------------------------------------
0422 0000 0001 | | .DBG3TAB 0x0000,0x0001
0424 0103 0001 | | .CONST 0x0103,0x0001
0426 ; --------------------------------------------------------------------------------------
0426 ; Debug3 Subtable 0x9
0426 ; --------------------------------------------------------------------------------------
0426 0000 0001 | | .DBG3TAB 0x0000,0x0001
0428 010b 0001 | | .CONST 0x010b,0x0001
042a ; --------------------------------------------------------------------------------------
042a ; Debug3 Subtable 0xa
042a ; --------------------------------------------------------------------------------------
042a 0001 0006 | | .DBG3TAB 0x0001,0x0006
042c 0113 ffff | | .CONST 0x0113,0xffff
042e 0116 0001 | | .CONST 0x0116,0x0001
0430 0117 0002 | | .CONST 0x0117,0x0002
0432 0120 0003 | | .CONST 0x0120,0x0003
0434 0122 0004 | " | .CONST 0x0122,0x0004
0436 0124 0005 | $ | .CONST 0x0124,0x0005
0438 012b 0006 | + | .CONST 0x012b,0x0006
043a ; --------------------------------------------------------------------------------------
043a ; Debug3 Subtable 0xb
043a ; --------------------------------------------------------------------------------------
043a 0000 0001 | | .DBG3TAB 0x0000,0x0001
043c 0133 0001 | 3 | .CONST 0x0133,0x0001
043e ; --------------------------------------------------------------------------------------
043e ; Debug3 Subtable 0xc
043e ; --------------------------------------------------------------------------------------
043e 0000 0001 | | .DBG3TAB 0x0000,0x0001
0440 013b 0001 | ; | .CONST 0x013b,0x0001
0442 ; --------------------------------------------------------------------------------------
0442 ; Debug3 Subtable 0xd
0442 ; --------------------------------------------------------------------------------------
0442 0001 0002 | | .DBG3TAB 0x0001,0x0002
0444 014b ffff | K | .CONST 0x014b,0xffff
0446 0151 0001 | Q | .CONST 0x0151,0x0001
0448 0157 0002 | W | .CONST 0x0157,0x0002
044a ; --------------------------------------------------------------------------------------
044a ; Debug3 Subtable 0xe
044a ; --------------------------------------------------------------------------------------
044a 0000 0005 | | .DBG3TAB 0x0000,0x0005
044c 0163 0001 | c | .CONST 0x0163,0x0001
044e 0168 0002 | h | .CONST 0x0168,0x0002
0450 016f 0003 | o | .CONST 0x016f,0x0003
0452 0173 0004 | s | .CONST 0x0173,0x0004
0454 017b 0005 | { | .CONST 0x017b,0x0005
0456 ; --------------------------------------------------------------------------------------
0456 ; Debug3 Subtable 0xf
0456 ; --------------------------------------------------------------------------------------
0456 0000 0005 | | .DBG3TAB 0x0000,0x0005
0458 0183 0001 | | .CONST 0x0183,0x0001
045a 0188 0002 | | .CONST 0x0188,0x0002
045c 018d 0003 | | .CONST 0x018d,0x0003
045e 0191 0004 | | .CONST 0x0191,0x0004
0460 0199 0005 | | .CONST 0x0199,0x0005
0462 ; --------------------------------------------------------------------------------------
0462 ; Debug3 Subtable 0x10
0462 ; --------------------------------------------------------------------------------------
0462 0000 0000 | | .DBG3TAB 0x0000,0x0000
0464 ; --------------------------------------------------------------------------------------
0464 ; Debug3 Subtable 0x11
0464 ; --------------------------------------------------------------------------------------
0464 0005 0002 | | .DBG3TAB 0x0005,0x0002
0466 01ae ffff | | .CONST 0x01ae,0xffff
0468 01af fffe | | .CONST 0x01af,0xfffe
046a 01b1 fffd | | .CONST 0x01b1,0xfffd
046c 01b3 fffc | | .CONST 0x01b3,0xfffc
046e 01b5 fffb | | .CONST 0x01b5,0xfffb
0470 01bb 0001 | | .CONST 0x01bb,0x0001
0472 01bc 0002 | | .CONST 0x01bc,0x0002
0474 ; --------------------------------------------------------------------------------------
0474 ; Debug3 Subtable 0x12
0474 ; --------------------------------------------------------------------------------------
0474 0000 0001 | | .DBG3TAB 0x0000,0x0001
0476 01c3 0001 | | .CONST 0x01c3,0x0001
0478 ; --------------------------------------------------------------------------------------
0478 ; Debug3 Subtable 0x13
0478 ; --------------------------------------------------------------------------------------
0478 0001 0003 | | .DBG3TAB 0x0001,0x0003
047a 01d3 ffff | | .CONST 0x01d3,0xffff
047c 01d5 0001 | | .CONST 0x01d5,0x0001
047e 01dc 0002 | | .CONST 0x01dc,0x0002
0480 01e1 0003 | | .CONST 0x01e1,0x0003
0482 ; --------------------------------------------------------------------------------------
0482 ; Debug3 Subtable 0x14
0482 ; --------------------------------------------------------------------------------------
0482 0003 0007 | | .DBG3TAB 0x0003,0x0007
0484 01eb ffff | | .CONST 0x01eb,0xffff
0486 01ee fffe | | .CONST 0x01ee,0xfffe
0488 01f1 fffd | | .CONST 0x01f1,0xfffd
048a 01f3 0001 | | .CONST 0x01f3,0x0001
048c 01fa 0003 | | .CONST 0x01fa,0x0003
048e 01ff 0004 | | .CONST 0x01ff,0x0004
0490 0202 0005 | | .CONST 0x0202,0x0005
0492 0207 0006 | | .CONST 0x0207,0x0006
0494 0209 0007 | | .CONST 0x0209,0x0007
0496 020e 0002 | | .CONST 0x020e,0x0002
0498 ; --------------------------------------------------------------------------------------
0498 ; Debug3 Subtable 0x15
0498 ; --------------------------------------------------------------------------------------
0498 0002 000a | | .DBG3TAB 0x0002,0x000a
049a 021b ffff | | .CONST 0x021b,0xffff
049c 021d fffe | | .CONST 0x021d,0xfffe
049e 021f 0001 | | .CONST 0x021f,0x0001
04a0 0229 0002 | ) | .CONST 0x0229,0x0002
04a2 022a 0003 | * | .CONST 0x022a,0x0003
04a4 022c 0004 | , | .CONST 0x022c,0x0004
04a6 0231 0005 | 1 | .CONST 0x0231,0x0005
04a8 0232 0006 | 2 | .CONST 0x0232,0x0006
04aa 0233 0007 | 3 | .CONST 0x0233,0x0007
04ac 0235 0008 | 5 | .CONST 0x0235,0x0008
04ae 023a 0009 | : | .CONST 0x023a,0x0009
04b0 023d 000a | = | .CONST 0x023d,0x000a
04b2 ; --------------------------------------------------------------------------------------
04b2 ; Debug3 Subtable 0x16
04b2 ; --------------------------------------------------------------------------------------
04b2 0000 0003 | | .DBG3TAB 0x0000,0x0003
04b4 024a 0001 | J | .CONST 0x024a,0x0001
04b6 026e 0003 | n | .CONST 0x026e,0x0003
04b8 0271 0004 | q | .CONST 0x0271,0x0004
04ba ; --------------------------------------------------------------------------------------
04ba ; Debug3 Subtable 0x17
04ba ; --------------------------------------------------------------------------------------
04ba 0000 0003 | | .DBG3TAB 0x0000,0x0003
04bc 027b 0001 | { | .CONST 0x027b,0x0001
04be 0280 0002 | | .CONST 0x0280,0x0002
04c0 028c 0003 | | .CONST 0x028c,0x0003
04c2 ; --------------------------------------------------------------------------------------
04c2 ; Debug3 Subtable 0x18
04c2 ; --------------------------------------------------------------------------------------
04c2 0000 0001 | | .DBG3TAB 0x0000,0x0001
04c4 02a5 0001 | | .CONST 0x02a5,0x0001
04c6 ; --------------------------------------------------------------------------------------
04c6 ; Debug3 Subtable 0x19
04c6 ; --------------------------------------------------------------------------------------
04c6 0001 0006 | | .DBG3TAB 0x0001,0x0006
04c8 02ab ffff | | .CONST 0x02ab,0xffff
04ca 02ad 0001 | | .CONST 0x02ad,0x0001
04cc 02b2 0002 | | .CONST 0x02b2,0x0002
04ce 02bd 0003 | | .CONST 0x02bd,0x0003
04d0 02bf 0004 | | .CONST 0x02bf,0x0004
04d2 02c1 0005 | | .CONST 0x02c1,0x0005
04d4 02c8 0006 | | .CONST 0x02c8,0x0006
04d6 0000 0000 | | .BLANK 0000[0x12a]