|
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_1060f5
└─⟦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 0168 | h | .CONST 0x0168 ; 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 0021 | ! | .CONST 0x0021 ; Address of begin
0019 005a | Z | .CONST 0x005a ; Address of exception handler
001a 0004 | | .CONST 0x0004 ; Number of locals
001b INIT_0018:
001b e001 | | Load 0x0,0x1
001c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
001d 00e1 | | Load_Encached Boolean_Cache
001e 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
001f 029f 009b | | Declare_Subprogram INIT_0098,For_Call
0021 BODY_0018:
0021 e5f9 | | Load 0x2,-0x7
0022 e002 | | Load 0x0,0x2
0023 180e | | Execute Package,Field_Execute,Field_Number 0xe
0024 e5f9 | | Load 0x2,-0x7
0025 e5fa | | Load 0x2,-0x6
0026 e5fb | | Load 0x2,-0x5
0027 e5fc | | Load 0x2,-0x4
0028 e5fd | | Load 0x2,-0x3
0029 e5fe | | Load 0x2,-0x2
002a e5ff | | Load 0x2,-0x1
002b e003 | | Load 0x0,0x3
002c 180f | | Execute Package,Field_Execute,Field_Number 0xf
002d e004 | | Load 0x0,0x4
002e 180f | | Execute Package,Field_Execute,Field_Number 0xf
002f e001 | | Load 0x0,0x1
0030 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0031 e5ff | | Load 0x2,-0x1
0032 e5fe | | Load 0x2,-0x2
0033 e001 | | Load 0x0,0x1
0034 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0035 005b | [ | Store_Top Discrete,At_Offset_3
0036 e5fa | | Load 0x2,-0x6
0037 6808 |h | Jump_Zero 0x40
0038 0092 00a4 | | Action Push_String_Extended,0xa4 ; "Using port number =>"
003a 00db | | Load_Top At_Offset_3
003b 00e0 | | Load_Encached Standard_Cache
003c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
003d 01cc | | Execute Vector,Catenate
003e e005 | | Load 0x0,0x5
003f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0040 0092 00a5 | | Action Push_String_Extended,0xa5 ; "Data Manager name => "
0042 e005 | | Load 0x0,0x5
0043 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0044 01cc | | Execute Vector,Catenate
0045 e005 | | Load 0x0,0x5
0046 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0047 0092 00a6 | | Action Push_String_Extended,0xa6 ; "Data Manager tcp/ip address => "
0049 e005 | | Load 0x0,0x5
004a 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
004b 01cc | | Execute Vector,Catenate
004c e005 | | Load 0x0,0x5
004d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
004e e5fa | | Load 0x2,-0x6
004f 7006 |p | Jump_Nonzero 0x56
0050 e5fc | | Load 0x2,-0x4
0051 e5fd | | Load 0x2,-0x3
0052 e5fb | | Load 0x2,-0x5
0053 e402 | | Load 0x2,0x2
0054 e006 | | Load 0x0,0x6
0055 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0056 e001 | | Load 0x0,0x1
0057 180f | | Execute Package,Field_Execute,Field_Number 0xf
0058 8404 | | Call 0x2,0x4
0059 4508 |E | Exit_Suprogram New_Top_Offset 0x8
005a TRAP_0018:
005a e001 | | Load 0x0,0x1
005b 1b10 | | Execute Package,Field_Read,Field_Number 0x10
005c 010f | | Execute Exception,Equal
005d 6806 |h | Jump_Zero 0x64
005e 0092 00a7 | | Action Push_String_Extended,0xa7 ; "Terminating because of a network problem starting the Illustrator"
0060 e005 | | Load 0x0,0x5
0061 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0062 8404 | | Call 0x2,0x4
0063 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0064 e001 | | Load 0x0,0x1
0065 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0066 010f | | Execute Exception,Equal
0067 6806 |h | Jump_Zero 0x6e
0068 0092 00a8 | | Action Push_String_Extended,0xa8 ; "Terminating because a specified context was invalid"
006a e005 | | Load 0x0,0x5
006b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
006c 8404 | | Call 0x2,0x4
006d 4508 |E | Exit_Suprogram New_Top_Offset 0x8
006e e006 | | Load 0x0,0x6
006f 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0070 010f | | Execute Exception,Equal
0071 680a |h | Jump_Zero 0x7c
0072 0092 00a9 | | Action Push_String_Extended,0xa9 ; "Terminating because of a remote shell error"
0074 e005 | | Load 0x0,0x5
0075 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0076 e001 | | Load 0x0,0x1
0077 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0078 e001 | | Load 0x0,0x1
0079 180f | | Execute Package,Field_Execute,Field_Number 0xf
007a 8404 | | Call 0x2,0x4
007b 4508 |E | Exit_Suprogram New_Top_Offset 0x8
007c e004 | | Load 0x0,0x4
007d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
007e 010f | | Execute Exception,Equal
007f 6806 |h | Jump_Zero 0x86
0080 0092 00aa | | Action Push_String_Extended,0xaa ; "Terminating because Insight is not authorized for this machine"
0082 e005 | | Load 0x0,0x5
0083 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0084 8404 | | Call 0x2,0x4
0085 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0086 e004 | | Load 0x0,0x4
0087 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0088 010f | | Execute Exception,Equal
0089 6806 |h | Jump_Zero 0x90
008a 0092 00ab | | Action Push_String_Extended,0xab ; "Terminating because the Insight token limit has been exceeded"
008c e005 | | Load 0x0,0x5
008d 1815 | | Execute Package,Field_Execute,Field_Number 0x15
008e 8404 | | Call 0x2,0x4
008f 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0090 8404 | | Call 0x2,0x4
0091 00d8 | | Load_Top At_Offset_0
0092 0101 | | Execute Exception,Reraise
0093 0000 0000 | | .BLANK 0000[0x5]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009b | | .CONST 0x009b ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0001 | | .CONST 0x0001 ; Number of locals
009b BODY_0098:
009b INIT_0098:
009b e403 | | Load 0x2,0x3
009c 6806 |h | Jump_Zero 0xa3
009d 4800 |H | Short_Literal 0x0
009e a403 | | Store_Unchecked 0x2,0x3
009f e003 | | Load 0x0,0x3
00a0 180e | | Execute Package,Field_Execute,Field_Number 0xe
00a1 e002 | | Load 0x0,0x2
00a2 180f | | Execute Package,Field_Execute,Field_Number 0xf
00a3 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00a4 ; --------------------------------------------------------------------------------------
00a4 ; STRING TABLE
00a4 ; --------------------------------------------------------------------------------------
00a4 0012 | | .STRTAB 0x0012->0x00ad ; "Using port number =>"
00a5 0028 | ( | .STRTAB 0x0028->0x00b9 ; "Data Manager name => "
00a6 0040 | @ | .STRTAB 0x0040->0x00c6 ; "Data Manager tcp/ip address => "
00a7 005d | ] | .STRTAB 0x005d->0x00d5 ; "Terminating because of a network problem starting the Illustrator"
00a8 009c | | .STRTAB 0x009c->0x00f6 ; "Terminating because a specified context was invalid"
00a9 00cd | | .STRTAB 0x00cd->0x010f ; "Terminating because of a remote shell error"
00aa 00f6 | | .STRTAB 0x00f6->0x0125 ; "Terminating because Insight is not authorized for this machine"
00ab 0132 | 2 | .STRTAB 0x0132->0x0144 ; "Terminating because the Insight token limit has been exceeded"
00ac 016d | m | .STREND 0x016d->0x0162
00ad 5573 696e |Usin| .STRTAB_STRINGS
0163 0000 0000 | | .BLANK 0000[0x5]
0168 ; --------------------------------------------------------------------------------------
0168 ; Debug Table
0168 ; --------------------------------------------------------------------------------------
0168 0004 0014 | | .DEBUG4 0x0004,0x0014,0x10b2,0x0000,0x0001,0x0000
016e 9000 730c | s | .XXX[0x92]
0170 0414 0550 | P|
0172 286e 57d3 |(nW |
0174 a3d5 d5db | |
0176 c410 9c03 | |
0178 de38 6d5f | 8m_|
017a 8fd0 00d3 | |
017c a8ea 5016 | P |
017e 0ca0 6c20 | l |
0180 3fda 1fd1 |? |
0182 f5e5 2918 | ) |
0184 e893 2bc2 | + |
0186 57d0 3c37 |W <7|
0188 54fb 515b |T Q[|
018a 0c78 a00f | x |
018c 3416 b16e |4 n|
018e 57d3 fd0e |W |
0190 9dc7 c7d1 | |
0192 cfd4 9fd5 | |
0194 48dd 1468 |H h|
0196 3fdb c639 |? 9|
0198 7436 d91a |t6 |
019a cfd1 9fd4 | |
019c ec0d a7d7 | |
019e efd2 bc8d | |
01a0 df92 8749 | I|
01a2 bfd4 a4a7 | |
01a4 5d4b 3274 |]K2t|
01a6 d121 719a | !q |
01a8 263d 9713 |&= |
01aa 350d c000 |5 |
01ac 670d a579 |g y|
01ae 211b 7baa |! { |
01b0 3efa 5c05 |> \ |
01b2 7012 57d2 |p W |
01b4 3fd7 7e9f |? ~ |
01b6 c7d2 7116 | q |
01b8 6378 a05a |cx Z|
01ba 3382 dcb8 |3 |
01bc ffdb a7d5 | |
01be 8002 97d0 | |
01c0 6bda 0c7c |k ||
01c2 7819 4fd8 |x O |
01c4 0511 e803 | |
01c6 a31b ebd5 | |
01c8 2918 2c5b |) ,[|
01ca 0817 dfa3 | |
01cc d20c bbd9 | |
01ce 4fd9 78b6 |O x |
01d0 3410 edfa |4 |
01d2 c3d1 c800 | |
01d4 d54d b801 | M |
01d6 7e70 9003 |~p |
01d8 fba9 6c7a | lz|
01da e270 e72e | p .|
01dc cc87 350d | 5 |
01de e802 3fd5 | ? |
01e0 d802 47d5 | G |
01e2 6b98 8464 |k d|
01e4 5801 d013 |X |
01e6 7364 7bdb |sd{ |
01e8 dc1d 211b | ! |
01ea 58e2 f038 |X 8|
01ec 4e50 9bd8 |NP |
01ee 0512 7c4d | |M|
01f0 2118 abd8 |! |
01f2 a02d d012 | - |
01f4 ca38 bbd8 | 8 |
01f6 34d9 1fc7 |4 |
01f8 cfd0 03da | |
01fa 93d1 a7da | |
01fc a7d0 af7c | ||
01fe ac48 8042 | H B|