|
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 0140 | @ | .CONST 0x0140 ; 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 0026 | & | .CONST 0x0026 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 000d | | .CONST 0x000d ; Number of locals
000b INIT_0008:
000b 00e1 | | Load_Encached Boolean_Cache
000c 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
000d 029f 0043 | C| Declare_Subprogram INIT_0040,For_Call
000f 029f 0063 | c| Declare_Subprogram INIT_0060,For_Call
0011 029f 008b | | Declare_Subprogram INIT_0088,For_Call
0013 029f 00db | | Declare_Subprogram INIT_00d8,For_Call
0015 e004 | | Load 0x0,0x4
0016 197d | } | Execute Package,Field_Reference,Field_Number 0x7d
0017 00c6 | | Action Check_Subprogram_Elaborated
0018 00e1 | | Load_Encached Boolean_Cache
0019 4805 |H | Short_Literal 0x5
001a 4803 |H | Short_Literal 0x3
001b 0099 | | Action Reference_Dynamic
001c 4806 |H | Short_Literal 0x6
001d 4803 |H | Short_Literal 0x3
001e 0099 | | Action Reference_Dynamic
001f 4804 |H | Short_Literal 0x4
0020 4803 |H | Short_Literal 0x3
0021 0099 | | Action Reference_Dynamic
0022 e043 | C | Load 0x0,0x43
0023 e044 | D | Load 0x0,0x44
0024 480d |H | Short_Literal 0xd
0025 0007 | | Action Break_Optional
0026 BODY_0008:
0026 e7ff | | Load 0x3,-0x1
0027 8603 | | Call 0x3,0x3
0028 a403 | | Store_Unchecked 0x2,0x3
0029 e403 | | Load 0x2,0x3
002a 6814 |h | Jump_Zero 0x3f
002b e602 | | Load 0x3,0x2
002c 4801 |H | Short_Literal 0x1
002d e28a | | Load 0x1,0x8a
002e e7ff | | Load 0x3,-0x1
002f e607 | | Load 0x3,0x7
0030 4808 |H | Short_Literal 0x8
0031 4803 |H | Short_Literal 0x3
0032 0099 | | Action Reference_Dynamic
0033 4809 |H | Short_Literal 0x9
0034 4803 |H | Short_Literal 0x3
0035 0099 | | Action Reference_Dynamic
0036 480a |H | Short_Literal 0xa
0037 4803 |H | Short_Literal 0x3
0038 0099 | | Action Reference_Dynamic
0039 480b |H | Short_Literal 0xb
003a 4803 |H | Short_Literal 0x3
003b 0099 | | Action Reference_Dynamic
003c e004 | | Load 0x0,0x4
003d 187d | } | Execute Package,Field_Execute,Field_Number 0x7d
003e c602 | | Store 0x3,0x2
003f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 0047 | G | .CONST 0x0047 ; Address of begin
0041 0004 | | .CONST 0x0004 ; Address of exception handler
0042 0002 | | .CONST 0x0002 ; Number of locals
0043 INIT_0040:
0043 e28a | | Load 0x1,0x8a
0044 00db | | Load_Top At_Offset_3
0045 e004 | | Load 0x0,0x4
0046 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0047 BODY_0040:
0047 00cf | | Action Mark_Auxiliary
0048 00d9 | | Load_Top At_Offset_1
0049 01d9 | | Execute Vector,Reverse_Bounds
004a 0263 | c | Execute Discrete,Above_Bound
004b 700b |p | Jump_Nonzero 0x57
004c 00d8 | | Load_Top At_Offset_0
004d e802 | | Load 0x4,0x2
004e 01d7 | | Execute Vector,Field_Read
004f e004 | | Load 0x0,0x4
0050 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0051 0f07 | | Execute_Immediate Equal,0x7
0052 6802 |h | Jump_Zero 0x55
0053 4801 |H | Short_Literal 0x1
0054 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0055 00c8 | | Action Pop_Auxiliary_Range
0056 3ff5 |? | Loop_Increasing 0x4c
0057 00ce | | Action Pop_Auxiliary
0058 4800 |H | Short_Literal 0x0
0059 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
005a 0000 0000 | | .BLANK 0000[0x6]
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 006c | l | .CONST 0x006c ; Address of begin
0061 0004 | | .CONST 0x0004 ; Address of exception handler
0062 0003 | | .CONST 0x0003 ; Number of locals
0063 INIT_0060:
0063 4801 |H | Short_Literal 0x1
0064 00db | | Load_Top At_Offset_3
0065 e249 | I | Load 0x1,0x49
0066 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0067 00ea | | Load_Encached Null_String_Cache
0068 4800 |H | Short_Literal 0x0
0069 e9ff | | Load 0x4,-0x1
006a e249 | I | Load 0x1,0x49
006b 181f | | Execute Package,Field_Execute,Field_Number 0x1f
006c BODY_0060:
006c e9ff | | Load 0x4,-0x1
006d e004 | | Load 0x0,0x4
006e 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
006f 0f07 | | Execute_Immediate Equal,0x7
0070 7001 |p | Jump_Nonzero 0x72
0071 780d |x | Jump 0x7f
0072 4807 |H | Short_Literal 0x7
0073 8262 | b | Call 0x1,0x62
0074 00d9 | | Load_Top At_Offset_1
0075 00db | | Load_Top At_Offset_3
0076 8282 | | Call 0x1,0x82
0077 4801 |H | Short_Literal 0x1
0078 480e |H | Short_Literal 0xe
0079 8262 | b | Call 0x1,0x62
007a e00f | | Load 0x0,0xf
007b 1b16 | | Execute Package,Field_Read,Field_Number 0x16
007c 0092 00f8 | | Action Push_String_Extended,0xf8 ; "This component has already been summarized, see above for complete decomposition."
007e 8286 | | Call 0x1,0x86
007f 4800 |H | Short_Literal 0x0
0080 a9fd | | Store_Unchecked 0x4,-0x3
0081 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0082 0000 0000 | | .BLANK 0000[0x6]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 0094 | | .CONST 0x0094 ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0003 | | .CONST 0x0003 ; Number of locals
008b INIT_0088:
008b 4801 |H | Short_Literal 0x1
008c 00db | | Load_Top At_Offset_3
008d e249 | I | Load 0x1,0x49
008e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
008f 00ea | | Load_Encached Null_String_Cache
0090 4800 |H | Short_Literal 0x0
0091 e9ff | | Load 0x4,-0x1
0092 e249 | I | Load 0x1,0x49
0093 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0094 BODY_0088:
0094 4800 |H | Short_Literal 0x0
0095 a9fd | | Store_Unchecked 0x4,-0x3
0096 e9ff | | Load 0x4,-0x1
0097 e004 | | Load 0x0,0x4
0098 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0099 0aff | | Execute_Immediate Plus,-0x1
009a 460a |F | Jump_Case 0xb
009b 780a |x | Jump 0xa6 ; case 0x0
009c 7809 |x | Jump 0xa6 ; case 0x1
009d 7808 |x | Jump 0xa6 ; case 0x2
009e 7807 |x | Jump 0xa6 ; case 0x3
009f 7809 |x | Jump 0xa9 ; case 0x4
00a0 7805 |x | Jump 0xa6 ; case 0x5
00a1 780e |x | Jump 0xb0 ; case 0x6
00a2 7803 |x | Jump 0xa6 ; case 0x7
00a3 7802 |x | Jump 0xa6 ; case 0x8
00a4 7801 |x | Jump 0xa6 ; case 0x9
00a5 7800 |x | Jump 0xa6 ; case 0xa
00a6 4801 |H | Short_Literal 0x1
00a7 a9fd | | Store_Unchecked 0x4,-0x3
00a8 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00a9 4806 |H | Short_Literal 0x6
00aa 8262 | b | Call 0x1,0x62
00ab e265 | e | Load 0x1,0x65
00ac 0092 00f9 | | Action Push_String_Extended,0xf9 ; "CSC Summaries and Relationships"
00ae 8281 | | Call 0x1,0x81
00af 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00b0 4807 |H | Short_Literal 0x7
00b1 8262 | b | Call 0x1,0x62
00b2 00d9 | | Load_Top At_Offset_1
00b3 00db | | Load_Top At_Offset_3
00b4 8282 | | Call 0x1,0x82
00b5 4801 |H | Short_Literal 0x1
00b6 480e |H | Short_Literal 0xe
00b7 8262 | b | Call 0x1,0x62
00b8 00ea | | Load_Encached Null_String_Cache
00b9 4812 |H | Short_Literal 0x12
00ba e9ff | | Load 0x4,-0x1
00bb e249 | I | Load 0x1,0x49
00bc 181e | | Execute Package,Field_Execute,Field_Number 0x1e
00bd 4812 |H | Short_Literal 0x12
00be e9ff | | Load 0x4,-0x1
00bf e249 | I | Load 0x1,0x49
00c0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00c1 8286 | | Call 0x1,0x86
00c2 e9ff | | Load 0x4,-0x1
00c3 8603 | | Call 0x3,0x3
00c4 680d |h | Jump_Zero 0xd2
00c5 4801 |H | Short_Literal 0x1
00c6 e2d0 | | Load 0x1,0xd0
00c7 e00f | | Load 0x0,0xf
00c8 1b32 | 2 | Execute Package,Field_Read,Field_Number 0x32
00c9 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00ca 4806 |H | Short_Literal 0x6
00cb 8262 | b | Call 0x1,0x62
00cc 00d9 | | Load_Top At_Offset_1
00cd 00db | | Load_Top At_Offset_3
00ce 0092 00fa | | Action Push_String_Extended,0xfa ; " Decomposition"
00d0 01cc | | Execute Vector,Catenate
00d1 8281 | | Call 0x1,0x81
00d2 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00d3 0000 0000 | | .BLANK 0000[0x5]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db | | .CONST 0x00db ; Address of begin
00d9 0004 | | .CONST 0x0004 ; Address of exception handler
00da 0001 | | .CONST 0x0001 ; Number of locals
00db BODY_00d8:
00db INIT_00d8:
00db 4800 |H | Short_Literal 0x0
00dc a9fd | | Store_Unchecked 0x4,-0x3
00dd 00da | | Load_Top At_Offset_2
00de e004 | | Load 0x0,0x4
00df 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
00e0 0aff | | Execute_Immediate Plus,-0x1
00e1 460a |F | Jump_Case 0xb
00e2 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x0
00e3 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x1
00e4 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x2
00e5 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x3
00e6 780d |x | Jump 0xf4 ; case 0x4
00e7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x5
00e8 7804 |x | Jump 0xed ; case 0x6
00e9 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x7
00ea 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x8
00eb 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x9
00ec 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0xa
00ed 00da | | Load_Top At_Offset_2
00ee 8603 | | Call 0x3,0x3
00ef 6803 |h | Jump_Zero 0xf3
00f0 e264 | d | Load 0x1,0x64
00f1 e265 | e | Load 0x1,0x65
00f2 826e | n | Call 0x1,0x6e
00f3 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00f4 e264 | d | Load 0x1,0x64
00f5 e265 | e | Load 0x1,0x65
00f6 826e | n | Call 0x1,0x6e
00f7 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00f8 ; --------------------------------------------------------------------------------------
00f8 ; STRING TABLE
00f8 ; --------------------------------------------------------------------------------------
00f8 0008 | | .STRTAB 0x0008->0x00fc ; "This component has already been summarized, see above for complete decomposition."
00f9 0057 | W | .STRTAB 0x0057->0x0124 ; "CSC Summaries and Relationships"
00fa 0074 | t | .STRTAB 0x0074->0x0134 ; " Decomposition"
00fb 0080 | | .STREND 0x0080->0x013b
00fc 5468 6973 |This| .STRTAB_STRINGS
013b 0000 0000 | | .BLANK 0000[0x5]
0140 ; --------------------------------------------------------------------------------------
0140 ; Debug Table
0140 ; --------------------------------------------------------------------------------------
0140 0004 0012 | | .DEBUG4 0x0004,0x0012,0xfc78,0x0000,0x0001,0x0000
0146 3824 e1ce |8$ | .XXX[0xba]
0148 88a3 4173 | As|
014a 4c32 a94d |L2 M|
014c 5b59 89a2 |[Y |
014e 0933 0015 | 3 |
0150 5843 7023 |XCp#|
0152 7b00 5a08 |{ Z |
0154 7dc8 7ae0 |} z |
0156 3db0 70ac |= p |
0158 122e 3467 | .4g|
015a 06e9 9ac9 | |
015c 2c9d 62d3 |, b |
015e c67d c9d7 | } |
0160 3625 c1d2 |6% |
0162 dd83 3645 | 6E|
0164 1a59 7974 | Yyt|
0166 315a d9b9 |1Z |
0168 905f 9ef0 | _ |
016a 61ba c21b |a |
016c 554f c038 |UO 8|
016e db4b 2a3b | K*;|
0170 02a4 4cc3 | L |
0172 6444 6758 |dDgX|
0174 d3ec 4258 | BX|
0176 8b1c aa12 | |
0178 86f8 6030 | `0|
017a 2592 3d66 |% =f|
017c 6dae 545c |m T\|
017e 7160 3bf9 |q`; |
0180 d9a9 7832 | x2|
0182 c1d2 f91e | |
0184 8403 40b9 | @ |
0186 8917 fbda | |
0188 09ec 683c | h<|
018a e493 af8e | |
018c 2e35 8725 |.5 %|
018e 858d 50b8 | P |
0190 7804 9658 |x X|
0192 8c6d c994 | m |
0194 e6ce 42a4 | B |
0196 2ec1 6180 |. a |
0198 aed5 2863 | (c|
019a 2ea3 8ffc |. |
019c 5905 382f |Y 8/|
019e b160 5a4e | `ZN|
01a0 9fd5 6b1d | k |
01a2 bf96 2295 | " |
01a4 685c 052c |h\ ,|
01a6 5210 b14c |R L|
01a8 888e 2f17 | / |
01aa b313 8be7 | |
01ac a130 1756 | 0 V|
01ae a6b2 f0c5 | |
01b0 7450 b883 |tP |
01b2 4b3a a304 |K: |
01b4 ce7d 5b90 | }[ |
01b6 ad42 e473 | B s|
01b8 8daf 178f | |
01ba 72e2 ceb4 |r |
01bc 612a 8636 |a* 6|
01be f057 a73e | W >|
01c0 a077 6f30 | wo0|
01c2 5168 3b19 |Qh; |
01c4 e240 b1a9 | @ |
01c6 5dc7 c232 |] 2|
01c8 9b1d 8aac | |
01ca 501d ad5d |P ]|
01cc 718c b947 |q G|
01ce 6f2a cff5 |o* |
01d0 8b55 7706 | Uw |
01d2 b9f1 5cfa | \ |
01d4 25e6 093c |% <|
01d6 e1ef 96f2 | |
01d8 8868 b10c | h |
01da 8d63 68ae | ch |
01dc 07d5 be31 | 1|
01de 602b 5f7a |`+_z|
01e0 bc69 5f7d | i_}|
01e2 5cb3 33a7 |\ 3 |
01e4 41b7 eea0 |A |
01e6 8cbd 1d5e | ^|
01e8 6158 2961 |aX)a|
01ea a80b 2c30 | ,0|
01ec a7e2 dcf7 | |
01ee 0b09 b0dc | |
01f0 890d 6383 | c |
01f2 b448 5bc1 | H[ |
01f4 eb9e 1ae2 | |
01f6 4985 44f0 |I D |
01f8 c244 f4b3 | D |
01fa e1d8 412e | A.|
01fc 3b1a 594e |; YN|
01fe 2991 8c12 |) |