|
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_03b8fe
└─⟦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 0028 | ( | .CONST 0x0028 ; 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 001b | | .CONST 0x001b ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0001 | | .CONST 0x0001 ; Number of locals 001b BODY_0018: 001b INIT_0018: 001b e001 | | Load 0x0,0x1 001c 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 001d e002 | | Load 0x0,0x2 001e 1817 | | Execute Package,Field_Execute,Field_Number 0x17 001f e003 | | Load 0x0,0x3 0020 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0021 e004 | | Load 0x0,0x4 0022 180d | | Execute Package,Field_Execute,Field_Number 0xd 0023 e005 | | Load 0x0,0x5 0024 180d | | Execute Package,Field_Execute,Field_Number 0xd 0025 e006 | | Load 0x0,0x6 0026 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0027 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0028 ; -------------------------------------------------------------------------------------- 0028 ; Debug Table 0028 ; -------------------------------------------------------------------------------------- 0028 0004 000b | | .DEBUG4 0x0004,0x000b,0xbb4c,0x0000,0x0001,0x0000 002e 0000 003f | ?| .XXX[0x1a] 0030 0018 84fe | | 0032 0800 0110 | | 0034 0000 021e | | 0036 0000 005e | ^| 0038 0001 0404 | | 003a 0000 0016 | | 003c 001d a009 | | 003e 0000 13b2 | | 0040 0001 0404 | | 0042 0800 0280 | | 0044 0000 0008 | | 0046 0000 0008 | | 0048 0000 0000 | | .BLANK 0000[0x7] 004f 00ff 0001 | | .XXX[0x11] 0051 0404 0000 | | 0053 0016 001d | | 0055 a009 0000 | | 0057 13b2 0001 | | 0059 0404 0800 | | 005b 0280 0000 | | 005d 0010 0000 | | 005f 0010 | | 0060 0000 0000 | | .BLANK 0000[0x7] 0067 ffff 0000 | | .XXX[0x5] 0069 0000 0000 | | 006b 0076 | v | 006c 0000 0000 | | .BLANK 0000[0x4] 0070 0018 7cfe | | | .XXX[0x26] 0072 c000 0796 | | 0074 0000 0040 | @| 0076 0000 0040 | @| 0078 0018 80fe | | 007a 8000 0002 | | 007c 00b9 d014 | | 007e 0000 3731 | 71| 0080 0018 84fe | | 0082 8000 000a | | 0084 0018 80fe | | 0086 0000 0000 | | 0088 6527 2027 |e' '| 008a 3d3e 2720 |=>' | 008c 5231 3030 |R100| 008e 305f 5061 |0_Pa| 0090 7468 6e61 |thna| 0092 6d65 3200 |me2 | 0094 4d2d 2d20 |M-- | 0096 2020 2020 | | .BLANK 2020[0x8] 009e 203a 3a3d | ::=| .XXX[0x20] 00a0 2027 576f | 'Wo| 00a2 726b 7374 |rkst| 00a4 6174 696f |atio| 00a6 6e27 2027 |n' '| 00a8 3d3e 2720 |=>' | 00aa 486f 7374 |Host| 00ac 5f4e 616d |_Nam| 00ae 6520 272c |e ',| 00b0 2720 2750 |' 'P| 00b2 6174 6827 |ath'| 00b4 2027 3d3e | '=>| 00b6 2720 5061 |' Pa| 00b8 7468 6e61 |thna| 00ba 6d65 4d00 |meM | 00bc 352d 2d20 |5-- | 00be 2020 2020 | | .BLANK 2020[0xc] 00ca 2027 5375 | 'Su| .XXX[0x1d] 00cc 6666 6978 |ffix| 00ce 2720 273d |' '=| 00d0 3e27 2053 |>' S| 00d2 7566 6669 |uffi| 00d4 785f 4e61 |x_Na| 00d6 6d65 3500 |me5 | 00d8 172d 2d20 | -- | 00da 2044 6576 | Dev| 00dc 6963 655f |ice_| 00de 4f70 7469 |Opti| 00e0 6f6e 7320 |ons | 00e2 203a 3a3d | ::=| 00e4 1700 282d | (-| 00e6 2d20 |- | 00e7 2020 2020 | | .BLANK 2020[0x8] 00ef 203a 3a3d | ::=| .XXX[0xd] 00f1 2027 2c27 | ','| 00f3 2027 4c61 | 'La| 00f5 7365 725f |ser_| 00f7 436f 6d6d |Comm| 00f9 2728 003b |'( ;| 00fb 2d2d |-- | 00fc 2020 2020 | | .BLANK 2020[0xb] 0107 2820 272c |( ',| .XXX[0x2e] 0109 2720 2827 |' ('| 010b 7e27 2920 |~') | 010d 2752 6576 |'Rev| 010f 6572 7365 |erse| 0111 5f4f 7574 |_Out| 0113 7075 745f |put_| 0115 5061 6765 |Page| 0117 7327 293b |s');| 0119 0002 2d2d | --| 011b 0200 222d | "-| 011d 2d20 2050 |- P| 011f 7269 6e74 |rint| 0121 6572 5f4e |er_N| 0123 616d 6520 |ame | 0125 2020 203a | :| 0127 3a3d 2069 |:= i| 0129 6465 6e74 |dent| 012b 6966 6965 |ifie| 012d 7222 002a |r" *| 012f 2d2d 2020 |-- | 0131 5072 6f74 |Prot| 0133 6f63 6f6c |ocol| 0135 2020 2020 | | .BLANK 2020[0x4] 0139 3a3a 3d20 |::= | .XXX[0x86] 013b 2758 6f6e |'Xon| 013d 5f58 6f66 |_Xof| 013f 6627 207c |f' || 0141 2027 5274 | 'Rt| 0143 7327 2a00 |s'* | 0145 392d 2d20 |9-- | 0147 2054 6572 | Ter| 0149 6d5f 4e75 |m_Nu| 014b 6d62 6572 |mber| 014d 2020 2020 | | 014f 203a 3a3d | ::=| 0151 2069 6465 | ide| 0153 6e74 6966 |ntif| 0155 6965 7220 |ier | 0157 2020 2020 | | 0159 202d 2d20 | -- | 015b 6567 2054 |eg T| 015d 6572 6d69 |ermi| 015f 6e61 6c5f |nal_| 0161 3233 3900 |239 | 0163 222d 2d20 |"-- | 0165 2048 6f73 | Hos| 0167 745f 4e61 |t_Na| 0169 6d65 2020 |me | 016b 2020 2020 | | 016d 203a 3a3d | ::=| 016f 2069 6465 | ide| 0171 6e74 6966 |ntif| 0173 6965 7222 |ier"| 0175 0029 2d2d | )--| 0177 2020 5061 | Pa| 0179 7468 5f4e |th_N| 017b 616d 6520 |ame | 017d 2020 2020 | | 017f 2020 3a3a | ::| 0181 3d20 636f |= co| 0183 6e74 6967 |ntig| 0185 756f 7573 |uous| 0187 5f73 7472 |_str| 0189 696e 6729 |ing)| 018b 0029 2d2d | )--| 018d 2020 5375 | Su| 018f 6666 6978 |ffix| 0191 5f4e 616d |_Nam| 0193 6520 2020 |e | 0195 2020 3a3a | ::| 0197 3d20 636f |= co| 0199 6e74 6967 |ntig| 019b 756f 7573 |uous| 019d 5f73 7472 |_str| 019f 696e 6729 |ing)| 01a1 0035 2d2d | 5--| 01a3 2020 5175 | Qu| 01a5 6575 655f |eue_| 01a7 4d61 6368 |Mach| 01a9 696e 6520 |ine | 01ab 2020 3a3a | ::| 01ad 3d20 272c |= ',| 01af 2720 274f |' 'O| 01b1 6e5f 4e6f |n_No| 01b3 6465 2720 |de' | 01b5 273d 3e27 |'=>'| 01b7 2069 6465 | ide| 01b9 6e74 6966 |ntif| 01bb 6965 7235 |ier5| 01bd 0049 2d2d | I--| 01bf 2020 2020 | | .BLANK 2020[0x9] 01c8 3a3a 3d20 |::= | .XXX[0x2] 01ca 2020 2020 | | .BLANK 2020[0xa] 01d4 2d2d 2061 |-- a| .XXX[0x2c] 01d6 6c6c 206e |ll n| 01d8 6f64 6573 |odes| 01da 2069 6620 | if | 01dc 6e6f 7420 |not | 01de 7370 6563 |spec| 01e0 6966 6965 |ifie| 01e2 6449 0002 |dI | 01e4 2d2d 0200 |-- | 01e6 322d 2d20 |2-- | 01e8 4561 6368 |Each| 01ea 2065 6e74 | ent| 01ec 7279 2069 |ry i| 01ee 6e20 7468 |n th| 01f0 6520 6669 |e fi| 01f2 6c65 2070 |le p| 01f4 726f 7669 |rovi| 01f6 6465 7320 |des | 01f8 696e 666f |info| 01fa 726d 6174 |rmat| 01fc 696f 6e20 |ion | 01fe 6162 6f32 |abo2|