|
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 - download
Length: 2048 (0x800)
Types: SEG
Notes: 5805_R1K_CODE
Names: »1144850.SEG«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »1144850.SEG«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »1144850.SEG«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »1144850.SEG«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »1144850.SEG«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »1144850.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 01e8 | | .CONST 0x01e8 ; 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 0058 | X | .CONST 0x0058 ; 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 INIT_0060,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x0272,0x8000,0x0000,0x000e,0x0734,0x0000,0x0005
; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 029a 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x13,0xfffb
0015 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x15,0xfffa
0017 029a 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x17,0xfff9
0019 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x19,0xfff8
001b 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x1b,0xfff7
001d 00bf | | Action Accept_Activation
001e 4801 |H | Short_Literal 0x1 ; Debug Table 0x1 = .DEBUG 0x001e,0x0286,0x8000,0x0000,0x0010,0x1f94,0x0000,0x000d
; Debug Table 0x1.0x0 = 0x1e,0xffff
001f 4802 |H | Short_Literal 0x2
0020 00e9 | | Load_Encached String_Cache
0021 0334 | 4 | Declare_Variable Array,With_Constraint
0022 4801 |H | Short_Literal 0x1
0023 4802 |H | Short_Literal 0x2
0024 00e9 | | Load_Encached String_Cache
0025 0334 | 4 | Declare_Variable Array,With_Constraint
0026 480d |H | Short_Literal 0xd
0027 4801 |H | Short_Literal 0x1
0028 e217 | | Load 0x1,0x17
0029 01d6 | | Execute Vector,Field_Write
002a 480a |H | Short_Literal 0xa
002b 4802 |H | Short_Literal 0x2
002c e217 | | Load 0x1,0x17
002d 01d6 | | Execute Vector,Field_Write
002e e216 | | Load 0x1,0x16
002f 01d4 | | Execute Vector,Structure_Write
0030 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x1 = 0x30,0xfffe
0031 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0032 0618 | | Execute_Immediate Set_Value_Unchecked,0x18
0033 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x2 = 0x33,0xfffd
0034 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0035 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0036 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x3 = 0x36,0xfffc
0037 6148 |aH | Indirect_Literal Discrete,0x180,{0x00117812, 0x000018b0} ; 0x117812 = KERNEL_IO
0038 02a0 | | Declare_Subprogram Null_Subprogram
0039 037d | } | Declare_Type Task,Defined
003a 036f | o | Declare_Variable Task
003b e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x4 = 0x3b,0xfffb
003c e002 | | Load 0x0,0x2
003d 1d18 | | Execute_Immediate Reference_Lex_1,0x18
003e e003 | | Load 0x0,0x3
003f 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0040 4805 |H | Short_Literal 0x5
0041 e219 | | Load 0x1,0x19
0042 020e | | Execute Module,Augment_Imports
0043 0007 | | Action Break_Optional
0044 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x5 = 0x44,0xfffa
0045 00c7 | | Action Elaborate_Subprogram
0046 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x6 = 0x46,0xfff9
0047 00c7 | | Action Elaborate_Subprogram
0048 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x7 = 0x48,0xfff8
0049 00c7 | | Action Elaborate_Subprogram
004a 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x8 = 0x4a,0xfff7
004b 00c7 | | Action Elaborate_Subprogram
004c 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x9 = 0x4c,0xfff6
004d 00c7 | | Action Elaborate_Subprogram
004e 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0xa = 0x4e,0xfff5
004f 00c7 | | Action Elaborate_Subprogram
0050 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0xb = 0x50,0xfff4
0051 00c7 | | Action Elaborate_Subprogram
0052 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0xc = 0x52,0xfff3
0053 00c7 | | Action Elaborate_Subprogram
0054 029d 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call ; Debug Table 0x1.0xd = 0x54,0xfff2
0056 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0xe = 0x56,0xfff1
0057 00c7 | | Action Elaborate_Subprogram
0058 BODY_0008:
0058 00be | | Action Activate_Tasks
0059 00bc | | Action Signal_Activated
005a 00bb | | Action Signal_Completion
005b 0000 0000 | | .BLANK 0000[0x5]
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 e004 | | Load 0x0,0x4 ; Debug Table 0x2 = .DEBUG 0x0063,0x02a6,0x0001,0x0000,0x000e,0x0734,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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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,0x02b8,0x0001,0x0000,0x000e,0x0734,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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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,0x02c8,0x0001,0x0000,0x000e,0x0734,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 e005 | | Load 0x0,0x5
00c9 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00ca 820d | | Call 0x1,0xd
00cb 4504 |E | Exit_Suprogram New_Top_Offset 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,0x02cc,0x0001,0x0000,0x000e,0x0734,0x0000,0x0032
; Debug Table 0x5.0x0 = 0xd3,0x1
00d4 e216 | | Load 0x1,0x16
00d5 820d | | Call 0x1,0xd
00d6 4502 |E | Exit_Suprogram New_Top_Offset 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 e004 | | Load 0x0,0x4 ; Debug Table 0x6 = .DEBUG 0x00db,0x02d0,0x0001,0x0000,0x000e,0x0734,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_Suprogram New_Top_Offset 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 e004 | | Load 0x0,0x4 ; Debug Table 0x7 = .DEBUG 0x00eb,0x02d6,0x0001,0x0000,0x000e,0x0734,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_Suprogram New_Top_Offset 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 e004 | | Load 0x0,0x4 ; Debug Table 0x8 = .DEBUG 0x00fb,0x02dc,0x0001,0x0000,0x000e,0x0734,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_Suprogram New_Top_Offset 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 e004 | | Load 0x0,0x4 ; Debug Table 0x9 = .DEBUG 0x010b,0x02e2,0x0001,0x0000,0x000e,0x0734,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_Suprogram New_Top_Offset 0x1
0111 0000 0000 | | .BLANK 0000[0x7]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011e | | .CONST 0x011e ; Address of begin
0119 0145 | E | .CONST 0x0145 ; Address of exception handler
011a 0003 | | .CONST 0x0003 ; Number of locals
011b INIT_0118:
011b 00e8 | | Load_Encached Character_Cache ; Debug Table 0xa = .DEBUG 0x011b,0x02e8,0x0001,0x0000,0x000e,0x0734,0x0000,0x005c
; Debug Table 0xa.0x0 = 0x11b,0xffff
011c e001 | | Load 0x0,0x1 ; Debug Table 0xa.0x1 = 0x11c,0xfffe
011d 1b12 | | Execute Package,Field_Read,Field_Number 0x12
011e BODY_0118:
011e e001 | | Load 0x0,0x1 ; Debug Table 0xa.0x2 = 0x11e,0x1
011f 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0120 e002 | | Load 0x0,0x2
0121 180e | | Execute Package,Field_Execute,Field_Number 0xe
0122 4801 |H | Short_Literal 0x1
0123 e217 | | Load 0x1,0x17
0124 e003 | | Load 0x0,0x3
0125 180e | | Execute Package,Field_Execute,Field_Number 0xe
0126 c403 | | Store 0x2,0x3
0127 e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0x3 = 0x127,0x2
0128 00ea | | Load_Encached Null_String_Cache
0129 e006 | | Load 0x0,0x6
012a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
012b 00d1 | | Pop_Control Pop_Count_1
012c 0007 | | Action Break_Optional ; Debug Table 0xa.0x4 = 0x12c,0x3
012d 821a | | Call 0x1,0x1a ; Debug Table 0xa.0x5 = 0x12d,0x4
012e a402 | | Store_Unchecked 0x2,0x2
012f 4800 |H | Short_Literal 0x0 ; Debug Table 0xa.0x6 = 0x12f,0x5
0130 e402 | | Load 0x2,0x2
0131 820e | | Call 0x1,0xe
0132 e402 | | Load 0x2,0x2 ; Debug Table 0xa.0x7 = 0x132,0x6
0133 0f0d | | Execute_Immediate Equal,0xd
0134 6801 |h | Jump_Zero 0x136
0135 780a |x | Jump 0x140 ; Debug Table 0xa.0x8 = 0x135,0x7
0136 e402 | | Load 0x2,0x2 ; Debug Table 0xa.0x9 = 0x136,0x8
0137 0f0a | | Execute_Immediate Equal,0xa
0138 6801 |h | Jump_Zero 0x13a
0139 7806 |x | Jump 0x140 ; Debug Table 0xa.0xa = 0x139,0x9
013a e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0xb = 0x13a,0xa
013b e402 | | Load 0x2,0x2
013c e006 | | Load 0x0,0x6
013d 1819 | | Execute Package,Field_Execute,Field_Number 0x19
013e 00d1 | | Pop_Control Pop_Count_1
013f 7fed | | Jump 0x12d
0140 4801 |H | Short_Literal 0x1 ; Debug Table 0xa.0xc = 0x140,0xb
0141 e217 | | Load 0x1,0x17
0142 e003 | | Load 0x0,0x3
0143 180f | | Execute Package,Field_Execute,Field_Number 0xf
0144 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0145 TRAP_0118:
0145 0007 | | Action Break_Optional
0146 4801 |H | Short_Literal 0x1 ; Debug Table 0xa.0xd = 0x146,0xc
0147 e217 | | Load 0x1,0x17
0148 e003 | | Load 0x0,0x3
0149 180f | | Execute Package,Field_Execute,Field_Number 0xf
014a e404 | | Load 0x2,0x4 ; Debug Table 0xa.0xe = 0x14a,0xd
014b 0101 | | Execute Exception,Reraise
014c 0000 0000 | | .BLANK 0000[0x4]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 015b | [ | .CONST 0x015b ; Address of begin
0151 0004 | | .CONST 0x0004 ; Address of exception handler
0152 0005 | | .CONST 0x0005 ; Number of locals
0153 INIT_0150:
0153 00e8 | | Load_Encached Character_Cache ; Debug Table 0xb = .DEBUG 0x0153,0x0308,0x0002,0x0000,0x0010,0x1f94,0x0000,0x0208
; Debug Table 0xb.0x0 = 0x153,0xffff
0154 4801 |H | Short_Literal 0x1 ; Debug Table 0xb.0x1 = 0x154,0xfffe
0155 4801 |H | Short_Literal 0x1
0156 00e9 | | Load_Encached String_Cache
0157 0334 | 4 | Declare_Variable Array,With_Constraint
0158 e001 | | Load 0x0,0x1 ; Debug Table 0xb.0x2 = 0x158,0xfffd
0159 1b15 | | Execute Package,Field_Read,Field_Number 0x15
015a 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xb.0x3 = 0x15a,0xfffc
015b BODY_0150:
015b 0007 | | Action Break_Optional ; Debug Table 0xb.0x4 = 0x15b,0x1
015c e403 | | Load 0x2,0x3 ; Debug Table 0xb.0x5 = 0x15c,0x2
015d 00e3 | | Load_Encached Natural_Cache
015e e001 | | Load 0x0,0x1
015f 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0160 581b |X | Indirect_Literal Float,0x17c,4294967296.0
0161 5816 |X | Indirect_Literal Float,0x178,3.0517578125e-05
0162 023a | : | Execute Float,Divide
0163 0236 | 6 | Execute Float,Truncate_To_Discrete
0164 e217 | | Load 0x1,0x17
0165 e003 | | Load 0x0,0x3
0166 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0167 c404 | | Store 0x2,0x4
0168 c405 | | Store 0x2,0x5
0169 00d1 | | Pop_Control Pop_Count_1
016a e404 | | Load 0x2,0x4 ; Debug Table 0xb.0x6 = 0x16a,0x3
016b 77f0 |w | Jump_Nonzero 0x15c
016c e405 | | Load 0x2,0x5
016d 6fee |o | Jump_Zero 0x15c
016e 7800 |x | Jump 0x16f ; Debug Table 0xb.0x7 = 0x16e,0x4
016f 4801 |H | Short_Literal 0x1 ; Debug Table 0xb.0x8 = 0x16f,0x5
0170 e403 | | Load 0x2,0x3
0171 01d7 | | Execute Vector,Field_Read
0172 a402 | | Store_Unchecked 0x2,0x2
0173 e402 | | Load 0x2,0x2 ; Debug Table 0xb.0x9 = 0x173,0x6
0174 00ca | | Action Exit_Nullary_Function
0175 0000 0000 | | .XXX[0x3]
0177 0000 | |
0178 3f00 0000 |? | .DBL 3.0517578125e-05
017a 0000 0000 | |
017c 41f0 0000 |A | .DBL 4294967296.0
017e 0000 0000 | |
0180 0011 7812 | x | .LITERAL {0x00117812, 0x000018b0}
0184 0000 0000 | | .BLANK 0000[0x4]
0188 0193 0004 | | .XXX[0x3]
018a 000f | |
018b 4802 |H | Short_Literal 0x2 ; Debug Table 0xc = .DEBUG 0x018b,0x031e,0x0000,0x0000,0x0010,0x1f94,0x0000,0x003c
018c 02cb | | Declare_Variable Entry
018d 00bf | | Action Accept_Activation
018e e001 | | Load 0x0,0x1 ; Debug Table 0xd = .DEBUG 0x018e,0x0320,0x0000,0x0000,0x0010,0x1f94,0x0000,0x004d
; Debug Table 0xd.0x0 = 0x18e,0xffff
018f 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0190 029f 01a3 | | Declare_Subprogram INIT_01a0,For_Call
0192 00bc | | Action Signal_Activated
0193 4802 |H | Short_Literal 0x2 ; Debug Table 0xd.0x1 = 0x193,0x1
0194 e002 | | Load 0x0,0x2
0195 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0196 0007 | | Action Break_Optional ; Debug Table 0xd.0x2 = 0x196,0x2
0197 820f | | Call 0x1,0xf ; Debug Table 0xd.0x3 = 0x197,0x3
0198 7ffe | | Jump 0x197
0199 0000 0000 | | .BLANK 0000[0x7]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a6 | | .CONST 0x01a6 ; Address of begin
01a1 01ac | | .CONST 0x01ac ; Address of exception handler
01a2 0002 | | .CONST 0x0002 ; Number of locals
01a3 INIT_01a0:
01a3 480d |H | Short_Literal 0xd ; Debug Table 0xe = .DEBUG 0x01a3,0x032a,0x0004,0x0000,0x0010,0x1f94,0x0000,0x00b6
01a4 0299 01b3 | | Declare_Subprogram INIT_01b0,For_Accept
01a6 BODY_01a0:
01a6 4802 |H | Short_Literal 0x2 ; Debug Table 0xe.0x0 = 0x1a6,0x1
01a7 4802 |H | Short_Literal 0x2
01a8 0099 | | Action Reference_Dynamic
01a9 1d0d | | Execute_Immediate Reference_Lex_1,0xd
01aa 0137 | 7 | Execute Entry,Rendezvous
01ab 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01ac TRAP_01a0:
01ac 0007 | | Action Break_Optional
01ad 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0xe.0x1 = 0x1ad,0x2
01ae 0000 0000 | | .XXX[0x2]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b3 | | .CONST 0x01b3 ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 0001 | | .CONST 0x0001 ; Number of locals
01b3 BODY_01b0:
01b3 INIT_01b0:
01b3 029f 01bb | | Declare_Subprogram INIT_01b8,For_Call ; Debug Table 0xf = .DEBUG 0x01b3,0x0330,0x0003,0x0000,0x0010,0x1f94,0x0000,0x00ae
01b5 8602 | | Call 0x3,0x2 ; Debug Table 0xf.0x0 = 0x1b5,0x1
01b6 4100 |A | End_Rendezvous 0x0
01b7 0000 | | .XXX[0x1]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bb | | .CONST 0x01bb ; Address of begin
01b9 01c7 | | .CONST 0x01c7 ; Address of exception handler
01ba 0001 | | .CONST 0x0001 ; Number of locals
01bb BODY_01b8:
01bb INIT_01b8:
01bb e7fd | | Load 0x3,-0x3 ; Debug Table 0x10 = .DEBUG 0x01bb,0x0334,0x0004,0x0000,0x0010,0x1f94,0x0000,0x00ac
; Debug Table 0x10.0x0 = 0x1bb,0x1
01bc 6805 |h | Jump_Zero 0x1c2
01bd e7fe | | Load 0x3,-0x2 ; Debug Table 0x10.0x1 = 0x1bd,0x2
01be e003 | | Load 0x0,0x3
01bf e004 | | Load 0x0,0x4
01c0 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01c1 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01c2 e7fe | | Load 0x3,-0x2 ; Debug Table 0x10.0x2 = 0x1c2,0x3
01c3 e005 | | Load 0x0,0x5
01c4 e004 | | Load 0x0,0x4
01c5 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01c6 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01c7 TRAP_01b8:
01c7 e001 | | Load 0x0,0x1
01c8 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01c9 010f | | Execute Exception,Equal
01ca 6815 |h | Jump_Zero 0x1e0
01cb e001 | | Load 0x0,0x1 ; Debug Table 0x10.0x3 = 0x1cb,0x4
01cc 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01cd e002 | | Load 0x0,0x2
01ce 180e | | Execute Package,Field_Execute,Field_Number 0xe
01cf 4800 |H | Short_Literal 0x0
01d0 e005 | | Load 0x0,0x5
01d1 e004 | | Load 0x0,0x4
01d2 180e | | Execute Package,Field_Execute,Field_Number 0xe
01d3 c20e | | Store 0x1,0xe
01d4 e7fd | | Load 0x3,-0x3 ; Debug Table 0x10.0x4 = 0x1d4,0x5
01d5 6805 |h | Jump_Zero 0x1db
01d6 e7fe | | Load 0x3,-0x2 ; Debug Table 0x10.0x5 = 0x1d6,0x6
01d7 e003 | | Load 0x0,0x3
01d8 e004 | | Load 0x0,0x4
01d9 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01da 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01db e7fe | | Load 0x3,-0x2 ; Debug Table 0x10.0x6 = 0x1db,0x7
01dc e005 | | Load 0x0,0x5
01dd e004 | | Load 0x0,0x4
01de 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01df 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01e0 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x10.0x7 = 0x1e0,0x8
01e1 0000 0000 | | .BLANK 0000[0x7]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; Debug Table
01e8 ; --------------------------------------------------------------------------------------
01e8 0003 0011 | | .CONST 0x0003,0x0011
01ea 000b 0272 | r| .DEBUG 0x000b,0x0272,0x8000,0x0000,0x000e,0x0734,0x0000,0x0005
01f2 001e 0286 | | .DEBUG 0x001e,0x0286,0x8000,0x0000,0x0010,0x1f94,0x0000,0x000d
01fa 0063 02a6 | c | .DEBUG 0x0063,0x02a6,0x0001,0x0000,0x000e,0x0734,0x0000,0x0006
0202 0093 02b8 | | .DEBUG 0x0093,0x02b8,0x0001,0x0000,0x000e,0x0734,0x0000,0x0013
020a 00c3 02c8 | | .DEBUG 0x00c3,0x02c8,0x0001,0x0000,0x000e,0x0734,0x0000,0x0020
0212 00d3 02cc | | .DEBUG 0x00d3,0x02cc,0x0001,0x0000,0x000e,0x0734,0x0000,0x0032
021a 00db 02d0 | | .DEBUG 0x00db,0x02d0,0x0001,0x0000,0x000e,0x0734,0x0000,0x003b
0222 00eb 02d6 | | .DEBUG 0x00eb,0x02d6,0x0001,0x0000,0x000e,0x0734,0x0000,0x0043
022a 00fb 02dc | | .DEBUG 0x00fb,0x02dc,0x0001,0x0000,0x000e,0x0734,0x0000,0x004b
0232 010b 02e2 | | .DEBUG 0x010b,0x02e2,0x0001,0x0000,0x000e,0x0734,0x0000,0x0058
023a 011b 02e8 | | .DEBUG 0x011b,0x02e8,0x0001,0x0000,0x000e,0x0734,0x0000,0x005c
0242 0153 0308 | S | .DEBUG 0x0153,0x0308,0x0002,0x0000,0x0010,0x1f94,0x0000,0x0208
024a 018b 031e | | .DEBUG 0x018b,0x031e,0x0000,0x0000,0x0010,0x1f94,0x0000,0x003c
0252 018e 0320 | | .DEBUG 0x018e,0x0320,0x0000,0x0000,0x0010,0x1f94,0x0000,0x004d
025a 01a3 032a | *| .DEBUG 0x01a3,0x032a,0x0004,0x0000,0x0010,0x1f94,0x0000,0x00b6
0262 01b3 0330 | 0| .DEBUG 0x01b3,0x0330,0x0003,0x0000,0x0010,0x1f94,0x0000,0x00ae
026a 01bb 0334 | 4| .DEBUG 0x01bb,0x0334,0x0004,0x0000,0x0010,0x1f94,0x0000,0x00ac
0272 ; --------------------------------------------------------------------------------------
0272 ; Debug3 Subtable 0x0
0272 ; --------------------------------------------------------------------------------------
0272 0009 0000 | | .DBG3TAB 0x0009,0x0000
0274 000b ffff | | .CONST 0x000b,0xffff
0276 000d fffe | | .CONST 0x000d,0xfffe
0278 000f fffd | | .CONST 0x000f,0xfffd
027a 0011 fffc | | .CONST 0x0011,0xfffc
027c 0013 fffb | | .CONST 0x0013,0xfffb
027e 0015 fffa | | .CONST 0x0015,0xfffa
0280 0017 fff9 | | .CONST 0x0017,0xfff9
0282 0019 fff8 | | .CONST 0x0019,0xfff8
0284 001b fff7 | | .CONST 0x001b,0xfff7
0286 ; --------------------------------------------------------------------------------------
0286 ; Debug3 Subtable 0x1
0286 ; --------------------------------------------------------------------------------------
0286 000f 0000 | | .DBG3TAB 0x000f,0x0000
0288 001e ffff | | .CONST 0x001e,0xffff
028a 0030 fffe | 0 | .CONST 0x0030,0xfffe
028c 0033 fffd | 3 | .CONST 0x0033,0xfffd
028e 0036 fffc | 6 | .CONST 0x0036,0xfffc
0290 003b fffb | ; | .CONST 0x003b,0xfffb
0292 0044 fffa | D | .CONST 0x0044,0xfffa
0294 0046 fff9 | F | .CONST 0x0046,0xfff9
0296 0048 fff8 | H | .CONST 0x0048,0xfff8
0298 004a fff7 | J | .CONST 0x004a,0xfff7
029a 004c fff6 | L | .CONST 0x004c,0xfff6
029c 004e fff5 | N | .CONST 0x004e,0xfff5
029e 0050 fff4 | P | .CONST 0x0050,0xfff4
02a0 0052 fff3 | R | .CONST 0x0052,0xfff3
02a2 0054 fff2 | T | .CONST 0x0054,0xfff2
02a4 0056 fff1 | V | .CONST 0x0056,0xfff1
02a6 ; --------------------------------------------------------------------------------------
02a6 ; Debug3 Subtable 0x2
02a6 ; --------------------------------------------------------------------------------------
02a6 0000 0008 | | .DBG3TAB 0x0000,0x0008
02a8 0063 0001 | c | .CONST 0x0063,0x0001
02aa 0068 0002 | h | .CONST 0x0068,0x0002
02ac 006b 0003 | k | .CONST 0x006b,0x0003
02ae 006c 0004 | l | .CONST 0x006c,0x0004
02b0 0070 0005 | p | .CONST 0x0070,0x0005
02b2 007a 0006 | z | .CONST 0x007a,0x0006
02b4 0085 0007 | | .CONST 0x0085,0x0007
02b6 008a 0008 | | .CONST 0x008a,0x0008
02b8 ; --------------------------------------------------------------------------------------
02b8 ; Debug3 Subtable 0x3
02b8 ; --------------------------------------------------------------------------------------
02b8 0001 0006 | | .DBG3TAB 0x0001,0x0006
02ba 0093 ffff | | .CONST 0x0093,0xffff
02bc 0097 0001 | | .CONST 0x0097,0x0001
02be 009b 0002 | | .CONST 0x009b,0x0002
02c0 00a4 0003 | | .CONST 0x00a4,0x0003
02c2 00a8 0004 | | .CONST 0x00a8,0x0004
02c4 00b3 0005 | | .CONST 0x00b3,0x0005
02c6 00b7 0006 | | .CONST 0x00b7,0x0006
02c8 ; --------------------------------------------------------------------------------------
02c8 ; Debug3 Subtable 0x4
02c8 ; --------------------------------------------------------------------------------------
02c8 0000 0001 | | .DBG3TAB 0x0000,0x0001
02ca 00c3 0001 | | .CONST 0x00c3,0x0001
02cc ; --------------------------------------------------------------------------------------
02cc ; Debug3 Subtable 0x5
02cc ; --------------------------------------------------------------------------------------
02cc 0000 0001 | | .DBG3TAB 0x0000,0x0001
02ce 00d3 0001 | | .CONST 0x00d3,0x0001
02d0 ; --------------------------------------------------------------------------------------
02d0 ; Debug3 Subtable 0x6
02d0 ; --------------------------------------------------------------------------------------
02d0 0000 0002 | | .DBG3TAB 0x0000,0x0002
02d2 00db 0001 | | .CONST 0x00db,0x0001
02d4 00de 0002 | | .CONST 0x00de,0x0002
02d6 ; --------------------------------------------------------------------------------------
02d6 ; Debug3 Subtable 0x7
02d6 ; --------------------------------------------------------------------------------------
02d6 0000 0002 | | .DBG3TAB 0x0000,0x0002
02d8 00eb 0001 | | .CONST 0x00eb,0x0001
02da 00ee 0002 | | .CONST 0x00ee,0x0002
02dc ; --------------------------------------------------------------------------------------
02dc ; Debug3 Subtable 0x8
02dc ; --------------------------------------------------------------------------------------
02dc 0000 0002 | | .DBG3TAB 0x0000,0x0002
02de 00fb 0001 | | .CONST 0x00fb,0x0001
02e0 00fe 0002 | | .CONST 0x00fe,0x0002
02e2 ; --------------------------------------------------------------------------------------
02e2 ; Debug3 Subtable 0x9
02e2 ; --------------------------------------------------------------------------------------
02e2 0000 0002 | | .DBG3TAB 0x0000,0x0002
02e4 010b 0001 | | .CONST 0x010b,0x0001
02e6 010e 0002 | | .CONST 0x010e,0x0002
02e8 ; --------------------------------------------------------------------------------------
02e8 ; Debug3 Subtable 0xa
02e8 ; --------------------------------------------------------------------------------------
02e8 0002 000d | | .DBG3TAB 0x0002,0x000d
02ea 011b ffff | | .CONST 0x011b,0xffff
02ec 011c fffe | | .CONST 0x011c,0xfffe
02ee 011e 0001 | | .CONST 0x011e,0x0001
02f0 0127 0002 | ' | .CONST 0x0127,0x0002
02f2 012c 0003 | , | .CONST 0x012c,0x0003
02f4 012d 0004 | - | .CONST 0x012d,0x0004
02f6 012f 0005 | / | .CONST 0x012f,0x0005
02f8 0132 0006 | 2 | .CONST 0x0132,0x0006
02fa 0135 0007 | 5 | .CONST 0x0135,0x0007
02fc 0136 0008 | 6 | .CONST 0x0136,0x0008
02fe 0139 0009 | 9 | .CONST 0x0139,0x0009
0300 013a 000a | : | .CONST 0x013a,0x000a
0302 0140 000b | @ | .CONST 0x0140,0x000b
0304 0146 000c | F | .CONST 0x0146,0x000c
0306 014a 000d | J | .CONST 0x014a,0x000d
0308 ; --------------------------------------------------------------------------------------
0308 ; Debug3 Subtable 0xb
0308 ; --------------------------------------------------------------------------------------
0308 0004 0006 | | .DBG3TAB 0x0004,0x0006
030a 0153 ffff | S | .CONST 0x0153,0xffff
030c 0154 fffe | T | .CONST 0x0154,0xfffe
030e 0158 fffd | X | .CONST 0x0158,0xfffd
0310 015a fffc | Z | .CONST 0x015a,0xfffc
0312 015b 0001 | [ | .CONST 0x015b,0x0001
0314 015c 0002 | \ | .CONST 0x015c,0x0002
0316 016a 0003 | j | .CONST 0x016a,0x0003
0318 016e 0004 | n | .CONST 0x016e,0x0004
031a 016f 0005 | o | .CONST 0x016f,0x0005
031c 0173 0006 | s | .CONST 0x0173,0x0006
031e ; --------------------------------------------------------------------------------------
031e ; Debug3 Subtable 0xc
031e ; --------------------------------------------------------------------------------------
031e 0000 0000 | | .DBG3TAB 0x0000,0x0000
0320 ; --------------------------------------------------------------------------------------
0320 ; Debug3 Subtable 0xd
0320 ; --------------------------------------------------------------------------------------
0320 0001 0003 | | .DBG3TAB 0x0001,0x0003
0322 018e ffff | | .CONST 0x018e,0xffff
0324 0193 0001 | | .CONST 0x0193,0x0001
0326 0196 0002 | | .CONST 0x0196,0x0002
0328 0197 0003 | | .CONST 0x0197,0x0003
032a ; --------------------------------------------------------------------------------------
032a ; Debug3 Subtable 0xe
032a ; --------------------------------------------------------------------------------------
032a 0000 0002 | | .DBG3TAB 0x0000,0x0002
032c 01a6 0001 | | .CONST 0x01a6,0x0001
032e 01ad 0002 | | .CONST 0x01ad,0x0002
0330 ; --------------------------------------------------------------------------------------
0330 ; Debug3 Subtable 0xf
0330 ; --------------------------------------------------------------------------------------
0330 0000 0001 | | .DBG3TAB 0x0000,0x0001
0332 01b5 0001 | | .CONST 0x01b5,0x0001
0334 ; --------------------------------------------------------------------------------------
0334 ; Debug3 Subtable 0x10
0334 ; --------------------------------------------------------------------------------------
0334 0000 0008 | | .DBG3TAB 0x0000,0x0008
0336 01bb 0001 | | .CONST 0x01bb,0x0001
0338 01bd 0002 | | .CONST 0x01bd,0x0002
033a 01c2 0003 | | .CONST 0x01c2,0x0003
033c 01cb 0004 | | .CONST 0x01cb,0x0004
033e 01d4 0005 | | .CONST 0x01d4,0x0005
0340 01d6 0006 | | .CONST 0x01d6,0x0006
0342 01db 0007 | | .CONST 0x01db,0x0007
0344 01e0 0008 | | .CONST 0x01e0,0x0008
0346 0000 0000 | | .BLANK 0000[0xba]