|
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_5e40f2
└─⟦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 0140 | @ | .CONST 0x0140 ; 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 0038 | 8 | .CONST 0x0038 ; Address of begin
0019 00a5 | | .CONST 0x00a5 ; Address of exception handler
001a 0007 | | .CONST 0x0007 ; Number of locals
001b INIT_0018:
001b e001 | | Load 0x0,0x1
001c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
001d 02c7 | | Declare_Variable Any
001e e001 | | Load 0x0,0x1
001f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0020 a402 | | Store_Unchecked 0x2,0x2
0021 e002 | | Load 0x0,0x2
0022 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0023 00e1 | | Load_Encached Boolean_Cache
0024 03f1 | | Declare_Variable Discrete,With_Value
0025 e003 | | Load 0x0,0x3
0026 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0027 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0028 02c7 | | Declare_Variable Any
0029 00d8 | | Load_Top At_Offset_0
002a 1c00 | | Execute_Immediate Run_Utility,0x0
002b e003 | | Load 0x0,0x3
002c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
002d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
002e 0092 00bc | | Action Push_String_Extended,0xbc ; "[_$$.Activity_File]^[@'c(spec_view, load_view), ~@_working],~[_$$.Activity_File]"
0030 0092 00bd | | Action Push_String_Extended,0xbd ; "[[_$$.Activity_File]^[@'c(spec_view, load_view), ~@_working],~[_$$.Activity_File], ~["
0032 e5fe | | Load 0x2,-0x2
0033 01cc | | Execute Vector,Catenate
0034 0092 00be | | Action Push_String_Extended,0xbe ; "]]"
0036 01cc | | Execute Vector,Catenate
0037 0007 | | Action Break_Optional
0038 BODY_0018:
0038 4801 |H | Short_Literal 0x1
0039 e002 | | Load 0x0,0x2
003a 1817 | | Execute Package,Field_Execute,Field_Number 0x17
003b e002 | | Load 0x0,0x2
003c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
003d 7008 |p | Jump_Nonzero 0x46
003e e001 | | Load 0x0,0x1
003f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0040 4805 |H | Short_Literal 0x5
0041 0092 00bf | | Action Push_String_Extended,0xbf ; "Abandoning Purge_Old_Views: Can't set PRIVILEGED MODE."
0043 e004 | | Load 0x0,0x4
0044 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0045 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0046 e5fc | | Load 0x2,-0x4
0047 e001 | | Load 0x0,0x1
0048 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0049 e001 | | Load 0x0,0x1
004a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
004b e5fd | | Load 0x2,-0x3
004c 683d |h= | Jump_Zero 0x8a
004d e003 | | Load 0x0,0x3
004e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
004f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0050 e404 | | Load 0x2,0x4
0051 6066 |`f | Indirect_Literal Discrete,0xb8,{0x00000000, 0x00004000}
0052 e005 | | Load 0x0,0x5
0053 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0054 e006 | | Load 0x0,0x6
0055 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0056 e007 | | Load 0x0,0x7
0057 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0058 4801 |H | Short_Literal 0x1
0059 4800 |H | Short_Literal 0x0
005a e006 | | Load 0x0,0x6
005b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
005c e003 | | Load 0x0,0x3
005d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
005e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
005f e407 | | Load 0x2,0x7
0060 e003 | | Load 0x0,0x3
0061 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0062 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0063 c404 | | Store 0x2,0x4
0064 005b | [ | Store_Top Discrete,At_Offset_3
0065 00cf | | Action Mark_Auxiliary
0066 781c |x | Jump 0x83
0067 e5ff | | Load 0x2,-0x1
0068 700e |p | Jump_Nonzero 0x77
0069 0092 00c0 | | Action Push_String_Extended,0xc0 ; "<PROFILE>"
006b 0092 00c1 | | Action Push_String_Extended,0xc1 ; "<DEFAULT>"
006d 00ea | | Load_Encached Null_String_Cache
006e 4801 |H | Short_Literal 0x1
006f 4801 |H | Short_Literal 0x1
0070 e404 | | Load 0x2,0x4
0071 e003 | | Load 0x0,0x3
0072 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0073 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0074 e008 | | Load 0x0,0x8
0075 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0076 7806 |x | Jump 0x7d
0077 e404 | | Load 0x2,0x4
0078 e003 | | Load 0x0,0x3
0079 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
007a 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
007b e009 | | Load 0x0,0x9
007c 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
007d e404 | | Load 0x2,0x4
007e e003 | | Load 0x0,0x3
007f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0080 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0081 c404 | | Store 0x2,0x4
0082 00c9 | | Action Pop_Auxiliary_Loop
0083 e404 | | Load 0x2,0x4
0084 e003 | | Load 0x0,0x3
0085 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0086 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0087 6fdf |o | Jump_Zero 0x67
0088 00ce | | Action Pop_Auxiliary
0089 7814 |x | Jump 0x9e
008a e5ff | | Load 0x2,-0x1
008b 6808 |h | Jump_Zero 0x94
008c 0092 00c0 | | Action Push_String_Extended,0xc0 ; "<PROFILE>"
008e 4801 |H | Short_Literal 0x1
008f 00ea | | Load_Encached Null_String_Cache
0090 00db | | Load_Top At_Offset_3
0091 e00a | | Load 0x0,0xa
0092 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0093 780a |x | Jump 0x9e
0094 0092 00c0 | | Action Push_String_Extended,0xc0 ; "<PROFILE>"
0096 0092 00c1 | | Action Push_String_Extended,0xc1 ; "<DEFAULT>"
0098 00ea | | Load_Encached Null_String_Cache
0099 4801 |H | Short_Literal 0x1
009a 4801 |H | Short_Literal 0x1
009b e407 | | Load 0x2,0x7
009c e008 | | Load 0x0,0x8
009d 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
009e e402 | | Load 0x2,0x2
009f e001 | | Load 0x0,0x1
00a0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00a1 e403 | | Load 0x2,0x3
00a2 e002 | | Load 0x0,0x2
00a3 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00a4 4505 |E | Exit_Suprogram New_Top_Offset 0x5
00a5 TRAP_0018:
00a5 0007 | | Action Break_Optional
00a6 e001 | | Load 0x0,0x1
00a7 180e | | Execute Package,Field_Execute,Field_Number 0xe
00a8 4808 |H | Short_Literal 0x8
00a9 4801 |H | Short_Literal 0x1
00aa 4801 |H | Short_Literal 0x1
00ab e00b | | Load 0x0,0xb
00ac 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00ad e004 | | Load 0x0,0x4
00ae 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00af e402 | | Load 0x2,0x2
00b0 e001 | | Load 0x0,0x1
00b1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00b2 e403 | | Load 0x2,0x3
00b3 e002 | | Load 0x0,0x2
00b4 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00b5 4505 |E | Exit_Suprogram New_Top_Offset 0x5
00b6 0000 0000 | | .XXX[0x2]
00b8 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
00bc ; --------------------------------------------------------------------------------------
00bc ; STRING TABLE
00bc ; --------------------------------------------------------------------------------------
00bc 000e | | .STRTAB 0x000e->0x00c3 ; "[_$$.Activity_File]^[@'c(spec_view, load_view), ~@_working],~[_$$.Activity_File]"
00bd 005c | \ | .STRTAB 0x005c->0x00eb ; "[[_$$.Activity_File]^[@'c(spec_view, load_view), ~@_working],~[_$$.Activity_File], ~["
00be 00af | | .STRTAB 0x00af->0x0115 ; "]]"
00bf 00af | | .STRTAB 0x00af->0x0116 ; "Abandoning Purge_Old_Views: Can't set PRIVILEGED MODE."
00c0 00e3 | | .STRTAB 0x00e3->0x0131 ; "<PROFILE>"
00c1 00ea | | .STRTAB 0x00ea->0x0136 ; "<DEFAULT>"
00c2 00f1 | | .STREND 0x00f1->0x013a
00c3 5b5f 2424 |[_$$| .STRTAB_STRINGS
013b 0000 0000 | | .BLANK 0000[0x5]
0140 ; --------------------------------------------------------------------------------------
0140 ; Debug Table
0140 ; --------------------------------------------------------------------------------------
0140 0004 000d | | .DEBUG4 0x0004,0x000d,0x96d9,0x0000,0x0001,0x0000
0146 c408 3f80 | ? | .XXX[0x32]
0148 4788 6388 |G c |
014a 7780 1f80 |w |
014c 1b88 7f80 | |
014e 7f80 8b80 | |
0150 8f80 2380 | # |
0152 9f88 5788 | W |
0154 6f80 0b80 |o |
0156 3920 3f88 |9 ? |
0158 bc08 3b88 | ; |
015a bc08 3f88 | ? |
015c 7f88 5780 | W |
015e 9780 7f80 | |
0160 8f80 3b88 | ; |
0162 6920 1f88 |i |
0164 a408 3b88 | ; |
0166 a408 3f88 | ? |
0168 b380 4780 | G |
016a 0920 0f88 | |
016c 6c08 3b88 |l ; |
016e 6c08 3f88 |l ? |
0170 b120 0788 | |
0172 6808 3b88 |h ; |
0174 6808 3c02 |h < |
0176 f002 ec00 | |
0178 0000 0000 | | .BLANK 0000[0x4]
017c 4640 1003 |F@ | .XXX[0x84]
017e 9200 5800 | X |
0180 0002 c000 | |
0182 0000 0000 | |
0184 44e0 1002 |D |
0186 7340 5000 |s@P |
0188 0002 c000 | |
018a 0000 0000 | |
018c 4610 1002 |F |
018e 73b0 5000 |s P |
0190 0002 c000 | |
0192 2a60 5000 |*`P |
0194 0002 c000 | |
0196 0000 0000 | |
0198 4630 1002 |F0 |
019a 72f0 5000 |r P |
019c 0002 c000 | |
019e 0000 0000 | |
01a0 4530 1002 |E0 |
01a2 7360 5000 |s`P |
01a4 0002 c000 | |
01a6 0000 0000 | |
01a8 44d0 1002 |D |
01aa 7370 5000 |spP |
01ac 0002 c000 | |
01ae 0000 0000 | |
01b0 4570 1002 |Ep |
01b2 7310 5000 |s P |
01b4 0002 c001 | |
01b6 c5b0 5800 | X |
01b8 0002 c002 | |
01ba 7380 5000 |s P |
01bc 0002 c000 | |
01be 0000 0000 | |
01c0 45e0 1002 |E |
01c2 7390 5000 |s P |
01c4 0002 c000 | |
01c6 0000 0000 | |
01c8 4660 1002 |F` |
01ca 7300 5000 |s P |
01cc 0002 c000 | |
01ce 0000 0000 | |
01d0 45d0 1002 |E |
01d2 72a0 5000 |r P |
01d4 0002 c000 | |
01d6 0000 0000 | |
01d8 4620 1002 |F |
01da 7290 5000 |r P |
01dc 0002 c000 | |
01de 0000 0000 | |
01e0 45a0 1002 |E |
01e2 fbc0 5400 | T |
01e4 0002 c000 | |
01e6 0000 0000 | |
01e8 4540 1002 |E@ |
01ea 71c0 5000 |q P |
01ec 0002 c000 | |
01ee 0000 0000 | |
01f0 4500 1002 |E |
01f2 7280 5000 |r P |
01f4 0002 c000 | |
01f6 0000 0000 | |
01f8 4600 1002 |F |
01fa 72e0 5000 |r P |
01fc 0002 c001 | |
01fe c4d0 5800 | X |