|
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, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_07b4f8
└─⟦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 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 00c8 | | .CONST 0x00c8 ; 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 002b | + | .CONST 0x002b ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0011 | | .CONST 0x0011 ; Number of locals
000b INIT_0008:
000b 00bf | | Action Accept_Activation ; Debug Table 0x0 = .DEBUG 0x000b,0x00e2,0x8000,0x0000,0x004d,0xb565,0x0000,0x0003
000c 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x000c,0x00e4,0x8000,0x0000,0x004d,0xb5c5,0x0000,0x0005
; Debug Table 0x1.0x0 = 0xc,0xffff
000d 0092 0044 | D| Action Push_String_Extended,0x44 ; "Publisher"
; Debug Table 0x1.0x1 = 0xd,0xfffe
000f 0092 0045 | E| Action Push_String_Extended,0x45 ; "Options"
; Debug Table 0x1.0x2 = 0xf,0xfffd
0011 029b 0033 | 3| Declare_Subprogram INIT_0030,For_Outer_Call,Unelaborated ; Debug Table 0x1.0x3 = 0x11,0xfffc
0013 602c |`, | Indirect_Literal Discrete,0x40,{0x00000000, 0x004db5c5} ; Debug Table 0x1.0x4 = 0x13,0xfffb
0014 482b |H+ | Short_Literal 0x2b
0015 e20d | | Load 0x1,0xd
0016 4800 |H | Short_Literal 0x0
0017 e001 | | Load 0x0,0x1
0018 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0019 0387 | | Declare_Variable Package
001a 00d8 | | Load_Top At_Offset_0
001b 020f | | Execute Module,Activate
001c 6023 |`# | Indirect_Literal Discrete,0x40,{0x00000000, 0x004db5c5} ; Debug Table 0x1.0x5 = 0x1c,0xfffa
001d 4835 |H5 | Short_Literal 0x35
001e 484c |HL | Short_Literal 0x4c
001f e20e | | Load 0x1,0xe
0020 00ea | | Load_Encached Null_String_Cache
0021 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0022 e001 | | Load 0x0,0x1
0023 191e | | Execute Package,Field_Reference,Field_Number 0x1e
0024 e210 | | Load 0x1,0x10
0025 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0026 0387 | | Declare_Variable Package
0027 00d8 | | Load_Top At_Offset_0
0028 020f | | Execute Module,Activate
0029 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x6 = 0x29,0xfff9
002a 00c7 | | Action Elaborate_Subprogram
002b BODY_0008:
002b 00bc | | Action Signal_Activated
002c 00bb | | Action Signal_Completion
002d 0000 0000 | | .XXX[0x3]
002f 0000 | |
0030 ; --------------------------------------------------------------------------------------
0030 ; SUBPROGRAM
0030 ; --------------------------------------------------------------------------------------
0030 0033 | 3 | .CONST 0x0033 ; Address of begin
0031 0004 | | .CONST 0x0004 ; Address of exception handler
0032 0001 | | .CONST 0x0001 ; Number of locals
0033 BODY_0030:
0033 INIT_0030:
0033 00da | | Load_Top At_Offset_2 ; Debug Table 0x2 = .DEBUG 0x0033,0x00f4,0x0002,0x0000,0x004d,0xb5c5,0x0000,0x001a
; Debug Table 0x2.0x0 = 0x33,0x1
0034 e20e | | Load 0x1,0xe
0035 01df | | Execute Vector,Equal
0036 6803 |h | Jump_Zero 0x3a
0037 0092 0046 | F| Action Push_String_Extended,0x46 ; "Allows the user to specify command options for package Publisher. For example, Publisher.Options := \x22TPS\x22 requests Interleaf ASCII markup instead of Compose markup. For more information, refer to the spec of package Publisher."
; Debug Table 0x2.0x1 = 0x37,0x2
0039 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
003a 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x2 = 0x3a,0x3
003b 00db | | Load_Top At_Offset_3
003c e001 | | Load 0x0,0x1
003d 181d | | Execute Package,Field_Execute,Field_Number 0x1d
003e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
003f 0000 | | .XXX[0x1]
0040 0000 0000 | | .LITERAL {0x00000000, 0x004db5c5}
0044 ; --------------------------------------------------------------------------------------
0044 ; STRING TABLE
0044 ; --------------------------------------------------------------------------------------
0044 0008 | | .STRTAB 0x0008->0x0048 ; "Publisher"
0045 000f | | .STRTAB 0x000f->0x004c ; "Options"
0046 0014 | | .STRTAB 0x0014->0x0050 ; "Allows the user to specify command options for package Publisher. For example, Publisher.Options := \x22TPS\x22 requests Interleaf ASCII markup instead of Compose markup. For more information, refer to the spec of package Publisher."
0047 00f6 | | .STREND 0x00f6->0x00c2
0048 5075 626c |Publ| .STRTAB_STRINGS
00c2 0000 0000 | | .BLANK 0000[0x6]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; Debug Table
00c8 ; --------------------------------------------------------------------------------------
00c8 0003 0003 | | .CONST 0x0003,0x0003
00ca 000b 00e2 | | .DEBUG 0x000b,0x00e2,0x8000,0x0000,0x004d,0xb565,0x0000,0x0003
00d2 000c 00e4 | | .DEBUG 0x000c,0x00e4,0x8000,0x0000,0x004d,0xb5c5,0x0000,0x0005
00da 0033 00f4 | 3 | .DEBUG 0x0033,0x00f4,0x0002,0x0000,0x004d,0xb5c5,0x0000,0x001a
00e2 ; --------------------------------------------------------------------------------------
00e2 ; Debug3 Subtable 0x0
00e2 ; --------------------------------------------------------------------------------------
00e2 0000 0000 | | .DBG3TAB 0x0000,0x0000
00e4 ; --------------------------------------------------------------------------------------
00e4 ; Debug3 Subtable 0x1
00e4 ; --------------------------------------------------------------------------------------
00e4 0007 0000 | | .DBG3TAB 0x0007,0x0000
00e6 000c ffff | | .CONST 0x000c,0xffff
00e8 000d fffe | | .CONST 0x000d,0xfffe
00ea 000f fffd | | .CONST 0x000f,0xfffd
00ec 0011 fffc | | .CONST 0x0011,0xfffc
00ee 0013 fffb | | .CONST 0x0013,0xfffb
00f0 001c fffa | | .CONST 0x001c,0xfffa
00f2 0029 fff9 | ) | .CONST 0x0029,0xfff9
00f4 ; --------------------------------------------------------------------------------------
00f4 ; Debug3 Subtable 0x2
00f4 ; --------------------------------------------------------------------------------------
00f4 0000 0003 | | .DBG3TAB 0x0000,0x0003
00f6 0033 0001 | 3 | .CONST 0x0033,0x0001
00f8 0037 0002 | 7 | .CONST 0x0037,0x0002
00fa 003a 0003 | : | .CONST 0x003a,0x0003
00fc 0000 0000 | | .BLANK 0000[0x104]