|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 DFS Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 DFS Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 3072 (0xc00)
Types: SEG
Notes: 5805_R1K_CODE
Names: »11038737.SEG«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »11038737.SEG«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »11038737.SEG«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »11038737.SEG«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »11038737.SEG«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »11038737.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 0330 | 0 | .CONST 0x0330 ; 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 0033 | 3 | .CONST 0x0033 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 001e | | .CONST 0x001e ; Number of locals
000b INIT_0008:
000b e20f | | Load 0x1,0xf ; Debug Table 0x0 = .DEBUG 0x000b,0x038a,0xc000,0x0000,0x000e,0x7c74,0x0000,0x0003
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0266 | f | Execute Discrete,Bounds
000d e210 | | Load 0x1,0x10
000e 0266 | f | Execute Discrete,Bounds
000f 00e1 | | Load_Encached Boolean_Cache
0010 02a0 | | Declare_Subprogram Null_Subprogram
0011 4802 |H | Short_Literal 0x2
0012 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
0013 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0x13,0xfffe
0015 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0x15,0xfffd
0017 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x17,0xfffc
0019 00bf | | Action Accept_Activation
001a e20f | | Load 0x1,0xf ; Debug Table 0x1 = .DEBUG 0x001a,0x0394,0xc000,0x0000,0x000e,0x8274,0x0000,0x0005
; Debug Table 0x1.0x0 = 0x1a,0xffff
001b e211 | | Load 0x1,0x11
001c 029f 0283 | | Declare_Subprogram INIT_0280,For_Call
001e 4802 |H | Short_Literal 0x2
001f 032d | - | Declare_Type Record,Defined
0020 e20f | | Load 0x1,0xf ; Debug Table 0x1.0x1 = 0x20,0xfffe
0021 0266 | f | Execute Discrete,Bounds
0022 00da | | Load_Top At_Offset_2
0023 029f 029b | | Declare_Subprogram INIT_0298,For_Call
0025 4801 |H | Short_Literal 0x1
0026 0350 | P | Declare_Type Array,Defined,Bounds_With_Object
0027 e20f | | Load 0x1,0xf ; Debug Table 0x1.0x2 = 0x27,0xfffd
0028 0266 | f | Execute Discrete,Bounds
0029 e20f | | Load 0x1,0xf
002a 02a0 | | Declare_Subprogram Null_Subprogram
002b 4801 |H | Short_Literal 0x1
002c 0350 | P | Declare_Type Array,Defined,Bounds_With_Object
002d 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0x3 = 0x2d,0xfffc
002e 00c7 | | Action Elaborate_Subprogram
002f 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0x4 = 0x2f,0xfffb
0030 00c7 | | Action Elaborate_Subprogram
0031 1d1b | | Execute_Immediate Reference_Lex_1,0x1b ; Debug Table 0x1.0x5 = 0x31,0xfffa
0032 00c7 | | Action Elaborate_Subprogram
0033 BODY_0008:
0033 00bc | | Action Signal_Activated
0034 00bb | | Action Signal_Completion
0035 0000 0000 | | .XXX[0x3]
0037 0000 | |
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 006a | j | .CONST 0x006a ; Address of begin
0039 0004 | | .CONST 0x0004 ; Address of exception handler
003a 000d | | .CONST 0x000d ; Number of locals
003b INIT_0038:
003b 029f 02b3 | | Declare_Subprogram INIT_02b0,For_Call ; Debug Table 0x2 = .DEBUG 0x003b,0x03a2,0x3801,0x0002,0x000e,0x7c74,0x0000,0x004c
; Debug Table 0x2.0x0 = 0x3b,0xffff
003d a001 | | Store_Unchecked 0x0,0x1 ; Debug Table 0x2.0x1 = 0x3d,0xfffe
003e 00c6 | | Action Check_Subprogram_Elaborated
003f e21c | | Load 0x1,0x1c
0040 e20f | | Load 0x1,0xf
0041 e21d | | Load 0x1,0x1d
0042 e20f | | Load 0x1,0xf
0043 0266 | f | Execute Discrete,Bounds
0044 e20f | | Load 0x1,0xf
0045 0265 | e | Execute Discrete,Reverse_Bounds
0046 00db | | Load_Top At_Offset_3
0047 027f | | Execute Discrete,Equal
0048 7002 |p | Jump_Nonzero 0x4b
0049 48e0 |H | Short_Literal 0xe0
004a 0257 | W | Execute Discrete,Raise
004b 027f | | Execute Discrete,Equal
004c 7002 |p | Jump_Nonzero 0x4f
004d 48e0 |H | Short_Literal 0xe0
004e 0257 | W | Execute Discrete,Raise
004f 00d1 | | Pop_Control Pop_Count_1
0050 4802 |H | Short_Literal 0x2
0051 4802 |H | Short_Literal 0x2
0052 0099 | | Action Reference_Dynamic
0053 62a4 |b | Indirect_Literal Discrete,0x2f8,{0x00000000, 0x000e8274}
0054 485a |HZ | Short_Literal 0x5a
0055 4809 |H | Short_Literal 0x9
0056 0007 | | Action Break_Optional
0057 029f 02c3 | | Declare_Subprogram INIT_02c0,For_Call ; Debug Table 0x2.0x2 = 0x57,0xfffd
0059 e5fb | | Load 0x2,-0x5 ; Debug Table 0x2.0x3 = 0x59,0xfffc
005a 01da | | Execute Vector,Bounds
005b e21d | | Load 0x1,0x1d
005c 035b | [ | Declare_Type Array,Constrained
005d 0337 | 7 | Declare_Variable Array
005e 00d8 | | Load_Top At_Offset_0
005f 1c00 | | Execute_Immediate Run_Utility,0x0
0060 e210 | | Load 0x1,0x10 ; Debug Table 0x2.0x4 = 0x60,0xfffb
0061 0007 | | Action Break_Optional
0062 e5fa | | Load 0x2,-0x6 ; Debug Table 0x2.0x5 = 0x62,0xfffa
0063 01da | | Execute Vector,Bounds
0064 e215 | | Load 0x1,0x15
0065 035b | [ | Declare_Type Array,Constrained
0066 0337 | 7 | Declare_Variable Array
0067 e5fa | | Load 0x2,-0x6
0068 00d9 | | Load_Top At_Offset_1
0069 01d4 | | Execute Vector,Structure_Write
006a BODY_0038:
006a e5fb | | Load 0x2,-0x5 ; Debug Table 0x2.0x6 = 0x6a,0x1
006b 01dd | | Execute Vector,First
006c e5f8 | | Load 0x2,-0x8
006d 01dd | | Execute Vector,First
006e 027f | | Execute Discrete,Equal
006f e5fb | | Load 0x2,-0x5
0070 01dc | | Execute Vector,Last
0071 e5f8 | | Load 0x2,-0x8
0072 01dc | | Execute Vector,Last
0073 027f | | Execute Discrete,Equal
0074 0279 | y | Execute Discrete,And
0075 7002 |p | Jump_Nonzero 0x78
0076 4887 |H | Short_Literal 0x87
0077 0257 | W | Execute Discrete,Raise
0078 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x7 = 0x78,0x2
0079 a5f9 | | Store_Unchecked 0x2,-0x7
007a 00cf | | Action Mark_Auxiliary
007b e5fb | | Load 0x2,-0x5 ; Debug Table 0x2.0x8 = 0x7b,0x3
007c 01d9 | | Execute Vector,Reverse_Bounds
007d 0263 | c | Execute Discrete,Above_Bound
007e 7011 |p | Jump_Nonzero 0x90
007f e21c | | Load 0x1,0x1c ; Debug Table 0x2.0x9 = 0x7f,0x4
0080 0322 | " | Declare_Variable Record
0081 00d9 | | Load_Top At_Offset_1
0082 00d9 | | Load_Top At_Offset_1
0083 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0084 00d9 | | Load_Top At_Offset_1
0085 e5fb | | Load 0x2,-0x5
0086 01d7 | | Execute Vector,Field_Read
0087 e211 | | Load 0x1,0x11
0088 0119 | | Execute Any,Check_In_Formal_Type
0089 00d9 | | Load_Top At_Offset_1
008a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
008b 00d9 | | Load_Top At_Offset_1
008c e40b | | Load 0x2,0xb
008d 01d6 | | Execute Vector,Field_Write
008e 00c8 | | Action Pop_Auxiliary_Range
008f 3fef |? | Loop_Increasing 0x7f
0090 00ce | | Action Pop_Auxiliary
0091 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0xa = 0x91,0x5
0092 00db | | Load_Top At_Offset_3
0093 01dc | | Execute Vector,Last
0094 e20f | | Load 0x1,0xf
0095 025b | [ | Execute Discrete,Check_In_Type
0096 e403 | | Load 0x2,0x3
0097 e404 | | Load 0x2,0x4
0098 e405 | | Load 0x2,0x5
0099 4806 |H | Short_Literal 0x6
009a 4802 |H | Short_Literal 0x2
009b 0099 | | Action Reference_Dynamic
009c 4807 |H | Short_Literal 0x7
009d 4802 |H | Short_Literal 0x2
009e 0099 | | Action Reference_Dynamic
009f 8001 | | Call 0x0,0x1
00a0 00d1 | | Pop_Control Pop_Count_1
00a1 00cf | | Action Mark_Auxiliary
00a2 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0xb = 0xa2,0x6
00a3 01d9 | | Execute Vector,Reverse_Bounds
00a4 0263 | c | Execute Discrete,Above_Bound
00a5 7041 |pA | Jump_Nonzero 0xe7
00a6 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0xc = 0xa6,0x7
00a7 e215 | | Load 0x1,0x15
00a8 01c3 | | Execute Vector,Check_In_Type
00a9 840a | | Call 0x2,0xa
00aa c40c | | Store 0x2,0xc
00ab e40c | | Load 0x2,0xc ; Debug Table 0x2.0xd = 0xab,0x8
00ac e40d | | Load 0x2,0xd
00ad 01d7 | | Execute Vector,Field_Read
00ae e212 | | Load 0x1,0x12
00af 0119 | | Execute Any,Check_In_Formal_Type
00b0 85fd | | Call 0x2,-0x3
00b1 00d9 | | Load_Top At_Offset_1
00b2 e40b | | Load 0x2,0xb
00b3 01d5 | | Execute Vector,Field_Reference
00b4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00b5 e211 | | Load 0x1,0x11
00b6 0119 | | Execute Any,Check_In_Formal_Type
00b7 85fc | | Call 0x2,-0x4
00b8 027b | { | Execute Discrete,Greater_Equal
00b9 6827 |h' | Jump_Zero 0xe1
00ba e40c | | Load 0x2,0xc ; Debug Table 0x2.0xe = 0xba,0x9
00bb e40d | | Load 0x2,0xd
00bc 01d7 | | Execute Vector,Field_Read
00bd e212 | | Load 0x1,0x12
00be 0119 | | Execute Any,Check_In_Formal_Type
00bf 85fd | | Call 0x2,-0x3
00c0 00d9 | | Load_Top At_Offset_1
00c1 e40b | | Load 0x2,0xb
00c2 01d5 | | Execute Vector,Field_Reference
00c3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00c4 e211 | | Load 0x1,0x11
00c5 0119 | | Execute Any,Check_In_Formal_Type
00c6 85fc | | Call 0x2,-0x4
00c7 0272 | r | Execute Discrete,Minus
00c8 00e3 | | Load_Encached Natural_Cache
00c9 025b | [ | Execute Discrete,Check_In_Type
00ca e40c | | Load 0x2,0xc
00cb e40d | | Load 0x2,0xd
00cc 01d7 | | Execute Vector,Field_Read
00cd e212 | | Load 0x1,0x12
00ce 0119 | | Execute Any,Check_In_Formal_Type
00cf 85fe | | Call 0x2,-0x2
00d0 e5f8 | | Load 0x2,-0x8 ; Debug Table 0x2.0xf = 0xd0,0xa
00d1 00d9 | | Load_Top At_Offset_1
00d2 e40b | | Load 0x2,0xb
00d3 01d5 | | Execute Vector,Field_Reference
00d4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00d5 00d8 | | Load_Top At_Offset_0
00d6 00da | | Load_Top At_Offset_2
00d7 01d7 | | Execute Vector,Field_Read
00d8 e40c | | Load 0x2,0xc
00d9 e210 | | Load 0x1,0x10
00da 025b | [ | Execute Discrete,Check_In_Type
00db 8217 | | Call 0x1,0x17
00dc 00d9 | | Load_Top At_Offset_1
00dd 00db | | Load_Top At_Offset_3
00de 01d6 | | Execute Vector,Field_Write
00df 00d2 | | Pop_Control Pop_Count_2
00e0 7804 |x | Jump 0xe5
00e1 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0x10 = 0xe1,0xb
00e2 a5f9 | | Store_Unchecked 0x2,-0x7
00e3 00d2 | | Pop_Control Pop_Count_2 ; Debug Table 0x2.0x11 = 0xe3,0xc
00e4 4507 |E | Exit_Suprogram New_Top_Offset 0x7
00e5 00c8 | | Action Pop_Auxiliary_Range
00e6 3fbf |? | Loop_Increasing 0xa6
00e7 4507 |E | Exit_Suprogram New_Top_Offset 0x7
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 011a | | .CONST 0x011a ; Address of begin
00e9 0004 | | .CONST 0x0004 ; Address of exception handler
00ea 000d | | .CONST 0x000d ; Number of locals
00eb INIT_00e8:
00eb 029f 02eb | | Declare_Subprogram INIT_02e8,For_Call ; Debug Table 0x3 = .DEBUG 0x00eb,0x03c8,0x3801,0x0002,0x000e,0x7c74,0x0000,0x0082
; Debug Table 0x3.0x0 = 0xeb,0xffff
00ed a001 | | Store_Unchecked 0x0,0x1 ; Debug Table 0x3.0x1 = 0xed,0xfffe
00ee 00c6 | | Action Check_Subprogram_Elaborated
00ef e21c | | Load 0x1,0x1c
00f0 e20f | | Load 0x1,0xf
00f1 e21d | | Load 0x1,0x1d
00f2 e20f | | Load 0x1,0xf
00f3 0266 | f | Execute Discrete,Bounds
00f4 e20f | | Load 0x1,0xf
00f5 0265 | e | Execute Discrete,Reverse_Bounds
00f6 00db | | Load_Top At_Offset_3
00f7 027f | | Execute Discrete,Equal
00f8 7002 |p | Jump_Nonzero 0xfb
00f9 48e0 |H | Short_Literal 0xe0
00fa 0257 | W | Execute Discrete,Raise
00fb 027f | | Execute Discrete,Equal
00fc 7002 |p | Jump_Nonzero 0xff
00fd 48e0 |H | Short_Literal 0xe0
00fe 0257 | W | Execute Discrete,Raise
00ff 00d1 | | Pop_Control Pop_Count_1
0100 4802 |H | Short_Literal 0x2
0101 4802 |H | Short_Literal 0x2
0102 0099 | | Action Reference_Dynamic
0103 61f4 |a | Indirect_Literal Discrete,0x2f8,{0x00000000, 0x000e8274}
0104 4983 |I | Short_Literal 0x183
0105 4809 |H | Short_Literal 0x9
0106 0007 | | Action Break_Optional
0107 029f 0303 | | Declare_Subprogram INIT_0300,For_Call ; Debug Table 0x3.0x2 = 0x107,0xfffd
0109 e5fb | | Load 0x2,-0x5 ; Debug Table 0x3.0x3 = 0x109,0xfffc
010a 01da | | Execute Vector,Bounds
010b e21d | | Load 0x1,0x1d
010c 035b | [ | Declare_Type Array,Constrained
010d 0337 | 7 | Declare_Variable Array
010e 00d8 | | Load_Top At_Offset_0
010f 1c00 | | Execute_Immediate Run_Utility,0x0
0110 e210 | | Load 0x1,0x10 ; Debug Table 0x3.0x4 = 0x110,0xfffb
0111 0007 | | Action Break_Optional
0112 e5fa | | Load 0x2,-0x6 ; Debug Table 0x3.0x5 = 0x112,0xfffa
0113 01da | | Execute Vector,Bounds
0114 e215 | | Load 0x1,0x15
0115 035b | [ | Declare_Type Array,Constrained
0116 0337 | 7 | Declare_Variable Array
0117 e5fa | | Load 0x2,-0x6
0118 00d9 | | Load_Top At_Offset_1
0119 01d4 | | Execute Vector,Structure_Write
011a BODY_00e8:
011a e5fb | | Load 0x2,-0x5 ; Debug Table 0x3.0x6 = 0x11a,0x1
011b 01dd | | Execute Vector,First
011c e5f8 | | Load 0x2,-0x8
011d 01dd | | Execute Vector,First
011e 027f | | Execute Discrete,Equal
011f e5fb | | Load 0x2,-0x5
0120 01dc | | Execute Vector,Last
0121 e5f8 | | Load 0x2,-0x8
0122 01dc | | Execute Vector,Last
0123 027f | | Execute Discrete,Equal
0124 0279 | y | Execute Discrete,And
0125 7002 |p | Jump_Nonzero 0x128
0126 4887 |H | Short_Literal 0x87
0127 0257 | W | Execute Discrete,Raise
0128 00cf | | Action Mark_Auxiliary
0129 e5fb | | Load 0x2,-0x5 ; Debug Table 0x3.0x7 = 0x129,0x2
012a 01d9 | | Execute Vector,Reverse_Bounds
012b 0263 | c | Execute Discrete,Above_Bound
012c 7011 |p | Jump_Nonzero 0x13e
012d e21c | | Load 0x1,0x1c ; Debug Table 0x3.0x8 = 0x12d,0x3
012e 0322 | " | Declare_Variable Record
012f 00d9 | | Load_Top At_Offset_1
0130 00d9 | | Load_Top At_Offset_1
0131 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0132 00d9 | | Load_Top At_Offset_1
0133 e5fb | | Load 0x2,-0x5
0134 01d7 | | Execute Vector,Field_Read
0135 e211 | | Load 0x1,0x11
0136 0119 | | Execute Any,Check_In_Formal_Type
0137 00d9 | | Load_Top At_Offset_1
0138 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0139 00d9 | | Load_Top At_Offset_1
013a e40b | | Load 0x2,0xb
013b 01d6 | | Execute Vector,Field_Write
013c 00c8 | | Action Pop_Auxiliary_Range
013d 3fef |? | Loop_Increasing 0x12d
013e 00ce | | Action Pop_Auxiliary
013f 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x9 = 0x13f,0x4
0140 00db | | Load_Top At_Offset_3
0141 01dc | | Execute Vector,Last
0142 e20f | | Load 0x1,0xf
0143 025b | [ | Execute Discrete,Check_In_Type
0144 e403 | | Load 0x2,0x3
0145 e404 | | Load 0x2,0x4
0146 e405 | | Load 0x2,0x5
0147 4806 |H | Short_Literal 0x6
0148 4802 |H | Short_Literal 0x2
0149 0099 | | Action Reference_Dynamic
014a 4807 |H | Short_Literal 0x7
014b 4802 |H | Short_Literal 0x2
014c 0099 | | Action Reference_Dynamic
014d 8001 | | Call 0x0,0x1
014e 00d1 | | Pop_Control Pop_Count_1
014f 00cf | | Action Mark_Auxiliary
0150 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0xa = 0x150,0x5
0151 01d9 | | Execute Vector,Reverse_Bounds
0152 0263 | c | Execute Discrete,Above_Bound
0153 703b |p; | Jump_Nonzero 0x18f
0154 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x3.0xb = 0x154,0x6
0155 e210 | | Load 0x1,0x10
0156 00da | | Load_Top At_Offset_2
0157 e40b | | Load 0x2,0xb
0158 01d5 | | Execute Vector,Field_Reference
0159 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
015a e211 | | Load 0x1,0x11
015b 0119 | | Execute Any,Check_In_Formal_Type
015c 85fc | | Call 0x2,-0x4
015d e40d | | Load 0x2,0xd
015e e215 | | Load 0x1,0x15
015f 01c3 | | Execute Vector,Check_In_Type
0160 840a | | Call 0x2,0xa
0161 c40c | | Store 0x2,0xc
0162 c5f9 | | Store 0x2,-0x7
0163 e5f9 | | Load 0x2,-0x7 ; Debug Table 0x3.0xc = 0x163,0x7
0164 7002 |p | Jump_Nonzero 0x167
0165 00d2 | | Pop_Control Pop_Count_2
0166 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0167 e40c | | Load 0x2,0xc ; Debug Table 0x3.0xd = 0x167,0x8
0168 e40d | | Load 0x2,0xd
0169 01d7 | | Execute Vector,Field_Read
016a e212 | | Load 0x1,0x12
016b 0119 | | Execute Any,Check_In_Formal_Type
016c 85fd | | Call 0x2,-0x3
016d 00d9 | | Load_Top At_Offset_1
016e e40b | | Load 0x2,0xb
016f 01d5 | | Execute Vector,Field_Reference
0170 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0171 e211 | | Load 0x1,0x11
0172 0119 | | Execute Any,Check_In_Formal_Type
0173 85fc | | Call 0x2,-0x4
0174 0272 | r | Execute Discrete,Minus
0175 00e3 | | Load_Encached Natural_Cache
0176 025b | [ | Execute Discrete,Check_In_Type
0177 e40c | | Load 0x2,0xc
0178 e40d | | Load 0x2,0xd
0179 01d7 | | Execute Vector,Field_Read
017a e212 | | Load 0x1,0x12
017b 0119 | | Execute Any,Check_In_Formal_Type
017c 85fe | | Call 0x2,-0x2
017d e5f8 | | Load 0x2,-0x8 ; Debug Table 0x3.0xe = 0x17d,0x9
017e 00d9 | | Load_Top At_Offset_1
017f e40b | | Load 0x2,0xb
0180 01d5 | | Execute Vector,Field_Reference
0181 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0182 00d8 | | Load_Top At_Offset_0
0183 00da | | Load_Top At_Offset_2
0184 01d7 | | Execute Vector,Field_Read
0185 e40c | | Load 0x2,0xc
0186 e210 | | Load 0x1,0x10
0187 025b | [ | Execute Discrete,Check_In_Type
0188 8217 | | Call 0x1,0x17
0189 00d9 | | Load_Top At_Offset_1
018a 00db | | Load_Top At_Offset_3
018b 01d6 | | Execute Vector,Field_Write
018c 00d2 | | Pop_Control Pop_Count_2
018d 00c8 | | Action Pop_Auxiliary_Range
018e 3fc5 |? | Loop_Increasing 0x154
018f 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 01d6 | | .CONST 0x01d6 ; Address of begin
0191 0004 | | .CONST 0x0004 ; Address of exception handler
0192 0008 | | .CONST 0x0008 ; Number of locals
0193 INIT_0190:
0193 e5fc | | Load 0x2,-0x4 ; Debug Table 0x4 = .DEBUG 0x0193,0x03e8,0x3801,0x0002,0x000e,0x7c74,0x0000,0x00b8
; Debug Table 0x4.0x0 = 0x193,0xffff
0194 01da | | Execute Vector,Bounds
0195 e215 | | Load 0x1,0x15
0196 035b | [ | Declare_Type Array,Constrained
0197 0337 | 7 | Declare_Variable Array
0198 00d8 | | Load_Top At_Offset_0
0199 1c00 | | Execute_Immediate Run_Utility,0x0
019a e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x1 = 0x19a,0xfffe
019b 01dd | | Execute Vector,First
019c e20f | | Load 0x1,0xf
019d e5fd | | Load 0x2,-0x3
019e 01dc | | Execute Vector,Last
019f 0267 | g | Execute Discrete,Predecessor
01a0 e214 | | Load 0x1,0x14
01a1 035b | [ | Declare_Type Array,Constrained
01a2 0337 | 7 | Declare_Variable Array
01a3 00d8 | | Load_Top At_Offset_0
01a4 1c00 | | Execute_Immediate Run_Utility,0x0
01a5 e5fa | | Load 0x2,-0x6 ; Debug Table 0x4.0x2 = 0x1a5,0xfffd
01a6 01dd | | Execute Vector,First
01a7 e20f | | Load 0x1,0xf
01a8 e5fa | | Load 0x2,-0x6
01a9 01dc | | Execute Vector,Last
01aa 0267 | g | Execute Discrete,Predecessor
01ab e216 | | Load 0x1,0x16
01ac 035b | [ | Declare_Type Array,Constrained
01ad 0337 | 7 | Declare_Variable Array
01ae 00d8 | | Load_Top At_Offset_0
01af 1c00 | | Execute_Immediate Run_Utility,0x0
01b0 e20f | | Load 0x1,0xf ; Debug Table 0x4.0x3 = 0x1b0,0xfffc
01b1 0007 | | Action Break_Optional
01b2 e210 | | Load 0x1,0x10 ; Debug Table 0x4.0x4 = 0x1b2,0xfffb
01b3 0007 | | Action Break_Optional
01b4 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x4.0x5 = 0x1b4,0xfffa
01b5 e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x6 = 0x1b5,0xfff9
01b6 01da | | Execute Vector,Bounds
01b7 e5fc | | Load 0x2,-0x4
01b8 01da | | Execute Vector,Bounds
01b9 e218 | | Load 0x1,0x18
01ba 035b | [ | Declare_Type Array,Constrained
01bb 0337 | 7 | Declare_Variable Array
01bc e5fd | | Load 0x2,-0x3
01bd 01da | | Execute Vector,Bounds
01be e5fc | | Load 0x2,-0x4
01bf 01da | | Execute Vector,Bounds
01c0 e218 | | Load 0x1,0x18
01c1 035b | [ | Declare_Type Array,Constrained
01c2 0337 | 7 | Declare_Variable Array
01c3 4801 |H | Short_Literal 0x1
01c4 00d9 | | Load_Top At_Offset_1
01c5 01a9 | | Execute Matrix,Reverse_Bounds
01c6 0263 | c | Execute Discrete,Above_Bound
01c7 700c |p | Jump_Nonzero 0x1d4
01c8 4802 |H | Short_Literal 0x2
01c9 00db | | Load_Top At_Offset_3
01ca 01a9 | | Execute Matrix,Reverse_Bounds
01cb 0263 | c | Execute Discrete,Above_Bound
01cc 7006 |p | Jump_Nonzero 0x1d3
01cd 4801 |H | Short_Literal 0x1
01ce 00d9 | | Load_Top At_Offset_1
01cf e40b | | Load 0x2,0xb
01d0 e409 | | Load 0x2,0x9
01d1 01a6 | | Execute Matrix,Field_Write
01d2 3ffa |? | Loop_Increasing 0x1cd
01d3 3ff4 |? | Loop_Increasing 0x1c8
01d4 00d9 | | Load_Top At_Offset_1
01d5 01a4 | | Execute Matrix,Structure_Write
01d6 BODY_0190:
01d6 e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x7 = 0x1d6,0x1
01d7 01dd | | Execute Vector,First
01d8 e5fa | | Load 0x2,-0x6
01d9 01dd | | Execute Vector,First
01da 027f | | Execute Discrete,Equal
01db e5fd | | Load 0x2,-0x3
01dc 01dc | | Execute Vector,Last
01dd e5fa | | Load 0x2,-0x6
01de 01dc | | Execute Vector,Last
01df 027f | | Execute Discrete,Equal
01e0 0279 | y | Execute Discrete,And
01e1 7002 |p | Jump_Nonzero 0x1e4
01e2 4887 |H | Short_Literal 0x87
01e3 0257 | W | Execute Discrete,Raise
01e4 00cf | | Action Mark_Auxiliary
01e5 e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x8 = 0x1e5,0x2
01e6 01d9 | | Execute Vector,Reverse_Bounds
01e7 0263 | c | Execute Discrete,Above_Bound
01e8 7095 |p | Jump_Nonzero 0x27e
01e9 00cf | | Action Mark_Auxiliary
01ea e5fc | | Load 0x2,-0x4 ; Debug Table 0x4.0x9 = 0x1ea,0x3
01eb 01d9 | | Execute Vector,Reverse_Bounds
01ec 0263 | c | Execute Discrete,Above_Bound
01ed 708d |p | Jump_Nonzero 0x27b
01ee e5fc | | Load 0x2,-0x4 ; Debug Table 0x4.0xa = 0x1ee,0x4
01ef e402 | | Load 0x2,0x2
01f0 01d4 | | Execute Vector,Structure_Write
01f1 e210 | | Load 0x1,0x10 ; Debug Table 0x4.0xb = 0x1f1,0x5
01f2 e20f | | Load 0x1,0xf
01f3 00e1 | | Load_Encached Boolean_Cache
01f4 e402 | | Load 0x2,0x2
01f5 e215 | | Load 0x1,0x15
01f6 01c3 | | Execute Vector,Check_In_Type
01f7 e408 | | Load 0x2,0x8
01f8 e5fd | | Load 0x2,-0x3
01f9 e214 | | Load 0x1,0x14
01fa 01c3 | | Execute Vector,Check_In_Type
01fb 85fe | | Call 0x2,-0x2
01fc 00d1 | | Pop_Control Pop_Count_1
01fd c407 | | Store 0x2,0x7
01fe c405 | | Store 0x2,0x5
01ff c406 | | Store 0x2,0x6
0200 e407 | | Load 0x2,0x7 ; Debug Table 0x4.0xc = 0x200,0x6
0201 6873 |hs | Jump_Zero 0x275
0202 e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0xd = 0x202,0x7
0203 01db | | Execute Vector,Length
0204 0f01 | | Execute_Immediate Equal,0x1
0205 6811 |h | Jump_Zero 0x217
0206 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0xe = 0x206,0x8
0207 a5fb | | Store_Unchecked 0x2,-0x5
0208 e5fa | | Load 0x2,-0x6 ; Debug Table 0x4.0xf = 0x208,0x9
0209 e405 | | Load 0x2,0x5
020a 00d8 | | Load_Top At_Offset_0
020b 00da | | Load_Top At_Offset_2
020c 01d7 | | Execute Vector,Field_Read
020d e406 | | Load 0x2,0x6
020e e210 | | Load 0x1,0x10
020f 025b | [ | Execute Discrete,Check_In_Type
0210 8217 | | Call 0x1,0x17
0211 00d9 | | Load_Top At_Offset_1
0212 00db | | Load_Top At_Offset_3
0213 01d6 | | Execute Vector,Field_Write
0214 00d2 | | Pop_Control Pop_Count_2
0215 00d2 | | Pop_Control Pop_Count_2 ; Debug Table 0x4.0x10 = 0x215,0xa
0216 7864 |xd | Jump 0x27b
0217 e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x11 = 0x217,0xb
0218 01dd | | Execute Vector,First
0219 e20f | | Load 0x1,0xf
021a e405 | | Load 0x2,0x5
021b 0267 | g | Execute Discrete,Predecessor
021c e5fd | | Load 0x2,-0x3
021d 01cf | | Execute Vector,Slice_Read
021e e403 | | Load 0x2,0x3
021f 01dd | | Execute Vector,First
0220 e20f | | Load 0x1,0xf
0221 e405 | | Load 0x2,0x5
0222 0267 | g | Execute Discrete,Predecessor
0223 e403 | | Load 0x2,0x3
0224 01ce | | Execute Vector,Slice_Write
0225 e20f | | Load 0x1,0xf ; Debug Table 0x4.0x12 = 0x225,0xc
0226 e405 | | Load 0x2,0x5
0227 0268 | h | Execute Discrete,Successor
0228 e5fd | | Load 0x2,-0x3
0229 01dc | | Execute Vector,Last
022a e5fd | | Load 0x2,-0x3
022b 01cf | | Execute Vector,Slice_Read
022c e405 | | Load 0x2,0x5
022d e403 | | Load 0x2,0x3
022e 01dc | | Execute Vector,Last
022f e403 | | Load 0x2,0x3
0230 01ce | | Execute Vector,Slice_Write
0231 e404 | | Load 0x2,0x4 ; Debug Table 0x4.0x13 = 0x231,0xd
0232 e216 | | Load 0x1,0x16
0233 01c3 | | Execute Vector,Check_In_Type
0234 00e1 | | Load_Encached Boolean_Cache
0235 e402 | | Load 0x2,0x2
0236 e215 | | Load 0x1,0x15
0237 01c3 | | Execute Vector,Check_In_Type
0238 e403 | | Load 0x2,0x3
0239 e214 | | Load 0x1,0x14
023a 01c3 | | Execute Vector,Check_In_Type
023b 4ffe |O | Short_Literal -0x2
023c 4802 |H | Short_Literal 0x2
023d 0099 | | Action Reference_Dynamic
023e 4fff |O | Short_Literal -0x1
023f 4802 |H | Short_Literal 0x2
0240 0099 | | Action Reference_Dynamic
0241 821b | | Call 0x1,0x1b
0242 c5fb | | Store 0x2,-0x5
0243 00d1 | | Pop_Control Pop_Count_1
0244 e5fb | | Load 0x2,-0x5 ; Debug Table 0x4.0x14 = 0x244,0xe
0245 6829 |h) | Jump_Zero 0x26f
0246 e404 | | Load 0x2,0x4 ; Debug Table 0x4.0x15 = 0x246,0xf
0247 01dd | | Execute Vector,First
0248 e20f | | Load 0x1,0xf
0249 e405 | | Load 0x2,0x5
024a 0267 | g | Execute Discrete,Predecessor
024b e404 | | Load 0x2,0x4
024c 01cf | | Execute Vector,Slice_Read
024d e5fa | | Load 0x2,-0x6
024e 01dd | | Execute Vector,First
024f e20f | | Load 0x1,0xf
0250 e405 | | Load 0x2,0x5
0251 0267 | g | Execute Discrete,Predecessor
0252 e5fa | | Load 0x2,-0x6
0253 01ce | | Execute Vector,Slice_Write
0254 e5fa | | Load 0x2,-0x6 ; Debug Table 0x4.0x16 = 0x254,0x10
0255 e405 | | Load 0x2,0x5
0256 00d8 | | Load_Top At_Offset_0
0257 00da | | Load_Top At_Offset_2
0258 01d7 | | Execute Vector,Field_Read
0259 e406 | | Load 0x2,0x6
025a e210 | | Load 0x1,0x10
025b 025b | [ | Execute Discrete,Check_In_Type
025c 8217 | | Call 0x1,0x17
025d 00d9 | | Load_Top At_Offset_1
025e 00db | | Load_Top At_Offset_3
025f 01d6 | | Execute Vector,Field_Write
0260 00d2 | | Pop_Control Pop_Count_2
0261 e405 | | Load 0x2,0x5 ; Debug Table 0x4.0x17 = 0x261,0x11
0262 e404 | | Load 0x2,0x4
0263 01dc | | Execute Vector,Last
0264 e404 | | Load 0x2,0x4
0265 01cf | | Execute Vector,Slice_Read
0266 e20f | | Load 0x1,0xf
0267 e405 | | Load 0x2,0x5
0268 0268 | h | Execute Discrete,Successor
0269 e5fa | | Load 0x2,-0x6
026a 01dc | | Execute Vector,Last
026b e5fa | | Load 0x2,-0x6
026c 01ce | | Execute Vector,Slice_Write
026d 00d2 | | Pop_Control Pop_Count_2 ; Debug Table 0x4.0x18 = 0x26d,0x12
026e 780c |x | Jump 0x27b
026f 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x19 = 0x26f,0x13
0270 e406 | | Load 0x2,0x6
0271 e405 | | Load 0x2,0x5
0272 e408 | | Load 0x2,0x8
0273 01a6 | | Execute Matrix,Field_Write
0274 7804 |x | Jump 0x279
0275 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x1a = 0x275,0x14
0276 a5fb | | Store_Unchecked 0x2,-0x5
0277 00d2 | | Pop_Control Pop_Count_2 ; Debug Table 0x4.0x1b = 0x277,0x15
0278 7802 |x | Jump 0x27b
0279 00c8 | | Action Pop_Auxiliary_Range
027a 3f73 |?s | Loop_Increasing 0x1ee
027b 00ce | | Action Pop_Auxiliary
027c 00c8 | | Action Pop_Auxiliary_Range
027d 3f6b |?k | Loop_Increasing 0x1e9
027e 4505 |E | Exit_Suprogram New_Top_Offset 0x5
027f 0000 | | .XXX[0x1]
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 4608 |F | Jump_Case 0x9 ; Debug Table 0x5 = .DEBUG 0x0283,0x0422,0x1005,0x0000,0x000e,0x8274,0x0000,0x0006
0284 7808 |x | Jump 0x28d ; case 0x0
0285 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0286 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
0287 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
0288 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
0289 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5
028a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6
028b 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7
028c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x8
028d 00da | | Load_Top At_Offset_2
028e 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
028f 0125 | % | Execute Any,Set_Constraint
0290 00da | | Load_Top At_Offset_2
0291 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0292 1c00 | | Execute_Immediate Run_Utility,0x0
0293 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0294 0000 0000 | | .BLANK 0000[0x4]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029b | | .CONST 0x029b ; Address of begin
0299 0004 | | .CONST 0x0004 ; Address of exception handler
029a 0001 | | .CONST 0x0001 ; Number of locals
029b BODY_0298:
029b INIT_0298:
029b 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0x6 = .DEBUG 0x029b,0x0424,0x1005,0x0000,0x000e,0x8274,0x0000,0x0014
029c 00da | | Load_Top At_Offset_2
029d 01dc | | Execute Vector,Last
029e 00db | | Load_Top At_Offset_3
029f 01dd | | Execute Vector,First
02a0 0263 | c | Execute Discrete,Above_Bound
02a1 7006 |p | Jump_Nonzero 0x2a8
02a2 00d8 | | Load_Top At_Offset_0
02a3 e5ff | | Load 0x2,-0x1
02a4 01d5 | | Execute Vector,Field_Reference
02a5 1c00 | | Execute_Immediate Run_Utility,0x0
02a6 0a01 | | Execute_Immediate Plus,0x1
02a7 7ff8 | | Jump 0x2a0
02a8 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
02a9 0000 0000 | | .BLANK 0000[0x7]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b3 | | .CONST 0x02b3 ; Address of begin
02b1 0004 | | .CONST 0x0004 ; Address of exception handler
02b2 0001 | | .CONST 0x0001 ; Number of locals
02b3 BODY_02b0:
02b3 INIT_02b0:
02b3 00da | | Load_Top At_Offset_2 ; Debug Table 0x7 = .DEBUG 0x02b3,0x0426,0x1802,0x0002,0x000e,0x8274,0x0000,0x0039
; Debug Table 0x7.0x0 = 0x2b3,0x1
02b4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02b5 e211 | | Load 0x1,0x11
02b6 0119 | | Execute Any,Check_In_Formal_Type
02b7 85fc | | Call 0x2,-0x4
02b8 e7fe | | Load 0x3,-0x2
02b9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02ba e211 | | Load 0x1,0x11
02bb 0119 | | Execute Any,Check_In_Formal_Type
02bc 85fc | | Call 0x2,-0x4
02bd 027d | } | Execute Discrete,Greater
02be 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02bf 0000 | | .XXX[0x1]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c6 | | .CONST 0x02c6 ; Address of begin
02c1 0004 | | .CONST 0x0004 ; Address of exception handler
02c2 0003 | | .CONST 0x0003 ; Number of locals
02c3 INIT_02c0:
02c3 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8 = .DEBUG 0x02c3,0x042a,0x1802,0x0002,0x000e,0x8274,0x0000,0x006d
; Debug Table 0x8.0x0 = 0x2c3,0xffff
02c4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
02c5 e210 | | Load 0x1,0x10 ; Debug Table 0x8.0x1 = 0x2c5,0xfffe
02c6 BODY_02c0:
02c6 00cf | | Action Mark_Auxiliary
02c7 e7ff | | Load 0x3,-0x1 ; Debug Table 0x8.0x2 = 0x2c7,0x1
02c8 01d9 | | Execute Vector,Reverse_Bounds
02c9 0263 | c | Execute Discrete,Above_Bound
02ca 7014 |p | Jump_Nonzero 0x2df
02cb 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x3 = 0x2cb,0x2
02cc e7ff | | Load 0x3,-0x1
02cd 01d7 | | Execute Vector,Field_Read
02ce e212 | | Load 0x1,0x12
02cf 0119 | | Execute Any,Check_In_Formal_Type
02d0 85fd | | Call 0x2,-0x3
02d1 e602 | | Load 0x3,0x2
02d2 027d | } | Execute Discrete,Greater
02d3 6809 |h | Jump_Zero 0x2dd
02d4 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x4 = 0x2d4,0x3
02d5 c603 | | Store 0x3,0x3
02d6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x5 = 0x2d6,0x4
02d7 e7ff | | Load 0x3,-0x1
02d8 01d7 | | Execute Vector,Field_Read
02d9 e212 | | Load 0x1,0x12
02da 0119 | | Execute Any,Check_In_Formal_Type
02db 85fd | | Call 0x2,-0x3
02dc a602 | | Store_Unchecked 0x3,0x2
02dd 00c8 | | Action Pop_Auxiliary_Range
02de 3fec |? | Loop_Increasing 0x2cb
02df 00ce | | Action Pop_Auxiliary
02e0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x6 = 0x2e0,0x5
02e1 e210 | | Load 0x1,0x10
02e2 025b | [ | Execute Discrete,Check_In_Type
02e3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02e4 0000 0000 | | .BLANK 0000[0x4]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02eb | | .CONST 0x02eb ; Address of begin
02e9 0004 | | .CONST 0x0004 ; Address of exception handler
02ea 0001 | | .CONST 0x0001 ; Number of locals
02eb BODY_02e8:
02eb INIT_02e8:
02eb 00da | | Load_Top At_Offset_2 ; Debug Table 0x9 = .DEBUG 0x02eb,0x043a,0x1802,0x0002,0x000e,0x8274,0x0000,0x0162
; Debug Table 0x9.0x0 = 0x2eb,0x1
02ec 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02ed e211 | | Load 0x1,0x11
02ee 0119 | | Execute Any,Check_In_Formal_Type
02ef 85fc | | Call 0x2,-0x4
02f0 e7fe | | Load 0x3,-0x2
02f1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02f2 e211 | | Load 0x1,0x11
02f3 0119 | | Execute Any,Check_In_Formal_Type
02f4 85fc | | Call 0x2,-0x4
02f5 027d | } | Execute Discrete,Greater
02f6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02f7 0000 | | .XXX[0x1]
02f8 0000 0000 | | .LITERAL {0x00000000, 0x000e8274}
02fc 0000 0000 | | .BLANK 0000[0x4]
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0307 | | .CONST 0x0307 ; Address of begin
0301 0004 | | .CONST 0x0004 ; Address of exception handler
0302 0003 | | .CONST 0x0003 ; Number of locals
0303 INIT_0300:
0303 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xa = .DEBUG 0x0303,0x043e,0x1801,0x0002,0x000e,0x8274,0x0000,0x0196
; Debug Table 0xa.0x0 = 0x303,0xffff
0304 6027 |`' | Indirect_Literal Discrete,0x32c,{0x00000000, 0x7fffffff} ; Debug Table 0xa.0x1 = 0x304,0xfffe
0305 00e3 | | Load_Encached Natural_Cache
0306 03f1 | | Declare_Variable Discrete,With_Value
0307 BODY_0300:
0307 e7ff | | Load 0x3,-0x1 ; Debug Table 0xa.0x2 = 0x307,0x1
0308 01dd | | Execute Vector,First
0309 c7fd | | Store 0x3,-0x3
030a 00cf | | Action Mark_Auxiliary
030b e7ff | | Load 0x3,-0x1 ; Debug Table 0xa.0x3 = 0x30b,0x2
030c 01d9 | | Execute Vector,Reverse_Bounds
030d 0263 | c | Execute Discrete,Above_Bound
030e 7015 |p | Jump_Nonzero 0x324
030f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x4 = 0x30f,0x3
0310 e7ff | | Load 0x3,-0x1
0311 01d7 | | Execute Vector,Field_Read
0312 e212 | | Load 0x1,0x12
0313 0119 | | Execute Any,Check_In_Formal_Type
0314 85fd | | Call 0x2,-0x3
0315 a602 | | Store_Unchecked 0x3,0x2
0316 e7fe | | Load 0x3,-0x2 ; Debug Table 0xa.0x5 = 0x316,0x4
0317 e602 | | Load 0x3,0x2
0318 027a | z | Execute Discrete,Less_Equal
0319 e602 | | Load 0x3,0x2
031a e603 | | Load 0x3,0x3
031b 027c | | | Execute Discrete,Less
031c 0279 | y | Execute Discrete,And
031d 6804 |h | Jump_Zero 0x322
031e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x6 = 0x31e,0x5
031f c7fd | | Store 0x3,-0x3
0320 e602 | | Load 0x3,0x2 ; Debug Table 0xa.0x7 = 0x320,0x6
0321 a603 | | Store_Unchecked 0x3,0x3
0322 00c8 | | Action Pop_Auxiliary_Range
0323 3feb |? | Loop_Increasing 0x30f
0324 00ce | | Action Pop_Auxiliary
0325 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x8 = 0x325,0x7
0326 6005 |` | Indirect_Literal Discrete,0x32c,{0x00000000, 0x7fffffff}
0327 027e | ~ | Execute Discrete,Not_Equal
0328 a7fc | | Store_Unchecked 0x3,-0x4
0329 4503 |E | Exit_Suprogram New_Top_Offset 0x3
032a 0000 0000 | | .XXX[0x2]
032c 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
0330 ; --------------------------------------------------------------------------------------
0330 ; Debug Table
0330 ; --------------------------------------------------------------------------------------
0330 0003 000b | | .CONST 0x0003,0x000b
0332 000b 038a | | .DEBUG 0x000b,0x038a,0xc000,0x0000,0x000e,0x7c74,0x0000,0x0003
033a 001a 0394 | | .DEBUG 0x001a,0x0394,0xc000,0x0000,0x000e,0x8274,0x0000,0x0005
0342 003b 03a2 | ; | .DEBUG 0x003b,0x03a2,0x3801,0x0002,0x000e,0x7c74,0x0000,0x004c
034a 00eb 03c8 | | .DEBUG 0x00eb,0x03c8,0x3801,0x0002,0x000e,0x7c74,0x0000,0x0082
0352 0193 03e8 | | .DEBUG 0x0193,0x03e8,0x3801,0x0002,0x000e,0x7c74,0x0000,0x00b8
035a 0283 0422 | "| .DEBUG 0x0283,0x0422,0x1005,0x0000,0x000e,0x8274,0x0000,0x0006
0362 029b 0424 | $| .DEBUG 0x029b,0x0424,0x1005,0x0000,0x000e,0x8274,0x0000,0x0014
036a 02b3 0426 | &| .DEBUG 0x02b3,0x0426,0x1802,0x0002,0x000e,0x8274,0x0000,0x0039
0372 02c3 042a | *| .DEBUG 0x02c3,0x042a,0x1802,0x0002,0x000e,0x8274,0x0000,0x006d
037a 02eb 043a | :| .DEBUG 0x02eb,0x043a,0x1802,0x0002,0x000e,0x8274,0x0000,0x0162
0382 0303 043e | >| .DEBUG 0x0303,0x043e,0x1801,0x0002,0x000e,0x8274,0x0000,0x0196
038a ; --------------------------------------------------------------------------------------
038a ; Debug3 Subtable 0x0
038a ; --------------------------------------------------------------------------------------
038a 0004 0000 | | .DBG3TAB 0x0004,0x0000
038c 000b ffff | | .CONST 0x000b,0xffff
038e 0013 fffe | | .CONST 0x0013,0xfffe
0390 0015 fffd | | .CONST 0x0015,0xfffd
0392 0017 fffc | | .CONST 0x0017,0xfffc
0394 ; --------------------------------------------------------------------------------------
0394 ; Debug3 Subtable 0x1
0394 ; --------------------------------------------------------------------------------------
0394 0006 0000 | | .DBG3TAB 0x0006,0x0000
0396 001a ffff | | .CONST 0x001a,0xffff
0398 0020 fffe | | .CONST 0x0020,0xfffe
039a 0027 fffd | ' | .CONST 0x0027,0xfffd
039c 002d fffc | - | .CONST 0x002d,0xfffc
039e 002f fffb | / | .CONST 0x002f,0xfffb
03a0 0031 fffa | 1 | .CONST 0x0031,0xfffa
03a2 ; --------------------------------------------------------------------------------------
03a2 ; Debug3 Subtable 0x2
03a2 ; --------------------------------------------------------------------------------------
03a2 0006 000c | | .DBG3TAB 0x0006,0x000c
03a4 003b ffff | ; | .CONST 0x003b,0xffff
03a6 003d fffe | = | .CONST 0x003d,0xfffe
03a8 0057 fffd | W | .CONST 0x0057,0xfffd
03aa 0059 fffc | Y | .CONST 0x0059,0xfffc
03ac 0060 fffb | ` | .CONST 0x0060,0xfffb
03ae 0062 fffa | b | .CONST 0x0062,0xfffa
03b0 006a 0001 | j | .CONST 0x006a,0x0001
03b2 0078 0002 | x | .CONST 0x0078,0x0002
03b4 007b 0003 | { | .CONST 0x007b,0x0003
03b6 007f 0004 | | .CONST 0x007f,0x0004
03b8 0091 0005 | | .CONST 0x0091,0x0005
03ba 00a2 0006 | | .CONST 0x00a2,0x0006
03bc 00a6 0007 | | .CONST 0x00a6,0x0007
03be 00ab 0008 | | .CONST 0x00ab,0x0008
03c0 00ba 0009 | | .CONST 0x00ba,0x0009
03c2 00d0 000a | | .CONST 0x00d0,0x000a
03c4 00e1 000b | | .CONST 0x00e1,0x000b
03c6 00e3 000c | | .CONST 0x00e3,0x000c
03c8 ; --------------------------------------------------------------------------------------
03c8 ; Debug3 Subtable 0x3
03c8 ; --------------------------------------------------------------------------------------
03c8 0006 0009 | | .DBG3TAB 0x0006,0x0009
03ca 00eb ffff | | .CONST 0x00eb,0xffff
03cc 00ed fffe | | .CONST 0x00ed,0xfffe
03ce 0107 fffd | | .CONST 0x0107,0xfffd
03d0 0109 fffc | | .CONST 0x0109,0xfffc
03d2 0110 fffb | | .CONST 0x0110,0xfffb
03d4 0112 fffa | | .CONST 0x0112,0xfffa
03d6 011a 0001 | | .CONST 0x011a,0x0001
03d8 0129 0002 | ) | .CONST 0x0129,0x0002
03da 012d 0003 | - | .CONST 0x012d,0x0003
03dc 013f 0004 | ? | .CONST 0x013f,0x0004
03de 0150 0005 | P | .CONST 0x0150,0x0005
03e0 0154 0006 | T | .CONST 0x0154,0x0006
03e2 0163 0007 | c | .CONST 0x0163,0x0007
03e4 0167 0008 | g | .CONST 0x0167,0x0008
03e6 017d 0009 | } | .CONST 0x017d,0x0009
03e8 ; --------------------------------------------------------------------------------------
03e8 ; Debug3 Subtable 0x4
03e8 ; --------------------------------------------------------------------------------------
03e8 0007 0015 | | .DBG3TAB 0x0007,0x0015
03ea 0193 ffff | | .CONST 0x0193,0xffff
03ec 019a fffe | | .CONST 0x019a,0xfffe
03ee 01a5 fffd | | .CONST 0x01a5,0xfffd
03f0 01b0 fffc | | .CONST 0x01b0,0xfffc
03f2 01b2 fffb | | .CONST 0x01b2,0xfffb
03f4 01b4 fffa | | .CONST 0x01b4,0xfffa
03f6 01b5 fff9 | | .CONST 0x01b5,0xfff9
03f8 01d6 0001 | | .CONST 0x01d6,0x0001
03fa 01e5 0002 | | .CONST 0x01e5,0x0002
03fc 01ea 0003 | | .CONST 0x01ea,0x0003
03fe 01ee 0004 | | .CONST 0x01ee,0x0004
0400 01f1 0005 | | .CONST 0x01f1,0x0005
0402 0200 0006 | | .CONST 0x0200,0x0006
0404 0202 0007 | | .CONST 0x0202,0x0007
0406 0206 0008 | | .CONST 0x0206,0x0008
0408 0208 0009 | | .CONST 0x0208,0x0009
040a 0215 000a | | .CONST 0x0215,0x000a
040c 0217 000b | | .CONST 0x0217,0x000b
040e 0225 000c | % | .CONST 0x0225,0x000c
0410 0231 000d | 1 | .CONST 0x0231,0x000d
0412 0244 000e | D | .CONST 0x0244,0x000e
0414 0246 000f | F | .CONST 0x0246,0x000f
0416 0254 0010 | T | .CONST 0x0254,0x0010
0418 0261 0011 | a | .CONST 0x0261,0x0011
041a 026d 0012 | m | .CONST 0x026d,0x0012
041c 026f 0013 | o | .CONST 0x026f,0x0013
041e 0275 0014 | u | .CONST 0x0275,0x0014
0420 0277 0015 | w | .CONST 0x0277,0x0015
0422 ; --------------------------------------------------------------------------------------
0422 ; Debug3 Subtable 0x5
0422 ; --------------------------------------------------------------------------------------
0422 0000 0000 | | .DBG3TAB 0x0000,0x0000
0424 ; --------------------------------------------------------------------------------------
0424 ; Debug3 Subtable 0x6
0424 ; --------------------------------------------------------------------------------------
0424 0000 0000 | | .DBG3TAB 0x0000,0x0000
0426 ; --------------------------------------------------------------------------------------
0426 ; Debug3 Subtable 0x7
0426 ; --------------------------------------------------------------------------------------
0426 0000 0001 | | .DBG3TAB 0x0000,0x0001
0428 02b3 0001 | | .CONST 0x02b3,0x0001
042a ; --------------------------------------------------------------------------------------
042a ; Debug3 Subtable 0x8
042a ; --------------------------------------------------------------------------------------
042a 0002 0005 | | .DBG3TAB 0x0002,0x0005
042c 02c3 ffff | | .CONST 0x02c3,0xffff
042e 02c5 fffe | | .CONST 0x02c5,0xfffe
0430 02c7 0001 | | .CONST 0x02c7,0x0001
0432 02cb 0002 | | .CONST 0x02cb,0x0002
0434 02d4 0003 | | .CONST 0x02d4,0x0003
0436 02d6 0004 | | .CONST 0x02d6,0x0004
0438 02e0 0005 | | .CONST 0x02e0,0x0005
043a ; --------------------------------------------------------------------------------------
043a ; Debug3 Subtable 0x9
043a ; --------------------------------------------------------------------------------------
043a 0000 0001 | | .DBG3TAB 0x0000,0x0001
043c 02eb 0001 | | .CONST 0x02eb,0x0001
043e ; --------------------------------------------------------------------------------------
043e ; Debug3 Subtable 0xa
043e ; --------------------------------------------------------------------------------------
043e 0002 0007 | | .DBG3TAB 0x0002,0x0007
0440 0303 ffff | | .CONST 0x0303,0xffff
0442 0304 fffe | | .CONST 0x0304,0xfffe
0444 0307 0001 | | .CONST 0x0307,0x0001
0446 030b 0002 | | .CONST 0x030b,0x0002
0448 030f 0003 | | .CONST 0x030f,0x0003
044a 0316 0004 | | .CONST 0x0316,0x0004
044c 031e 0005 | | .CONST 0x031e,0x0005
044e 0320 0006 | | .CONST 0x0320,0x0006
0450 0325 0007 | % | .CONST 0x0325,0x0007
0452 0000 0000 | | .BLANK 0000[0x1ae]