|
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_ccb0b3
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦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 00e0 | | .CONST 0x00e0 ; 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 0010 | | .CONST 0x0010 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 002f | / | .CONST 0x002f ; Address of begin 0019 00bb | | .CONST 0x00bb ; Address of exception handler 001a 0008 | | .CONST 0x0008 ; Number of locals 001b INIT_0018: 001b e001 | | Load 0x0,0x1 001c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 001d 02c7 | | Declare_Variable Any 001e 00d8 | | Load_Top At_Offset_0 001f 1c00 | | Execute_Immediate Run_Utility,0x0 0020 e001 | | Load 0x0,0x1 0021 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0022 02c7 | | Declare_Variable Any 0023 00d8 | | Load_Top At_Offset_0 0024 1c00 | | Execute_Immediate Run_Utility,0x0 0025 e002 | | Load 0x0,0x2 0026 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0027 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0028 00e1 | | Load_Encached Boolean_Cache 0029 00e1 | | Load_Encached Boolean_Cache 002a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 002b e003 | | Load 0x0,0x3 002c 02ab | | Declare_Subprogram For_Call,With_Address 002d e004 | | Load 0x0,0x4 002e 02ab | | Declare_Subprogram For_Call,With_Address 002f BODY_0018: 002f 4800 |H | Short_Literal 0x0 0030 a5f7 | | Store_Unchecked 0x2,-0x9 0031 00cf | | Action Mark_Auxiliary 0032 e5fc | | Load 0x2,-0x4 0033 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0034 01dc | | Execute Vector,Last 0035 4801 |H | Short_Literal 0x1 0036 0263 | c | Execute Discrete,Above_Bound 0037 7082 |p | Jump_Nonzero 0xba 0038 00d8 | | Load_Top At_Offset_0 0039 e5fc | | Load 0x2,-0x4 003a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 003b 01d5 | | Execute Vector,Field_Reference 003c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 003d c402 | | Store 0x2,0x2 003e e5f8 | | Load 0x2,-0x8 003f 4800 |H | Short_Literal 0x0 0040 e402 | | Load 0x2,0x2 0041 e005 | | Load 0x0,0x5 0042 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0043 c403 | | Store 0x2,0x3 0044 e403 | | Load 0x2,0x3 0045 e001 | | Load 0x0,0x1 0046 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0047 012f | / | Execute Any,Equal 0048 6801 |h | Jump_Zero 0x4a 0049 4509 |E | Exit_Suprogram New_Top_Offset 0x9 004a e5f8 | | Load 0x2,-0x8 004b e403 | | Load 0x2,0x3 004c e005 | | Load 0x0,0x5 004d 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 004e 6815 |h | Jump_Zero 0x64 004f e006 | | Load 0x0,0x6 0050 180e | | Execute Package,Field_Execute,Field_Number 0xe 0051 4801 |H | Short_Literal 0x1 0052 4801 |H | Short_Literal 0x1 0053 e007 | | Load 0x0,0x7 0054 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0055 035b | [ | Declare_Type Array,Constrained 0056 0337 | 7 | Declare_Variable Array 0057 e402 | | Load 0x2,0x2 0058 e005 | | Load 0x0,0x5 0059 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 005a e007 | | Load 0x0,0x7 005b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 005c 0119 | | Execute Any,Check_In_Formal_Type 005d 4801 |H | Short_Literal 0x1 005e 00da | | Load_Top At_Offset_2 005f 01d6 | | Execute Vector,Field_Write 0060 6067 |`g | Indirect_Literal Discrete,0xc8,{0x00000000, 0x000081e0} 0061 e002 | | Load 0x0,0x2 0062 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0063 7854 |xT | Jump 0xb8 0064 e5f8 | | Load 0x2,-0x8 0065 e403 | | Load 0x2,0x3 0066 e005 | | Load 0x0,0x5 0067 1850 | P | Execute Package,Field_Execute,Field_Number 0x50 0068 a406 | | Store_Unchecked 0x2,0x6 0069 e002 | | Load 0x0,0x2 006a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 006b 00e1 | | Load_Encached Boolean_Cache 006c e5f8 | | Load 0x2,-0x8 006d e402 | | Load 0x2,0x2 006e e008 | | Load 0x0,0x8 006f 1845 | E | Execute Package,Field_Execute,Field_Number 0x45 0070 c405 | | Store 0x2,0x5 0071 c5f7 | | Store 0x2,-0x9 0072 e405 | | Load 0x2,0x5 0073 682f |h/ | Jump_Zero 0xa3 0074 e5f8 | | Load 0x2,-0x8 0075 e402 | | Load 0x2,0x2 0076 e008 | | Load 0x0,0x8 0077 1873 | s | Execute Package,Field_Execute,Field_Number 0x73 0078 6815 |h | Jump_Zero 0x8e 0079 e002 | | Load 0x0,0x2 007a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 007b e5f8 | | Load 0x2,-0x8 007c e406 | | Load 0x2,0x6 007d e5f9 | | Load 0x2,-0x7 007e e5fa | | Load 0x2,-0x6 007f e5fd | | Load 0x2,-0x3 0080 0119 | | Execute Any,Check_In_Formal_Type 0081 e5fb | | Load 0x2,-0x5 0082 e403 | | Load 0x2,0x3 0083 e402 | | Load 0x2,0x2 0084 8407 | | Call 0x2,0x7 0085 c404 | | Store 0x2,0x4 0086 4800 |H | Short_Literal 0x0 0087 e404 | | Load 0x2,0x4 0088 e002 | | Load 0x0,0x2 0089 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 008a 7003 |p | Jump_Nonzero 0x8e 008b e404 | | Load 0x2,0x4 008c a5f7 | | Store_Unchecked 0x2,-0x9 008d 4509 |E | Exit_Suprogram New_Top_Offset 0x9 008e e002 | | Load 0x0,0x2 008f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0090 e5f8 | | Load 0x2,-0x8 0091 e406 | | Load 0x2,0x6 0092 e5f9 | | Load 0x2,-0x7 0093 e5fa | | Load 0x2,-0x6 0094 e5fd | | Load 0x2,-0x3 0095 0119 | | Execute Any,Check_In_Formal_Type 0096 e5fb | | Load 0x2,-0x5 0097 e403 | | Load 0x2,0x3 0098 e402 | | Load 0x2,0x2 0099 8408 | | Call 0x2,0x8 009a c404 | | Store 0x2,0x4 009b 4800 |H | Short_Literal 0x0 009c e404 | | Load 0x2,0x4 009d e002 | | Load 0x0,0x2 009e 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 009f 7018 |p | Jump_Nonzero 0xb8 00a0 e404 | | Load 0x2,0x4 00a1 a5f7 | | Store_Unchecked 0x2,-0x9 00a2 4509 |E | Exit_Suprogram New_Top_Offset 0x9 00a3 e002 | | Load 0x0,0x2 00a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00a5 e5f8 | | Load 0x2,-0x8 00a6 e406 | | Load 0x2,0x6 00a7 e5f9 | | Load 0x2,-0x7 00a8 e5fa | | Load 0x2,-0x6 00a9 e5fd | | Load 0x2,-0x3 00aa 0119 | | Execute Any,Check_In_Formal_Type 00ab e5fb | | Load 0x2,-0x5 00ac e403 | | Load 0x2,0x3 00ad e402 | | Load 0x2,0x2 00ae 8407 | | Call 0x2,0x7 00af c404 | | Store 0x2,0x4 00b0 4800 |H | Short_Literal 0x0 00b1 e404 | | Load 0x2,0x4 00b2 e002 | | Load 0x0,0x2 00b3 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 00b4 7003 |p | Jump_Nonzero 0xb8 00b5 e404 | | Load 0x2,0x4 00b6 a5f7 | | Store_Unchecked 0x2,-0x9 00b7 4509 |E | Exit_Suprogram New_Top_Offset 0x9 00b8 00c8 | | Action Pop_Auxiliary_Range 00b9 3f7e |?~ | Loop_Increasing 0x38 00ba 4509 |E | Exit_Suprogram New_Top_Offset 0x9 00bb TRAP_0018: 00bb 0007 | | Action Break_Optional 00bc e5f8 | | Load 0x2,-0x8 00bd 0092 00cc | | Action Push_String_Extended,0xcc ; "Transfer_units" 00bf e009 | | Load 0x0,0x9 00c0 180f | | Execute Package,Field_Execute,Field_Number 0xf 00c1 0092 00cd | | Action Push_String_Extended,0xcd ; "download_files" 00c3 e009 | | Load 0x0,0x9 00c4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00c5 a5f7 | | Store_Unchecked 0x2,-0x9 00c6 4509 |E | Exit_Suprogram New_Top_Offset 0x9 00c7 0000 | | .XXX[0x1] 00c8 0000 0000 | | .LITERAL {0x00000000, 0x000081e0} 00cc ; -------------------------------------------------------------------------------------- 00cc ; STRING TABLE 00cc ; -------------------------------------------------------------------------------------- 00cc 0006 | | .STRTAB 0x0006->0x00cf ; "Transfer_units" 00cd 0012 | | .STRTAB 0x0012->0x00d6 ; "download_files" 00ce 001e | | .STREND 0x001e->0x00dd 00cf 5472 616e |Tran| .STRTAB_STRINGS 00dd 0000 0000 | | .XXX[0x3] 00df 0000 | | 00e0 ; -------------------------------------------------------------------------------------- 00e0 ; Debug Table 00e0 ; -------------------------------------------------------------------------------------- 00e0 0004 000f | | .DEBUG4 0x0004,0x000f,0x2f37,0x0000,0x0001,0x0000 00e6 c200 02ed | | .XXX[0x11] 00e8 e200 0000 | | 00ea 0000 0000 | | 00ec 2600 005c |& \| 00ee 8e00 02e3 | | 00f0 ea00 0000 | | 00f2 0000 0000 | | 00f4 2400 00a3 |$ | 00f6 0600 | | 00f7 0000 0000 | | .BLANK 0000[0x4] 00fb 0033 1000 | 3 | .XXX[0x2] 00fd 0000 0000 | | .BLANK 0000[0x4] 0101 012b 6e00 | +n | .XXX[0x2] 0103 0000 0000 | | .BLANK 0000[0x4] 0107 0091 ea00 | | .XXX[0xc] 0109 0226 d800 | & | 010b 0000 0000 | | 010d 0000 2200 | " | 010f 0061 ce00 | a | 0111 01a3 cc00 | | 0113 0000 0000 | | .BLANK 0000[0xe] 0121 001d e000 | | .XXX[0x4] 0123 03df a000 | | 0125 0000 0000 | | .BLANK 0000[0x5] 012a 1000 0001 | | .XXX[0x17] 012c 6000 000c |` | 012e 8000 0003 | | 0130 4000 0004 |@ | 0132 8000 c270 | p| 0134 0000 0001 | | 0136 2f21 650a |/!e | 0138 0000 cf6a | j| 013a 0000 0000 | | 013c 0400 0000 | | 013e 0000 0000 | | 0140 0040 | @ | 0141 0000 0000 | | .BLANK 0000[0xc] 014d 0003 7a60 | z`| .XXX[0x2] 014f 0000 0000 | | .BLANK 0000[0x5] 0154 0010 0000 | | .XXX[0x15] 0156 00a2 327a | 2z| 0158 721a a24a |r J| 015a 7a72 fa1a |zr | 015c 420a 4a72 |B Jr| 015e 293a 9a82 |): | 0160 2a18 0000 |* | 0162 67f8 0001 |g | 0164 2068 0001 | h | 0166 4798 0007 |G | 0168 1304 | | 0169 0000 0000 | | .BLANK 0000[0x12] 017b 000f c000 | | .XXX[0x27] 017d 0fa0 0000 | | 017f 1c70 8000 | p | 0181 6f2c 8000 |o, | 0183 0000 0000 | | 0185 0007 0000 | | 0187 1bf0 8000 | | 0189 6b97 8000 |k | 018b 0000 0000 | | 018d 0006 8000 | | 018f 0b14 0000 | | 0191 730a 0000 |s | 0193 0000 0000 | | 0195 0007 8000 | | 0197 74c3 8000 |t | 0199 bf34 8000 | 4 | 019b 0000 0000 | | 019d 000a 0000 | | 019f 1cf0 8000 | | 01a1 8980 | | 01a2 0000 0000 | | .BLANK 0000[0xa] 01ac 0002 825c | \| .XXX[0x8] 01ae 0000 0000 | | 01b0 0000 0778 | x| 01b2 0000 d09a | | 01b4 0000 0000 | | .BLANK 0000[0x5] 01b9 0004 0000 | | .XXX[0x13] 01bb 0058 0000 | X | 01bd 0320 0000 | | 01bf 00d0 0000 | | 01c1 0120 0030 | 0| 01c3 09c0 0000 | | 01c5 004b c9a8 | K | 01c7 4280 0034 |B 4| 01c9 21d6 0000 |! | 01cb 0001 | | 01cc 0000 0000 | | .BLANK 0000[0x4] 01d0 1000 | | .XXX[0x1] 01d1 0000 0000 | | .BLANK 0000[0xc] 01dd 0107 7e00 | ~ | .XXX[0x2] 01df 0000 0000 | | .BLANK 0000[0x5] 01e4 0400 0000 | | .XXX[0x17] 01e6 288c 9e9c |( | 01e8 86a8 929e | | 01ea 9cbe 8690 | | 01ec 8292 9c8a | | 01ee 4e84 9e88 |N | 01f0 b200 0152 | R| 01f2 2e00 00ef |. | 01f4 5c00 01b8 |\ | 01f6 8c00 0041 | A| 01f8 3c00 003f |< ?| 01fa 8800 | | 01fb 0000 0000 | | .BLANK 0000[0x5]