|
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, 5812_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_6148f2
└─⟦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 5812 |X | .CONST 0x5812 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0228 | ( | .CONST 0x0228 ; 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 ; SUBPROGRAM
0008 ; See instruction 0x02cf at 0x1b3, index=0x0
0008 ; --------------------------------------------------------------------------------------
0008 003c | < | .CONST 0x003c ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0014 | | .CONST 0x0014 ; Number of locals
000b INIT_0008:
000b INIT_0008:
000b 029a 0043 | C| Declare_Subprogram INIT_0040,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x0282,0x0000,0x0000,0x004c,0x57e6,0x0000,0x0031
; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x2 = 0xf,0xfffd
0010 60cb |` | Indirect_Literal Discrete,0xdc,{0x0030a40c, 0x00000e30}
0011 02a0 | | Declare_Subprogram Null_Subprogram
0012 037e | ~ | Declare_Type Task,Defined,Visible
0013 036e | n | Declare_Variable Task,Visible
0014 00bf | | Action Accept_Activation
0015 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0015,0x028a,0x0000,0x0000,0x004c,0x5916,0x0000,0x0014
; Debug Table 0x1.0x0 = 0x15,0xffff
0016 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x16,0xfffe
0017 4801 |H | Short_Literal 0x1 ; Debug Table 0x1.0x2 = 0x17,0xfffd
0018 60bf |` | Indirect_Literal Discrete,0xd8,{0x00000000, 0x00000400}
0019 00e3 | | Load_Encached Natural_Cache
001a 03f8 | | Declare_Type Discrete,Constrained
001b 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x1.0x3 = 0x1b,0xfffc
001c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
001d e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x4 = 0x1d,0xfffb
001e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
001f 00f0 | | Load_Encached Segment_Cache
0020 e002 | | Load 0x0,0x2
0021 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0022 02a0 | | Declare_Subprogram Null_Subprogram
0023 4803 |H | Short_Literal 0x3
0024 032d | - | Declare_Type Record,Defined
0025 4801 |H | Short_Literal 0x1 ; Debug Table 0x1.0x5 = 0x25,0xfffa
0026 60b1 |` | Indirect_Literal Discrete,0xd8,{0x00000000, 0x00000400}
0027 00da | | Load_Top At_Offset_2
0028 02a0 | | Declare_Subprogram Null_Subprogram
0029 4801 |H | Short_Literal 0x1
002a 035d | ] | Declare_Type Array,Defined
002b 00d8 | | Load_Top At_Offset_0
002c 0337 | 7 | Declare_Variable Array
002d 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x6 = 0x2d,0xfff9
002e 00c7 | | Action Elaborate_Subprogram
002f 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x7 = 0x2f,0xfff8
0030 00c7 | | Action Elaborate_Subprogram
0031 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x8 = 0x31,0xfff7
0032 00d9 | | Load_Top At_Offset_1
0033 e001 | | Load 0x0,0x1
0034 e003 | | Load 0x0,0x3
0035 e004 | | Load 0x0,0x4
0036 e005 | | Load 0x0,0x5
0037 a006 | | Store_Unchecked 0x0,0x6
0038 e002 | | Load 0x0,0x2
0039 4808 |H | Short_Literal 0x8
003a e20f | | Load 0x1,0xf
003b 020e | | Execute Module,Augment_Imports
003c BODY_0008:
003c BODY_0008:
003c 00be | | Action Activate_Tasks
003d 00bc | | Action Signal_Activated
003e 00bb | | Action Signal_Completion
003f 0000 | | .XXX[0x1]
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 0050 | P | .CONST 0x0050 ; Address of begin
0041 0004 | | .CONST 0x0004 ; Address of exception handler
0042 0004 | | .CONST 0x0004 ; Number of locals
0043 INIT_0040:
0043 e001 | | Load 0x0,0x1 ; Debug Table 0x2 = .DEBUG 0x0043,0x029e,0x0001,0x0000,0x004c,0x57e6,0x0000,0x0032
; Debug Table 0x2.0x0 = 0x43,0xffff
0044 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0045 e001 | | Load 0x0,0x1 ; Debug Table 0x2.0x1 = 0x45,0xfffe
0046 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0047 608c |` | Indirect_Literal Discrete,0xd4,{0x00000000, 0x004c5916} ; Debug Table 0x2.0x2 = 0x47,0xfffd
0048 4870 |Hp | Short_Literal 0x70
0049 4804 |H | Short_Literal 0x4
004a 0092 01e0 | | Action Push_String_Extended,0x1e0 ; " "
004c e007 | | Load 0x0,0x7
004d 0387 | | Declare_Variable Package
004e 00d8 | | Load_Top At_Offset_0
004f 020f | | Execute Module,Activate
0050 BODY_0040:
0050 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x3 = 0x50,0x1
0051 0092 01e1 | | Action Push_String_Extended,0x1e1 ; "job"
0053 00da | | Load_Top At_Offset_2
0054 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0055 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x4 = 0x55,0x2
0056 0092 01e2 | | Action Push_String_Extended,0x1e2 ; "task"
0058 00da | | Load_Top At_Offset_2
0059 1812 | | Execute Package,Field_Execute,Field_Number 0x12
005a 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x5 = 0x5a,0x3
005b 0092 01e3 | | Action Push_String_Extended,0x1e3 ; "heap length"
005d 00da | | Load_Top At_Offset_2
005e 1812 | | Execute Package,Field_Execute,Field_Number 0x12
005f 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x6 = 0x5f,0x4
0060 0092 01e4 | | Action Push_String_Extended,0x1e4 ; "heap used"
0062 00da | | Load_Top At_Offset_2
0063 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0064 00cf | | Action Mark_Auxiliary
0065 e211 | | Load 0x1,0x11 ; Debug Table 0x2.0x7 = 0x65,0x5
0066 4801 |H | Short_Literal 0x1
0067 0263 | c | Execute Discrete,Above_Bound
0068 703e |p> | Jump_Nonzero 0xa7
0069 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x8 = 0x69,0x6
006a e214 | | Load 0x1,0x14
006b 01d5 | | Execute Vector,Field_Reference
006c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
006d a402 | | Store_Unchecked 0x2,0x2
006e e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x9 = 0x6e,0x7
006f e001 | | Load 0x0,0x1
0070 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0071 a403 | | Store_Unchecked 0x2,0x3
0072 e402 | | Load 0x2,0x2 ; Debug Table 0x2.0xa = 0x72,0x8
0073 e001 | | Load 0x0,0x1
0074 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0075 682f |h/ | Jump_Zero 0xa5
0076 e5ff | | Load 0x2,-0x1
0077 6804 |h | Jump_Zero 0x7c
0078 e5ff | | Load 0x2,-0x1
0079 e403 | | Load 0x2,0x3
007a 027f | | Execute Discrete,Equal
007b 7801 |x | Jump 0x7d
007c 4801 |H | Short_Literal 0x1
007d 6827 |h' | Jump_Zero 0xa5
007e e403 | | Load 0x2,0x3 ; Debug Table 0x2.0xb = 0x7e,0x9
007f 00e0 | | Load_Encached Standard_Cache
0080 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0081 e404 | | Load 0x2,0x4
0082 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0083 0092 01e5 | | Action Push_String_Extended,0x1e5 ; "16#"
; Debug Table 0x2.0xc = 0x83,0xa
0085 4830 |H0 | Short_Literal 0x30
0086 4800 |H | Short_Literal 0x0
0087 4810 |H | Short_Literal 0x10
0088 e402 | | Load 0x2,0x2
0089 e008 | | Load 0x0,0x8
008a 1817 | | Execute Package,Field_Execute,Field_Number 0x17
008b 01cc | | Execute Vector,Catenate
008c 0092 01e6 | | Action Push_String_Extended,0x1e6 ; "#"
008e 01cc | | Execute Vector,Catenate
008f e404 | | Load 0x2,0x4
0090 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0091 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0xd = 0x91,0xb
0092 e214 | | Load 0x1,0x14
0093 01d5 | | Execute Vector,Field_Reference
0094 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0095 e009 | | Load 0x0,0x9
0096 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0097 00e0 | | Load_Encached Standard_Cache
0098 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0099 e404 | | Load 0x2,0x4
009a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
009b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0xe = 0x9b,0xc
009c e214 | | Load 0x1,0x14
009d 01d5 | | Execute Vector,Field_Reference
009e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
009f e009 | | Load 0x0,0x9
00a0 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00a1 00e0 | | Load_Encached Standard_Cache
00a2 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00a3 e404 | | Load 0x2,0x4
00a4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00a5 00c8 | | Action Pop_Auxiliary_Range
00a6 3fc2 |? | Loop_Increasing 0x69
00a7 00ce | | Action Pop_Auxiliary
00a8 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0xf = 0xa8,0xd
00a9 00d9 | | Load_Top At_Offset_1
00aa 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00ab e00a | | Load 0x0,0xa ; Debug Table 0x2.0x10 = 0xab,0xe
00ac 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
00ad 00d9 | | Load_Top At_Offset_1
00ae 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00af 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x11 = 0xaf,0xf
00b0 e00a | | Load 0x0,0xa
00b1 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
00b2 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00b3 0000 0000 | | .BLANK 0000[0x5]
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 00cf | | Action Mark_Auxiliary ; Debug Table 0x3 = .DEBUG 0x00bb,0x02c4,0x0002,0x0000,0x004c,0x57e6,0x0000,0x003f
00bc e211 | | Load 0x1,0x11 ; Debug Table 0x3.0x0 = 0xbc,0x1
00bd 4801 |H | Short_Literal 0x1
00be 0263 | c | Execute Discrete,Above_Bound
00bf 700e |p | Jump_Nonzero 0xce
00c0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x1 = 0xc0,0x2
00c1 e214 | | Load 0x1,0x14
00c2 01d5 | | Execute Vector,Field_Reference
00c3 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00c4 e5ff | | Load 0x2,-0x1
00c5 021f | | Execute Heap_Access,Equal
00c6 6805 |h | Jump_Zero 0xcc
00c7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x2 = 0xc7,0x3
00c8 e214 | | Load 0x1,0x14
00c9 01d5 | | Execute Vector,Field_Reference
00ca 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00cb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00cc 00c8 | | Action Pop_Auxiliary_Range
00cd 3ff2 |? | Loop_Increasing 0xc0
00ce 00ce | | Action Pop_Auxiliary
00cf 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x3.0x3 = 0xcf,0x4
00d0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00d1 0000 0000 | | .XXX[0x3]
00d3 0000 | |
00d4 0000 0000 | | .LITERAL {0x00000000, 0x004c5916}
00d8 0000 0000 | | .LITERAL {0x00000000, 0x00000400}
00dc 0030 a40c | 0 | .LITERAL {0x0030a40c, 0x00000e30}
00e0 00ef 0004 | | .XXX[0x3]
00e2 0011 | |
00e3 4804 |H | Short_Literal 0x4 ; Debug Table 0x4 = .DEBUG 0x00e3,0x02ce,0x0000,0x0000,0x004c,0x57e6,0x0000,0x004a
00e4 02cb | | Declare_Variable Entry
00e5 4801 |H | Short_Literal 0x1
00e6 02cb | | Declare_Variable Entry
00e7 00bf | | Action Accept_Activation
00e8 029d 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call ; Debug Table 0x5 = .DEBUG 0x00e8,0x02d0,0x0000,0x0000,0x004c,0x5916,0x0000,0x016b
; Debug Table 0x5.0x0 = 0xe8,0xffff
00ea 029d 0183 | | Declare_Subprogram INIT_0180,For_Outer_Call ; Debug Table 0x5.0x1 = 0xea,0xfffe
00ec 029f 01b3 | | Declare_Subprogram INIT_01b0,For_Call
00ee 00bc | | Action Signal_Activated
00ef 00cf | | Action Mark_Auxiliary
00f0 0007 | | Action Break_Optional ; Debug Table 0x5.0x2 = 0xf0,0x1
00f1 8211 | | Call 0x1,0x11 ; Debug Table 0x5.0x3 = 0xf1,0x2
00f2 00c9 | | Action Pop_Auxiliary_Loop
00f3 7ffd | | Jump 0xf1
00f4 0000 0000 | | .BLANK 0000[0x4]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00ff | | .CONST 0x00ff ; Address of begin
00f9 016f | o | .CONST 0x016f ; Address of exception handler
00fa 0003 | | .CONST 0x0003 ; Number of locals
00fb INIT_00f8:
00fb 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x6 = .DEBUG 0x00fb,0x02da,0x0001,0x0000,0x004c,0x5916,0x0000,0x016c
; Debug Table 0x6.0x0 = 0xfb,0xffff
00fc 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00fd 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x6.0x1 = 0xfd,0xfffe
00fe 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00ff BODY_00f8:
00ff 00cf | | Action Mark_Auxiliary
0100 e001 | | Load 0x0,0x1 ; Debug Table 0x6.0x2 = 0x100,0x1
0101 4801 |H | Short_Literal 0x1
0102 0263 | c | Execute Discrete,Above_Bound
0103 7029 |p) | Jump_Nonzero 0x12d
0104 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x3 = 0x104,0x2
0105 e002 | | Load 0x0,0x2
0106 01d5 | | Execute Vector,Field_Reference
0107 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0108 e5ff | | Load 0x2,-0x1
0109 027f | | Execute Discrete,Equal
010a 6807 |h | Jump_Zero 0x112
010b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x4 = 0x10b,0x3
010c e002 | | Load 0x0,0x2
010d 01d5 | | Execute Vector,Field_Reference
010e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
010f a5fd | | Store_Unchecked 0x2,-0x3
0110 4801 |H | Short_Literal 0x1 ; Debug Table 0x6.0x5 = 0x110,0x4
0111 a402 | | Store_Unchecked 0x2,0x2
0112 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x6 = 0x112,0x5
0113 e002 | | Load 0x0,0x2
0114 01d5 | | Execute Vector,Field_Reference
0115 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0116 e003 | | Load 0x0,0x3
0117 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0118 7012 |p | Jump_Nonzero 0x12b
0119 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x7 = 0x119,0x6
011a a403 | | Store_Unchecked 0x2,0x3
011b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x8 = 0x11b,0x7
011c e002 | | Load 0x0,0x2
011d 01d5 | | Execute Vector,Field_Reference
011e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
011f 680b |h | Jump_Zero 0x12b
0120 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x9 = 0x120,0x8
0121 e002 | | Load 0x0,0x2
0122 01d5 | | Execute Vector,Field_Reference
0123 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0124 e004 | | Load 0x0,0x4
0125 180f | | Execute Package,Field_Execute,Field_Number 0xf
0126 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0xa = 0x126,0x9
0127 00d9 | | Load_Top At_Offset_1
0128 e002 | | Load 0x0,0x2
0129 01d5 | | Execute Vector,Field_Reference
012a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
012b 00c8 | | Action Pop_Auxiliary_Range
012c 3fd7 |? | Loop_Increasing 0x104
012d 00ce | | Action Pop_Auxiliary
012e 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0xb = 0x12e,0xa
012f 6803 |h | Jump_Zero 0x133
0130 e5fe | | Load 0x2,-0x2
0131 7001 |p | Jump_Nonzero 0x133
0132 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x6.0xc = 0x132,0xb
0133 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0xd = 0x133,0xc
0134 7005 |p | Jump_Nonzero 0x13a
0135 e001 | | Load 0x0,0x1 ; Debug Table 0x6.0xe = 0x135,0xd
0136 0a01 | | Execute_Immediate Plus,0x1
0137 c001 | | Store 0x0,0x1
0138 e001 | | Load 0x0,0x1 ; Debug Table 0x6.0xf = 0x138,0xe
0139 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
013a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x10 = 0x13a,0xf
013b e002 | | Load 0x0,0x2
013c 01d7 | | Execute Vector,Field_Read
013d 00f0 | | Load_Encached Segment_Cache
013e 48f4 |H | Short_Literal 0xf4
013f 4800 |H | Short_Literal 0x0
0140 4801 |H | Short_Literal 0x1
0141 e004 | | Load 0x0,0x4
0142 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0143 00d9 | | Load_Top At_Offset_1
0144 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0145 00d1 | | Pop_Control Pop_Count_1
0146 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x11 = 0x146,0x10
0147 e002 | | Load 0x0,0x2
0148 01d5 | | Execute Vector,Field_Reference
0149 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
014a 00f0 | | Load_Encached Segment_Cache
014b 021f | | Execute Heap_Access,Equal
014c 680a |h | Jump_Zero 0x157
014d e5fc | | Load 0x2,-0x4 ; Debug Table 0x6.0x12 = 0x14d,0x11
014e 4802 |H | Short_Literal 0x2
014f 0092 01e7 | | Action Push_String_Extended,0x1e7 ; "Cannot allocate Temp_Heap for Mail2."
0151 0092 01e8 | | Action Push_String_Extended,0x1e8 ; "Heap_Mgr.Get_Heap"
0153 e005 | | Load 0x0,0x5
0154 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0155 c5fc | | Store 0x2,-0x4
0156 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x6.0x13 = 0x156,0x12
0157 6084 |` | Indirect_Literal Discrete,0x1dc,{0x00000000, 0x00080000} ; Debug Table 0x6.0x14 = 0x157,0x13
0158 6083 |` | Indirect_Literal Discrete,0x1dc,{0x00000000, 0x00080000}
0159 4800 |H | Short_Literal 0x0
015a 00db | | Load_Top At_Offset_3
015b e002 | | Load 0x0,0x2
015c 01d5 | | Execute Vector,Field_Reference
015d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
015e e006 | | Load 0x0,0x6
015f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0160 00d9 | | Load_Top At_Offset_1
0161 e002 | | Load 0x0,0x2
0162 01d5 | | Execute Vector,Field_Reference
0163 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0164 e5ff | | Load 0x2,-0x1 ; Debug Table 0x6.0x15 = 0x164,0x14
0165 00d9 | | Load_Top At_Offset_1
0166 e002 | | Load 0x0,0x2
0167 01d5 | | Execute Vector,Field_Reference
0168 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0169 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x16 = 0x169,0x15
016a e002 | | Load 0x0,0x2
016b 01d5 | | Execute Vector,Field_Reference
016c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
016d a5fd | | Store_Unchecked 0x2,-0x3
016e 4503 |E | Exit_Suprogram New_Top_Offset 0x3
016f TRAP_00f8:
016f 0007 | | Action Break_Optional
0170 e5fc | | Load 0x2,-0x4 ; Debug Table 0x6.0x17 = 0x170,0x16
0171 4802 |H | Short_Literal 0x2
0172 0092 01e8 | | Action Push_String_Extended,0x1e8 ; "Heap_Mgr.Get_Heap"
0174 8007 | | Call 0x0,0x7
0175 0092 01e9 | | Action Push_String_Extended,0x1e9 ; "Transfer Internal Error"
0177 e005 | | Load 0x0,0x5
0178 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0179 c5fc | | Store 0x2,-0x4
017a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
017b 0000 0000 | | .BLANK 0000[0x5]
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0183 | | .CONST 0x0183 ; Address of begin
0181 0004 | | .CONST 0x0004 ; Address of exception handler
0182 0001 | | .CONST 0x0001 ; Number of locals
0183 BODY_0180:
0183 INIT_0180:
0183 00cf | | Action Mark_Auxiliary ; Debug Table 0x7 = .DEBUG 0x0183,0x030c,0x0001,0x0000,0x004c,0x5916,0x0000,0x0270
0184 e001 | | Load 0x0,0x1 ; Debug Table 0x7.0x0 = 0x184,0x1
0185 4801 |H | Short_Literal 0x1
0186 0263 | c | Execute Discrete,Above_Bound
0187 7023 |p# | Jump_Nonzero 0x1ab
0188 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x1 = 0x188,0x2
0189 e002 | | Load 0x0,0x2
018a 01d5 | | Execute Vector,Field_Reference
018b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
018c e5ff | | Load 0x2,-0x1
018d 021f | | Execute Heap_Access,Equal
018e 7008 |p | Jump_Nonzero 0x197
018f 00d8 | | Load_Top At_Offset_0
0190 e002 | | Load 0x0,0x2
0191 01d5 | | Execute Vector,Field_Reference
0192 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0193 e003 | | Load 0x0,0x3
0194 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0195 0f00 | | Execute_Immediate Equal,0x0
0196 7801 |x | Jump 0x198
0197 4801 |H | Short_Literal 0x1
0198 6810 |h | Jump_Zero 0x1a9
0199 00d8 | | Load_Top At_Offset_0
019a e002 | | Load 0x0,0x2
019b 01d5 | | Execute Vector,Field_Reference
019c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
019d 680b |h | Jump_Zero 0x1a9
019e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x2 = 0x19e,0x3
019f e002 | | Load 0x0,0x2
01a0 01d5 | | Execute Vector,Field_Reference
01a1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01a2 e004 | | Load 0x0,0x4
01a3 180f | | Execute Package,Field_Execute,Field_Number 0xf
01a4 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x3 = 0x1a4,0x4
01a5 00d9 | | Load_Top At_Offset_1
01a6 e002 | | Load 0x0,0x2
01a7 01d5 | | Execute Vector,Field_Reference
01a8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01a9 00c8 | | Action Pop_Auxiliary_Range
01aa 3fdd |? | Loop_Increasing 0x188
01ab 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01ac 0000 0000 | | .BLANK 0000[0x4]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01bc | | .CONST 0x01bc ; Address of begin
01b1 01c3 | | .CONST 0x01c3 ; Address of exception handler
01b2 0002 | | .CONST 0x0002 ; Number of locals
01b3 INIT_01b0:
01b3 480e 4839 |H H9| Declare_Variable Select 0x000, 0x002, ; Debug Table 0x8 = .DEBUG 0x01b3,0x0316,0x0004,0x0000,0x004c,0x5916,0x0000,0x030d
01b5 480d 483a |H H:| [0x000]: 0x001 = 0x0008,
01b7 4800 4801 |H H | [0x00d]: 0x03a = 0x01d0,
01b9 4800 4802 |H H | [0x00e]: 0x039 = 0x01c8
01bb 02cf | |
01bc BODY_01b0:
01bc 00cf | | Action Mark_Auxiliary
01bd 0007 | | Action Break_Optional ; Debug Table 0x8.0x0 = 0x1bd,0x1
01be 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x1 = 0x1be,0x2
01bf 013f | ? | Execute Select,Rendezvous
01c0 00d1 | | Pop_Control Pop_Count_1
01c1 00c9 | | Action Pop_Auxiliary_Loop
01c2 7ffb | | Jump 0x1be
01c3 TRAP_01b0:
01c3 0007 | | Action Break_Optional
01c4 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x8.0x2 = 0x1c4,0x5
01c5 0000 0000 | | .XXX[0x3]
01c7 0000 | |
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; See instruction 0x02cf at 0x1b3, index=0xe
01c8 ; --------------------------------------------------------------------------------------
01c8 01cb | | .CONST 0x01cb ; Address of begin
01c9 0004 | | .CONST 0x0004 ; Address of exception handler
01ca 0001 | | .CONST 0x0001 ; Number of locals
01cb BODY_01c8:
01cb INIT_01c8:
01cb 00db | | Load_Top At_Offset_3 ; Debug Table 0x9 = .DEBUG 0x01cb,0x031e,0x0003,0x0000,0x004c,0x5916,0x0000,0x02fb
; Debug Table 0x9.0x0 = 0x1cb,0x1
01cc 8210 | | Call 0x1,0x10
01cd 4100 |A | End_Rendezvous 0x0
01ce 0000 0000 | | .XXX[0x2]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; See instruction 0x02cf at 0x1b3, index=0xd
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3 | | .CONST 0x01d3 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0001 | | .CONST 0x0001 ; Number of locals
01d3 BODY_01d0:
01d3 INIT_01d0:
01d3 e7fb | | Load 0x3,-0x5 ; Debug Table 0xa = .DEBUG 0x01d3,0x0322,0x0003,0x0000,0x004c,0x5916,0x0000,0x02ed
; Debug Table 0xa.0x0 = 0x1d3,0x1
01d4 e008 | | Load 0x0,0x8
01d5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d6 e7fd | | Load 0x3,-0x3
01d7 e7fe | | Load 0x3,-0x2
01d8 820f | | Call 0x1,0xf
01d9 c7fc | | Store 0x3,-0x4
01da c7fb | | Store 0x3,-0x5
01db 4102 |A | End_Rendezvous 0x2
01dc 0000 0000 | | .LITERAL {0x00000000, 0x00080000}
01e0 ; --------------------------------------------------------------------------------------
01e0 ; STRING TABLE
01e0 ; --------------------------------------------------------------------------------------
01e0 0016 | | .STRTAB 0x0016->0x01eb ; " "
01e1 0015 | | .STRTAB 0x0015->0x01eb ; "job"
01e2 0016 | | .STRTAB 0x0016->0x01ed ; "task"
01e3 0018 | | .STRTAB 0x0018->0x01ef ; "heap length"
01e4 0021 | ! | .STRTAB 0x0021->0x01f4 ; "heap used"
01e5 0028 | ( | .STRTAB 0x0028->0x01f9 ; "16#"
01e6 0029 | ) | .STRTAB 0x0029->0x01fa ; "#"
01e7 0028 | ( | .STRTAB 0x0028->0x01fb ; "Cannot allocate Temp_Heap for Mail2."
01e8 004a | J | .STRTAB 0x004a->0x020d ; "Heap_Mgr.Get_Heap"
01e9 0059 | Y | .STRTAB 0x0059->0x0215 ; "Transfer Internal Error"
01ea 006e | n | .STREND 0x006e->0x0221
01eb 206a 6f62 | job| .STRTAB_STRINGS
0221 0000 0000 | | .BLANK 0000[0x7]
0228 ; --------------------------------------------------------------------------------------
0228 ; Debug Table
0228 ; --------------------------------------------------------------------------------------
0228 0003 000b | | .CONST 0x0003,0x000b
022a 000b 0282 | | .DEBUG 0x000b,0x0282,0x0000,0x0000,0x004c,0x57e6,0x0000,0x0031
0232 0015 028a | | .DEBUG 0x0015,0x028a,0x0000,0x0000,0x004c,0x5916,0x0000,0x0014
023a 0043 029e | C | .DEBUG 0x0043,0x029e,0x0001,0x0000,0x004c,0x57e6,0x0000,0x0032
0242 00bb 02c4 | | .DEBUG 0x00bb,0x02c4,0x0002,0x0000,0x004c,0x57e6,0x0000,0x003f
024a 00e3 02ce | | .DEBUG 0x00e3,0x02ce,0x0000,0x0000,0x004c,0x57e6,0x0000,0x004a
0252 00e8 02d0 | | .DEBUG 0x00e8,0x02d0,0x0000,0x0000,0x004c,0x5916,0x0000,0x016b
025a 00fb 02da | | .DEBUG 0x00fb,0x02da,0x0001,0x0000,0x004c,0x5916,0x0000,0x016c
0262 0183 030c | | .DEBUG 0x0183,0x030c,0x0001,0x0000,0x004c,0x5916,0x0000,0x0270
026a 01b3 0316 | | .DEBUG 0x01b3,0x0316,0x0004,0x0000,0x004c,0x5916,0x0000,0x030d
0272 01cb 031e | | .DEBUG 0x01cb,0x031e,0x0003,0x0000,0x004c,0x5916,0x0000,0x02fb
027a 01d3 0322 | "| .DEBUG 0x01d3,0x0322,0x0003,0x0000,0x004c,0x5916,0x0000,0x02ed
0282 ; --------------------------------------------------------------------------------------
0282 ; Debug3 Subtable 0x0
0282 ; --------------------------------------------------------------------------------------
0282 0003 0000 | | .DBG3TAB 0x0003,0x0000
0284 000b ffff | | .CONST 0x000b,0xffff
0286 000d fffe | | .CONST 0x000d,0xfffe
0288 000f fffd | | .CONST 0x000f,0xfffd
028a ; --------------------------------------------------------------------------------------
028a ; Debug3 Subtable 0x1
028a ; --------------------------------------------------------------------------------------
028a 0009 0000 | | .DBG3TAB 0x0009,0x0000
028c 0015 ffff | | .CONST 0x0015,0xffff
028e 0016 fffe | | .CONST 0x0016,0xfffe
0290 0017 fffd | | .CONST 0x0017,0xfffd
0292 001b fffc | | .CONST 0x001b,0xfffc
0294 001d fffb | | .CONST 0x001d,0xfffb
0296 0025 fffa | % | .CONST 0x0025,0xfffa
0298 002d fff9 | - | .CONST 0x002d,0xfff9
029a 002f fff8 | / | .CONST 0x002f,0xfff8
029c 0031 fff7 | 1 | .CONST 0x0031,0xfff7
029e ; --------------------------------------------------------------------------------------
029e ; Debug3 Subtable 0x2
029e ; --------------------------------------------------------------------------------------
029e 0003 000f | | .DBG3TAB 0x0003,0x000f
02a0 0043 ffff | C | .CONST 0x0043,0xffff
02a2 0045 fffe | E | .CONST 0x0045,0xfffe
02a4 0047 fffd | G | .CONST 0x0047,0xfffd
02a6 0050 0001 | P | .CONST 0x0050,0x0001
02a8 0055 0002 | U | .CONST 0x0055,0x0002
02aa 005a 0003 | Z | .CONST 0x005a,0x0003
02ac 005f 0004 | _ | .CONST 0x005f,0x0004
02ae 0065 0005 | e | .CONST 0x0065,0x0005
02b0 0069 0006 | i | .CONST 0x0069,0x0006
02b2 006e 0007 | n | .CONST 0x006e,0x0007
02b4 0072 0008 | r | .CONST 0x0072,0x0008
02b6 007e 0009 | ~ | .CONST 0x007e,0x0009
02b8 0083 000a | | .CONST 0x0083,0x000a
02ba 0091 000b | | .CONST 0x0091,0x000b
02bc 009b 000c | | .CONST 0x009b,0x000c
02be 00a8 000d | | .CONST 0x00a8,0x000d
02c0 00ab 000e | | .CONST 0x00ab,0x000e
02c2 00af 000f | | .CONST 0x00af,0x000f
02c4 ; --------------------------------------------------------------------------------------
02c4 ; Debug3 Subtable 0x3
02c4 ; --------------------------------------------------------------------------------------
02c4 0000 0004 | | .DBG3TAB 0x0000,0x0004
02c6 00bc 0001 | | .CONST 0x00bc,0x0001
02c8 00c0 0002 | | .CONST 0x00c0,0x0002
02ca 00c7 0003 | | .CONST 0x00c7,0x0003
02cc 00cf 0004 | | .CONST 0x00cf,0x0004
02ce ; --------------------------------------------------------------------------------------
02ce ; Debug3 Subtable 0x4
02ce ; --------------------------------------------------------------------------------------
02ce 0000 0000 | | .DBG3TAB 0x0000,0x0000
02d0 ; --------------------------------------------------------------------------------------
02d0 ; Debug3 Subtable 0x5
02d0 ; --------------------------------------------------------------------------------------
02d0 0002 0002 | | .DBG3TAB 0x0002,0x0002
02d2 00e8 ffff | | .CONST 0x00e8,0xffff
02d4 00ea fffe | | .CONST 0x00ea,0xfffe
02d6 00f0 0001 | | .CONST 0x00f0,0x0001
02d8 00f1 0002 | | .CONST 0x00f1,0x0002
02da ; --------------------------------------------------------------------------------------
02da ; Debug3 Subtable 0x6
02da ; --------------------------------------------------------------------------------------
02da 0002 0016 | | .DBG3TAB 0x0002,0x0016
02dc 00fb ffff | | .CONST 0x00fb,0xffff
02de 00fd fffe | | .CONST 0x00fd,0xfffe
02e0 0100 0001 | | .CONST 0x0100,0x0001
02e2 0104 0002 | | .CONST 0x0104,0x0002
02e4 010b 0003 | | .CONST 0x010b,0x0003
02e6 0110 0004 | | .CONST 0x0110,0x0004
02e8 0112 0005 | | .CONST 0x0112,0x0005
02ea 0119 0006 | | .CONST 0x0119,0x0006
02ec 011b 0007 | | .CONST 0x011b,0x0007
02ee 0120 0008 | | .CONST 0x0120,0x0008
02f0 0126 0009 | & | .CONST 0x0126,0x0009
02f2 012e 000a | . | .CONST 0x012e,0x000a
02f4 0132 000b | 2 | .CONST 0x0132,0x000b
02f6 0133 000c | 3 | .CONST 0x0133,0x000c
02f8 0135 000d | 5 | .CONST 0x0135,0x000d
02fa 0138 000e | 8 | .CONST 0x0138,0x000e
02fc 013a 000f | : | .CONST 0x013a,0x000f
02fe 0146 0010 | F | .CONST 0x0146,0x0010
0300 014d 0011 | M | .CONST 0x014d,0x0011
0302 0156 0012 | V | .CONST 0x0156,0x0012
0304 0157 0013 | W | .CONST 0x0157,0x0013
0306 0164 0014 | d | .CONST 0x0164,0x0014
0308 0169 0015 | i | .CONST 0x0169,0x0015
030a 0170 0016 | p | .CONST 0x0170,0x0016
030c ; --------------------------------------------------------------------------------------
030c ; Debug3 Subtable 0x7
030c ; --------------------------------------------------------------------------------------
030c 0000 0004 | | .DBG3TAB 0x0000,0x0004
030e 0184 0001 | | .CONST 0x0184,0x0001
0310 0188 0002 | | .CONST 0x0188,0x0002
0312 019e 0003 | | .CONST 0x019e,0x0003
0314 01a4 0004 | | .CONST 0x01a4,0x0004
0316 ; --------------------------------------------------------------------------------------
0316 ; Debug3 Subtable 0x8
0316 ; --------------------------------------------------------------------------------------
0316 0000 0003 | | .DBG3TAB 0x0000,0x0003
0318 01bd 0001 | | .CONST 0x01bd,0x0001
031a 01be 0002 | | .CONST 0x01be,0x0002
031c 01c4 0005 | | .CONST 0x01c4,0x0005
031e ; --------------------------------------------------------------------------------------
031e ; Debug3 Subtable 0x9
031e ; --------------------------------------------------------------------------------------
031e 0000 0001 | | .DBG3TAB 0x0000,0x0001
0320 01cb 0001 | | .CONST 0x01cb,0x0001
0322 ; --------------------------------------------------------------------------------------
0322 ; Debug3 Subtable 0xa
0322 ; --------------------------------------------------------------------------------------
0322 0000 0001 | | .DBG3TAB 0x0000,0x0001
0324 01d3 0001 | | .CONST 0x01d3,0x0001
0326 0000 0000 | | .BLANK 0000[0xda]