|
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: 2048 (0x800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_8e18e4
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0260 | ` | .CONST 0x0260 ; 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 0001 | | .CONST 0x0001 ; 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 00e7 | | .CONST 0x00e7 ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0007 | | .CONST 0x0007 ; Number of locals
001b INIT_0018:
001b 00e1 | | Load_Encached Boolean_Cache
001c 029f 00fb | | Declare_Subprogram INIT_00f8,For_Call
001e 029f 0113 | | Declare_Subprogram INIT_0110,For_Call
0020 029f 012b | +| Declare_Subprogram INIT_0128,For_Call
0022 029f 0143 | C| Declare_Subprogram INIT_0140,For_Call
0024 e001 | | Load 0x0,0x1
0025 e002 | | Load 0x0,0x2
0026 0092 0154 | T| Action Push_String_Extended,0x154 ; "BENCH"
0028 4800 |H | Short_Literal 0x0
0029 4801 |H | Short_Literal 0x1
002a 0092 0155 | U| Action Push_String_Extended,0x155 ; "Creation des objets"
002c 4803 |H | Short_Literal 0x3
002d 4802 |H | Short_Literal 0x2
002e 0099 | | Action Reference_Dynamic
002f e003 | | Load 0x0,0x3
0030 190d | | Execute Package,Field_Reference,Field_Number 0xd
0031 0092 0156 | V| Action Push_String_Extended,0x156 ; "Fin de creation"
0033 4804 |H | Short_Literal 0x4
0034 4802 |H | Short_Literal 0x2
0035 0099 | | Action Reference_Dynamic
0036 e003 | | Load 0x0,0x3
0037 190e | | Execute Package,Field_Reference,Field_Number 0xe
0038 0092 0157 | W| Action Push_String_Extended,0x157 ; "Recherche d'un objet"
003a 4805 |H | Short_Literal 0x5
003b 4802 |H | Short_Literal 0x2
003c 0099 | | Action Reference_Dynamic
003d e003 | | Load 0x0,0x3
003e 190f | | Execute Package,Field_Reference,Field_Number 0xf
003f 0092 0158 | X| Action Push_String_Extended,0x158 ; "Iteration"
0041 4806 |H | Short_Literal 0x6
0042 4802 |H | Short_Literal 0x2
0043 0099 | | Action Reference_Dynamic
0044 e003 | | Load 0x0,0x3
0045 1910 | | Execute Package,Field_Reference,Field_Number 0x10
0046 0092 0159 | Y| Action Push_String_Extended,0x159 ; "Rule number 05"
0048 e004 | | Load 0x0,0x4
0049 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
004a e005 | | Load 0x0,0x5
004b 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
004c 0092 015a | Z| Action Push_String_Extended,0x15a ; "Rule number 06"
004e e004 | | Load 0x0,0x4
004f 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
0050 e005 | | Load 0x0,0x5
0051 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
0052 0092 015b | [| Action Push_String_Extended,0x15b ; "Rule number 07"
0054 e004 | | Load 0x0,0x4
0055 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
0056 e005 | | Load 0x0,0x5
0057 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
0058 0092 015c | \| Action Push_String_Extended,0x15c ; "Rule number 08"
005a e004 | | Load 0x0,0x4
005b 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
005c e005 | | Load 0x0,0x5
005d 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
005e 0092 015d | ]| Action Push_String_Extended,0x15d ; "Rule number 09"
0060 e004 | | Load 0x0,0x4
0061 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
0062 e005 | | Load 0x0,0x5
0063 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
0064 0092 015e | ^| Action Push_String_Extended,0x15e ; "Rule number 10"
0066 e004 | | Load 0x0,0x4
0067 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
0068 e005 | | Load 0x0,0x5
0069 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
006a 0092 015f | _| Action Push_String_Extended,0x15f ; "Rule number 11"
006c e004 | | Load 0x0,0x4
006d 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
006e e005 | | Load 0x0,0x5
006f 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
0070 0092 0160 | `| Action Push_String_Extended,0x160 ; "Rule number 12"
0072 e004 | | Load 0x0,0x4
0073 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
0074 e005 | | Load 0x0,0x5
0075 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
0076 0092 0161 | a| Action Push_String_Extended,0x161 ; "Rule number 13"
0078 e004 | | Load 0x0,0x4
0079 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
007a e005 | | Load 0x0,0x5
007b 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
007c 0092 0162 | b| Action Push_String_Extended,0x162 ; "Rule number 14"
007e e004 | | Load 0x0,0x4
007f 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
0080 e005 | | Load 0x0,0x5
0081 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
0082 0092 0163 | c| Action Push_String_Extended,0x163 ; "Rule number 15"
0084 e004 | | Load 0x0,0x4
0085 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
0086 e005 | | Load 0x0,0x5
0087 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
0088 0092 0164 | d| Action Push_String_Extended,0x164 ; "Rule number 16"
008a e004 | | Load 0x0,0x4
008b 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
008c e005 | | Load 0x0,0x5
008d 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
008e 0092 0165 | e| Action Push_String_Extended,0x165 ; "Rule number 17"
0090 e004 | | Load 0x0,0x4
0091 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
0092 e005 | | Load 0x0,0x5
0093 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
0094 0092 0166 | f| Action Push_String_Extended,0x166 ; "Rule number 18"
0096 e004 | | Load 0x0,0x4
0097 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
0098 e005 | | Load 0x0,0x5
0099 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
009a 0092 0167 | g| Action Push_String_Extended,0x167 ; "Rule number 19"
009c e004 | | Load 0x0,0x4
009d 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
009e e005 | | Load 0x0,0x5
009f 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
00a0 0092 0168 | h| Action Push_String_Extended,0x168 ; "Rule number 20"
00a2 e004 | | Load 0x0,0x4
00a3 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
00a4 e005 | | Load 0x0,0x5
00a5 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
00a6 0092 0169 | i| Action Push_String_Extended,0x169 ; "Rule number 21"
00a8 e004 | | Load 0x0,0x4
00a9 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
00aa e005 | | Load 0x0,0x5
00ab 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
00ac 0092 016a | j| Action Push_String_Extended,0x16a ; "Rule number 22"
00ae e004 | | Load 0x0,0x4
00af 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
00b0 e005 | | Load 0x0,0x5
00b1 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
00b2 0092 016b | k| Action Push_String_Extended,0x16b ; "Rule number 23"
00b4 e004 | | Load 0x0,0x4
00b5 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
00b6 e005 | | Load 0x0,0x5
00b7 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
00b8 0092 016c | l| Action Push_String_Extended,0x16c ; "Rule number 24"
00ba e004 | | Load 0x0,0x4
00bb 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
00bc e005 | | Load 0x0,0x5
00bd 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
00be 0092 016d | m| Action Push_String_Extended,0x16d ; "Rule number 25"
00c0 e004 | | Load 0x0,0x4
00c1 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
00c2 e005 | | Load 0x0,0x5
00c3 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
00c4 0092 016e | n| Action Push_String_Extended,0x16e ; "Rule number 26"
00c6 e004 | | Load 0x0,0x4
00c7 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
00c8 e005 | | Load 0x0,0x5
00c9 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
00ca 0092 016f | o| Action Push_String_Extended,0x16f ; "Rule number 27"
00cc e004 | | Load 0x0,0x4
00cd 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
00ce e005 | | Load 0x0,0x5
00cf 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
00d0 0092 0170 | p| Action Push_String_Extended,0x170 ; "Rule number 28"
00d2 e004 | | Load 0x0,0x4
00d3 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
00d4 e005 | | Load 0x0,0x5
00d5 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
00d6 0092 0171 | q| Action Push_String_Extended,0x171 ; "Rule number 29"
00d8 e004 | | Load 0x0,0x4
00d9 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
00da e005 | | Load 0x0,0x5
00db 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
00dc 0092 0172 | r| Action Push_String_Extended,0x172 ; "Rule number 30"
00de e004 | | Load 0x0,0x4
00df 194c | L | Execute Package,Field_Reference,Field_Number 0x4c
00e0 e005 | | Load 0x0,0x5
00e1 1942 | B | Execute Package,Field_Reference,Field_Number 0x42
00e2 4804 |H | Short_Literal 0x4
00e3 e006 | | Load 0x0,0x6
00e4 0387 | | Declare_Variable Package
00e5 00d8 | | Load_Top At_Offset_0
00e6 020f | | Execute Module,Activate
00e7 BODY_0018:
00e7 e007 | | Load 0x0,0x7
00e8 180d | | Execute Package,Field_Execute,Field_Number 0xd
00e9 6006 |` | Indirect_Literal Discrete,0xf0,{0x00000000, 0x7fffffff}
00ea 00d9 | | Load_Top At_Offset_1
00eb 186d | m | Execute Package,Field_Execute,Field_Number 0x6d
00ec a402 | | Store_Unchecked 0x2,0x2
00ed e007 | | Load 0x0,0x7
00ee 180e | | Execute Package,Field_Execute,Field_Number 0xe
00ef 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00f0 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
00f4 0000 0000 | | .BLANK 0000[0x4]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00fb | | .CONST 0x00fb ; Address of begin
00f9 0004 | | .CONST 0x0004 ; Address of exception handler
00fa 0001 | | .CONST 0x0001 ; Number of locals
00fb BODY_00f8:
00fb INIT_00f8:
00fb e008 | | Load 0x0,0x8
00fc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00fd e008 | | Load 0x0,0x8
00fe 190e | | Execute Package,Field_Reference,Field_Number 0xe
00ff e008 | | Load 0x0,0x8
0100 190f | | Execute Package,Field_Reference,Field_Number 0xf
0101 e008 | | Load 0x0,0x8
0102 1910 | | Execute Package,Field_Reference,Field_Number 0x10
0103 e008 | | Load 0x0,0x8
0104 1911 | | Execute Package,Field_Reference,Field_Number 0x11
0105 e008 | | Load 0x0,0x8
0106 1912 | | Execute Package,Field_Reference,Field_Number 0x12
0107 e008 | | Load 0x0,0x8
0108 1913 | | Execute Package,Field_Reference,Field_Number 0x13
0109 e004 | | Load 0x0,0x4
010a 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
010b 00ca | | Action Exit_Nullary_Function
010c 0000 0000 | | .BLANK 0000[0x4]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0113 | | .CONST 0x0113 ; Address of begin
0111 0004 | | .CONST 0x0004 ; Address of exception handler
0112 0001 | | .CONST 0x0001 ; Number of locals
0113 BODY_0110:
0113 INIT_0110:
0113 e008 | | Load 0x0,0x8
0114 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0115 e008 | | Load 0x0,0x8
0116 1917 | | Execute Package,Field_Reference,Field_Number 0x17
0117 e008 | | Load 0x0,0x8
0118 1918 | | Execute Package,Field_Reference,Field_Number 0x18
0119 e008 | | Load 0x0,0x8
011a 1919 | | Execute Package,Field_Reference,Field_Number 0x19
011b e008 | | Load 0x0,0x8
011c 191a | | Execute Package,Field_Reference,Field_Number 0x1a
011d e008 | | Load 0x0,0x8
011e 191b | | Execute Package,Field_Reference,Field_Number 0x1b
011f e008 | | Load 0x0,0x8
0120 191c | | Execute Package,Field_Reference,Field_Number 0x1c
0121 e004 | | Load 0x0,0x4
0122 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0123 00ca | | Action Exit_Nullary_Function
0124 0000 0000 | | .BLANK 0000[0x4]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b | + | .CONST 0x012b ; Address of begin
0129 0004 | | .CONST 0x0004 ; Address of exception handler
012a 0001 | | .CONST 0x0001 ; Number of locals
012b BODY_0128:
012b INIT_0128:
012b e008 | | Load 0x0,0x8
012c 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
012d e008 | | Load 0x0,0x8
012e 1920 | | Execute Package,Field_Reference,Field_Number 0x20
012f e008 | | Load 0x0,0x8
0130 1921 | ! | Execute Package,Field_Reference,Field_Number 0x21
0131 e008 | | Load 0x0,0x8
0132 1922 | " | Execute Package,Field_Reference,Field_Number 0x22
0133 e008 | | Load 0x0,0x8
0134 1923 | # | Execute Package,Field_Reference,Field_Number 0x23
0135 e008 | | Load 0x0,0x8
0136 1924 | $ | Execute Package,Field_Reference,Field_Number 0x24
0137 e008 | | Load 0x0,0x8
0138 1925 | % | Execute Package,Field_Reference,Field_Number 0x25
0139 e008 | | Load 0x0,0x8
013a 1926 | & | Execute Package,Field_Reference,Field_Number 0x26
013b e008 | | Load 0x0,0x8
013c 1927 | ' | Execute Package,Field_Reference,Field_Number 0x27
013d e004 | | Load 0x0,0x4
013e 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
013f 00ca | | Action Exit_Nullary_Function
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0143 | C | .CONST 0x0143 ; Address of begin
0141 0004 | | .CONST 0x0004 ; Address of exception handler
0142 0001 | | .CONST 0x0001 ; Number of locals
0143 BODY_0140:
0143 INIT_0140:
0143 e008 | | Load 0x0,0x8
0144 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0145 e008 | | Load 0x0,0x8
0146 192b | + | Execute Package,Field_Reference,Field_Number 0x2b
0147 e008 | | Load 0x0,0x8
0148 192c | , | Execute Package,Field_Reference,Field_Number 0x2c
0149 e008 | | Load 0x0,0x8
014a 192d | - | Execute Package,Field_Reference,Field_Number 0x2d
014b e008 | | Load 0x0,0x8
014c 192e | . | Execute Package,Field_Reference,Field_Number 0x2e
014d e008 | | Load 0x0,0x8
014e 192f | / | Execute Package,Field_Reference,Field_Number 0x2f
014f e008 | | Load 0x0,0x8
0150 1930 | 0 | Execute Package,Field_Reference,Field_Number 0x30
0151 e004 | | Load 0x0,0x4
0152 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0153 00ca | | Action Exit_Nullary_Function
0154 ; --------------------------------------------------------------------------------------
0154 ; STRING TABLE
0154 ; --------------------------------------------------------------------------------------
0154 0040 | @ | .STRTAB 0x0040->0x0174 ; "BENCH"
0155 0043 | C | .STRTAB 0x0043->0x0176 ; "Creation des objets"
0156 0054 | T | .STRTAB 0x0054->0x0180 ; "Fin de creation"
0157 0061 | a | .STRTAB 0x0061->0x0187 ; "Recherche d'un objet"
0158 0073 | s | .STRTAB 0x0073->0x0191 ; "Iteration"
0159 007a | z | .STRTAB 0x007a->0x0196 ; "Rule number 05"
015a 0087 | | .STRTAB 0x0087->0x019d ; "Rule number 06"
015b 0094 | | .STRTAB 0x0094->0x01a5 ; "Rule number 07"
015c 00a1 | | .STRTAB 0x00a1->0x01ac ; "Rule number 08"
015d 00ae | | .STRTAB 0x00ae->0x01b4 ; "Rule number 09"
015e 00bb | | .STRTAB 0x00bb->0x01bb ; "Rule number 10"
015f 00c8 | | .STRTAB 0x00c8->0x01c3 ; "Rule number 11"
0160 00d5 | | .STRTAB 0x00d5->0x01ca ; "Rule number 12"
0161 00e2 | | .STRTAB 0x00e2->0x01d2 ; "Rule number 13"
0162 00ef | | .STRTAB 0x00ef->0x01d9 ; "Rule number 14"
0163 00fc | | .STRTAB 0x00fc->0x01e1 ; "Rule number 15"
0164 0109 | | .STRTAB 0x0109->0x01e8 ; "Rule number 16"
0165 0116 | | .STRTAB 0x0116->0x01f0 ; "Rule number 17"
0166 0123 | # | .STRTAB 0x0123->0x01f7 ; "Rule number 18"
0167 0130 | 0 | .STRTAB 0x0130->0x01ff ; "Rule number 19"
0168 013d | = | .STRTAB 0x013d->0x0206 ; "Rule number 20"
0169 014a | J | .STRTAB 0x014a->0x020e ; "Rule number 21"
016a 0157 | W | .STRTAB 0x0157->0x0215 ; "Rule number 22"
016b 0164 | d | .STRTAB 0x0164->0x021d ; "Rule number 23"
016c 0171 | q | .STRTAB 0x0171->0x0224 ; "Rule number 24"
016d 017e | ~ | .STRTAB 0x017e->0x022c ; "Rule number 25"
016e 018b | | .STRTAB 0x018b->0x0233 ; "Rule number 26"
016f 0198 | | .STRTAB 0x0198->0x023b ; "Rule number 27"
0170 01a5 | | .STRTAB 0x01a5->0x0242 ; "Rule number 28"
0171 01b2 | | .STRTAB 0x01b2->0x024a ; "Rule number 29"
0172 01bf | | .STRTAB 0x01bf->0x0251 ; "Rule number 30"
0173 01cc | | .STREND 0x01cc->0x0259
0174 4245 4e43 |BENC| .STRTAB_STRINGS
0259 0000 0000 | | .BLANK 0000[0x7]
0260 ; --------------------------------------------------------------------------------------
0260 ; Debug Table
0260 ; --------------------------------------------------------------------------------------
0260 0004 0001 | | .DEBUG4 0x0004,0x0001,0xd7d6,0x0000,0x0001,0x0006
0266 000b 0000 | | .DBG4T 0x000b,0x0000,0x8000,0x0000
026a 001b 027e | ~| .DBG4T 0x001b,0x027e,0x8001,0x0000
026e 00fb 0000 | | .DBG4T 0x00fb,0x0000,0x000c,0x0000
0272 0113 0000 | | .DBG4T 0x0113,0x0000,0x000c,0x0000
0276 012b 0000 | + | .DBG4T 0x012b,0x0000,0x000c,0x0000
027a 0143 0000 | C | .DBG4T 0x0143,0x0000,0x000c,0x0000
027e ; --------------------------------------------------------------------------------------
027e ; Debug chain
027e ; --------------------------------------------------------------------------------------
027e 0002 0003 | | .DBGLEN 0x0002,0x0003
0280 001b 001c | | .DBGLNO 0x001b,0x001c,0x00e7,0x00e9,0x00ed
0285 0000 0000 | | .BLANK 0000[0x17b]