|
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, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_07fc61
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 00f8 | | .CONST 0x00f8 ; 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 0000 | | .CONST 0x0000 ; 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 000d | | .CONST 0x000d ; 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 0029 | ) | .CONST 0x0029 ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0006 | | .CONST 0x0006 ; Number of locals
001b INIT_0018:
001b 00e4 | | Load_Encached Positive_Cache
001c 03e9 | | Declare_Variable Discrete,Duplicate
001d 00e1 | | Load_Encached Boolean_Cache
001e e002 | | Load 0x0,0x2
001f e003 | | Load 0x0,0x3
0020 60af |` | Indirect_Literal Discrete,0xd0,{0x00000000, 0x00002710}
0021 00e4 | | Load_Encached Positive_Cache
0022 4801 |H | Short_Literal 0x1
0023 e004 | | Load 0x0,0x4
0024 0387 | | Declare_Variable Package
0025 00d8 | | Load_Top At_Offset_0
0026 020f | | Execute Module,Activate
0027 00d8 | | Load_Top At_Offset_0
0028 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0029 BODY_0018:
0029 00d9 | | Load_Top At_Offset_1
002a 1b12 | | Execute Package,Field_Read,Field_Number 0x12
002b 00da | | Load_Top At_Offset_2
002c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
002d 0039 | 9 | Store_Top Access,At_Offset_1
002e 00d8 | | Load_Top At_Offset_0
002f 4800 |H | Short_Literal 0x0
0030 4862 |Hb | Short_Literal 0x62
0031 0092 00d4 | | Action Push_String_Extended,0xd4 ; "jose"
0033 e405 | | Load 0x2,0x5
0034 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0035 0039 | 9 | Store_Top Access,At_Offset_1
0036 00d8 | | Load_Top At_Offset_0
0037 4800 |H | Short_Literal 0x0
0038 4be8 |K | Short_Literal 0x3e8
0039 0092 00d5 | | Action Push_String_Extended,0xd5 ; "fred"
003b e405 | | Load 0x2,0x5
003c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
003d 0039 | 9 | Store_Top Access,At_Offset_1
003e 00d8 | | Load_Top At_Offset_0
003f 4800 |H | Short_Literal 0x0
0040 608b |` | Indirect_Literal Discrete,0xcc,{0x00000000, 0x000007d0}
0041 0092 00d6 | | Action Push_String_Extended,0xd6 ; "alain"
0043 e405 | | Load 0x2,0x5
0044 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0045 0039 | 9 | Store_Top Access,At_Offset_1
0046 00d8 | | Load_Top At_Offset_0
0047 4800 |H | Short_Literal 0x0
0048 607f |` | Indirect_Literal Discrete,0xc8,{0x00000000, 0x00000bb8}
0049 0092 00d7 | | Action Push_String_Extended,0xd7 ; "manu"
004b e405 | | Load 0x2,0x5
004c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
004d 0039 | 9 | Store_Top Access,At_Offset_1
004e 00d8 | | Load_Top At_Offset_0
004f 4800 |H | Short_Literal 0x0
0050 6073 |`s | Indirect_Literal Discrete,0xc4,{0x00000000, 0x00009c40}
0051 0092 00d8 | | Action Push_String_Extended,0xd8 ; "olivier"
0053 e405 | | Load 0x2,0x5
0054 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0055 0039 | 9 | Store_Top Access,At_Offset_1
0056 00d8 | | Load_Top At_Offset_0
0057 4800 |H | Short_Literal 0x0
0058 6067 |`g | Indirect_Literal Discrete,0xc0,{0x00000000, 0x00000c8a}
0059 0092 00d9 | | Action Push_String_Extended,0xd9 ; "joe"
005b e405 | | Load 0x2,0x5
005c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
005d 0039 | 9 | Store_Top Access,At_Offset_1
005e 00d8 | | Load_Top At_Offset_0
005f 4800 |H | Short_Literal 0x0
0060 605b |`[ | Indirect_Literal Discrete,0xbc,{0x00000000, 0x000186a0}
0061 0092 00da | | Action Push_String_Extended,0xda ; "isabelle"
0063 e405 | | Load 0x2,0x5
0064 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0065 0039 | 9 | Store_Top Access,At_Offset_1
0066 00d8 | | Load_Top At_Offset_0
0067 0092 00d6 | | Action Push_String_Extended,0xd6 ; "alain"
0069 00db | | Load_Top At_Offset_3
006a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
006b 0039 | 9 | Store_Top Access,At_Offset_1
006c 0092 00da | | Action Push_String_Extended,0xda ; "isabelle"
006e 00d9 | | Load_Top At_Offset_1
006f 00db | | Load_Top At_Offset_3
0070 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0071 00e0 | | Load_Encached Standard_Cache
0072 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0073 e005 | | Load 0x0,0x5
0074 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0075 00e1 | | Load_Encached Boolean_Cache
0076 e403 | | Load 0x2,0x3
0077 0092 00d5 | | Action Push_String_Extended,0xd5 ; "fred"
0079 00db | | Load_Top At_Offset_3
007a e405 | | Load 0x2,0x5
007b 1814 | | Execute Package,Field_Execute,Field_Number 0x14
007c c403 | | Store 0x2,0x3
007d 005b | [ | Store_Top Discrete,At_Offset_3
007e 00da | | Load_Top At_Offset_2
007f 0f01 | | Execute_Immediate Equal,0x1
0080 680c |h | Jump_Zero 0x8d
0081 00da | | Load_Top At_Offset_2
0082 00e1 | | Load_Encached Boolean_Cache
0083 011c | | Execute Any,Convert_Unchecked
0084 1c01 | | Execute_Immediate Run_Utility,0x1
0085 e005 | | Load 0x0,0x5
0086 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0087 00db | | Load_Top At_Offset_3
0088 00e0 | | Load_Encached Standard_Cache
0089 1818 | | Execute Package,Field_Execute,Field_Number 0x18
008a e005 | | Load 0x0,0x5
008b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
008c 780a |x | Jump 0x97
008d 00da | | Load_Top At_Offset_2
008e 00e1 | | Load_Encached Boolean_Cache
008f 011c | | Execute Any,Convert_Unchecked
0090 1c01 | | Execute_Immediate Run_Utility,0x1
0091 e005 | | Load 0x0,0x5
0092 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0093 0092 00db | | Action Push_String_Extended,0xdb ; "pas trouve"
0095 e005 | | Load 0x0,0x5
0096 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0097 00e1 | | Load_Encached Boolean_Cache
0098 e403 | | Load 0x2,0x3
0099 0092 00d6 | | Action Push_String_Extended,0xd6 ; "alain"
009b 00db | | Load_Top At_Offset_3
009c e405 | | Load 0x2,0x5
009d 1814 | | Execute Package,Field_Execute,Field_Number 0x14
009e c403 | | Store 0x2,0x3
009f 005b | [ | Store_Top Discrete,At_Offset_3
00a0 00da | | Load_Top At_Offset_2
00a1 0f01 | | Execute_Immediate Equal,0x1
00a2 680c |h | Jump_Zero 0xaf
00a3 00da | | Load_Top At_Offset_2
00a4 00e1 | | Load_Encached Boolean_Cache
00a5 011c | | Execute Any,Convert_Unchecked
00a6 1c01 | | Execute_Immediate Run_Utility,0x1
00a7 e005 | | Load 0x0,0x5
00a8 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
00a9 00db | | Load_Top At_Offset_3
00aa 00e0 | | Load_Encached Standard_Cache
00ab 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00ac e005 | | Load 0x0,0x5
00ad 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
00ae 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00af 00da | | Load_Top At_Offset_2
00b0 00e1 | | Load_Encached Boolean_Cache
00b1 011c | | Execute Any,Convert_Unchecked
00b2 1c01 | | Execute_Immediate Run_Utility,0x1
00b3 e005 | | Load 0x0,0x5
00b4 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
00b5 0092 00db | | Action Push_String_Extended,0xdb ; "pas trouve"
00b7 e005 | | Load 0x0,0x5
00b8 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
00b9 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00ba 0000 0000 | | .XXX[0x2]
00bc 0000 0000 | | .LITERAL {0x00000000, 0x000186a0}
00c0 0000 0000 | | .LITERAL {0x00000000, 0x00000c8a}
00c4 0000 0000 | | .LITERAL {0x00000000, 0x00009c40}
00c8 0000 0000 | | .LITERAL {0x00000000, 0x00000bb8}
00cc 0000 0000 | | .LITERAL {0x00000000, 0x000007d0}
00d0 0000 0000 | | .LITERAL {0x00000000, 0x00002710}
00d4 ; --------------------------------------------------------------------------------------
00d4 ; STRING TABLE
00d4 ; --------------------------------------------------------------------------------------
00d4 0012 | | .STRTAB 0x0012->0x00dd ; "jose"
00d5 0014 | | .STRTAB 0x0014->0x00df ; "fred"
00d6 0016 | | .STRTAB 0x0016->0x00e1 ; "alain"
00d7 0019 | | .STRTAB 0x0019->0x00e3 ; "manu"
00d8 001b | | .STRTAB 0x001b->0x00e5 ; "olivier"
00d9 0020 | | .STRTAB 0x0020->0x00e9 ; "joe"
00da 0021 | ! | .STRTAB 0x0021->0x00ea ; "isabelle"
00db 0027 | ' | .STRTAB 0x0027->0x00ee ; "pas trouve"
00dc 002f | / | .STREND 0x002f->0x00f3
00dd 6a6f 7365 |jose| .STRTAB_STRINGS
00f4 0000 0000 | | .BLANK 0000[0x4]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; Debug Table
00f8 ; --------------------------------------------------------------------------------------
00f8 0004 0009 | | .DEBUG4 0x0004,0x0009,0xfbaa,0x0000,0x0001,0x0003
00fe 000b 010a | | .DBG4T 0x000b,0x010a,0x8000,0x0000
0102 000e 010d | | .DBG4T 0x000e,0x010d,0x8000,0x0000
0106 001b 0110 | | .DBG4T 0x001b,0x0110,0x0001,0x0000
010a ; --------------------------------------------------------------------------------------
010a ; Debug chain
010a ; --------------------------------------------------------------------------------------
010a 0001 0000 | | .DBGLEN 0x0001,0x0000
010c 000b | | .DBGLNO 0x000b
010d ; --------------------------------------------------------------------------------------
010d ; Debug chain
010d ; --------------------------------------------------------------------------------------
010d 0001 0000 | | .DBGLEN 0x0001,0x0000
010f 000e | | .DBGLNO 0x000e
0110 ; --------------------------------------------------------------------------------------
0110 ; Debug chain
0110 ; --------------------------------------------------------------------------------------
0110 0004 0016 | | .DBGLEN 0x0004,0x0016
0112 001b 001d | | .DBGLNO 0x001b,0x001d,0x001e,0x0027,0x0029,0x002e,0x0036,0x003e,0x0046,0x004e,0x0056,0x005e,0x0066,0x006c,0x0075,0x007e,0x0081,0x0087,0x008d,0x0093,0x0097,0x00a0,0x00a3,0x00a9,0x00af,0x00b5
012c 0000 0000 | | .BLANK 0000[0xd4]