|
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 - download
Length: 2048 (0x800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_ccb0b3
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 03f8 | | .CONST 0x03f8 ; 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 8002 | | .CONST 0x8002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 005b | [ | .CONST 0x005b ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 001c | | .CONST 0x001c ; Number of locals
000b INIT_0008:
000b e001 | | Load 0x0,0x1
000c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
000d e002 | | Load 0x0,0x2
000e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
000f e002 | | Load 0x0,0x2
0010 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0011 029f 033b | ;| Declare_Subprogram INIT_0338,For_Call
0013 4803 |H | Short_Literal 0x3
0014 032e | . | Declare_Type Record,Defined,Visible
0015 00e3 | | Load_Encached Natural_Cache
0016 0266 | f | Execute Discrete,Bounds
0017 00da | | Load_Top At_Offset_2
0018 029f 0063 | c| Declare_Subprogram INIT_0060,For_Call
001a 4801 |H | Short_Literal 0x1
001b 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
001c 00e3 | | Load_Encached Natural_Cache
001d e003 | | Load 0x0,0x3
001e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
001f 4801 |H | Short_Literal 0x1
0020 6053 |`S | Indirect_Literal Discrete,0x74,{0x00000000, 0x7fffffff}
0021 e20e | | Load 0x1,0xe
0022 034f | O | Declare_Type Array,Constrained,Visible,Bounds_With_Object
0023 029f 0363 | c| Declare_Subprogram INIT_0360,For_Call
0025 4800 |H | Short_Literal 0x0
0026 4801 |H | Short_Literal 0x1
0027 4801 |H | Short_Literal 0x1
0028 4800 |H | Short_Literal 0x0
0029 4801 |H | Short_Literal 0x1
002a 4801 |H | Short_Literal 0x1
002b 031e | | Declare_Type Variant_Record,Defined,Visible
002c 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated
002e 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated
0030 029a 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call,Visible,Unelaborated
0032 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated
0034 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated
0036 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated
0038 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated
003a 029a 0203 | | Declare_Subprogram INIT_0200,For_Outer_Call,Visible,Unelaborated
003c 029a 0233 | 3| Declare_Subprogram INIT_0230,For_Outer_Call,Visible,Unelaborated
003e 029a 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call,Visible,Unelaborated
0040 00bf | | Action Accept_Activation
0041 029d 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call
0043 029d 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call
0045 029d 030b | | Declare_Subprogram INIT_0308,For_Outer_Call
0047 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0048 00c7 | | Action Elaborate_Subprogram
0049 1d11 | | Execute_Immediate Reference_Lex_1,0x11
004a 00c7 | | Action Elaborate_Subprogram
004b 1d12 | | Execute_Immediate Reference_Lex_1,0x12
004c 00c7 | | Action Elaborate_Subprogram
004d 1d13 | | Execute_Immediate Reference_Lex_1,0x13
004e 00c7 | | Action Elaborate_Subprogram
004f 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0050 00c7 | | Action Elaborate_Subprogram
0051 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0052 00c7 | | Action Elaborate_Subprogram
0053 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0054 00c7 | | Action Elaborate_Subprogram
0055 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0056 00c7 | | Action Elaborate_Subprogram
0057 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0058 00c7 | | Action Elaborate_Subprogram
0059 1d19 | | Execute_Immediate Reference_Lex_1,0x19
005a 00c7 | | Action Elaborate_Subprogram
005b BODY_0008:
005b 00bc | | Action Signal_Activated
005c 00bb | | Action Signal_Completion
005d 0000 0000 | | .XXX[0x3]
005f 0000 | |
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0063 | c | .CONST 0x0063 ; Address of begin
0061 0004 | | .CONST 0x0004 ; Address of exception handler
0062 0001 | | .CONST 0x0001 ; Number of locals
0063 BODY_0060:
0063 INIT_0060:
0063 00d1 | | Pop_Control Pop_Count_1
0064 00da | | Load_Top At_Offset_2
0065 01dc | | Execute Vector,Last
0066 00db | | Load_Top At_Offset_3
0067 01dd | | Execute Vector,First
0068 0263 | c | Execute Discrete,Above_Bound
0069 7006 |p | Jump_Nonzero 0x70
006a 00d8 | | Load_Top At_Offset_0
006b e5ff | | Load 0x2,-0x1
006c 01d5 | | Execute Vector,Field_Reference
006d 1c00 | | Execute_Immediate Run_Utility,0x0
006e 0a01 | | Execute_Immediate Plus,0x1
006f 7ff8 | | Jump 0x68
0070 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0071 0000 0000 | | .XXX[0x3]
0073 0000 | |
0074 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 0095 | | .CONST 0x0095 ; Address of begin
0079 00bd | | .CONST 0x00bd ; Address of exception handler
007a 0006 | | .CONST 0x0006 ; Number of locals
007b INIT_0078:
007b e004 | | Load 0x0,0x4
007c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
007d e003 | | Load 0x0,0x3
007e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
007f 02c7 | | Declare_Variable Any
0080 00d8 | | Load_Top At_Offset_0
0081 1c00 | | Execute_Immediate Run_Utility,0x0
0082 4800 |H | Short_Literal 0x0
0083 e20f | | Load 0x1,0xf
0084 1c08 | | Execute_Immediate Run_Utility,0x8
0085 00d8 | | Load_Top At_Offset_0
0086 1c00 | | Execute_Immediate Run_Utility,0x0
0087 4800 |H | Short_Literal 0x0
0088 e005 | | Load 0x0,0x5
0089 1b0e | | Execute Package,Field_Read,Field_Number 0xe
008a 1c08 | | Execute_Immediate Run_Utility,0x8
008b 00d8 | | Load_Top At_Offset_0
008c 1c00 | | Execute_Immediate Run_Utility,0x0
008d e006 | | Load 0x0,0x6
008e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
008f 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
0090 02c7 | | Declare_Variable Any
0091 e006 | | Load 0x0,0x6
0092 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0093 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0094 a406 | | Store_Unchecked 0x2,0x6
0095 BODY_0078:
0095 e004 | | Load 0x0,0x4
0096 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0097 00d9 | | Load_Top At_Offset_1
0098 e5fc | | Load 0x2,-0x4
0099 e5fe | | Load 0x2,-0x2
009a e5ff | | Load 0x2,-0x1
009b e005 | | Load 0x0,0x5
009c 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
009d c406 | | Store 0x2,0x6
009e c402 | | Store 0x2,0x2
009f 4800 |H | Short_Literal 0x0
00a0 e402 | | Load 0x2,0x2
00a1 e004 | | Load 0x0,0x4
00a2 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
00a3 7006 |p | Jump_Nonzero 0xaa
00a4 e402 | | Load 0x2,0x2
00a5 00da | | Load_Top At_Offset_2
00a6 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
00a7 00d9 | | Load_Top At_Offset_1
00a8 821a | | Call 0x1,0x1a
00a9 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
00aa e5fd | | Load 0x2,-0x3
00ab 680a |h | Jump_Zero 0xb6
00ac e5fc | | Load 0x2,-0x4
00ad 00d8 | | Load_Top At_Offset_0
00ae e5fe | | Load 0x2,-0x2
00af 00db | | Load_Top At_Offset_3
00b0 e005 | | Load 0x0,0x5
00b1 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
00b2 e005 | | Load 0x0,0x5
00b3 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00b4 821a | | Call 0x1,0x1a
00b5 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
00b6 e5fc | | Load 0x2,-0x4
00b7 e5fe | | Load 0x2,-0x2
00b8 00da | | Load_Top At_Offset_2
00b9 e005 | | Load 0x0,0x5
00ba 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
00bb 821a | | Call 0x1,0x1a
00bc 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
00bd TRAP_0078:
00bd 0007 | | Action Break_Optional
00be e403 | | Load 0x2,0x3
00bf 4800 |H | Short_Literal 0x0
00c0 4801 |H | Short_Literal 0x1
00c1 e007 | | Load 0x0,0x7
00c2 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00c3 0092 038a | | Action Push_String_Extended,0x38a ; "get_build_list"
00c5 821c | | Call 0x1,0x1c
00c6 c403 | | Store 0x2,0x3
00c7 e403 | | Load 0x2,0x3
00c8 e404 | | Load 0x2,0x4
00c9 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
00ca 00db | | Load_Top At_Offset_3
00cb 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
00cc 0000 0000 | | .BLANK 0000[0x4]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d6 | | .CONST 0x00d6 ; Address of begin
00d1 00e9 | | .CONST 0x00e9 ; Address of exception handler
00d2 0002 | | .CONST 0x0002 ; Number of locals
00d3 INIT_00d0:
00d3 e004 | | Load 0x0,0x4
00d4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00d5 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00d6 BODY_00d0:
00d6 e004 | | Load 0x0,0x4
00d7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00d8 e5fa | | Load 0x2,-0x6
00d9 e5fb | | Load 0x2,-0x5
00da e008 | | Load 0x0,0x8
00db 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
00dc e5fc | | Load 0x2,-0x4
00dd e5fd | | Load 0x2,-0x3
00de e5fe | | Load 0x2,-0x2
00df e5ff | | Load 0x2,-0x1
00e0 e009 | | Load 0x0,0x9
00e1 180e | | Execute Package,Field_Execute,Field_Number 0xe
00e2 0059 | Y | Store_Top Discrete,At_Offset_1
00e3 e5f9 | | Load 0x2,-0x7
00e4 00d9 | | Load_Top At_Offset_1
00e5 e00a | | Load 0x0,0xa
00e6 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00e7 c5f9 | | Store 0x2,-0x7
00e8 4507 |E | Exit_Suprogram New_Top_Offset 0x7
00e9 TRAP_00d0:
00e9 0007 | | Action Break_Optional
00ea e5f9 | | Load 0x2,-0x7
00eb 4800 |H | Short_Literal 0x0
00ec 4801 |H | Short_Literal 0x1
00ed e007 | | Load 0x0,0x7
00ee 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00ef 0092 038b | | Action Push_String_Extended,0x38b ; "generate_compile_commands"
00f1 821c | | Call 0x1,0x1c
00f2 c5f9 | | Store 0x2,-0x7
00f3 4507 |E | Exit_Suprogram New_Top_Offset 0x7
00f4 0000 0000 | | .BLANK 0000[0x4]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00fe | | .CONST 0x00fe ; Address of begin
00f9 010f | | .CONST 0x010f ; Address of exception handler
00fa 0002 | | .CONST 0x0002 ; Number of locals
00fb INIT_00f8:
00fb e004 | | Load 0x0,0x4
00fc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00fd 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00fe BODY_00f8:
00fe e004 | | Load 0x0,0x4
00ff 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0100 e5fc | | Load 0x2,-0x4
0101 e5fd | | Load 0x2,-0x3
0102 e008 | | Load 0x0,0x8
0103 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0104 e5fe | | Load 0x2,-0x2
0105 e5ff | | Load 0x2,-0x1
0106 e009 | | Load 0x0,0x9
0107 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0108 0059 | Y | Store_Top Discrete,At_Offset_1
0109 e5fb | | Load 0x2,-0x5
010a 00d9 | | Load_Top At_Offset_1
010b e00a | | Load 0x0,0xa
010c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
010d c5fb | | Store 0x2,-0x5
010e 4505 |E | Exit_Suprogram New_Top_Offset 0x5
010f TRAP_00f8:
010f 0007 | | Action Break_Optional
0110 e5fb | | Load 0x2,-0x5
0111 4800 |H | Short_Literal 0x0
0112 4801 |H | Short_Literal 0x1
0113 e007 | | Load 0x0,0x7
0114 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0115 0092 038c | | Action Push_String_Extended,0x38c ; "generate_link_commands"
0117 821c | | Call 0x1,0x1c
0118 c5fb | | Store 0x2,-0x5
0119 4505 |E | Exit_Suprogram New_Top_Offset 0x5
011a 0000 0000 | | .BLANK 0000[0x6]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0126 | & | .CONST 0x0126 ; Address of begin
0121 0137 | 7 | .CONST 0x0137 ; Address of exception handler
0122 0002 | | .CONST 0x0002 ; Number of locals
0123 INIT_0120:
0123 e004 | | Load 0x0,0x4
0124 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0125 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0126 BODY_0120:
0126 e004 | | Load 0x0,0x4
0127 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0128 e5fc | | Load 0x2,-0x4
0129 e5fd | | Load 0x2,-0x3
012a e008 | | Load 0x0,0x8
012b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
012c e5fe | | Load 0x2,-0x2
012d e5ff | | Load 0x2,-0x1
012e e009 | | Load 0x0,0x9
012f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0130 0059 | Y | Store_Top Discrete,At_Offset_1
0131 e5fb | | Load 0x2,-0x5
0132 00d9 | | Load_Top At_Offset_1
0133 e00a | | Load 0x0,0xa
0134 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0135 c5fb | | Store 0x2,-0x5
0136 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0137 TRAP_0120:
0137 0007 | | Action Break_Optional
0138 e5fb | | Load 0x2,-0x5
0139 4800 |H | Short_Literal 0x0
013a 4801 |H | Short_Literal 0x1
013b e007 | | Load 0x0,0x7
013c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
013d 0092 038d | | Action Push_String_Extended,0x38d ; "generate_secondary_commands"
013f 821c | | Call 0x1,0x1c
0140 c5fb | | Store 0x2,-0x5
0141 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0142 0000 0000 | | .BLANK 0000[0x6]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014e | N | .CONST 0x014e ; Address of begin
0149 0161 | a | .CONST 0x0161 ; Address of exception handler
014a 0002 | | .CONST 0x0002 ; Number of locals
014b INIT_0148:
014b e004 | | Load 0x0,0x4
014c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
014d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
014e BODY_0148:
014e e004 | | Load 0x0,0x4
014f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0150 e5fb | | Load 0x2,-0x5
0151 e5fc | | Load 0x2,-0x4
0152 e008 | | Load 0x0,0x8
0153 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0154 e5fd | | Load 0x2,-0x3
0155 e5fe | | Load 0x2,-0x2
0156 821b | | Call 0x1,0x1b
0157 e5ff | | Load 0x2,-0x1
0158 e009 | | Load 0x0,0x9
0159 181a | | Execute Package,Field_Execute,Field_Number 0x1a
015a 0059 | Y | Store_Top Discrete,At_Offset_1
015b e5fa | | Load 0x2,-0x6
015c 00d9 | | Load_Top At_Offset_1
015d e00a | | Load 0x0,0xa
015e 1817 | | Execute Package,Field_Execute,Field_Number 0x17
015f c5fa | | Store 0x2,-0x6
0160 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0161 TRAP_0148:
0161 0007 | | Action Break_Optional
0162 e5fa | | Load 0x2,-0x6
0163 4800 |H | Short_Literal 0x0
0164 4801 |H | Short_Literal 0x1
0165 e007 | | Load 0x0,0x7
0166 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0167 0092 038e | | Action Push_String_Extended,0x38e ; "generate_all_compile_commands"
0169 821c | | Call 0x1,0x1c
016a c5fa | | Store 0x2,-0x6
016b 4506 |E | Exit_Suprogram New_Top_Offset 0x6
016c 0000 0000 | | .BLANK 0000[0x4]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0176 | v | .CONST 0x0176 ; Address of begin
0171 0189 | | .CONST 0x0189 ; Address of exception handler
0172 0002 | | .CONST 0x0002 ; Number of locals
0173 INIT_0170:
0173 e004 | | Load 0x0,0x4
0174 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0175 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0176 BODY_0170:
0176 e004 | | Load 0x0,0x4
0177 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0178 e5fb | | Load 0x2,-0x5
0179 e5fc | | Load 0x2,-0x4
017a e008 | | Load 0x0,0x8
017b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
017c e5fd | | Load 0x2,-0x3
017d e5fe | | Load 0x2,-0x2
017e 821b | | Call 0x1,0x1b
017f e5ff | | Load 0x2,-0x1
0180 e009 | | Load 0x0,0x9
0181 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0182 0059 | Y | Store_Top Discrete,At_Offset_1
0183 e5fa | | Load 0x2,-0x6
0184 00d9 | | Load_Top At_Offset_1
0185 e00a | | Load 0x0,0xa
0186 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0187 c5fa | | Store 0x2,-0x6
0188 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0189 TRAP_0170:
0189 0007 | | Action Break_Optional
018a e5fa | | Load 0x2,-0x6
018b 4800 |H | Short_Literal 0x0
018c 4801 |H | Short_Literal 0x1
018d e007 | | Load 0x0,0x7
018e 1815 | | Execute Package,Field_Execute,Field_Number 0x15
018f 0092 038f | | Action Push_String_Extended,0x38f ; "generate_all_link_commands"
0191 821c | | Call 0x1,0x1c
0192 c5fa | | Store 0x2,-0x6
0193 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0194 0000 0000 | | .BLANK 0000[0x4]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 01b4 | | .CONST 0x01b4 ; Address of begin
0199 01f2 | | .CONST 0x01f2 ; Address of exception handler
019a 0006 | | .CONST 0x0006 ; Number of locals
019b INIT_0198:
019b e004 | | Load 0x0,0x4
019c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
019d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
019e 00db | | Load_Top At_Offset_3
019f 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
01a0 e005 | | Load 0x0,0x5
01a1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01a2 1c08 | | Execute_Immediate Run_Utility,0x8
01a3 00d8 | | Load_Top At_Offset_0
01a4 1c00 | | Execute_Immediate Run_Utility,0x0
01a5 e006 | | Load 0x0,0x6
01a6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01a7 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
01a8 02c7 | | Declare_Variable Any
01a9 e006 | | Load 0x0,0x6
01aa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ab 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
01ac a404 | | Store_Unchecked 0x2,0x4
01ad e006 | | Load 0x0,0x6
01ae 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01af 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01b0 02c7 | | Declare_Variable Any
01b1 00d8 | | Load_Top At_Offset_0
01b2 1c00 | | Execute_Immediate Run_Utility,0x0
01b3 00e1 | | Load_Encached Boolean_Cache
01b4 BODY_0198:
01b4 4801 |H | Short_Literal 0x1
01b5 e5ff | | Load 0x2,-0x1
01b6 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01b7 e003 | | Load 0x0,0x3
01b8 1817 | | Execute Package,Field_Execute,Field_Number 0x17
01b9 7034 |p4 | Jump_Nonzero 0x1ee
01ba 4800 |H | Short_Literal 0x0
01bb e403 | | Load 0x2,0x3
01bc 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01bd 00cf | | Action Mark_Auxiliary
01be e5ff | | Load 0x2,-0x1
01bf 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01c0 01dc | | Execute Vector,Last
01c1 4801 |H | Short_Literal 0x1
01c2 0263 | c | Execute Discrete,Above_Bound
01c3 701c |p | Jump_Nonzero 0x1e0
01c4 4801 |H | Short_Literal 0x1
01c5 e006 | | Load 0x0,0x6
01c6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01c7 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01c8 00da | | Load_Top At_Offset_2
01c9 e5ff | | Load 0x2,-0x1
01ca 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01cb 01d5 | | Execute Vector,Field_Reference
01cc 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01cd e001 | | Load 0x0,0x1
01ce 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01cf 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
01d0 e006 | | Load 0x0,0x6
01d1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01d2 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
01d3 c405 | | Store 0x2,0x5
01d4 00e1 | | Load_Encached Boolean_Cache
01d5 e006 | | Load 0x0,0x6
01d6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d7 180e | | Execute Package,Field_Execute,Field_Number 0xe
01d8 e405 | | Load 0x2,0x5
01d9 e404 | | Load 0x2,0x4
01da e006 | | Load 0x0,0x6
01db 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01dc 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
01dd c406 | | Store 0x2,0x6
01de 00c8 | | Action Pop_Auxiliary_Range
01df 3fe4 |? | Loop_Increasing 0x1c4
01e0 00ce | | Action Pop_Auxiliary
01e1 e004 | | Load 0x0,0x4
01e2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01e3 e5fe | | Load 0x2,-0x2
01e4 e404 | | Load 0x2,0x4
01e5 e005 | | Load 0x0,0x5
01e6 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
01e7 c402 | | Store 0x2,0x2
01e8 e5fd | | Load 0x2,-0x3
01e9 e402 | | Load 0x2,0x2
01ea e00a | | Load 0x0,0xa
01eb 1817 | | Execute Package,Field_Execute,Field_Number 0x17
01ec c5fd | | Store 0x2,-0x3
01ed 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01ee e5ff | | Load 0x2,-0x1
01ef 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01f0 c5fd | | Store 0x2,-0x3
01f1 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01f2 TRAP_0198:
01f2 0007 | | Action Break_Optional
01f3 e5fd | | Load 0x2,-0x3
01f4 4800 |H | Short_Literal 0x0
01f5 4801 |H | Short_Literal 0x1
01f6 e007 | | Load 0x0,0x7
01f7 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01f8 0092 0390 | | Action Push_String_Extended,0x390 ; "check_units"
01fa 821c | | Call 0x1,0x1c
01fb c5fd | | Store 0x2,-0x3
01fc 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01fd 0000 0000 | | .XXX[0x3]
01ff 0000 | |
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0206 | | .CONST 0x0206 ; Address of begin
0201 0223 | # | .CONST 0x0223 ; Address of exception handler
0202 0002 | | .CONST 0x0002 ; Number of locals
0203 INIT_0200:
0203 e004 | | Load 0x0,0x4
0204 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0205 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0206 BODY_0200:
0206 e004 | | Load 0x0,0x4
0207 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0208 e5fc | | Load 0x2,-0x4
0209 0120 | | Execute Any,Is_Value
020a 6803 |h | Jump_Zero 0x20e
020b e002 | | Load 0x0,0x2
020c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
020d 7801 |x | Jump 0x20f
020e e5fc | | Load 0x2,-0x4
020f e5fd | | Load 0x2,-0x3
0210 0120 | | Execute Any,Is_Value
0211 6803 |h | Jump_Zero 0x215
0212 e002 | | Load 0x0,0x2
0213 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0214 7801 |x | Jump 0x216
0215 e5fd | | Load 0x2,-0x3
0216 e5fe | | Load 0x2,-0x2
0217 e5ff | | Load 0x2,-0x1
0218 e00b | | Load 0x0,0xb
0219 1813 | | Execute Package,Field_Execute,Field_Number 0x13
021a c5fd | | Store 0x2,-0x3
021b c5fc | | Store 0x2,-0x4
021c 0059 | Y | Store_Top Discrete,At_Offset_1
021d e5fb | | Load 0x2,-0x5
021e 00d9 | | Load_Top At_Offset_1
021f e00a | | Load 0x0,0xa
0220 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0221 c5fb | | Store 0x2,-0x5
0222 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0223 TRAP_0200:
0223 0007 | | Action Break_Optional
0224 e5fb | | Load 0x2,-0x5
0225 4800 |H | Short_Literal 0x0
0226 4801 |H | Short_Literal 0x1
0227 e007 | | Load 0x0,0x7
0228 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0229 0092 0391 | | Action Push_String_Extended,0x391 ; "get_coding_time"
022b 821c | | Call 0x1,0x1c
022c c5fb | | Store 0x2,-0x5
022d 4503 |E | Exit_Suprogram New_Top_Offset 0x3
022e 0000 0000 | | .XXX[0x2]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0236 | 6 | .CONST 0x0236 ; Address of begin
0231 0244 | D | .CONST 0x0244 ; Address of exception handler
0232 0002 | | .CONST 0x0002 ; Number of locals
0233 INIT_0230:
0233 e004 | | Load 0x0,0x4
0234 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0235 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0236 BODY_0230:
0236 e004 | | Load 0x0,0x4
0237 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0238 e5fd | | Load 0x2,-0x3
0239 e5fe | | Load 0x2,-0x2
023a e5ff | | Load 0x2,-0x1
023b e00b | | Load 0x0,0xb
023c 180f | | Execute Package,Field_Execute,Field_Number 0xf
023d 0059 | Y | Store_Top Discrete,At_Offset_1
023e e5fc | | Load 0x2,-0x4
023f 00d9 | | Load_Top At_Offset_1
0240 e00a | | Load 0x0,0xa
0241 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0242 c5fc | | Store 0x2,-0x4
0243 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0244 TRAP_0230:
0244 0007 | | Action Break_Optional
0245 e5fc | | Load 0x2,-0x4
0246 4800 |H | Short_Literal 0x0
0247 4801 |H | Short_Literal 0x1
0248 e007 | | Load 0x0,0x7
0249 1815 | | Execute Package,Field_Execute,Field_Number 0x15
024a 0092 0392 | | Action Push_String_Extended,0x392 ; "set_coding_time"
024c 821c | | Call 0x1,0x1c
024d c5fc | | Store 0x2,-0x4
024e 4504 |E | Exit_Suprogram New_Top_Offset 0x4
024f 0000 | | .XXX[0x1]
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0256 | V | .CONST 0x0256 ; Address of begin
0251 0264 | d | .CONST 0x0264 ; Address of exception handler
0252 0002 | | .CONST 0x0002 ; Number of locals
0253 INIT_0250:
0253 e004 | | Load 0x0,0x4
0254 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0255 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0256 BODY_0250:
0256 e004 | | Load 0x0,0x4
0257 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0258 e5fd | | Load 0x2,-0x3
0259 e5fe | | Load 0x2,-0x2
025a e5ff | | Load 0x2,-0x1
025b e00b | | Load 0x0,0xb
025c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
025d 0059 | Y | Store_Top Discrete,At_Offset_1
025e e5fc | | Load 0x2,-0x4
025f 00d9 | | Load_Top At_Offset_1
0260 e00a | | Load 0x0,0xa
0261 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0262 c5fc | | Store 0x2,-0x4
0263 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0264 TRAP_0250:
0264 0007 | | Action Break_Optional
0265 e5fc | | Load 0x2,-0x4
0266 4800 |H | Short_Literal 0x0
0267 4801 |H | Short_Literal 0x1
0268 e007 | | Load 0x0,0x7
0269 1815 | | Execute Package,Field_Execute,Field_Number 0x15
026a 0092 0393 | | Action Push_String_Extended,0x393 ; "set_build_time"
026c 821c | | Call 0x1,0x1c
026d c5fc | | Store 0x2,-0x4
026e 4504 |E | Exit_Suprogram New_Top_Offset 0x4
026f 0000 | | .XXX[0x1]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 027e | ~ | .CONST 0x027e ; Address of begin
0271 02b0 | | .CONST 0x02b0 ; Address of exception handler
0272 0003 | | .CONST 0x0003 ; Number of locals
0273 INIT_0270:
0273 00da | | Load_Top At_Offset_2
0274 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0275 e20f | | Load 0x1,0xf
0276 1c08 | | Execute_Immediate Run_Utility,0x8
0277 00d8 | | Load_Top At_Offset_0
0278 1c00 | | Execute_Immediate Run_Utility,0x0
0279 e003 | | Load 0x0,0x3
027a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
027b 02c7 | | Declare_Variable Any
027c 00d8 | | Load_Top At_Offset_0
027d 1c00 | | Execute_Immediate Run_Utility,0x0
027e BODY_0270:
027e 00d9 | | Load_Top At_Offset_1
027f 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0280 e5ff | | Load 0x2,-0x1
0281 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0282 e00a | | Load 0x0,0xa
0283 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0284 00da | | Load_Top At_Offset_2
0285 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0286 00cf | | Action Mark_Auxiliary
0287 e5ff | | Load 0x2,-0x1
0288 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0289 01dc | | Execute Vector,Last
028a 4801 |H | Short_Literal 0x1
028b 0263 | c | Execute Discrete,Above_Bound
028c 7020 |p | Jump_Nonzero 0x2ad
028d 00d8 | | Load_Top At_Offset_0
028e e5ff | | Load 0x2,-0x1
028f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0290 01d5 | | Execute Vector,Field_Reference
0291 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0292 00d9 | | Load_Top At_Offset_1
0293 e402 | | Load 0x2,0x2
0294 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0295 01d5 | | Execute Vector,Field_Reference
0296 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0297 00d8 | | Load_Top At_Offset_0
0298 e5ff | | Load 0x2,-0x1
0299 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
029a 01d5 | | Execute Vector,Field_Reference
029b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
029c 00d9 | | Load_Top At_Offset_1
029d e402 | | Load 0x2,0x2
029e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
029f 01d5 | | Execute Vector,Field_Reference
02a0 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
02a1 00d8 | | Load_Top At_Offset_0
02a2 e5ff | | Load 0x2,-0x1
02a3 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02a4 01d5 | | Execute Vector,Field_Reference
02a5 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
02a6 00d9 | | Load_Top At_Offset_1
02a7 e402 | | Load 0x2,0x2
02a8 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02a9 01d5 | | Execute Vector,Field_Reference
02aa 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
02ab 00c8 | | Action Pop_Auxiliary_Range
02ac 3fe0 |? | Loop_Increasing 0x28d
02ad 00ce | | Action Pop_Auxiliary
02ae 00d9 | | Load_Top At_Offset_1
02af 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02b0 TRAP_0270:
02b0 0007 | | Action Break_Optional
02b1 0831 | 1 | Execute_Immediate Raise,0x31
02b2 0000 0000 | | .BLANK 0000[0x6]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02c7 | | .CONST 0x02c7 ; Address of begin
02b9 02ff | | .CONST 0x02ff ; Address of exception handler
02ba 0003 | | .CONST 0x0003 ; Number of locals
02bb INIT_02b8:
02bb 00da | | Load_Top At_Offset_2
02bc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
02bd e005 | | Load 0x0,0x5
02be 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02bf 1c08 | | Execute_Immediate Run_Utility,0x8
02c0 00d8 | | Load_Top At_Offset_0
02c1 1c00 | | Execute_Immediate Run_Utility,0x0
02c2 e003 | | Load 0x0,0x3
02c3 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02c4 02c7 | | Declare_Variable Any
02c5 00d8 | | Load_Top At_Offset_0
02c6 1c00 | | Execute_Immediate Run_Utility,0x0
02c7 BODY_02b8:
02c7 4801 |H | Short_Literal 0x1
02c8 e5ff | | Load 0x2,-0x1
02c9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02ca e003 | | Load 0x0,0x3
02cb 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02cc 6804 |h | Jump_Zero 0x2d1
02cd 4800 |H | Short_Literal 0x0
02ce 00da | | Load_Top At_Offset_2
02cf 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
02d0 7804 |x | Jump 0x2d5
02d1 e004 | | Load 0x0,0x4
02d2 181b | | Execute Package,Field_Execute,Field_Number 0x1b
02d3 00da | | Load_Top At_Offset_2
02d4 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
02d5 00cf | | Action Mark_Auxiliary
02d6 e5ff | | Load 0x2,-0x1
02d7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02d8 01dc | | Execute Vector,Last
02d9 4801 |H | Short_Literal 0x1
02da 0263 | c | Execute Discrete,Above_Bound
02db 7020 |p | Jump_Nonzero 0x2fc
02dc 00d8 | | Load_Top At_Offset_0
02dd e5ff | | Load 0x2,-0x1
02de 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02df 01d5 | | Execute Vector,Field_Reference
02e0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02e1 00d9 | | Load_Top At_Offset_1
02e2 e402 | | Load 0x2,0x2
02e3 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02e4 01d5 | | Execute Vector,Field_Reference
02e5 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02e6 00d8 | | Load_Top At_Offset_0
02e7 e5ff | | Load 0x2,-0x1
02e8 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02e9 01d5 | | Execute Vector,Field_Reference
02ea 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02eb 00d9 | | Load_Top At_Offset_1
02ec e402 | | Load 0x2,0x2
02ed 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02ee 01d5 | | Execute Vector,Field_Reference
02ef 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
02f0 00d8 | | Load_Top At_Offset_0
02f1 e5ff | | Load 0x2,-0x1
02f2 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02f3 01d5 | | Execute Vector,Field_Reference
02f4 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
02f5 00d9 | | Load_Top At_Offset_1
02f6 e402 | | Load 0x2,0x2
02f7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02f8 01d5 | | Execute Vector,Field_Reference
02f9 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
02fa 00c8 | | Action Pop_Auxiliary_Range
02fb 3fe0 |? | Loop_Increasing 0x2dc
02fc 00ce | | Action Pop_Auxiliary
02fd 00d9 | | Load_Top At_Offset_1
02fe 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02ff TRAP_02b8:
02ff 0007 | | Action Break_Optional
0300 0831 | 1 | Execute_Immediate Raise,0x31
0301 0000 0000 | | .BLANK 0000[0x7]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 030b | | .CONST 0x030b ; Address of begin
0309 0004 | | .CONST 0x0004 ; Address of exception handler
030a 0001 | | .CONST 0x0001 ; Number of locals
030b BODY_0308:
030b INIT_0308:
030b e00c | | Load 0x0,0xc
030c 180e | | Execute Package,Field_Execute,Field_Number 0xe
030d 4801 |H | Short_Literal 0x1
030e 4802 |H | Short_Literal 0x2
030f e00d | | Load 0x0,0xd
0310 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0311 035b | [ | Declare_Type Array,Constrained
0312 0337 | 7 | Declare_Variable Array
0313 e5ff | | Load 0x2,-0x1
0314 e00d | | Load 0x0,0xd
0315 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0316 e00d | | Load 0x0,0xd
0317 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0318 0119 | | Execute Any,Check_In_Formal_Type
0319 4801 |H | Short_Literal 0x1
031a 00da | | Load_Top At_Offset_2
031b 01d6 | | Execute Vector,Field_Write
031c e5fe | | Load 0x2,-0x2
031d e00d | | Load 0x0,0xd
031e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
031f e00d | | Load 0x0,0xd
0320 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0321 0119 | | Execute Any,Check_In_Formal_Type
0322 4802 |H | Short_Literal 0x2
0323 00da | | Load_Top At_Offset_2
0324 01d6 | | Execute Vector,Field_Write
0325 600a |` | Indirect_Literal Discrete,0x330,{0x00000000, 0x0000813b}
0326 e004 | | Load 0x0,0x4
0327 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0328 e5fd | | Load 0x2,-0x3
0329 6006 |` | Indirect_Literal Discrete,0x330,{0x00000000, 0x0000813b}
032a e00a | | Load 0x0,0xa
032b 1817 | | Execute Package,Field_Execute,Field_Number 0x17
032c c5fd | | Store 0x2,-0x3
032d 4503 |E | Exit_Suprogram New_Top_Offset 0x3
032e 0000 0000 | | .XXX[0x2]
0330 0000 0000 | | .LITERAL {0x00000000, 0x0000813b}
0334 0000 0000 | | .BLANK 0000[0x4]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 033b | ; | .CONST 0x033b ; Address of begin
0339 0004 | | .CONST 0x0004 ; Address of exception handler
033a 0001 | | .CONST 0x0001 ; Number of locals
033b BODY_0338:
033b INIT_0338:
033b 4608 |F | Jump_Case 0x9
033c 7808 |x | Jump 0x345 ; case 0x0
033d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
033e 7819 |x | Jump 0x358 ; case 0x2
033f 7818 |x | Jump 0x358 ; case 0x3
0340 7817 |x | Jump 0x358 ; case 0x4
0341 7816 |x | Jump 0x358 ; case 0x5
0342 7815 |x | Jump 0x358 ; case 0x6
0343 7814 |x | Jump 0x358 ; case 0x7
0344 7813 |x | Jump 0x358 ; case 0x8
0345 00da | | Load_Top At_Offset_2
0346 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0347 0125 | % | Execute Any,Set_Constraint
0348 00da | | Load_Top At_Offset_2
0349 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
034a 1c00 | | Execute_Immediate Run_Utility,0x0
034b 00da | | Load_Top At_Offset_2
034c 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
034d 0125 | % | Execute Any,Set_Constraint
034e 00da | | Load_Top At_Offset_2
034f 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0350 1c00 | | Execute_Immediate Run_Utility,0x0
0351 00da | | Load_Top At_Offset_2
0352 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0353 0125 | % | Execute Any,Set_Constraint
0354 00da | | Load_Top At_Offset_2
0355 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0356 1c00 | | Execute_Immediate Run_Utility,0x0
0357 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0358 0869 | i | Execute_Immediate Raise,0x69
0359 0000 0000 | | .BLANK 0000[0x7]
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 0363 | c | .CONST 0x0363 ; Address of begin
0361 0004 | | .CONST 0x0004 ; Address of exception handler
0362 0001 | | .CONST 0x0001 ; Number of locals
0363 BODY_0360:
0363 INIT_0360:
0363 4608 |F | Jump_Case 0x9
0364 7808 |x | Jump 0x36d ; case 0x0
0365 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0366 7822 |x" | Jump 0x389 ; case 0x2
0367 7821 |x! | Jump 0x389 ; case 0x3
0368 7820 |x | Jump 0x389 ; case 0x4
0369 781f |x | Jump 0x389 ; case 0x5
036a 781e |x | Jump 0x389 ; case 0x6
036b 780a |x | Jump 0x376 ; case 0x7
036c 7812 |x | Jump 0x37f ; case 0x8
036d 00da | | Load_Top At_Offset_2
036e 2202 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x2
036f 00da | | Load_Top At_Offset_2
0370 2402 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
0371 1c00 | | Execute_Immediate Run_Utility,0x0
0372 00da | | Load_Top At_Offset_2
0373 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0374 1c00 | | Execute_Immediate Run_Utility,0x0
0375 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0376 00db | | Load_Top At_Offset_3
0377 4801 |H | Short_Literal 0x1
0378 e5fe | | Load 0x2,-0x2
0379 e20e | | Load 0x1,0xe
037a 035b | [ | Declare_Type Array,Constrained
037b 4801 |H | Short_Literal 0x1
037c e5ff | | Load 0x2,-0x1
037d 031b | | Declare_Type Variant_Record,Constrained
037e 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
037f 00db | | Load_Top At_Offset_3
0380 00db | | Load_Top At_Offset_3
0381 02fc | | Declare_Variable Variant_Record,With_Constraint
0382 4801 |H | Short_Literal 0x1
0383 e5fe | | Load 0x2,-0x2
0384 e20e | | Load 0x1,0xe
0385 0334 | 4 | Declare_Variable Array,With_Constraint
0386 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3
0387 016a | j | QQ_execute Variant_Record,XXX
0388 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0389 0869 | i | Execute_Immediate Raise,0x69
038a ; --------------------------------------------------------------------------------------
038a ; STRING TABLE
038a ; --------------------------------------------------------------------------------------
038a 0016 | | .STRTAB 0x0016->0x0395 ; "get_build_list"
038b 0022 | " | .STRTAB 0x0022->0x039c ; "generate_compile_commands"
038c 0039 | 9 | .STRTAB 0x0039->0x03a8 ; "generate_link_commands"
038d 004d | M | .STRTAB 0x004d->0x03b3 ; "generate_secondary_commands"
038e 0066 | f | .STRTAB 0x0066->0x03c1 ; "generate_all_compile_commands"
038f 0081 | | .STRTAB 0x0081->0x03cf ; "generate_all_link_commands"
0390 0099 | | .STRTAB 0x0099->0x03dc ; "check_units"
0391 00a2 | | .STRTAB 0x00a2->0x03e2 ; "get_coding_time"
0392 00af | | .STRTAB 0x00af->0x03e9 ; "set_coding_time"
0393 00bc | | .STRTAB 0x00bc->0x03f1 ; "set_build_time"
0394 00c8 | | .STREND 0x00c8->0x03f8
0395 6765 745f |get_| .STRTAB_STRINGS
03f8 ; --------------------------------------------------------------------------------------
03f8 ; Debug Table
03f8 ; --------------------------------------------------------------------------------------
03f8 0004 000e | | .DEBUG4 0x0004,0x000e,0xe11f,0x0000,0x0001,0x0000
03fe adcc 8408 | | .XXX[0x2]