|
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_191cd7
└─⟦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 0118 | | .CONST 0x0118 ; 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 001f | | .CONST 0x001f ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 000f | | .CONST 0x000f ; Number of locals
000b INIT_0008:
000b 4808 |H | Short_Literal 0x8
000c 4800 |H | Short_Literal 0x0
000d 4807 |H | Short_Literal 0x7
000e 029f 002b | +| Declare_Subprogram INIT_0028,For_Call
0010 03fb | | Declare_Type Discrete,Defined,Visible,With_Size
0011 4808 |H | Short_Literal 0x8
0012 4800 |H | Short_Literal 0x0
0013 4801 |H | Short_Literal 0x1
0014 029f 0053 | S| Declare_Subprogram INIT_0050,For_Call
0016 03fb | | Declare_Type Discrete,Defined,Visible,With_Size
0017 0007 | | Action Break_Optional
0018 4808 |H | Short_Literal 0x8
0019 4800 |H | Short_Literal 0x0
001a 4804 |H | Short_Literal 0x4
001b 029f 007b | {| Declare_Subprogram INIT_0078,For_Call
001d 03fb | | Declare_Type Discrete,Defined,Visible,With_Size
001e 00bf | | Action Accept_Activation
001f BODY_0008:
001f 00bc | | Action Signal_Activated
0020 00bb | | Action Signal_Completion
0021 0000 0000 | | .BLANK 0000[0x7]
0028 ; --------------------------------------------------------------------------------------
0028 ; SUBPROGRAM
0028 ; --------------------------------------------------------------------------------------
0028 002b | + | .CONST 0x002b ; Address of begin
0029 0004 | | .CONST 0x0004 ; Address of exception handler
002a 0001 | | .CONST 0x0001 ; Number of locals
002b BODY_0028:
002b INIT_0028:
002b 4607 |F | Jump_Case 0x8
002c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
002d 7807 |x | Jump 0x35 ; case 0x1
002e 780a |x | Jump 0x39 ; case 0x2
002f 780e |x | Jump 0x3e ; case 0x3
0030 7811 |x | Jump 0x42 ; case 0x4
0031 7812 |x | Jump 0x44 ; case 0x5
0032 7813 |x | Jump 0x46 ; case 0x6
0033 7816 |x | Jump 0x4a ; case 0x7
0034 4302 |C | .XXX[0x1]
0035 00da | | Load_Top At_Offset_2
0036 0091 009e | | Action Push_String_Extended_Indexed,0x9e ; "ASYNC_POINTER"
0038 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0039 00db | | Load_Top At_Offset_3
003a 00db | | Load_Top At_Offset_3
003b 00e0 | | Load_Encached Standard_Cache
003c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
003d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
003e 00da | | Load_Top At_Offset_2
003f 00e0 | | Load_Encached Standard_Cache
0040 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0041 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0042 00db | | Load_Top At_Offset_3
0043 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0044 00db | | Load_Top At_Offset_3
0045 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0046 e20d | | Load 0x1,0xd
0047 00dc | | Load_Top At_Offset_4
0048 0267 | g | Execute Discrete,Predecessor
0049 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
004a e20d | | Load 0x1,0xd
004b 00dc | | Load_Top At_Offset_4
004c 0268 | h | Execute Discrete,Successor
004d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
004e 0000 0000 | | .XXX[0x2]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0053 | S | .CONST 0x0053 ; Address of begin
0051 0004 | | .CONST 0x0004 ; Address of exception handler
0052 0001 | | .CONST 0x0001 ; Number of locals
0053 BODY_0050:
0053 INIT_0050:
0053 4607 |F | Jump_Case 0x8
0054 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
0055 7807 |x | Jump 0x5d ; case 0x1
0056 780a |x | Jump 0x61 ; case 0x2
0057 780e |x | Jump 0x66 ; case 0x3
0058 7811 |x | Jump 0x6a ; case 0x4
0059 7812 |x | Jump 0x6c ; case 0x5
005a 7813 |x | Jump 0x6e ; case 0x6
005b 7816 |x | Jump 0x72 ; case 0x7
005c 4302 |C | .XXX[0x1]
005d 00da | | Load_Top At_Offset_2
005e 0091 00a6 | | Action Push_String_Extended_Indexed,0xa6 ; "GRAB_MODE_SYNC"
0060 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0061 00db | | Load_Top At_Offset_3
0062 00db | | Load_Top At_Offset_3
0063 00e0 | | Load_Encached Standard_Cache
0064 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0065 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0066 00da | | Load_Top At_Offset_2
0067 00e0 | | Load_Encached Standard_Cache
0068 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0069 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
006a 00db | | Load_Top At_Offset_3
006b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
006c 00db | | Load_Top At_Offset_3
006d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
006e e20e | | Load 0x1,0xe
006f 00dc | | Load_Top At_Offset_4
0070 0267 | g | Execute Discrete,Predecessor
0071 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0072 e20e | | Load 0x1,0xe
0073 00dc | | Load_Top At_Offset_4
0074 0268 | h | Execute Discrete,Successor
0075 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0076 0000 0000 | | .XXX[0x2]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007b | { | .CONST 0x007b ; Address of begin
0079 0004 | | .CONST 0x0004 ; Address of exception handler
007a 0001 | | .CONST 0x0001 ; Number of locals
007b BODY_0078:
007b INIT_0078:
007b 4607 |F | Jump_Case 0x8
007c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
007d 7807 |x | Jump 0x85 ; case 0x1
007e 780a |x | Jump 0x89 ; case 0x2
007f 780e |x | Jump 0x8e ; case 0x3
0080 7811 |x | Jump 0x92 ; case 0x4
0081 7812 |x | Jump 0x94 ; case 0x5
0082 7813 |x | Jump 0x96 ; case 0x6
0083 7816 |x | Jump 0x9a ; case 0x7
0084 4302 |C | .XXX[0x1]
0085 00da | | Load_Top At_Offset_2
0086 0091 00a8 | | Action Push_String_Extended_Indexed,0xa8 ; "GRAB_SUCCESS"
0088 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0089 00db | | Load_Top At_Offset_3
008a 00db | | Load_Top At_Offset_3
008b 00e0 | | Load_Encached Standard_Cache
008c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
008d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
008e 00da | | Load_Top At_Offset_2
008f 00e0 | | Load_Encached Standard_Cache
0090 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0091 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0092 00db | | Load_Top At_Offset_3
0093 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0094 00db | | Load_Top At_Offset_3
0095 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0096 e20f | | Load 0x1,0xf
0097 00dc | | Load_Top At_Offset_4
0098 0267 | g | Execute Discrete,Predecessor
0099 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
009a e20f | | Load 0x1,0xf
009b 00dc | | Load_Top At_Offset_4
009c 0268 | h | Execute Discrete,Successor
009d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
009e ; --------------------------------------------------------------------------------------
009e ; STRING TABLE
009e ; --------------------------------------------------------------------------------------
009e 0020 | | .STRTAB 0x0020->0x00ae ; "ASYNC_POINTER"
009f 002b | + | .STRTAB 0x002b->0x00b4 ; "SYNC_POINTER"
00a0 0035 | 5 | .STRTAB 0x0035->0x00ba ; "REPLAY_POINTER"
00a1 0041 | A | .STRTAB 0x0041->0x00c1 ; "ASYNC_KEYBOARD"
00a2 004d | M | .STRTAB 0x004d->0x00c8 ; "SYNC_KEYBOARD"
00a3 0058 | X | .STRTAB 0x0058->0x00cf ; "REPLAY_KEYBOARD"
00a4 0065 | e | .STRTAB 0x0065->0x00d6 ; "ASYNC_BOTH"
00a5 006d | m | .STRTAB 0x006d->0x00db ; "SYNC_BOTH"
00a6 0074 | t | .STRTAB 0x0074->0x00e0 ; "GRAB_MODE_SYNC"
00a7 0080 | | .STRTAB 0x0080->0x00e7 ; "GRAB_MODE_ASYNC"
00a8 008d | | .STRTAB 0x008d->0x00ee ; "GRAB_SUCCESS"
00a9 0097 | | .STRTAB 0x0097->0x00f4 ; "ALREADY_GRABBED"
00aa 00a4 | | .STRTAB 0x00a4->0x00fc ; "GRAB_INVALID_TIME"
00ab 00b3 | | .STRTAB 0x00b3->0x0104 ; "GRAB_NOT_VIEWABLE"
00ac 00c2 | | .STRTAB 0x00c2->0x010d ; "GRAB_FROZEN"
00ad 00cb | | .STREND 0x00cb->0x0112
00ae 4153 594e |ASYN| .STRTAB_STRINGS
0113 0000 0000 | | .BLANK 0000[0x5]
0118 ; --------------------------------------------------------------------------------------
0118 ; Debug Table
0118 ; --------------------------------------------------------------------------------------
0118 0004 0000 | | .DEBUG4 0x0004,0x0000,0x48d0,0x0000,0x0001,0x0004
011e 000b 012e | .| .DBG4T 0x000b,0x012e,0x8000,0x0000
0122 002b 0000 | + | .DBG4T 0x002b,0x0000,0x0005,0x0000
0126 0053 0000 | S | .DBG4T 0x0053,0x0000,0x0005,0x0000
012a 007b 0000 | { | .DBG4T 0x007b,0x0000,0x0005,0x0000
012e ; --------------------------------------------------------------------------------------
012e ; Debug chain
012e ; --------------------------------------------------------------------------------------
012e 0005 0000 | | .DBGLEN 0x0005,0x0000
0130 000b 0011 | | .DBGLNO 0x000b,0x0011,0x0017,0x0018,0x001e
0135 0000 0000 | | .BLANK 0000[0xcb]