|
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: 2048 (0x800) Types: SEG Notes: 5811_R1K_CODE Names: »116755.SEG«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293 └─ ⟦this⟧ »116755.SEG« └─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3 └─ ⟦this⟧ »116755.SEG« └─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288 └─ ⟦this⟧ »116755.SEG« └─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5 └─ ⟦this⟧ »116755.SEG« └─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000 └─ ⟦this⟧ »116755.SEG«
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0150 | P | .CONST 0x0150 ; 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 004e | N | .CONST 0x004e ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0021 | ! | .CONST 0x0021 ; Number of locals 000b INIT_0008: 000b 4802 |H | Short_Literal 0x2 ; Debug Table 0x0 = .DEBUG 0x000b,0x01ba,0xc000,0x0000,0x0036,0x0794,0x0000,0x0007 ; Debug Table 0x0.0x0 = 0xb,0xffff ; Debug Table 0x0.0x1 = 0xb,0xfffe ; Debug Table 0x0.0x2 = 0xb,0xfffd 000c 032b | + | Declare_Type Record,Incomplete,Visible 000d 029a 0053 | S| Declare_Subprogram INIT_0050,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0xd,0xfffc 000f 029a 005b | [| Declare_Subprogram INIT_0058,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0xf,0xfffb 0011 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x11,0xfffa 0013 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x13,0xfff9 0015 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x15,0xfff8 0017 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x17,0xfff7 0019 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x19,0xfff6 001b 4802 |H | Short_Literal 0x2 ; Debug Table 0x0.0xa = 0x1b,0xfff5 001c 032b | + | Declare_Type Record,Incomplete,Visible 001d 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xb = 0x1d,0xfff4 001f 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xc = 0x1f,0xfff3 0021 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xd = 0x21,0xfff2 0023 029a 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xe = 0x23,0xfff1 0025 6122 |a" | Indirect_Literal Discrete,0x148,{0x00000000, 0x00360794} ; Debug Table 0x0.0x10 = 0x25,0xffef ; Debug Table 0x0.0x11 = 0x25,0xffee ; Debug Table 0x0.0x12 = 0x25,0xffed ; Debug Table 0x0.0x13 = 0x25,0xffec ; Debug Table 0x0.0x14 = 0x25,0xffeb ; Debug Table 0x0.0x15 = 0x25,0xffea ; Debug Table 0x0.0x16 = 0x25,0xffe9 ; Debug Table 0x0.0x17 = 0x25,0xffe8 ; Debug Table 0x0.0xf = 0x25,0xfff0 0026 48d5 |H | Short_Literal 0xd5 0027 e20f | | Load 0x1,0xf 0028 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0029 e001 | | Load 0x0,0x1 002a 0387 | | Declare_Variable Package 002b 00d8 | | Load_Top At_Offset_0 002c 020f | | Execute Module,Activate 002d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x18 = 0x2d,0xffe7 002e 1b11 | | Execute Package,Field_Read,Field_Number 0x11 002f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x19 = 0x2f,0xffe6 0030 00d9 | | Load_Top At_Offset_1 0031 02a0 | | Declare_Subprogram Null_Subprogram 0032 e213 | | Load 0x1,0x13 0033 0326 | & | Complete_Type Record,By_Defining 0034 e213 | | Load 0x1,0x13 ; Debug Table 0x0.0x1a = 0x34,0xffe5 0035 e21b | | Load 0x1,0x1b 0036 0325 | % | Complete_Type Record,By_Renaming 0037 00bf | | Action Accept_Activation 0038 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1 = .DEBUG 0x0038,0x01f2,0xc000,0x0000,0x0036,0x0a04,0x0000,0x0003 ; Debug Table 0x1.0x0 = 0x38,0xffff ; Debug Table 0x1.0x1 = 0x38,0xfffe 0039 00c7 | | Action Elaborate_Subprogram 003a 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x2 = 0x3a,0xfffd 003b 00c7 | | Action Elaborate_Subprogram 003c 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x3 = 0x3c,0xfffc 003d 00c7 | | Action Elaborate_Subprogram 003e 1d1c | | Execute_Immediate Reference_Lex_1,0x1c ; Debug Table 0x1.0x4 = 0x3e,0xfffb 003f 00c7 | | Action Elaborate_Subprogram 0040 1d1d | | Execute_Immediate Reference_Lex_1,0x1d ; Debug Table 0x1.0x5 = 0x40,0xfffa 0041 00c7 | | Action Elaborate_Subprogram 0042 1d1e | | Execute_Immediate Reference_Lex_1,0x1e ; Debug Table 0x1.0x6 = 0x42,0xfff9 ; Debug Table 0x1.0x7 = 0x42,0xfff8 0043 00c7 | | Action Elaborate_Subprogram 0044 1d1f | | Execute_Immediate Reference_Lex_1,0x1f ; Debug Table 0x1.0x8 = 0x44,0xfff7 ; Debug Table 0x1.0x9 = 0x44,0xfff6 0045 00c7 | | Action Elaborate_Subprogram 0046 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0xa = 0x46,0xfff5 0047 00c7 | | Action Elaborate_Subprogram 0048 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0xb = 0x48,0xfff4 0049 00c7 | | Action Elaborate_Subprogram 004a 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0xc = 0x4a,0xfff3 004b 00c7 | | Action Elaborate_Subprogram 004c 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0xd = 0x4c,0xfff2 004d 00c7 | | Action Elaborate_Subprogram 004e BODY_0008: 004e 00bc | | Action Signal_Activated 004f 00bb | | Action Signal_Completion 0050 ; -------------------------------------------------------------------------------------- 0050 ; SUBPROGRAM 0050 ; -------------------------------------------------------------------------------------- 0050 0053 | S | .CONST 0x0053 ; Address of begin 0051 0004 | | .CONST 0x0004 ; Address of exception handler 0052 0001 | | .CONST 0x0001 ; Number of locals 0053 BODY_0050: 0053 INIT_0050: 0053 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x2 = .DEBUG 0x0053,0x0210,0x1001,0x0000,0x0036,0x0794,0x0000,0x0048 ; Debug Table 0x2.0x0 = 0x53,0x1 0054 0000 0000 | | .BLANK 0000[0x4] 0058 ; -------------------------------------------------------------------------------------- 0058 ; SUBPROGRAM 0058 ; -------------------------------------------------------------------------------------- 0058 005b | [ | .CONST 0x005b ; Address of begin 0059 0004 | | .CONST 0x0004 ; Address of exception handler 005a 0001 | | .CONST 0x0001 ; Number of locals 005b BODY_0058: 005b INIT_0058: 005b 00da | | Load_Top At_Offset_2 ; Debug Table 0x3 = .DEBUG 0x005b,0x0214,0x1002,0x0000,0x0036,0x0794,0x0000,0x0050 ; Debug Table 0x3.0x0 = 0x5b,0x1 005c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 005d e220 | | Load 0x1,0x20 005e 1814 | | Execute Package,Field_Execute,Field_Number 0x14 005f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 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 e220 | | Load 0x1,0x20 ; Debug Table 0x4 = .DEBUG 0x0063,0x0218,0x1001,0x0000,0x0036,0x0794,0x0000,0x0059 ; Debug Table 0x4.0x0 = 0x63,0x1 0064 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0065 00db | | Load_Top At_Offset_3 0066 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0067 e220 | | Load 0x1,0x20 ; Debug Table 0x4.0x1 = 0x67,0x2 0068 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0069 00db | | Load_Top At_Offset_3 006a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 006b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 006c 0000 0000 | | .BLANK 0000[0x4] 0070 ; -------------------------------------------------------------------------------------- 0070 ; SUBPROGRAM 0070 ; -------------------------------------------------------------------------------------- 0070 0075 | u | .CONST 0x0075 ; Address of begin 0071 0004 | | .CONST 0x0004 ; Address of exception handler 0072 0002 | | .CONST 0x0002 ; Number of locals 0073 INIT_0070: 0073 e21b | | Load 0x1,0x1b ; Debug Table 0x5 = .DEBUG 0x0073,0x021e,0x1001,0x0000,0x0036,0x0794,0x0000,0x0061 ; Debug Table 0x5.0x0 = 0x73,0xffff 0074 0322 | " | Declare_Variable Record 0075 BODY_0070: 0075 e220 | | Load 0x1,0x20 ; Debug Table 0x5.0x1 = 0x75,0x1 ; Debug Table 0x5.0x2 = 0x75,0x401 0076 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0077 e5fe | | Load 0x2,-0x2 0078 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0079 e220 | | Load 0x1,0x20 ; Debug Table 0x5.0x3 = 0x79,0x402 007a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 007b e5fe | | Load 0x2,-0x2 007c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 007d 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x4 = 0x7d,0x2 007e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x5 = 0x7e,0x801 007f 00da | | Load_Top At_Offset_2 0080 017d | } | Execute Record,Structure_Write 0081 00d1 | | Pop_Control Pop_Count_1 0082 782f |x/ | Jump 0xb2 0083 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x6 = 0x83,0x4 0084 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x7 = 0x84,0xc01 0085 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0086 e220 | | Load 0x1,0x20 0087 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0088 e20f | | Load 0x1,0xf 0089 0119 | | Execute Any,Check_In_Formal_Type 008a 00d0 | | Action Swap_Control 008b 00d1 | | Pop_Control Pop_Count_1 008c e20f | | Load 0x1,0xf ; Debug Table 0x5.0x8 = 0x8c,0x4 008d 0119 | | Execute Any,Check_In_Formal_Type 008e e221 | ! | Load 0x1,0x21 ; Debug Table 0x5.0x9 = 0x8e,0xefff 008f e220 | | Load 0x1,0x20 0090 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0091 00da | | Load_Top At_Offset_2 0092 e20f | | Load 0x1,0xf 0093 0119 | | Execute Any,Check_In_Formal_Type 0094 e220 | | Load 0x1,0x20 0095 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0096 0039 | 9 | Store_Top Access,At_Offset_1 0097 e5fe | | Load 0x2,-0x2 ; Debug Table 0x5.0xa = 0x97,0x1001 0098 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0xb = 0x98,0x1401 0099 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 009a e220 | | Load 0x1,0x20 009b 1814 | | Execute Package,Field_Execute,Field_Number 0x14 009c 00d0 | | Action Swap_Control 009d 00d1 | | Pop_Control Pop_Count_1 009e 6804 |h | Jump_Zero 0xa3 ; Debug Table 0x5.0xc = 0x9e,0x1001 009f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0xd = 0x9f,0x1002 00a0 e5fe | | Load 0x2,-0x2 00a1 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00a2 7805 |x | Jump 0xa8 00a3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0xe = 0xa3,0x1003 00a4 e5fe | | Load 0x2,-0x2 00a5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00a6 e220 | | Load 0x1,0x20 00a7 1817 | | Execute Package,Field_Execute,Field_Number 0x17 00a8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0xf = 0xa8,0x1004 00a9 e5fe | | Load 0x2,-0x2 00aa 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00ab 00d2 | | Pop_Control Pop_Count_2 00ac 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x10 = 0xac,0x5 ; Debug Table 0x5.0x11 = 0xac,0x1801 00ad 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00ae e220 | | Load 0x1,0x20 00af 1816 | | Execute Package,Field_Execute,Field_Number 0x16 00b0 00d9 | | Load_Top At_Offset_1 00b1 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00b2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x12 = 0xb2,0x3 00b3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x13 = 0xb3,0x1c01 00b4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00b5 e220 | | Load 0x1,0x20 00b6 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00b7 00d0 | | Action Swap_Control 00b8 00d1 | | Pop_Control Pop_Count_1 00b9 6fc9 |o | Jump_Zero 0x83 ; Debug Table 0x5.0x14 = 0xb9,0x3 00ba 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00bb 0000 0000 | | .BLANK 0000[0x5] 00c0 ; -------------------------------------------------------------------------------------- 00c0 ; SUBPROGRAM 00c0 ; -------------------------------------------------------------------------------------- 00c0 00cc | | .CONST 0x00cc ; Address of begin 00c1 0004 | | .CONST 0x0004 ; Address of exception handler 00c2 0002 | | .CONST 0x0002 ; Number of locals 00c3 INIT_00c0: 00c3 e221 | ! | Load 0x1,0x21 ; Debug Table 0x6 = .DEBUG 0x00c3,0x024a,0x1001,0x0000,0x0036,0x0794,0x0000,0x006d ; Debug Table 0x6.0x0 = 0xc3,0xffff 00c4 e220 | | Load 0x1,0x20 00c5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00c6 e5ff | | Load 0x2,-0x1 00c7 e20f | | Load 0x1,0xf 00c8 0119 | | Execute Any,Check_In_Formal_Type 00c9 e220 | | Load 0x1,0x20 00ca 1812 | | Execute Package,Field_Execute,Field_Number 0x12 00cb 0039 | 9 | Store_Top Access,At_Offset_1 00cc BODY_00c0: 00cc e5fe | | Load 0x2,-0x2 ; Debug Table 0x6.0x1 = 0xcc,0x1 00cd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x2 = 0xcd,0x401 00ce 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00cf e220 | | Load 0x1,0x20 00d0 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00d1 00d0 | | Action Swap_Control 00d2 00d1 | | Pop_Control Pop_Count_1 00d3 6804 |h | Jump_Zero 0xd8 ; Debug Table 0x6.0x3 = 0xd3,0x1 00d4 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x4 = 0xd4,0x2 00d5 e5fe | | Load 0x2,-0x2 00d6 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00d7 7805 |x | Jump 0xdd 00d8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x5 = 0xd8,0x3 00d9 e5fe | | Load 0x2,-0x2 00da 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00db e220 | | Load 0x1,0x20 00dc 1817 | | Execute Package,Field_Execute,Field_Number 0x17 00dd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x6 = 0xdd,0x4 00de e5fe | | Load 0x2,-0x2 00df 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00e0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00e1 0000 0000 | | .BLANK 0000[0x7] 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; SUBPROGRAM 00e8 ; -------------------------------------------------------------------------------------- 00e8 00ef | | .CONST 0x00ef ; Address of begin 00e9 0004 | | .CONST 0x0004 ; Address of exception handler 00ea 0002 | | .CONST 0x0002 ; Number of locals 00eb INIT_00e8: 00eb e221 | ! | Load 0x1,0x21 ; Debug Table 0x7 = .DEBUG 0x00eb,0x025a,0x1001,0x0000,0x0036,0x0794,0x0000,0x0079 ; Debug Table 0x7.0x0 = 0xeb,0xffff 00ec 00db | | Load_Top At_Offset_3 00ed 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00ee 0039 | 9 | Store_Top Access,At_Offset_1 00ef BODY_00e8: 00ef 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x1 = 0xef,0x1 00f0 e220 | | Load 0x1,0x20 00f1 1816 | | Execute Package,Field_Execute,Field_Number 0x16 00f2 e5ff | | Load 0x2,-0x1 00f3 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00f4 e220 | | Load 0x1,0x20 ; Debug Table 0x7.0x2 = 0xf4,0x2 00f5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00f6 00d9 | | Load_Top At_Offset_1 00f7 e220 | | Load 0x1,0x20 00f8 1817 | | Execute Package,Field_Execute,Field_Number 0x17 00f9 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x3 = 0xf9,0x3 00fa 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00fb e220 | | Load 0x1,0x20 00fc 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00fd 6804 |h | Jump_Zero 0x102 00fe 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x4 = 0xfe,0x4 00ff 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0100 e5ff | | Load 0x2,-0x1 0101 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0102 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0103 0000 0000 | | .BLANK 0000[0x5] 0108 ; -------------------------------------------------------------------------------------- 0108 ; SUBPROGRAM 0108 ; -------------------------------------------------------------------------------------- 0108 010b | | .CONST 0x010b ; Address of begin 0109 0004 | | .CONST 0x0004 ; Address of exception handler 010a 0001 | | .CONST 0x0001 ; Number of locals 010b BODY_0108: 010b INIT_0108: 010b 00da | | Load_Top At_Offset_2 ; Debug Table 0x8 = .DEBUG 0x010b,0x0266,0x1002,0x0000,0x0036,0x0794,0x0000,0x0081 ; Debug Table 0x8.0x0 = 0x10b,0x1 010c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 010d e220 | | Load 0x1,0x20 010e 1815 | | Execute Package,Field_Execute,Field_Number 0x15 010f e20f | | Load 0x1,0xf 0110 0119 | | Execute Any,Check_In_Formal_Type 0111 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0112 0000 0000 | | .BLANK 0000[0x6] 0118 ; -------------------------------------------------------------------------------------- 0118 ; SUBPROGRAM 0118 ; -------------------------------------------------------------------------------------- 0118 011b | | .CONST 0x011b ; Address of begin 0119 0004 | | .CONST 0x0004 ; Address of exception handler 011a 0001 | | .CONST 0x0001 ; Number of locals 011b BODY_0118: 011b INIT_0118: 011b 00da | | Load_Top At_Offset_2 ; Debug Table 0x9 = .DEBUG 0x011b,0x026a,0x1001,0x0000,0x0036,0x0794,0x0000,0x008e ; Debug Table 0x9.0x0 = 0x11b,0x1 011c e5fe | | Load 0x2,-0x2 011d 017d | } | Execute Record,Structure_Write 011e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 011f 0000 | | .XXX[0x1] 0120 ; -------------------------------------------------------------------------------------- 0120 ; SUBPROGRAM 0120 ; -------------------------------------------------------------------------------------- 0120 0123 | # | .CONST 0x0123 ; Address of begin 0121 0004 | | .CONST 0x0004 ; Address of exception handler 0122 0001 | | .CONST 0x0001 ; Number of locals 0123 BODY_0120: 0123 INIT_0120: 0123 00da | | Load_Top At_Offset_2 ; Debug Table 0xa = .DEBUG 0x0123,0x026e,0x1001,0x0000,0x0036,0x0794,0x0000,0x009a ; Debug Table 0xa.0x0 = 0x123,0x1 0124 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0125 e220 | | Load 0x1,0x20 0126 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0127 00db | | Load_Top At_Offset_3 0128 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0129 4501 |E | Exit_Suprogram New_Top_Offset 0x1 012a 0000 0000 | | .BLANK 0000[0x6] 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 0133 | 3 | .CONST 0x0133 ; Address of begin 0131 0004 | | .CONST 0x0004 ; Address of exception handler 0132 0001 | | .CONST 0x0001 ; Number of locals 0133 BODY_0130: 0133 INIT_0130: 0133 00da | | Load_Top At_Offset_2 ; Debug Table 0xb = .DEBUG 0x0133,0x0272,0x1002,0x0000,0x0036,0x0794,0x0000,0x00a2 ; Debug Table 0xb.0x0 = 0x133,0x1 0134 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0135 e220 | | Load 0x1,0x20 0136 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0137 e20f | | Load 0x1,0xf 0138 0119 | | Execute Any,Check_In_Formal_Type 0139 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 013a 0000 0000 | | .BLANK 0000[0x6] 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 00da | | Load_Top At_Offset_2 ; Debug Table 0xc = .DEBUG 0x0143,0x0276,0x1002,0x0000,0x0036,0x0794,0x0000,0x00ab ; Debug Table 0xc.0x0 = 0x143,0x1 0144 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0145 e220 | | Load 0x1,0x20 0146 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0147 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0148 0000 0000 | | .LITERAL {0x00000000, 0x00360794} 014c 0000 0000 | | .BLANK 0000[0x4] 0150 ; -------------------------------------------------------------------------------------- 0150 ; Debug Table 0150 ; -------------------------------------------------------------------------------------- 0150 0003 000d | | .CONST 0x0003,0x000d 0152 000b 01ba | | .DEBUG 0x000b,0x01ba,0xc000,0x0000,0x0036,0x0794,0x0000,0x0007 015a 0038 01f2 | 8 | .DEBUG 0x0038,0x01f2,0xc000,0x0000,0x0036,0x0a04,0x0000,0x0003 0162 0053 0210 | S | .DEBUG 0x0053,0x0210,0x1001,0x0000,0x0036,0x0794,0x0000,0x0048 016a 005b 0214 | [ | .DEBUG 0x005b,0x0214,0x1002,0x0000,0x0036,0x0794,0x0000,0x0050 0172 0063 0218 | c | .DEBUG 0x0063,0x0218,0x1001,0x0000,0x0036,0x0794,0x0000,0x0059 017a 0073 021e | s | .DEBUG 0x0073,0x021e,0x1001,0x0000,0x0036,0x0794,0x0000,0x0061 0182 00c3 024a | J| .DEBUG 0x00c3,0x024a,0x1001,0x0000,0x0036,0x0794,0x0000,0x006d 018a 00eb 025a | Z| .DEBUG 0x00eb,0x025a,0x1001,0x0000,0x0036,0x0794,0x0000,0x0079 0192 010b 0266 | f| .DEBUG 0x010b,0x0266,0x1002,0x0000,0x0036,0x0794,0x0000,0x0081 019a 011b 026a | j| .DEBUG 0x011b,0x026a,0x1001,0x0000,0x0036,0x0794,0x0000,0x008e 01a2 0123 026e | # n| .DEBUG 0x0123,0x026e,0x1001,0x0000,0x0036,0x0794,0x0000,0x009a 01aa 0133 0272 | 3 r| .DEBUG 0x0133,0x0272,0x1002,0x0000,0x0036,0x0794,0x0000,0x00a2 01b2 0143 0276 | C v| .DEBUG 0x0143,0x0276,0x1002,0x0000,0x0036,0x0794,0x0000,0x00ab 01ba ; -------------------------------------------------------------------------------------- 01ba ; Debug3 Subtable 0x0 01ba ; -------------------------------------------------------------------------------------- 01ba 001b 0000 | | .DBG3TAB 0x001b,0x0000 01bc 000b ffff | | .CONST 0x000b,0xffff 01be 000b fffe | | .CONST 0x000b,0xfffe 01c0 000b fffd | | .CONST 0x000b,0xfffd 01c2 000d fffc | | .CONST 0x000d,0xfffc 01c4 000f fffb | | .CONST 0x000f,0xfffb 01c6 0011 fffa | | .CONST 0x0011,0xfffa 01c8 0013 fff9 | | .CONST 0x0013,0xfff9 01ca 0015 fff8 | | .CONST 0x0015,0xfff8 01cc 0017 fff7 | | .CONST 0x0017,0xfff7 01ce 0019 fff6 | | .CONST 0x0019,0xfff6 01d0 001b fff5 | | .CONST 0x001b,0xfff5 01d2 001d fff4 | | .CONST 0x001d,0xfff4 01d4 001f fff3 | | .CONST 0x001f,0xfff3 01d6 0021 fff2 | ! | .CONST 0x0021,0xfff2 01d8 0023 fff1 | # | .CONST 0x0023,0xfff1 01da 0025 fff0 | % | .CONST 0x0025,0xfff0 01dc 0025 ffef | % | .CONST 0x0025,0xffef 01de 0025 ffee | % | .CONST 0x0025,0xffee 01e0 0025 ffed | % | .CONST 0x0025,0xffed 01e2 0025 ffec | % | .CONST 0x0025,0xffec 01e4 0025 ffeb | % | .CONST 0x0025,0xffeb 01e6 0025 ffea | % | .CONST 0x0025,0xffea 01e8 0025 ffe9 | % | .CONST 0x0025,0xffe9 01ea 0025 ffe8 | % | .CONST 0x0025,0xffe8 01ec 002d ffe7 | - | .CONST 0x002d,0xffe7 01ee 002f ffe6 | / | .CONST 0x002f,0xffe6 01f0 0034 ffe5 | 4 | .CONST 0x0034,0xffe5 01f2 ; -------------------------------------------------------------------------------------- 01f2 ; Debug3 Subtable 0x1 01f2 ; -------------------------------------------------------------------------------------- 01f2 000e 0000 | | .DBG3TAB 0x000e,0x0000 01f4 0038 ffff | 8 | .CONST 0x0038,0xffff 01f6 0038 fffe | 8 | .CONST 0x0038,0xfffe 01f8 003a fffd | : | .CONST 0x003a,0xfffd 01fa 003c fffc | < | .CONST 0x003c,0xfffc 01fc 003e fffb | > | .CONST 0x003e,0xfffb 01fe 0040 fffa | @ | .CONST 0x0040,0xfffa 0200 0042 fff9 | B | .CONST 0x0042,0xfff9 0202 0042 fff8 | B | .CONST 0x0042,0xfff8 0204 0044 fff7 | D | .CONST 0x0044,0xfff7 0206 0044 fff6 | D | .CONST 0x0044,0xfff6 0208 0046 fff5 | F | .CONST 0x0046,0xfff5 020a 0048 fff4 | H | .CONST 0x0048,0xfff4 020c 004a fff3 | J | .CONST 0x004a,0xfff3 020e 004c fff2 | L | .CONST 0x004c,0xfff2 0210 ; -------------------------------------------------------------------------------------- 0210 ; Debug3 Subtable 0x2 0210 ; -------------------------------------------------------------------------------------- 0210 0000 0001 | | .DBG3TAB 0x0000,0x0001 0212 0053 0001 | S | .CONST 0x0053,0x0001 0214 ; -------------------------------------------------------------------------------------- 0214 ; Debug3 Subtable 0x3 0214 ; -------------------------------------------------------------------------------------- 0214 0000 0001 | | .DBG3TAB 0x0000,0x0001 0216 005b 0001 | [ | .CONST 0x005b,0x0001 0218 ; -------------------------------------------------------------------------------------- 0218 ; Debug3 Subtable 0x4 0218 ; -------------------------------------------------------------------------------------- 0218 0000 0002 | | .DBG3TAB 0x0000,0x0002 021a 0063 0001 | c | .CONST 0x0063,0x0001 021c 0067 0002 | g | .CONST 0x0067,0x0002 021e ; -------------------------------------------------------------------------------------- 021e ; Debug3 Subtable 0x5 021e ; -------------------------------------------------------------------------------------- 021e 0002 0013 | | .DBG3TAB 0x0002,0x0013 0220 0073 ffff | s | .CONST 0x0073,0xffff 0222 0075 0001 | u | .CONST 0x0075,0x0001 0224 0075 0401 | u | .CONST 0x0075,0x0401 0226 0079 0402 | y | .CONST 0x0079,0x0402 0228 007d 0002 | } | .CONST 0x007d,0x0002 022a 007e 0801 | ~ | .CONST 0x007e,0x0801 022c 0083 0004 | | .CONST 0x0083,0x0004 022e 0084 0c01 | | .CONST 0x0084,0x0c01 0230 008c 0004 | | .CONST 0x008c,0x0004 0232 008e efff | | .CONST 0x008e,0xefff 0234 0097 1001 | | .CONST 0x0097,0x1001 0236 0098 1401 | | .CONST 0x0098,0x1401 0238 009e 1001 | | .CONST 0x009e,0x1001 023a 009f 1002 | | .CONST 0x009f,0x1002 023c 00a3 1003 | | .CONST 0x00a3,0x1003 023e 00a8 1004 | | .CONST 0x00a8,0x1004 0240 00ac 0005 | | .CONST 0x00ac,0x0005 0242 00ac 1801 | | .CONST 0x00ac,0x1801 0244 00b2 0003 | | .CONST 0x00b2,0x0003 0246 00b3 1c01 | | .CONST 0x00b3,0x1c01 0248 00b9 0003 | | .CONST 0x00b9,0x0003 024a ; -------------------------------------------------------------------------------------- 024a ; Debug3 Subtable 0x6 024a ; -------------------------------------------------------------------------------------- 024a 0001 0006 | | .DBG3TAB 0x0001,0x0006 024c 00c3 ffff | | .CONST 0x00c3,0xffff 024e 00cc 0001 | | .CONST 0x00cc,0x0001 0250 00cd 0401 | | .CONST 0x00cd,0x0401 0252 00d3 0001 | | .CONST 0x00d3,0x0001 0254 00d4 0002 | | .CONST 0x00d4,0x0002 0256 00d8 0003 | | .CONST 0x00d8,0x0003 0258 00dd 0004 | | .CONST 0x00dd,0x0004 025a ; -------------------------------------------------------------------------------------- 025a ; Debug3 Subtable 0x7 025a ; -------------------------------------------------------------------------------------- 025a 0001 0004 | | .DBG3TAB 0x0001,0x0004 025c 00eb ffff | | .CONST 0x00eb,0xffff 025e 00ef 0001 | | .CONST 0x00ef,0x0001 0260 00f4 0002 | | .CONST 0x00f4,0x0002 0262 00f9 0003 | | .CONST 0x00f9,0x0003 0264 00fe 0004 | | .CONST 0x00fe,0x0004 0266 ; -------------------------------------------------------------------------------------- 0266 ; Debug3 Subtable 0x8 0266 ; -------------------------------------------------------------------------------------- 0266 0000 0001 | | .DBG3TAB 0x0000,0x0001 0268 010b 0001 | | .CONST 0x010b,0x0001 026a ; -------------------------------------------------------------------------------------- 026a ; Debug3 Subtable 0x9 026a ; -------------------------------------------------------------------------------------- 026a 0000 0001 | | .DBG3TAB 0x0000,0x0001 026c 011b 0001 | | .CONST 0x011b,0x0001 026e ; -------------------------------------------------------------------------------------- 026e ; Debug3 Subtable 0xa 026e ; -------------------------------------------------------------------------------------- 026e 0000 0001 | | .DBG3TAB 0x0000,0x0001 0270 0123 0001 | # | .CONST 0x0123,0x0001 0272 ; -------------------------------------------------------------------------------------- 0272 ; Debug3 Subtable 0xb 0272 ; -------------------------------------------------------------------------------------- 0272 0000 0001 | | .DBG3TAB 0x0000,0x0001 0274 0133 0001 | 3 | .CONST 0x0133,0x0001 0276 ; -------------------------------------------------------------------------------------- 0276 ; Debug3 Subtable 0xc 0276 ; -------------------------------------------------------------------------------------- 0276 0000 0001 | | .DBG3TAB 0x0000,0x0001 0278 0143 0001 | C | .CONST 0x0143,0x0001 027a 0000 0000 | | .BLANK 0000[0x186]