|
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 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 5d33 7142 |]3qB| .XXX[0xe2]
0120 3711 4984 |7 I |
0122 1b90 5311 | S |
0124 80f9 582f | X/|
0126 b9aa 3612 | 6 |
0128 91d1 6b90 | k |
012a e234 2629 | 4&)|
012c 8c33 518b | 3Q |
012e 7080 7be0 |p { |
0130 0060 0c0a | ` |
0132 6a2d 8c33 |j- 3|
0134 b180 ef48 | H|
0136 f8c4 81e5 | |
0138 ad36 10c5 | 6 |
013a 4283 a44e |B N|
013c ee14 3100 | 1 |
013e 2ce8 eb1f |, |
0140 007c 6074 | |`t|
0142 740c 9866 |t f|
0144 59cc 3391 |Y 3 |
0146 84b8 38ca | 8 |
0148 0272 a4f3 | r |
014a 2103 ae13 |! |
014c 9480 0db1 | |
014e 60fe a02f |` /|
0150 48e3 2001 |H |
0152 6257 8c90 |bW |
0154 0c7e 6faa | ~o |
0156 4c32 917c |L2 ||
0158 b938 cb42 | 8 B|
015a 9aa4 f325 | %|
015c 00f8 e123 | #|
015e 4002 ed16 |@ |
0160 3dd3 90a0 |= |
0162 0e5c 6236 | \b6|
0164 8c33 a1ae | 3 |
0166 1b15 c885 | |
0168 3261 572d |2aW-|
016a 01b5 1b8c | |
016c b00e 3166 | 1f|
016e 3b4c 3131 |;L11|
0170 b2f9 4836 | H6|
0172 807c b5b2 | | |
0174 a93c cc82 | < |
0176 2f06 08c9 |/ |
0178 1436 4170 | 6Ap|
017a e4eb 3a03 | : |
017c b915 2760 | '`|
017e 0306 1035 | 5|
0180 0211 84e7 | |
0182 3903 3890 |9 8 |
0184 a174 48d8 | tH |
0186 00ef e001 | |
0188 000c 9b69 | i|
018a 3920 5179 |9 Qy|
018c ab55 00ae | U |
018e e04e c927 | N '|
0190 8980 d442 | B|
0192 53b5 20df |S |
0194 028b d04e | N|
0196 a8f3 5602 | V |
0198 ff94 af65 | e|
019a 251a 1545 |% E|
019c 6035 8158 |`5 X|
019e d238 d480 | 8 |
01a0 2aa8 fb58 |* X|
01a2 030a 987b | {|
01a4 a459 df48 | Y H|
01a6 f120 58ea | X |
01a8 1724 159c | $ |
01aa 10d5 751b | u |
01ac 5a03 629c |Z b |
01ae 78a4 5f33 |x _3|
01b0 1645 cc36 | E 6|
01b2 51a6 8744 |Q D|
01b4 d5c2 3744 | 7D|
01b6 e362 00d7 | b |
01b8 a3a1 a00c | |
01ba 2985 d290 |) |
01bc 3682 0e77 |6 w|
01be 490e 8574 |I t|
01c0 70e7 7103 |p q |
01c2 2698 7975 |& yu|
01c4 28aa 01ee |( |
01c6 0461 b990 | a |
01c8 ba3a d1cb | : |
01ca 91d0 0c9a | |
01cc 862f 4c34 | /L4|
01ce c1a8 a93c | <|
01d0 df42 ad15 | B |
01d2 1f78 01ae | x |
01d4 9bc9 e00d | |
01d6 606d 9f61 |`m a|
01d8 f744 e37d | D }|
01da 0106 638e | c |
01dc 70b1 1c38 |p 8|
01de e141 dae4 | A |
01e0 e38b 0198 | |
01e2 606a 240c |`j$ |
01e4 166b 290c | k) |
01e6 3801 ae39 |8 9|
01e8 38e5 028d |8 |
01ea 84e7 9b02 | |
01ec da9b ca70 | p|
01ee 0cf0 8235 | 5|
01f0 cc39 d170 | 9 p|
01f2 e438 e880 | 8 |
01f4 3a88 0fb5 |: |
01f6 69a2 5038 |i P8|
01f8 41a5 3610 |A 6 |
01fa e900 1ee8 | |
01fc e3a8 01cb | |
01fe e002 b00d | |