|
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_03b8fe
└─⟦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 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 8000 | | .CONST 0x8000 ; 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 004b | K | .CONST 0x004b ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0006 | | .CONST 0x0006 ; Number of locals
001b INIT_0018:
001b e001 | | Load 0x0,0x1
001c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
001d 02c7 | | Declare_Variable Any
001e 6089 |` | Indirect_Literal Discrete,0xa8,{0x00000004, 0x9d400000}
001f e001 | | Load 0x0,0x1
0020 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0021 e001 | | Load 0x0,0x1
0022 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0023 0092 00ac | | Action Push_String_Extended,0xac ; "<MINUS_7_DAYS>"
0025 e5fe | | Load 0x2,-0x2
0026 e002 | | Load 0x0,0x2
0027 180e | | Execute Package,Field_Execute,Field_Number 0xe
0028 e003 | | Load 0x0,0x3
0029 180d | | Execute Package,Field_Execute,Field_Number 0xd
002a a402 | | Store_Unchecked 0x2,0x2
002b e001 | | Load 0x0,0x1
002c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
002d 02c7 | | Declare_Variable Any
002e e001 | | Load 0x0,0x1
002f 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0030 0092 00ad | | Action Push_String_Extended,0xad ; "<TODAY>"
0032 e5fd | | Load 0x2,-0x3
0033 e002 | | Load 0x0,0x2
0034 180e | | Execute Package,Field_Execute,Field_Number 0xe
0035 e003 | | Load 0x0,0x3
0036 180d | | Execute Package,Field_Execute,Field_Number 0xd
0037 a403 | | Store_Unchecked 0x2,0x3
0038 e004 | | Load 0x0,0x4
0039 1b0d | | Execute Package,Field_Read,Field_Number 0xd
003a 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
003b 02c7 | | Declare_Variable Any
003c 4801 |H | Short_Literal 0x1
003d e004 | | Load 0x0,0x4
003e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
003f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0040 e5fc | | Load 0x2,-0x4
0041 0092 00ae | | Action Push_String_Extended,0xae ; ".Log_@_At_@"
0043 01cc | | Execute Vector,Catenate
0044 e004 | | Load 0x0,0x4
0045 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0046 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0047 a404 | | Store_Unchecked 0x2,0x4
0048 00e1 | | Load_Encached Boolean_Cache
0049 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
004a 00e5 | | Load_Encached Long_Integer_Cache
004b BODY_0018:
004b 00cf | | Action Mark_Auxiliary
004c 7853 |xS | Jump 0xa0
004d e404 | | Load 0x2,0x4
004e e004 | | Load 0x0,0x4
004f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0050 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0051 e004 | | Load 0x0,0x4
0052 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0053 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0054 e402 | | Load 0x2,0x2
0055 e001 | | Load 0x0,0x1
0056 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0057 6842 |hB | Jump_Zero 0x9a
0058 e404 | | Load 0x2,0x4
0059 e004 | | Load 0x0,0x4
005a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
005b 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
005c e004 | | Load 0x0,0x4
005d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
005e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
005f e403 | | Load 0x2,0x3
0060 e001 | | Load 0x0,0x1
0061 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0062 6837 |h7 | Jump_Zero 0x9a
0063 e404 | | Load 0x2,0x4
0064 e004 | | Load 0x0,0x4
0065 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0066 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0067 e004 | | Load 0x0,0x4
0068 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0069 181a | | Execute Package,Field_Execute,Field_Number 0x1a
006a 09fd | | Execute_Immediate Binary_Scale,-0x3
006b 0a01 | | Execute_Immediate Plus,0x1
006c a406 | | Store_Unchecked 0x2,0x6
006d e5ff | | Load 0x2,-0x1
006e e406 | | Load 0x2,0x6
006f 027c | | | Execute Discrete,Less
0070 6829 |h) | Jump_Zero 0x9a
0071 e405 | | Load 0x2,0x5
0072 7014 |p | Jump_Nonzero 0x87
0073 4802 |H | Short_Literal 0x2
0074 e005 | | Load 0x0,0x5
0075 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0076 0092 00af | | Action Push_String_Extended,0xaf ; "Warning - Abnormally Large Error Logs :"
0078 e005 | | Load 0x0,0x5
0079 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
007a 4801 |H | Short_Literal 0x1
007b e005 | | Load 0x0,0x5
007c 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
007d 0092 00b0 | | Action Push_String_Extended,0xb0 ; " Name Size"
007f e005 | | Load 0x0,0x5
0080 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0081 0092 00b1 | | Action Push_String_Extended,0xb1 ; " ======================== ======"
0083 e005 | | Load 0x0,0x5
0084 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0085 4801 |H | Short_Literal 0x1
0086 a405 | | Store_Unchecked 0x2,0x5
0087 0092 00b2 | | Action Push_String_Extended,0xb2 ; " "
0089 e404 | | Load 0x2,0x4
008a e004 | | Load 0x0,0x4
008b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
008c 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
008d e004 | | Load 0x0,0x4
008e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
008f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0090 01cc | | Execute Vector,Catenate
0091 4820 |H | Short_Literal 0x20
0092 480a |H | Short_Literal 0xa
0093 480a |H | Short_Literal 0xa
0094 e406 | | Load 0x2,0x6
0095 e006 | | Load 0x0,0x6
0096 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0097 01cc | | Execute Vector,Catenate
0098 e005 | | Load 0x0,0x5
0099 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
009a e404 | | Load 0x2,0x4
009b e004 | | Load 0x0,0x4
009c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
009d 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
009e c404 | | Store 0x2,0x4
009f 00c9 | | Action Pop_Auxiliary_Loop
00a0 e404 | | Load 0x2,0x4
00a1 e004 | | Load 0x0,0x4
00a2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00a3 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
00a4 6fa8 |o | Jump_Zero 0x4d
00a5 4505 |E | Exit_Suprogram New_Top_Offset 0x5
00a6 0000 0000 | | .XXX[0x2]
00a8 0000 0004 | | .LITERAL {0x00000004, 0x9d400000}
00ac ; --------------------------------------------------------------------------------------
00ac ; STRING TABLE
00ac ; --------------------------------------------------------------------------------------
00ac 0010 | | .STRTAB 0x0010->0x00b4 ; "<MINUS_7_DAYS>"
00ad 001c | | .STRTAB 0x001c->0x00bb ; "<TODAY>"
00ae 0021 | ! | .STRTAB 0x0021->0x00be ; ".Log_@_At_@"
00af 002a | * | .STRTAB 0x002a->0x00c4 ; "Warning - Abnormally Large Error Logs :"
00b0 004f | O | .STRTAB 0x004f->0x00d7 ; " Name Size"
00b1 0072 | r | .STRTAB 0x0072->0x00ea ; " ======================== ======"
00b2 0096 | | .STRTAB 0x0096->0x00fd ; " "
00b3 0098 | | .STREND 0x0098->0x00ff
00b4 3c4d 494e |<MIN| .STRTAB_STRINGS
00ff 0000 | | .XXX[0x1]
0100 ; --------------------------------------------------------------------------------------
0100 ; Debug Table
0100 ; --------------------------------------------------------------------------------------
0100 0004 000d | | .DEBUG4 0x0004,0x000d,0x4031,0x0000,0x0001,0x0000
0106 3410 3839 |4 89| .XXX[0x16]
0108 37b1 b2b2 |7 |
010a 3ab9 3290 |: 2 |
010c 283a ba10 |(: |
010e 1424 b73a | $ :|
0110 3790 1d10 |7 |
0112 29ba 3932 |) 92|
0114 b0b6 afa4 | |
0116 b21d 8000 | |
0118 003b 8000 | ; |
011a 0017 9010 | |
011c 1010 1010 | | .BLANK 1010[0x4]
0120 3bb4 ba34 |; 4| .XXX[0x28]
0122 1038 3937 | 897|
0124 b1b2 b23a | :|
0126 b932 9028 | 2 (|
0128 3aba 1014 |: |
012a 24b7 3a37 |$ :7|
012c 901d 1029 | )|
012e ba39 32b0 | 92 |
0130 b6af a4b2 | |
0132 1d80 0000 | |
0134 2200 0000 |" |
0136 0d22 30ba | "0 |
0138 3090 1d10 |0 |
013a 213c ba32 |!< 2|
013c afa9 ba39 | 9|
013e 34b7 3394 |4 3 |
0140 9034 b990 | 4 |
0142 1e1f 1d80 | |
0144 0000 1380 | |
0146 0000 1b90 | |
0148 1010 1010 | | .BLANK 1010[0xe]
0156 2230 ba30 |"0 0| .XXX[0x12]
0158 901d 1021 | !|
015a 3cba 32af |< 2 |
015c a9ba 3934 | 94|
015e b733 9490 | 3 |
0160 34b9 901e |4 |
0162 1f1d 8000 | |
0164 0013 8000 | |
0166 001b 9010 | |
0168 1010 1010 | | .BLANK 1010[0xd]
0175 1022 30ba | "0 | .XXX[0x29]
0177 3090 1d10 |0 |
0179 213c ba32 |!< 2|
017b afa9 ba39 | 9|
017d 34b7 3394 |4 3 |
017f 9034 b990 | 4 |
0181 1e1f 1d80 | |
0183 0000 3480 | 4 |
0185 0000 12bb | |
0187 b4ba 3410 | 4 |
0189 3839 37b1 |897 |
018b b2b2 3ab9 | : |
018d 3290 23b2 |2 # |
018f ba10 1423 | #|
0191 3937 b690 |97 |
0193 1d10 29ba | ) |
0195 3932 b0b6 |92 |
0197 afa4 b21d | |
0199 8000 002f | /|
019b 8000 0017 | |
019d 9010 | |
019e 1010 1010 | | .BLANK 1010[0x4]
01a2 3bb4 ba34 |; 4| .XXX[0x17]
01a4 1038 3937 | 897|
01a6 b1b2 b23a | :|
01a8 b932 9023 | 2 #|
01aa b2ba 1014 | |
01ac 2339 37b6 |#97 |
01ae 901d 1029 | )|
01b0 ba39 32b0 | 92 |
01b2 b6af a4b2 | |
01b4 1d80 0000 | |
01b6 2f80 0000 |/ |
01b8 1790 | |
01b9 1010 1010 | | .BLANK 1010[0x4]
01bd 103b b4ba | ; | .XXX[0x2b]
01bf 3410 3839 |4 89|
01c1 37b1 b2b2 |7 |
01c3 3ab9 3290 |: 2 |
01c5 23b2 ba10 |# |
01c7 1423 3937 | #97|
01c9 b690 1d10 | |
01cb 29ba 3932 |) 92|
01cd b0b6 afa4 | |
01cf b21d 8000 | |
01d1 0016 0000 | |
01d3 000f 2230 | "0|
01d5 ba30 901d | 0 |
01d7 1037 baba | 7 |
01d9 1021 3cba | !< |
01db 32af a9ba |2 |
01dd 3934 b733 |94 3|
01df 9490 34b9 | 4 |
01e1 901e 1f1d | |
01e3 8000 0007 | |
01e5 8000 001d | |
01e7 9010 | |
01e8 1010 1010 | | .BLANK 1010[0xd]
01f5 1022 30ba | "0 | .XXX[0xb]
01f7 3090 1d10 |0 |
01f9 37ba ba10 |7 |
01fb 213c ba32 |!< 2|
01fd afa9 ba39 | 9|
01ff 34b7 |4 |