|
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: 1024 (0x400)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a7cf5
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0178 | x | .CONST 0x0178 ; 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 8000 | | .CONST 0x8000 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0034 | 4 | .CONST 0x0034 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 000d | | .CONST 0x000d ; Number of locals
000b INIT_0008:
000b 00da | | Load_Top At_Offset_2
000c e001 | | Load 0x0,0x1
000d 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
000e e001 | | Load 0x0,0x1
000f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0010 011e | | Execute Any,Convert
0011 00d8 | | Load_Top At_Offset_0
0012 e001 | | Load 0x0,0x1
0013 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
0014 e215 | | Load 0x1,0x15
0015 0322 | " | Declare_Variable Record
0016 00d8 | | Load_Top At_Offset_0
0017 1c00 | | Execute_Immediate Run_Utility,0x0
0018 e001 | | Load 0x0,0x1
0019 1b0d | | Execute Package,Field_Read,Field_Number 0xd
001a 02c7 | | Declare_Variable Any
001b 00d8 | | Load_Top At_Offset_0
001c 1c00 | | Execute_Immediate Run_Utility,0x0
001d e5ff | | Load 0x2,-0x1
001e e001 | | Load 0x0,0x1
001f 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0020 e264 | d | Load 0x1,0x64
0021 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0022 0322 | " | Declare_Variable Record
0023 e5fd | | Load 0x2,-0x3
0024 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0025 0007 | | Action Break_Optional
0026 e266 | f | Load 0x1,0x66
0027 e5fd | | Load 0x2,-0x3
0028 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0029 0039 | 9 | Store_Top Access,At_Offset_1
002a 00d8 | | Load_Top At_Offset_0
002b 0227 | ' | Execute Access,All_Reference
002c 01dd | | Execute Vector,First
002d e218 | | Load 0x1,0x18
002e 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
002f 00e1 | | Load_Encached Boolean_Cache
0030 029f 00cb | | Declare_Subprogram INIT_00c8,For_Call
0032 029f 00db | | Declare_Subprogram INIT_00d8,For_Call
0034 BODY_0008:
0034 e5ff | | Load 0x2,-0x1
0035 e001 | | Load 0x0,0x1
0036 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0037 0f07 | | Execute_Immediate Equal,0x7
0038 0f00 | | Execute_Immediate Equal,0x0
0039 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
003a e407 | | Load 0x2,0x7
003b e408 | | Load 0x2,0x8
003c e264 | d | Load 0x1,0x64
003d 181c | | Execute Package,Field_Execute,Field_Number 0x1c
003e 00d1 | | Pop_Control Pop_Count_1
003f 00cf | | Action Mark_Auxiliary
0040 782b |x+ | Jump 0x6c
0041 e407 | | Load 0x2,0x7
0042 e264 | d | Load 0x1,0x64
0043 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0044 e408 | | Load 0x2,0x8
0045 e264 | d | Load 0x1,0x64
0046 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0047 e404 | | Load 0x2,0x4
0048 017d | } | Execute Record,Structure_Write
0049 e404 | | Load 0x2,0x4
004a 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
004b e5fe | | Load 0x2,-0x2
004c 027f | | Execute Discrete,Equal
004d 6819 |h | Jump_Zero 0x67
004e e404 | | Load 0x2,0x4
004f 8248 | H | Call 0x1,0x48
0050 c405 | | Store 0x2,0x5
0051 e404 | | Load 0x2,0x4
0052 8224 | $ | Call 0x1,0x24
0053 6813 |h | Jump_Zero 0x67
0054 e5fd | | Load 0x2,-0x3
0055 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0056 e5ff | | Load 0x2,-0x1
0057 840c | | Call 0x2,0xc
0058 840d | | Call 0x2,0xd
0059 7007 |p | Jump_Nonzero 0x61
005a e406 | | Load 0x2,0x6
005b 7005 |p | Jump_Nonzero 0x61
005c e404 | | Load 0x2,0x4
005d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
005e e402 | | Load 0x2,0x2
005f 012f | / | Execute Any,Equal
0060 6806 |h | Jump_Zero 0x67
0061 e40a | | Load 0x2,0xa
0062 e409 | | Load 0x2,0x9
0063 e404 | | Load 0x2,0x4
0064 82af | | Call 0x1,0xaf
0065 c409 | | Store 0x2,0x9
0066 c40a | | Store 0x2,0xa
0067 e407 | | Load 0x2,0x7
0068 e264 | d | Load 0x1,0x64
0069 181d | | Execute Package,Field_Execute,Field_Number 0x1d
006a 00d1 | | Pop_Control Pop_Count_1
006b 00c9 | | Action Pop_Auxiliary_Loop
006c e407 | | Load 0x2,0x7
006d e264 | d | Load 0x1,0x64
006e 181f | | Execute Package,Field_Execute,Field_Number 0x1f
006f 6fd1 |o | Jump_Zero 0x41
0070 00ce | | Action Pop_Auxiliary
0071 00db | | Load_Top At_Offset_3
0072 82ad | | Call 0x1,0xad
0073 6836 |h6 | Jump_Zero 0xaa
0074 e406 | | Load 0x2,0x6
0075 6813 |h | Jump_Zero 0x89
0076 4800 |H | Short_Literal 0x0
0077 4800 |H | Short_Literal 0x0
0078 4805 |H | Short_Literal 0x5
0079 0092 0124 | $| Action Push_String_Extended,0x124 ; "The iterator of defined "
007b e5fe | | Load 0x2,-0x2
007c e28d | | Load 0x1,0x8d
007d 01d7 | | Execute Vector,Field_Read
007e 0217 | | Execute Heap_Access,All_Reference
007f 01cc | | Execute Vector,Catenate
0080 0092 0125 | %| Action Push_String_Extended,0x125 ; " requirements is incomplete"
0082 01cc | | Execute Vector,Catenate
0083 0092 0126 | &| Action Push_String_Extended,0x126 ; " because of previous errors"
0085 01cc | | Execute Vector,Catenate
0086 00ea | | Load_Encached Null_String_Cache
0087 829d | | Call 0x1,0x9d
0088 781f |x | Jump 0xa8
0089 4800 |H | Short_Literal 0x0
008a 4800 |H | Short_Literal 0x0
008b 4805 |H | Short_Literal 0x5
008c 0092 0124 | $| Action Push_String_Extended,0x124 ; "The iterator of defined "
008e e5fe | | Load 0x2,-0x2
008f e28d | | Load 0x1,0x8d
0090 01d7 | | Execute Vector,Field_Read
0091 0217 | | Execute Heap_Access,All_Reference
0092 01cc | | Execute Vector,Catenate
0093 0092 0127 | '| Action Push_String_Extended,0x127 ; " requirements for "
0095 01cc | | Execute Vector,Catenate
0096 e5ff | | Load 0x2,-0x1
0097 e001 | | Load 0x0,0x1
0098 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0099 e001 | | Load 0x0,0x1
009a 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
009b 01cc | | Execute Vector,Catenate
009c 0092 0128 | (| Action Push_String_Extended,0x128 ; " component \x22"
009e 01cc | | Execute Vector,Catenate
009f e5ff | | Load 0x2,-0x1
00a0 e001 | | Load 0x0,0x1
00a1 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
00a2 01cc | | Execute Vector,Catenate
00a3 0092 0129 | )| Action Push_String_Extended,0x129 ; "\x22 is incomplete because of previous errors"
00a5 01cc | | Execute Vector,Catenate
00a6 00ea | | Load_Encached Null_String_Cache
00a7 829d | | Call 0x1,0x9d
00a8 821a | | Call 0x1,0x1a
00a9 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
00aa e409 | | Load 0x2,0x9
00ab 0229 | ) | Execute Access,All_Read
00ac e409 | | Load 0x2,0x9
00ad 0227 | ' | Execute Access,All_Reference
00ae 01dd | | Execute Vector,First
00af e40a | | Load 0x2,0xa
00b0 0aff | | Execute_Immediate Plus,-0x1
00b1 00da | | Load_Top At_Offset_2
00b2 035b | [ | Declare_Type Array,Constrained
00b3 00d0 | | Action Swap_Control
00b4 01cd | | Execute Vector,Slice_Reference
00b5 00d8 | | Load_Top At_Offset_0
00b6 8271 | q | Call 0x1,0x71
00b7 00d2 | | Pop_Control Pop_Count_2
00b8 e409 | | Load 0x2,0x9
00b9 0227 | ' | Execute Access,All_Reference
00ba 01dd | | Execute Vector,First
00bb e40a | | Load 0x2,0xa
00bc 0aff | | Execute_Immediate Plus,-0x1
00bd e409 | | Load 0x2,0x9
00be 0227 | ' | Execute Access,All_Reference
00bf 01cf | | Execute Vector,Slice_Read
00c0 0335 | 5 | Declare_Variable Array,Duplicate
00c1 00cd | | Action Spare6_Action
00c2 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
00c3 0000 0000 | | .BLANK 0000[0x5]
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 e40b | | Load 0x2,0xb
00cc 6805 |h | Jump_Zero 0xd2
00cd 00db | | Load_Top At_Offset_3
00ce 00db | | Load_Top At_Offset_3
00cf e001 | | Load 0x0,0x1
00d0 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
00d1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00d2 00db | | Load_Top At_Offset_3
00d3 00db | | Load_Top At_Offset_3
00d4 e001 | | Load 0x0,0x1
00d5 1880 | | Execute Package,Field_Execute,Field_Number 0x80
00d6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00d7 0000 | | .XXX[0x1]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00e0 | | .CONST 0x00e0 ; Address of begin
00d9 0004 | | .CONST 0x0004 ; Address of exception handler
00da 0003 | | .CONST 0x0003 ; Number of locals
00db INIT_00d8:
00db e405 | | Load 0x2,0x5
00dc e001 | | Load 0x0,0x1
00dd 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
00de 029f 0113 | | Declare_Subprogram INIT_0110,For_Call
00e0 BODY_00d8:
00e0 e403 | | Load 0x2,0x3
00e1 00da | | Load_Top At_Offset_2
00e2 01df | | Execute Vector,Equal
00e3 6802 |h | Jump_Zero 0xe6
00e4 4801 |H | Short_Literal 0x1
00e5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00e6 00cf | | Action Mark_Auxiliary
00e7 e7ff | | Load 0x3,-0x1
00e8 01d9 | | Execute Vector,Reverse_Bounds
00e9 0263 | c | Execute Discrete,Above_Bound
00ea 701b |p | Jump_Nonzero 0x106
00eb e602 | | Load 0x3,0x2
00ec 00d9 | | Load_Top At_Offset_1
00ed e7ff | | Load 0x3,-0x1
00ee 01d5 | | Execute Vector,Field_Reference
00ef e001 | | Load 0x0,0x1
00f0 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
00f1 01df | | Execute Vector,Equal
00f2 6802 |h | Jump_Zero 0xf5
00f3 4801 |H | Short_Literal 0x1
00f4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00f5 00d8 | | Load_Top At_Offset_0
00f6 e7ff | | Load 0x3,-0x1
00f7 01d5 | | Execute Vector,Field_Reference
00f8 e001 | | Load 0x0,0x1
00f9 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
00fa 0f08 | | Execute_Immediate Equal,0x8
00fb 7007 |p | Jump_Nonzero 0x103
00fc 00d8 | | Load_Top At_Offset_0
00fd e7ff | | Load 0x3,-0x1
00fe 01d5 | | Execute Vector,Field_Reference
00ff e001 | | Load 0x0,0x1
0100 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0101 0f07 | | Execute_Immediate Equal,0x7
0102 6801 |h | Jump_Zero 0x104
0103 8603 | | Call 0x3,0x3
0104 00c8 | | Action Pop_Auxiliary_Range
0105 3fe5 |? | Loop_Increasing 0xeb
0106 00ce | | Action Pop_Auxiliary
0107 4800 |H | Short_Literal 0x0
0108 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0109 0000 0000 | | .BLANK 0000[0x7]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0119 | | .CONST 0x0119 ; Address of begin
0111 0004 | | .CONST 0x0004 ; Address of exception handler
0112 0002 | | .CONST 0x0002 ; Number of locals
0113 INIT_0110:
0113 e5fd | | Load 0x2,-0x3
0114 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0115 e606 | | Load 0x3,0x6
0116 e7ff | | Load 0x3,-0x1
0117 01d5 | | Execute Vector,Field_Reference
0118 840c | | Call 0x2,0xc
0119 BODY_0110:
0119 00d8 | | Load_Top At_Offset_0
011a e001 | | Load 0x0,0x1
011b 181e | | Execute Package,Field_Execute,Field_Number 0x1e
011c 7006 |p | Jump_Nonzero 0x123
011d 00d8 | | Load_Top At_Offset_0
011e 840d | | Call 0x2,0xd
011f 6803 |h | Jump_Zero 0x123
0120 4801 |H | Short_Literal 0x1
0121 00cb | | Action Pop_Block_With_Result
0122 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0123 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0124 ; --------------------------------------------------------------------------------------
0124 ; STRING TABLE
0124 ; --------------------------------------------------------------------------------------
0124 000e | | .STRTAB 0x000e->0x012b ; "The iterator of defined "
0125 0024 | $ | .STRTAB 0x0024->0x0137 ; " requirements is incomplete"
0126 003d | = | .STRTAB 0x003d->0x0144 ; " because of previous errors"
0127 0056 | V | .STRTAB 0x0056->0x0152 ; " requirements for "
0128 0066 | f | .STRTAB 0x0066->0x015b ; " component \x22"
0129 0070 | p | .STRTAB 0x0070->0x0161 ; "\x22 is incomplete because of previous errors"
012a 0098 | | .STREND 0x0098->0x0176
012b 5468 6520 |The | .STRTAB_STRINGS
0176 0000 0000 | | .XXX[0x2]
0178 ; --------------------------------------------------------------------------------------
0178 ; Debug Table
0178 ; --------------------------------------------------------------------------------------
0178 0004 0012 | | .DEBUG4 0x0004,0x0012,0xc5a7,0x0000,0x0001,0x0000
017e c754 0401 | T | .XXX[0x82]
0180 34d6 9feb |4 |
0182 33b0 a040 |3 @|
0184 02b5 42b0 | B |
0186 7229 3699 |r)6 |
0188 644f 03e4 |dO |
018a 2401 6011 |$ ` |
018c c004 aa15 | |
018e 027e 7f3d | ~ =|
0190 6f05 3302 |o 3 |
0192 6df1 3e60 |m >`|
0194 2558 fdb8 |%X |
0196 09ca 29c6 | ) |
0198 9c2a 8026 | * &|
019a 81ac f85d | ]|
019c 0350 8201 | P |
019e 6702 905d |g ]|
01a0 1374 2371 | t#q|
01a2 eca0 02e9 | |
01a4 168c 0340 | @|
01a6 90a2 01e5 | |
01a8 01b1 c146 | F|
01aa f892 04fb | |
01ac 49a8 29d6 |I ) |
01ae 79e9 6c35 |y l5|
01b0 a3d1 5b9e | [ |
01b2 1b00 0381 | |
01b4 a9af d594 | |
01b6 856f f4a8 | o |
01b8 215c 0ea7 |!\ |
01ba cf53 87ab | S |
01bc 4f9a cae9 |O |
01be 6475 8694 |du |
01c0 17e2 a8ae | |
01c2 1610 5d84 | ] |
01c4 d587 8680 | |
01c6 8657 f57a | W z|
01c8 6424 7925 |d$y%|
01ca b001 9bd7 | |
01cc a992 8c04 | |
01ce 2942 dd02 |)B |
01d0 aea4 e7f9 | |
01d2 84ee 5302 | S |
01d4 6836 1b40 |h6 @|
01d6 c13d 6c28 | =l(|
01d8 2057 300a | W0 |
01da a736 3a81 | 6: |
01dc 9966 c299 | f |
01de 416e a047 |An G|
01e0 59b8 1fdd |Y |
01e2 d049 a987 | I |
01e4 74b5 c962 |t b|
01e6 3c04 835a |< Z|
01e8 f3aa 25d7 | % |
01ea 439e bd92 |C |
01ec c019 358a | 5 |
01ee b25e 242b | ^$+|
01f0 ad98 d70f | |
01f2 6848 86d7 |hH |
01f4 e560 0c19 | ` |
01f6 0b5b cfab | [ |
01f8 9fc8 03b9 | |
01fa 7bb4 5331 |{ S1|
01fc 5c7c d3db |\| |
01fe 5607 5b9e |V [ |