|
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: 5811_R1K_CODE
Names: »118803.SEG«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »118803.SEG«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »118803.SEG«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »118803.SEG«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »118803.SEG«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »118803.SEG«
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 01a0 | | .CONST 0x01a0 ; 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 0070 | p | .CONST 0x0070 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0029 | ) | .CONST 0x0029 ; Number of locals
000b INIT_0008:
000b 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible ; Debug Table 0x0 = .DEBUG 0x000b,0x0232,0xc000,0x0000,0x0036,0x07b4,0x0000,0x0009
; Debug Table 0x0.0x0 = 0xb,0xffff
; Debug Table 0x0.0x1 = 0xb,0xfffe
; Debug Table 0x0.0x2 = 0xb,0xfffd
000c 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0xc,0xfffc
000e 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0xe,0xfffb
0010 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x10,0xfffa
0012 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x12,0xfff9
0014 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x14,0xfff8
0016 029a 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x16,0xfff7
0018 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x18,0xfff6
001a 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xa = 0x1a,0xfff5
001c 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible ; Debug Table 0x0.0xb = 0x1c,0xfff4
001d 029a 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xc = 0x1d,0xfff3
001f 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xd = 0x1f,0xfff2
0021 029a 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xe = 0x21,0xfff1
0023 029a 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xf = 0x23,0xfff0
0025 00c4 | | Action Make_Default ; Debug Table 0x0.0x10 = 0x25,0xffef
0026 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x11 = 0x26,0xffee
0028 029b 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Unelaborated ; Debug Table 0x0.0x12 = 0x28,0xffed
; Debug Table 0x0.0x13 = 0x28,0xffec
; Debug Table 0x0.0x14 = 0x28,0xffeb
; Debug Table 0x0.0x15 = 0x28,0xffea
; Debug Table 0x0.0x16 = 0x28,0xffe9
; Debug Table 0x0.0x17 = 0x28,0xffe8
; Debug Table 0x0.0x18 = 0x28,0xffe7
; Debug Table 0x0.0x19 = 0x28,0xffe6
; Debug Table 0x0.0x1a = 0x28,0xffe5
002a 6171 |aq | Indirect_Literal Discrete,0x19c,{0x00000000, 0x003607b4} ; Debug Table 0x0.0x1b = 0x2a,0xffe4
002b 4912 |I | Short_Literal 0x112
002c e210 | | Load 0x1,0x10
002d e211 | | Load 0x1,0x11
002e 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
002f 4837 |H7 | Short_Literal 0x37
0030 4806 |H | Short_Literal 0x6
0031 4871 |Hq | Short_Literal 0x71
0032 e001 | | Load 0x0,0x1
0033 0387 | | Declare_Variable Package
0034 00d8 | | Load_Top At_Offset_0
0035 020f | | Execute Module,Activate
0036 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x1c = 0x36,0xffe3
0037 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0038 e215 | | Load 0x1,0x15
0039 03a2 | | Complete_Type Heap_Access,By_Renaming
003a 4803 |H | Short_Literal 0x3 ; Debug Table 0x0.0x1d = 0x3a,0xffe2
003b 032a | * | Declare_Type Record,Incomplete
003c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x1e = 0x3c,0xffe1
003d 02a0 | | Declare_Subprogram Null_Subprogram
003e e21e | | Load 0x1,0x1e
003f 03a3 | | Complete_Type Heap_Access,By_Defining
0040 e215 | | Load 0x1,0x15 ; Debug Table 0x0.0x1f = 0x40,0xffe0
; Debug Table 0x0.0x20 = 0x40,0xffdf
0041 0129 | ) | Execute Any,Make_Visible
0042 c223 | # | Store 0x1,0x23
0043 00bf | | Action Accept_Activation
0044 03a5 | | Declare_Type Heap_Access,Indirect_Literal,Values_Relative ; Debug Table 0x1 = .DEBUG 0x0044,0x0276,0xc000,0x0000,0x0036,0x07c4,0x0000,0x0003
; Debug Table 0x1.0x0 = 0x44,0xffff
0045 e21e | | Load 0x1,0x1e
0046 00d9 | | Load_Top At_Offset_1
0047 03a2 | | Complete_Type Heap_Access,By_Renaming
0048 e210 | | Load 0x1,0x10 ; Debug Table 0x1.0x1 = 0x48,0xfffe
; Debug Table 0x1.0x2 = 0x48,0xfffd
0049 e211 | | Load 0x1,0x11
004a 00da | | Load_Top At_Offset_2
004b 029f 0163 | c| Declare_Subprogram INIT_0160,For_Call
004d e227 | ' | Load 0x1,0x27
004e 0326 | & | Complete_Type Record,By_Defining
004f 4871 |Hq | Short_Literal 0x71 ; Debug Table 0x1.0x3 = 0x4f,0xfffc
0050 e210 | | Load 0x1,0x10
0051 025b | [ | Execute Discrete,Check_In_Type
0052 e210 | | Load 0x1,0x10
0053 03f1 | | Declare_Variable Discrete,With_Value
0054 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 ; Debug Table 0x1.0x4 = 0x54,0xfffb
0055 00c7 | | Action Elaborate_Subprogram
0056 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x5 = 0x56,0xfffa
0057 00c7 | | Action Elaborate_Subprogram
0058 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x6 = 0x58,0xfff9
0059 00c7 | | Action Elaborate_Subprogram
005a 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0x7 = 0x5a,0xfff8
005b 00c7 | | Action Elaborate_Subprogram
005c 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0x8 = 0x5c,0xfff7
005d 00c7 | | Action Elaborate_Subprogram
005e 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0x9 = 0x5e,0xfff6
005f 00c7 | | Action Elaborate_Subprogram
0060 1d1b | | Execute_Immediate Reference_Lex_1,0x1b ; Debug Table 0x1.0xa = 0x60,0xfff5
0061 00c7 | | Action Elaborate_Subprogram
0062 1d1c | | Execute_Immediate Reference_Lex_1,0x1c ; Debug Table 0x1.0xb = 0x62,0xfff4
0063 00c7 | | Action Elaborate_Subprogram
0064 1d1d | | Execute_Immediate Reference_Lex_1,0x1d ; Debug Table 0x1.0xc = 0x64,0xfff3
0065 00c7 | | Action Elaborate_Subprogram
0066 1d1f | | Execute_Immediate Reference_Lex_1,0x1f ; Debug Table 0x1.0xd = 0x66,0xfff2
0067 00c7 | | Action Elaborate_Subprogram
0068 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 ; Debug Table 0x1.0xe = 0x68,0xfff1
0069 00c7 | | Action Elaborate_Subprogram
006a 1d20 | | Execute_Immediate Reference_Lex_1,0x20 ; Debug Table 0x1.0xf = 0x6a,0xfff0
006b 00c7 | | Action Elaborate_Subprogram
006c 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 ; Debug Table 0x1.0x10 = 0x6c,0xffef
006d 00c7 | | Action Elaborate_Subprogram
006e 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 ; Debug Table 0x1.0x11 = 0x6e,0xffee
006f 00c7 | | Action Elaborate_Subprogram
0070 BODY_0008:
0070 00bc | | Action Signal_Activated
0071 00bb | | Action Signal_Completion
0072 0000 0000 | | .BLANK 0000[0x6]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007b | { | .CONST 0x007b ; Address of begin
0079 0004 | | .CONST 0x0004 ; Address of exception handler
007a 0001 | | .CONST 0x0001 ; Number of locals
007b BODY_0078:
007b INIT_0078:
007b e215 | | Load 0x1,0x15 ; Debug Table 0x2 = .DEBUG 0x007b,0x029c,0x1001,0x0000,0x0036,0x07b4,0x0000,0x0053
; Debug Table 0x2.0x0 = 0x7b,0x1
007c 00db | | Load_Top At_Offset_3
007d 039c | | Declare_Variable Heap_Access,By_Allocation
007e 00d8 | | Load_Top At_Offset_0
007f 0217 | | Execute Heap_Access,All_Reference
0080 1c00 | | Execute_Immediate Run_Utility,0x0
0081 a5fe | | Store_Unchecked 0x2,-0x2
0082 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x2.0x1 = 0x82,0x2
0083 0000 0000 | | .BLANK 0000[0x5]
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 00da | | Load_Top At_Offset_2 ; Debug Table 0x3 = .DEBUG 0x008b,0x02a2,0x1002,0x0000,0x0036,0x07b4,0x0000,0x0061
; Debug Table 0x3.0x0 = 0x8b,0x1
008c 0217 | | Execute Heap_Access,All_Reference
008d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
008e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
008f 0000 | | .XXX[0x1]
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 00da | | Load_Top At_Offset_2 ; Debug Table 0x4 = .DEBUG 0x0093,0x02a6,0x1002,0x0000,0x0036,0x07b4,0x0000,0x006a
; Debug Table 0x4.0x0 = 0x93,0x1
0094 0217 | | Execute Heap_Access,All_Reference
0095 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0096 0f00 | | Execute_Immediate Equal,0x0
0097 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009b | | .CONST 0x009b ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0001 | | .CONST 0x0001 ; Number of locals
009b BODY_0098:
009b INIT_0098:
009b 00da | | Load_Top At_Offset_2 ; Debug Table 0x5 = .DEBUG 0x009b,0x02aa,0x1001,0x0000,0x0036,0x07b4,0x0000,0x0073
; Debug Table 0x5.0x0 = 0x9b,0x1
009c 0219 | | Execute Heap_Access,All_Read
009d e226 | & | Load 0x1,0x26
009e 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
009f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a3 | | .CONST 0x00a3 ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0001 | | .CONST 0x0001 ; Number of locals
00a3 BODY_00a0:
00a3 INIT_00a0:
00a3 00da | | Load_Top At_Offset_2 ; Debug Table 0x6 = .DEBUG 0x00a3,0x02ae,0x1001,0x0000,0x0036,0x07b4,0x0000,0x007b
; Debug Table 0x6.0x0 = 0xa3,0x1
00a4 e5fe | | Load 0x2,-0x2
00a5 e226 | & | Load 0x1,0x26
00a6 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
00a7 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ad | | .CONST 0x00ad ; Address of begin
00a9 0004 | | .CONST 0x0004 ; Address of exception handler
00aa 0002 | | .CONST 0x0002 ; Number of locals
00ab INIT_00a8:
00ab e226 | & | Load 0x1,0x26 ; Debug Table 0x7 = .DEBUG 0x00ab,0x02b2,0x1002,0x0000,0x0036,0x07b4,0x0000,0x0087
; Debug Table 0x7.0x0 = 0xab,0xffff
00ac 1b16 | | Execute Package,Field_Read,Field_Number 0x16
00ad BODY_00a8:
00ad e226 | & | Load 0x1,0x26 ; Debug Table 0x7.0x1 = 0xad,0x1
00ae 1b16 | | Execute Package,Field_Read,Field_Number 0x16
00af e5ff | | Load 0x2,-0x1
00b0 0219 | | Execute Heap_Access,All_Read
00b1 e5fe | | Load 0x2,-0x2
00b2 e20f | | Load 0x1,0xf
00b3 0119 | | Execute Any,Check_In_Formal_Type
00b4 8212 | | Call 0x1,0x12
00b5 e210 | | Load 0x1,0x10
00b6 025b | [ | Execute Discrete,Check_In_Type
00b7 e226 | & | Load 0x1,0x26
00b8 181e | | Execute Package,Field_Execute,Field_Number 0x1e
00b9 00d1 | | Pop_Control Pop_Count_1
00ba 0031 | 1 | Store_Top Heap_Access,At_Offset_1
00bb 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x2 = 0xbb,0x2
00bc 7002 |p | Jump_Nonzero 0xbf
00bd 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x3 = 0xbd,0x3
00be 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00bf 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x4 = 0xbf,0x4
00c0 0217 | | Execute Heap_Access,All_Reference
00c1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00c2 e5fe | | Load 0x2,-0x2
00c3 e20f | | Load 0x1,0xf
00c4 0119 | | Execute Any,Check_In_Formal_Type
00c5 8213 | | Call 0x1,0x13
00c6 012f | / | Execute Any,Equal
00c7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00ce | | .CONST 0x00ce ; Address of begin
00c9 0004 | | .CONST 0x0004 ; Address of exception handler
00ca 0003 | | .CONST 0x0003 ; Number of locals
00cb INIT_00c8:
00cb e226 | & | Load 0x1,0x26 ; Debug Table 0x8 = .DEBUG 0x00cb,0x02be,0x1001,0x0000,0x0036,0x07b4,0x0000,0x0094
; Debug Table 0x8.0x0 = 0xcb,0xffff
00cc 1b16 | | Execute Package,Field_Read,Field_Number 0x16
00cd 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x8.0x1 = 0xcd,0xfffe
00ce BODY_00c8:
00ce 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x8.0x2 = 0xce,0x1
00cf e226 | & | Load 0x1,0x26
00d0 1b16 | | Execute Package,Field_Read,Field_Number 0x16
00d1 e5fe | | Load 0x2,-0x2
00d2 e20f | | Load 0x1,0xf
00d3 0119 | | Execute Any,Check_In_Formal_Type
00d4 8212 | | Call 0x1,0x12
00d5 e210 | | Load 0x1,0x10
00d6 025b | [ | Execute Discrete,Check_In_Type
00d7 e5ff | | Load 0x2,-0x1
00d8 e226 | & | Load 0x1,0x26
00d9 181f | | Execute Package,Field_Execute,Field_Number 0x1f
00da 0033 | 3 | Store_Top Heap_Access,At_Offset_3
00db 0059 | Y | Store_Top Discrete,At_Offset_1
00dc e5fe | | Load 0x2,-0x2 ; Debug Table 0x8.0x3 = 0xdc,0x2
00dd e20f | | Load 0x1,0xf
00de 0119 | | Execute Any,Check_In_Formal_Type
00df 8213 | | Call 0x1,0x13
00e0 00da | | Load_Top At_Offset_2
00e1 0217 | | Execute Heap_Access,All_Reference
00e2 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00e3 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00e4 0000 0000 | | .BLANK 0000[0x4]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00ec | | .CONST 0x00ec ; Address of begin
00e9 0004 | | .CONST 0x0004 ; Address of exception handler
00ea 0002 | | .CONST 0x0002 ; Number of locals
00eb INIT_00e8:
00eb 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x9 = .DEBUG 0x00eb,0x02c8,0x1001,0x0000,0x0036,0x07b4,0x0000,0x00a0
; Debug Table 0x9.0x0 = 0xeb,0xffff
00ec BODY_00e8:
00ec 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x9.0x1 = 0xec,0x1
00ed e5ff | | Load 0x2,-0x1
00ee 0219 | | Execute Heap_Access,All_Read
00ef e5fe | | Load 0x2,-0x2
00f0 e20f | | Load 0x1,0xf
00f1 0119 | | Execute Any,Check_In_Formal_Type
00f2 8212 | | Call 0x1,0x12
00f3 e210 | | Load 0x1,0x10
00f4 025b | [ | Execute Discrete,Check_In_Type
00f5 e226 | & | Load 0x1,0x26
00f6 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00f7 00d1 | | Pop_Control Pop_Count_1
00f8 0059 | Y | Store_Top Discrete,At_Offset_1
00f9 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00fa 0000 0000 | | .BLANK 0000[0x6]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 010f | | .CONST 0x010f ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0007 | | .CONST 0x0007 ; Number of locals
0103 INIT_0100:
0103 e228 | ( | Load 0x1,0x28 ; Debug Table 0xa = .DEBUG 0x0103,0x02ce,0x1001,0x0000,0x0036,0x07b4,0x0000,0x00b0
; Debug Table 0xa.0x0 = 0x103,0xffff
0104 029f 017b | {| Declare_Subprogram INIT_0178,For_Call ; Debug Table 0xa.0x1 = 0x104,0xfffe
0106 e226 | & | Load 0x1,0x26 ; Debug Table 0xa.0x2 = 0x106,0xfffd
0107 1923 | # | Execute Package,Field_Reference,Field_Number 0x23
0108 00c6 | | Action Check_Subprogram_Elaborated
0109 4803 |H | Short_Literal 0x3
010a 4802 |H | Short_Literal 0x2
010b 0099 | | Action Reference_Dynamic
010c 608b |` | Indirect_Literal Discrete,0x198,{0x00000000, 0x003607c4}
010d 499a |I | Short_Literal 0x19a
010e 4807 |H | Short_Literal 0x7
010f BODY_0100:
010f e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0x3 = 0x10f,0x1
0110 0219 | | Execute Heap_Access,All_Read
0111 4804 |H | Short_Literal 0x4
0112 4802 |H | Short_Literal 0x2
0113 0099 | | Action Reference_Dynamic
0114 4805 |H | Short_Literal 0x5
0115 4802 |H | Short_Literal 0x2
0116 0099 | | Action Reference_Dynamic
0117 e226 | & | Load 0x1,0x26
0118 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0119 00d1 | | Pop_Control Pop_Count_1
011a e402 | | Load 0x2,0x2 ; Debug Table 0xa.0x4 = 0x11a,0x2
011b a5fd | | Store_Unchecked 0x2,-0x3
011c 4503 |E | Exit_Suprogram New_Top_Offset 0x3
011d 0000 0000 | | .XXX[0x3]
011f 0000 | |
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123 | # | .CONST 0x0123 ; Address of begin
0121 0004 | | .CONST 0x0004 ; Address of exception handler
0122 0001 | | .CONST 0x0001 ; Number of locals
0123 BODY_0120:
0123 INIT_0120:
0123 00da | | Load_Top At_Offset_2 ; Debug Table 0xb = .DEBUG 0x0123,0x02da,0x1001,0x0000,0x0036,0x07b4,0x0000,0x00c2
; Debug Table 0xb.0x0 = 0x123,0x1
0124 0217 | | Execute Heap_Access,All_Reference
0125 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0126 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0127 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b | + | .CONST 0x012b ; Address of begin
0129 0004 | | .CONST 0x0004 ; Address of exception handler
012a 0001 | | .CONST 0x0001 ; Number of locals
012b BODY_0128:
012b INIT_0128:
012b 00da | | Load_Top At_Offset_2 ; Debug Table 0xc = .DEBUG 0x012b,0x02de,0x1002,0x0000,0x0036,0x07b4,0x0000,0x00ca
; Debug Table 0xc.0x0 = 0x12b,0x1
012c 0217 | | Execute Heap_Access,All_Reference
012d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
012e e211 | | Load 0x1,0x11
012f 0119 | | Execute Any,Check_In_Formal_Type
0130 00db | | Load_Top At_Offset_3
0131 0217 | | Execute Heap_Access,All_Reference
0132 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0133 e210 | | Load 0x1,0x10
0134 025b | [ | Execute Discrete,Check_In_Type
0135 8214 | | Call 0x1,0x14
0136 e20f | | Load 0x1,0xf
0137 0119 | | Execute Any,Check_In_Formal_Type
0138 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0139 0000 0000 | | .BLANK 0000[0x7]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0143 | C | .CONST 0x0143 ; Address of begin
0141 0004 | | .CONST 0x0004 ; Address of exception handler
0142 0001 | | .CONST 0x0001 ; Number of locals
0143 BODY_0140:
0143 INIT_0140:
0143 00da | | Load_Top At_Offset_2 ; Debug Table 0xd = .DEBUG 0x0143,0x02e2,0x1002,0x0000,0x0036,0x07b4,0x0000,0x00d3
; Debug Table 0xd.0x0 = 0x143,0x1
0144 021d | | Execute Heap_Access,Is_Null
0145 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0146 0000 0000 | | .XXX[0x2]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b | K | .CONST 0x014b ; Address of begin
0149 0004 | | .CONST 0x0004 ; Address of exception handler
014a 0001 | | .CONST 0x0001 ; Number of locals
014b BODY_0148:
014b INIT_0148:
014b 00da | | Load_Top At_Offset_2 ; Debug Table 0xe = .DEBUG 0x014b,0x02e6,0x1001,0x0000,0x0036,0x07b4,0x0000,0x00e0
; Debug Table 0xe.0x0 = 0x14b,0x1
014c 0219 | | Execute Heap_Access,All_Read
014d e226 | & | Load 0x1,0x26
014e 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
014f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0153 | S | .CONST 0x0153 ; Address of begin
0151 0004 | | .CONST 0x0004 ; Address of exception handler
0152 0001 | | .CONST 0x0001 ; Number of locals
0153 BODY_0150:
0153 INIT_0150:
0153 00da | | Load_Top At_Offset_2 ; Debug Table 0xf = .DEBUG 0x0153,0x02ea,0x1002,0x0000,0x0036,0x07b4,0x0000,0x0109
; Debug Table 0xf.0x0 = 0x153,0x1
0154 e229 | ) | Load 0x1,0x29
0155 026e | n | Execute Discrete,Modulo
0156 00e3 | | Load_Encached Natural_Cache
0157 025b | [ | Execute Discrete,Check_In_Type
0158 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0159 0000 0000 | | .BLANK 0000[0x7]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163 | c | .CONST 0x0163 ; Address of begin
0161 0004 | | .CONST 0x0004 ; Address of exception handler
0162 0001 | | .CONST 0x0001 ; Number of locals
0163 BODY_0160:
0163 INIT_0160:
0163 4608 |F | Jump_Case 0x9 ; Debug Table 0x10 = .DEBUG 0x0163,0x02ee,0x1005,0x0000,0x0036,0x07c4,0x0000,0x000e
0164 7808 |x | Jump 0x16d ; case 0x0
0165 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0166 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
0167 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
0168 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
0169 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5
016a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6
016b 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7
016c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x8
016d 00da | | Load_Top At_Offset_2
016e 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
016f 0125 | % | Execute Any,Set_Constraint
0170 00da | | Load_Top At_Offset_2
0171 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0172 1c00 | | Execute_Immediate Run_Utility,0x0
0173 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0174 0000 0000 | | .BLANK 0000[0x4]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017e | ~ | .CONST 0x017e ; Address of begin
0179 0004 | | .CONST 0x0004 ; Address of exception handler
017a 0002 | | .CONST 0x0002 ; Number of locals
017b INIT_0178:
017b e228 | ( | Load 0x1,0x28 ; Debug Table 0x11 = .DEBUG 0x017b,0x02f0,0x1001,0x0000,0x0036,0x07c4,0x0000,0x016a
; Debug Table 0x11.0x0 = 0x17b,0xffff
017c e402 | | Load 0x2,0x2
017d 0031 | 1 | Store_Top Heap_Access,At_Offset_1
017e BODY_0178:
017e e228 | ( | Load 0x1,0x28 ; Debug Table 0x11.0x1 = 0x17e,0x1
017f e5fe | | Load 0x2,-0x2
0180 039c | | Declare_Variable Heap_Access,By_Allocation
0181 00d8 | | Load_Top At_Offset_0
0182 0217 | | Execute Heap_Access,All_Reference
0183 1c00 | | Execute_Immediate Run_Utility,0x0
0184 a402 | | Store_Unchecked 0x2,0x2
0185 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x2 = 0x185,0x2
; Debug Table 0x11.0x3 = 0x185,0x3
0186 e402 | | Load 0x2,0x2
0187 0217 | | Execute Heap_Access,All_Reference
0188 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0189 00db | | Load_Top At_Offset_3 ; Debug Table 0x11.0x4 = 0x189,0x4
018a 0217 | | Execute Heap_Access,All_Reference
018b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
018c e402 | | Load 0x2,0x2
018d 0217 | | Execute Heap_Access,All_Reference
018e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
018f 00db | | Load_Top At_Offset_3 ; Debug Table 0x11.0x5 = 0x18f,0x5
0190 0217 | | Execute Heap_Access,All_Reference
0191 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0192 e402 | | Load 0x2,0x2
0193 0217 | | Execute Heap_Access,All_Reference
0194 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0195 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0196 0000 0000 | | .XXX[0x2]
0198 0000 0000 | | .LITERAL {0x00000000, 0x003607c4}
019c 0000 0000 | | .LITERAL {0x00000000, 0x003607b4}
01a0 ; --------------------------------------------------------------------------------------
01a0 ; Debug Table
01a0 ; --------------------------------------------------------------------------------------
01a0 0003 0012 | | .CONST 0x0003,0x0012
01a2 000b 0232 | 2| .DEBUG 0x000b,0x0232,0xc000,0x0000,0x0036,0x07b4,0x0000,0x0009
01aa 0044 0276 | D v| .DEBUG 0x0044,0x0276,0xc000,0x0000,0x0036,0x07c4,0x0000,0x0003
01b2 007b 029c | { | .DEBUG 0x007b,0x029c,0x1001,0x0000,0x0036,0x07b4,0x0000,0x0053
01ba 008b 02a2 | | .DEBUG 0x008b,0x02a2,0x1002,0x0000,0x0036,0x07b4,0x0000,0x0061
01c2 0093 02a6 | | .DEBUG 0x0093,0x02a6,0x1002,0x0000,0x0036,0x07b4,0x0000,0x006a
01ca 009b 02aa | | .DEBUG 0x009b,0x02aa,0x1001,0x0000,0x0036,0x07b4,0x0000,0x0073
01d2 00a3 02ae | | .DEBUG 0x00a3,0x02ae,0x1001,0x0000,0x0036,0x07b4,0x0000,0x007b
01da 00ab 02b2 | | .DEBUG 0x00ab,0x02b2,0x1002,0x0000,0x0036,0x07b4,0x0000,0x0087
01e2 00cb 02be | | .DEBUG 0x00cb,0x02be,0x1001,0x0000,0x0036,0x07b4,0x0000,0x0094
01ea 00eb 02c8 | | .DEBUG 0x00eb,0x02c8,0x1001,0x0000,0x0036,0x07b4,0x0000,0x00a0
01f2 0103 02ce | | .DEBUG 0x0103,0x02ce,0x1001,0x0000,0x0036,0x07b4,0x0000,0x00b0
01fa 0123 02da | # | .DEBUG 0x0123,0x02da,0x1001,0x0000,0x0036,0x07b4,0x0000,0x00c2
0202 012b 02de | + | .DEBUG 0x012b,0x02de,0x1002,0x0000,0x0036,0x07b4,0x0000,0x00ca
020a 0143 02e2 | C | .DEBUG 0x0143,0x02e2,0x1002,0x0000,0x0036,0x07b4,0x0000,0x00d3
0212 014b 02e6 | K | .DEBUG 0x014b,0x02e6,0x1001,0x0000,0x0036,0x07b4,0x0000,0x00e0
021a 0153 02ea | S | .DEBUG 0x0153,0x02ea,0x1002,0x0000,0x0036,0x07b4,0x0000,0x0109
0222 0163 02ee | c | .DEBUG 0x0163,0x02ee,0x1005,0x0000,0x0036,0x07c4,0x0000,0x000e
022a 017b 02f0 | { | .DEBUG 0x017b,0x02f0,0x1001,0x0000,0x0036,0x07c4,0x0000,0x016a
0232 ; --------------------------------------------------------------------------------------
0232 ; Debug3 Subtable 0x0
0232 ; --------------------------------------------------------------------------------------
0232 0021 0000 | ! | .DBG3TAB 0x0021,0x0000
0234 000b ffff | | .CONST 0x000b,0xffff
0236 000b fffe | | .CONST 0x000b,0xfffe
0238 000b fffd | | .CONST 0x000b,0xfffd
023a 000c fffc | | .CONST 0x000c,0xfffc
023c 000e fffb | | .CONST 0x000e,0xfffb
023e 0010 fffa | | .CONST 0x0010,0xfffa
0240 0012 fff9 | | .CONST 0x0012,0xfff9
0242 0014 fff8 | | .CONST 0x0014,0xfff8
0244 0016 fff7 | | .CONST 0x0016,0xfff7
0246 0018 fff6 | | .CONST 0x0018,0xfff6
0248 001a fff5 | | .CONST 0x001a,0xfff5
024a 001c fff4 | | .CONST 0x001c,0xfff4
024c 001d fff3 | | .CONST 0x001d,0xfff3
024e 001f fff2 | | .CONST 0x001f,0xfff2
0250 0021 fff1 | ! | .CONST 0x0021,0xfff1
0252 0023 fff0 | # | .CONST 0x0023,0xfff0
0254 0025 ffef | % | .CONST 0x0025,0xffef
0256 0026 ffee | & | .CONST 0x0026,0xffee
0258 0028 ffed | ( | .CONST 0x0028,0xffed
025a 0028 ffec | ( | .CONST 0x0028,0xffec
025c 0028 ffeb | ( | .CONST 0x0028,0xffeb
025e 0028 ffea | ( | .CONST 0x0028,0xffea
0260 0028 ffe9 | ( | .CONST 0x0028,0xffe9
0262 0028 ffe8 | ( | .CONST 0x0028,0xffe8
0264 0028 ffe7 | ( | .CONST 0x0028,0xffe7
0266 0028 ffe6 | ( | .CONST 0x0028,0xffe6
0268 0028 ffe5 | ( | .CONST 0x0028,0xffe5
026a 002a ffe4 | * | .CONST 0x002a,0xffe4
026c 0036 ffe3 | 6 | .CONST 0x0036,0xffe3
026e 003a ffe2 | : | .CONST 0x003a,0xffe2
0270 003c ffe1 | < | .CONST 0x003c,0xffe1
0272 0040 ffe0 | @ | .CONST 0x0040,0xffe0
0274 0040 ffdf | @ | .CONST 0x0040,0xffdf
0276 ; --------------------------------------------------------------------------------------
0276 ; Debug3 Subtable 0x1
0276 ; --------------------------------------------------------------------------------------
0276 0012 0000 | | .DBG3TAB 0x0012,0x0000
0278 0044 ffff | D | .CONST 0x0044,0xffff
027a 0048 fffe | H | .CONST 0x0048,0xfffe
027c 0048 fffd | H | .CONST 0x0048,0xfffd
027e 004f fffc | O | .CONST 0x004f,0xfffc
0280 0054 fffb | T | .CONST 0x0054,0xfffb
0282 0056 fffa | V | .CONST 0x0056,0xfffa
0284 0058 fff9 | X | .CONST 0x0058,0xfff9
0286 005a fff8 | Z | .CONST 0x005a,0xfff8
0288 005c fff7 | \ | .CONST 0x005c,0xfff7
028a 005e fff6 | ^ | .CONST 0x005e,0xfff6
028c 0060 fff5 | ` | .CONST 0x0060,0xfff5
028e 0062 fff4 | b | .CONST 0x0062,0xfff4
0290 0064 fff3 | d | .CONST 0x0064,0xfff3
0292 0066 fff2 | f | .CONST 0x0066,0xfff2
0294 0068 fff1 | h | .CONST 0x0068,0xfff1
0296 006a fff0 | j | .CONST 0x006a,0xfff0
0298 006c ffef | l | .CONST 0x006c,0xffef
029a 006e ffee | n | .CONST 0x006e,0xffee
029c ; --------------------------------------------------------------------------------------
029c ; Debug3 Subtable 0x2
029c ; --------------------------------------------------------------------------------------
029c 0000 0002 | | .DBG3TAB 0x0000,0x0002
029e 007b 0001 | { | .CONST 0x007b,0x0001
02a0 0082 0002 | | .CONST 0x0082,0x0002
02a2 ; --------------------------------------------------------------------------------------
02a2 ; Debug3 Subtable 0x3
02a2 ; --------------------------------------------------------------------------------------
02a2 0000 0001 | | .DBG3TAB 0x0000,0x0001
02a4 008b 0001 | | .CONST 0x008b,0x0001
02a6 ; --------------------------------------------------------------------------------------
02a6 ; Debug3 Subtable 0x4
02a6 ; --------------------------------------------------------------------------------------
02a6 0000 0001 | | .DBG3TAB 0x0000,0x0001
02a8 0093 0001 | | .CONST 0x0093,0x0001
02aa ; --------------------------------------------------------------------------------------
02aa ; Debug3 Subtable 0x5
02aa ; --------------------------------------------------------------------------------------
02aa 0000 0001 | | .DBG3TAB 0x0000,0x0001
02ac 009b 0001 | | .CONST 0x009b,0x0001
02ae ; --------------------------------------------------------------------------------------
02ae ; Debug3 Subtable 0x6
02ae ; --------------------------------------------------------------------------------------
02ae 0000 0001 | | .DBG3TAB 0x0000,0x0001
02b0 00a3 0001 | | .CONST 0x00a3,0x0001
02b2 ; --------------------------------------------------------------------------------------
02b2 ; Debug3 Subtable 0x7
02b2 ; --------------------------------------------------------------------------------------
02b2 0001 0004 | | .DBG3TAB 0x0001,0x0004
02b4 00ab ffff | | .CONST 0x00ab,0xffff
02b6 00ad 0001 | | .CONST 0x00ad,0x0001
02b8 00bb 0002 | | .CONST 0x00bb,0x0002
02ba 00bd 0003 | | .CONST 0x00bd,0x0003
02bc 00bf 0004 | | .CONST 0x00bf,0x0004
02be ; --------------------------------------------------------------------------------------
02be ; Debug3 Subtable 0x8
02be ; --------------------------------------------------------------------------------------
02be 0002 0002 | | .DBG3TAB 0x0002,0x0002
02c0 00cb ffff | | .CONST 0x00cb,0xffff
02c2 00cd fffe | | .CONST 0x00cd,0xfffe
02c4 00ce 0001 | | .CONST 0x00ce,0x0001
02c6 00dc 0002 | | .CONST 0x00dc,0x0002
02c8 ; --------------------------------------------------------------------------------------
02c8 ; Debug3 Subtable 0x9
02c8 ; --------------------------------------------------------------------------------------
02c8 0001 0001 | | .DBG3TAB 0x0001,0x0001
02ca 00eb ffff | | .CONST 0x00eb,0xffff
02cc 00ec 0001 | | .CONST 0x00ec,0x0001
02ce ; --------------------------------------------------------------------------------------
02ce ; Debug3 Subtable 0xa
02ce ; --------------------------------------------------------------------------------------
02ce 0003 0002 | | .DBG3TAB 0x0003,0x0002
02d0 0103 ffff | | .CONST 0x0103,0xffff
02d2 0104 fffe | | .CONST 0x0104,0xfffe
02d4 0106 fffd | | .CONST 0x0106,0xfffd
02d6 010f 0001 | | .CONST 0x010f,0x0001
02d8 011a 0002 | | .CONST 0x011a,0x0002
02da ; --------------------------------------------------------------------------------------
02da ; Debug3 Subtable 0xb
02da ; --------------------------------------------------------------------------------------
02da 0000 0001 | | .DBG3TAB 0x0000,0x0001
02dc 0123 0001 | # | .CONST 0x0123,0x0001
02de ; --------------------------------------------------------------------------------------
02de ; Debug3 Subtable 0xc
02de ; --------------------------------------------------------------------------------------
02de 0000 0001 | | .DBG3TAB 0x0000,0x0001
02e0 012b 0001 | + | .CONST 0x012b,0x0001
02e2 ; --------------------------------------------------------------------------------------
02e2 ; Debug3 Subtable 0xd
02e2 ; --------------------------------------------------------------------------------------
02e2 0000 0001 | | .DBG3TAB 0x0000,0x0001
02e4 0143 0001 | C | .CONST 0x0143,0x0001
02e6 ; --------------------------------------------------------------------------------------
02e6 ; Debug3 Subtable 0xe
02e6 ; --------------------------------------------------------------------------------------
02e6 0000 0001 | | .DBG3TAB 0x0000,0x0001
02e8 014b 0001 | K | .CONST 0x014b,0x0001
02ea ; --------------------------------------------------------------------------------------
02ea ; Debug3 Subtable 0xf
02ea ; --------------------------------------------------------------------------------------
02ea 0000 0001 | | .DBG3TAB 0x0000,0x0001
02ec 0153 0001 | S | .CONST 0x0153,0x0001
02ee ; --------------------------------------------------------------------------------------
02ee ; Debug3 Subtable 0x10
02ee ; --------------------------------------------------------------------------------------
02ee 0000 0000 | | .DBG3TAB 0x0000,0x0000
02f0 ; --------------------------------------------------------------------------------------
02f0 ; Debug3 Subtable 0x11
02f0 ; --------------------------------------------------------------------------------------
02f0 0001 0005 | | .DBG3TAB 0x0001,0x0005
02f2 017b ffff | { | .CONST 0x017b,0xffff
02f4 017e 0001 | ~ | .CONST 0x017e,0x0001
02f6 0185 0002 | | .CONST 0x0185,0x0002
02f8 0185 0003 | | .CONST 0x0185,0x0003
02fa 0189 0004 | | .CONST 0x0189,0x0004
02fc 018f 0005 | | .CONST 0x018f,0x0005
02fe 0000 0000 | | .BLANK 0000[0x102]