|
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_03c8c9
└─⟦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 0100 | | .CONST 0x0100 ; 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 0026 | & | .CONST 0x0026 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0011 | | .CONST 0x0011 ; Number of locals
000b INIT_0008:
000b a003 | | Store_Unchecked 0x0,0x3
000c 00c6 | | Action Check_Subprogram_Elaborated
000d a004 | | Store_Unchecked 0x0,0x4
000e 0129 | ) | Execute Any,Make_Visible
000f 0093 0000 | | push_full_address 0x0
0011 6022 |`" | Indirect_Literal Discrete,0x34,{0x80000000, 0x00020000}
0012 0273 | s | Execute Discrete,Plus
0013 e005 | | Load 0x0,0x5
0014 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0015 601a |` | Indirect_Literal Discrete,0x30,{0x00000000, 0x0000ffff}
0016 0279 | y | Execute Discrete,And
0017 0273 | s | Execute Discrete,Plus
0018 e006 | | Load 0x0,0x6
0019 0273 | s | Execute Discrete,Plus
001a 0129 | ) | Execute Any,Make_Visible
001b 4800 |H | Short_Literal 0x0
001c 0129 | ) | Execute Any,Make_Visible
001d 029a 002b | +| Declare_Subprogram INIT_0028,For_Outer_Call,Visible,Unelaborated
001f 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated
0021 00bf | | Action Accept_Activation
0022 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0023 00c7 | | Action Elaborate_Subprogram
0024 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0025 00c7 | | Action Elaborate_Subprogram
0026 BODY_0008:
0026 00bc | | Action Signal_Activated
0027 00bb | | Action Signal_Completion
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 8007 | | Call 0x0,0x7
002c 8008 | | Call 0x0,0x8
002d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
002e 0000 0000 | | .XXX[0x2]
0030 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff}
0034 8000 0000 | | .LITERAL {0x80000000, 0x00020000}
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 0043 | C | .CONST 0x0043 ; Address of begin
0039 0004 | | .CONST 0x0004 ; Address of exception handler
003a 0004 | | .CONST 0x0004 ; Number of locals
003b INIT_0038:
003b e009 | | Load 0x0,0x9
003c 02ff | | Declare_Variable Variant_Record
003d 00d8 | | Load_Top At_Offset_0
003e 1c00 | | Execute_Immediate Run_Utility,0x0
003f 00e2 | | Load_Encached Integer_Cache
0040 0623 | # | Execute_Immediate Set_Value_Unchecked,0x23
0041 00e2 | | Load_Encached Integer_Cache
0042 0620 | | Execute_Immediate Set_Value_Unchecked,0x20
0043 BODY_0038:
0043 e00a | | Load 0x0,0xa
0044 0337 | 7 | Declare_Variable Array
0045 e00b | | Load 0x0,0xb
0046 4800 |H | Short_Literal 0x0
0047 00da | | Load_Top At_Offset_2
0048 01d6 | | Execute Vector,Field_Write
0049 e00a | | Load 0x0,0xa
004a 01c3 | | Execute Vector,Check_In_Type
004b 800c | | Call 0x0,0xc
004c e00b | | Load 0x0,0xb
004d e00d | | Load 0x0,0xd
004e 800e | | Call 0x0,0xe
004f e00f | | Load 0x0,0xf
0050 0337 | 7 | Declare_Variable Array
0051 e5ff | | Load 0x2,-0x1
0052 8010 | | Call 0x0,0x10
0053 4800 |H | Short_Literal 0x0
0054 00da | | Load_Top At_Offset_2
0055 01d6 | | Execute Vector,Field_Write
0056 e00f | | Load 0x0,0xf
0057 01c3 | | Execute Vector,Check_In_Type
0058 8011 | | Call 0x0,0x11
0059 e012 | | Load 0x0,0x12
005a 0337 | 7 | Declare_Variable Array
005b e00b | | Load 0x0,0xb
005c 4800 |H | Short_Literal 0x0
005d 00da | | Load_Top At_Offset_2
005e 01d6 | | Execute Vector,Field_Write
005f e012 | | Load 0x0,0x12
0060 01c3 | | Execute Vector,Check_In_Type
0061 8013 | | Call 0x0,0x13
0062 e014 | | Load 0x0,0x14
0063 0337 | 7 | Declare_Variable Array
0064 e00b | | Load 0x0,0xb
0065 4800 |H | Short_Literal 0x0
0066 00da | | Load_Top At_Offset_2
0067 01d6 | | Execute Vector,Field_Write
0068 e014 | | Load 0x0,0x14
0069 01c3 | | Execute Vector,Check_In_Type
006a 8015 | | Call 0x0,0x15
006b e016 | | Load 0x0,0x16
006c 0337 | 7 | Declare_Variable Array
006d e00b | | Load 0x0,0xb
006e 4800 |H | Short_Literal 0x0
006f 00da | | Load_Top At_Offset_2
0070 01d6 | | Execute Vector,Field_Write
0071 e016 | | Load 0x0,0x16
0072 01c3 | | Execute Vector,Check_In_Type
0073 8017 | | Call 0x0,0x17
0074 e018 | | Load 0x0,0x18
0075 0337 | 7 | Declare_Variable Array
0076 e00b | | Load 0x0,0xb
0077 4800 |H | Short_Literal 0x0
0078 00da | | Load_Top At_Offset_2
0079 01d6 | | Execute Vector,Field_Write
007a e018 | | Load 0x0,0x18
007b 01c3 | | Execute Vector,Check_In_Type
007c 8019 | | Call 0x0,0x19
007d e01a | | Load 0x0,0x1a
007e 0337 | 7 | Declare_Variable Array
007f e01b | | Load 0x0,0x1b
0080 4800 |H | Short_Literal 0x0
0081 00da | | Load_Top At_Offset_2
0082 01d6 | | Execute Vector,Field_Write
0083 e01a | | Load 0x0,0x1a
0084 01c3 | | Execute Vector,Check_In_Type
0085 801c | | Call 0x0,0x1c
0086 e01d | | Load 0x0,0x1d
0087 0337 | 7 | Declare_Variable Array
0088 e01b | | Load 0x0,0x1b
0089 4800 |H | Short_Literal 0x0
008a 00da | | Load_Top At_Offset_2
008b 01d6 | | Execute Vector,Field_Write
008c e01d | | Load 0x0,0x1d
008d 01c3 | | Execute Vector,Check_In_Type
008e 801e | | Call 0x0,0x1e
008f e01f | | Load 0x0,0x1f
0090 0337 | 7 | Declare_Variable Array
0091 e020 | | Load 0x0,0x20
0092 4800 |H | Short_Literal 0x0
0093 00da | | Load_Top At_Offset_2
0094 01d6 | | Execute Vector,Field_Write
0095 e01f | | Load 0x0,0x1f
0096 01c3 | | Execute Vector,Check_In_Type
0097 8021 | ! | Call 0x0,0x21
0098 e022 | " | Load 0x0,0x22
0099 0337 | 7 | Declare_Variable Array
009a e00b | | Load 0x0,0xb
009b 4800 |H | Short_Literal 0x0
009c 00da | | Load_Top At_Offset_2
009d 01d6 | | Execute Vector,Field_Write
009e e022 | " | Load 0x0,0x22
009f 01c3 | | Execute Vector,Check_In_Type
00a0 8023 | # | Call 0x0,0x23
00a1 e5ff | | Load 0x2,-0x1
00a2 0275 | u | Execute Discrete,Unary_Minus
00a3 8010 | | Call 0x0,0x10
00a4 00db | | Load_Top At_Offset_3
00a5 016d | m | Execute Variant_Record,Structure_Write
00a6 e024 | $ | Load 0x0,0x24
00a7 0337 | 7 | Declare_Variable Array
00a8 00db | | Load_Top At_Offset_3
00a9 4800 |H | Short_Literal 0x0
00aa 00da | | Load_Top At_Offset_2
00ab 01d6 | | Execute Vector,Field_Write
00ac e024 | $ | Load 0x0,0x24
00ad 01c3 | | Execute Vector,Check_In_Type
00ae 8025 | % | Call 0x0,0x25
00af e026 | & | Load 0x0,0x26
00b0 0337 | 7 | Declare_Variable Array
00b1 e00b | | Load 0x0,0xb
00b2 4800 |H | Short_Literal 0x0
00b3 00da | | Load_Top At_Offset_2
00b4 01d6 | | Execute Vector,Field_Write
00b5 e026 | & | Load 0x0,0x26
00b6 01c3 | | Execute Vector,Check_In_Type
00b7 8027 | ' | Call 0x0,0x27
00b8 e028 | ( | Load 0x0,0x28
00b9 0337 | 7 | Declare_Variable Array
00ba e00b | | Load 0x0,0xb
00bb 4800 |H | Short_Literal 0x0
00bc 00da | | Load_Top At_Offset_2
00bd 01d6 | | Execute Vector,Field_Write
00be e028 | ( | Load 0x0,0x28
00bf 01c3 | | Execute Vector,Check_In_Type
00c0 8029 | ) | Call 0x0,0x29
00c1 e02a | * | Load 0x0,0x2a
00c2 0337 | 7 | Declare_Variable Array
00c3 4828 |H( | Short_Literal 0x28
00c4 8010 | | Call 0x0,0x10
00c5 4800 |H | Short_Literal 0x0
00c6 00da | | Load_Top At_Offset_2
00c7 01d6 | | Execute Vector,Field_Write
00c8 e02a | * | Load 0x0,0x2a
00c9 01c3 | | Execute Vector,Check_In_Type
00ca 802b | + | Call 0x0,0x2b
00cb e02c | , | Load 0x0,0x2c
00cc 0337 | 7 | Declare_Variable Array
00cd 00da | | Load_Top At_Offset_2
00ce 8010 | | Call 0x0,0x10
00cf 4800 |H | Short_Literal 0x0
00d0 00da | | Load_Top At_Offset_2
00d1 01d6 | | Execute Vector,Field_Write
00d2 e02c | , | Load 0x0,0x2c
00d3 01c3 | | Execute Vector,Check_In_Type
00d4 802d | - | Call 0x0,0x2d
00d5 e02e | . | Load 0x0,0x2e
00d6 0337 | 7 | Declare_Variable Array
00d7 00da | | Load_Top At_Offset_2
00d8 0275 | u | Execute Discrete,Unary_Minus
00d9 8010 | | Call 0x0,0x10
00da 4800 |H | Short_Literal 0x0
00db 00da | | Load_Top At_Offset_2
00dc 01d6 | | Execute Vector,Field_Write
00dd e02e | . | Load 0x0,0x2e
00de 01c3 | | Execute Vector,Check_In_Type
00df 802f | / | Call 0x0,0x2f
00e0 e030 | 0 | Load 0x0,0x30
00e1 0337 | 7 | Declare_Variable Array
00e2 00d9 | | Load_Top At_Offset_1
00e3 8010 | | Call 0x0,0x10
00e4 4800 |H | Short_Literal 0x0
00e5 00da | | Load_Top At_Offset_2
00e6 01d6 | | Execute Vector,Field_Write
00e7 e030 | 0 | Load 0x0,0x30
00e8 01c3 | | Execute Vector,Check_In_Type
00e9 8031 | 1 | Call 0x0,0x31
00ea e032 | 2 | Load 0x0,0x32
00eb 0337 | 7 | Declare_Variable Array
00ec 00d9 | | Load_Top At_Offset_1
00ed 0275 | u | Execute Discrete,Unary_Minus
00ee 8010 | | Call 0x0,0x10
00ef 4800 |H | Short_Literal 0x0
00f0 00da | | Load_Top At_Offset_2
00f1 01d6 | | Execute Vector,Field_Write
00f2 e032 | 2 | Load 0x0,0x32
00f3 01c3 | | Execute Vector,Check_In_Type
00f4 8033 | 3 | Call 0x0,0x33
00f5 e034 | 4 | Load 0x0,0x34
00f6 0337 | 7 | Declare_Variable Array
00f7 e00b | | Load 0x0,0xb
00f8 4800 |H | Short_Literal 0x0
00f9 00da | | Load_Top At_Offset_2
00fa 01d6 | | Execute Vector,Field_Write
00fb e034 | 4 | Load 0x0,0x34
00fc 01c3 | | Execute Vector,Check_In_Type
00fd 8035 | 5 | Call 0x0,0x35
00fe 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00ff 0000 | | .XXX[0x1]
0100 ; --------------------------------------------------------------------------------------
0100 ; Debug Table
0100 ; --------------------------------------------------------------------------------------
0100 0004 0009 | | .DEBUG4 0x0004,0x0009,0x5208,0x0000,0x0001,0x0004
0106 000b 0116 | | .DBG4T 0x000b,0x0116,0x0000,0x0000
010a 0022 011b | " | .DBG4T 0x0022,0x011b,0x0000,0x0000
010e 002b 011f | + | .DBG4T 0x002b,0x011f,0x0001,0x0000
0112 003b 0122 | ; "| .DBG4T 0x003b,0x0122,0x0001,0x0000
0116 ; --------------------------------------------------------------------------------------
0116 ; Debug chain
0116 ; --------------------------------------------------------------------------------------
0116 0003 0000 | | .DBGLEN 0x0003,0x0000
0118 000b 001d | | .DBGLNO 0x000b,0x001d,0x001f
011b ; --------------------------------------------------------------------------------------
011b ; Debug chain
011b ; --------------------------------------------------------------------------------------
011b 0002 0000 | | .DBGLEN 0x0002,0x0000
011d 0022 0024 | " $| .DBGLNO 0x0022,0x0024
011f ; --------------------------------------------------------------------------------------
011f ; Debug chain
011f ; --------------------------------------------------------------------------------------
011f 0000 0001 | | .DBGLEN 0x0000,0x0001
0121 002b | + | .DBGLNO 0x002b
0122 ; --------------------------------------------------------------------------------------
0122 ; Debug chain
0122 ; --------------------------------------------------------------------------------------
0122 0003 0015 | | .DBGLEN 0x0003,0x0015
0124 003b 003f | ; ?| .DBGLNO 0x003b,0x003f,0x0041,0x0043,0x004c,0x004f,0x0059,0x0062,0x006b,0x0074,0x007d,0x0086,0x008f,0x0098,0x00a1,0x00a6,0x00af,0x00b8,0x00c1,0x00cb,0x00d5,0x00e0,0x00ea,0x00f5
013c 0000 0000 | | .BLANK 0000[0xc4]