|
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, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_bdfc99
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0180 | | .CONST 0x0180 ; 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 0010 | | .CONST 0x0010 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0001 | | .CONST 0x0001 ; Number of locals
000b INIT_0008:
000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 00bf | | Action Accept_Activation
000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd
000f 00c7 | | Action Elaborate_Subprogram
0010 BODY_0008:
0010 00bc | | Action Signal_Activated
0011 00bb | | Action Signal_Completion
0012 0000 0000 | | .BLANK 0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 003b | ; | .CONST 0x003b ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0009 | | .CONST 0x0009 ; Number of locals
001b INIT_0018:
001b 029f 006b | k| Declare_Subprogram INIT_0068,For_Call
001d 029f 0163 | c| Declare_Subprogram INIT_0160,For_Call
001f a002 | | Store_Unchecked 0x0,0x2
0020 00c6 | | Action Check_Subprogram_Elaborated
0021 4803 |H | Short_Literal 0x3
0022 4802 |H | Short_Literal 0x2
0023 0099 | | Action Reference_Dynamic
0024 0093 0000 | | push_full_address 0x0
0026 6039 |`9 | Indirect_Literal Discrete,0x60,{0x80000000, 0x00020000}
0027 0273 | s | Execute Discrete,Plus
0028 e003 | | Load 0x0,0x3
0029 0273 | s | Execute Discrete,Plus
002a e004 | | Load 0x0,0x4
002b 0273 | s | Execute Discrete,Plus
002c 4806 |H | Short_Literal 0x6
002d 0007 | | Action Break_Optional
002e a005 | | Store_Unchecked 0x0,0x5
002f 00c6 | | Action Check_Subprogram_Elaborated
0030 a006 | | Store_Unchecked 0x0,0x6
0031 0093 0000 | | push_full_address 0x0
0033 6028 |`( | Indirect_Literal Discrete,0x5c,{0x80000000, 0x00010000}
0034 0273 | s | Execute Discrete,Plus
0035 e003 | | Load 0x0,0x3
0036 0273 | s | Execute Discrete,Plus
0037 e007 | | Load 0x0,0x7
0038 0273 | s | Execute Discrete,Plus
0039 4809 |H | Short_Literal 0x9
003a 0007 | | Action Break_Optional
003b BODY_0018:
003b 8402 | | Call 0x2,0x2
003c 8008 | | Call 0x0,0x8
003d 4807 |H | Short_Literal 0x7
003e 4802 |H | Short_Literal 0x2
003f 0099 | | Action Reference_Dynamic
0040 4808 |H | Short_Literal 0x8
0041 4802 |H | Short_Literal 0x2
0042 0099 | | Action Reference_Dynamic
0043 8005 | | Call 0x0,0x5
0044 4801 |H | Short_Literal 0x1
0045 8008 | | Call 0x0,0x8
0046 8009 | | Call 0x0,0x9
0047 00cf | | Action Mark_Auxiliary
0048 800a | | Call 0x0,0xa
0049 4801 |H | Short_Literal 0x1
004a 0263 | c | Execute Discrete,Above_Bound
004b 7005 |p | Jump_Nonzero 0x51
004c 8008 | | Call 0x0,0x8
004d 00d9 | | Load_Top At_Offset_1
004e 800b | | Call 0x0,0xb
004f 00c8 | | Action Pop_Auxiliary_Range
0050 3ffb |? | Loop_Increasing 0x4c
0051 00ce | | Action Pop_Auxiliary
0052 4804 |H | Short_Literal 0x4
0053 4802 |H | Short_Literal 0x2
0054 0099 | | Action Reference_Dynamic
0055 4805 |H | Short_Literal 0x5
0056 4802 |H | Short_Literal 0x2
0057 0099 | | Action Reference_Dynamic
0058 8002 | | Call 0x0,0x2
0059 4501 |E | Exit_Suprogram New_Top_Offset 0x1
005a 0000 0000 | | .XXX[0x2]
005c 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
0060 8000 0000 | | .LITERAL {0x80000000, 0x00020000}
0064 0000 0000 | | .BLANK 0000[0x4]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b | k | .CONST 0x006b ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0001 | | .CONST 0x0001 ; Number of locals
006b BODY_0068:
006b INIT_0068:
006b e00c | | Load 0x0,0xc
006c 0337 | 7 | Declare_Variable Array
006d e00d | | Load 0x0,0xd
006e 4800 |H | Short_Literal 0x0
006f 00da | | Load_Top At_Offset_2
0070 01d6 | | Execute Vector,Field_Write
0071 e00e | | Load 0x0,0xe
0072 4801 |H | Short_Literal 0x1
0073 00da | | Load_Top At_Offset_2
0074 01d6 | | Execute Vector,Field_Write
0075 0092 016c | l| Action Push_String_Extended,0x16c ; "Greta"
0077 800f | | Call 0x0,0xf
0078 4802 |H | Short_Literal 0x2
0079 00da | | Load_Top At_Offset_2
007a 01d6 | | Execute Vector,Field_Write
007b e00c | | Load 0x0,0xc
007c 01c3 | | Execute Vector,Check_In_Type
007d 8010 | | Call 0x0,0x10
007e e00c | | Load 0x0,0xc
007f 0337 | 7 | Declare_Variable Array
0080 e011 | | Load 0x0,0x11
0081 4800 |H | Short_Literal 0x0
0082 00da | | Load_Top At_Offset_2
0083 01d6 | | Execute Vector,Field_Write
0084 e012 | | Load 0x0,0x12
0085 4801 |H | Short_Literal 0x1
0086 00da | | Load_Top At_Offset_2
0087 01d6 | | Execute Vector,Field_Write
0088 0092 016d | m| Action Push_String_Extended,0x16d ; "Garbo"
008a 800f | | Call 0x0,0xf
008b 4802 |H | Short_Literal 0x2
008c 00da | | Load_Top At_Offset_2
008d 01d6 | | Execute Vector,Field_Write
008e e00c | | Load 0x0,0xc
008f 01c3 | | Execute Vector,Check_In_Type
0090 8010 | | Call 0x0,0x10
0091 e00c | | Load 0x0,0xc
0092 0337 | 7 | Declare_Variable Array
0093 e011 | | Load 0x0,0x11
0094 4800 |H | Short_Literal 0x0
0095 00da | | Load_Top At_Offset_2
0096 01d6 | | Execute Vector,Field_Write
0097 e00e | | Load 0x0,0xe
0098 4801 |H | Short_Literal 0x1
0099 00da | | Load_Top At_Offset_2
009a 01d6 | | Execute Vector,Field_Write
009b 0092 016c | l| Action Push_String_Extended,0x16c ; "Greta"
009d 800f | | Call 0x0,0xf
009e 4802 |H | Short_Literal 0x2
009f 00da | | Load_Top At_Offset_2
00a0 01d6 | | Execute Vector,Field_Write
00a1 e00c | | Load 0x0,0xc
00a2 01c3 | | Execute Vector,Check_In_Type
00a3 8010 | | Call 0x0,0x10
00a4 e00c | | Load 0x0,0xc
00a5 0337 | 7 | Declare_Variable Array
00a6 e013 | | Load 0x0,0x13
00a7 4800 |H | Short_Literal 0x0
00a8 00da | | Load_Top At_Offset_2
00a9 01d6 | | Execute Vector,Field_Write
00aa e00e | | Load 0x0,0xe
00ab 4801 |H | Short_Literal 0x1
00ac 00da | | Load_Top At_Offset_2
00ad 01d6 | | Execute Vector,Field_Write
00ae 0092 016e | n| Action Push_String_Extended,0x16e ; "Shrdlu"
00b0 800f | | Call 0x0,0xf
00b1 4802 |H | Short_Literal 0x2
00b2 00da | | Load_Top At_Offset_2
00b3 01d6 | | Execute Vector,Field_Write
00b4 e00c | | Load 0x0,0xc
00b5 01c3 | | Execute Vector,Check_In_Type
00b6 8010 | | Call 0x0,0x10
00b7 e00c | | Load 0x0,0xc
00b8 0337 | 7 | Declare_Variable Array
00b9 e013 | | Load 0x0,0x13
00ba 4800 |H | Short_Literal 0x0
00bb 00da | | Load_Top At_Offset_2
00bc 01d6 | | Execute Vector,Field_Write
00bd e012 | | Load 0x0,0x12
00be 4801 |H | Short_Literal 0x1
00bf 00da | | Load_Top At_Offset_2
00c0 01d6 | | Execute Vector,Field_Write
00c1 0092 016c | l| Action Push_String_Extended,0x16c ; "Greta"
00c3 800f | | Call 0x0,0xf
00c4 4802 |H | Short_Literal 0x2
00c5 00da | | Load_Top At_Offset_2
00c6 01d6 | | Execute Vector,Field_Write
00c7 e00c | | Load 0x0,0xc
00c8 01c3 | | Execute Vector,Check_In_Type
00c9 8010 | | Call 0x0,0x10
00ca e00c | | Load 0x0,0xc
00cb 0337 | 7 | Declare_Variable Array
00cc e00d | | Load 0x0,0xd
00cd 4800 |H | Short_Literal 0x0
00ce 00da | | Load_Top At_Offset_2
00cf 01d6 | | Execute Vector,Field_Write
00d0 e012 | | Load 0x0,0x12
00d1 4801 |H | Short_Literal 0x1
00d2 00da | | Load_Top At_Offset_2
00d3 01d6 | | Execute Vector,Field_Write
00d4 0092 016f | o| Action Push_String_Extended,0x16f ; "Marylin"
00d6 800f | | Call 0x0,0xf
00d7 4802 |H | Short_Literal 0x2
00d8 00da | | Load_Top At_Offset_2
00d9 01d6 | | Execute Vector,Field_Write
00da e00c | | Load 0x0,0xc
00db 01c3 | | Execute Vector,Check_In_Type
00dc 8010 | | Call 0x0,0x10
00dd e014 | | Load 0x0,0x14
00de 0337 | 7 | Declare_Variable Array
00df 4832 |H2 | Short_Literal 0x32
00e0 8015 | | Call 0x0,0x15
00e1 4801 |H | Short_Literal 0x1
00e2 00da | | Load_Top At_Offset_2
00e3 01d6 | | Execute Vector,Field_Write
00e4 e013 | | Load 0x0,0x13
00e5 4800 |H | Short_Literal 0x0
00e6 00da | | Load_Top At_Offset_2
00e7 01d6 | | Execute Vector,Field_Write
00e8 e016 | | Load 0x0,0x16
00e9 4802 |H | Short_Literal 0x2
00ea 00da | | Load_Top At_Offset_2
00eb 01d6 | | Execute Vector,Field_Write
00ec e014 | | Load 0x0,0x14
00ed 01c3 | | Execute Vector,Check_In_Type
00ee 8017 | | Call 0x0,0x17
00ef e014 | | Load 0x0,0x14
00f0 0337 | 7 | Declare_Variable Array
00f1 484b |HK | Short_Literal 0x4b
00f2 8015 | | Call 0x0,0x15
00f3 4801 |H | Short_Literal 0x1
00f4 00da | | Load_Top At_Offset_2
00f5 01d6 | | Execute Vector,Field_Write
00f6 e00d | | Load 0x0,0xd
00f7 4800 |H | Short_Literal 0x0
00f8 00da | | Load_Top At_Offset_2
00f9 01d6 | | Execute Vector,Field_Write
00fa e016 | | Load 0x0,0x16
00fb 4802 |H | Short_Literal 0x2
00fc 00da | | Load_Top At_Offset_2
00fd 01d6 | | Execute Vector,Field_Write
00fe e014 | | Load 0x0,0x14
00ff 01c3 | | Execute Vector,Check_In_Type
0100 8017 | | Call 0x0,0x17
0101 e014 | | Load 0x0,0x14
0102 0337 | 7 | Declare_Variable Array
0103 485f |H_ | Short_Literal 0x5f
0104 8015 | | Call 0x0,0x15
0105 4801 |H | Short_Literal 0x1
0106 00da | | Load_Top At_Offset_2
0107 01d6 | | Execute Vector,Field_Write
0108 e011 | | Load 0x0,0x11
0109 4800 |H | Short_Literal 0x0
010a 00da | | Load_Top At_Offset_2
010b 01d6 | | Execute Vector,Field_Write
010c e016 | | Load 0x0,0x16
010d 4802 |H | Short_Literal 0x2
010e 00da | | Load_Top At_Offset_2
010f 01d6 | | Execute Vector,Field_Write
0110 e014 | | Load 0x0,0x14
0111 01c3 | | Execute Vector,Check_In_Type
0112 8017 | | Call 0x0,0x17
0113 e014 | | Load 0x0,0x14
0114 0337 | 7 | Declare_Variable Array
0115 4864 |Hd | Short_Literal 0x64
0116 8015 | | Call 0x0,0x15
0117 4801 |H | Short_Literal 0x1
0118 00da | | Load_Top At_Offset_2
0119 01d6 | | Execute Vector,Field_Write
011a e013 | | Load 0x0,0x13
011b 4800 |H | Short_Literal 0x0
011c 00da | | Load_Top At_Offset_2
011d 01d6 | | Execute Vector,Field_Write
011e e016 | | Load 0x0,0x16
011f 4802 |H | Short_Literal 0x2
0120 00da | | Load_Top At_Offset_2
0121 01d6 | | Execute Vector,Field_Write
0122 e014 | | Load 0x0,0x14
0123 01c3 | | Execute Vector,Check_In_Type
0124 8017 | | Call 0x0,0x17
0125 e018 | | Load 0x0,0x18
0126 0337 | 7 | Declare_Variable Array
0127 4aee |J | Short_Literal 0x2ee
0128 8015 | | Call 0x0,0x15
0129 4801 |H | Short_Literal 0x1
012a 00da | | Load_Top At_Offset_2
012b 01d6 | | Execute Vector,Field_Write
012c e011 | | Load 0x0,0x11
012d 4800 |H | Short_Literal 0x0
012e 00da | | Load_Top At_Offset_2
012f 01d6 | | Execute Vector,Field_Write
0130 e00e | | Load 0x0,0xe
0131 4802 |H | Short_Literal 0x2
0132 00da | | Load_Top At_Offset_2
0133 01d6 | | Execute Vector,Field_Write
0134 e018 | | Load 0x0,0x18
0135 01c3 | | Execute Vector,Check_In_Type
0136 8019 | | Call 0x0,0x19
0137 e018 | | Load 0x0,0x18
0138 0337 | 7 | Declare_Variable Array
0139 6022 |`" | Indirect_Literal Discrete,0x15c,{0x00000000, 0x00002710}
013a 8015 | | Call 0x0,0x15
013b 4801 |H | Short_Literal 0x1
013c 00da | | Load_Top At_Offset_2
013d 01d6 | | Execute Vector,Field_Write
013e e00d | | Load 0x0,0xd
013f 4800 |H | Short_Literal 0x0
0140 00da | | Load_Top At_Offset_2
0141 01d6 | | Execute Vector,Field_Write
0142 e00e | | Load 0x0,0xe
0143 4802 |H | Short_Literal 0x2
0144 00da | | Load_Top At_Offset_2
0145 01d6 | | Execute Vector,Field_Write
0146 e018 | | Load 0x0,0x18
0147 01c3 | | Execute Vector,Check_In_Type
0148 8019 | | Call 0x0,0x19
0149 e018 | | Load 0x0,0x18
014a 0337 | 7 | Declare_Variable Array
014b 4896 |H | Short_Literal 0x96
014c 8015 | | Call 0x0,0x15
014d 4801 |H | Short_Literal 0x1
014e 00da | | Load_Top At_Offset_2
014f 01d6 | | Execute Vector,Field_Write
0150 e011 | | Load 0x0,0x11
0151 4800 |H | Short_Literal 0x0
0152 00da | | Load_Top At_Offset_2
0153 01d6 | | Execute Vector,Field_Write
0154 e012 | | Load 0x0,0x12
0155 4802 |H | Short_Literal 0x2
0156 00da | | Load_Top At_Offset_2
0157 01d6 | | Execute Vector,Field_Write
0158 e018 | | Load 0x0,0x18
0159 01c3 | | Execute Vector,Check_In_Type
015a 8019 | | Call 0x0,0x19
015b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
015c 0000 0000 | | .LITERAL {0x00000000, 0x00002710}
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163 | c | .CONST 0x0163 ; Address of begin
0161 0004 | | .CONST 0x0004 ; Address of exception handler
0162 0001 | | .CONST 0x0001 ; Number of locals
0163 BODY_0160:
0163 INIT_0160:
0163 00db | | Load_Top At_Offset_3
0164 00db | | Load_Top At_Offset_3
0165 00d8 | | Load_Top At_Offset_0
0166 00e3 | | Load_Encached Natural_Cache
0167 0260 | ` | Execute Discrete,In_Type
0168 7001 |p | Jump_Nonzero 0x16a
0169 0801 | | Execute_Immediate Raise,0x1
016a 801a | | Call 0x0,0x1a
016b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
016c ; --------------------------------------------------------------------------------------
016c ; STRING TABLE
016c ; --------------------------------------------------------------------------------------
016c 000a | | .STRTAB 0x000a->0x0171 ; "Greta"
016d 000d | | .STRTAB 0x000d->0x0173 ; "Garbo"
016e 0010 | | .STRTAB 0x0010->0x0176 ; "Shrdlu"
016f 0014 | | .STRTAB 0x0014->0x0179 ; "Marylin"
0170 0019 | | .STREND 0x0019->0x017c
0171 4772 6574 |Gret| .STRTAB_STRINGS
017d 0000 0000 | | .XXX[0x3]
017f 0000 | |
0180 ; --------------------------------------------------------------------------------------
0180 ; Debug Table
0180 ; --------------------------------------------------------------------------------------
0180 0004 0009 | | .DEBUG4 0x0004,0x0009,0x0e59,0x0000,0x0001,0x0004
0186 000b 0000 | | .DBG4T 0x000b,0x0000,0x8000,0x0000
018a 001b 0196 | | .DBG4T 0x001b,0x0196,0x8001,0x0000
018e 006b 01a1 | k | .DBG4T 0x006b,0x01a1,0x0001,0x0000
0192 0163 0000 | c | .DBG4T 0x0163,0x0000,0x000b,0x0000
0196 ; --------------------------------------------------------------------------------------
0196 ; Debug chain
0196 ; --------------------------------------------------------------------------------------
0196 0003 0006 | | .DBGLEN 0x0003,0x0006
0198 001b 001d | | .DBGLNO 0x001b,0x001d,0x002e,0x003b,0x003c,0x0044,0x0048,0x004c,0x0052
01a1 ; --------------------------------------------------------------------------------------
01a1 ; Debug chain
01a1 ; --------------------------------------------------------------------------------------
01a1 0000 000d | | .DBGLEN 0x0000,0x000d
01a3 006b 007e | k ~| .DBGLNO 0x006b,0x007e,0x0091,0x00a4,0x00b7,0x00ca,0x00dd,0x00ef,0x0101,0x0113,0x0125,0x0137,0x0149
01b0 0000 0000 | | .BLANK 0000[0x50]