|
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 0090 | | .CONST 0x0090 ; 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 005c | \| Action Push_String_Extended,0x5c ; " event="
000d e010 | | Load 0x0,0x10
000e 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
000f 00da | | Load_Top At_Offset_2
0010 2616 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x16
0011 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0012 822b | + | Call 0x1,0x2b
0013 0092 005d | ]| Action Push_String_Extended,0x5d ; ", window="
0015 e010 | | Load 0x0,0x10
0016 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0017 00da | | Load_Top At_Offset_2
0018 2616 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x16
0019 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
001a 822b | + | Call 0x1,0x2b
001b 0092 005e | ^| Action Push_String_Extended,0x5e ; ", x/y=("
001d e010 | | Load 0x0,0x10
001e 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
001f 00da | | Load_Top At_Offset_2
0020 2616 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x16
0021 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0022 822c | , | Call 0x1,0x2c
0023 482c |H, | Short_Literal 0x2c
0024 e010 | | Load 0x0,0x10
0025 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0026 00da | | Load_Top At_Offset_2
0027 2616 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x16
0028 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0029 822c | , | Call 0x1,0x2c
002a 0092 005f | _| Action Push_String_Extended,0x5f ; "), width="
002c e010 | | Load 0x0,0x10
002d 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
002e 00da | | Load_Top At_Offset_2
002f 2616 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x16
0030 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0031 822e | . | Call 0x1,0x2e
0032 0092 0060 | `| Action Push_String_Extended,0x60 ; ", height="
0034 e010 | | Load 0x0,0x10
0035 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0036 00da | | Load_Top At_Offset_2
0037 2616 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x16
0038 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
0039 822e | . | Call 0x1,0x2e
003a 482c |H, | Short_Literal 0x2c
003b e010 | | Load 0x0,0x10
003c 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
003d 4801 |H | Short_Literal 0x1
003e e010 | | Load 0x0,0x10
003f 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0040 0092 0061 | a| Action Push_String_Extended,0x61 ; " border_width="
0042 e010 | | Load 0x0,0x10
0043 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0044 00da | | Load_Top At_Offset_2
0045 2616 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x16
0046 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
0047 822e | . | Call 0x1,0x2e
0048 0092 0062 | b| Action Push_String_Extended,0x62 ; ", above="
004a e010 | | Load 0x0,0x10
004b 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
004c 00da | | Load_Top At_Offset_2
004d 2616 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x16
004e 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
004f 822b | + | Call 0x1,0x2b
0050 0092 0063 | c| Action Push_String_Extended,0x63 ; ", override="
0052 e010 | | Load 0x0,0x10
0053 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0054 00da | | Load_Top At_Offset_2
0055 2616 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x16
0056 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
0057 8217 | | Call 0x1,0x17
0058 4801 |H | Short_Literal 0x1
0059 e010 | | Load 0x0,0x10
005a 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
005b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
005c ; --------------------------------------------------------------------------------------
005c ; STRING TABLE
005c ; --------------------------------------------------------------------------------------
005c 0012 | | .STRTAB 0x0012->0x0065 ; " event="
005d 001a | | .STRTAB 0x001a->0x006a ; ", window="
005e 0021 | ! | .STRTAB 0x0021->0x006e ; ", x/y=("
005f 0026 | & | .STRTAB 0x0026->0x0072 ; "), width="
0060 002d | - | .STRTAB 0x002d->0x0076 ; ", height="
0061 0034 | 4 | .STRTAB 0x0034->0x007b ; " border_width="
0062 0043 | C | .STRTAB 0x0043->0x0083 ; ", above="
0063 0049 | I | .STRTAB 0x0049->0x0087 ; ", override="
0064 0052 | R | .STREND 0x0052->0x008d
0065 2020 2020 | | .STRTAB_STRINGS
008d 0000 0000 | | .XXX[0x3]
008f 0000 | |
0090 ; --------------------------------------------------------------------------------------
0090 ; Debug Table
0090 ; --------------------------------------------------------------------------------------
0090 0004 0000 | | .DEBUG4 0x0004,0x0000,0x6919,0x0000,0x0001,0x0001
0096 000b 009a | | .DBG4T 0x000b,0x009a,0x0001,0x0000
009a ; --------------------------------------------------------------------------------------
009a ; Debug chain
009a ; --------------------------------------------------------------------------------------
009a 0000 0015 | | .DBGLEN 0x0000,0x0015
009c 000b 000f | | .DBGLNO 0x000b,0x000f,0x0013,0x0017,0x001b,0x001f,0x0023,0x0026,0x002a,0x002e,0x0032,0x0036,0x003a,0x003d,0x0040,0x0044,0x0048,0x004c,0x0050,0x0054,0x0058
00b1 0000 0000 | | .BLANK 0000[0x14f]