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

⟦127ad0190⟧

    Length: 3072 (0xc00)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03bcfe

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 0528       | (  |		.CONST	0x0528								; 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 8003       |    |		.CONST	0x8003								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0010       |    |		.CONST	0x0010								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0001       |    |		.CONST	0x0001								; Number of locals
000b			INIT_0008:
000b 029a 001b  |    |		Declare_Subprogram	INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 00bf       |    |		Action	Accept_Activation
000e 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
000f 00c7       |    |		Action	Elaborate_Subprogram
0010			BODY_0008:
0010 00bc       |    |		Action	Signal_Activated
0011 00bb       |    |		Action	Signal_Completion
0012 0000 0000  |    |		.BLANK	0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 005a       | Z  |		.CONST	0x005a								; Address of begin
0019 008b       |    |		.CONST	0x008b								; Address of exception handler
001a 0014       |    |		.CONST	0x0014								; Number of locals
001b			INIT_0018:
001b 0092 0469  |   i|		Action	Push_String_Extended,0x469					; "Show_Snapshot_Times"
001d e002       |    |		Load	0x0,0x2
001e 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
001f 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0020 02c7       |    |		Declare_Variable	Any
0021 00d8       |    |		Load_Top	At_Offset_0
0022 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0023 e002       |    |		Load	0x0,0x2
0024 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0025 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0026 4800       |H   |		Short_Literal	0x0
0027 4850       |HP  |		Short_Literal	0x50
0028 00e2       |    |		Load_Encached	Integer_Cache
0029 03f8       |    |		Declare_Type	Discrete,Constrained
002a 4800       |H   |		Short_Literal	0x0
002b 4850       |HP  |		Short_Literal	0x50
002c 00e2       |    |		Load_Encached	Integer_Cache
002d 02a0       |    |		Declare_Subprogram	Null_Subprogram
002e 4801       |H   |		Short_Literal	0x1
002f 035d       | ]  |		Declare_Type	Array,Defined
0030 00e2       |    |		Load_Encached	Integer_Cache
0031 00e2       |    |		Load_Encached	Integer_Cache
0032 00e2       |    |		Load_Encached	Integer_Cache
0033 00e2       |    |		Load_Encached	Integer_Cache
0034 00e7       |    |		Load_Encached	Duration_Cache
0035 00e7       |    |		Load_Encached	Duration_Cache
0036 e406       |    |		Load	0x2,0x6
0037 029f 00a3  |    |		Declare_Subprogram	INIT_00a0,For_Call
0039 4807       |H   |		Short_Literal	0x7
003a 032d       | -  |		Declare_Type	Record,Defined
003b 00d8       |    |		Load_Top	At_Offset_0
003c 0322       | "  |		Declare_Variable	Record
003d 00d8       |    |		Load_Top	At_Offset_0
003e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
003f e003       |    |		Load	0x0,0x3
0040 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0041 02c7       |    |		Declare_Variable	Any
0042 00d8       |    |		Load_Top	At_Offset_0
0043 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0044 029f 00d3  |    |		Declare_Subprogram	INIT_00d0,For_Call
0046 029f 00fb  |    |		Declare_Subprogram	INIT_00f8,For_Call
0048 029f 014b  |   K|		Declare_Subprogram	INIT_0148,For_Call
004a 029f 0163  |   c|		Declare_Subprogram	INIT_0160,For_Call
004c 029f 0183  |    |		Declare_Subprogram	INIT_0180,For_Call
004e 029f 01a3  |    |		Declare_Subprogram	INIT_01a0,For_Call
0050 029f 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Call
0052 029f 0203  |    |		Declare_Subprogram	INIT_0200,For_Call
0054 029f 022b  |   +|		Declare_Subprogram	INIT_0228,For_Call
0056 029f 02db  |    |		Declare_Subprogram	INIT_02d8,For_Call
0058 029f 038b  |    |		Declare_Subprogram	INIT_0388,For_Call
005a			BODY_0018:
005a 840b       |    |		Call	0x2,0xb
005b e002       |    |		Load	0x0,0x2
005c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
005d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
005e e403       |    |		Load	0x2,0x3
005f 6038       |`8  |		Indirect_Literal	Discrete,0x98,{0x00000000, 0x00004000}
0060 e004       |    |		Load	0x0,0x4
0061 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0062 e005       |    |		Load	0x0,0x5
0063 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0064 e006       |    |		Load	0x0,0x6
0065 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0066 4801       |H   |		Short_Literal	0x1
0067 4800       |H   |		Short_Literal	0x0
0068 e005       |    |		Load	0x0,0x5
0069 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
006a e002       |    |		Load	0x0,0x2
006b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
006c 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
006d e5ff       |    |		Load	0x2,-0x1
006e e002       |    |		Load	0x0,0x2
006f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0070 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0071 c403       |    |		Store	0x2,0x3
0072 c404       |    |		Store	0x2,0x4
0073 00cf       |    |		Action	Mark_Auxiliary
0074 780b       |x   |		Jump	0x80
0075 e403       |    |		Load	0x2,0x3
0076 e002       |    |		Load	0x0,0x2
0077 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0078 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0079 8414       |    |		Call	0x2,0x14
007a e403       |    |		Load	0x2,0x3
007b e002       |    |		Load	0x0,0x2
007c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
007d 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
007e c403       |    |		Store	0x2,0x3
007f 00c9       |    |		Action	Pop_Auxiliary_Loop
0080 e403       |    |		Load	0x2,0x3
0081 e002       |    |		Load	0x0,0x2
0082 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0083 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0084 6ff0       |o   |		Jump_Zero	0x75
0085 00ce       |    |		Action	Pop_Auxiliary
0086 e408       |    |		Load	0x2,0x8
0087 8413       |    |		Call	0x2,0x13
0088 00ea       |    |		Load_Encached	Null_String_Cache
0089 840c       |    |		Call	0x2,0xc
008a 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
008b			TRAP_0018:
008b 0007       |    |		Action	Break_Optional
008c e409       |    |		Load	0x2,0x9
008d 4807       |H   |		Short_Literal	0x7
008e 0092 046a  |   j|		Action	Push_String_Extended,0x46a					; "Unexpected exception: "
0090 e007       |    |		Load	0x0,0x7
0091 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0092 01cc       |    |		Execute	Vector,Catenate
0093 e008       |    |		Load	0x0,0x8
0094 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0095 00ea       |    |		Load_Encached	Null_String_Cache
0096 840c       |    |		Call	0x2,0xc
0097 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0098 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
009c 0000 0000  |    |		.BLANK	0000[0x4]
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 4601       |F   |		Jump_Case	0x2
00a4 7801       |x   |		Jump	0xa6								; case 0x0
00a5 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
00a6 4800       |H   |		Short_Literal	0x0
00a7 e7ff       |    |		Load	0x3,-0x1
00a8 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00a9 4800       |H   |		Short_Literal	0x0
00aa e7ff       |    |		Load	0x3,-0x1
00ab 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00ac 4800       |H   |		Short_Literal	0x0
00ad e7ff       |    |		Load	0x3,-0x1
00ae 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
00af 4800       |H   |		Short_Literal	0x0
00b0 e7ff       |    |		Load	0x3,-0x1
00b1 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
00b2 4800       |H   |		Short_Literal	0x0
00b3 e7ff       |    |		Load	0x3,-0x1
00b4 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
00b5 4800       |H   |		Short_Literal	0x0
00b6 e7ff       |    |		Load	0x3,-0x1
00b7 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
00b8 e407       |    |		Load	0x2,0x7
00b9 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
00ba 0337       | 7  |		Declare_Variable	Array
00bb 4850       |HP  |		Short_Literal	0x50
00bc 4800       |H   |		Short_Literal	0x0
00bd 4800       |H   |		Short_Literal	0x0
00be e604       |    |		Load	0x3,0x4
00bf e602       |    |		Load	0x3,0x2
00c0 01d6       |    |		Execute	Vector,Field_Write
00c1 3ffb       |?   |		Loop_Increasing	0xbd
00c2 e7ff       |    |		Load	0x3,-0x1
00c3 00d9       |    |		Load_Top	At_Offset_1
00c4 00d9       |    |		Load_Top	At_Offset_1
00c5 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
00c6 0119       |    |		Execute	Any,Check_In_Formal_Type
00c7 00d1       |    |		Pop_Control	Pop_Count_1
00c8 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
00c9 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
00ca 0000 0000  |    |		.BLANK	0000[0x6]
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 e7ff       |    |		Load	0x3,-0x1
00d4 01db       |    |		Execute	Vector,Length
00d5 7003       |p   |		Jump_Nonzero	0xd9
00d6 0092 046b  |   k|		Action	Push_String_Extended,0x46b					; "\x22\x22"
00d8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00d9 e7ff       |    |		Load	0x3,-0x1
00da 01dd       |    |		Execute	Vector,First
00db e7ff       |    |		Load	0x3,-0x1
00dc 01d7       |    |		Execute	Vector,Field_Read
00dd 0f2b       | +  |		Execute_Immediate	Equal,0x2b
00de 680d       |h   |		Jump_Zero	0xec
00df e7ff       |    |		Load	0x3,-0x1
00e0 01dd       |    |		Execute	Vector,First
00e1 0a01       |    |		Execute_Immediate	Plus,0x1
00e2 00d8       |    |		Load_Top	At_Offset_0
00e3 00e2       |    |		Load_Encached	Integer_Cache
00e4 0260       | `  |		Execute	Discrete,In_Type
00e5 7001       |p   |		Jump_Nonzero	0xe7
00e6 0801       |    |		Execute_Immediate	Raise,0x1
00e7 e7ff       |    |		Load	0x3,-0x1
00e8 01dc       |    |		Execute	Vector,Last
00e9 e7ff       |    |		Load	0x3,-0x1
00ea 01cf       |    |		Execute	Vector,Slice_Read
00eb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00ec 0092 046c  |   l|		Action	Push_String_Extended,0x46c					; "\x22"
00ee e7ff       |    |		Load	0x3,-0x1
00ef 01cc       |    |		Execute	Vector,Catenate
00f0 0092 046c  |   l|		Action	Push_String_Extended,0x46c					; "\x22"
00f2 01cc       |    |		Execute	Vector,Catenate
00f3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00f4 0000 0000  |    |		.BLANK	0000[0x4]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 0100       |    |		.CONST	0x0100								; Address of begin
00f9 0004       |    |		.CONST	0x0004								; Address of exception handler
00fa 0002       |    |		.CONST	0x0002								; Number of locals
00fb			INIT_00f8:
00fb e009       |    |		Load	0x0,0x9
00fc 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00fd 02c7       |    |		Declare_Variable	Any
00fe 00d8       |    |		Load_Top	At_Offset_0
00ff 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0100			BODY_00f8:
0100 00d8       |    |		Load_Top	At_Offset_0
0101 e409       |    |		Load	0x2,0x9
0102 0120       |    |		Execute	Any,Is_Value
0103 6803       |h   |		Jump_Zero	0x107
0104 e003       |    |		Load	0x0,0x3
0105 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0106 7801       |x   |		Jump	0x108
0107 e409       |    |		Load	0x2,0x9
0108 e5fb       |    |		Load	0x2,-0x5
0109 e003       |    |		Load	0x0,0x3
010a 184c       | L  |		Execute	Package,Field_Execute,Field_Number 0x4c
010b c409       |    |		Store	0x2,0x9
010c c602       |    |		Store	0x3,0x2
010d e409       |    |		Load	0x2,0x9
010e 4800       |H   |		Short_Literal	0x0
010f 0092 046d  |   m|		Action	Push_String_Extended,0x46d					; "[Show_Snapshot_Times ("
0111 e5ff       |    |		Load	0x2,-0x1
0112 840a       |    |		Call	0x2,0xa
0113 01cc       |    |		Execute	Vector,Catenate
0114 0092 046e  |   n|		Action	Push_String_Extended,0x46e					; ", "
0116 01cc       |    |		Execute	Vector,Catenate
0117 4820       |H   |		Short_Literal	0x20
0118 4800       |H   |		Short_Literal	0x0
0119 480a       |H   |		Short_Literal	0xa
011a e5fe       |    |		Load	0x2,-0x2
011b e00a       |    |		Load	0x0,0xa
011c 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
011d 01cc       |    |		Execute	Vector,Catenate
011e 0092 046e  |   n|		Action	Push_String_Extended,0x46e					; ", "
0120 01cc       |    |		Execute	Vector,Catenate
0121 4820       |H   |		Short_Literal	0x20
0122 4800       |H   |		Short_Literal	0x0
0123 480a       |H   |		Short_Literal	0xa
0124 e5fd       |    |		Load	0x2,-0x3
0125 e00a       |    |		Load	0x0,0xa
0126 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0127 01cc       |    |		Execute	Vector,Catenate
0128 0092 046e  |   n|		Action	Push_String_Extended,0x46e					; ", "
012a 01cc       |    |		Execute	Vector,Catenate
012b e5fc       |    |		Load	0x2,-0x4
012c 00e1       |    |		Load_Encached	Boolean_Cache
012d 011c       |    |		Execute	Any,Convert_Unchecked
012e 1c01       |    |		Execute_Immediate	Run_Utility,0x1
012f 01cc       |    |		Execute	Vector,Catenate
0130 0092 046e  |   n|		Action	Push_String_Extended,0x46e					; ", "
0132 01cc       |    |		Execute	Vector,Catenate
0133 e5fb       |    |		Load	0x2,-0x5
0134 840a       |    |		Call	0x2,0xa
0135 01cc       |    |		Execute	Vector,Catenate
0136 0092 046f  |   o|		Action	Push_String_Extended,0x46f					; ")]"
0138 01cc       |    |		Execute	Vector,Catenate
0139 e008       |    |		Load	0x0,0x8
013a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
013b e003       |    |		Load	0x0,0x3
013c 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
013d e602       |    |		Load	0x3,0x2
013e e008       |    |		Load	0x0,0x8
013f 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0140 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0141 0000 0000  |    |		.BLANK	0000[0x7]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014d       | M  |		.CONST	0x014d								; Address of begin
0149 0004       |    |		.CONST	0x0004								; Address of exception handler
014a 0002       |    |		.CONST	0x0002								; Number of locals
014b			INIT_0148:
014b 029f 03eb  |    |		Declare_Subprogram	INIT_03e8,For_Call
014d			BODY_0148:
014d e409       |    |		Load	0x2,0x9
014e 4800       |H   |		Short_Literal	0x0
014f 0092 0470  |   p|		Action	Push_String_Extended,0x470					; "[end of Show_Snapshot_Times"
0151 8602       |    |		Call	0x3,0x2
0152 01cc       |    |		Execute	Vector,Catenate
0153 0092 0471  |   q|		Action	Push_String_Extended,0x471					; "]"
0155 01cc       |    |		Execute	Vector,Catenate
0156 e008       |    |		Load	0x0,0x8
0157 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0158 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0159 0000 0000  |    |		.BLANK	0000[0x7]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0169       | i  |		.CONST	0x0169								; Address of begin
0161 0004       |    |		.CONST	0x0004								; Address of exception handler
0162 0002       |    |		.CONST	0x0002								; Number of locals
0163			INIT_0160:
0163 480b       |H   |		Short_Literal	0xb
0164 e00b       |    |		Load	0x0,0xb
0165 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0166 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0167 00d8       |    |		Load_Top	At_Offset_0
0168 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0169			BODY_0160:
0169 00d8       |    |		Load_Top	At_Offset_0
016a 4820       |H   |		Short_Literal	0x20
016b 480b       |H   |		Short_Literal	0xb
016c e7ff       |    |		Load	0x3,-0x1
016d 01db       |    |		Execute	Vector,Length
016e 0272       | r  |		Execute	Discrete,Minus
016f 00d8       |    |		Load_Top	At_Offset_0
0170 00e3       |    |		Load_Encached	Natural_Cache
0171 0260       | `  |		Execute	Discrete,In_Type
0172 7001       |p   |		Jump_Nonzero	0x174
0173 0801       |    |		Execute_Immediate	Raise,0x1
0174 e00b       |    |		Load	0x0,0xb
0175 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0176 00d1       |    |		Pop_Control	Pop_Count_1
0177 00d8       |    |		Load_Top	At_Offset_0
0178 e7ff       |    |		Load	0x3,-0x1
0179 e00b       |    |		Load	0x0,0xb
017a 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
017b 00d1       |    |		Pop_Control	Pop_Count_1
017c 00d8       |    |		Load_Top	At_Offset_0
017d e00b       |    |		Load	0x0,0xb
017e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
017f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0183       |    |		.CONST	0x0183								; Address of begin
0181 0004       |    |		.CONST	0x0004								; Address of exception handler
0182 0001       |    |		.CONST	0x0001								; Number of locals
0183			BODY_0180:
0183			INIT_0180:
0183 e7ff       |    |		Load	0x3,-0x1
0184 00d8       |    |		Load_Top	At_Offset_0
0185 0c00       |    |		Execute_Immediate	Greater_Equal,0x0
0186 7002       |p   |		Jump_Nonzero	0x189
0187 6010       |`   |		Indirect_Literal	Discrete,0x198,{0xffffffff, 0xffffc000}
0188 7801       |x   |		Jump	0x18a
0189 600a       |`   |		Indirect_Literal	Discrete,0x194,{0x00000000, 0x00004000}
018a 0273       | s  |		Execute	Discrete,Plus
018b 09f1       |    |		Execute_Immediate	Binary_Scale,-0xf
018c 00e2       |    |		Load_Encached	Integer_Cache
018d 025e       | ^  |		Execute	Discrete,Convert
018e 00e0       |    |		Load_Encached	Standard_Cache
018f 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0190 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0191 0000 0000  |    |		.XXX[0x3]
0193 0000       |    |
0194 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0198 ffff ffff  |    |		.LITERAL	{0xffffffff, 0xffffc000}
019c 0000 0000  |    |		.BLANK	0000[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 e7ff       |    |		Load	0x3,-0x1
01a4 0237       | 7  |		Execute	Float,Convert_From_Discrete
01a5 580e       |X   |		Indirect_Literal	Float,0x1b4,3.0517578125e-05
01a6 023b       | ;  |		Execute	Float,Times
01a7 e7fe       |    |		Load	0x3,-0x2
01a8 0237       | 7  |		Execute	Float,Convert_From_Discrete
01a9 580a       |X   |		Indirect_Literal	Float,0x1b4,3.0517578125e-05
01aa 023b       | ;  |		Execute	Float,Times
01ab 023b       | ;  |		Execute	Float,Times
01ac 5807       |X   |		Indirect_Literal	Float,0x1b4,3.0517578125e-05
01ad 023a       | :  |		Execute	Float,Divide
01ae 0235       | 5  |		Execute	Float,Round_To_Discrete
01af 00e7       |    |		Load_Encached	Duration_Cache
01b0 025e       | ^  |		Execute	Discrete,Convert
01b1 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01b2 0000 0000  |    |		.XXX[0x2]
01b4 3f00 0000  |?   |		.DBL	3.0517578125e-05
01b6 0000 0000  |    |
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01c6       |    |		.CONST	0x01c6								; Address of begin
01b9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ba 0005       |    |		.CONST	0x0005								; Number of locals
01bb			INIT_01b8:
01bb e7ff       |    |		Load	0x3,-0x1
01bc 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
01bd 00e7       |    |		Load_Encached	Duration_Cache
01be 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
01bf e7ff       |    |		Load	0x3,-0x1
01c0 00e7       |    |		Load_Encached	Duration_Cache
01c1 03f1       |    |		Declare_Variable	Discrete,With_Value
01c2 6035       |`5  |		Indirect_Literal	Discrete,0x1f8,{0x00000000, 0x00008000}
01c3 00e7       |    |		Load_Encached	Duration_Cache
01c4 03f1       |    |		Declare_Variable	Discrete,With_Value
01c5 00e7       |    |		Load_Encached	Duration_Cache
01c6			BODY_01b8:
01c6 e7ff       |    |		Load	0x3,-0x1
01c7 0d01       |    |		Execute_Immediate	Less,0x1
01c8 6802       |h   |		Jump_Zero	0x1cb
01c9 4800       |H   |		Short_Literal	0x0
01ca 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01cb 00cf       |    |		Action	Mark_Auxiliary
01cc 4864       |Hd  |		Short_Literal	0x64
01cd 4801       |H   |		Short_Literal	0x1
01ce 0007       |    |		Action	Break_Optional
01cf e602       |    |		Load	0x3,0x2
01d0 00d8       |    |		Load_Top	At_Offset_0
01d1 840f       |    |		Call	0x2,0xf
01d2 a605       |    |		Store_Unchecked	0x3,0x5
01d3 e605       |    |		Load	0x3,0x5
01d4 e7ff       |    |		Load	0x3,-0x1
01d5 0272       | r  |		Execute	Discrete,Minus
01d6 0274       | t  |		Execute	Discrete,Absolute_Value
01d7 6020       |`   |		Indirect_Literal	Discrete,0x1f8,{0x00000000, 0x00008000}
01d8 027c       | |  |		Execute	Discrete,Less
01d9 6802       |h   |		Jump_Zero	0x1dc
01da e602       |    |		Load	0x3,0x2
01db 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01dc e605       |    |		Load	0x3,0x5
01dd e7ff       |    |		Load	0x3,-0x1
01de 027d       | }  |		Execute	Discrete,Greater
01df 6808       |h   |		Jump_Zero	0x1e8
01e0 e602       |    |		Load	0x3,0x2
01e1 a603       |    |		Store_Unchecked	0x3,0x3
01e2 e602       |    |		Load	0x3,0x2
01e3 e604       |    |		Load	0x3,0x4
01e4 0273       | s  |		Execute	Discrete,Plus
01e5 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
01e6 c602       |    |		Store	0x3,0x2
01e7 780b       |x   |		Jump	0x1f3
01e8 e605       |    |		Load	0x3,0x5
01e9 e7ff       |    |		Load	0x3,-0x1
01ea 027c       | |  |		Execute	Discrete,Less
01eb 6807       |h   |		Jump_Zero	0x1f3
01ec e602       |    |		Load	0x3,0x2
01ed a604       |    |		Store_Unchecked	0x3,0x4
01ee e602       |    |		Load	0x3,0x2
01ef e603       |    |		Load	0x3,0x3
01f0 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
01f1 0273       | s  |		Execute	Discrete,Plus
01f2 c602       |    |		Store	0x3,0x2
01f3 00c8       |    |		Action	Pop_Auxiliary_Range
01f4 3fda       |?   |		Loop_Increasing	0x1cf
01f5 00ce       |    |		Action	Pop_Auxiliary
01f6 e602       |    |		Load	0x3,0x2
01f7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008000}
01fc 0000 0000  |    |		.BLANK	0000[0x4]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0204       |    |		.CONST	0x0204								; Address of begin
0201 021e       |    |		.CONST	0x021e								; Address of exception handler
0202 0002       |    |		.CONST	0x0002								; Number of locals
0203			INIT_0200:
0203 00e2       |    |		Load_Encached	Integer_Cache
0204			BODY_0200:
0204 e7ff       |    |		Load	0x3,-0x1
0205 01dd       |    |		Execute	Vector,First
0206 e7ff       |    |		Load	0x3,-0x1
0207 01dd       |    |		Execute	Vector,First
0208 0a01       |    |		Execute_Immediate	Plus,0x1
0209 00d8       |    |		Load_Top	At_Offset_0
020a 00e2       |    |		Load_Encached	Integer_Cache
020b 0260       | `  |		Execute	Discrete,In_Type
020c 7001       |p   |		Jump_Nonzero	0x20e
020d 0801       |    |		Execute_Immediate	Raise,0x1
020e e7ff       |    |		Load	0x3,-0x1
020f 01cf       |    |		Execute	Vector,Slice_Read
0210 00e2       |    |		Load_Encached	Integer_Cache
0211 00e0       |    |		Load_Encached	Standard_Cache
0212 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0213 a602       |    |		Store_Unchecked	0x3,0x2
0214 00d8       |    |		Load_Top	At_Offset_0
0215 e5fe       |    |		Load	0x2,-0x2
0216 027c       | |  |		Execute	Discrete,Less
0217 7004       |p   |		Jump_Nonzero	0x21c
0218 00d8       |    |		Load_Top	At_Offset_0
0219 e5fd       |    |		Load	0x2,-0x3
021a 027b       | {  |		Execute	Discrete,Greater_Equal
021b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
021c 4801       |H   |		Short_Literal	0x1
021d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
021e			TRAP_0200:
021e 0007       |    |		Action	Break_Optional
021f 4800       |H   |		Short_Literal	0x0
0220 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0221 0000 0000  |    |		.BLANK	0000[0x7]
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022d       | -  |		.CONST	0x022d								; Address of begin
0229 0292       |    |		.CONST	0x0292								; Address of exception handler
022a 0002       |    |		.CONST	0x0002								; Number of locals
022b			INIT_0228:
022b e405       |    |		Load	0x2,0x5
022c 0007       |    |		Action	Break_Optional
022d			BODY_0228:
022d e7fe       |    |		Load	0x3,-0x2
022e 8411       |    |		Call	0x2,0x11
022f 6801       |h   |		Jump_Zero	0x231
0230 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0231 e7fd       |    |		Load	0x3,-0x3
0232 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0233 0a01       |    |		Execute_Immediate	Plus,0x1
0234 e7fd       |    |		Load	0x3,-0x3
0235 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0236 e7fd       |    |		Load	0x3,-0x3
0237 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0238 e7ff       |    |		Load	0x3,-0x1
0239 0273       | s  |		Execute	Discrete,Plus
023a e7fd       |    |		Load	0x3,-0x3
023b 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
023c e7fd       |    |		Load	0x3,-0x3
023d 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
023e e7ff       |    |		Load	0x3,-0x1
023f 00d8       |    |		Load_Top	At_Offset_0
0240 840f       |    |		Call	0x2,0xf
0241 0273       | s  |		Execute	Discrete,Plus
0242 e7fd       |    |		Load	0x3,-0x3
0243 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0244 e7ff       |    |		Load	0x3,-0x1
0245 00d8       |    |		Load_Top	At_Offset_0
0246 0c00       |    |		Execute_Immediate	Greater_Equal,0x0
0247 7002       |p   |		Jump_Nonzero	0x24a
0248 6087       |`   |		Indirect_Literal	Discrete,0x2d0,{0xffffffff, 0xffffc000}
0249 7801       |x   |		Jump	0x24b
024a 6081       |`   |		Indirect_Literal	Discrete,0x2cc,{0x00000000, 0x00004000}
024b 0273       | s  |		Execute	Discrete,Plus
024c 09f1       |    |		Execute_Immediate	Binary_Scale,-0xf
024d 00e2       |    |		Load_Encached	Integer_Cache
024e 025e       | ^  |		Execute	Discrete,Convert
024f 480f       |H   |		Short_Literal	0xf
0250 0270       | p  |		Execute	Discrete,Divide
0251 00d8       |    |		Load_Top	At_Offset_0
0252 e405       |    |		Load	0x2,0x5
0253 0260       | `  |		Execute	Discrete,In_Type
0254 7001       |p   |		Jump_Nonzero	0x256
0255 0801       |    |		Execute_Immediate	Raise,0x1
0256 a602       |    |		Store_Unchecked	0x3,0x2
0257 00d8       |    |		Load_Top	At_Offset_0
0258 e7fd       |    |		Load	0x3,-0x3
0259 3406       |4   |		Execute	Record,Field_Reference,Field_Number 0x6
025a 01d7       |    |		Execute	Vector,Field_Read
025b 0a01       |    |		Execute_Immediate	Plus,0x1
025c e602       |    |		Load	0x3,0x2
025d e7fd       |    |		Load	0x3,-0x3
025e 3406       |4   |		Execute	Record,Field_Reference,Field_Number 0x6
025f 01d6       |    |		Execute	Vector,Field_Write
0260 e7ff       |    |		Load	0x3,-0x1
0261 6066       |`f  |		Indirect_Literal	Discrete,0x2c8,{0x00000000, 0x003c0000}
0262 027d       | }  |		Execute	Discrete,Greater
0263 682d       |h-  |		Jump_Zero	0x291
0264 e7fe       |    |		Load	0x3,-0x2
0265 0092 0472  |   r|		Action	Push_String_Extended,0x472					; " =>"
0267 01cc       |    |		Execute	Vector,Catenate
0268 e7ff       |    |		Load	0x3,-0x1
0269 00d8       |    |		Load_Top	At_Offset_0
026a 0c00       |    |		Execute_Immediate	Greater_Equal,0x0
026b 7002       |p   |		Jump_Nonzero	0x26e
026c 6063       |`c  |		Indirect_Literal	Discrete,0x2d0,{0xffffffff, 0xffffc000}
026d 7801       |x   |		Jump	0x26f
026e 605d       |`]  |		Indirect_Literal	Discrete,0x2cc,{0x00000000, 0x00004000}
026f 0273       | s  |		Execute	Discrete,Plus
0270 09f1       |    |		Execute_Immediate	Binary_Scale,-0xf
0271 00e2       |    |		Load_Encached	Integer_Cache
0272 025e       | ^  |		Execute	Discrete,Convert
0273 00e0       |    |		Load_Encached	Standard_Cache
0274 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0275 01cc       |    |		Execute	Vector,Catenate
0276 e00c       |    |		Load	0x0,0xc
0277 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0278 e7ff       |    |		Load	0x3,-0x1
0279 604a       |`J  |		Indirect_Literal	Discrete,0x2c4,{0x00000000, 0x00b40000}
027a 027d       | }  |		Execute	Discrete,Greater
027b 6806       |h   |		Jump_Zero	0x282
027c e7fd       |    |		Load	0x3,-0x3
027d 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
027e 0a01       |    |		Execute_Immediate	Plus,0x1
027f e7fd       |    |		Load	0x3,-0x3
0280 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0281 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0282 e7ff       |    |		Load	0x3,-0x1
0283 603c       |`<  |		Indirect_Literal	Discrete,0x2c0,{0x00000000, 0x00780000}
0284 027d       | }  |		Execute	Discrete,Greater
0285 6806       |h   |		Jump_Zero	0x28c
0286 e7fd       |    |		Load	0x3,-0x3
0287 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0288 0a01       |    |		Execute_Immediate	Plus,0x1
0289 e7fd       |    |		Load	0x3,-0x3
028a 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
028b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
028c e7fd       |    |		Load	0x3,-0x3
028d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
028e 0a01       |    |		Execute_Immediate	Plus,0x1
028f e7fd       |    |		Load	0x3,-0x3
0290 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0291 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0292			TRAP_0228:
0292 0007       |    |		Action	Break_Optional
0293 e7ff       |    |		Load	0x3,-0x1
0294 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0295 6823       |h#  |		Jump_Zero	0x2b9
0296 e7fd       |    |		Load	0x3,-0x3
0297 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0298 0a01       |    |		Execute_Immediate	Plus,0x1
0299 e7fd       |    |		Load	0x3,-0x3
029a 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
029b 4850       |HP  |		Short_Literal	0x50
029c e7fd       |    |		Load	0x3,-0x3
029d 3406       |4   |		Execute	Record,Field_Reference,Field_Number 0x6
029e 01d7       |    |		Execute	Vector,Field_Read
029f 0a01       |    |		Execute_Immediate	Plus,0x1
02a0 4850       |HP  |		Short_Literal	0x50
02a1 e7fd       |    |		Load	0x3,-0x3
02a2 3406       |4   |		Execute	Record,Field_Reference,Field_Number 0x6
02a3 01d6       |    |		Execute	Vector,Field_Write
02a4 e7fe       |    |		Load	0x3,-0x2
02a5 0092 0472  |   r|		Action	Push_String_Extended,0x472					; " =>"
02a7 01cc       |    |		Execute	Vector,Catenate
02a8 e7ff       |    |		Load	0x3,-0x1
02a9 00d8       |    |		Load_Top	At_Offset_0
02aa 0c00       |    |		Execute_Immediate	Greater_Equal,0x0
02ab 7002       |p   |		Jump_Nonzero	0x2ae
02ac 6023       |`#  |		Indirect_Literal	Discrete,0x2d0,{0xffffffff, 0xffffc000}
02ad 7801       |x   |		Jump	0x2af
02ae 601d       |`   |		Indirect_Literal	Discrete,0x2cc,{0x00000000, 0x00004000}
02af 0273       | s  |		Execute	Discrete,Plus
02b0 09f1       |    |		Execute_Immediate	Binary_Scale,-0xf
02b1 00e2       |    |		Load_Encached	Integer_Cache
02b2 025e       | ^  |		Execute	Discrete,Convert
02b3 00e0       |    |		Load_Encached	Standard_Cache
02b4 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02b5 01cc       |    |		Execute	Vector,Catenate
02b6 e00c       |    |		Load	0x0,0xc
02b7 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
02b8 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02b9 e7fe       |    |		Load	0x3,-0x2
02ba 0092 0473  |   s|		Action	Push_String_Extended,0x473					; " => Unable to process time."
02bc 01cc       |    |		Execute	Vector,Catenate
02bd e00c       |    |		Load	0x0,0xc
02be 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
02bf 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02c0 0000 0000  |    |		.LITERAL	{0x00000000, 0x00780000}
02c4 0000 0000  |    |		.LITERAL	{0x00000000, 0x00b40000}
02c8 0000 0000  |    |		.LITERAL	{0x00000000, 0x003c0000}
02cc 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
02d0 ffff ffff  |    |		.LITERAL	{0xffffffff, 0xffffc000}
02d4 0000 0000  |    |		.BLANK	0000[0x4]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02e4       |    |		.CONST	0x02e4								; Address of begin
02d9 0004       |    |		.CONST	0x0004								; Address of exception handler
02da 0002       |    |		.CONST	0x0002								; Number of locals
02db			INIT_02d8:
02db e00d       |    |		Load	0x0,0xd
02dc e00e       |    |		Load	0x0,0xe
02dd 4802       |H   |		Short_Literal	0x2
02de 0092 0474  |   t|		Action	Push_String_Extended,0x474					; " "
02e0 e00f       |    |		Load	0x0,0xf
02e1 0387       |    |		Declare_Variable	Package
02e2 00d8       |    |		Load_Top	At_Offset_0
02e3 020f       |    |		Execute	Module,Activate
02e4			BODY_02d8:
02e4 4801       |H   |		Short_Literal	0x1
02e5 0092 0475  |   u|		Action	Push_String_Extended,0x475					; "Value"
02e7 e602       |    |		Load	0x3,0x2
02e8 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02e9 4800       |H   |		Short_Literal	0x0
02ea 0092 0476  |   v|		Action	Push_String_Extended,0x476					; "Attribute"
02ec e602       |    |		Load	0x3,0x2
02ed 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02ee e7ff       |    |		Load	0x3,-0x1
02ef 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02f0 00e0       |    |		Load_Encached	Standard_Cache
02f1 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02f2 e602       |    |		Load	0x3,0x2
02f3 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02f4 0092 0477  |   w|		Action	Push_String_Extended,0x477					; "Snapshots"
02f6 e602       |    |		Load	0x3,0x2
02f7 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02f8 e7ff       |    |		Load	0x3,-0x1
02f9 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
02fa e7ff       |    |		Load	0x3,-0x1
02fb 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02fc 0270       | p  |		Execute	Discrete,Divide
02fd 00d8       |    |		Load_Top	At_Offset_0
02fe 00e7       |    |		Load_Encached	Duration_Cache
02ff 0260       | `  |		Execute	Discrete,In_Type
0300 7001       |p   |		Jump_Nonzero	0x302
0301 0801       |    |		Execute_Immediate	Raise,0x1
0302 840e       |    |		Call	0x2,0xe
0303 e602       |    |		Load	0x3,0x2
0304 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0305 0092 0478  |   x|		Action	Push_String_Extended,0x478					; "Average length"
0307 e602       |    |		Load	0x3,0x2
0308 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0309 e7ff       |    |		Load	0x3,-0x1
030a 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
030b e7ff       |    |		Load	0x3,-0x1
030c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
030d 0270       | p  |		Execute	Discrete,Divide
030e 00d8       |    |		Load_Top	At_Offset_0
030f 00e7       |    |		Load_Encached	Duration_Cache
0310 0260       | `  |		Execute	Discrete,In_Type
0311 7001       |p   |		Jump_Nonzero	0x313
0312 0801       |    |		Execute_Immediate	Raise,0x1
0313 8410       |    |		Call	0x2,0x10
0314 840e       |    |		Call	0x2,0xe
0315 e602       |    |		Load	0x3,0x2
0316 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0317 0092 0479  |   y|		Action	Push_String_Extended,0x479					; "RMS"
0319 e602       |    |		Load	0x3,0x2
031a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
031b e7ff       |    |		Load	0x3,-0x1
031c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
031d 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
031e 680a       |h   |		Jump_Zero	0x329
031f e7ff       |    |		Load	0x3,-0x1
0320 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0321 00e0       |    |		Load_Encached	Standard_Cache
0322 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0323 e602       |    |		Load	0x3,0x2
0324 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0325 0092 047a  |   z|		Action	Push_String_Extended,0x47a					; "Over 2 minutes"
0327 e602       |    |		Load	0x3,0x2
0328 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0329 e7ff       |    |		Load	0x3,-0x1
032a 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
032b 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
032c 680a       |h   |		Jump_Zero	0x337
032d e7ff       |    |		Load	0x3,-0x1
032e 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
032f 00e0       |    |		Load_Encached	Standard_Cache
0330 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0331 e602       |    |		Load	0x3,0x2
0332 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0333 0092 047b  |   {|		Action	Push_String_Extended,0x47b					; "Over 4 minutes"
0335 e602       |    |		Load	0x3,0x2
0336 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0337 e7ff       |    |		Load	0x3,-0x1
0338 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0339 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
033a 680a       |h   |		Jump_Zero	0x345
033b e7ff       |    |		Load	0x3,-0x1
033c 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
033d 00e0       |    |		Load_Encached	Standard_Cache
033e 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
033f e602       |    |		Load	0x3,0x2
0340 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0341 0092 047c  |   ||		Action	Push_String_Extended,0x47c					; "Over 6 minutes"
0343 e602       |    |		Load	0x3,0x2
0344 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0345 00ea       |    |		Load_Encached	Null_String_Cache
0346 e602       |    |		Load	0x3,0x2
0347 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0348 00ea       |    |		Load_Encached	Null_String_Cache
0349 e602       |    |		Load	0x3,0x2
034a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
034b 00cf       |    |		Action	Mark_Auxiliary
034c 4850       |HP  |		Short_Literal	0x50
034d 4800       |H   |		Short_Literal	0x0
034e 0007       |    |		Action	Break_Optional
034f 00d8       |    |		Load_Top	At_Offset_0
0350 e7ff       |    |		Load	0x3,-0x1
0351 3406       |4   |		Execute	Record,Field_Reference,Field_Number 0x6
0352 01d7       |    |		Execute	Vector,Field_Read
0353 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0354 6826       |h&  |		Jump_Zero	0x37b
0355 00d8       |    |		Load_Top	At_Offset_0
0356 e7ff       |    |		Load	0x3,-0x1
0357 3406       |4   |		Execute	Record,Field_Reference,Field_Number 0x6
0358 01d7       |    |		Execute	Vector,Field_Read
0359 00e0       |    |		Load_Encached	Standard_Cache
035a 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
035b e602       |    |		Load	0x3,0x2
035c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
035d 0092 047d  |   }|		Action	Push_String_Extended,0x47d					; "Snapshots lasting"
035f e605       |    |		Load	0x3,0x5
0360 480f       |H   |		Short_Literal	0xf
0361 0271       | q  |		Execute	Discrete,Times
0362 00d8       |    |		Load_Top	At_Offset_0
0363 00e2       |    |		Load_Encached	Integer_Cache
0364 0260       | `  |		Execute	Discrete,In_Type
0365 7001       |p   |		Jump_Nonzero	0x367
0366 0801       |    |		Execute_Immediate	Raise,0x1
0367 00e0       |    |		Load_Encached	Standard_Cache
0368 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0369 01cc       |    |		Execute	Vector,Catenate
036a 0092 047e  |   ~|		Action	Push_String_Extended,0x47e					; ".."
036c 01cc       |    |		Execute	Vector,Catenate
036d e605       |    |		Load	0x3,0x5
036e 480f       |H   |		Short_Literal	0xf
036f 0271       | q  |		Execute	Discrete,Times
0370 0a0e       |    |		Execute_Immediate	Plus,0xe
0371 00d8       |    |		Load_Top	At_Offset_0
0372 00e2       |    |		Load_Encached	Integer_Cache
0373 0260       | `  |		Execute	Discrete,In_Type
0374 7001       |p   |		Jump_Nonzero	0x376
0375 0801       |    |		Execute_Immediate	Raise,0x1
0376 00e0       |    |		Load_Encached	Standard_Cache
0377 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0378 01cc       |    |		Execute	Vector,Catenate
0379 e602       |    |		Load	0x3,0x2
037a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
037b 00c8       |    |		Action	Pop_Auxiliary_Range
037c 3fd2       |?   |		Loop_Increasing	0x34f
037d 00ce       |    |		Action	Pop_Auxiliary
037e e00c       |    |		Load	0x0,0xc
037f 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0380 e602       |    |		Load	0x3,0x2
0381 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0382 4802       |H   |		Short_Literal	0x2
0383 e00c       |    |		Load	0x0,0xc
0384 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
0385 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0386 0000 0000  |    |		.XXX[0x2]
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 03b1       |    |		.CONST	0x03b1								; Address of begin
0389 03d4       |    |		.CONST	0x03d4								; Address of exception handler
038a 0008       |    |		.CONST	0x0008								; Number of locals
038b			INIT_0388:
038b e00c       |    |		Load	0x0,0xc
038c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
038d 02c7       |    |		Declare_Variable	Any
038e 00d8       |    |		Load_Top	At_Offset_0
038f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0390 e010       |    |		Load	0x0,0x10
0391 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0392 02c7       |    |		Declare_Variable	Any
0393 e011       |    |		Load	0x0,0x11
0394 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0395 a603       |    |		Store_Unchecked	0x3,0x3
0396 4801       |H   |		Short_Literal	0x1
0397 4811       |H   |		Short_Literal	0x11
0398 00e9       |    |		Load_Encached	String_Cache
0399 035b       | [  |		Declare_Type	Array,Constrained
039a 0337       | 7  |		Declare_Variable	Array
039b 00d8       |    |		Load_Top	At_Offset_0
039c 0335       | 5  |		Declare_Variable	Array,Duplicate
039d 00cd       |    |		Action	Spare6_Action
039e 4811       |H   |		Short_Literal	0x11
039f 4801       |H   |		Short_Literal	0x1
03a0 482a       |H*  |		Short_Literal	0x2a
03a1 e607       |    |		Load	0x3,0x7
03a2 e605       |    |		Load	0x3,0x5
03a3 01d6       |    |		Execute	Vector,Field_Write
03a4 3ffb       |?   |		Loop_Increasing	0x3a0
03a5 e604       |    |		Load	0x3,0x4
03a6 01d4       |    |		Execute	Vector,Structure_Write
03a7 00e1       |    |		Load_Encached	Boolean_Cache
03a8 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
03a9 00e1       |    |		Load_Encached	Boolean_Cache
03aa 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
03ab e407       |    |		Load	0x2,0x7
03ac 0322       | "  |		Declare_Variable	Record
03ad 00d8       |    |		Load_Top	At_Offset_0
03ae 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03af 029f 03fb  |    |		Declare_Subprogram	INIT_03f8,For_Call
03b1			BODY_0388:
03b1 e5fc       |    |		Load	0x2,-0x4
03b2 6809       |h   |		Jump_Zero	0x3bc
03b3 0092 047f  |    |		Action	Push_String_Extended,0x47f					; "Processing "
03b5 e7ff       |    |		Load	0x3,-0x1
03b6 01cc       |    |		Execute	Vector,Catenate
03b7 e00c       |    |		Load	0x0,0xc
03b8 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
03b9 4801       |H   |		Short_Literal	0x1
03ba e00c       |    |		Load	0x0,0xc
03bb 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
03bc e602       |    |		Load	0x3,0x2
03bd 00ea       |    |		Load_Encached	Null_String_Cache
03be e7ff       |    |		Load	0x3,-0x1
03bf 4800       |H   |		Short_Literal	0x0
03c0 e00c       |    |		Load	0x0,0xc
03c1 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
03c2 c602       |    |		Store	0x3,0x2
03c3 00cf       |    |		Action	Mark_Auxiliary
03c4 7805       |x   |		Jump	0x3ca
03c5 e602       |    |		Load	0x3,0x2
03c6 e00c       |    |		Load	0x0,0xc
03c7 1866       | f  |		Execute	Package,Field_Execute,Field_Number 0x66
03c8 8608       |    |		Call	0x3,0x8
03c9 00c9       |    |		Action	Pop_Auxiliary_Loop
03ca e602       |    |		Load	0x3,0x2
03cb e00c       |    |		Load	0x0,0xc
03cc 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
03cd 6ff7       |o   |		Jump_Zero	0x3c5
03ce 00ce       |    |		Action	Pop_Auxiliary
03cf e5fc       |    |		Load	0x2,-0x4
03d0 6802       |h   |		Jump_Zero	0x3d3
03d1 e607       |    |		Load	0x3,0x7
03d2 8413       |    |		Call	0x2,0x13
03d3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03d4			TRAP_0388:
03d4 0007       |    |		Action	Break_Optional
03d5 e409       |    |		Load	0x2,0x9
03d6 4808       |H   |		Short_Literal	0x8
03d7 0092 0480  |    |		Action	Push_String_Extended,0x480					; "Analysis of "
03d9 e7ff       |    |		Load	0x3,-0x1
03da 01cc       |    |		Execute	Vector,Catenate
03db 0092 0481  |    |		Action	Push_String_Extended,0x481					; " terminated by unexpected exception: "
03dd 01cc       |    |		Execute	Vector,Catenate
03de e007       |    |		Load	0x0,0x7
03df 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
03e0 01cc       |    |		Execute	Vector,Catenate
03e1 e008       |    |		Load	0x0,0x8
03e2 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03e3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03e4 0000 0000  |    |		.BLANK	0000[0x4]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03eb       |    |		.CONST	0x03eb								; Address of begin
03e9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ea 0001       |    |		.CONST	0x0001								; Number of locals
03eb			BODY_03e8:
03eb			INIT_03e8:
03eb e7ff       |    |		Load	0x3,-0x1
03ec 01db       |    |		Execute	Vector,Length
03ed 6805       |h   |		Jump_Zero	0x3f3
03ee 0092 0482  |    |		Action	Push_String_Extended,0x482					; " - "
03f0 e7ff       |    |		Load	0x3,-0x1
03f1 01cc       |    |		Execute	Vector,Catenate
03f2 00ca       |    |		Action	Exit_Nullary_Function
03f3 00ea       |    |		Load_Encached	Null_String_Cache
03f4 00ca       |    |		Action	Exit_Nullary_Function
03f5 0000 0000  |    |		.XXX[0x3]
03f7 0000       |    |
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 0401       |    |		.CONST	0x0401								; Address of begin
03f9 0004       |    |		.CONST	0x0004								; Address of exception handler
03fa 0003       |    |		.CONST	0x0003								; Number of locals
03fb			INIT_03f8:
03fb 00e7       |    |		Load_Encached	Duration_Cache
03fc e010       |    |		Load	0x0,0x10
03fd 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03fe 02c7       |    |		Declare_Variable	Any
03ff 00d8       |    |		Load_Top	At_Offset_0
0400 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0401			BODY_03f8:
0401 e9ff       |    |		Load	0x4,-0x1
0402 01db       |    |		Execute	Vector,Length
0403 0d0c       |    |		Execute_Immediate	Less,0xc
0404 700f       |p   |		Jump_Nonzero	0x414
0405 e9ff       |    |		Load	0x4,-0x1
0406 01dd       |    |		Execute	Vector,First
0407 e9ff       |    |		Load	0x4,-0x1
0408 01d7       |    |		Execute	Vector,Field_Read
0409 4830       |H0  |		Short_Literal	0x30
040a 4839       |H9  |		Short_Literal	0x39
040b 0261       | a  |		Execute	Discrete,Not_In_Range
040c 7007       |p   |		Jump_Nonzero	0x414
040d 4800       |H   |		Short_Literal	0x0
040e e9ff       |    |		Load	0x4,-0x1
040f 0092 0483  |    |		Action	Push_String_Extended,0x483					; "Snapshot"
0411 e00a       |    |		Load	0x0,0xa
0412 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0413 7001       |p   |		Jump_Nonzero	0x415
0414 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0415 e9ff       |    |		Load	0x4,-0x1
0416 01dd       |    |		Execute	Vector,First
0417 e9ff       |    |		Load	0x4,-0x1
0418 01dd       |    |		Execute	Vector,First
0419 0a08       |    |		Execute_Immediate	Plus,0x8
041a 00d8       |    |		Load_Top	At_Offset_0
041b 00e2       |    |		Load_Encached	Integer_Cache
041c 0260       | `  |		Execute	Discrete,In_Type
041d 7001       |p   |		Jump_Nonzero	0x41f
041e 0801       |    |		Execute_Immediate	Raise,0x1
041f e9ff       |    |		Load	0x4,-0x1
0420 01cf       |    |		Execute	Vector,Slice_Read
0421 e011       |    |		Load	0x0,0x11
0422 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0423 e011       |    |		Load	0x0,0x11
0424 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0425 c803       |    |		Store	0x4,0x3
0426 4800       |H   |		Short_Literal	0x0
0427 e9ff       |    |		Load	0x4,-0x1
0428 0092 0484  |    |		Action	Push_String_Extended,0x484					; "Completed"
042a e00a       |    |		Load	0x0,0xa
042b 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
042c 0e00       |    |		Execute_Immediate	Not_Equal,0x0
042d a606       |    |		Store_Unchecked	0x3,0x6
042e e606       |    |		Load	0x3,0x6
042f 6813       |h   |		Jump_Zero	0x443
0430 e605       |    |		Load	0x3,0x5
0431 7011       |p   |		Jump_Nonzero	0x443
0432 e603       |    |		Load	0x3,0x3
0433 e803       |    |		Load	0x4,0x3
0434 e010       |    |		Load	0x0,0x10
0435 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0436 a802       |    |		Store_Unchecked	0x4,0x2
0437 e5fc       |    |		Load	0x2,-0x4
0438 6805       |h   |		Jump_Zero	0x43e
0439 e607       |    |		Load	0x3,0x7
043a e604       |    |		Load	0x3,0x4
043b e802       |    |		Load	0x4,0x2
043c 8412       |    |		Call	0x2,0x12
043d 00d1       |    |		Pop_Control	Pop_Count_1
043e e408       |    |		Load	0x2,0x8
043f e604       |    |		Load	0x3,0x4
0440 e802       |    |		Load	0x4,0x2
0441 8412       |    |		Call	0x2,0x12
0442 00d1       |    |		Pop_Control	Pop_Count_1
0443 4800       |H   |		Short_Literal	0x0
0444 a605       |    |		Store_Unchecked	0x3,0x5
0445 00d8       |    |		Load_Top	At_Offset_0
0446 c603       |    |		Store	0x3,0x3
0447 e9ff       |    |		Load	0x4,-0x1
0448 01dd       |    |		Execute	Vector,First
0449 e9ff       |    |		Load	0x4,-0x1
044a 01dd       |    |		Execute	Vector,First
044b 0a08       |    |		Execute_Immediate	Plus,0x8
044c 00d8       |    |		Load_Top	At_Offset_0
044d 00e2       |    |		Load_Encached	Integer_Cache
044e 0260       | `  |		Execute	Discrete,In_Type
044f 7001       |p   |		Jump_Nonzero	0x451
0450 0801       |    |		Execute_Immediate	Raise,0x1
0451 e9ff       |    |		Load	0x4,-0x1
0452 01cf       |    |		Execute	Vector,Slice_Read
0453 e9ff       |    |		Load	0x4,-0x1
0454 01dd       |    |		Execute	Vector,First
0455 0a0d       |    |		Execute_Immediate	Plus,0xd
0456 00d8       |    |		Load_Top	At_Offset_0
0457 00e2       |    |		Load_Encached	Integer_Cache
0458 0260       | `  |		Execute	Discrete,In_Type
0459 7001       |p   |		Jump_Nonzero	0x45b
045a 0801       |    |		Execute_Immediate	Raise,0x1
045b e9ff       |    |		Load	0x4,-0x1
045c 01dd       |    |		Execute	Vector,First
045d 0a14       |    |		Execute_Immediate	Plus,0x14
045e 00d8       |    |		Load_Top	At_Offset_0
045f 00e2       |    |		Load_Encached	Integer_Cache
0460 0260       | `  |		Execute	Discrete,In_Type
0461 7001       |p   |		Jump_Nonzero	0x463
0462 0801       |    |		Execute_Immediate	Raise,0x1
0463 e9ff       |    |		Load	0x4,-0x1
0464 01cf       |    |		Execute	Vector,Slice_Read
0465 01cc       |    |		Execute	Vector,Catenate
0466 e604       |    |		Load	0x3,0x4
0467 01d4       |    |		Execute	Vector,Structure_Write
0468 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0469 ; --------------------------------------------------------------------------------------
0469 ; STRING TABLE
0469 ; --------------------------------------------------------------------------------------
0469 003a       | :  |		.STRTAB	0x003a->0x0486							; "Show_Snapshot_Times"
046a 004b       | K  |		.STRTAB	0x004b->0x048f							; "Unexpected exception: "
046b 005f       | _  |		.STRTAB	0x005f->0x049a							; "\x22\x22"
046c 005f       | _  |		.STRTAB	0x005f->0x049b							; "\x22"
046d 005e       | ^  |		.STRTAB	0x005e->0x049c							; "[Show_Snapshot_Times ("
046e 0072       | r  |		.STRTAB	0x0072->0x04a7							; ", "
046f 0072       | r  |		.STRTAB	0x0072->0x04a8							; ")]"
0470 0072       | r  |		.STRTAB	0x0072->0x04a9							; "[end of Show_Snapshot_Times"
0471 008b       |    |		.STRTAB	0x008b->0x04b6							; "]"
0472 008a       |    |		.STRTAB	0x008a->0x04b7							; " =>"
0473 008b       |    |		.STRTAB	0x008b->0x04b8							; " => Unable to process time."
0474 00a4       |    |		.STRTAB	0x00a4->0x04c6							; " "
0475 00a3       |    |		.STRTAB	0x00a3->0x04c6							; "Value"
0476 00a6       |    |		.STRTAB	0x00a6->0x04c9							; "Attribute"
0477 00ad       |    |		.STRTAB	0x00ad->0x04cd							; "Snapshots"
0478 00b4       |    |		.STRTAB	0x00b4->0x04d2							; "Average length"
0479 00c0       |    |		.STRTAB	0x00c0->0x04d9							; "RMS"
047a 00c1       |    |		.STRTAB	0x00c1->0x04da							; "Over 2 minutes"
047b 00cd       |    |		.STRTAB	0x00cd->0x04e1							; "Over 4 minutes"
047c 00d9       |    |		.STRTAB	0x00d9->0x04e8							; "Over 6 minutes"
047d 00e5       |    |		.STRTAB	0x00e5->0x04ef							; "Snapshots lasting"
047e 00f4       |    |		.STRTAB	0x00f4->0x04f8							; ".."
047f 00f4       |    |		.STRTAB	0x00f4->0x04f9							; "Processing "
0480 00fd       |    |		.STRTAB	0x00fd->0x04fe							; "Analysis of "
0481 0107       |    |		.STRTAB	0x0107->0x0504							; " terminated by unexpected exception: "
0482 012a       | *  |		.STRTAB	0x012a->0x0517							; " - "
0483 012b       | +  |		.STRTAB	0x012b->0x0518							; "Snapshot"
0484 0131       | 1  |		.STRTAB	0x0131->0x051c							; "Completed"
0485 0138       | 8  |		.STREND 0x0138->0x0521
0486 5368 6f77  |Show|		.STRTAB_STRINGS
0521 0000 0000  |    |		.BLANK	0000[0x7]
0528 ; --------------------------------------------------------------------------------------
0528 ; Debug Table
0528 ; --------------------------------------------------------------------------------------
0528 0004 0010  |    |		.DEBUG4	0x0004,0x0010,0xd835,0x0000,0x0001,0x0000
052e 0000 0000  |    |		.BLANK	0000[0xd2]