|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 DFS Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 DFS Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 2048 (0x800)
Types: SEG
Notes: 5805_R1K_CODE
Names: »10959889.SEG«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─⟦this⟧ »10959889.SEG«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─⟦this⟧ »10959889.SEG«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─⟦this⟧ »10959889.SEG«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─⟦this⟧ »10959889.SEG«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─⟦this⟧ »10959889.SEG«
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5805 |X | .CONST 0x5805 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 01b0 | | .CONST 0x01b0 ; 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 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 005a | Z | .CONST 0x005a ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0025 | % | .CONST 0x0025 ; Number of locals
000b INIT_0008:
000b 4818 |H | Short_Literal 0x18 ; Debug Table 0x0 = .DEBUG 0x000b,0x023a,0xc000,0x0000,0x000e,0x2404,0x0000,0x0003
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 03cd | | Declare_Type Access,Incomplete,Visible,Accesses_Protected
000d 029a 0063 | c| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0060 ; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 00a3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00a0 ; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 00b3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00b0 ; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 029a 00d3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00d0 ; Debug Table 0x0.0x4 = 0x13,0xfffb
0015 029a 00e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00e0 ; Debug Table 0x0.0x5 = 0x15,0xfffa
0017 029a 00eb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00e8 ; Debug Table 0x0.0x6 = 0x17,0xfff9
0019 029a 00f3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00f0 ; Debug Table 0x0.0x7 = 0x19,0xfff8
001b 029a 0143 | C| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0140 ; Debug Table 0x0.0x8 = 0x1b,0xfff7
001d 4818 |H | Short_Literal 0x18 ; Debug Table 0x0.0x9 = 0x1d,0xfff6
001e 03cf | | Declare_Type Access,Incomplete,Visible
001f 029a 014b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0148 ; Debug Table 0x0.0xa = 0x1f,0xfff5
0021 029a 0153 | S| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0150 ; Debug Table 0x0.0xb = 0x21,0xfff4
0023 029a 015b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0158 ; Debug Table 0x0.0xc = 0x23,0xfff3
0025 029a 016b | k| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0168 ; Debug Table 0x0.0xd = 0x25,0xfff2
0027 4802 |H | Short_Literal 0x2 ; Debug Table 0x0.0xe = 0x27,0xfff1
0028 032a | * | Declare_Type Record,Incomplete
0029 e21f | | Load 0x1,0x1f ; Debug Table 0x0.0xf = 0x29,0xfff0
002a 02a0 | | Declare_Subprogram Null_Subprogram
002b e211 | | Load 0x1,0x11
002c 03c7 | | Complete_Type Access,By_Defining
002d e20f | | Load 0x1,0xf ; Debug Table 0x0.0x10 = 0x2d,0xffef
002e e211 | | Load 0x1,0x11
002f 029f 0173 | s| Declare_Subprogram For_Call,INIT_0170
0031 e21f | | Load 0x1,0x1f
0032 0326 | & | Complete_Type Record,By_Defining
0033 e211 | | Load 0x1,0x11 ; Debug Table 0x0.0x11 = 0x33,0xffee
0034 e21a | | Load 0x1,0x1a
0035 03c6 | | Complete_Type Access,By_Renaming
0036 00bf | | Action Accept_Activation
0037 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0037,0x0260,0xc000,0x0000,0x000e,0x2db4,0x0000,0x0005
; Debug Table 0x1.0x0 = 0x37,0xffff
0038 e211 | | Load 0x1,0x11 ; Debug Table 0x1.0x1 = 0x38,0xfffe
0039 0007 | | Action Break_Optional
003a 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x1.0x2 = 0x3a,0xfffd
003b 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
003c e211 | | Load 0x1,0x11 ; Debug Table 0x1.0x3 = 0x3c,0xfffc
003d 03bd | | Declare_Variable Access,Duplicate
003e 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x1.0x4 = 0x3e,0xfffb
003f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0040 029d 018b | | Declare_Subprogram For_Outer_Call,INIT_0188 ; Debug Table 0x1.0x5 = 0x40,0xfffa
0042 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x6 = 0x42,0xfff9
0043 00c7 | | Action Elaborate_Subprogram
0044 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x7 = 0x44,0xfff8
0045 00c7 | | Action Elaborate_Subprogram
0046 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x8 = 0x46,0xfff7
0047 00c7 | | Action Elaborate_Subprogram
0048 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x9 = 0x48,0xfff6
0049 00c7 | | Action Elaborate_Subprogram
004a 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0xa = 0x4a,0xfff5
004b 00c7 | | Action Elaborate_Subprogram
004c 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0xb = 0x4c,0xfff4
004d 00c7 | | Action Elaborate_Subprogram
004e 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0xc = 0x4e,0xfff3
004f 00c7 | | Action Elaborate_Subprogram
0050 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0xd = 0x50,0xfff2
0051 00c7 | | Action Elaborate_Subprogram
0052 1d1b | | Execute_Immediate Reference_Lex_1,0x1b ; Debug Table 0x1.0xe = 0x52,0xfff1
0053 00c7 | | Action Elaborate_Subprogram
0054 1d1c | | Execute_Immediate Reference_Lex_1,0x1c ; Debug Table 0x1.0xf = 0x54,0xfff0
0055 00c7 | | Action Elaborate_Subprogram
0056 1d1d | | Execute_Immediate Reference_Lex_1,0x1d ; Debug Table 0x1.0x10 = 0x56,0xffef
0057 00c7 | | Action Elaborate_Subprogram
0058 1d1e | | Execute_Immediate Reference_Lex_1,0x1e ; Debug Table 0x1.0x11 = 0x58,0xffee
0059 00c7 | | Action Elaborate_Subprogram
005a BODY_0008:
005a 00bc | | Action Signal_Activated
005b 00bb | | Action Signal_Completion
005c 0000 0000 | | .BLANK 0000[0x4]
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0067 | g | .CONST 0x0067 ; Address of begin
0061 0004 | | .CONST 0x0004 ; Address of exception handler
0062 0003 | | .CONST 0x0003 ; Number of locals
0063 INIT_0060:
0063 e211 | | Load 0x1,0x11 ; Debug Table 0x2 = .DEBUG 0x0063,0x0286,0x1002,0x0000,0x000e,0x2404,0x0000,0x001e
; Debug Table 0x2.0x0 = 0x63,0xffff
0064 0007 | | Action Break_Optional
0065 e211 | | Load 0x1,0x11 ; Debug Table 0x2.0x1 = 0x65,0xfffe
0066 0007 | | Action Break_Optional
0067 BODY_0060:
0067 e221 | ! | Load 0x1,0x21 ; Debug Table 0x2.0x2 = 0x67,0x1
0068 0a01 | | Execute_Immediate Plus,0x1
0069 c221 | ! | Store 0x1,0x21
006a e224 | $ | Load 0x1,0x24 ; Debug Table 0x2.0x3 = 0x6a,0x2
006b 700e |p | Jump_Nonzero 0x7a
006c e21f | | Load 0x1,0x1f ; Debug Table 0x2.0x4 = 0x6c,0x3
006d 0322 | " | Declare_Variable Record
006e e5ff | | Load 0x2,-0x1
006f e20f | | Load 0x1,0xf
0070 0119 | | Execute Any,Check_In_Formal_Type
0071 e404 | | Load 0x2,0x4
0072 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0073 e5fe | | Load 0x2,-0x2
0074 e404 | | Load 0x2,0x4
0075 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0076 e211 | | Load 0x1,0x11
0077 03b6 | | Declare_Variable Access,By_Allocation,With_Value
0078 a403 | | Store_Unchecked 0x2,0x3
0079 781d |x | Jump 0x97
007a e222 | " | Load 0x1,0x22 ; Debug Table 0x2.0x5 = 0x7a,0x4
007b a402 | | Store_Unchecked 0x2,0x2
007c e222 | " | Load 0x1,0x22 ; Debug Table 0x2.0x6 = 0x7c,0x5
007d 0227 | ' | Execute Access,All_Reference
007e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
007f a222 | " | Store_Unchecked 0x1,0x22
0080 e224 | $ | Load 0x1,0x24 ; Debug Table 0x2.0x7 = 0x80,0x6
0081 0aff | | Execute_Immediate Plus,-0x1
0082 c224 | $ | Store 0x1,0x24
0083 e21f | | Load 0x1,0x1f ; Debug Table 0x2.0x8 = 0x83,0x7
0084 0322 | " | Declare_Variable Record
0085 e5ff | | Load 0x2,-0x1
0086 e20f | | Load 0x1,0xf
0087 0119 | | Execute Any,Check_In_Formal_Type
0088 e404 | | Load 0x2,0x4
0089 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
008a e5fe | | Load 0x2,-0x2
008b e404 | | Load 0x2,0x4
008c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
008d e402 | | Load 0x2,0x2
008e 0228 | ( | Execute Access,All_Write
008f e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x9 = 0x8f,0x8
0090 a403 | | Store_Unchecked 0x2,0x3
0091 e224 | $ | Load 0x1,0x24 ; Debug Table 0x2.0xa = 0x91,0x9
0092 7004 |p | Jump_Nonzero 0x97
0093 e211 | | Load 0x1,0x11 ; Debug Table 0x2.0xb = 0x93,0xa
0094 a222 | " | Store_Unchecked 0x1,0x22
0095 e211 | | Load 0x1,0x11 ; Debug Table 0x2.0xc = 0x95,0xb
0096 a223 | # | Store_Unchecked 0x1,0x23
0097 e5fe | | Load 0x2,-0x2 ; Debug Table 0x2.0xd = 0x97,0xc
0098 8213 | | Call 0x1,0x13
0099 6802 |h | Jump_Zero 0x9c
009a e403 | | Load 0x2,0x3 ; Debug Table 0x2.0xe = 0x9a,0xd
009b a220 | | Store_Unchecked 0x1,0x20
009c e403 | | Load 0x2,0x3 ; Debug Table 0x2.0xf = 0x9c,0xe
009d 4402 |D | Exit_Subprogram With_Result,0x2
009e 0000 0000 | | .XXX[0x2]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a3 | | .CONST 0x00a3 ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0001 | | .CONST 0x0001 ; Number of locals
00a3 BODY_00a0:
00a3 INIT_00a0:
00a3 e221 | ! | Load 0x1,0x21 ; Debug Table 0x3 = .DEBUG 0x00a3,0x02a8,0x1002,0x0000,0x000e,0x2404,0x0000,0x002b
; Debug Table 0x3.0x0 = 0xa3,0x1
00a4 6803 |h | Jump_Zero 0xa8
00a5 e5ff | | Load 0x2,-0x1
00a6 022d | - | Execute Access,Is_Null
00a7 4401 |D | Exit_Subprogram With_Result,0x1
00a8 4801 |H | Short_Literal 0x1
00a9 4401 |D | Exit_Subprogram With_Result,0x1
00aa 0000 0000 | | .BLANK 0000[0x6]
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 e224 | $ | Load 0x1,0x24 ; Debug Table 0x4 = .DEBUG 0x00b3,0x02ac,0x1001,0x0000,0x000e,0x2404,0x0000,0x0034
; Debug Table 0x4.0x0 = 0xb3,0x1
00b4 e221 | ! | Load 0x1,0x21
00b5 0273 | s | Execute Discrete,Plus
00b6 c224 | $ | Store 0x1,0x24
00b7 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x1 = 0xb7,0x2
00b8 a221 | ! | Store_Unchecked 0x1,0x21
00b9 e5ff | | Load 0x2,-0x1 ; Debug Table 0x4.0x2 = 0xb9,0x3
00ba 7001 |p | Jump_Nonzero 0xbc
00bb 4501 |E | Exit_Subprogram 0x1 ; Debug Table 0x4.0x3 = 0xbb,0x4
00bc e222 | " | Load 0x1,0x22 ; Debug Table 0x4.0x4 = 0xbc,0x5
00bd 7002 |p | Jump_Nonzero 0xc0
00be e5ff | | Load 0x2,-0x1 ; Debug Table 0x4.0x5 = 0xbe,0x6
00bf a222 | " | Store_Unchecked 0x1,0x22
00c0 e223 | # | Load 0x1,0x23 ; Debug Table 0x4.0x6 = 0xc0,0x7
00c1 6804 |h | Jump_Zero 0xc6
00c2 e5ff | | Load 0x2,-0x1 ; Debug Table 0x4.0x7 = 0xc2,0x8
00c3 e223 | # | Load 0x1,0x23
00c4 0227 | ' | Execute Access,All_Reference
00c5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00c6 e220 | | Load 0x1,0x20 ; Debug Table 0x4.0x8 = 0xc6,0x9
00c7 a223 | # | Store_Unchecked 0x1,0x23
00c8 e211 | | Load 0x1,0x11 ; Debug Table 0x4.0x9 = 0xc8,0xa
00c9 a220 | | Store_Unchecked 0x1,0x20
00ca e211 | | Load 0x1,0x11 ; Debug Table 0x4.0xa = 0xca,0xb
00cb a5ff | | Store_Unchecked 0x2,-0x1
00cc 4501 |E | Exit_Subprogram 0x1
00cd 0000 0000 | | .XXX[0x3]
00cf 0000 | |
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d3 | | .CONST 0x00d3 ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 0001 | | .CONST 0x0001 ; Number of locals
00d3 BODY_00d0:
00d3 INIT_00d0:
00d3 e5ff | | Load 0x2,-0x1 ; Debug Table 0x5 = .DEBUG 0x00d3,0x02c4,0x1002,0x0000,0x000e,0x2404,0x0000,0x003c
; Debug Table 0x5.0x0 = 0xd3,0x1
00d4 0227 | ' | Execute Access,All_Reference
00d5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00d6 00d8 | | Load_Top At_Offset_0
00d7 0120 | | Execute Any,Is_Value
00d8 7002 |p | Jump_Nonzero 0xdb
00d9 00d8 | | Load_Top At_Offset_0
00da 011e | | Execute Any,Convert
00db e20f | | Load 0x1,0xf
00dc 0119 | | Execute Any,Check_In_Formal_Type
00dd 4401 |D | Exit_Subprogram With_Result,0x1
00de 0000 0000 | | .XXX[0x2]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3 | | .CONST 0x00e3 ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0001 | | .CONST 0x0001 ; Number of locals
00e3 BODY_00e0:
00e3 INIT_00e0:
00e3 e5ff | | Load 0x2,-0x1 ; Debug Table 0x6 = .DEBUG 0x00e3,0x02c8,0x1002,0x0000,0x000e,0x2404,0x0000,0x0045
; Debug Table 0x6.0x0 = 0xe3,0x1
00e4 0227 | ' | Execute Access,All_Reference
00e5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00e6 4401 |D | Exit_Subprogram With_Result,0x1
00e7 0000 | | .XXX[0x1]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb | | .CONST 0x00eb ; Address of begin
00e9 0004 | | .CONST 0x0004 ; Address of exception handler
00ea 0001 | | .CONST 0x0001 ; Number of locals
00eb BODY_00e8:
00eb INIT_00e8:
00eb e5fe | | Load 0x2,-0x2 ; Debug Table 0x7 = .DEBUG 0x00eb,0x02cc,0x1001,0x0000,0x000e,0x2404,0x0000,0x004e
; Debug Table 0x7.0x0 = 0xeb,0x1
00ec e5ff | | Load 0x2,-0x1
00ed 0227 | ' | Execute Access,All_Reference
00ee 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00ef 4503 |E | Exit_Subprogram 0x3
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 010e | | .CONST 0x010e ; Address of begin
00f1 0004 | | .CONST 0x0004 ; Address of exception handler
00f2 000c | | .CONST 0x000c ; Number of locals
00f3 INIT_00f0:
00f3 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8 = .DEBUG 0x00f3,0x02d0,0x1001,0x0000,0x000e,0x2404,0x0000,0x005a
; Debug Table 0x8.0x0 = 0xf3,0xffff
00f4 0266 | f | Execute Discrete,Bounds
00f5 e20f | | Load 0x1,0xf
00f6 029f 0193 | | Declare_Subprogram For_Call,INIT_0190
00f8 4801 |H | Short_Literal 0x1
00f9 0350 | P | Declare_Type Array,Defined,Bounds_With_Object
00fa a001 | | Reference 0x0,0x1 ; Debug Table 0x8.0x1 = 0xfa,0xfffe
00fb 00c6 | | Action Check_Subprogram_Elaborated
00fc e20f | | Load 0x1,0xf
00fd 00e3 | | Load_Encached Natural_Cache
00fe e402 | | Load 0x2,0x2
00ff 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0100 60a7 |` | Indirect_Literal Discrete,0x1a8,{0x00000000, 0x000e2db4}
0101 48fa |H | Short_Literal 0xfa
0102 4809 |H | Short_Literal 0x9
0103 0007 | | Action Break_Optional
0104 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x2 = 0x104,0xfffd
0105 e221 | ! | Load 0x1,0x21
0106 e402 | | Load 0x2,0x2
0107 0334 | 4 | Declare_Variable Array,With_Constraint
0108 e40a | | Load 0x2,0xa
0109 1c00 | | Execute_Immediate Run_Utility,0x0
010a e211 | | Load 0x1,0x11 ; Debug Table 0x8.0x3 = 0x10a,0xfffc
010b 0007 | | Action Break_Optional
010c 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x8.0x4 = 0x10c,0xfffb
010d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
010e BODY_00f0:
010e e5ff | | Load 0x2,-0x1 ; Debug Table 0x8.0x5 = 0x10e,0x1
010f a40b | | Store_Unchecked 0x2,0xb
0110 e221 | ! | Load 0x1,0x21 ; Debug Table 0x8.0x6 = 0x110,0x2
0111 4801 |H | Short_Literal 0x1
0112 0263 | c | Execute Discrete,Above_Bound
0113 700b |p | Jump_Nonzero 0x11f
0114 e40b | | Load 0x2,0xb ; Debug Table 0x8.0x7 = 0x114,0x3
0115 0227 | ' | Execute Access,All_Reference
0116 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0117 e40e | | Load 0x2,0xe
0118 e40a | | Load 0x2,0xa
0119 01d6 | | Execute Vector,Field_Write
011a e40b | | Load 0x2,0xb ; Debug Table 0x8.0x8 = 0x11a,0x4
011b 0227 | ' | Execute Access,All_Reference
011c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
011d a40b | | Store_Unchecked 0x2,0xb
011e 3ff5 |? | Loop_Increasing 0x114
011f e40c | | Load 0x2,0xc ; Debug Table 0x8.0x9 = 0x11f,0x5
0120 e40a | | Load 0x2,0xa
0121 e403 | | Load 0x2,0x3
0122 e404 | | Load 0x2,0x4
0123 e405 | | Load 0x2,0x5
0124 4806 |H | Short_Literal 0x6
0125 4802 |H | Short_Literal 0x2
0126 0099 | | Action Reference_Dynamic
0127 4807 |H | Short_Literal 0x7
0128 4802 |H | Short_Literal 0x2
0129 0099 | | Action Reference_Dynamic
012a 8001 | | Call 0x0,0x1
012b 00d1 | | Pop_Control Pop_Count_1
012c c40c | | Store 0x2,0xc
012d e5ff | | Load 0x2,-0x1 ; Debug Table 0x8.0xa = 0x12d,0x6
012e a40b | | Store_Unchecked 0x2,0xb
012f e221 | ! | Load 0x1,0x21 ; Debug Table 0x8.0xb = 0x12f,0x7
0130 4801 |H | Short_Literal 0x1
0131 0263 | c | Execute Discrete,Above_Bound
0132 700b |p | Jump_Nonzero 0x13e
0133 e40e | | Load 0x2,0xe ; Debug Table 0x8.0xc = 0x133,0x8
0134 e40a | | Load 0x2,0xa
0135 01d7 | | Execute Vector,Field_Read
0136 e40b | | Load 0x2,0xb
0137 0227 | ' | Execute Access,All_Reference
0138 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0139 e40b | | Load 0x2,0xb ; Debug Table 0x8.0xd = 0x139,0x9
013a 0227 | ' | Execute Access,All_Reference
013b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
013c a40b | | Store_Unchecked 0x2,0xb
013d 3ff5 |? | Loop_Increasing 0x133
013e 4501 |E | Exit_Subprogram 0x1
013f 0000 | | .XXX[0x1]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0143 | C | .CONST 0x0143 ; Address of begin
0141 0004 | | .CONST 0x0004 ; Address of exception handler
0142 0001 | | .CONST 0x0001 ; Number of locals
0143 BODY_0140:
0143 INIT_0140:
0143 e221 | ! | Load 0x1,0x21 ; Debug Table 0x9 = .DEBUG 0x0143,0x02ee,0x1002,0x0000,0x000e,0x2404,0x0000,0x0062
; Debug Table 0x9.0x0 = 0x143,0x1
0144 4401 |D | Exit_Subprogram With_Result,0x1
0145 0000 0000 | | .XXX[0x3]
0147 0000 | |
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b | K | .CONST 0x014b ; Address of begin
0149 0004 | | .CONST 0x0004 ; Address of exception handler
014a 0001 | | .CONST 0x0001 ; Number of locals
014b BODY_0148:
014b INIT_0148:
014b e5ff | | Load 0x2,-0x1 ; Debug Table 0xa = .DEBUG 0x014b,0x02f2,0x1001,0x0000,0x000e,0x2404,0x0000,0x006f
; Debug Table 0xa.0x0 = 0x14b,0x1
014c a5fe | | Store_Unchecked 0x2,-0x2
014d 4502 |E | Exit_Subprogram 0x2
014e 0000 0000 | | .XXX[0x2]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0153 | S | .CONST 0x0153 ; Address of begin
0151 0004 | | .CONST 0x0004 ; Address of exception handler
0152 0001 | | .CONST 0x0001 ; Number of locals
0153 BODY_0150:
0153 INIT_0150:
0153 e5ff | | Load 0x2,-0x1 ; Debug Table 0xb = .DEBUG 0x0153,0x02f6,0x1001,0x0000,0x000e,0x2404,0x0000,0x007b
; Debug Table 0xb.0x0 = 0x153,0x1
0154 0227 | ' | Execute Access,All_Reference
0155 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0156 a5ff | | Store_Unchecked 0x2,-0x1
0157 4501 |E | Exit_Subprogram 0x1
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015b | [ | .CONST 0x015b ; Address of begin
0159 0004 | | .CONST 0x0004 ; Address of exception handler
015a 0001 | | .CONST 0x0001 ; Number of locals
015b BODY_0158:
015b INIT_0158:
015b e5ff | | Load 0x2,-0x1 ; Debug Table 0xc = .DEBUG 0x015b,0x02fa,0x1002,0x0000,0x000e,0x2404,0x0000,0x0083
; Debug Table 0xc.0x0 = 0x15b,0x1
015c 0227 | ' | Execute Access,All_Reference
015d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
015e 00d8 | | Load_Top At_Offset_0
015f 0120 | | Execute Any,Is_Value
0160 7002 |p | Jump_Nonzero 0x163
0161 00d8 | | Load_Top At_Offset_0
0162 011e | | Execute Any,Convert
0163 e20f | | Load 0x1,0xf
0164 0119 | | Execute Any,Check_In_Formal_Type
0165 4401 |D | Exit_Subprogram With_Result,0x1
0166 0000 0000 | | .XXX[0x2]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016b | k | .CONST 0x016b ; Address of begin
0169 0004 | | .CONST 0x0004 ; Address of exception handler
016a 0001 | | .CONST 0x0001 ; Number of locals
016b BODY_0168:
016b INIT_0168:
016b e5ff | | Load 0x2,-0x1 ; Debug Table 0xd = .DEBUG 0x016b,0x02fe,0x1002,0x0000,0x000e,0x2404,0x0000,0x008c
; Debug Table 0xd.0x0 = 0x16b,0x1
016c 022d | - | Execute Access,Is_Null
016d 4401 |D | Exit_Subprogram With_Result,0x1
016e 0000 0000 | | .XXX[0x2]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0173 | s | .CONST 0x0173 ; Address of begin
0171 0004 | | .CONST 0x0004 ; Address of exception handler
0172 0001 | | .CONST 0x0001 ; Number of locals
0173 BODY_0170:
0173 INIT_0170:
0173 4608 |F | Jump_Case 0x8 ; Debug Table 0xe = .DEBUG 0x0173,0x0302,0x1005,0x0000,0x000e,0x2404,0x0000,0x009f
0174 7808 |x | Jump 0x17d ; case 0x0
0175 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
0176 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x2
0177 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x3
0178 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x4
0179 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x5
017a 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x6
017b 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x7
017c 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x8
017d e5ff | | Load 0x2,-0x1
017e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
017f 0125 | % | Execute Any,Set_Constraint
0180 e5ff | | Load 0x2,-0x1
0181 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0182 1c00 | | Execute_Immediate Run_Utility,0x0
0183 4302 |C | Exit_Subprogram From_Utility,0x2
0184 0000 0000 | | .BLANK 0000[0x4]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018b | | .CONST 0x018b ; Address of begin
0189 0004 | | .CONST 0x0004 ; Address of exception handler
018a 0001 | | .CONST 0x0001 ; Number of locals
018b BODY_0188:
018b INIT_0188:
018b 4800 |H | Short_Literal 0x0 ; Debug Table 0xf = .DEBUG 0x018b,0x0304,0x1002,0x0000,0x000e,0x2db4,0x0000,0x0023
; Debug Table 0xf.0x0 = 0x18b,0x1
018c a221 | ! | Store_Unchecked 0x1,0x21
018d e211 | | Load 0x1,0x11 ; Debug Table 0xf.0x1 = 0x18d,0x2
018e 00ca | | Action Exit_Nullary_Function
018f 0000 | | .XXX[0x1]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0193 | | .CONST 0x0193 ; Address of begin
0191 0004 | | .CONST 0x0004 ; Address of exception handler
0192 0001 | | .CONST 0x0001 ; Number of locals
0193 BODY_0190:
0193 INIT_0190:
0193 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0x10 = .DEBUG 0x0193,0x030a,0x1005,0x0000,0x000e,0x2db4,0x0000,0x00f1
0194 e7ff | | Load 0x3,-0x1
0195 01dc | | Execute Vector,Last
0196 e7ff | | Load 0x3,-0x1
0197 01dd | | Execute Vector,First
0198 0263 | c | Execute Discrete,Above_Bound
0199 700a |p | Jump_Nonzero 0x1a4
019a e603 | | Load 0x3,0x3
019b e7ff | | Load 0x3,-0x1
019c 01d5 | | Execute Vector,Field_Reference
019d 0125 | % | Execute Any,Set_Constraint
019e e603 | | Load 0x3,0x3
019f e7ff | | Load 0x3,-0x1
01a0 01d5 | | Execute Vector,Field_Reference
01a1 1c00 | | Execute_Immediate Run_Utility,0x0
01a2 0a01 | | Execute_Immediate Plus,0x1
01a3 7ff4 | | Jump 0x198
01a4 4302 |C | Exit_Subprogram From_Utility,0x2
01a5 0000 0000 | | .XXX[0x3]
01a7 0000 | |
01a8 0000 0000 | | .LITERAL {0x00000000, 0x000e2db4}
01ac 0000 0000 | | .BLANK 0000[0x4]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; Debug Table
01b0 ; --------------------------------------------------------------------------------------
01b0 0003 0011 | | .CONST 0x0003,0x0011
01b2 000b 023a | :| .DEBUG 0x000b,0x023a,0xc000,0x0000,0x000e,0x2404,0x0000,0x0003
01ba 0037 0260 | 7 `| .DEBUG 0x0037,0x0260,0xc000,0x0000,0x000e,0x2db4,0x0000,0x0005
01c2 0063 0286 | c | .DEBUG 0x0063,0x0286,0x1002,0x0000,0x000e,0x2404,0x0000,0x001e
01ca 00a3 02a8 | | .DEBUG 0x00a3,0x02a8,0x1002,0x0000,0x000e,0x2404,0x0000,0x002b
01d2 00b3 02ac | | .DEBUG 0x00b3,0x02ac,0x1001,0x0000,0x000e,0x2404,0x0000,0x0034
01da 00d3 02c4 | | .DEBUG 0x00d3,0x02c4,0x1002,0x0000,0x000e,0x2404,0x0000,0x003c
01e2 00e3 02c8 | | .DEBUG 0x00e3,0x02c8,0x1002,0x0000,0x000e,0x2404,0x0000,0x0045
01ea 00eb 02cc | | .DEBUG 0x00eb,0x02cc,0x1001,0x0000,0x000e,0x2404,0x0000,0x004e
01f2 00f3 02d0 | | .DEBUG 0x00f3,0x02d0,0x1001,0x0000,0x000e,0x2404,0x0000,0x005a
01fa 0143 02ee | C | .DEBUG 0x0143,0x02ee,0x1002,0x0000,0x000e,0x2404,0x0000,0x0062
0202 014b 02f2 | K | .DEBUG 0x014b,0x02f2,0x1001,0x0000,0x000e,0x2404,0x0000,0x006f
020a 0153 02f6 | S | .DEBUG 0x0153,0x02f6,0x1001,0x0000,0x000e,0x2404,0x0000,0x007b
0212 015b 02fa | [ | .DEBUG 0x015b,0x02fa,0x1002,0x0000,0x000e,0x2404,0x0000,0x0083
021a 016b 02fe | k | .DEBUG 0x016b,0x02fe,0x1002,0x0000,0x000e,0x2404,0x0000,0x008c
0222 0173 0302 | s | .DEBUG 0x0173,0x0302,0x1005,0x0000,0x000e,0x2404,0x0000,0x009f
022a 018b 0304 | | .DEBUG 0x018b,0x0304,0x1002,0x0000,0x000e,0x2db4,0x0000,0x0023
0232 0193 030a | | .DEBUG 0x0193,0x030a,0x1005,0x0000,0x000e,0x2db4,0x0000,0x00f1
023a ; --------------------------------------------------------------------------------------
023a ; Debug3 Subtable 0x0
023a ; --------------------------------------------------------------------------------------
023a 0012 0000 | | .DBG3TAB 0x0012,0x0000
023c 000b ffff | | .CONST 0x000b,0xffff
023e 000d fffe | | .CONST 0x000d,0xfffe
0240 000f fffd | | .CONST 0x000f,0xfffd
0242 0011 fffc | | .CONST 0x0011,0xfffc
0244 0013 fffb | | .CONST 0x0013,0xfffb
0246 0015 fffa | | .CONST 0x0015,0xfffa
0248 0017 fff9 | | .CONST 0x0017,0xfff9
024a 0019 fff8 | | .CONST 0x0019,0xfff8
024c 001b fff7 | | .CONST 0x001b,0xfff7
024e 001d fff6 | | .CONST 0x001d,0xfff6
0250 001f fff5 | | .CONST 0x001f,0xfff5
0252 0021 fff4 | ! | .CONST 0x0021,0xfff4
0254 0023 fff3 | # | .CONST 0x0023,0xfff3
0256 0025 fff2 | % | .CONST 0x0025,0xfff2
0258 0027 fff1 | ' | .CONST 0x0027,0xfff1
025a 0029 fff0 | ) | .CONST 0x0029,0xfff0
025c 002d ffef | - | .CONST 0x002d,0xffef
025e 0033 ffee | 3 | .CONST 0x0033,0xffee
0260 ; --------------------------------------------------------------------------------------
0260 ; Debug3 Subtable 0x1
0260 ; --------------------------------------------------------------------------------------
0260 0012 0000 | | .DBG3TAB 0x0012,0x0000
0262 0037 ffff | 7 | .CONST 0x0037,0xffff
0264 0038 fffe | 8 | .CONST 0x0038,0xfffe
0266 003a fffd | : | .CONST 0x003a,0xfffd
0268 003c fffc | < | .CONST 0x003c,0xfffc
026a 003e fffb | > | .CONST 0x003e,0xfffb
026c 0040 fffa | @ | .CONST 0x0040,0xfffa
026e 0042 fff9 | B | .CONST 0x0042,0xfff9
0270 0044 fff8 | D | .CONST 0x0044,0xfff8
0272 0046 fff7 | F | .CONST 0x0046,0xfff7
0274 0048 fff6 | H | .CONST 0x0048,0xfff6
0276 004a fff5 | J | .CONST 0x004a,0xfff5
0278 004c fff4 | L | .CONST 0x004c,0xfff4
027a 004e fff3 | N | .CONST 0x004e,0xfff3
027c 0050 fff2 | P | .CONST 0x0050,0xfff2
027e 0052 fff1 | R | .CONST 0x0052,0xfff1
0280 0054 fff0 | T | .CONST 0x0054,0xfff0
0282 0056 ffef | V | .CONST 0x0056,0xffef
0284 0058 ffee | X | .CONST 0x0058,0xffee
0286 ; --------------------------------------------------------------------------------------
0286 ; Debug3 Subtable 0x2
0286 ; --------------------------------------------------------------------------------------
0286 0002 000e | | .DBG3TAB 0x0002,0x000e
0288 0063 ffff | c | .CONST 0x0063,0xffff
028a 0065 fffe | e | .CONST 0x0065,0xfffe
028c 0067 0001 | g | .CONST 0x0067,0x0001
028e 006a 0002 | j | .CONST 0x006a,0x0002
0290 006c 0003 | l | .CONST 0x006c,0x0003
0292 007a 0004 | z | .CONST 0x007a,0x0004
0294 007c 0005 | | | .CONST 0x007c,0x0005
0296 0080 0006 | | .CONST 0x0080,0x0006
0298 0083 0007 | | .CONST 0x0083,0x0007
029a 008f 0008 | | .CONST 0x008f,0x0008
029c 0091 0009 | | .CONST 0x0091,0x0009
029e 0093 000a | | .CONST 0x0093,0x000a
02a0 0095 000b | | .CONST 0x0095,0x000b
02a2 0097 000c | | .CONST 0x0097,0x000c
02a4 009a 000d | | .CONST 0x009a,0x000d
02a6 009c 000e | | .CONST 0x009c,0x000e
02a8 ; --------------------------------------------------------------------------------------
02a8 ; Debug3 Subtable 0x3
02a8 ; --------------------------------------------------------------------------------------
02a8 0000 0001 | | .DBG3TAB 0x0000,0x0001
02aa 00a3 0001 | | .CONST 0x00a3,0x0001
02ac ; --------------------------------------------------------------------------------------
02ac ; Debug3 Subtable 0x4
02ac ; --------------------------------------------------------------------------------------
02ac 0000 000b | | .DBG3TAB 0x0000,0x000b
02ae 00b3 0001 | | .CONST 0x00b3,0x0001
02b0 00b7 0002 | | .CONST 0x00b7,0x0002
02b2 00b9 0003 | | .CONST 0x00b9,0x0003
02b4 00bb 0004 | | .CONST 0x00bb,0x0004
02b6 00bc 0005 | | .CONST 0x00bc,0x0005
02b8 00be 0006 | | .CONST 0x00be,0x0006
02ba 00c0 0007 | | .CONST 0x00c0,0x0007
02bc 00c2 0008 | | .CONST 0x00c2,0x0008
02be 00c6 0009 | | .CONST 0x00c6,0x0009
02c0 00c8 000a | | .CONST 0x00c8,0x000a
02c2 00ca 000b | | .CONST 0x00ca,0x000b
02c4 ; --------------------------------------------------------------------------------------
02c4 ; Debug3 Subtable 0x5
02c4 ; --------------------------------------------------------------------------------------
02c4 0000 0001 | | .DBG3TAB 0x0000,0x0001
02c6 00d3 0001 | | .CONST 0x00d3,0x0001
02c8 ; --------------------------------------------------------------------------------------
02c8 ; Debug3 Subtable 0x6
02c8 ; --------------------------------------------------------------------------------------
02c8 0000 0001 | | .DBG3TAB 0x0000,0x0001
02ca 00e3 0001 | | .CONST 0x00e3,0x0001
02cc ; --------------------------------------------------------------------------------------
02cc ; Debug3 Subtable 0x7
02cc ; --------------------------------------------------------------------------------------
02cc 0000 0001 | | .DBG3TAB 0x0000,0x0001
02ce 00eb 0001 | | .CONST 0x00eb,0x0001
02d0 ; --------------------------------------------------------------------------------------
02d0 ; Debug3 Subtable 0x8
02d0 ; --------------------------------------------------------------------------------------
02d0 0005 0009 | | .DBG3TAB 0x0005,0x0009
02d2 00f3 ffff | | .CONST 0x00f3,0xffff
02d4 00fa fffe | | .CONST 0x00fa,0xfffe
02d6 0104 fffd | | .CONST 0x0104,0xfffd
02d8 010a fffc | | .CONST 0x010a,0xfffc
02da 010c fffb | | .CONST 0x010c,0xfffb
02dc 010e 0001 | | .CONST 0x010e,0x0001
02de 0110 0002 | | .CONST 0x0110,0x0002
02e0 0114 0003 | | .CONST 0x0114,0x0003
02e2 011a 0004 | | .CONST 0x011a,0x0004
02e4 011f 0005 | | .CONST 0x011f,0x0005
02e6 012d 0006 | - | .CONST 0x012d,0x0006
02e8 012f 0007 | / | .CONST 0x012f,0x0007
02ea 0133 0008 | 3 | .CONST 0x0133,0x0008
02ec 0139 0009 | 9 | .CONST 0x0139,0x0009
02ee ; --------------------------------------------------------------------------------------
02ee ; Debug3 Subtable 0x9
02ee ; --------------------------------------------------------------------------------------
02ee 0000 0001 | | .DBG3TAB 0x0000,0x0001
02f0 0143 0001 | C | .CONST 0x0143,0x0001
02f2 ; --------------------------------------------------------------------------------------
02f2 ; Debug3 Subtable 0xa
02f2 ; --------------------------------------------------------------------------------------
02f2 0000 0001 | | .DBG3TAB 0x0000,0x0001
02f4 014b 0001 | K | .CONST 0x014b,0x0001
02f6 ; --------------------------------------------------------------------------------------
02f6 ; Debug3 Subtable 0xb
02f6 ; --------------------------------------------------------------------------------------
02f6 0000 0001 | | .DBG3TAB 0x0000,0x0001
02f8 0153 0001 | S | .CONST 0x0153,0x0001
02fa ; --------------------------------------------------------------------------------------
02fa ; Debug3 Subtable 0xc
02fa ; --------------------------------------------------------------------------------------
02fa 0000 0001 | | .DBG3TAB 0x0000,0x0001
02fc 015b 0001 | [ | .CONST 0x015b,0x0001
02fe ; --------------------------------------------------------------------------------------
02fe ; Debug3 Subtable 0xd
02fe ; --------------------------------------------------------------------------------------
02fe 0000 0001 | | .DBG3TAB 0x0000,0x0001
0300 016b 0001 | k | .CONST 0x016b,0x0001
0302 ; --------------------------------------------------------------------------------------
0302 ; Debug3 Subtable 0xe
0302 ; --------------------------------------------------------------------------------------
0302 0000 0000 | | .DBG3TAB 0x0000,0x0000
0304 ; --------------------------------------------------------------------------------------
0304 ; Debug3 Subtable 0xf
0304 ; --------------------------------------------------------------------------------------
0304 0000 0002 | | .DBG3TAB 0x0000,0x0002
0306 018b 0001 | | .CONST 0x018b,0x0001
0308 018d 0002 | | .CONST 0x018d,0x0002
030a ; --------------------------------------------------------------------------------------
030a ; Debug3 Subtable 0x10
030a ; --------------------------------------------------------------------------------------
030a 0000 0000 | | .DBG3TAB 0x0000,0x0000
030c 0000 0000 | | .BLANK 0000[0xf4]