|
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, 5811_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0198 | | .CONST 0x0198 ; 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 0079 | y | .CONST 0x0079 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 001f | | .CONST 0x001f ; Number of locals 000b INIT_0008: 000b 029a 0083 | | Declare_Subprogram INIT_0080,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x0222,0x8000,0x0000,0x0037,0xc634,0x0000,0x000b ; Debug Table 0x0.0x0 = 0xb,0xffff 000d 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe 000f 029a 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xf,0xfffd 0011 029a 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x11,0xfffc 0013 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x4 = 0x13,0xfffb 0014 4802 |H | Short_Literal 0x2 0015 4820 |H | Short_Literal 0x20 0016 026d | m | Execute Discrete,Exponentiate 0017 0aff | | Execute_Immediate Plus,-0x1 0018 00e5 | | Load_Encached Long_Integer_Cache 0019 03f9 | | Declare_Type Discrete,Constrained,Visible 001a 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x0.0x5 = 0x1a,0xfffa 001b e211 | | Load 0x1,0x11 001c 00e4 | | Load_Encached Positive_Cache 001d 00e2 | | Load_Encached Integer_Cache 001e 02a0 | | Declare_Subprogram Null_Subprogram 001f 4804 |H | Short_Literal 0x4 0020 032e | . | Declare_Type Record,Defined,Visible 0021 e212 | | Load 0x1,0x12 ; Debug Table 0x0.0x6 = 0x21,0xfff9 0022 0322 | " | Declare_Variable Record 0023 4800 |H | Short_Literal 0x0 0024 e213 | | Load 0x1,0x13 0025 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0026 4800 |H | Short_Literal 0x0 0027 e213 | | Load 0x1,0x13 0028 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0029 614e |aN | Indirect_Literal Discrete,0x178,{0x00000000, 0x7fffffff} 002a e213 | | Load 0x1,0x13 002b 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 002c 4800 |H | Short_Literal 0x0 002d e213 | | Load 0x1,0x13 002e 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 002f 0129 | ) | Execute Any,Make_Visible 0030 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x30,0xfff8 0032 029a 00e3 | | Declare_Subprogram INIT_00e0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x32,0xfff7 0034 029a 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x34,0xfff6 0036 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xa = 0x36,0xfff5 0038 0007 | | Action Break_Optional ; Debug Table 0x0.0xb = 0x38,0xfff4 0039 029a 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xc = 0x39,0xfff3 003b 029a 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xd = 0x3b,0xfff2 003d 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xe = 0x3d,0xfff1 003f e001 | | Load 0x0,0x1 ; Debug Table 0x0.0xf = 0x3f,0xfff0 0040 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0041 0129 | ) | Execute Any,Make_Visible 0042 4808 |H | Short_Literal 0x8 ; Debug Table 0x0.0x10 = 0x42,0xffef 0043 6130 |a0 | Indirect_Literal Discrete,0x174,{0x0019f413, 0x00001830} 0044 02a0 | | Declare_Subprogram Null_Subprogram 0045 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated 0046 0007 | | Action Break_Optional ; Debug Table 0x0.0x11 = 0x46,0xffee 0047 0007 | | Action Break_Optional ; Debug Table 0x0.0x12 = 0x47,0xffed 0048 0007 | | Action Break_Optional ; Debug Table 0x0.0x13 = 0x48,0xffec 0049 0007 | | Action Break_Optional ; Debug Table 0x0.0x14 = 0x49,0xffeb 004a 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x15 = 0x4a,0xffea 004b e21b | | Load 0x1,0x1b 004c 03f1 | | Declare_Variable Discrete,With_Value 004d 00bf | | Action Accept_Activation 004e 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x004e,0x0250,0x8000,0x0000,0x0037,0xc6b4,0x0000,0x000f ; Debug Table 0x1.0x0 = 0x4e,0xffff 004f 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x4f,0xfffd 0050 611f |a | Indirect_Literal Discrete,0x170,{0x00000000, 0x0037c6b4} ; Debug Table 0x1.0x2 = 0x50,0xfffc 0051 4893 |H | Short_Literal 0x93 0052 e21b | | Load 0x1,0x1b 0053 e21d | | Load 0x1,0x1d 0054 e002 | | Load 0x0,0x2 0055 1b4c | L | Execute Package,Field_Read,Field_Number 0x4c 0056 0387 | | Declare_Variable Package 0057 00d8 | | Load_Top At_Offset_0 0058 020f | | Execute Module,Activate 0059 029d 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call ; Debug Table 0x1.0x3 = 0x59,0xfffb 005b 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x4 = 0x5b,0xfffa 005c 00c7 | | Action Elaborate_Subprogram 005d 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x5 = 0x5d,0xfff9 005e 00c7 | | Action Elaborate_Subprogram 005f 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x6 = 0x5f,0xfff8 0060 00c7 | | Action Elaborate_Subprogram 0061 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x7 = 0x61,0xfff7 0062 00c7 | | Action Elaborate_Subprogram 0063 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x8 = 0x63,0xfff6 0064 00c7 | | Action Elaborate_Subprogram 0065 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x9 = 0x65,0xfff5 0066 00c7 | | Action Elaborate_Subprogram 0067 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0xa = 0x67,0xfff4 0068 00c7 | | Action Elaborate_Subprogram 0069 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0xb = 0x69,0xfff3 006a 00c7 | | Action Elaborate_Subprogram 006b 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0xc = 0x6b,0xfff2 006c 00c7 | | Action Elaborate_Subprogram 006d 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0xd = 0x6d,0xfff1 006e 00c7 | | Action Elaborate_Subprogram 006f 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0xe = 0x6f,0xfff0 0070 00c7 | | Action Elaborate_Subprogram 0071 e003 | | Load 0x0,0x3 ; Debug Table 0x1.0xf = 0x71,0xffef 0072 e002 | | Load 0x0,0x2 0073 e21e | | Load 0x1,0x1e 0074 4803 |H | Short_Literal 0x3 0075 e21c | | Load 0x1,0x1c 0076 020e | | Execute Module,Augment_Imports 0077 e21c | | Load 0x1,0x1c 0078 020d | | Execute Module,Elaborate 0079 BODY_0008: 0079 00bc | | Action Signal_Activated 007a 00bb | | Action Signal_Completion 007b 0000 0000 | | .BLANK 0000[0x5] 0080 ; -------------------------------------------------------------------------------------- 0080 ; SUBPROGRAM 0080 ; -------------------------------------------------------------------------------------- 0080 0083 | | .CONST 0x0083 ; Address of begin 0081 0004 | | .CONST 0x0004 ; Address of exception handler 0082 0001 | | .CONST 0x0001 ; Number of locals 0083 BODY_0080: 0083 INIT_0080: 0083 e5fe | | Load 0x2,-0x2 ; Debug Table 0x2 = .DEBUG 0x0083,0x0272,0x0002,0x0000,0x0037,0xc634,0x0000,0x000c ; Debug Table 0x2.0x0 = 0x83,0x1 0084 e5ff | | Load 0x2,-0x1 0085 821f | | Call 0x1,0x1f 0086 e004 | | Load 0x0,0x4 0087 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0088 00d8 | | Load_Top At_Offset_0 0089 e004 | | Load 0x0,0x4 008a 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 008b 7003 |p | Jump_Nonzero 0x8f 008c e001 | | Load 0x0,0x1 008d 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27 008e 0257 | W | Execute Discrete,Raise 008f 180f | | Execute Package,Field_Execute,Field_Number 0xf 0090 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0091 0000 0000 | | .BLANK 0000[0x7] 0098 ; -------------------------------------------------------------------------------------- 0098 ; SUBPROGRAM 0098 ; -------------------------------------------------------------------------------------- 0098 009b | | .CONST 0x009b ; Address of begin 0099 0004 | | .CONST 0x0004 ; Address of exception handler 009a 0001 | | .CONST 0x0001 ; Number of locals 009b BODY_0098: 009b INIT_0098: 009b e5ff | | Load 0x2,-0x1 ; Debug Table 0x3 = .DEBUG 0x009b,0x0276,0x0002,0x0000,0x0037,0xc634,0x0000,0x001c ; Debug Table 0x3.0x0 = 0x9b,0x1 009c 821f | | Call 0x1,0x1f 009d e004 | | Load 0x0,0x4 009e 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 009f 00d8 | | Load_Top At_Offset_0 00a0 e004 | | Load 0x0,0x4 00a1 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 00a2 7003 |p | Jump_Nonzero 0xa6 00a3 e001 | | Load 0x0,0x1 00a4 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27 00a5 0257 | W | Execute Discrete,Raise 00a6 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00a7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00a8 ; -------------------------------------------------------------------------------------- 00a8 ; SUBPROGRAM 00a8 ; -------------------------------------------------------------------------------------- 00a8 00ab | | .CONST 0x00ab ; Address of begin 00a9 0004 | | .CONST 0x0004 ; Address of exception handler 00aa 0001 | | .CONST 0x0001 ; Number of locals 00ab BODY_00a8: 00ab INIT_00a8: 00ab e5ff | | Load 0x2,-0x1 ; Debug Table 0x4 = .DEBUG 0x00ab,0x027a,0x0002,0x0000,0x0037,0xc634,0x0000,0x0027 ; Debug Table 0x4.0x0 = 0xab,0x1 00ac 821f | | Call 0x1,0x1f 00ad e004 | | Load 0x0,0x4 00ae 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 00af 00d8 | | Load_Top At_Offset_0 00b0 e004 | | Load 0x0,0x4 00b1 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 00b2 7003 |p | Jump_Nonzero 0xb6 00b3 e001 | | Load 0x0,0x1 00b4 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27 00b5 0257 | W | Execute Discrete,Raise 00b6 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00b7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00b8 ; -------------------------------------------------------------------------------------- 00b8 ; SUBPROGRAM 00b8 ; -------------------------------------------------------------------------------------- 00b8 00bb | | .CONST 0x00bb ; Address of begin 00b9 0004 | | .CONST 0x0004 ; Address of exception handler 00ba 0001 | | .CONST 0x0001 ; Number of locals 00bb BODY_00b8: 00bb INIT_00b8: 00bb e5ff | | Load 0x2,-0x1 ; Debug Table 0x5 = .DEBUG 0x00bb,0x027e,0x0002,0x0000,0x0037,0xc634,0x0000,0x0032 ; Debug Table 0x5.0x0 = 0xbb,0x1 00bc 821f | | Call 0x1,0x1f 00bd e004 | | Load 0x0,0x4 00be 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 00bf 00d8 | | Load_Top At_Offset_0 00c0 e004 | | Load 0x0,0x4 00c1 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 00c2 7003 |p | Jump_Nonzero 0xc6 00c3 e001 | | Load 0x0,0x1 00c4 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27 00c5 0257 | W | Execute Discrete,Raise 00c6 1812 | | Execute Package,Field_Execute,Field_Number 0x12 00c7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; SUBPROGRAM 00c8 ; -------------------------------------------------------------------------------------- 00c8 00cb | | .CONST 0x00cb ; Address of begin 00c9 0004 | | .CONST 0x0004 ; Address of exception handler 00ca 0001 | | .CONST 0x0001 ; Number of locals 00cb BODY_00c8: 00cb INIT_00c8: 00cb e5fc | | Load 0x2,-0x4 ; Debug Table 0x6 = .DEBUG 0x00cb,0x0282,0x0001,0x0000,0x0037,0xc634,0x0000,0x0080 ; Debug Table 0x6.0x0 = 0xcb,0x1 00cc 00e1 | | Load_Encached Boolean_Cache 00cd 00e1 | | Load_Encached Boolean_Cache 00ce e5ff | | Load 0x2,-0x1 00cf 821f | | Call 0x1,0x1f 00d0 e004 | | Load 0x0,0x4 00d1 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 00d2 00d8 | | Load_Top At_Offset_0 00d3 e004 | | Load 0x0,0x4 00d4 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 00d5 7003 |p | Jump_Nonzero 0xd9 00d6 e001 | | Load 0x0,0x1 00d7 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27 00d8 0257 | W | Execute Discrete,Raise 00d9 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00da c5fe | | Store 0x2,-0x2 00db c5fd | | Store 0x2,-0x3 00dc 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00dd 0000 0000 | | .XXX[0x3] 00df 0000 | | 00e0 ; -------------------------------------------------------------------------------------- 00e0 ; SUBPROGRAM 00e0 ; -------------------------------------------------------------------------------------- 00e0 00e3 | | .CONST 0x00e3 ; Address of begin 00e1 0004 | | .CONST 0x0004 ; Address of exception handler 00e2 0001 | | .CONST 0x0001 ; Number of locals 00e3 BODY_00e0: 00e3 INIT_00e0: 00e3 e5ff | | Load 0x2,-0x1 ; Debug Table 0x7 = .DEBUG 0x00e3,0x0286,0x0002,0x0000,0x0037,0xc634,0x0000,0x0096 ; Debug Table 0x7.0x0 = 0xe3,0x1 00e4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00e5 e5fe | | Load 0x2,-0x2 00e6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00e7 027f | | Execute Discrete,Equal 00e8 680c |h | Jump_Zero 0xf5 00e9 e5ff | | Load 0x2,-0x1 00ea 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00eb e5fe | | Load 0x2,-0x2 00ec 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00ed 027f | | Execute Discrete,Equal 00ee 6806 |h | Jump_Zero 0xf5 00ef e5ff | | Load 0x2,-0x1 00f0 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 00f1 e5fe | | Load 0x2,-0x2 00f2 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 00f3 027f | | Execute Discrete,Equal 00f4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00f5 4800 |H | Short_Literal 0x0 00f6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00f7 0000 | | .XXX[0x1] 00f8 ; -------------------------------------------------------------------------------------- 00f8 ; SUBPROGRAM 00f8 ; -------------------------------------------------------------------------------------- 00f8 00fb | | .CONST 0x00fb ; Address of begin 00f9 0004 | | .CONST 0x0004 ; Address of exception handler 00fa 0001 | | .CONST 0x0001 ; Number of locals 00fb BODY_00f8: 00fb INIT_00f8: 00fb e5ff | | Load 0x2,-0x1 ; Debug Table 0x8 = .DEBUG 0x00fb,0x028a,0x0002,0x0000,0x0037,0xc634,0x0000,0x00a0 ; Debug Table 0x8.0x0 = 0xfb,0x1 00fc 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00fd e5fe | | Load 0x2,-0x2 00fe 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00ff 027f | | Execute Discrete,Equal 0100 6812 |h | Jump_Zero 0x113 0101 e5ff | | Load 0x2,-0x1 0102 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0103 e5fe | | Load 0x2,-0x2 0104 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0105 027f | | Execute Discrete,Equal 0106 680c |h | Jump_Zero 0x113 0107 e5ff | | Load 0x2,-0x1 0108 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0109 e5fe | | Load 0x2,-0x2 010a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 010b 027f | | Execute Discrete,Equal 010c 6806 |h | Jump_Zero 0x113 010d e5ff | | Load 0x2,-0x1 010e 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 010f e5fe | | Load 0x2,-0x2 0110 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0111 027f | | Execute Discrete,Equal 0112 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0113 4800 |H | Short_Literal 0x0 0114 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0115 0000 0000 | | .XXX[0x3] 0117 0000 | | 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 e5ff | | Load 0x2,-0x1 ; Debug Table 0x9 = .DEBUG 0x011b,0x028e,0x0002,0x0000,0x0037,0xc634,0x0000,0x00aa ; Debug Table 0x9.0x0 = 0x11b,0x1 011c 821f | | Call 0x1,0x1f 011d e004 | | Load 0x0,0x4 011e 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 011f 00d8 | | Load_Top At_Offset_0 0120 e004 | | Load 0x0,0x4 0121 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 0122 7003 |p | Jump_Nonzero 0x126 0123 e001 | | Load 0x0,0x1 0124 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27 0125 0257 | W | Execute Discrete,Raise 0126 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0127 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0128 ; -------------------------------------------------------------------------------------- 0128 ; SUBPROGRAM 0128 ; -------------------------------------------------------------------------------------- 0128 012d | - | .CONST 0x012d ; Address of begin 0129 0004 | | .CONST 0x0004 ; Address of exception handler 012a 0002 | | .CONST 0x0002 ; Number of locals 012b INIT_0128: 012b e005 | | Load 0x0,0x5 ; Debug Table 0xa = .DEBUG 0x012b,0x0292,0x0001,0x0000,0x0037,0xc634,0x0000,0x00bb ; Debug Table 0xa.0x0 = 0x12b,0xffff 012c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 012d BODY_0128: 012d e006 | | Load 0x0,0x6 ; Debug Table 0xa.0x1 = 0x12d,0x1 012e 1b11 | | Execute Package,Field_Read,Field_Number 0x11 012f e006 | | Load 0x0,0x6 0130 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0131 00e3 | | Load_Encached Natural_Cache 0132 e005 | | Load 0x0,0x5 0133 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0134 e5ff | | Load 0x2,-0x1 0135 e005 | | Load 0x0,0x5 0136 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0137 c402 | | Store 0x2,0x2 0138 c5fd | | Store 0x2,-0x3 0139 c5fc | | Store 0x2,-0x4 013a c5fb | | Store 0x2,-0x5 013b e402 | | Load 0x2,0x2 ; Debug Table 0xa.0x2 = 0x13b,0x2 013c e211 | | Load 0x1,0x11 013d 025b | [ | Execute Discrete,Check_In_Type 013e a5fe | | Store_Unchecked 0x2,-0x2 013f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 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 e006 | | Load 0x0,0x6 ; Debug Table 0xb = .DEBUG 0x0143,0x029a,0x0001,0x0000,0x0037,0xc634,0x0000,0x00d9 ; Debug Table 0xb.0x0 = 0x143,0x1 0144 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0145 e006 | | Load 0x0,0x6 0146 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0147 e5fe | | Load 0x2,-0x2 0148 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0149 e5ff | | Load 0x2,-0x1 014a e005 | | Load 0x0,0x5 014b 1817 | | Execute Package,Field_Execute,Field_Number 0x17 014c c5fd | | Store 0x2,-0x3 014d c5fc | | Store 0x2,-0x4 014e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 014f 0000 | | .XXX[0x1] 0150 ; -------------------------------------------------------------------------------------- 0150 ; SUBPROGRAM 0150 ; -------------------------------------------------------------------------------------- 0150 0153 | S | .CONST 0x0153 ; Address of begin 0151 0004 | | .CONST 0x0004 ; Address of exception handler 0152 0001 | | .CONST 0x0001 ; Number of locals 0153 BODY_0150: 0153 INIT_0150: 0153 e006 | | Load 0x0,0x6 ; Debug Table 0xc = .DEBUG 0x0153,0x029e,0x0001,0x0000,0x0037,0xc634,0x0000,0x00f9 ; Debug Table 0xc.0x0 = 0x153,0x1 0154 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0155 e006 | | Load 0x0,0x6 0156 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0157 e5ff | | Load 0x2,-0x1 0158 e005 | | Load 0x0,0x5 0159 1819 | | Execute Package,Field_Execute,Field_Number 0x19 015a c5fe | | Store 0x2,-0x2 015b c5fd | | Store 0x2,-0x3 015c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 015d 0000 0000 | | .XXX[0x3] 015f 0000 | | 0160 ; -------------------------------------------------------------------------------------- 0160 ; SUBPROGRAM 0160 ; -------------------------------------------------------------------------------------- 0160 0163 | c | .CONST 0x0163 ; Address of begin 0161 016a | j | .CONST 0x016a ; Address of exception handler 0162 0001 | | .CONST 0x0001 ; Number of locals 0163 BODY_0160: 0163 INIT_0160: 0163 e003 | | Load 0x0,0x3 ; Debug Table 0xd = .DEBUG 0x0163,0x02a2,0x0002,0x0000,0x0037,0xc6b4,0x0000,0x009c ; Debug Table 0xd.0x0 = 0x163,0x1 0164 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0165 e002 | | Load 0x0,0x2 0166 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0167 e21e | | Load 0x1,0x1e 0168 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0169 00ca | | Action Exit_Nullary_Function 016a TRAP_0160: 016a 0007 | | Action Break_Optional 016b e21d | | Load 0x1,0x1d ; Debug Table 0xd.0x1 = 0x16b,0x2 016c 00ca | | Action Exit_Nullary_Function 016d 0000 0000 | | .XXX[0x3] 016f 0000 | | 0170 0000 0000 | | .LITERAL {0x00000000, 0x0037c6b4} 0174 0019 f413 | | .LITERAL {0x0019f413, 0x00001830} 0178 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 017c 0000 0000 | | .BLANK 0000[0x4] 0180 0186 0004 | | .XXX[0x3] 0182 0015 | | 0183 029c 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible ; Debug Table 0xe = .DEBUG 0x0183,0x02a8,0x4000,0x0000,0x0037,0xc634,0x0000,0x0112 ; Debug Table 0xe.0x0 = 0x183,0xffff 0185 00bf | | Action Accept_Activation ; Debug Table 0xe.0x1 = 0x185,0xfffe 0186 4800 |H | Short_Literal 0x0 ; Debug Table 0xf = .DEBUG 0x0186,0x02ae,0x4000,0x0000,0x0037,0xc6b4,0x0000,0x0254 ; Debug Table 0xf.0x0 = 0x186,0x1 0187 8215 | | Call 0x1,0x15 0188 e001 | | Load 0x0,0x1 0189 1811 | | Execute Package,Field_Execute,Field_Number 0x11 018a e002 | | Load 0x0,0x2 018b 1818 | | Execute Package,Field_Execute,Field_Number 0x18 018c e003 | | Load 0x0,0x3 018d 1814 | | Execute Package,Field_Execute,Field_Number 0x14 018e 00bc | | Action Signal_Activated 018f 00bb | | Action Signal_Completion 0190 ; -------------------------------------------------------------------------------------- 0190 ; SUBPROGRAM 0190 ; -------------------------------------------------------------------------------------- 0190 0193 | | .CONST 0x0193 ; Address of begin 0191 0004 | | .CONST 0x0004 ; Address of exception handler 0192 0001 | | .CONST 0x0001 ; Number of locals 0193 BODY_0190: 0193 INIT_0190: 0193 00b6 | | Action Make_Scope ; Debug Table 0x10 = .DEBUG 0x0193,0x02b2,0x1002,0x0000,0x0037,0xc634,0x0000,0x0173 0194 020a | | Execute Module,Get_Name 0195 00ca | | Action Exit_Nullary_Function 0196 0000 0000 | | .XXX[0x2] 0198 ; -------------------------------------------------------------------------------------- 0198 ; Debug Table 0198 ; -------------------------------------------------------------------------------------- 0198 0003 0011 | | .CONST 0x0003,0x0011 019a 000b 0222 | "| .DEBUG 0x000b,0x0222,0x8000,0x0000,0x0037,0xc634,0x0000,0x000b 01a2 004e 0250 | N P| .DEBUG 0x004e,0x0250,0x8000,0x0000,0x0037,0xc6b4,0x0000,0x000f 01aa 0083 0272 | r| .DEBUG 0x0083,0x0272,0x0002,0x0000,0x0037,0xc634,0x0000,0x000c 01b2 009b 0276 | v| .DEBUG 0x009b,0x0276,0x0002,0x0000,0x0037,0xc634,0x0000,0x001c 01ba 00ab 027a | z| .DEBUG 0x00ab,0x027a,0x0002,0x0000,0x0037,0xc634,0x0000,0x0027 01c2 00bb 027e | ~| .DEBUG 0x00bb,0x027e,0x0002,0x0000,0x0037,0xc634,0x0000,0x0032 01ca 00cb 0282 | | .DEBUG 0x00cb,0x0282,0x0001,0x0000,0x0037,0xc634,0x0000,0x0080 01d2 00e3 0286 | | .DEBUG 0x00e3,0x0286,0x0002,0x0000,0x0037,0xc634,0x0000,0x0096 01da 00fb 028a | | .DEBUG 0x00fb,0x028a,0x0002,0x0000,0x0037,0xc634,0x0000,0x00a0 01e2 011b 028e | | .DEBUG 0x011b,0x028e,0x0002,0x0000,0x0037,0xc634,0x0000,0x00aa 01ea 012b 0292 | + | .DEBUG 0x012b,0x0292,0x0001,0x0000,0x0037,0xc634,0x0000,0x00bb 01f2 0143 029a | C | .DEBUG 0x0143,0x029a,0x0001,0x0000,0x0037,0xc634,0x0000,0x00d9 01fa 0153 029e | S | .DEBUG 0x0153,0x029e,0x0001,0x0000,0x0037,0xc634,0x0000,0x00f9 0202 0163 02a2 | c | .DEBUG 0x0163,0x02a2,0x0002,0x0000,0x0037,0xc6b4,0x0000,0x009c 020a 0183 02a8 | | .DEBUG 0x0183,0x02a8,0x4000,0x0000,0x0037,0xc634,0x0000,0x0112 0212 0186 02ae | | .DEBUG 0x0186,0x02ae,0x4000,0x0000,0x0037,0xc6b4,0x0000,0x0254 021a 0193 02b2 | | .DEBUG 0x0193,0x02b2,0x1002,0x0000,0x0037,0xc634,0x0000,0x0173 0222 ; -------------------------------------------------------------------------------------- 0222 ; Debug3 Subtable 0x0 0222 ; -------------------------------------------------------------------------------------- 0222 0016 0000 | | .DBG3TAB 0x0016,0x0000 0224 000b ffff | | .CONST 0x000b,0xffff 0226 000d fffe | | .CONST 0x000d,0xfffe 0228 000f fffd | | .CONST 0x000f,0xfffd 022a 0011 fffc | | .CONST 0x0011,0xfffc 022c 0013 fffb | | .CONST 0x0013,0xfffb 022e 001a fffa | | .CONST 0x001a,0xfffa 0230 0021 fff9 | ! | .CONST 0x0021,0xfff9 0232 0030 fff8 | 0 | .CONST 0x0030,0xfff8 0234 0032 fff7 | 2 | .CONST 0x0032,0xfff7 0236 0034 fff6 | 4 | .CONST 0x0034,0xfff6 0238 0036 fff5 | 6 | .CONST 0x0036,0xfff5 023a 0038 fff4 | 8 | .CONST 0x0038,0xfff4 023c 0039 fff3 | 9 | .CONST 0x0039,0xfff3 023e 003b fff2 | ; | .CONST 0x003b,0xfff2 0240 003d fff1 | = | .CONST 0x003d,0xfff1 0242 003f fff0 | ? | .CONST 0x003f,0xfff0 0244 0042 ffef | B | .CONST 0x0042,0xffef 0246 0046 ffee | F | .CONST 0x0046,0xffee 0248 0047 ffed | G | .CONST 0x0047,0xffed 024a 0048 ffec | H | .CONST 0x0048,0xffec 024c 0049 ffeb | I | .CONST 0x0049,0xffeb 024e 004a ffea | J | .CONST 0x004a,0xffea 0250 ; -------------------------------------------------------------------------------------- 0250 ; Debug3 Subtable 0x1 0250 ; -------------------------------------------------------------------------------------- 0250 0010 0000 | | .DBG3TAB 0x0010,0x0000 0252 004e ffff | N | .CONST 0x004e,0xffff 0254 004f fffd | O | .CONST 0x004f,0xfffd 0256 0050 fffc | P | .CONST 0x0050,0xfffc 0258 0059 fffb | Y | .CONST 0x0059,0xfffb 025a 005b fffa | [ | .CONST 0x005b,0xfffa 025c 005d fff9 | ] | .CONST 0x005d,0xfff9 025e 005f fff8 | _ | .CONST 0x005f,0xfff8 0260 0061 fff7 | a | .CONST 0x0061,0xfff7 0262 0063 fff6 | c | .CONST 0x0063,0xfff6 0264 0065 fff5 | e | .CONST 0x0065,0xfff5 0266 0067 fff4 | g | .CONST 0x0067,0xfff4 0268 0069 fff3 | i | .CONST 0x0069,0xfff3 026a 006b fff2 | k | .CONST 0x006b,0xfff2 026c 006d fff1 | m | .CONST 0x006d,0xfff1 026e 006f fff0 | o | .CONST 0x006f,0xfff0 0270 0071 ffef | q | .CONST 0x0071,0xffef 0272 ; -------------------------------------------------------------------------------------- 0272 ; Debug3 Subtable 0x2 0272 ; -------------------------------------------------------------------------------------- 0272 0000 0001 | | .DBG3TAB 0x0000,0x0001 0274 0083 0001 | | .CONST 0x0083,0x0001 0276 ; -------------------------------------------------------------------------------------- 0276 ; Debug3 Subtable 0x3 0276 ; -------------------------------------------------------------------------------------- 0276 0000 0001 | | .DBG3TAB 0x0000,0x0001 0278 009b 0001 | | .CONST 0x009b,0x0001 027a ; -------------------------------------------------------------------------------------- 027a ; Debug3 Subtable 0x4 027a ; -------------------------------------------------------------------------------------- 027a 0000 0001 | | .DBG3TAB 0x0000,0x0001 027c 00ab 0001 | | .CONST 0x00ab,0x0001 027e ; -------------------------------------------------------------------------------------- 027e ; Debug3 Subtable 0x5 027e ; -------------------------------------------------------------------------------------- 027e 0000 0001 | | .DBG3TAB 0x0000,0x0001 0280 00bb 0001 | | .CONST 0x00bb,0x0001 0282 ; -------------------------------------------------------------------------------------- 0282 ; Debug3 Subtable 0x6 0282 ; -------------------------------------------------------------------------------------- 0282 0000 0001 | | .DBG3TAB 0x0000,0x0001 0284 00cb 0001 | | .CONST 0x00cb,0x0001 0286 ; -------------------------------------------------------------------------------------- 0286 ; Debug3 Subtable 0x7 0286 ; -------------------------------------------------------------------------------------- 0286 0000 0001 | | .DBG3TAB 0x0000,0x0001 0288 00e3 0001 | | .CONST 0x00e3,0x0001 028a ; -------------------------------------------------------------------------------------- 028a ; Debug3 Subtable 0x8 028a ; -------------------------------------------------------------------------------------- 028a 0000 0001 | | .DBG3TAB 0x0000,0x0001 028c 00fb 0001 | | .CONST 0x00fb,0x0001 028e ; -------------------------------------------------------------------------------------- 028e ; Debug3 Subtable 0x9 028e ; -------------------------------------------------------------------------------------- 028e 0000 0001 | | .DBG3TAB 0x0000,0x0001 0290 011b 0001 | | .CONST 0x011b,0x0001 0292 ; -------------------------------------------------------------------------------------- 0292 ; Debug3 Subtable 0xa 0292 ; -------------------------------------------------------------------------------------- 0292 0001 0002 | | .DBG3TAB 0x0001,0x0002 0294 012b ffff | + | .CONST 0x012b,0xffff 0296 012d 0001 | - | .CONST 0x012d,0x0001 0298 013b 0002 | ; | .CONST 0x013b,0x0002 029a ; -------------------------------------------------------------------------------------- 029a ; Debug3 Subtable 0xb 029a ; -------------------------------------------------------------------------------------- 029a 0000 0001 | | .DBG3TAB 0x0000,0x0001 029c 0143 0001 | C | .CONST 0x0143,0x0001 029e ; -------------------------------------------------------------------------------------- 029e ; Debug3 Subtable 0xc 029e ; -------------------------------------------------------------------------------------- 029e 0000 0001 | | .DBG3TAB 0x0000,0x0001 02a0 0153 0001 | S | .CONST 0x0153,0x0001 02a2 ; -------------------------------------------------------------------------------------- 02a2 ; Debug3 Subtable 0xd 02a2 ; -------------------------------------------------------------------------------------- 02a2 0000 0002 | | .DBG3TAB 0x0000,0x0002 02a4 0163 0001 | c | .CONST 0x0163,0x0001 02a6 016b 0002 | k | .CONST 0x016b,0x0002 02a8 ; -------------------------------------------------------------------------------------- 02a8 ; Debug3 Subtable 0xe 02a8 ; -------------------------------------------------------------------------------------- 02a8 0002 0000 | | .DBG3TAB 0x0002,0x0000 02aa 0183 ffff | | .CONST 0x0183,0xffff 02ac 0185 fffe | | .CONST 0x0185,0xfffe 02ae ; -------------------------------------------------------------------------------------- 02ae ; Debug3 Subtable 0xf 02ae ; -------------------------------------------------------------------------------------- 02ae 0000 0001 | | .DBG3TAB 0x0000,0x0001 02b0 0186 0001 | | .CONST 0x0186,0x0001 02b2 ; -------------------------------------------------------------------------------------- 02b2 ; Debug3 Subtable 0x10 02b2 ; -------------------------------------------------------------------------------------- 02b2 0000 0000 | | .DBG3TAB 0x0000,0x0000 02b4 0000 0000 | | .BLANK 0000[0x14c]