|
|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 DFS Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 DFS Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 2048 (0x800)
Types: SEG
Notes: 5805_R1K_CODE
Names: »11156497.SEG«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─⟦this⟧ »11156497.SEG«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─⟦this⟧ »11156497.SEG«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─⟦this⟧ »11156497.SEG«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─⟦this⟧ »11156497.SEG«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─⟦this⟧ »11156497.SEG«
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5805 |X | .CONST 0x5805 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 01b8 | | .CONST 0x01b8 ; 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 0101 | | .CONST 0x0101 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 005a | Z | .CONST 0x005a ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 001a | | .CONST 0x001a ; Number of locals
000b INIT_0008:
000b 029a 0063 | c| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0060 ; Debug Table 0x0 = .DEBUG 0x000b,0x0242,0x8000,0x0000,0x000e,0x18f4,0x0000,0x0005
; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 0093 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0090 ; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 00c3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00c0 ; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 00d3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00d0 ; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 029a 00db | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00d8 ; Debug Table 0x0.0x4 = 0x13,0xfffb
0015 029a 00eb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00e8 ; Debug Table 0x0.0x5 = 0x15,0xfffa
0017 029a 00fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00f8 ; Debug Table 0x0.0x6 = 0x17,0xfff9
0019 029a 010b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0108 ; Debug Table 0x0.0x7 = 0x19,0xfff8
001b 029a 011b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0118 ; Debug Table 0x0.0x8 = 0x1b,0xfff7
001d 00bf | | Action Accept_Activation
001e 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x001e,0x0256,0x8000,0x0000,0x000e,0x1aa4,0x0000,0x000e
; Debug Table 0x1.0x0 = 0x1e,0xffff
001f 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x1f,0xfffe
0020 4801 |H | Short_Literal 0x1 ; Debug Table 0x1.0x2 = 0x20,0xfffd
0021 4802 |H | Short_Literal 0x2
0022 00e9 | | Load_Encached String_Cache
0023 0334 | 4 | Declare_Variable Array,With_Constraint
0024 4801 |H | Short_Literal 0x1
0025 4802 |H | Short_Literal 0x2
0026 00e9 | | Load_Encached String_Cache
0027 0334 | 4 | Declare_Variable Array,With_Constraint
0028 480d |H | Short_Literal 0xd
0029 4801 |H | Short_Literal 0x1
002a e217 | | Load 0x1,0x17
002b 01d6 | | Execute Vector,Field_Write
002c 480a |H | Short_Literal 0xa
002d 4802 |H | Short_Literal 0x2
002e e217 | | Load 0x1,0x17
002f 01d6 | | Execute Vector,Field_Write
0030 e216 | | Load 0x1,0x16
0031 01d4 | | Execute Vector,Structure_Write
0032 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x3 = 0x32,0xfffc
0033 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0034 0616 | | Execute_Immediate Set_Value_Unchecked,0x16
0035 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x4 = 0x35,0xfffb
0036 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0037 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0038 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x5 = 0x38,0xfffa
0039 612e |a. | Indirect_Literal Discrete,0x168,{0x00aa3c11, 0x00001730} ; 0xaa3c11 = KERNEL_IO
003a 02a0 | | Declare_Subprogram Null_Subprogram
003b 037d | } | Declare_Type Task,Defined
003c 036f | o | Declare_Variable Task
003d e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x6 = 0x3d,0xfff9
003e e003 | | Load 0x0,0x3
003f 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0040 e004 | | Load 0x0,0x4
0041 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0042 4805 |H | Short_Literal 0x5
0043 e219 | | Load 0x1,0x19
0044 020e | | Execute Module,Augment_Imports
0045 0007 | | Action Break_Optional
0046 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x7 = 0x46,0xfff8
0047 00c7 | | Action Elaborate_Subprogram
0048 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x8 = 0x48,0xfff7
0049 00c7 | | Action Elaborate_Subprogram
004a 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x9 = 0x4a,0xfff6
004b 00c7 | | Action Elaborate_Subprogram
004c 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0xa = 0x4c,0xfff5
004d 00c7 | | Action Elaborate_Subprogram
004e 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0xb = 0x4e,0xfff4
004f 00c7 | | Action Elaborate_Subprogram
0050 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0xc = 0x50,0xfff3
0051 00c7 | | Action Elaborate_Subprogram
0052 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0xd = 0x52,0xfff2
0053 00c7 | | Action Elaborate_Subprogram
0054 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0xe = 0x54,0xfff1
0055 00c7 | | Action Elaborate_Subprogram
0056 029d 013b | ;| Declare_Subprogram For_Outer_Call,INIT_0138 ; Debug Table 0x1.0xf = 0x56,0xfff0
0058 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x10 = 0x58,0xffef
0059 00c7 | | Action Elaborate_Subprogram
005a BODY_0008:
005a 00be | | Action Activate_Tasks
005b 00bc | | Action Signal_Activated
005c 00bb | | Action Signal_Completion
005d 0000 0000 | | .XXX[0x3]
005f 0000 | |
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 e005 | | Load 0x0,0x5 ; Debug Table 0x2 = .DEBUG 0x0063,0x027a,0x0001,0x0000,0x000e,0x18f4,0x0000,0x0006
; Debug Table 0x2.0x0 = 0x63,0x1
0064 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0065 7002 |p | Jump_Nonzero 0x68
0066 e5fe | | Load 0x2,-0x2
0067 6822 |h" | Jump_Zero 0x8a
0068 e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0x1 = 0x68,0x2
0069 01db | | Execute Vector,Length
006a 7001 |p | Jump_Nonzero 0x6c
006b 4503 |E | Exit_Subprogram 0x3 ; Debug Table 0x2.0x2 = 0x6b,0x3
006c e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0x3 = 0x6c,0x4
006d 01db | | Execute Vector,Length
006e 0c51 | Q | Execute_Immediate Greater_Equal,0x51
006f 6815 |h | Jump_Zero 0x85
0070 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0x4 = 0x70,0x5
0071 e5ff | | Load 0x2,-0x1
0072 01dd | | Execute Vector,First
0073 e5ff | | Load 0x2,-0x1
0074 01dd | | Execute Vector,First
0075 0a4f | O | Execute_Immediate Plus,0x4f
0076 0248 | H | Execute Discrete,Check_In_Integer
0077 e5ff | | Load 0x2,-0x1
0078 01cf | | Execute Vector,Slice_Read
0079 820d | | Call 0x1,0xd
007a 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0x5 = 0x7a,0x6
007b e5ff | | Load 0x2,-0x1
007c 01dd | | Execute Vector,First
007d 0a50 | P | Execute_Immediate Plus,0x50
007e 0248 | H | Execute Discrete,Check_In_Integer
007f e5ff | | Load 0x2,-0x1
0080 01dc | | Execute Vector,Last
0081 e5ff | | Load 0x2,-0x1
0082 01cf | | Execute Vector,Slice_Read
0083 820d | | Call 0x1,0xd
0084 4503 |E | Exit_Subprogram 0x3
0085 e5fe | | Load 0x2,-0x2 ; Debug Table 0x2.0x6 = 0x85,0x7
0086 e5ff | | Load 0x2,-0x1
0087 4802 |H | Short_Literal 0x2
0088 e219 | | Load 0x1,0x19
0089 170d | | Execute Task,Entry_Call,Field_Number 0xd
008a 4503 |E | Exit_Subprogram 0x3 ; Debug Table 0x2.0x7 = 0x8a,0x8
008b 0000 0000 | | .BLANK 0000[0x5]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0097 | | .CONST 0x0097 ; Address of begin
0091 0004 | | .CONST 0x0004 ; Address of exception handler
0092 0002 | | .CONST 0x0002 ; Number of locals
0093 INIT_0090:
0093 4801 |H | Short_Literal 0x1 ; Debug Table 0x3 = .DEBUG 0x0093,0x028c,0x0001,0x0000,0x000e,0x18f4,0x0000,0x0013
; Debug Table 0x3.0x0 = 0x93,0xffff
0094 4802 |H | Short_Literal 0x2
0095 00e9 | | Load_Encached String_Cache
0096 0334 | 4 | Declare_Variable Array,With_Constraint
0097 BODY_0090:
0097 e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x1 = 0x97,0x1
0098 4802 |H | Short_Literal 0x2
0099 e402 | | Load 0x2,0x2
009a 01d6 | | Execute Vector,Field_Write
009b e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x2 = 0x9b,0x2
009c 0d20 | | Execute_Immediate Less,0x20
009d 6819 |h | Jump_Zero 0xb7
009e e5ff | | Load 0x2,-0x1
009f 0e0d | | Execute_Immediate Not_Equal,0xd
00a0 6816 |h | Jump_Zero 0xb7
00a1 e5ff | | Load 0x2,-0x1
00a2 0e0a | | Execute_Immediate Not_Equal,0xa
00a3 6813 |h | Jump_Zero 0xb7
00a4 485e |H^ | Short_Literal 0x5e ; Debug Table 0x3.0x3 = 0xa4,0x3
00a5 4801 |H | Short_Literal 0x1
00a6 e402 | | Load 0x2,0x2
00a7 01d6 | | Execute Vector,Field_Write
00a8 e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x4 = 0xa8,0x4
00a9 0a40 | @ | Execute_Immediate Plus,0x40
00aa 00d8 | | Load_Top At_Offset_0
00ab 00e8 | | Load_Encached Character_Cache
00ac 0260 | ` | Execute Discrete,In_Type
00ad 7002 |p | Jump_Nonzero 0xb0
00ae 48e0 |H | Short_Literal 0xe0
00af 0257 | W | Execute Discrete,Raise
00b0 4802 |H | Short_Literal 0x2
00b1 e402 | | Load 0x2,0x2
00b2 01d6 | | Execute Vector,Field_Write
00b3 e5fe | | Load 0x2,-0x2 ; Debug Table 0x3.0x5 = 0xb3,0x5
00b4 e402 | | Load 0x2,0x2
00b5 820d | | Call 0x1,0xd
00b6 4503 |E | Exit_Subprogram 0x3
00b7 e5fe | | Load 0x2,-0x2 ; Debug Table 0x3.0x6 = 0xb7,0x6
00b8 4802 |H | Short_Literal 0x2
00b9 4802 |H | Short_Literal 0x2
00ba e402 | | Load 0x2,0x2
00bb 01cf | | Execute Vector,Slice_Read
00bc 820d | | Call 0x1,0xd
00bd 4503 |E | Exit_Subprogram 0x3
00be 0000 0000 | | .XXX[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 e5fd | | Load 0x2,-0x3 ; Debug Table 0x4 = .DEBUG 0x00c3,0x029c,0x0001,0x0000,0x000e,0x18f4,0x0000,0x0020
; Debug Table 0x4.0x0 = 0xc3,0x1
00c4 4820 |H | Short_Literal 0x20
00c5 4800 |H | Short_Literal 0x0
00c6 e5fe | | Load 0x2,-0x2
00c7 e5ff | | Load 0x2,-0x1
00c8 e006 | | Load 0x0,0x6
00c9 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00ca 820d | | Call 0x1,0xd
00cb 4504 |E | Exit_Subprogram 0x4
00cc 0000 0000 | | .BLANK 0000[0x4]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d3 | | .CONST 0x00d3 ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 0001 | | .CONST 0x0001 ; Number of locals
00d3 BODY_00d0:
00d3 INIT_00d0:
00d3 e5ff | | Load 0x2,-0x1 ; Debug Table 0x5 = .DEBUG 0x00d3,0x02a0,0x0001,0x0000,0x000e,0x18f4,0x0000,0x0032
; Debug Table 0x5.0x0 = 0xd3,0x1
00d4 e216 | | Load 0x1,0x16
00d5 820d | | Call 0x1,0xd
00d6 4502 |E | Exit_Subprogram 0x2
00d7 0000 | | .XXX[0x1]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db | | .CONST 0x00db ; Address of begin
00d9 0004 | | .CONST 0x0004 ; Address of exception handler
00da 0001 | | .CONST 0x0001 ; Number of locals
00db BODY_00d8:
00db INIT_00d8:
00db e005 | | Load 0x0,0x5 ; Debug Table 0x6 = .DEBUG 0x00db,0x02a4,0x0001,0x0000,0x000e,0x18f4,0x0000,0x003b
; Debug Table 0x6.0x0 = 0xdb,0x1
00dc 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
00dd 6803 |h | Jump_Zero 0xe1
00de 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x1 = 0xde,0x2
00df e5ff | | Load 0x2,-0x1
00e0 820d | | Call 0x1,0xd
00e1 4502 |E | Exit_Subprogram 0x2
00e2 0000 0000 | | .BLANK 0000[0x6]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb | | .CONST 0x00eb ; Address of begin
00e9 0004 | | .CONST 0x0004 ; Address of exception handler
00ea 0001 | | .CONST 0x0001 ; Number of locals
00eb BODY_00e8:
00eb INIT_00e8:
00eb e005 | | Load 0x0,0x5 ; Debug Table 0x7 = .DEBUG 0x00eb,0x02aa,0x0001,0x0000,0x000e,0x18f4,0x0000,0x0043
; Debug Table 0x7.0x0 = 0xeb,0x1
00ec 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
00ed 6803 |h | Jump_Zero 0xf1
00ee 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x1 = 0xee,0x2
00ef e5ff | | Load 0x2,-0x1
00f0 820e | | Call 0x1,0xe
00f1 4502 |E | Exit_Subprogram 0x2
00f2 0000 0000 | | .BLANK 0000[0x6]
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 e005 | | Load 0x0,0x5 ; Debug Table 0x8 = .DEBUG 0x00fb,0x02b0,0x0001,0x0000,0x000e,0x18f4,0x0000,0x004b
; Debug Table 0x8.0x0 = 0xfb,0x1
00fc 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
00fd 6804 |h | Jump_Zero 0x102
00fe 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x1 = 0xfe,0x2
00ff e5fe | | Load 0x2,-0x2
0100 e5ff | | Load 0x2,-0x1
0101 820f | | Call 0x1,0xf
0102 4503 |E | Exit_Subprogram 0x3
0103 0000 0000 | | .BLANK 0000[0x5]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010b | | .CONST 0x010b ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 0001 | | .CONST 0x0001 ; Number of locals
010b BODY_0108:
010b INIT_0108:
010b e005 | | Load 0x0,0x5 ; Debug Table 0x9 = .DEBUG 0x010b,0x02b6,0x0001,0x0000,0x000e,0x18f4,0x0000,0x0058
; Debug Table 0x9.0x0 = 0x10b,0x1
010c 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
010d 6802 |h | Jump_Zero 0x110
010e 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x1 = 0x10e,0x2
010f 8210 | | Call 0x1,0x10
0110 4501 |E | Exit_Subprogram 0x1
0111 0000 0000 | | .BLANK 0000[0x7]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011c | | .CONST 0x011c ; Address of begin
0119 0135 | 5 | .CONST 0x0135 ; Address of exception handler
011a 0002 | | .CONST 0x0002 ; Number of locals
011b INIT_0118:
011b 00e8 | | Load_Encached Character_Cache ; Debug Table 0xa = .DEBUG 0x011b,0x02bc,0x0001,0x0000,0x000e,0x18f4,0x0000,0x005c
; Debug Table 0xa.0x0 = 0x11b,0xffff
011c BODY_0118:
011c e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0x1 = 0x11c,0x1
011d 00ea | | Load_Encached Null_String_Cache
011e e007 | | Load 0x0,0x7
011f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0120 00d1 | | Pop_Control Pop_Count_1
0121 0007 | | Action Break_Optional ; Debug Table 0xa.0x2 = 0x121,0x2
0122 821a | | Call 0x1,0x1a ; Debug Table 0xa.0x3 = 0x122,0x3
0123 a402 | | Store_Unchecked 0x2,0x2
0124 4800 |H | Short_Literal 0x0 ; Debug Table 0xa.0x4 = 0x124,0x4
0125 e402 | | Load 0x2,0x2
0126 820e | | Call 0x1,0xe
0127 e402 | | Load 0x2,0x2 ; Debug Table 0xa.0x5 = 0x127,0x5
0128 0f0d | | Execute_Immediate Equal,0xd
0129 6801 |h | Jump_Zero 0x12b
012a 4501 |E | Exit_Subprogram 0x1 ; Debug Table 0xa.0x6 = 0x12a,0x6
012b e402 | | Load 0x2,0x2 ; Debug Table 0xa.0x7 = 0x12b,0x7
012c 0f0a | | Execute_Immediate Equal,0xa
012d 6801 |h | Jump_Zero 0x12f
012e 4501 |E | Exit_Subprogram 0x1 ; Debug Table 0xa.0x8 = 0x12e,0x8
012f e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0x9 = 0x12f,0x9
0130 e402 | | Load 0x2,0x2
0131 e007 | | Load 0x0,0x7
0132 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0133 00d1 | | Pop_Control Pop_Count_1
0134 7fed | | Jump 0x122
0135 TRAP_0118:
0135 0007 | | Action Break_Optional
0136 e403 | | Load 0x2,0x3 ; Debug Table 0xa.0xa = 0x136,0xa
0137 0101 | | Execute Exception,Reraise
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 0143 | C | .CONST 0x0143 ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0005 | | .CONST 0x0005 ; Number of locals
013b INIT_0138:
013b 00e8 | | Load_Encached Character_Cache ; Debug Table 0xb = .DEBUG 0x013b,0x02d4,0x0002,0x0000,0x000e,0x1aa4,0x0000,0x01ef
; Debug Table 0xb.0x0 = 0x13b,0xffff
013c 4801 |H | Short_Literal 0x1 ; Debug Table 0xb.0x1 = 0x13c,0xfffe
013d 4801 |H | Short_Literal 0x1
013e 00e9 | | Load_Encached String_Cache
013f 0334 | 4 | Declare_Variable Array,With_Constraint
0140 e001 | | Load 0x0,0x1 ; Debug Table 0xb.0x2 = 0x140,0xfffd
0141 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0142 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xb.0x3 = 0x142,0xfffc
0143 BODY_0138:
0143 0007 | | Action Break_Optional ; Debug Table 0xb.0x4 = 0x143,0x1
0144 e403 | | Load 0x2,0x3 ; Debug Table 0xb.0x5 = 0x144,0x2
0145 00e3 | | Load_Encached Natural_Cache
0146 e001 | | Load 0x0,0x1
0147 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0148 581b |X | Indirect_Literal Float,0x164,4294967296.0
0149 5816 |X | Indirect_Literal Float,0x160,3.0517578125e-05
014a 023a | : | Execute Float,Divide
014b 0236 | 6 | Execute Float,Truncate_To_Discrete
014c e217 | | Load 0x1,0x17
014d e004 | | Load 0x0,0x4
014e 1815 | | Execute Package,Field_Execute,Field_Number 0x15
014f c404 | | Store 0x2,0x4
0150 c405 | | Store 0x2,0x5
0151 00d1 | | Pop_Control Pop_Count_1
0152 e404 | | Load 0x2,0x4 ; Debug Table 0xb.0x6 = 0x152,0x3
0153 77f0 |w | Jump_Nonzero 0x144
0154 e405 | | Load 0x2,0x5
0155 6fee |o | Jump_Zero 0x144
0156 7800 |x | Jump 0x157 ; Debug Table 0xb.0x7 = 0x156,0x4
0157 4801 |H | Short_Literal 0x1 ; Debug Table 0xb.0x8 = 0x157,0x5
0158 e403 | | Load 0x2,0x3
0159 01d7 | | Execute Vector,Field_Read
015a a402 | | Store_Unchecked 0x2,0x2
015b e402 | | Load 0x2,0x2 ; Debug Table 0xb.0x9 = 0x15b,0x6
015c 00ca | | Action Exit_Nullary_Function
015d 0000 0000 | | .XXX[0x3]
015f 0000 | |
0160 3f00 0000 |? | .DBL 3.0517578125e-05
0162 0000 0000 | |
0164 41f0 0000 |A | .DBL 4294967296.0
0166 0000 0000 | |
0168 00aa 3c11 | < | .LITERAL {0x00aa3c11, 0x00001730}
016c 0000 0000 | | .BLANK 0000[0x4]
0170 0179 0004 | y | .XXX[0x3]
0172 000e | |
0173 4802 |H | Short_Literal 0x2 ; Debug Table 0xc = .DEBUG 0x0173,0x02ea,0x0000,0x0000,0x000e,0x1aa4,0x0000,0x0044
0174 02cb | | Declare_Variable Entry
0175 00bf | | Action Accept_Activation
0176 029f 018b | | Declare_Subprogram For_Call,INIT_0188 ; Debug Table 0xd = .DEBUG 0x0176,0x02ec,0x0000,0x0000,0x000e,0x1aa4,0x0000,0x0055
0178 00bc | | Action Signal_Activated
0179 e001 | | Load 0x0,0x1 ; Debug Table 0xd.0x0 = 0x179,0x1
017a 1820 | | Execute Package,Field_Execute,Field_Number 0x20
017b 4808 |H | Short_Literal 0x8
017c 4801 |H | Short_Literal 0x1
017d 4801 |H | Short_Literal 0x1
017e 4802 |H | Short_Literal 0x2
017f 4800 |H | Short_Literal 0x0
0180 e002 | | Load 0x0,0x2
0181 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0182 0007 | | Action Break_Optional ; Debug Table 0xd.0x1 = 0x182,0x2
0183 820e | | Call 0x1,0xe ; Debug Table 0xd.0x2 = 0x183,0x3
0184 7ffe | | Jump 0x183
0185 0000 0000 | | .XXX[0x3]
0187 0000 | |
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018e | | .CONST 0x018e ; Address of begin
0189 0194 | | .CONST 0x0194 ; Address of exception handler
018a 0002 | | .CONST 0x0002 ; Number of locals
018b INIT_0188:
018b 480d |H | Short_Literal 0xd ; Debug Table 0xe = .DEBUG 0x018b,0x02f4,0x0004,0x0000,0x000e,0x1aa4,0x0000,0x009d
018c 0299 019b | | Declare_Subprogram For_Accept,INIT_0198
018e BODY_0188:
018e 4802 |H | Short_Literal 0x2 ; Debug Table 0xe.0x0 = 0x18e,0x1
018f 4802 |H | Short_Literal 0x2
0190 0099 | | Action Reference_Dynamic
0191 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0192 0137 | 7 | Execute Entry,Rendezvous
0193 4501 |E | Exit_Subprogram 0x1
0194 TRAP_0188:
0194 0007 | | Action Break_Optional
0195 4501 |E | Exit_Subprogram 0x1 ; Debug Table 0xe.0x1 = 0x195,0x2
0196 0000 0000 | | .XXX[0x2]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b | | .CONST 0x019b ; Address of begin
0199 0004 | | .CONST 0x0004 ; Address of exception handler
019a 0001 | | .CONST 0x0001 ; Number of locals
019b BODY_0198:
019b INIT_0198:
019b 029f 01a3 | | Declare_Subprogram For_Call,INIT_01a0 ; Debug Table 0xf = .DEBUG 0x019b,0x02fa,0x0003,0x0000,0x000e,0x1aa4,0x0000,0x0095
019d 8602 | | Call 0x3,0x2 ; Debug Table 0xf.0x0 = 0x19d,0x1
019e 4100 |A | End_Rendezvous 0x0
019f 0000 | | .XXX[0x1]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a3 | | .CONST 0x01a3 ; Address of begin
01a1 01af | | .CONST 0x01af ; Address of exception handler
01a2 0001 | | .CONST 0x0001 ; Number of locals
01a3 BODY_01a0:
01a3 INIT_01a0:
01a3 e7fd | | Load 0x3,-0x3 ; Debug Table 0x10 = .DEBUG 0x01a3,0x02fe,0x0004,0x0000,0x000e,0x1aa4,0x0000,0x0093
; Debug Table 0x10.0x0 = 0x1a3,0x1
01a4 6805 |h | Jump_Zero 0x1aa
01a5 e7fe | | Load 0x3,-0x2 ; Debug Table 0x10.0x1 = 0x1a5,0x2
01a6 e003 | | Load 0x0,0x3
01a7 e004 | | Load 0x0,0x4
01a8 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01a9 4501 |E | Exit_Subprogram 0x1
01aa e7fe | | Load 0x3,-0x2 ; Debug Table 0x10.0x2 = 0x1aa,0x3
01ab e005 | | Load 0x0,0x5
01ac e004 | | Load 0x0,0x4
01ad 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01ae 4501 |E | Exit_Subprogram 0x1
01af TRAP_01a0:
01af 0007 | | Action Break_Optional
01b0 4501 |E | Exit_Subprogram 0x1 ; Debug Table 0x10.0x3 = 0x1b0,0x4
01b1 0000 0000 | | .BLANK 0000[0x7]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; Debug Table
01b8 ; --------------------------------------------------------------------------------------
01b8 0003 0011 | | .CONST 0x0003,0x0011
01ba 000b 0242 | B| .DEBUG 0x000b,0x0242,0x8000,0x0000,0x000e,0x18f4,0x0000,0x0005
01c2 001e 0256 | V| .DEBUG 0x001e,0x0256,0x8000,0x0000,0x000e,0x1aa4,0x0000,0x000e
01ca 0063 027a | c z| .DEBUG 0x0063,0x027a,0x0001,0x0000,0x000e,0x18f4,0x0000,0x0006
01d2 0093 028c | | .DEBUG 0x0093,0x028c,0x0001,0x0000,0x000e,0x18f4,0x0000,0x0013
01da 00c3 029c | | .DEBUG 0x00c3,0x029c,0x0001,0x0000,0x000e,0x18f4,0x0000,0x0020
01e2 00d3 02a0 | | .DEBUG 0x00d3,0x02a0,0x0001,0x0000,0x000e,0x18f4,0x0000,0x0032
01ea 00db 02a4 | | .DEBUG 0x00db,0x02a4,0x0001,0x0000,0x000e,0x18f4,0x0000,0x003b
01f2 00eb 02aa | | .DEBUG 0x00eb,0x02aa,0x0001,0x0000,0x000e,0x18f4,0x0000,0x0043
01fa 00fb 02b0 | | .DEBUG 0x00fb,0x02b0,0x0001,0x0000,0x000e,0x18f4,0x0000,0x004b
0202 010b 02b6 | | .DEBUG 0x010b,0x02b6,0x0001,0x0000,0x000e,0x18f4,0x0000,0x0058
020a 011b 02bc | | .DEBUG 0x011b,0x02bc,0x0001,0x0000,0x000e,0x18f4,0x0000,0x005c
0212 013b 02d4 | ; | .DEBUG 0x013b,0x02d4,0x0002,0x0000,0x000e,0x1aa4,0x0000,0x01ef
021a 0173 02ea | s | .DEBUG 0x0173,0x02ea,0x0000,0x0000,0x000e,0x1aa4,0x0000,0x0044
0222 0176 02ec | v | .DEBUG 0x0176,0x02ec,0x0000,0x0000,0x000e,0x1aa4,0x0000,0x0055
022a 018b 02f4 | | .DEBUG 0x018b,0x02f4,0x0004,0x0000,0x000e,0x1aa4,0x0000,0x009d
0232 019b 02fa | | .DEBUG 0x019b,0x02fa,0x0003,0x0000,0x000e,0x1aa4,0x0000,0x0095
023a 01a3 02fe | | .DEBUG 0x01a3,0x02fe,0x0004,0x0000,0x000e,0x1aa4,0x0000,0x0093
0242 ; --------------------------------------------------------------------------------------
0242 ; Debug3 Subtable 0x0
0242 ; --------------------------------------------------------------------------------------
0242 0009 0000 | | .DBG3TAB 0x0009,0x0000
0244 000b ffff | | .CONST 0x000b,0xffff
0246 000d fffe | | .CONST 0x000d,0xfffe
0248 000f fffd | | .CONST 0x000f,0xfffd
024a 0011 fffc | | .CONST 0x0011,0xfffc
024c 0013 fffb | | .CONST 0x0013,0xfffb
024e 0015 fffa | | .CONST 0x0015,0xfffa
0250 0017 fff9 | | .CONST 0x0017,0xfff9
0252 0019 fff8 | | .CONST 0x0019,0xfff8
0254 001b fff7 | | .CONST 0x001b,0xfff7
0256 ; --------------------------------------------------------------------------------------
0256 ; Debug3 Subtable 0x1
0256 ; --------------------------------------------------------------------------------------
0256 0011 0000 | | .DBG3TAB 0x0011,0x0000
0258 001e ffff | | .CONST 0x001e,0xffff
025a 001f fffe | | .CONST 0x001f,0xfffe
025c 0020 fffd | | .CONST 0x0020,0xfffd
025e 0032 fffc | 2 | .CONST 0x0032,0xfffc
0260 0035 fffb | 5 | .CONST 0x0035,0xfffb
0262 0038 fffa | 8 | .CONST 0x0038,0xfffa
0264 003d fff9 | = | .CONST 0x003d,0xfff9
0266 0046 fff8 | F | .CONST 0x0046,0xfff8
0268 0048 fff7 | H | .CONST 0x0048,0xfff7
026a 004a fff6 | J | .CONST 0x004a,0xfff6
026c 004c fff5 | L | .CONST 0x004c,0xfff5
026e 004e fff4 | N | .CONST 0x004e,0xfff4
0270 0050 fff3 | P | .CONST 0x0050,0xfff3
0272 0052 fff2 | R | .CONST 0x0052,0xfff2
0274 0054 fff1 | T | .CONST 0x0054,0xfff1
0276 0056 fff0 | V | .CONST 0x0056,0xfff0
0278 0058 ffef | X | .CONST 0x0058,0xffef
027a ; --------------------------------------------------------------------------------------
027a ; Debug3 Subtable 0x2
027a ; --------------------------------------------------------------------------------------
027a 0000 0008 | | .DBG3TAB 0x0000,0x0008
027c 0063 0001 | c | .CONST 0x0063,0x0001
027e 0068 0002 | h | .CONST 0x0068,0x0002
0280 006b 0003 | k | .CONST 0x006b,0x0003
0282 006c 0004 | l | .CONST 0x006c,0x0004
0284 0070 0005 | p | .CONST 0x0070,0x0005
0286 007a 0006 | z | .CONST 0x007a,0x0006
0288 0085 0007 | | .CONST 0x0085,0x0007
028a 008a 0008 | | .CONST 0x008a,0x0008
028c ; --------------------------------------------------------------------------------------
028c ; Debug3 Subtable 0x3
028c ; --------------------------------------------------------------------------------------
028c 0001 0006 | | .DBG3TAB 0x0001,0x0006
028e 0093 ffff | | .CONST 0x0093,0xffff
0290 0097 0001 | | .CONST 0x0097,0x0001
0292 009b 0002 | | .CONST 0x009b,0x0002
0294 00a4 0003 | | .CONST 0x00a4,0x0003
0296 00a8 0004 | | .CONST 0x00a8,0x0004
0298 00b3 0005 | | .CONST 0x00b3,0x0005
029a 00b7 0006 | | .CONST 0x00b7,0x0006
029c ; --------------------------------------------------------------------------------------
029c ; Debug3 Subtable 0x4
029c ; --------------------------------------------------------------------------------------
029c 0000 0001 | | .DBG3TAB 0x0000,0x0001
029e 00c3 0001 | | .CONST 0x00c3,0x0001
02a0 ; --------------------------------------------------------------------------------------
02a0 ; Debug3 Subtable 0x5
02a0 ; --------------------------------------------------------------------------------------
02a0 0000 0001 | | .DBG3TAB 0x0000,0x0001
02a2 00d3 0001 | | .CONST 0x00d3,0x0001
02a4 ; --------------------------------------------------------------------------------------
02a4 ; Debug3 Subtable 0x6
02a4 ; --------------------------------------------------------------------------------------
02a4 0000 0002 | | .DBG3TAB 0x0000,0x0002
02a6 00db 0001 | | .CONST 0x00db,0x0001
02a8 00de 0002 | | .CONST 0x00de,0x0002
02aa ; --------------------------------------------------------------------------------------
02aa ; Debug3 Subtable 0x7
02aa ; --------------------------------------------------------------------------------------
02aa 0000 0002 | | .DBG3TAB 0x0000,0x0002
02ac 00eb 0001 | | .CONST 0x00eb,0x0001
02ae 00ee 0002 | | .CONST 0x00ee,0x0002
02b0 ; --------------------------------------------------------------------------------------
02b0 ; Debug3 Subtable 0x8
02b0 ; --------------------------------------------------------------------------------------
02b0 0000 0002 | | .DBG3TAB 0x0000,0x0002
02b2 00fb 0001 | | .CONST 0x00fb,0x0001
02b4 00fe 0002 | | .CONST 0x00fe,0x0002
02b6 ; --------------------------------------------------------------------------------------
02b6 ; Debug3 Subtable 0x9
02b6 ; --------------------------------------------------------------------------------------
02b6 0000 0002 | | .DBG3TAB 0x0000,0x0002
02b8 010b 0001 | | .CONST 0x010b,0x0001
02ba 010e 0002 | | .CONST 0x010e,0x0002
02bc ; --------------------------------------------------------------------------------------
02bc ; Debug3 Subtable 0xa
02bc ; --------------------------------------------------------------------------------------
02bc 0001 000a | | .DBG3TAB 0x0001,0x000a
02be 011b ffff | | .CONST 0x011b,0xffff
02c0 011c 0001 | | .CONST 0x011c,0x0001
02c2 0121 0002 | ! | .CONST 0x0121,0x0002
02c4 0122 0003 | " | .CONST 0x0122,0x0003
02c6 0124 0004 | $ | .CONST 0x0124,0x0004
02c8 0127 0005 | ' | .CONST 0x0127,0x0005
02ca 012a 0006 | * | .CONST 0x012a,0x0006
02cc 012b 0007 | + | .CONST 0x012b,0x0007
02ce 012e 0008 | . | .CONST 0x012e,0x0008
02d0 012f 0009 | / | .CONST 0x012f,0x0009
02d2 0136 000a | 6 | .CONST 0x0136,0x000a
02d4 ; --------------------------------------------------------------------------------------
02d4 ; Debug3 Subtable 0xb
02d4 ; --------------------------------------------------------------------------------------
02d4 0004 0006 | | .DBG3TAB 0x0004,0x0006
02d6 013b ffff | ; | .CONST 0x013b,0xffff
02d8 013c fffe | < | .CONST 0x013c,0xfffe
02da 0140 fffd | @ | .CONST 0x0140,0xfffd
02dc 0142 fffc | B | .CONST 0x0142,0xfffc
02de 0143 0001 | C | .CONST 0x0143,0x0001
02e0 0144 0002 | D | .CONST 0x0144,0x0002
02e2 0152 0003 | R | .CONST 0x0152,0x0003
02e4 0156 0004 | V | .CONST 0x0156,0x0004
02e6 0157 0005 | W | .CONST 0x0157,0x0005
02e8 015b 0006 | [ | .CONST 0x015b,0x0006
02ea ; --------------------------------------------------------------------------------------
02ea ; Debug3 Subtable 0xc
02ea ; --------------------------------------------------------------------------------------
02ea 0000 0000 | | .DBG3TAB 0x0000,0x0000
02ec ; --------------------------------------------------------------------------------------
02ec ; Debug3 Subtable 0xd
02ec ; --------------------------------------------------------------------------------------
02ec 0000 0003 | | .DBG3TAB 0x0000,0x0003
02ee 0179 0001 | y | .CONST 0x0179,0x0001
02f0 0182 0002 | | .CONST 0x0182,0x0002
02f2 0183 0003 | | .CONST 0x0183,0x0003
02f4 ; --------------------------------------------------------------------------------------
02f4 ; Debug3 Subtable 0xe
02f4 ; --------------------------------------------------------------------------------------
02f4 0000 0002 | | .DBG3TAB 0x0000,0x0002
02f6 018e 0001 | | .CONST 0x018e,0x0001
02f8 0195 0002 | | .CONST 0x0195,0x0002
02fa ; --------------------------------------------------------------------------------------
02fa ; Debug3 Subtable 0xf
02fa ; --------------------------------------------------------------------------------------
02fa 0000 0001 | | .DBG3TAB 0x0000,0x0001
02fc 019d 0001 | | .CONST 0x019d,0x0001
02fe ; --------------------------------------------------------------------------------------
02fe ; Debug3 Subtable 0x10
02fe ; --------------------------------------------------------------------------------------
02fe 0000 0004 | | .DBG3TAB 0x0000,0x0004
0300 01a3 0001 | | .CONST 0x01a3,0x0001
0302 01a5 0002 | | .CONST 0x01a5,0x0002
0304 01aa 0003 | | .CONST 0x01aa,0x0003
0306 01b0 0004 | | .CONST 0x01b0,0x0004
0308 0000 0000 | | .BLANK 0000[0xf8]