|
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_0314bd
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦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 0068 | h | .CONST 0x0068 ; 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 0017 | | .CONST 0x0017 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000f | | .CONST 0x000f ; Number of locals 000b INIT_0008: 000b 4801 |H | Short_Literal 0x1 000c 4832 |H2 | Short_Literal 0x32 000d e002 | | Load 0x0,0x2 000e 035b | [ | Declare_Type Array,Constrained 000f 0336 | 6 | Declare_Variable Array,Visible 0010 029a 0023 | #| Declare_Subprogram INIT_0020,For_Outer_Call,Visible,Unelaborated 0012 00bf | | Action Accept_Activation 0013 00e3 | | Load_Encached Natural_Cache 0014 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 0015 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0016 00c7 | | Action Elaborate_Subprogram 0017 BODY_0008: 0017 00bc | | Action Signal_Activated 0018 00bb | | Action Signal_Completion 0019 0000 0000 | | .BLANK 0000[0x7] 0020 ; -------------------------------------------------------------------------------------- 0020 ; SUBPROGRAM 0020 ; -------------------------------------------------------------------------------------- 0020 0025 | % | .CONST 0x0025 ; Address of begin 0021 0004 | | .CONST 0x0004 ; Address of exception handler 0022 0002 | | .CONST 0x0002 ; Number of locals 0023 INIT_0020: 0023 00e1 | | Load_Encached Boolean_Cache 0024 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 0025 BODY_0020: 0025 482d |H- | Short_Literal 0x2d 0026 8003 | | Call 0x0,0x3 0027 6828 |h( | Jump_Zero 0x50 0028 00cf | | Action Mark_Auxiliary 0029 7821 |x! | Jump 0x4b 002a e20d | | Load 0x1,0xd 002b 8004 | | Call 0x0,0x4 002c e20f | | Load 0x1,0xf 002d 8005 | | Call 0x0,0x5 002e 00d1 | | Pop_Control Pop_Count_1 002f 8006 | | Call 0x0,0x6 0030 00cf | | Action Mark_Auxiliary 0031 7811 |x | Jump 0x43 0032 8006 | | Call 0x0,0x6 0033 482d |H- | Short_Literal 0x2d 0034 8003 | | Call 0x0,0x3 0035 6807 |h | Jump_Zero 0x3d 0036 e20d | | Load 0x1,0xd 0037 8004 | | Call 0x0,0x4 0038 e20f | | Load 0x1,0xf 0039 8005 | | Call 0x0,0x5 003a 00d1 | | Pop_Control Pop_Count_1 003b 8006 | | Call 0x0,0x6 003c 7805 |x | Jump 0x42 003d 4800 |H | Short_Literal 0x0 003e a5ff | | Store_Unchecked 0x2,-0x1 003f 0092 0056 | V| Action Push_String_Extended,0x56 ; " : Mot Incorrect !" 0041 8007 | | Call 0x0,0x7 0042 00c9 | | Action Pop_Auxiliary_Loop 0043 4809 |H | Short_Literal 0x9 0044 8003 | | Call 0x0,0x3 0045 77ec |w | Jump_Nonzero 0x32 0046 00ce | | Action Pop_Auxiliary 0047 e20f | | Load 0x1,0xf 0048 0a01 | | Execute_Immediate Plus,0x1 0049 c20f | | Store 0x1,0xf 004a 00c9 | | Action Pop_Auxiliary_Loop 004b 482d |H- | Short_Literal 0x2d 004c 8003 | | Call 0x0,0x3 004d 77dc |w | Jump_Nonzero 0x2a 004e 00ce | | Action Pop_Auxiliary 004f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0050 4800 |H | Short_Literal 0x0 0051 a5ff | | Store_Unchecked 0x2,-0x1 0052 0092 0056 | V| Action Push_String_Extended,0x56 ; " : Mot Incorrect !" 0054 8007 | | Call 0x0,0x7 0055 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0056 ; -------------------------------------------------------------------------------------- 0056 ; STRING TABLE 0056 ; -------------------------------------------------------------------------------------- 0056 0004 | | .STRTAB 0x0004->0x0058 ; " : Mot Incorrect !" 0057 0014 | | .STREND 0x0014->0x0061 0058 203a 204d | : M| .STRTAB_STRINGS 0061 0000 0000 | | .BLANK 0000[0x7] 0068 ; -------------------------------------------------------------------------------------- 0068 ; Debug Table 0068 ; -------------------------------------------------------------------------------------- 0068 0004 0008 | | .DEBUG4 0x0004,0x0008,0xdee9,0x0000,0x0001,0x0003 006e 000b 007a | z| .DBG4T 0x000b,0x007a,0x8000,0x0000 0072 0013 007e | ~| .DBG4T 0x0013,0x007e,0x8000,0x0000 0076 0023 0082 | # | .DBG4T 0x0023,0x0082,0x0001,0x4000 007a ; -------------------------------------------------------------------------------------- 007a ; Debug chain 007a ; -------------------------------------------------------------------------------------- 007a 0002 0000 | | .DBGLEN 0x0002,0x0000 007c 000b 0010 | | .DBGLNO 0x000b,0x0010 007e ; -------------------------------------------------------------------------------------- 007e ; Debug chain 007e ; -------------------------------------------------------------------------------------- 007e 0002 0000 | | .DBGLEN 0x0002,0x0000 0080 0013 0015 | | .DBGLNO 0x0013,0x0015 0082 ; -------------------------------------------------------------------------------------- 0082 ; Debug chain 0082 ; -------------------------------------------------------------------------------------- 0082 0001 000e | | .DBGLEN 0x0001,0x000e 0084 0023 0025 | # %| .DBGLNO 0x0023,0x0025,0x002a,0x002f,0x0032,0x0033,0x0036,0x003b,0x003d,0x003f,0x0043,0x0047,0x004b,0x0050,0x0052 0093 0001 0003 | | .XXX[0xe] 0095 0004 0006 | | 0097 0007 0008 | | 0099 0009 000a | | 009b 000b 0005 | | 009d 000c 0002 | | 009f 000d 000e | | 00a1 0000 0000 | | .BLANK 0000[0x15f]