|
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, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦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 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 00d8 | | .CONST 0x00d8 ; 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 0037 | 7 | .CONST 0x0037 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 000f | | .CONST 0x000f ; Number of locals
000b INIT_0008:
000b 0007 | | Action Break_Optional ; Debug Table 0x0 = .DEBUG 0x000b,0x014a,0x8000,0x0000,0x0059,0xf125,0x0000,0x0009
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007 | | Action Break_Optional ; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 0007 | | Action Break_Optional ; Debug Table 0x0.0x2 = 0xd,0xfffd
000e 0007 | | Action Break_Optional ; Debug Table 0x0.0x3 = 0xe,0xfffc
000f 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x4 = 0xf,0xfffb
0010 6033 |`3 | Indirect_Literal Discrete,0x44,{0x0074cc0e, 0x00000ab0}
0011 02a0 | | Declare_Subprogram Null_Subprogram
0012 038f | | Declare_Type Package,Defined,Visible
0013 0386 | | Declare_Variable Package,Visible
0014 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x5 = 0x14,0xfffa
0015 602a |`* | Indirect_Literal Discrete,0x40,{0x0074cc0e, 0x000007b0}
0016 02a0 | | Declare_Subprogram Null_Subprogram
0017 038f | | Declare_Type Package,Defined,Visible
0018 0386 | | Declare_Variable Package,Visible
0019 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x6 = 0x19,0xfff9
001a 6021 |`! | Indirect_Literal Discrete,0x3c,{0x0074cc0e, 0x000004b0}
001b 02a0 | | Declare_Subprogram Null_Subprogram
001c 038f | | Declare_Type Package,Defined,Visible
001d 0386 | | Declare_Variable Package,Visible
001e 00bf | | Action Accept_Activation
001f e001 | | Load 0x0,0x1 ; Debug Table 0x1 = .DEBUG 0x001f,0x015a,0x8000,0x0000,0x0059,0xf135,0x0000,0x0009
; Debug Table 0x1.0x0 = 0x1f,0xffff
0020 e002 | | Load 0x0,0x2
0021 e003 | | Load 0x0,0x3
0022 4803 |H | Short_Literal 0x3
0023 e20d | | Load 0x1,0xd
0024 020e | | Execute Module,Augment_Imports
0025 00da | | Load_Top At_Offset_2
0026 020f | | Execute Module,Activate
0027 e004 | | Load 0x0,0x4 ; Debug Table 0x1.0x1 = 0x27,0xfffe
0028 e002 | | Load 0x0,0x2
0029 e005 | | Load 0x0,0x5
002a 4803 |H | Short_Literal 0x3
002b e20e | | Load 0x1,0xe
002c 020e | | Execute Module,Augment_Imports
002d 00d9 | | Load_Top At_Offset_1
002e 020f | | Execute Module,Activate
002f e006 | | Load 0x0,0x6 ; Debug Table 0x1.0x2 = 0x2f,0xfffd
0030 e002 | | Load 0x0,0x2
0031 e007 | | Load 0x0,0x7
0032 4803 |H | Short_Literal 0x3
0033 e20f | | Load 0x1,0xf
0034 020e | | Execute Module,Augment_Imports
0035 00d8 | | Load_Top At_Offset_0
0036 020f | | Execute Module,Activate
0037 BODY_0008:
0037 00bc | | Action Signal_Activated
0038 00bb | | Action Signal_Completion
0039 0000 0000 | | .XXX[0x3]
003b 0000 | |
003c 0074 cc0e | t | .LITERAL {0x0074cc0e, 0x000004b0}
0040 0074 cc0e | t | .LITERAL {0x0074cc0e, 0x000007b0}
0044 0074 cc0e | t | .LITERAL {0x0074cc0e, 0x00000ab0}
0048 0054 0004 | T | .XXX[0x3]
004a 000e | |
004b 029a 005b | [| Declare_Subprogram INIT_0058,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x2 = .DEBUG 0x004b,0x0162,0x0000,0x0000,0x0059,0xf125,0x0000,0x009a
; Debug Table 0x2.0x0 = 0x4b,0xffff
004d 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x2.0x1 = 0x4d,0xfffe
004f 00bf | | Action Accept_Activation
0050 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x3 = .DEBUG 0x0050,0x0168,0x0000,0x0000,0x0059,0xf195,0x0000,0x0008
; Debug Table 0x3.0x0 = 0x50,0xffff
0051 00c7 | | Action Elaborate_Subprogram
0052 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x3.0x1 = 0x52,0xfffe
0053 00c7 | | Action Elaborate_Subprogram
0054 00bc | | Action Signal_Activated
0055 00bb | | Action Signal_Completion
0056 0000 0000 | | .XXX[0x2]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005b | [ | .CONST 0x005b ; Address of begin
0059 0004 | | .CONST 0x0004 ; Address of exception handler
005a 0001 | | .CONST 0x0001 ; Number of locals
005b BODY_0058:
005b INIT_0058:
005b 00db | | Load_Top At_Offset_3 ; Debug Table 0x4 = .DEBUG 0x005b,0x016e,0x0002,0x0000,0x0059,0xf125,0x0000,0x009b
; Debug Table 0x4.0x0 = 0x5b,0x1
005c 00db | | Load_Top At_Offset_3
005d e001 | | Load 0x0,0x1
005e 180d | | Execute Package,Field_Execute,Field_Number 0xd
005f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0063 | c | .CONST 0x0063 ; Address of begin
0061 0004 | | .CONST 0x0004 ; Address of exception handler
0062 0001 | | .CONST 0x0001 ; Number of locals
0063 BODY_0060:
0063 INIT_0060:
0063 e5fb | | Load 0x2,-0x5 ; Debug Table 0x5 = .DEBUG 0x0063,0x0172,0x0001,0x0000,0x0059,0xf125,0x0000,0x00b1
; Debug Table 0x5.0x0 = 0x63,0x1
0064 0120 | | Execute Any,Is_Value
0065 6803 |h | Jump_Zero 0x69
0066 e002 | | Load 0x0,0x2
0067 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0068 7801 |x | Jump 0x6a
0069 e5fb | | Load 0x2,-0x5
006a e5fc | | Load 0x2,-0x4
006b e5fd | | Load 0x2,-0x3
006c e5fe | | Load 0x2,-0x2
006d e5ff | | Load 0x2,-0x1
006e e003 | | Load 0x0,0x3
006f 180d | | Execute Package,Field_Execute,Field_Number 0xd
0070 c5fb | | Store 0x2,-0x5
0071 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0072 0000 0000 | | .BLANK 0000[0x6]
0078 0084 0004 | | .XXX[0x3]
007a 000e | |
007b 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x6 = .DEBUG 0x007b,0x0176,0x0000,0x0000,0x0059,0xf125,0x0000,0x005c
; Debug Table 0x6.0x0 = 0x7b,0xffff
007d 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x6.0x1 = 0x7d,0xfffe
007f 00bf | | Action Accept_Activation
0080 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x7 = .DEBUG 0x0080,0x017c,0x0000,0x0000,0x0059,0xf155,0x0000,0x0008
; Debug Table 0x7.0x0 = 0x80,0xffff
0081 00c7 | | Action Elaborate_Subprogram
0082 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x7.0x1 = 0x82,0xfffe
0083 00c7 | | Action Elaborate_Subprogram
0084 00bc | | Action Signal_Activated
0085 00bb | | Action Signal_Completion
0086 0000 0000 | | .XXX[0x2]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008b | | .CONST 0x008b ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0001 | | .CONST 0x0001 ; Number of locals
008b BODY_0088:
008b INIT_0088:
008b 00db | | Load_Top At_Offset_3 ; Debug Table 0x8 = .DEBUG 0x008b,0x0182,0x0002,0x0000,0x0059,0xf125,0x0000,0x005d
; Debug Table 0x8.0x0 = 0x8b,0x1
008c 00db | | Load_Top At_Offset_3
008d e001 | | Load 0x0,0x1
008e 180d | | Execute Package,Field_Execute,Field_Number 0xd
008f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0093 | | .CONST 0x0093 ; Address of begin
0091 0004 | | .CONST 0x0004 ; Address of exception handler
0092 0001 | | .CONST 0x0001 ; Number of locals
0093 BODY_0090:
0093 INIT_0090:
0093 e5fb | | Load 0x2,-0x5 ; Debug Table 0x9 = .DEBUG 0x0093,0x0186,0x0001,0x0000,0x0059,0xf125,0x0000,0x0073
; Debug Table 0x9.0x0 = 0x93,0x1
0094 0120 | | Execute Any,Is_Value
0095 6803 |h | Jump_Zero 0x99
0096 e002 | | Load 0x0,0x2
0097 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0098 7801 |x | Jump 0x9a
0099 e5fb | | Load 0x2,-0x5
009a e5fc | | Load 0x2,-0x4
009b e5fd | | Load 0x2,-0x3
009c e5fe | | Load 0x2,-0x2
009d e5ff | | Load 0x2,-0x1
009e e003 | | Load 0x0,0x3
009f 180d | | Execute Package,Field_Execute,Field_Number 0xd
00a0 c5fb | | Store 0x2,-0x5
00a1 4505 |E | Exit_Suprogram New_Top_Offset 0x5
00a2 0000 0000 | | .BLANK 0000[0x6]
00a8 00b4 0004 | | .XXX[0x3]
00aa 000e | |
00ab 029a 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0xa = .DEBUG 0x00ab,0x018a,0x0000,0x0000,0x0059,0xf125,0x0000,0x001e
; Debug Table 0xa.0x0 = 0xab,0xffff
00ad 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0xa.0x1 = 0xad,0xfffe
00af 00bf | | Action Accept_Activation
00b0 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0xb = .DEBUG 0x00b0,0x0190,0x0000,0x0000,0x0059,0xf5b5,0x0000,0x0008
; Debug Table 0xb.0x0 = 0xb0,0xffff
00b1 00c7 | | Action Elaborate_Subprogram
00b2 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0xb.0x1 = 0xb2,0xfffe
00b3 00c7 | | Action Elaborate_Subprogram
00b4 00bc | | Action Signal_Activated
00b5 00bb | | Action Signal_Completion
00b6 0000 0000 | | .XXX[0x2]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00bb | | .CONST 0x00bb ; Address of begin
00b9 0004 | | .CONST 0x0004 ; Address of exception handler
00ba 0001 | | .CONST 0x0001 ; Number of locals
00bb BODY_00b8:
00bb INIT_00b8:
00bb 00db | | Load_Top At_Offset_3 ; Debug Table 0xc = .DEBUG 0x00bb,0x0196,0x0002,0x0000,0x0059,0xf125,0x0000,0x001f
; Debug Table 0xc.0x0 = 0xbb,0x1
00bc 00db | | Load_Top At_Offset_3
00bd e001 | | Load 0x0,0x1
00be 180d | | Execute Package,Field_Execute,Field_Number 0xd
00bf 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3 | | .CONST 0x00c3 ; Address of begin
00c1 0004 | | .CONST 0x0004 ; Address of exception handler
00c2 0001 | | .CONST 0x0001 ; Number of locals
00c3 BODY_00c0:
00c3 INIT_00c0:
00c3 e5fb | | Load 0x2,-0x5 ; Debug Table 0xd = .DEBUG 0x00c3,0x019a,0x0001,0x0000,0x0059,0xf125,0x0000,0x0035
; Debug Table 0xd.0x0 = 0xc3,0x1
00c4 0120 | | Execute Any,Is_Value
00c5 6803 |h | Jump_Zero 0xc9
00c6 e002 | | Load 0x0,0x2
00c7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00c8 7801 |x | Jump 0xca
00c9 e5fb | | Load 0x2,-0x5
00ca e5fc | | Load 0x2,-0x4
00cb e5fd | | Load 0x2,-0x3
00cc e5fe | | Load 0x2,-0x2
00cd e5ff | | Load 0x2,-0x1
00ce e003 | | Load 0x0,0x3
00cf 180d | | Execute Package,Field_Execute,Field_Number 0xd
00d0 c5fb | | Store 0x2,-0x5
00d1 4505 |E | Exit_Suprogram New_Top_Offset 0x5
00d2 0000 0000 | | .BLANK 0000[0x6]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; Debug Table
00d8 ; --------------------------------------------------------------------------------------
00d8 0003 000e | | .CONST 0x0003,0x000e
00da 000b 014a | J| .DEBUG 0x000b,0x014a,0x8000,0x0000,0x0059,0xf125,0x0000,0x0009
00e2 001f 015a | Z| .DEBUG 0x001f,0x015a,0x8000,0x0000,0x0059,0xf135,0x0000,0x0009
00ea 004b 0162 | K b| .DEBUG 0x004b,0x0162,0x0000,0x0000,0x0059,0xf125,0x0000,0x009a
00f2 0050 0168 | P h| .DEBUG 0x0050,0x0168,0x0000,0x0000,0x0059,0xf195,0x0000,0x0008
00fa 005b 016e | [ n| .DEBUG 0x005b,0x016e,0x0002,0x0000,0x0059,0xf125,0x0000,0x009b
0102 0063 0172 | c r| .DEBUG 0x0063,0x0172,0x0001,0x0000,0x0059,0xf125,0x0000,0x00b1
010a 007b 0176 | { v| .DEBUG 0x007b,0x0176,0x0000,0x0000,0x0059,0xf125,0x0000,0x005c
0112 0080 017c | || .DEBUG 0x0080,0x017c,0x0000,0x0000,0x0059,0xf155,0x0000,0x0008
011a 008b 0182 | | .DEBUG 0x008b,0x0182,0x0002,0x0000,0x0059,0xf125,0x0000,0x005d
0122 0093 0186 | | .DEBUG 0x0093,0x0186,0x0001,0x0000,0x0059,0xf125,0x0000,0x0073
012a 00ab 018a | | .DEBUG 0x00ab,0x018a,0x0000,0x0000,0x0059,0xf125,0x0000,0x001e
0132 00b0 0190 | | .DEBUG 0x00b0,0x0190,0x0000,0x0000,0x0059,0xf5b5,0x0000,0x0008
013a 00bb 0196 | | .DEBUG 0x00bb,0x0196,0x0002,0x0000,0x0059,0xf125,0x0000,0x001f
0142 00c3 019a | | .DEBUG 0x00c3,0x019a,0x0001,0x0000,0x0059,0xf125,0x0000,0x0035
014a ; --------------------------------------------------------------------------------------
014a ; Debug3 Subtable 0x0
014a ; --------------------------------------------------------------------------------------
014a 0007 0000 | | .DBG3TAB 0x0007,0x0000
014c 000b ffff | | .CONST 0x000b,0xffff
014e 000c fffe | | .CONST 0x000c,0xfffe
0150 000d fffd | | .CONST 0x000d,0xfffd
0152 000e fffc | | .CONST 0x000e,0xfffc
0154 000f fffb | | .CONST 0x000f,0xfffb
0156 0014 fffa | | .CONST 0x0014,0xfffa
0158 0019 fff9 | | .CONST 0x0019,0xfff9
015a ; --------------------------------------------------------------------------------------
015a ; Debug3 Subtable 0x1
015a ; --------------------------------------------------------------------------------------
015a 0003 0000 | | .DBG3TAB 0x0003,0x0000
015c 001f ffff | | .CONST 0x001f,0xffff
015e 0027 fffe | ' | .CONST 0x0027,0xfffe
0160 002f fffd | / | .CONST 0x002f,0xfffd
0162 ; --------------------------------------------------------------------------------------
0162 ; Debug3 Subtable 0x2
0162 ; --------------------------------------------------------------------------------------
0162 0002 0000 | | .DBG3TAB 0x0002,0x0000
0164 004b ffff | K | .CONST 0x004b,0xffff
0166 004d fffe | M | .CONST 0x004d,0xfffe
0168 ; --------------------------------------------------------------------------------------
0168 ; Debug3 Subtable 0x3
0168 ; --------------------------------------------------------------------------------------
0168 0002 0000 | | .DBG3TAB 0x0002,0x0000
016a 0050 ffff | P | .CONST 0x0050,0xffff
016c 0052 fffe | R | .CONST 0x0052,0xfffe
016e ; --------------------------------------------------------------------------------------
016e ; Debug3 Subtable 0x4
016e ; --------------------------------------------------------------------------------------
016e 0000 0001 | | .DBG3TAB 0x0000,0x0001
0170 005b 0001 | [ | .CONST 0x005b,0x0001
0172 ; --------------------------------------------------------------------------------------
0172 ; Debug3 Subtable 0x5
0172 ; --------------------------------------------------------------------------------------
0172 0000 0001 | | .DBG3TAB 0x0000,0x0001
0174 0063 0001 | c | .CONST 0x0063,0x0001
0176 ; --------------------------------------------------------------------------------------
0176 ; Debug3 Subtable 0x6
0176 ; --------------------------------------------------------------------------------------
0176 0002 0000 | | .DBG3TAB 0x0002,0x0000
0178 007b ffff | { | .CONST 0x007b,0xffff
017a 007d fffe | } | .CONST 0x007d,0xfffe
017c ; --------------------------------------------------------------------------------------
017c ; Debug3 Subtable 0x7
017c ; --------------------------------------------------------------------------------------
017c 0002 0000 | | .DBG3TAB 0x0002,0x0000
017e 0080 ffff | | .CONST 0x0080,0xffff
0180 0082 fffe | | .CONST 0x0082,0xfffe
0182 ; --------------------------------------------------------------------------------------
0182 ; Debug3 Subtable 0x8
0182 ; --------------------------------------------------------------------------------------
0182 0000 0001 | | .DBG3TAB 0x0000,0x0001
0184 008b 0001 | | .CONST 0x008b,0x0001
0186 ; --------------------------------------------------------------------------------------
0186 ; Debug3 Subtable 0x9
0186 ; --------------------------------------------------------------------------------------
0186 0000 0001 | | .DBG3TAB 0x0000,0x0001
0188 0093 0001 | | .CONST 0x0093,0x0001
018a ; --------------------------------------------------------------------------------------
018a ; Debug3 Subtable 0xa
018a ; --------------------------------------------------------------------------------------
018a 0002 0000 | | .DBG3TAB 0x0002,0x0000
018c 00ab ffff | | .CONST 0x00ab,0xffff
018e 00ad fffe | | .CONST 0x00ad,0xfffe
0190 ; --------------------------------------------------------------------------------------
0190 ; Debug3 Subtable 0xb
0190 ; --------------------------------------------------------------------------------------
0190 0002 0000 | | .DBG3TAB 0x0002,0x0000
0192 00b0 ffff | | .CONST 0x00b0,0xffff
0194 00b2 fffe | | .CONST 0x00b2,0xfffe
0196 ; --------------------------------------------------------------------------------------
0196 ; Debug3 Subtable 0xc
0196 ; --------------------------------------------------------------------------------------
0196 0000 0001 | | .DBG3TAB 0x0000,0x0001
0198 00bb 0001 | | .CONST 0x00bb,0x0001
019a ; --------------------------------------------------------------------------------------
019a ; Debug3 Subtable 0xd
019a ; --------------------------------------------------------------------------------------
019a 0000 0001 | | .DBG3TAB 0x0000,0x0001
019c 00c3 0001 | | .CONST 0x00c3,0x0001
019e 0000 0000 | | .BLANK 0000[0x62]