|
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, 5811_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦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 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0078 | x | .CONST 0x0078 ; 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 0012 | | .CONST 0x0012 ; 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 ; Debug Table 0x0 = .DEBUG 0x000b,0x0092,0x8000,0x0000,0x0025,0x6b64,0x0000,0x0003 ; Debug Table 0x0.0x0 = 0xb,0xffff 000d 0007 | | Action Break_Optional ; Debug Table 0x0.0x1 = 0xd,0xfffe 000e 0007 | | Action Break_Optional ; Debug Table 0x0.0x2 = 0xe,0xfffd 000f 00bf | | Action Accept_Activation ; Debug Table 0x0.0x3 = 0xf,0xfffc 0010 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1 = .DEBUG 0x0010,0x009c,0x8000,0x0000,0x0037,0xc654,0x0000,0x000d ; Debug Table 0x1.0x0 = 0x10,0xffff 0011 00c7 | | Action Elaborate_Subprogram 0012 BODY_0008: 0012 00bc | | Action Signal_Activated 0013 00bb | | Action Signal_Completion 0014 0000 0000 | | .BLANK 0000[0x4] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 001b | | .CONST 0x001b ; Address of begin 0019 002a | * | .CONST 0x002a ; Address of exception handler 001a 0001 | | .CONST 0x0001 ; Number of locals 001b BODY_0018: 001b INIT_0018: 001b e001 | | Load 0x0,0x1 ; Debug Table 0x2 = .DEBUG 0x001b,0x00a0,0x0001,0x0000,0x0025,0x6b64,0x0000,0x0004 ; Debug Table 0x2.0x0 = 0x1b,0x1 001c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 001d e002 | | Load 0x0,0x2 001e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 001f e003 | | Load 0x0,0x3 0020 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0021 00d8 | | Load_Top At_Offset_0 0022 e003 | | Load 0x0,0x3 0023 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 0024 7003 |p | Jump_Nonzero 0x28 0025 e004 | | Load 0x0,0x4 0026 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27 0027 0257 | W | Execute Discrete,Raise 0028 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0029 4501 |E | Exit_Suprogram New_Top_Offset 0x1 002a TRAP_0018: 002a e004 | | Load 0x0,0x4 002b 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27 002c 010f | | Execute Exception,Equal 002d 6805 |h | Jump_Zero 0x33 002e 0092 003b | ;| Action Push_String_Extended,0x3b ; "Unable to debug job - problem encountered starting a debuggger" ; Debug Table 0x2.0x1 = 0x2e,0x2 0030 e005 | | Load 0x0,0x5 0031 1860 | ` | Execute Package,Field_Execute,Field_Number 0x60 0032 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0033 0092 003c | <| Action Push_String_Extended,0x3c ; "Unable to debug job - starting debugger raised " ; Debug Table 0x2.0x2 = 0x33,0x3 0035 e006 | | Load 0x0,0x6 0036 180d | | Execute Package,Field_Execute,Field_Number 0xd 0037 01cc | | Execute Vector,Catenate 0038 e005 | | Load 0x0,0x5 0039 1860 | ` | Execute Package,Field_Execute,Field_Number 0x60 003a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 003b ; -------------------------------------------------------------------------------------- 003b ; STRING TABLE 003b ; -------------------------------------------------------------------------------------- 003b 0006 | | .STRTAB 0x0006->0x003e ; "Unable to debug job - problem encountered starting a debuggger" 003c 0042 | B | .STRTAB 0x0042->0x005d ; "Unable to debug job - starting debugger raised " 003d 006f | o | .STREND 0x006f->0x0074 003e 556e 6162 |Unab| .STRTAB_STRINGS 0075 0000 0000 | | .XXX[0x3] 0077 0000 | | 0078 ; -------------------------------------------------------------------------------------- 0078 ; Debug Table 0078 ; -------------------------------------------------------------------------------------- 0078 0003 0003 | | .CONST 0x0003,0x0003 007a 000b 0092 | | .DEBUG 0x000b,0x0092,0x8000,0x0000,0x0025,0x6b64,0x0000,0x0003 0082 0010 009c | | .DEBUG 0x0010,0x009c,0x8000,0x0000,0x0037,0xc654,0x0000,0x000d 008a 001b 00a0 | | .DEBUG 0x001b,0x00a0,0x0001,0x0000,0x0025,0x6b64,0x0000,0x0004 0092 ; -------------------------------------------------------------------------------------- 0092 ; Debug3 Subtable 0x0 0092 ; -------------------------------------------------------------------------------------- 0092 0004 0000 | | .DBG3TAB 0x0004,0x0000 0094 000b ffff | | .CONST 0x000b,0xffff 0096 000d fffe | | .CONST 0x000d,0xfffe 0098 000e fffd | | .CONST 0x000e,0xfffd 009a 000f fffc | | .CONST 0x000f,0xfffc 009c ; -------------------------------------------------------------------------------------- 009c ; Debug3 Subtable 0x1 009c ; -------------------------------------------------------------------------------------- 009c 0001 0000 | | .DBG3TAB 0x0001,0x0000 009e 0010 ffff | | .CONST 0x0010,0xffff 00a0 ; -------------------------------------------------------------------------------------- 00a0 ; Debug3 Subtable 0x2 00a0 ; -------------------------------------------------------------------------------------- 00a0 0000 0003 | | .DBG3TAB 0x0000,0x0003 00a2 001b 0001 | | .CONST 0x001b,0x0001 00a4 002e 0002 | . | .CONST 0x002e,0x0002 00a6 0033 0003 | 3 | .CONST 0x0033,0x0003 00a8 0000 0000 | | .BLANK 0000[0x158]