|
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_02f8e7
└─⟦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 00d8 | | .CONST 0x00d8 ; 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 0039 | 9 | .CONST 0x0039 ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0008 | | .CONST 0x0008 ; Number of locals
001b INIT_0018:
001b 0007 | | Action Break_Optional
001c 0007 | | Action Break_Optional
001d 0007 | | Action Break_Optional
001e e001 | | Load 0x0,0x1
001f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0020 02c7 | | Declare_Variable Any
0021 00d8 | | Load_Top At_Offset_0
0022 1c00 | | Execute_Immediate Run_Utility,0x0
0023 e001 | | Load 0x0,0x1
0024 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0025 02c7 | | Declare_Variable Any
0026 00d8 | | Load_Top At_Offset_0
0027 1c00 | | Execute_Immediate Run_Utility,0x0
0028 e001 | | Load 0x0,0x1
0029 1b0f | | Execute Package,Field_Read,Field_Number 0xf
002a 02c7 | | Declare_Variable Any
002b 00d8 | | Load_Top At_Offset_0
002c 1c00 | | Execute_Immediate Run_Utility,0x0
002d e002 | | Load 0x0,0x2
002e 1b15 | | Execute Package,Field_Read,Field_Number 0x15
002f 02c7 | | Declare_Variable Any
0030 00d8 | | Load_Top At_Offset_0
0031 1c00 | | Execute_Immediate Run_Utility,0x0
0032 e001 | | Load 0x0,0x1
0033 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0034 e001 | | Load 0x0,0x1
0035 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0036 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0037 029f 0083 | | Declare_Subprogram INIT_0080,For_Call
0039 BODY_0018:
0039 00be | | Action Activate_Tasks
003a 0092 00ac | | Action Push_String_Extended,0xac ; "<PROFILE>"
003c 0092 00ad | | Action Push_String_Extended,0xad ; "!release.current.activity"
003e e003 | | Load 0x0,0x3
003f 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0040 e002 | | Load 0x0,0x2
0041 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0042 c402 | | Store 0x2,0x2
0043 e001 | | Load 0x0,0x1
0044 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0045 e405 | | Load 0x2,0x5
0046 4801 |H | Short_Literal 0x1
0047 4800 |H | Short_Literal 0x0
0048 e004 | | Load 0x0,0x4
0049 1b0e | | Execute Package,Field_Read,Field_Number 0xe
004a e402 | | Load 0x2,0x2
004b e002 | | Load 0x0,0x2
004c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
004d c405 | | Store 0x2,0x5
004e c406 | | Store 0x2,0x6
004f e406 | | Load 0x2,0x6
0050 6802 |h | Jump_Zero 0x53
0051 48e2 |H | Short_Literal 0xe2
0052 0257 | W | Execute Discrete,Raise
0053 e001 | | Load 0x0,0x1
0054 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0055 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0056 e404 | | Load 0x2,0x4
0057 0120 | | Execute Any,Is_Value
0058 6803 |h | Jump_Zero 0x5c
0059 e001 | | Load 0x0,0x1
005a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
005b 7801 |x | Jump 0x5d
005c e404 | | Load 0x2,0x4
005d 604a |`J | Indirect_Literal Discrete,0xa8,{0x00000000, 0x00004000}
005e e004 | | Load 0x0,0x4
005f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0060 e005 | | Load 0x0,0x5
0061 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0062 e001 | | Load 0x0,0x1
0063 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0064 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0065 e5ff | | Load 0x2,-0x1
0066 e001 | | Load 0x0,0x1
0067 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0068 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0069 c404 | | Store 0x2,0x4
006a c407 | | Store 0x2,0x7
006b e407 | | Load 0x2,0x7
006c 6802 |h | Jump_Zero 0x6f
006d 48e2 |H | Short_Literal 0xe2
006e 0257 | W | Execute Discrete,Raise
006f e405 | | Load 0x2,0x5
0070 e404 | | Load 0x2,0x4
0071 e002 | | Load 0x0,0x2
0072 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0073 c403 | | Store 0x2,0x3
0074 e001 | | Load 0x0,0x1
0075 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0076 e405 | | Load 0x2,0x5
0077 e002 | | Load 0x0,0x2
0078 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0079 c405 | | Store 0x2,0x5
007a c406 | | Store 0x2,0x6
007b 8408 | | Call 0x2,0x8
007c 4507 |E | Exit_Suprogram New_Top_Offset 0x7
007d 0000 0000 | | .XXX[0x3]
007f 0000 | |
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 0087 | | .CONST 0x0087 ; Address of begin
0081 0004 | | .CONST 0x0004 ; Address of exception handler
0082 0002 | | .CONST 0x0002 ; Number of locals
0083 INIT_0080:
0083 e403 | | Load 0x2,0x3
0084 e001 | | Load 0x0,0x1
0085 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0086 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0087 BODY_0080:
0087 0092 00ac | | Action Push_String_Extended,0xac ; "<PROFILE>"
0089 0092 00ae | | Action Push_String_Extended,0xae ; "Output =>"
008b e5fb | | Load 0x2,-0x5
008c 01cc | | Execute Vector,Catenate
008d 0092 00af | | Action Push_String_Extended,0xaf ; ", Error =>"
008f 01cc | | Execute Vector,Catenate
0090 e5fa | | Load 0x2,-0x6
0091 01cc | | Execute Vector,Catenate
0092 4800 |H | Short_Literal 0x0
0093 e5fc | | Load 0x2,-0x4
0094 4800 |H | Short_Literal 0x0
0095 0092 00b0 | | Action Push_String_Extended,0xb0 ; "\x22"
0097 e602 | | Load 0x3,0x2
0098 01cc | | Execute Vector,Catenate
0099 0092 00b1 | | Action Push_String_Extended,0xb1 ; ".units."
009b 01cc | | Execute Vector,Catenate
009c e5fe | | Load 0x2,-0x2
009d 01cc | | Execute Vector,Catenate
009e 0092 00b2 | | Action Push_String_Extended,0xb2 ; "\x22."
00a0 01cc | | Execute Vector,Catenate
00a1 e5fd | | Load 0x2,-0x3
00a2 01cc | | Execute Vector,Catenate
00a3 e006 | | Load 0x0,0x6
00a4 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00a5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00a6 0000 0000 | | .XXX[0x2]
00a8 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
00ac ; --------------------------------------------------------------------------------------
00ac ; STRING TABLE
00ac ; --------------------------------------------------------------------------------------
00ac 0010 | | .STRTAB 0x0010->0x00b4 ; "<PROFILE>"
00ad 0017 | | .STRTAB 0x0017->0x00b8 ; "!release.current.activity"
00ae 002e | . | .STRTAB 0x002e->0x00c5 ; "Output =>"
00af 0035 | 5 | .STRTAB 0x0035->0x00c9 ; ", Error =>"
00b0 003d | = | .STRTAB 0x003d->0x00ce ; "\x22"
00b1 003c | < | .STRTAB 0x003c->0x00cf ; ".units."
00b2 0041 | A | .STRTAB 0x0041->0x00d2 ; "\x22."
00b3 0041 | A | .STREND 0x0041->0x00d3
00b4 3c50 524f |<PRO| .STRTAB_STRINGS
00d4 0000 0000 | | .BLANK 0000[0x4]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; Debug Table
00d8 ; --------------------------------------------------------------------------------------
00d8 0004 0000 | | .DEBUG4 0x0004,0x0000,0x1218,0x0000,0x0001,0x0000
00de 0000 60b2 | ` | .XXX[0x1e]
00e0 0b86 8804 | |
00e2 8000 0e91 | |
00e4 0000 0002 | |
00e6 0000 01a3 | |
00e8 001a a804 | |
00ea 0000 0144 | D|
00ec 0000 0001 | |
00ee 0000 0000 | |
00f0 0001 0804 | |
00f2 0800 0d80 | |
00f4 0000 00a0 | |
00f6 0000 0183 | |
00f8 0000 0000 | |
00fa 0000 0076 | v|
00fc 0000 0000 | | .BLANK 0000[0x4]
0100 0b86 8804 | | .XXX[0xc]
0102 8800 1091 | |
0104 0000 0040 | @|
0106 0000 0040 | @|
0108 0b86 8804 | |
010a 0000 0ec4 | |
010c 0000 0000 | | .BLANK 0000[0xf4]