DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦d1aee66d9⟧

    Length: 2048 (0x800)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_779ce4

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦this⟧ 

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 02d8       |    |		.CONST	0x02d8								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 8001       |    |		.CONST	0x8001								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0055       | U  |		.CONST	0x0055								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 001c       |    |		.CONST	0x001c								; Number of locals
000b			INIT_0008:
000b 029a 005b  |   [|		Declare_Subprogram	INIT_0058,For_Outer_Call,Visible,Unelaborated
000d 029a 00c3  |    |		Declare_Subprogram	INIT_00c0,For_Outer_Call,Visible,Unelaborated
000f 029a 0133  |   3|		Declare_Subprogram	INIT_0130,For_Outer_Call,Visible,Unelaborated
0011 029a 016b  |   k|		Declare_Subprogram	INIT_0168,For_Outer_Call,Visible,Unelaborated
0013 029a 0193  |    |		Declare_Subprogram	INIT_0190,For_Outer_Call,Visible,Unelaborated
0015 029a 019b  |    |		Declare_Subprogram	INIT_0198,For_Outer_Call,Visible,Unelaborated
0017 029a 01a3  |    |		Declare_Subprogram	INIT_01a0,For_Outer_Call,Visible,Unelaborated
0019 029a 01ab  |    |		Declare_Subprogram	INIT_01a8,For_Outer_Call,Visible,Unelaborated
001b 029a 01c3  |    |		Declare_Subprogram	INIT_01c0,For_Outer_Call,Visible,Unelaborated
001d 029a 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Outer_Call,Visible,Unelaborated
001f 029a 0223  |   #|		Declare_Subprogram	INIT_0220,For_Outer_Call,Visible,Unelaborated
0021 4802       |H   |		Short_Literal	0x2
0022 032b       | +  |		Declare_Type	Record,Incomplete,Visible
0023 00d8       |    |		Load_Top	At_Offset_0
0024 02a0       |    |		Declare_Subprogram	Null_Subprogram
0025 03ae       |    |		Declare_Type	Heap_Access,Defined,Visible
0026 00e2       |    |		Load_Encached	Integer_Cache
0027 00e1       |    |		Load_Encached	Boolean_Cache
0028 029f 02ab  |    |		Declare_Subprogram	INIT_02a8,For_Call
002a 4802       |H   |		Short_Literal	0x2
002b 032e       | .  |		Declare_Type	Record,Defined,Visible
002c 00bf       |    |		Action	Accept_Activation
002d 00e4       |    |		Load_Encached	Positive_Cache
002e 0266       | f  |		Execute	Discrete,Bounds
002f e003       |    |		Load	0x0,0x3
0030 029f 022b  |   +|		Declare_Subprogram	INIT_0228,For_Call
0032 4801       |H   |		Short_Literal	0x1
0033 0350       | P  |		Declare_Type	Array,Defined,Bounds_With_Object
0034 00d8       |    |		Load_Top	At_Offset_0
0035 02a0       |    |		Declare_Subprogram	Null_Subprogram
0036 03ad       |    |		Declare_Type	Heap_Access,Defined
0037 00d8       |    |		Load_Top	At_Offset_0
0038 e003       |    |		Load	0x0,0x3
0039 029f 0243  |   C|		Declare_Subprogram	INIT_0240,For_Call
003b e218       |    |		Load	0x1,0x18
003c 0326       | &  |		Complete_Type	Record,By_Defining
003d 00db       |    |		Load_Top	At_Offset_3
003e 03a0       |    |		Complete_Type	Heap_Access,By_Component_Completion
003f 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0040 00c7       |    |		Action	Elaborate_Subprogram
0041 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0042 00c7       |    |		Action	Elaborate_Subprogram
0043 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0044 00c7       |    |		Action	Elaborate_Subprogram
0045 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0046 00c7       |    |		Action	Elaborate_Subprogram
0047 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0048 00c7       |    |		Action	Elaborate_Subprogram
0049 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
004a 00c7       |    |		Action	Elaborate_Subprogram
004b 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
004c 00c7       |    |		Action	Elaborate_Subprogram
004d 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
004e 00c7       |    |		Action	Elaborate_Subprogram
004f 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0050 00c7       |    |		Action	Elaborate_Subprogram
0051 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
0052 00c7       |    |		Action	Elaborate_Subprogram
0053 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
0054 00c7       |    |		Action	Elaborate_Subprogram
0055			BODY_0008:
0055 00bc       |    |		Action	Signal_Activated
0056 00bb       |    |		Action	Signal_Completion
0057 0000       |    |		.XXX[0x1]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 0075       | u  |		.CONST	0x0075								; Address of begin
0059 0004       |    |		.CONST	0x0004								; Address of exception handler
005a 0007       |    |		.CONST	0x0007								; Number of locals
005b			INIT_0058:
005b e004       |    |		Load	0x0,0x4
005c 0322       | "  |		Declare_Variable	Record
005d 00db       |    |		Load_Top	At_Offset_3
005e 8005       |    |		Call	0x0,0x5
005f 00d9       |    |		Load_Top	At_Offset_1
0060 017d       | }  |		Execute	Record,Structure_Write
0061 00e3       |    |		Load_Encached	Natural_Cache
0062 e219       |    |		Load	0x1,0x19
0063 e5fc       |    |		Load	0x2,-0x4
0064 039c       |    |		Declare_Variable	Heap_Access,By_Allocation
0065 00d8       |    |		Load_Top	At_Offset_0
0066 0217       |    |		Execute	Heap_Access,All_Reference
0067 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0068 e006       |    |		Load	0x0,0x6
0069 6805       |h   |		Jump_Zero	0x6f
006a e5fa       |    |		Load	0x2,-0x6
006b 0217       |    |		Execute	Heap_Access,All_Reference
006c 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
006d 0f03       |    |		Execute_Immediate	Equal,0x3
006e 7802       |x   |		Jump	0x71
006f 4800       |H   |		Short_Literal	0x0
0070 0007       |    |		Action	Break_Optional
0071 00e2       |    |		Load_Encached	Integer_Cache
0072 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
0073 029f 0253  |   S|		Declare_Subprogram	INIT_0250,For_Call
0075			BODY_0058:
0075 e402       |    |		Load	0x2,0x2
0076 8007       |    |		Call	0x0,0x7
0077 a403       |    |		Store_Unchecked	0x2,0x3
0078 e5fa       |    |		Load	0x2,-0x6
0079 0217       |    |		Execute	Heap_Access,All_Reference
007a 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
007b 0f04       |    |		Execute_Immediate	Equal,0x4
007c 6803       |h   |		Jump_Zero	0x80
007d e403       |    |		Load	0x2,0x3
007e 0aff       |    |		Execute_Immediate	Plus,-0x1
007f c403       |    |		Store	0x2,0x3
0080 4801       |H   |		Short_Literal	0x1
0081 e403       |    |		Load	0x2,0x3
0082 e21c       |    |		Load	0x1,0x1c
0083 e5fc       |    |		Load	0x2,-0x4
0084 039a       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Constraint
0085 00d8       |    |		Load_Top	At_Offset_0
0086 0217       |    |		Execute	Heap_Access,All_Reference
0087 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0088 e404       |    |		Load	0x2,0x4
0089 0217       |    |		Execute	Heap_Access,All_Reference
008a 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
008b 00cf       |    |		Action	Mark_Auxiliary
008c e402       |    |		Load	0x2,0x2
008d 8008       |    |		Call	0x0,0x8
008e 700c       |p   |		Jump_Nonzero	0x9b
008f e402       |    |		Load	0x2,0x2
0090 8009       |    |		Call	0x0,0x9
0091 00db       |    |		Load_Top	At_Offset_3
0092 8407       |    |		Call	0x2,0x7
0093 e402       |    |		Load	0x2,0x2
0094 800a       |    |		Call	0x0,0xa
0095 00d1       |    |		Pop_Control	Pop_Count_1
0096 00da       |    |		Load_Top	At_Offset_2
0097 0a01       |    |		Execute_Immediate	Plus,0x1
0098 005b       | [  |		Store_Top	Discrete,At_Offset_3
0099 00c9       |    |		Action	Pop_Auxiliary_Loop
009a 7ff1       |    |		Jump	0x8c
009b 00ce       |    |		Action	Pop_Auxiliary
009c 00da       |    |		Load_Top	At_Offset_2
009d 6818       |h   |		Jump_Zero	0xb6
009e 4801       |H   |		Short_Literal	0x1
009f e5fa       |    |		Load	0x2,-0x6
00a0 0217       |    |		Execute	Heap_Access,All_Reference
00a1 280b       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0xb
00a2 e5fa       |    |		Load	0x2,-0x6
00a3 0217       |    |		Execute	Heap_Access,All_Reference
00a4 2c08       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x8
00a5 0f00       |    |		Execute_Immediate	Equal,0x0
00a6 6804       |h   |		Jump_Zero	0xab
00a7 6014       |`   |		Indirect_Literal	Discrete,0xbc,{0xffffffff, 0x80000001}
00a8 e00b       |    |		Load	0x0,0xb
00a9 e5fa       |    |		Load	0x2,-0x6
00aa 800c       |    |		Call	0x0,0xc
00ab 00db       |    |		Load_Top	At_Offset_3
00ac 0219       |    |		Execute	Heap_Access,All_Read
00ad 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00ae 00d8       |    |		Load_Top	At_Offset_0
00af e00b       |    |		Load	0x0,0xb
00b0 e5fc       |    |		Load	0x2,-0x4
00b1 e406       |    |		Load	0x2,0x6
00b2 0275       | u  |		Execute	Discrete,Unary_Minus
00b3 e5fa       |    |		Load	0x2,-0x6
00b4 800d       |    |		Call	0x0,0xd
00b5 00d2       |    |		Pop_Control	Pop_Count_2
00b6 00db       |    |		Load_Top	At_Offset_3
00b7 e5fa       |    |		Load	0x2,-0x6
00b8 0217       |    |		Execute	Heap_Access,All_Reference
00b9 2a10       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x10
00ba 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
00bb 0000       |    |		.XXX[0x1]
00bc ffff ffff  |    |		.LITERAL	{0xffffffff, 0x80000001}
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00cc       |    |		.CONST	0x00cc								; Address of begin
00c1 0004       |    |		.CONST	0x0004								; Address of exception handler
00c2 0005       |    |		.CONST	0x0005								; Number of locals
00c3			INIT_00c0:
00c3 00da       |    |		Load_Top	At_Offset_2
00c4 0217       |    |		Execute	Heap_Access,All_Reference
00c5 2610       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x10
00c6 0007       |    |		Action	Break_Optional
00c7 00e2       |    |		Load_Encached	Integer_Cache
00c8 029f 028b  |    |		Declare_Subprogram	INIT_0288,For_Call
00ca 029f 029b  |    |		Declare_Subprogram	INIT_0298,For_Call
00cc			BODY_00c0:
00cc e5fe       |    |		Load	0x2,-0x2
00cd 701e       |p   |		Jump_Nonzero	0xec
00ce e5fc       |    |		Load	0x2,-0x4
00cf e5fd       |    |		Load	0x2,-0x3
00d0 e5ff       |    |		Load	0x2,-0x1
00d1 0217       |    |		Execute	Heap_Access,All_Reference
00d2 2c09       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x9
00d3 800e       |    |		Call	0x0,0xe
00d4 e5ff       |    |		Load	0x2,-0x1
00d5 0217       |    |		Execute	Heap_Access,All_Reference
00d6 2c0b       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xb
00d7 6810       |h   |		Jump_Zero	0xe8
00d8 e5fc       |    |		Load	0x2,-0x4
00d9 e402       |    |		Load	0x2,0x2
00da 0217       |    |		Execute	Heap_Access,All_Reference
00db 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00dc 0217       |    |		Execute	Heap_Access,All_Reference
00dd 01dc       |    |		Execute	Vector,Last
00de 0275       | u  |		Execute	Discrete,Unary_Minus
00df 0aff       |    |		Execute_Immediate	Plus,-0x1
00e0 00d8       |    |		Load_Top	At_Offset_0
00e1 00e2       |    |		Load_Encached	Integer_Cache
00e2 0260       | `  |		Execute	Discrete,In_Type
00e3 7001       |p   |		Jump_Nonzero	0xe5
00e4 0801       |    |		Execute_Immediate	Raise,0x1
00e5 e5ff       |    |		Load	0x2,-0x1
00e6 800f       |    |		Call	0x0,0xf
00e7 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
00e8 e5fd       |    |		Load	0x2,-0x3
00e9 e5ff       |    |		Load	0x2,-0x1
00ea 8010       |    |		Call	0x0,0x10
00eb 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
00ec e5fe       |    |		Load	0x2,-0x2
00ed 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
00ee 6819       |h   |		Jump_Zero	0x108
00ef e5fe       |    |		Load	0x2,-0x2
00f0 e402       |    |		Load	0x2,0x2
00f1 0217       |    |		Execute	Heap_Access,All_Reference
00f2 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00f3 0217       |    |		Execute	Heap_Access,All_Reference
00f4 01dc       |    |		Execute	Vector,Last
00f5 027a       | z  |		Execute	Discrete,Less_Equal
00f6 680a       |h   |		Jump_Zero	0x101
00f7 e5fe       |    |		Load	0x2,-0x2
00f8 e402       |    |		Load	0x2,0x2
00f9 0219       |    |		Execute	Heap_Access,All_Read
00fa 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00fb 0219       |    |		Execute	Heap_Access,All_Read
00fc 01d5       |    |		Execute	Vector,Field_Reference
00fd 00d8       |    |		Load_Top	At_Offset_0
00fe 8404       |    |		Call	0x2,0x4
00ff 00d2       |    |		Pop_Control	Pop_Count_2
0100 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0101 00db       |    |		Load_Top	At_Offset_3
0102 0219       |    |		Execute	Heap_Access,All_Read
0103 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0104 00d8       |    |		Load_Top	At_Offset_0
0105 8404       |    |		Call	0x2,0x4
0106 00d2       |    |		Pop_Control	Pop_Count_2
0107 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0108 e5fe       |    |		Load	0x2,-0x2
0109 0275       | u  |		Execute	Discrete,Unary_Minus
010a 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
010b 00da       |    |		Load_Top	At_Offset_2
010c e402       |    |		Load	0x2,0x2
010d 0217       |    |		Execute	Heap_Access,All_Reference
010e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
010f 0217       |    |		Execute	Heap_Access,All_Reference
0110 01dc       |    |		Execute	Vector,Last
0111 027a       | z  |		Execute	Discrete,Less_Equal
0112 680a       |h   |		Jump_Zero	0x11d
0113 00da       |    |		Load_Top	At_Offset_2
0114 e402       |    |		Load	0x2,0x2
0115 0219       |    |		Execute	Heap_Access,All_Read
0116 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0117 0219       |    |		Execute	Heap_Access,All_Read
0118 01d5       |    |		Execute	Vector,Field_Reference
0119 00d8       |    |		Load_Top	At_Offset_0
011a 8405       |    |		Call	0x2,0x5
011b 00d2       |    |		Pop_Control	Pop_Count_2
011c 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
011d 00db       |    |		Load_Top	At_Offset_3
011e 0219       |    |		Execute	Heap_Access,All_Read
011f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0120 00d8       |    |		Load_Top	At_Offset_0
0121 8405       |    |		Call	0x2,0x5
0122 00d2       |    |		Pop_Control	Pop_Count_2
0123 e5fc       |    |		Load	0x2,-0x4
0124 e5fd       |    |		Load	0x2,-0x3
0125 e5ff       |    |		Load	0x2,-0x1
0126 0217       |    |		Execute	Heap_Access,All_Reference
0127 2c0a       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0xa
0128 8011       |    |		Call	0x0,0x11
0129 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
012a 0000 0000  |    |		.BLANK	0000[0x6]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0133       | 3  |		.CONST	0x0133								; Address of begin
0131 0004       |    |		.CONST	0x0004								; Address of exception handler
0132 0001       |    |		.CONST	0x0001								; Number of locals
0133			BODY_0130:
0133			INIT_0130:
0133 00db       |    |		Load_Top	At_Offset_3
0134 7008       |p   |		Jump_Nonzero	0x13d
0135 e012       |    |		Load	0x0,0x12
0136 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0137 4807       |H   |		Short_Literal	0x7
0138 0092 02b5  |    |		Action	Push_String_Extended,0x2b5					; "Register coverage on a head breakpoint of an if stmt"
013a e013       |    |		Load	0x0,0x13
013b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
013c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
013d 00db       |    |		Load_Top	At_Offset_3
013e 0d01       |    |		Execute_Immediate	Less,0x1
013f 6805       |h   |		Jump_Zero	0x145
0140 00db       |    |		Load_Top	At_Offset_3
0141 0275       | u  |		Execute	Discrete,Unary_Minus
0142 00db       |    |		Load_Top	At_Offset_3
0143 820f       |    |		Call	0x1,0xf
0144 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0145 00db       |    |		Load_Top	At_Offset_3
0146 00db       |    |		Load_Top	At_Offset_3
0147 0217       |    |		Execute	Heap_Access,All_Reference
0148 2e10       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x10
0149 0217       |    |		Execute	Heap_Access,All_Reference
014a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
014b 0217       |    |		Execute	Heap_Access,All_Reference
014c 01dc       |    |		Execute	Vector,Last
014d 027a       | z  |		Execute	Discrete,Less_Equal
014e 680c       |h   |		Jump_Zero	0x15b
014f e014       |    |		Load	0x0,0x14
0150 e5fe       |    |		Load	0x2,-0x2
0151 e5ff       |    |		Load	0x2,-0x1
0152 0217       |    |		Execute	Heap_Access,All_Reference
0153 2e10       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x10
0154 0217       |    |		Execute	Heap_Access,All_Reference
0155 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0156 0217       |    |		Execute	Heap_Access,All_Reference
0157 01d5       |    |		Execute	Vector,Field_Reference
0158 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0159 8015       |    |		Call	0x0,0x15
015a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
015b e014       |    |		Load	0x0,0x14
015c 00db       |    |		Load_Top	At_Offset_3
015d 0217       |    |		Execute	Heap_Access,All_Reference
015e 2e10       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x10
015f 0217       |    |		Execute	Heap_Access,All_Reference
0160 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0161 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0162 8015       |    |		Call	0x0,0x15
0163 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0164 0000 0000  |    |		.BLANK	0000[0x4]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016b       | k  |		.CONST	0x016b								; Address of begin
0169 0004       |    |		.CONST	0x0004								; Address of exception handler
016a 0001       |    |		.CONST	0x0001								; Number of locals
016b			BODY_0168:
016b			INIT_0168:
016b 00da       |    |		Load_Top	At_Offset_2
016c 0217       |    |		Execute	Heap_Access,All_Reference
016d 2e10       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x10
016e 0217       |    |		Execute	Heap_Access,All_Reference
016f 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0170 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0171 8016       |    |		Call	0x0,0x16
0172 680d       |h   |		Jump_Zero	0x180
0173 00da       |    |		Load_Top	At_Offset_2
0174 0217       |    |		Execute	Heap_Access,All_Reference
0175 2e10       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x10
0176 0217       |    |		Execute	Heap_Access,All_Reference
0177 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0178 0217       |    |		Execute	Heap_Access,All_Reference
0179 01db       |    |		Execute	Vector,Length
017a 00d8       |    |		Load_Top	At_Offset_0
017b 00e3       |    |		Load_Encached	Natural_Cache
017c 0260       | `  |		Execute	Discrete,In_Type
017d 7001       |p   |		Jump_Nonzero	0x17f
017e 0801       |    |		Execute_Immediate	Raise,0x1
017f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0180 00da       |    |		Load_Top	At_Offset_2
0181 0217       |    |		Execute	Heap_Access,All_Reference
0182 2e10       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x10
0183 0217       |    |		Execute	Heap_Access,All_Reference
0184 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0185 0217       |    |		Execute	Heap_Access,All_Reference
0186 01db       |    |		Execute	Vector,Length
0187 0a01       |    |		Execute_Immediate	Plus,0x1
0188 00d8       |    |		Load_Top	At_Offset_0
0189 00e3       |    |		Load_Encached	Natural_Cache
018a 0260       | `  |		Execute	Discrete,In_Type
018b 7001       |p   |		Jump_Nonzero	0x18d
018c 0801       |    |		Execute_Immediate	Raise,0x1
018d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
018e 0000 0000  |    |		.XXX[0x2]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0193       |    |		.CONST	0x0193								; Address of begin
0191 0004       |    |		.CONST	0x0004								; Address of exception handler
0192 0001       |    |		.CONST	0x0001								; Number of locals
0193			BODY_0190:
0193			INIT_0190:
0193 e5fd       |    |		Load	0x2,-0x3
0194 e5fe       |    |		Load	0x2,-0x2
0195 e5ff       |    |		Load	0x2,-0x1
0196 800c       |    |		Call	0x0,0xc
0197 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
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 e5fd       |    |		Load	0x2,-0x3
019c e5fe       |    |		Load	0x2,-0x2
019d e5ff       |    |		Load	0x2,-0x1
019e 8017       |    |		Call	0x0,0x17
019f 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a3       |    |		.CONST	0x01a3								; Address of begin
01a1 0004       |    |		.CONST	0x0004								; Address of exception handler
01a2 0001       |    |		.CONST	0x0001								; Number of locals
01a3			BODY_01a0:
01a3			INIT_01a0:
01a3 00da       |    |		Load_Top	At_Offset_2
01a4 8018       |    |		Call	0x0,0x18
01a5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01a6 0000 0000  |    |		.XXX[0x2]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ab       |    |		.CONST	0x01ab								; Address of begin
01a9 0004       |    |		.CONST	0x0004								; Address of exception handler
01aa 0001       |    |		.CONST	0x0001								; Number of locals
01ab			BODY_01a8:
01ab			INIT_01a8:
01ab 4800       |H   |		Short_Literal	0x0
01ac e5fd       |    |		Load	0x2,-0x3
01ad 0217       |    |		Execute	Heap_Access,All_Reference
01ae 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01af 00da       |    |		Load_Top	At_Offset_2
01b0 e5fd       |    |		Load	0x2,-0x3
01b1 0217       |    |		Execute	Heap_Access,All_Reference
01b2 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
01b3 4801       |H   |		Short_Literal	0x1
01b4 e5fd       |    |		Load	0x2,-0x3
01b5 0217       |    |		Execute	Heap_Access,All_Reference
01b6 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
01b7 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01b8 4800       |H   |		Short_Literal	0x0
01b9 e5fd       |    |		Load	0x2,-0x3
01ba 0217       |    |		Execute	Heap_Access,All_Reference
01bb 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
01bc 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01bd 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01be 0000 0000  |    |		.XXX[0x2]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c7       |    |		.CONST	0x01c7								; Address of begin
01c1 0004       |    |		.CONST	0x0004								; Address of exception handler
01c2 0002       |    |		.CONST	0x0002								; Number of locals
01c3			INIT_01c0:
01c3 00da       |    |		Load_Top	At_Offset_2
01c4 0217       |    |		Execute	Heap_Access,All_Reference
01c5 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
01c6 0007       |    |		Action	Break_Optional
01c7			BODY_01c0:
01c7 00d8       |    |		Load_Top	At_Offset_0
01c8 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
01c9 6805       |h   |		Jump_Zero	0x1cf
01ca 4801       |H   |		Short_Literal	0x1
01cb e5ff       |    |		Load	0x2,-0x1
01cc 0217       |    |		Execute	Heap_Access,All_Reference
01cd 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01ce 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01cf 00d8       |    |		Load_Top	At_Offset_0
01d0 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01d1 e5ff       |    |		Load	0x2,-0x1
01d2 0217       |    |		Execute	Heap_Access,All_Reference
01d3 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
01d4 0217       |    |		Execute	Heap_Access,All_Reference
01d5 2e10       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x10
01d6 0217       |    |		Execute	Heap_Access,All_Reference
01d7 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01d8 0217       |    |		Execute	Heap_Access,All_Reference
01d9 01db       |    |		Execute	Vector,Length
01da 027c       | |  |		Execute	Discrete,Less
01db 6806       |h   |		Jump_Zero	0x1e2
01dc 00d8       |    |		Load_Top	At_Offset_0
01dd 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01de 0a01       |    |		Execute_Immediate	Plus,0x1
01df 00d9       |    |		Load_Top	At_Offset_1
01e0 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01e1 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01e2 00db       |    |		Load_Top	At_Offset_3
01e3 0217       |    |		Execute	Heap_Access,All_Reference
01e4 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
01e5 0217       |    |		Execute	Heap_Access,All_Reference
01e6 2e10       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x10
01e7 0217       |    |		Execute	Heap_Access,All_Reference
01e8 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
01e9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01ea 8016       |    |		Call	0x0,0x16
01eb 6805       |h   |		Jump_Zero	0x1f1
01ec 4801       |H   |		Short_Literal	0x1
01ed e5ff       |    |		Load	0x2,-0x1
01ee 0217       |    |		Execute	Heap_Access,All_Reference
01ef 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01f0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01f1 4801       |H   |		Short_Literal	0x1
01f2 e5ff       |    |		Load	0x2,-0x1
01f3 0217       |    |		Execute	Heap_Access,All_Reference
01f4 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
01f5 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01f6 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01f7 0000       |    |		.XXX[0x1]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fb       |    |		.CONST	0x01fb								; Address of begin
01f9 0004       |    |		.CONST	0x0004								; Address of exception handler
01fa 0001       |    |		.CONST	0x0001								; Number of locals
01fb			BODY_01f8:
01fb			INIT_01f8:
01fb 00da       |    |		Load_Top	At_Offset_2
01fc 0217       |    |		Execute	Heap_Access,All_Reference
01fd 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01fe 701d       |p   |		Jump_Nonzero	0x21c
01ff 00da       |    |		Load_Top	At_Offset_2
0200 0217       |    |		Execute	Heap_Access,All_Reference
0201 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
0202 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0203 6809       |h   |		Jump_Zero	0x20d
0204 00da       |    |		Load_Top	At_Offset_2
0205 0217       |    |		Execute	Heap_Access,All_Reference
0206 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0207 0217       |    |		Execute	Heap_Access,All_Reference
0208 2e10       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x10
0209 0217       |    |		Execute	Heap_Access,All_Reference
020a 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
020b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
020c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
020d 00da       |    |		Load_Top	At_Offset_2
020e 0217       |    |		Execute	Heap_Access,All_Reference
020f 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
0210 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0211 00db       |    |		Load_Top	At_Offset_3
0212 0217       |    |		Execute	Heap_Access,All_Reference
0213 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0214 0217       |    |		Execute	Heap_Access,All_Reference
0215 2e10       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x10
0216 0217       |    |		Execute	Heap_Access,All_Reference
0217 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0218 0217       |    |		Execute	Heap_Access,All_Reference
0219 01d5       |    |		Execute	Vector,Field_Reference
021a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
021b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
021c e019       |    |		Load	0x0,0x19
021d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
021e 0000 0000  |    |		.XXX[0x2]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223       | #  |		.CONST	0x0223								; Address of begin
0221 0004       |    |		.CONST	0x0004								; Address of exception handler
0222 0001       |    |		.CONST	0x0001								; Number of locals
0223			BODY_0220:
0223			INIT_0220:
0223 00da       |    |		Load_Top	At_Offset_2
0224 0217       |    |		Execute	Heap_Access,All_Reference
0225 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0226 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0227 0000       |    |		.XXX[0x1]
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022b       | +  |		.CONST	0x022b								; Address of begin
0229 0004       |    |		.CONST	0x0004								; Address of exception handler
022a 0001       |    |		.CONST	0x0001								; Number of locals
022b			BODY_0228:
022b			INIT_0228:
022b 00d1       |    |		Pop_Control	Pop_Count_1
022c 00da       |    |		Load_Top	At_Offset_2
022d 01d8       |    |		Execute	Vector,Element_Type
022e 0322       | "  |		Declare_Variable	Record
022f 00d8       |    |		Load_Top	At_Offset_0
0230 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0231 00db       |    |		Load_Top	At_Offset_3
0232 01dc       |    |		Execute	Vector,Last
0233 e5ff       |    |		Load	0x2,-0x1
0234 01dd       |    |		Execute	Vector,First
0235 0263       | c  |		Execute	Discrete,Above_Bound
0236 7006       |p   |		Jump_Nonzero	0x23d
0237 00da       |    |		Load_Top	At_Offset_2
0238 00d9       |    |		Load_Top	At_Offset_1
0239 e5ff       |    |		Load	0x2,-0x1
023a 01d6       |    |		Execute	Vector,Field_Write
023b 0a01       |    |		Execute_Immediate	Plus,0x1
023c 7ff8       |    |		Jump	0x235
023d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
023e 0000 0000  |    |		.XXX[0x2]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0243       | C  |		.CONST	0x0243								; Address of begin
0241 0004       |    |		.CONST	0x0004								; Address of exception handler
0242 0001       |    |		.CONST	0x0001								; Number of locals
0243			BODY_0240:
0243			INIT_0240:
0243 4601       |F   |		Jump_Case	0x2
0244 7801       |x   |		Jump	0x246								; case 0x0
0245 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
0246 00da       |    |		Load_Top	At_Offset_2
0247 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0248 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0249 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
024a 0000 0000  |    |		.BLANK	0000[0x6]
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0260       | `  |		.CONST	0x0260								; Address of begin
0251 0004       |    |		.CONST	0x0004								; Address of exception handler
0252 0004       |    |		.CONST	0x0004								; Number of locals
0253			INIT_0250:
0253 e003       |    |		Load	0x0,0x3
0254 0322       | "  |		Declare_Variable	Record
0255 00d8       |    |		Load_Top	At_Offset_0
0256 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0257 00db       |    |		Load_Top	At_Offset_3
0258 00e2       |    |		Load_Encached	Integer_Cache
0259 03f1       |    |		Declare_Variable	Discrete,With_Value
025a e004       |    |		Load	0x0,0x4
025b 0322       | "  |		Declare_Variable	Record
025c e7fe       |    |		Load	0x3,-0x2
025d 801a       |    |		Call	0x0,0x1a
025e 00d9       |    |		Load_Top	At_Offset_1
025f 017d       | }  |		Execute	Record,Structure_Write
0260			BODY_0250:
0260 e405       |    |		Load	0x2,0x5
0261 6803       |h   |		Jump_Zero	0x265
0262 00d9       |    |		Load_Top	At_Offset_1
0263 0275       | u  |		Execute	Discrete,Unary_Minus
0264 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0265 00da       |    |		Load_Top	At_Offset_2
0266 4802       |H   |		Short_Literal	0x2
0267 e5fb       |    |		Load	0x2,-0x5
0268 e603       |    |		Load	0x3,0x3
0269 e5fc       |    |		Load	0x2,-0x4
026a e5fa       |    |		Load	0x2,-0x6
026b 0217       |    |		Execute	Heap_Access,All_Reference
026c 2c06       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x6
026d e5fa       |    |		Load	0x2,-0x6
026e e604       |    |		Load	0x3,0x4
026f 8009       |    |		Call	0x0,0x9
0270 e604       |    |		Load	0x3,0x4
0271 801b       |    |		Call	0x0,0x1b
0272 00d1       |    |		Pop_Control	Pop_Count_1
0273 e7fe       |    |		Load	0x3,-0x2
0274 801c       |    |		Call	0x0,0x1c
0275 6805       |h   |		Jump_Zero	0x27b
0276 00da       |    |		Load_Top	At_Offset_2
0277 e404       |    |		Load	0x2,0x4
0278 0217       |    |		Execute	Heap_Access,All_Reference
0279 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
027a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
027b 00da       |    |		Load_Top	At_Offset_2
027c e7ff       |    |		Load	0x3,-0x1
027d e404       |    |		Load	0x2,0x4
027e 0217       |    |		Execute	Heap_Access,All_Reference
027f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0280 0217       |    |		Execute	Heap_Access,All_Reference
0281 01d6       |    |		Execute	Vector,Field_Write
0282 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0283 0000 0000  |    |		.BLANK	0000[0x5]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028b       |    |		.CONST	0x028b								; Address of begin
0289 0004       |    |		.CONST	0x0004								; Address of exception handler
028a 0001       |    |		.CONST	0x0001								; Number of locals
028b			BODY_0288:
028b			INIT_0288:
028b e5fe       |    |		Load	0x2,-0x2
028c e5fd       |    |		Load	0x2,-0x3
028d e7ff       |    |		Load	0x3,-0x1
028e e5ff       |    |		Load	0x2,-0x1
028f 801d       |    |		Call	0x0,0x1d
0290 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0291 0000 0000  |    |		.BLANK	0000[0x7]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029b       |    |		.CONST	0x029b								; Address of begin
0299 0004       |    |		.CONST	0x0004								; Address of exception handler
029a 0001       |    |		.CONST	0x0001								; Number of locals
029b			BODY_0298:
029b			INIT_0298:
029b e5fc       |    |		Load	0x2,-0x4
029c e403       |    |		Load	0x2,0x3
029d e5ff       |    |		Load	0x2,-0x1
029e e7ff       |    |		Load	0x3,-0x1
029f 801e       |    |		Call	0x0,0x1e
02a0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02a1 0000 0000  |    |		.BLANK	0000[0x7]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ab       |    |		.CONST	0x02ab								; Address of begin
02a9 0004       |    |		.CONST	0x0004								; Address of exception handler
02aa 0001       |    |		.CONST	0x0001								; Number of locals
02ab			BODY_02a8:
02ab			INIT_02a8:
02ab 4601       |F   |		Jump_Case	0x2
02ac 7801       |x   |		Jump	0x2ae								; case 0x0
02ad 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
02ae 4801       |H   |		Short_Literal	0x1
02af 00db       |    |		Load_Top	At_Offset_3
02b0 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
02b1 4800       |H   |		Short_Literal	0x0
02b2 00db       |    |		Load_Top	At_Offset_3
02b3 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
02b4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
02b5 ; --------------------------------------------------------------------------------------
02b5 ; STRING TABLE
02b5 ; --------------------------------------------------------------------------------------
02b5 0004       |    |		.STRTAB	0x0004->0x02b7							; "Register coverage on a head breakpoint of an if stmt"
02b6 0036       | 6  |		.STREND 0x0036->0x02d1
02b7 5265 6769  |Regi|		.STRTAB_STRINGS
02d1 0000 0000  |    |		.BLANK	0000[0x7]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; Debug Table
02d8 ; --------------------------------------------------------------------------------------
02d8 0004 000a  |    |		.DEBUG4	0x0004,0x000a,0xa1b1,0x0000,0x0001,0x0000
02de 0000 0000  |    |		.BLANK	0000[0x122]