|
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 - metrics - download
Length: 1024 (0x400)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a7cf5
└─⟦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 01c0 | | .CONST 0x01c0 ; 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 8001 | | .CONST 0x8001 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0013 | | .CONST 0x0013 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0005 | | .CONST 0x0005 ; Number of locals
000b INIT_0008:
000b 029f 0043 | C| Declare_Subprogram For_Call,INIT_0040
000d 029f 009b | | Declare_Subprogram For_Call,INIT_0098
000f 029f 00ab | | Declare_Subprogram For_Call,INIT_00a8
0011 029f 00e3 | | Declare_Subprogram For_Call,INIT_00e0
0013 BODY_0008:
0013 e5ff | | Load 0x2,-0x1
0014 e022 | " | Load 0x0,0x22
0015 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0016 700b |p | Jump_Nonzero 0x22
0017 e023 | # | Load 0x0,0x23
0018 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0019 e023 | # | Load 0x0,0x23
001a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
001b e5fc | | Load 0x2,-0x4
001c e022 | " | Load 0x0,0x22
001d 1819 | | Execute Package,Field_Execute,Field_Number 0x19
001e e023 | # | Load 0x0,0x23
001f 1b32 | 2 | Execute Package,Field_Read,Field_Number 0x32
0020 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0021 4505 |E | Exit_Subprogram 0x5
0022 8402 | | Call 0x2,0x2
0023 00cf | | Action Mark_Auxiliary
0024 e5ff | | Load 0x2,-0x1
0025 e022 | " | Load 0x0,0x22
0026 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0027 e5ff | | Load 0x2,-0x1
0028 e022 | " | Load 0x0,0x22
0029 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
002a 0263 | c | Execute Discrete,Above_Bound
002b 7007 |p | Jump_Nonzero 0x33
002c 00d8 | | Load_Top At_Offset_0
002d e5ff | | Load 0x2,-0x1
002e e022 | " | Load 0x0,0x22
002f 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0030 8405 | | Call 0x2,0x5
0031 00c8 | | Action Pop_Auxiliary_Range
0032 3ff9 |? | Loop_Increasing 0x2c
0033 00ce | | Action Pop_Auxiliary
0034 e023 | # | Load 0x0,0x23
0035 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0036 e023 | # | Load 0x0,0x23
0037 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0038 8210 | | Call 0x1,0x10
0039 4505 |E | Exit_Subprogram 0x5
003a 0000 0000 | | .BLANK 0000[0x6]
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 0043 | C | .CONST 0x0043 ; Address of begin
0041 0004 | | .CONST 0x0004 ; Address of exception handler
0042 0001 | | .CONST 0x0001 ; Number of locals
0043 BODY_0040:
0043 INIT_0040:
0043 480a |H | Short_Literal 0xa
0044 e022 | " | Load 0x0,0x22
0045 1862 | b | Execute Package,Field_Execute,Field_Number 0x62
0046 e023 | # | Load 0x0,0x23
0047 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0048 4800 |H | Short_Literal 0x0
0049 e5fd | | Load 0x2,-0x3
004a e5fe | | Load 0x2,-0x2
004b 820d | | Call 0x1,0xd
004c 480b |H | Short_Literal 0xb
004d e022 | " | Load 0x0,0x22
004e 1862 | b | Execute Package,Field_Execute,Field_Number 0x62
004f e023 | # | Load 0x0,0x23
0050 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0051 583e |X> | Indirect_Literal Float,0x90,25.0
0052 4802 |H | Short_Literal 0x2
0053 0092 0177 | w| Action Push_String_Extended,0x177 ; "Requirement Name"
0055 820e | | Call 0x1,0xe
0056 480b |H | Short_Literal 0xb
0057 e022 | " | Load 0x0,0x22
0058 1862 | b | Execute Package,Field_Execute,Field_Number 0x62
0059 e023 | # | Load 0x0,0x23
005a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
005b 5830 |X0 | Indirect_Literal Float,0x8c,15.0
005c 4802 |H | Short_Literal 0x2
005d 0092 0178 | x| Action Push_String_Extended,0x178 ; "Unique\x0aIdentifier"
005f 820e | | Call 0x1,0xe
0060 480b |H | Short_Literal 0xb
0061 e022 | " | Load 0x0,0x22
0062 1862 | b | Execute Package,Field_Execute,Field_Number 0x62
0063 e023 | # | Load 0x0,0x23
0064 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0065 5826 |X& | Indirect_Literal Float,0x8c,15.0
0066 4802 |H | Short_Literal 0x2
0067 0092 0179 | y| Action Push_String_Extended,0x179 ; "Paragraph\x0aNumber"
0069 820e | | Call 0x1,0xe
006a 480b |H | Short_Literal 0xb
006b e022 | " | Load 0x0,0x22
006c 1862 | b | Execute Package,Field_Execute,Field_Number 0x62
006d e023 | # | Load 0x0,0x23
006e 1b16 | | Execute Package,Field_Read,Field_Number 0x16
006f 581c |X | Indirect_Literal Float,0x8c,15.0
0070 4802 |H | Short_Literal 0x2
0071 0092 017a | z| Action Push_String_Extended,0x17a ; "Qualification\x0aMethod(s)"
0073 820e | | Call 0x1,0xe
0074 480b |H | Short_Literal 0xb
0075 e022 | " | Load 0x0,0x22
0076 1862 | b | Execute Package,Field_Execute,Field_Number 0x62
0077 e023 | # | Load 0x0,0x23
0078 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0079 5812 |X | Indirect_Literal Float,0x8c,15.0
007a 4802 |H | Short_Literal 0x2
007b 0092 017b | {| Action Push_String_Extended,0x17b ; "Qualification\x0aLevel"
007d 820e | | Call 0x1,0xe
007e 480b |H | Short_Literal 0xb
007f e022 | " | Load 0x0,0x22
0080 1862 | b | Execute Package,Field_Execute,Field_Number 0x62
0081 e023 | # | Load 0x0,0x23
0082 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0083 5808 |X | Indirect_Literal Float,0x8c,15.0
0084 4802 |H | Short_Literal 0x2
0085 0092 017c | || Action Push_String_Extended,0x17c ; "Test Paragraph\x0aNumber"
0087 820e | | Call 0x1,0xe
0088 4501 |E | Exit_Subprogram 0x1
0089 0000 0000 | | .XXX[0x3]
008b 0000 | |
008c 402e 0000 |@. | .DBL 15.0
008e 0000 0000 | |
0090 4039 0000 |@9 | .DBL 25.0
0092 0000 0000 | |
0094 0000 0000 | | .BLANK 0000[0x4]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009d | | .CONST 0x009d ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0002 | | .CONST 0x0002 ; Number of locals
009b INIT_0098:
009b 029f 0143 | C| Declare_Subprogram For_Call,INIT_0140
009d BODY_0098:
009d 00db | | Load_Top At_Offset_3
009e 01db | | Execute Vector,Length
009f 0c01 | | Execute_Immediate Greater_Equal,0x1
00a0 6802 |h | Jump_Zero 0xa3
00a1 8602 | | Call 0x3,0x2
00a2 7803 |x | Jump 0xa6
00a3 e023 | # | Load 0x0,0x23
00a4 1b16 | | Execute Package,Field_Read,Field_Number 0x16
00a5 4402 |D | Exit_Subprogram With_Result,0x2
00a6 0831 | 1 | Execute_Immediate Raise,0x31
00a7 0000 | | .XXX[0x1]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00af | | .CONST 0x00af ; Address of begin
00a9 0004 | | .CONST 0x0004 ; Address of exception handler
00aa 0003 | | .CONST 0x0003 ; Number of locals
00ab INIT_00a8:
00ab e22c | , | Load 0x1,0x2c
00ac 1b11 | | Execute Package,Field_Read,Field_Number 0x11
00ad 00e1 | | Load_Encached Boolean_Cache
00ae 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
00af BODY_00a8:
00af 00cf | | Action Mark_Auxiliary
00b0 e7ff | | Load 0x3,-0x1
00b1 01d9 | | Execute Vector,Reverse_Bounds
00b2 0263 | c | Execute Discrete,Above_Bound
00b3 7027 |p' | Jump_Nonzero 0xdb
00b4 00db | | Load_Top At_Offset_3
00b5 680f |h | Jump_Zero 0xc5
00b6 e602 | | Load 0x3,0x2
00b7 0092 017d | }| Action Push_String_Extended,0x17d ; "SRS "
00b9 00da | | Load_Top At_Offset_2
00ba e7ff | | Load 0x3,-0x1
00bb 01d7 | | Execute Vector,Field_Read
00bc e022 | " | Load 0x0,0x22
00bd 189f | | Execute Package,Field_Execute,Field_Number 0x9f
00be 01cc | | Execute Vector,Catenate
00bf e22c | , | Load 0x1,0x2c
00c0 181d | | Execute Package,Field_Execute,Field_Number 0x1d
00c1 c602 | | Store 0x3,0x2
00c2 4800 |H | Short_Literal 0x0
00c3 a603 | | Store_Unchecked 0x3,0x3
00c4 780c |x | Jump 0xd1
00c5 e602 | | Load 0x3,0x2
00c6 0092 017e | ~| Action Push_String_Extended,0x17e ; ", SRS "
00c8 00da | | Load_Top At_Offset_2
00c9 e7ff | | Load 0x3,-0x1
00ca 01d7 | | Execute Vector,Field_Read
00cb e022 | " | Load 0x0,0x22
00cc 189f | | Execute Package,Field_Execute,Field_Number 0x9f
00cd 01cc | | Execute Vector,Catenate
00ce e22c | , | Load 0x1,0x2c
00cf 181d | | Execute Package,Field_Execute,Field_Number 0x1d
00d0 c602 | | Store 0x3,0x2
00d1 00d8 | | Load_Top At_Offset_0
00d2 e7ff | | Load 0x3,-0x1
00d3 01d7 | | Execute Vector,Field_Read
00d4 e7fe | | Load 0x3,-0x2
00d5 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
00d6 e022 | " | Load 0x0,0x22
00d7 1b9e | | Execute Package,Field_Read,Field_Number 0x9e
00d8 180e | | Execute Package,Field_Execute,Field_Number 0xe
00d9 00c8 | | Action Pop_Auxiliary_Range
00da 3fd9 |? | Loop_Increasing 0xb4
00db 00ce | | Action Pop_Auxiliary
00dc 00d9 | | Load_Top At_Offset_1
00dd e22c | , | Load 0x1,0x2c
00de 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00df 4402 |D | Exit_Subprogram With_Result,0x2
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00ef | | .CONST 0x00ef ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0004 | | .CONST 0x0004 ; Number of locals
00e3 INIT_00e0:
00e3 00da | | Load_Top At_Offset_2
00e4 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
00e5 e024 | $ | Load 0x0,0x24
00e6 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00e7 011e | | Execute Any,Convert
00e8 e022 | " | Load 0x0,0x22
00e9 1b8b | | Execute Package,Field_Read,Field_Number 0x8b
00ea 00d9 | | Load_Top At_Offset_1
00eb e024 | $ | Load 0x0,0x24
00ec 1880 | | Execute Package,Field_Execute,Field_Number 0x80
00ed 029f 0163 | c| Declare_Subprogram For_Call,INIT_0160
00ef BODY_00e0:
00ef 4801 |H | Short_Literal 0x1
00f0 480d |H | Short_Literal 0xd
00f1 e022 | " | Load 0x0,0x22
00f2 1862 | b | Execute Package,Field_Execute,Field_Number 0x62
00f3 00ea | | Load_Encached Null_String_Cache
00f4 4800 |H | Short_Literal 0x0
00f5 e602 | | Load 0x3,0x2
00f6 e022 | " | Load 0x0,0x22
00f7 1b49 | I | Execute Package,Field_Read,Field_Number 0x49
00f8 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
00f9 e602 | | Load 0x3,0x2
00fa 8239 | 9 | Call 0x1,0x39
00fb 820f | | Call 0x1,0xf
00fc 4801 |H | Short_Literal 0x1
00fd 480d |H | Short_Literal 0xd
00fe e022 | " | Load 0x0,0x22
00ff 1862 | b | Execute Package,Field_Execute,Field_Number 0x62
0100 e023 | # | Load 0x0,0x23
0101 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0102 4804 |H | Short_Literal 0x4
0103 e602 | | Load 0x3,0x2
0104 e022 | " | Load 0x0,0x22
0105 1b49 | I | Execute Package,Field_Read,Field_Number 0x49
0106 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0107 820f | | Call 0x1,0xf
0108 00da | | Load_Top At_Offset_2
0109 e024 | $ | Load 0x0,0x24
010a 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
010b 6802 |h | Jump_Zero 0x10e
010c 8604 | | Call 0x3,0x4
010d 7808 |x | Jump 0x116
010e 4801 |H | Short_Literal 0x1
010f 480d |H | Short_Literal 0xd
0110 e022 | " | Load 0x0,0x22
0111 1862 | b | Execute Package,Field_Execute,Field_Number 0x62
0112 e023 | # | Load 0x0,0x23
0113 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0114 e236 | 6 | Load 0x1,0x36
0115 820f | | Call 0x1,0xf
0116 4801 |H | Short_Literal 0x1
0117 480d |H | Short_Literal 0xd
0118 e022 | " | Load 0x0,0x22
0119 1862 | b | Execute Package,Field_Execute,Field_Number 0x62
011a e023 | # | Load 0x0,0x23
011b 1b16 | | Execute Package,Field_Read,Field_Number 0x16
011c 483c |H< | Short_Literal 0x3c
011d e602 | | Load 0x3,0x2
011e e022 | " | Load 0x0,0x22
011f 1b49 | I | Execute Package,Field_Read,Field_Number 0x49
0120 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0121 820f | | Call 0x1,0xf
0122 4801 |H | Short_Literal 0x1
0123 480d |H | Short_Literal 0xd
0124 e022 | " | Load 0x0,0x22
0125 1862 | b | Execute Package,Field_Execute,Field_Number 0x62
0126 e023 | # | Load 0x0,0x23
0127 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0128 483d |H= | Short_Literal 0x3d
0129 e602 | | Load 0x3,0x2
012a e022 | " | Load 0x0,0x22
012b 1b49 | I | Execute Package,Field_Read,Field_Number 0x49
012c 1812 | | Execute Package,Field_Execute,Field_Number 0x12
012d 820f | | Call 0x1,0xf
012e 4801 |H | Short_Literal 0x1
012f 480d |H | Short_Literal 0xd
0130 e022 | " | Load 0x0,0x22
0131 1862 | b | Execute Package,Field_Execute,Field_Number 0x62
0132 e7ff | | Load 0x3,-0x1
0133 e603 | | Load 0x3,0x3
0134 8403 | | Call 0x2,0x3
0135 e7ff | | Load 0x3,-0x1
0136 e603 | | Load 0x3,0x3
0137 8404 | | Call 0x2,0x4
0138 820f | | Call 0x1,0xf
0139 4502 |E | Exit_Subprogram 0x2
013a 0000 0000 | | .BLANK 0000[0x6]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0151 | Q | .CONST 0x0151 ; Address of begin
0141 0004 | | .CONST 0x0004 ; Address of exception handler
0142 0002 | | .CONST 0x0002 ; Number of locals
0143 INIT_0140:
0143 4803 |H | Short_Literal 0x3
0144 e022 | " | Load 0x0,0x22
0145 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0146 1c08 | | Execute_Immediate Run_Utility,0x8
0147 e7ff | | Load 0x3,-0x1
0148 01dd | | Execute Vector,First
0149 e7ff | | Load 0x3,-0x1
014a 01d7 | | Execute Vector,Field_Read
014b e022 | " | Load 0x0,0x22
014c 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
014d 2304 |# | Execute Variant_Record,Field_Type,Field_Number 0x4
014e 0119 | | Execute Any,Check_In_Formal_Type
014f 00d9 | | Load_Top At_Offset_1
0150 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0151 BODY_0140:
0151 00ea | | Load_Encached Null_String_Cache
0152 00d9 | | Load_Top At_Offset_1
0153 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0154 e022 | " | Load 0x0,0x22
0155 189f | | Execute Package,Field_Execute,Field_Number 0x9f
0156 00da | | Load_Top At_Offset_2
0157 4806 |H | Short_Literal 0x6
0158 e022 | " | Load 0x0,0x22
0159 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
015a 00cb | | Action Pop_Block_With_Result
015b 4402 |D | Exit_Subprogram With_Result,0x2
015c 0000 0000 | | .BLANK 0000[0x4]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0166 | f | .CONST 0x0166 ; Address of begin
0161 0004 | | .CONST 0x0004 ; Address of exception handler
0162 0002 | | .CONST 0x0002 ; Number of locals
0163 INIT_0160:
0163 e602 | | Load 0x3,0x2
0164 e022 | " | Load 0x0,0x22
0165 189f | | Execute Package,Field_Execute,Field_Number 0x9f
0166 BODY_0160:
0166 4801 |H | Short_Literal 0x1
0167 480d |H | Short_Literal 0xd
0168 e022 | " | Load 0x0,0x22
0169 1862 | b | Execute Package,Field_Execute,Field_Number 0x62
016a 00ea | | Load_Encached Null_String_Cache
016b 00db | | Load_Top At_Offset_3
016c e7ff | | Load 0x3,-0x1
016d 4806 |H | Short_Literal 0x6
016e e022 | " | Load 0x0,0x22
016f 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
0170 00db | | Load_Top At_Offset_3
0171 e7ff | | Load 0x3,-0x1
0172 4806 |H | Short_Literal 0x6
0173 e022 | " | Load 0x0,0x22
0174 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
0175 820f | | Call 0x1,0xf
0176 4501 |E | Exit_Subprogram 0x1
0177 ; --------------------------------------------------------------------------------------
0177 ; STRING TABLE
0177 ; --------------------------------------------------------------------------------------
0177 0012 | | .STRTAB 0x0012->0x0180 ; "Requirement Name"
0178 0020 | | .STRTAB 0x0020->0x0188 ; "Unique\x0aIdentifier"
0179 002f | / | .STRTAB 0x002f->0x0190 ; "Paragraph\x0aNumber"
017a 003d | = | .STRTAB 0x003d->0x0198 ; "Qualification\x0aMethod(s)"
017b 0052 | R | .STRTAB 0x0052->0x01a4 ; "Qualification\x0aLevel"
017c 0063 | c | .STRTAB 0x0063->0x01ad ; "Test Paragraph\x0aNumber"
017d 0076 | v | .STRTAB 0x0076->0x01b8 ; "SRS "
017e 0078 | x | .STRTAB 0x0078->0x01ba ; ", SRS "
017f 007c | | | .STREND 0x007c->0x01bd
0180 5265 7175 |Requ| .STRTAB_STRINGS
01bd 0000 0000 | | .XXX[0x3]
01bf 0000 | |
01c0 ; --------------------------------------------------------------------------------------
01c0 ; Debug Table
01c0 ; --------------------------------------------------------------------------------------
01c0 0004 0012 | | .DEBUG4 0x0004,0x0012,0xfc95,0x0000,0x0001,0x0000
01c6 31ac 27aa |1 ' | .XXX[0x3a]
01c8 0b28 a038 | ( 8|
01ca 0c20 a874 | t|
01cc 0286 a800 | |
01ce 48a8 e4e4 |H |
01d0 3232 d50d |22 |
01d2 8610 a8b8 | |
01d4 580d f9be |X |
01d6 0b2a 864a | * J|
01d8 4f2b 0254 |O+ T|
01da 0e89 1aa2 | |
01dc ee8c cac1 | |
01de 4656 a1de |FV |
01e0 48d3 64ac |H d |
01e2 a80d d769 | i|
01e4 ba92 88ca | |
01e6 2b28 033e |+( >|
01e8 ac31 d336 | 1 6|
01ea 8a88 c8c2 | |
01ec f7b9 18d5 | |
01ee a996 e832 | 2|
01f0 e33c ebaa | < |
01f2 7611 88b8 |v |
01f4 0f3d 51c8 | =Q |
01f6 0690 ba5f | _|
01f8 2e00 b1ec |. |
01fa 94c8 0ce5 | |
01fc b253 6030 | S`0|
01fe 9339 5f88 | 9_ |