|
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_6148f2
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 00a8 | | .CONST 0x00a8 ; 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 000b | | .CONST 0x000b ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0001 | | .CONST 0x0001 ; Number of locals
000b BODY_0008:
000b INIT_0008:
000b 0092 0070 | p| Action Push_String_Extended,0x70 ; " root="
000d e010 | | Load 0x0,0x10
000e 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
000f 00da | | Load_Top At_Offset_2
0010 2608 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
0011 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
0012 822b | + | Call 0x1,0x2b
0013 0092 0071 | q| Action Push_String_Extended,0x71 ; ", subw="
0015 e010 | | Load 0x0,0x10
0016 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0017 00da | | Load_Top At_Offset_2
0018 2608 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
0019 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
001a 822b | + | Call 0x1,0x2b
001b 0092 0072 | r| Action Push_String_Extended,0x72 ; ", time="
001d e010 | | Load 0x0,0x10
001e 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
001f 00da | | Load_Top At_Offset_2
0020 2608 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
0021 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0022 822a | * | Call 0x1,0x2a
0023 0092 0073 | s| Action Push_String_Extended,0x73 ; ","
0025 e010 | | Load 0x0,0x10
0026 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0027 4801 |H | Short_Literal 0x1
0028 e010 | | Load 0x0,0x10
0029 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
002a 0092 0074 | t| Action Push_String_Extended,0x74 ; " x/y=("
002c e010 | | Load 0x0,0x10
002d 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
002e 00da | | Load_Top At_Offset_2
002f 2608 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
0030 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
0031 822c | , | Call 0x1,0x2c
0032 482c |H, | Short_Literal 0x2c
0033 e010 | | Load 0x0,0x10
0034 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0035 00da | | Load_Top At_Offset_2
0036 2608 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
0037 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
0038 822c | , | Call 0x1,0x2c
0039 0092 0075 | u| Action Push_String_Extended,0x75 ; "), root:x/y=("
003b e010 | | Load 0x0,0x10
003c 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
003d 00da | | Load_Top At_Offset_2
003e 2608 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
003f 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0040 822c | , | Call 0x1,0x2c
0041 482c |H, | Short_Literal 0x2c
0042 e010 | | Load 0x0,0x10
0043 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0044 00da | | Load_Top At_Offset_2
0045 2608 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
0046 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0047 822c | , | Call 0x1,0x2c
0048 0092 0076 | v| Action Push_String_Extended,0x76 ; "),"
004a e010 | | Load 0x0,0x10
004b 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
004c 4801 |H | Short_Literal 0x1
004d e010 | | Load 0x0,0x10
004e 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
004f 0092 0077 | w| Action Push_String_Extended,0x77 ; " state="
0051 e010 | | Load 0x0,0x10
0052 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0053 00da | | Load_Top At_Offset_2
0054 2608 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
0055 340b |4 | Execute Record,Field_Reference,Field_Number 0xb
0056 e237 | 7 | Load 0x1,0x37
0057 e238 | 8 | Load 0x1,0x38
0058 e239 | 9 | Load 0x1,0x39
0059 e23a | : | Load 0x1,0x3a
005a 1d3b | ; | Execute_Immediate Reference_Lex_1,0x3b
005b 8230 | 0 | Call 0x1,0x30
005c 0092 0078 | x| Action Push_String_Extended,0x78 ; ", is_hint="
005e e010 | | Load 0x0,0x10
005f 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0060 00da | | Load_Top At_Offset_2
0061 2608 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
0062 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0063 8225 | % | Call 0x1,0x25
0064 0092 0079 | y| Action Push_String_Extended,0x79 ; ", same_screen="
0066 e010 | | Load 0x0,0x10
0067 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0068 00da | | Load_Top At_Offset_2
0069 2608 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
006a 3c0c |< | Execute Record,Field_Read,Field_Number 0xc
006b 8217 | | Call 0x1,0x17
006c 4801 |H | Short_Literal 0x1
006d e010 | | Load 0x0,0x10
006e 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
006f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0070 ; --------------------------------------------------------------------------------------
0070 ; STRING TABLE
0070 ; --------------------------------------------------------------------------------------
0070 0016 | | .STRTAB 0x0016->0x007b ; " root="
0071 001d | | .STRTAB 0x001d->0x007f ; ", subw="
0072 0022 | " | .STRTAB 0x0022->0x0083 ; ", time="
0073 0027 | ' | .STRTAB 0x0027->0x0086 ; ","
0074 0026 | & | .STRTAB 0x0026->0x0087 ; " x/y=("
0075 002d | - | .STRTAB 0x002d->0x008b ; "), root:x/y=("
0076 0038 | 8 | .STRTAB 0x0038->0x0092 ; "),"
0077 0038 | 8 | .STRTAB 0x0038->0x0093 ; " state="
0078 0040 | @ | .STRTAB 0x0040->0x0098 ; ", is_hint="
0079 0048 | H | .STRTAB 0x0048->0x009d ; ", same_screen="
007a 0054 | T | .STREND 0x0054->0x00a4
007b 2020 2020 | | .STRTAB_STRINGS
00a4 0000 0000 | | .BLANK 0000[0x4]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; Debug Table
00a8 ; --------------------------------------------------------------------------------------
00a8 0004 0000 | | .DEBUG4 0x0004,0x0000,0x687c,0x0000,0x0001,0x0001
00ae 000b 00b2 | | .DBG4T 0x000b,0x00b2,0x0001,0x0000
00b2 ; --------------------------------------------------------------------------------------
00b2 ; Debug chain
00b2 ; --------------------------------------------------------------------------------------
00b2 0000 0019 | | .DBGLEN 0x0000,0x0019
00b4 000b 000f | | .DBGLNO 0x000b,0x000f,0x0013,0x0017,0x001b,0x001f,0x0023,0x0027,0x002a,0x002e,0x0032,0x0035,0x0039,0x003d,0x0041,0x0044,0x0048,0x004c,0x004f,0x0053,0x005c,0x0060,0x0064,0x0068,0x006c
00cd 0000 0000 | | .BLANK 0000[0x133]