|
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 0118 | | .CONST 0x0118 ; 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 001d | | .CONST 0x001d ; Address of begin
0019 0066 | f | .CONST 0x0066 ; Address of exception handler
001a 0002 | | .CONST 0x0002 ; Number of locals
001b INIT_0018:
001b 0092 009b | | Action Push_String_Extended,0x9b ; "Generate_Postscript"
001d BODY_0018:
001d e5e3 | | Load 0x2,-0x1d
001e e001 | | Load 0x0,0x1
001f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0020 e5e3 | | Load 0x2,-0x1d
0021 e5e4 | | Load 0x2,-0x1c
0022 e5e5 | | Load 0x2,-0x1b
0023 e5e6 | | Load 0x2,-0x1a
0024 e5e7 | | Load 0x2,-0x19
0025 e5e8 | | Load 0x2,-0x18
0026 e5e9 | | Load 0x2,-0x17
0027 e5ea | | Load 0x2,-0x16
0028 e5eb | | Load 0x2,-0x15
0029 e5ec | | Load 0x2,-0x14
002a e5ed | | Load 0x2,-0x13
002b e5ee | | Load 0x2,-0x12
002c e5ef | | Load 0x2,-0x11
002d e5f0 | | Load 0x2,-0x10
002e e5f1 | | Load 0x2,-0xf
002f e5f2 | | Load 0x2,-0xe
0030 e5f3 | | Load 0x2,-0xd
0031 e5f4 | | Load 0x2,-0xc
0032 e5f5 | | Load 0x2,-0xb
0033 e5f6 | | Load 0x2,-0xa
0034 e5f7 | | Load 0x2,-0x9
0035 e5f8 | | Load 0x2,-0x8
0036 e5f9 | | Load 0x2,-0x7
0037 e5fa | | Load 0x2,-0x6
0038 e5fb | | Load 0x2,-0x5
0039 e5fc | | Load 0x2,-0x4
003a e5fd | | Load 0x2,-0x3
003b e5fe | | Load 0x2,-0x2
003c e5ff | | Load 0x2,-0x1
003d e402 | | Load 0x2,0x2
003e e002 | | Load 0x0,0x2
003f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0040 e003 | | Load 0x0,0x3
0041 180f | | Execute Package,Field_Execute,Field_Number 0xf
0042 e5e4 | | Load 0x2,-0x1c
0043 e5e5 | | Load 0x2,-0x1b
0044 e5e6 | | Load 0x2,-0x1a
0045 e5e7 | | Load 0x2,-0x19
0046 e5e8 | | Load 0x2,-0x18
0047 e5e9 | | Load 0x2,-0x17
0048 e5ea | | Load 0x2,-0x16
0049 e5eb | | Load 0x2,-0x15
004a e5ec | | Load 0x2,-0x14
004b e5ed | | Load 0x2,-0x13
004c e5ee | | Load 0x2,-0x12
004d e5ef | | Load 0x2,-0x11
004e e5f0 | | Load 0x2,-0x10
004f e5f1 | | Load 0x2,-0xf
0050 e5f2 | | Load 0x2,-0xe
0051 e5f3 | | Load 0x2,-0xd
0052 e5f4 | | Load 0x2,-0xc
0053 e5f5 | | Load 0x2,-0xb
0054 e5f6 | | Load 0x2,-0xa
0055 e5f7 | | Load 0x2,-0x9
0056 e5f8 | | Load 0x2,-0x8
0057 e5f9 | | Load 0x2,-0x7
0058 e5fa | | Load 0x2,-0x6
0059 e5fb | | Load 0x2,-0x5
005a e5fc | | Load 0x2,-0x4
005b e5fd | | Load 0x2,-0x3
005c e5fe | | Load 0x2,-0x2
005d e5ff | | Load 0x2,-0x1
005e e004 | | Load 0x0,0x4
005f 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0060 00d8 | | Load_Top At_Offset_0
0061 e002 | | Load 0x0,0x2
0062 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0063 e001 | | Load 0x0,0x1
0064 180f | | Execute Package,Field_Execute,Field_Number 0xf
0065 451e |E | Exit_Suprogram New_Top_Offset 0x1e
0066 TRAP_0018:
0066 e003 | | Load 0x0,0x3
0067 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0068 010f | | Execute Exception,Equal
0069 680f |h | Jump_Zero 0x79
006a 0092 009c | | Action Push_String_Extended,0x9c ; "Create_Defining_Diagram terminating because Insight is not authorized for this machine"
006c e005 | | Load 0x0,0x5
006d 1815 | | Execute Package,Field_Execute,Field_Number 0x15
006e e001 | | Load 0x0,0x1
006f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0070 6805 |h | Jump_Zero 0x76
0071 e001 | | Load 0x0,0x1
0072 180f | | Execute Package,Field_Execute,Field_Number 0xf
0073 e006 | | Load 0x0,0x6
0074 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0075 0257 | W | Execute Discrete,Raise
0076 e001 | | Load 0x0,0x1
0077 180f | | Execute Package,Field_Execute,Field_Number 0xf
0078 451e |E | Exit_Suprogram New_Top_Offset 0x1e
0079 e003 | | Load 0x0,0x3
007a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
007b 010f | | Execute Exception,Equal
007c 680f |h | Jump_Zero 0x8c
007d 0092 009d | | Action Push_String_Extended,0x9d ; "Create_Defining_Diagram terminating because the Insight token limit has been exceeded"
007f e005 | | Load 0x0,0x5
0080 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0081 e001 | | Load 0x0,0x1
0082 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0083 6805 |h | Jump_Zero 0x89
0084 e001 | | Load 0x0,0x1
0085 180f | | Execute Package,Field_Execute,Field_Number 0xf
0086 e006 | | Load 0x0,0x6
0087 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0088 0257 | W | Execute Discrete,Raise
0089 e001 | | Load 0x0,0x1
008a 180f | | Execute Package,Field_Execute,Field_Number 0xf
008b 451e |E | Exit_Suprogram New_Top_Offset 0x1e
008c e001 | | Load 0x0,0x1
008d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
008e 6805 |h | Jump_Zero 0x94
008f e001 | | Load 0x0,0x1
0090 180f | | Execute Package,Field_Execute,Field_Number 0xf
0091 e006 | | Load 0x0,0x6
0092 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0093 0257 | W | Execute Discrete,Raise
0094 0092 009e | | Action Push_String_Extended,0x9e ; "Background_Exception raised see above for details"
0096 e005 | | Load 0x0,0x5
0097 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0098 e001 | | Load 0x0,0x1
0099 180f | | Execute Package,Field_Execute,Field_Number 0xf
009a 451e |E | Exit_Suprogram New_Top_Offset 0x1e
009b ; --------------------------------------------------------------------------------------
009b ; STRING TABLE
009b ; --------------------------------------------------------------------------------------
009b 000a | | .STRTAB 0x000a->0x00a0 ; "Generate_Postscript"
009c 001b | | .STRTAB 0x001b->0x00a9 ; "Create_Defining_Diagram terminating because Insight is not authorized for this machine"
009d 006f | o | .STRTAB 0x006f->0x00d4 ; "Create_Defining_Diagram terminating because the Insight token limit has been exceeded"
009e 00c2 | | .STRTAB 0x00c2->0x00ff ; "Background_Exception raised see above for details"
009f 00f1 | | .STREND 0x00f1->0x0117
00a0 4765 6e65 |Gene| .STRTAB_STRINGS
0118 ; --------------------------------------------------------------------------------------
0118 ; Debug Table
0118 ; --------------------------------------------------------------------------------------
0118 0004 0014 | | .DEBUG4 0x0004,0x0014,0x1119,0x0000,0x0001,0x0000
011e 0005 6988 | i | .XXX[0xe]
0120 0000 0008 | |
0122 dc94 c850 | P|
0124 0000 0400 | |
0126 8000 0000 | |
0128 0039 d480 | 9 |
012a 0000 67a8 | g |
012c 0000 0000 | | .BLANK 0000[0x4]
0130 0039 d480 | 9 | .XXX[0x4]
0132 0000 67a8 | g |
0134 0000 0000 | | .BLANK 0000[0xa]
013e 4000 |@ | .XXX[0x1]
013f 0000 0000 | | .BLANK 0000[0x7]
0146 000e 7520 | u | .XXX[0x9]
0148 0000 19ea | |
014a 1000 0000 | |
014c 0000 0000 | |
014e 0002 | |
014f 0000 0000 | | .BLANK 0000[0x6]
0155 000e e07e | ~| .XXX[0xa]
0157 0000 0000 | |
0159 000e dcfc | |
015b 00e7 5200 | R |
015d 0001 9ea0 | |
015f 0000 0000 | | .BLANK 0000[0x4]
0163 372b c214 |7+ | .XXX[0x93]
0165 0002 074a | J|
0167 0000 0000 | |
0169 000e eb5e | ^|
016b 0000 0000 | |
016d 000f 0a07 | |
016f 007b 8900 | { |
0171 0000 cf50 | P|
0173 0200 0000 | |
0175 0200 0000 | |
0177 0000 0000 | |
0179 01ff 2000 | |
017b 0000 8000 | |
017d 0000 0001 | |
017f d85c 801e | \ |
0181 e240 0001 | @ |
0183 612a c01e |a* |
0185 e240 0000 | @ |
0187 33d4 001e |3 |
0189 e240 0000 | @ |
018b 33b1 8000 |3 |
018d 0000 0000 | |
018f 0000 001f | |
0191 3d40 0000 |=@ |
0193 33d4 0080 |3 |
0195 0000 010d | |
0197 cc60 8500 | ` |
0199 03bb 787f | x |
019b c800 0000 | |
019d 2000 0000 | |
019f 0000 7779 | wy|
01a1 7007 cf50 |p P|
01a3 0000 10df | |
01a5 4007 cf50 |@ P|
01a7 0000 0cf5 | |
01a9 0007 cf50 | P|
01ab 0000 0cec | |
01ad 6000 0000 |` |
01af 0000 0000 | |
01b1 0007 3a90 | : |
01b3 0000 0cf5 | |
01b5 0020 0000 | |
01b7 0063 7318 | cs |
01b9 2140 00ef |!@ |
01bb 205f f200 | _ |
01bd 0000 0800 | |
01bf 0000 0000 | |
01c1 1de6 a401 | |
01c3 cea4 0000 | |
01c5 074f cc01 | O |
01c7 cea4 0000 | |
01c9 033d 4001 | =@ |
01cb cea4 0000 | |
01cd 033b 1800 | ; |
01cf 0000 0000 | |
01d1 0000 006e | n|
01d3 5784 2800 |W ( |
01d5 0419 5e00 | ^ |
01d7 0000 0000 | |
01d9 0000 00ff | |
01db a000 0000 | |
01dd 6000 0000 |` |
01df 0000 ef77 | w|
01e1 6000 0000 |` |
01e3 0000 0000 | |
01e5 0372 bc21 | r !|
01e7 4000 211f |@ ! |
01e9 2372 bc21 |#r !|
01eb 4000 211f |@ ! |
01ed 2000 0000 | |
01ef 0000 0000 | |
01f1 0372 bc21 | r !|
01f3 4000 0bc7 |@ |
01f5 c000 | |
01f6 0000 0000 | | .BLANK 0000[0x6]
01fc f066 e000 | f | .XXX[0x4]
01fe 0000 2000 | |