|
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_0ea8df
└─⟦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 00f0 | | .CONST 0x00f0 ; 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 002e | . | .CONST 0x002e ; Address of begin
0019 0051 | Q | .CONST 0x0051 ; Address of exception handler
001a 0009 | | .CONST 0x0009 ; Number of locals
001b INIT_0018:
001b 0092 006a | j| Action Push_String_Extended,0x6a ; "!Machine.Release.Current.Activity"
001d 0092 006b | k| Action Push_String_Extended,0x6b ; "!Tools.Design.Rdf_Teamwork_Integration.Teamwork"
001f 0092 006c | l| Action Push_String_Extended,0x6c ; "Initialize_Teamwork"
0021 0092 006d | m| Action Push_String_Extended,0x6d ; "Teamwork_Interface"
0023 0092 006e | n| Action Push_String_Extended,0x6e ; "!Machine.Initialization.Rational.Teamwork_Interface"
0025 e002 | | Load 0x0,0x2
0026 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0027 e002 | | Load 0x0,0x2
0028 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0029 02c7 | | Declare_Variable Any
002a 00d8 | | Load_Top At_Offset_0
002b 1c00 | | Execute_Immediate Run_Utility,0x0
002c 029f 0063 | c| Declare_Subprogram INIT_0060,For_Call
002e BODY_0018:
002e e405 | | Load 0x2,0x5
002f e003 | | Load 0x0,0x3
0030 180e | | Execute Package,Field_Execute,Field_Number 0xe
0031 681e |h | Jump_Zero 0x50
0032 00d9 | | Load_Top At_Offset_1
0033 e002 | | Load 0x0,0x2
0034 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0035 0092 006f | o| Action Push_String_Extended,0x6f ; "<PROFILE>"
0037 00ea | | Load_Encached Null_String_Cache
0038 4800 |H | Short_Literal 0x0
0039 0092 0070 | p| Action Push_String_Extended,0x70 ; "$"
003b 4800 |H | Short_Literal 0x0
003c 8409 | | Call 0x2,0x9
003d e002 | | Load 0x0,0x2
003e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
003f c407 | | Store 0x2,0x7
0040 c408 | | Store 0x2,0x8
0041 00d9 | | Load_Top At_Offset_1
0042 e002 | | Load 0x0,0x2
0043 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0044 700b |p | Jump_Nonzero 0x50
0045 00d9 | | Load_Top At_Offset_1
0046 e004 | | Load 0x0,0x4
0047 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0048 4802 |H | Short_Literal 0x2
0049 0092 0071 | q| Action Push_String_Extended,0x71 ; "Unable to initialize Teamwork_Interface "
004b e005 | | Load 0x0,0x5
004c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
004d e406 | | Load 0x2,0x6
004e e005 | | Load 0x0,0x5
004f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0050 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0051 TRAP_0018:
0051 0007 | | Action Break_Optional
0052 4801 |H | Short_Literal 0x1
0053 4801 |H | Short_Literal 0x1
0054 e006 | | Load 0x0,0x6
0055 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0056 4802 |H | Short_Literal 0x2
0057 0092 0072 | r| Action Push_String_Extended,0x72 ; "UNHANDLED EXCEPTION"
0059 e005 | | Load 0x0,0x5
005a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
005b e406 | | Load 0x2,0x6
005c e005 | | Load 0x0,0x5
005d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
005e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
005f 0000 | | .XXX[0x1]
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0063 | c | .CONST 0x0063 ; Address of begin
0061 0004 | | .CONST 0x0004 ; Address of exception handler
0062 0001 | | .CONST 0x0001 ; Number of locals
0063 BODY_0060:
0063 INIT_0060:
0063 e402 | | Load 0x2,0x2
0064 00ea | | Load_Encached Null_String_Cache
0065 e404 | | Load 0x2,0x4
0066 e403 | | Load 0x2,0x3
0067 e002 | | Load 0x0,0x2
0068 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0069 00ca | | Action Exit_Nullary_Function
006a ; --------------------------------------------------------------------------------------
006a ; STRING TABLE
006a ; --------------------------------------------------------------------------------------
006a 0014 | | .STRTAB 0x0014->0x0074 ; "!Machine.Release.Current.Activity"
006b 0033 | 3 | .STRTAB 0x0033->0x0084 ; "!Tools.Design.Rdf_Teamwork_Integration.Teamwork"
006c 0060 | ` | .STRTAB 0x0060->0x009c ; "Initialize_Teamwork"
006d 0071 | q | .STRTAB 0x0071->0x00a5 ; "Teamwork_Interface"
006e 0081 | | .STRTAB 0x0081->0x00ae ; "!Machine.Initialization.Rational.Teamwork_Interface"
006f 00b2 | | .STRTAB 0x00b2->0x00c8 ; "<PROFILE>"
0070 00b9 | | .STRTAB 0x00b9->0x00cc ; "$"
0071 00b8 | | .STRTAB 0x00b8->0x00cd ; "Unable to initialize Teamwork_Interface "
0072 00de | | .STRTAB 0x00de->0x00e1 ; "UNHANDLED EXCEPTION"
0073 00ef | | .STREND 0x00ef->0x00ea
0074 214d 6163 |!Mac| .STRTAB_STRINGS
00eb 0000 0000 | | .BLANK 0000[0x5]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; Debug Table
00f0 ; --------------------------------------------------------------------------------------
00f0 0004 0002 | | .DEBUG4 0x0004,0x0002,0x06da,0x0000,0x0001,0x0000
00f6 0000 0000 | | .BLANK 0000[0x54]
014a ec80 | | .XXX[0x1]
014b 0000 0000 | | .BLANK 0000[0x20]
016b 0e9e | | .XXX[0x1]
016c 0000 0000 | | .BLANK 0000[0x8]
0174 2b14 f3e1 |+ | .XXX[0x10]
0176 bc50 0000 | P |
0178 1000 0000 | |
017a 9000 0116 | |
017c e000 0000 | |
017e 2000 0001 | |
0180 2000 80c6 | |
0182 0918 0220 | |
0184 0000 0000 | | .BLANK 0000[0x6]
018a 0207 0130 | 0| .XXX[0x13]
018c 089a 3c00 | < |
018e 0004 0000 | |
0190 0024 0000 | $ |
0192 45b8 0000 |E |
0194 0008 0000 | |
0196 0040 0000 | @ |
0198 0018 0000 | |
019a 5560 0a23 |U` #|
019c a7f0 | |
019d 0000 0000 | | .BLANK 0000[0x4]
01a1 0511 e944 | D| .XXX[0xe]
01a3 0000 7961 | ya|
01a5 1f22 0d16 | " |
01a7 0000 0000 | |
01a9 0050 316f | P1o|
01ab 3f34 21e0 |?4! |
01ad 0000 8000 | |
01af 0000 0000 | | .BLANK 0000[0x4]
01b3 75d4 8080 |u | .XXX[0x21]
01b5 0000 4000 | @ |
01b7 75d8 8080 |u |
01b9 0000 4000 | @ |
01bb 0203 0824 | $|
01bd 6008 8000 |` |
01bf 0000 0000 | |
01c1 1d76 2020 | v |
01c3 0000 1007 | |
01c5 c883 4580 | E |
01c7 0000 0000 | |
01c9 1000 0000 | |
01cb 9000 03f7 | |
01cd 2000 0000 | |
01cf 2000 0000 | |
01d1 4000 80c2 |@ |
01d3 0918 | |
01d4 0000 0000 | | .BLANK 0000[0x7]
01db 01f2 20d1 | | .XXX[0x25]
01dd 6000 0000 |` |
01df 0004 0000 | |
01e1 0024 0000 | $ |
01e3 fdc8 0000 | |
01e5 0008 0000 | |
01e7 0010 0000 | |
01e9 0018 0001 | |
01eb b038 0a23 | 8 #|
01ed d070 0a23 | p #|
01ef cb68 0a24 | h $|
01f1 1c68 0511 | h |
01f3 fd84 0000 | |
01f5 2451 1fd2 |$Q |
01f7 99c0 8000 | |
01f9 0000 0410 | |
01fb 2b8d 317b |+ 1{|
01fd 5f40 0002 |_@ |
01ff 0400 | |