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

⟦d090d3fe0⟧

    Length: 4096 (0x1000)
    Notes: 00_class, 5811_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5811       |X   |		.CONST	0x5811								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 04d0       |    |		.CONST	0x04d0								; 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 0003       |    |		.CONST	0x0003								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0110       |    |		.CONST	0x0110								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0027       | '  |		.CONST	0x0027								; Number of locals
000b			INIT_0008:
000b 029a 0123  |   #|		Declare_Subprogram	INIT_0120,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x055a,0x8000,0x0000,0x0015,0xa284,0x0000,0x0005
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 0143  |   C|		Declare_Subprogram	INIT_0140,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x2 = 0xf,0xfffd
0010 00bf       |    |		Action	Accept_Activation						; Debug Table 0x0.0x3 = 0x10,0xfffc
0011 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x0011,0x0564,0x8000,0x0000,0x0036,0xb7a4,0x0000,0x0019
													; Debug Table 0x1.0x0 = 0x11,0xffff
0012 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1.0x1 = 0x12,0xfffe
0013 4846       |HF  |		Short_Literal	0x46
0014 00e9       |    |		Load_Encached	String_Cache
0015 0334       | 4  |		Declare_Variable	Array,With_Constraint
0016 530d       |S   |		Indirect_Literal	Any,0x324,{0x20202020, 0x20202020}
0017 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1.0x2 = 0x17,0xfffd
0018 4832       |H2  |		Short_Literal	0x32
0019 00e9       |    |		Load_Encached	String_Cache
001a 0334       | 4  |		Declare_Variable	Array,With_Constraint
001b 532c       |S,  |		Indirect_Literal	Any,0x348,{0x2d2d2d2d, 0x2d2d2d2d}
001c 029d 018b  |    |		Declare_Subprogram	INIT_0188,For_Outer_Call			; Debug Table 0x1.0x3 = 0x1c,0xfffc
001e a001       |    |		Store_Unchecked	0x0,0x1							; Debug Table 0x1.0x4 = 0x1e,0xfffb
001f 00c6       |    |		Action	Check_Subprogram_Elaborated
0020 00f0       |    |		Load_Encached	Segment_Cache
0021 00e5       |    |		Load_Encached	Long_Integer_Cache
0022 62fd       |b   |		Indirect_Literal	Discrete,0x320,{0x00000000, 0x0036b7a4}
0023 48c3       |H   |		Short_Literal	0xc3
0024 4800       |H   |		Short_Literal	0x0
0025 0007       |    |		Action	Break_Optional
0026 029d 019b  |    |		Declare_Subprogram	INIT_0198,For_Outer_Call			; Debug Table 0x1.0x5 = 0x26,0xfffa
0028 029d 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Outer_Call			; Debug Table 0x1.0x6 = 0x28,0xfff9
002a 029d 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Outer_Call			; Debug Table 0x1.0x7 = 0x2a,0xfff8
002c 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1.0x8 = 0x2c,0xfff7
002d 4804       |H   |		Short_Literal	0x4
002e 0092 0456  |   V|		Action	Push_String_Extended,0x456					; "Job"
0030 8219       |    |		Call	0x1,0x19
0031 4801       |H   |		Short_Literal	0x1
0032 4804       |H   |		Short_Literal	0x4
0033 0092 0457  |   W|		Action	Push_String_Extended,0x457					; "CPU%"
0035 8219       |    |		Call	0x1,0x19
0036 01cc       |    |		Execute	Vector,Catenate
0037 4801       |H   |		Short_Literal	0x1
0038 4808       |H   |		Short_Literal	0x8
0039 0092 0458  |   X|		Action	Push_String_Extended,0x458					; "Root"
003b 8219       |    |		Call	0x1,0x19
003c 01cc       |    |		Execute	Vector,Catenate
003d 4801       |H   |		Short_Literal	0x1
003e 4809       |H   |		Short_Literal	0x9
003f 0092 0459  |   Y|		Action	Push_String_Extended,0x459					; "Job Seg"
0041 8219       |    |		Call	0x1,0x19
0042 01cc       |    |		Execute	Vector,Catenate
0043 4801       |H   |		Short_Literal	0x1
0044 4804       |H   |		Short_Literal	0x4
0045 0092 045a  |   Z|		Action	Push_String_Extended,0x45a					; "Acts"
0047 8219       |    |		Call	0x1,0x19
0048 01cc       |    |		Execute	Vector,Catenate
0049 0092 045b  |   [|		Action	Push_String_Extended,0x45b					; "  Name"
004b 01cc       |    |		Execute	Vector,Catenate
004c 0007       |    |		Action	Break_Optional
004d 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1.0x9 = 0x4d,0xfff6
004e 4804       |H   |		Short_Literal	0x4
004f 0092 0456  |   V|		Action	Push_String_Extended,0x456					; "Job"
0051 8219       |    |		Call	0x1,0x19
0052 4801       |H   |		Short_Literal	0x1
0053 4803       |H   |		Short_Literal	0x3
0054 0092 045c  |   \|		Action	Push_String_Extended,0x45c					; "Pri"
0056 8219       |    |		Call	0x1,0x19
0057 01cc       |    |		Execute	Vector,Catenate
0058 4801       |H   |		Short_Literal	0x1
0059 4804       |H   |		Short_Literal	0x4
005a 0092 045d  |   ]|		Action	Push_String_Extended,0x45d					; "Stat"
005c 8219       |    |		Call	0x1,0x19
005d 01cc       |    |		Execute	Vector,Catenate
005e 4801       |H   |		Short_Literal	0x1
005f 4804       |H   |		Short_Literal	0x4
0060 0092 0457  |   W|		Action	Push_String_Extended,0x457					; "CPU%"
0062 8219       |    |		Call	0x1,0x19
0063 01cc       |    |		Execute	Vector,Catenate
0064 4801       |H   |		Short_Literal	0x1
0065 4806       |H   |		Short_Literal	0x6
0066 0092 045e  |   ^|		Action	Push_String_Extended,0x45e					; "ModCt"
0068 8219       |    |		Call	0x1,0x19
0069 01cc       |    |		Execute	Vector,Catenate
006a 4801       |H   |		Short_Literal	0x1
006b 4805       |H   |		Short_Literal	0x5
006c 0092 045f  |   _|		Action	Push_String_Extended,0x45f					; "Cache"
006e 8219       |    |		Call	0x1,0x19
006f 01cc       |    |		Execute	Vector,Catenate
0070 4801       |H   |		Short_Literal	0x1
0071 4806       |H   |		Short_Literal	0x6
0072 0092 0460  |   `|		Action	Push_String_Extended,0x460					; "Disk"
0074 8219       |    |		Call	0x1,0x19
0075 01cc       |    |		Execute	Vector,Catenate
0076 4801       |H   |		Short_Literal	0x1
0077 4806       |H   |		Short_Literal	0x6
0078 0092 0461  |   a|		Action	Push_String_Extended,0x461					; "PgLim"
007a 8219       |    |		Call	0x1,0x19
007b 01cc       |    |		Execute	Vector,Catenate
007c 4801       |H   |		Short_Literal	0x1
007d 4806       |H   |		Short_Literal	0x6
007e 0092 0462  |   b|		Action	Push_String_Extended,0x462					; "DskWts"
0080 8219       |    |		Call	0x1,0x19
0081 01cc       |    |		Execute	Vector,Catenate
0082 4801       |H   |		Short_Literal	0x1
0083 4803       |H   |		Short_Literal	0x3
0084 0092 0463  |   c|		Action	Push_String_Extended,0x463					; "D/S"
0086 8219       |    |		Call	0x1,0x19
0087 01cc       |    |		Execute	Vector,Catenate
0088 4801       |H   |		Short_Literal	0x1
0089 4806       |H   |		Short_Literal	0x6
008a 0092 0464  |   d|		Action	Push_String_Extended,0x464					; "JSegSz"
008c 8219       |    |		Call	0x1,0x19
008d 01cc       |    |		Execute	Vector,Catenate
008e 4801       |H   |		Short_Literal	0x1
008f 4805       |H   |		Short_Literal	0x5
0090 0092 0465  |   e|		Action	Push_String_Extended,0x465					; "WsSiz"
0092 8219       |    |		Call	0x1,0x19
0093 01cc       |    |		Execute	Vector,Catenate
0094 4801       |H   |		Short_Literal	0x1
0095 4805       |H   |		Short_Literal	0x5
0096 0092 0466  |   f|		Action	Push_String_Extended,0x466					; "WsLim"
0098 8219       |    |		Call	0x1,0x19
0099 01cc       |    |		Execute	Vector,Catenate
009a 0007       |    |		Action	Break_Optional
009b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1.0xa = 0x9b,0xfff5
009c 4804       |H   |		Short_Literal	0x4
009d e210       |    |		Load	0x1,0x10
009e 8219       |    |		Call	0x1,0x19
009f 4801       |H   |		Short_Literal	0x1
00a0 4804       |H   |		Short_Literal	0x4
00a1 e210       |    |		Load	0x1,0x10
00a2 8219       |    |		Call	0x1,0x19
00a3 01cc       |    |		Execute	Vector,Catenate
00a4 4801       |H   |		Short_Literal	0x1
00a5 4808       |H   |		Short_Literal	0x8
00a6 e210       |    |		Load	0x1,0x10
00a7 8219       |    |		Call	0x1,0x19
00a8 01cc       |    |		Execute	Vector,Catenate
00a9 4801       |H   |		Short_Literal	0x1
00aa 4809       |H   |		Short_Literal	0x9
00ab e210       |    |		Load	0x1,0x10
00ac 8219       |    |		Call	0x1,0x19
00ad 01cc       |    |		Execute	Vector,Catenate
00ae 4801       |H   |		Short_Literal	0x1
00af 4804       |H   |		Short_Literal	0x4
00b0 e210       |    |		Load	0x1,0x10
00b1 8219       |    |		Call	0x1,0x19
00b2 01cc       |    |		Execute	Vector,Catenate
00b3 0092 0467  |   g|		Action	Push_String_Extended,0x467					; " --------------------------"
00b5 01cc       |    |		Execute	Vector,Catenate
00b6 0007       |    |		Action	Break_Optional
00b7 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1.0xb = 0xb7,0xfff4
00b8 4804       |H   |		Short_Literal	0x4
00b9 e210       |    |		Load	0x1,0x10
00ba 8219       |    |		Call	0x1,0x19
00bb 4801       |H   |		Short_Literal	0x1
00bc 4803       |H   |		Short_Literal	0x3
00bd e210       |    |		Load	0x1,0x10
00be 8219       |    |		Call	0x1,0x19
00bf 01cc       |    |		Execute	Vector,Catenate
00c0 4801       |H   |		Short_Literal	0x1
00c1 4804       |H   |		Short_Literal	0x4
00c2 e210       |    |		Load	0x1,0x10
00c3 8219       |    |		Call	0x1,0x19
00c4 01cc       |    |		Execute	Vector,Catenate
00c5 4801       |H   |		Short_Literal	0x1
00c6 4804       |H   |		Short_Literal	0x4
00c7 e210       |    |		Load	0x1,0x10
00c8 8219       |    |		Call	0x1,0x19
00c9 01cc       |    |		Execute	Vector,Catenate
00ca 4801       |H   |		Short_Literal	0x1
00cb 4806       |H   |		Short_Literal	0x6
00cc e210       |    |		Load	0x1,0x10
00cd 8219       |    |		Call	0x1,0x19
00ce 01cc       |    |		Execute	Vector,Catenate
00cf 4801       |H   |		Short_Literal	0x1
00d0 4805       |H   |		Short_Literal	0x5
00d1 e210       |    |		Load	0x1,0x10
00d2 8219       |    |		Call	0x1,0x19
00d3 01cc       |    |		Execute	Vector,Catenate
00d4 4801       |H   |		Short_Literal	0x1
00d5 4806       |H   |		Short_Literal	0x6
00d6 e210       |    |		Load	0x1,0x10
00d7 8219       |    |		Call	0x1,0x19
00d8 01cc       |    |		Execute	Vector,Catenate
00d9 4801       |H   |		Short_Literal	0x1
00da 4806       |H   |		Short_Literal	0x6
00db e210       |    |		Load	0x1,0x10
00dc 8219       |    |		Call	0x1,0x19
00dd 01cc       |    |		Execute	Vector,Catenate
00de 4801       |H   |		Short_Literal	0x1
00df 4806       |H   |		Short_Literal	0x6
00e0 e210       |    |		Load	0x1,0x10
00e1 8219       |    |		Call	0x1,0x19
00e2 01cc       |    |		Execute	Vector,Catenate
00e3 4801       |H   |		Short_Literal	0x1
00e4 4803       |H   |		Short_Literal	0x3
00e5 e210       |    |		Load	0x1,0x10
00e6 8219       |    |		Call	0x1,0x19
00e7 01cc       |    |		Execute	Vector,Catenate
00e8 4801       |H   |		Short_Literal	0x1
00e9 4806       |H   |		Short_Literal	0x6
00ea e210       |    |		Load	0x1,0x10
00eb 8219       |    |		Call	0x1,0x19
00ec 01cc       |    |		Execute	Vector,Catenate
00ed 4801       |H   |		Short_Literal	0x1
00ee 4805       |H   |		Short_Literal	0x5
00ef e210       |    |		Load	0x1,0x10
00f0 8219       |    |		Call	0x1,0x19
00f1 01cc       |    |		Execute	Vector,Catenate
00f2 4801       |H   |		Short_Literal	0x1
00f3 4805       |H   |		Short_Literal	0x5
00f4 e210       |    |		Load	0x1,0x10
00f5 8219       |    |		Call	0x1,0x19
00f6 01cc       |    |		Execute	Vector,Catenate
00f7 0007       |    |		Action	Break_Optional
00f8 029d 0223  |   #|		Declare_Subprogram	INIT_0220,For_Outer_Call			; Debug Table 0x1.0xc = 0xf8,0xfff3
00fa 029d 0233  |   3|		Declare_Subprogram	INIT_0230,For_Outer_Call			; Debug Table 0x1.0xd = 0xfa,0xfff2
00fc 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0xe = 0xfc,0xfff1
00fd 00c7       |    |		Action	Elaborate_Subprogram
00fe 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0xf = 0xfe,0xfff0
00ff 00c7       |    |		Action	Elaborate_Subprogram
0100 e002       |    |		Load	0x0,0x2								; Debug Table 0x1.0x10 = 0x100,0xffef
0101 1916       |    |		Execute	Package,Field_Reference,Field_Number 0x16
0102 00c6       |    |		Action	Check_Subprogram_Elaborated
0103 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0104 621b       |b   |		Indirect_Literal	Discrete,0x320,{0x00000000, 0x0036b7a4}
0105 6216       |b   |		Indirect_Literal	Discrete,0x31c,{0x00000000, 0x0000073a}
0106 4800       |H   |		Short_Literal	0x0
0107 0007       |    |		Action	Break_Optional
0108 e002       |    |		Load	0x0,0x2								; Debug Table 0x1.0x11 = 0x108,0xffee
0109 1917       |    |		Execute	Package,Field_Reference,Field_Number 0x17
010a 00c6       |    |		Action	Check_Subprogram_Elaborated
010b 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
010c 6213       |b   |		Indirect_Literal	Discrete,0x320,{0x00000000, 0x0036b7a4}
010d 620a       |b   |		Indirect_Literal	Discrete,0x318,{0x00000000, 0x00000744}
010e 4800       |H   |		Short_Literal	0x0
010f 0007       |    |		Action	Break_Optional
0110			BODY_0008:
0110 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20				; Debug Table 0x1.0x12 = 0x110,0x1
0111 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
0112 e002       |    |		Load	0x0,0x2
0113 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0114 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24				; Debug Table 0x1.0x13 = 0x114,0x2
0115 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25
0116 e002       |    |		Load	0x0,0x2
0117 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0118 00bc       |    |		Action	Signal_Activated						; Debug Table 0x1.0x14 = 0x118,0x3
0119 00bb       |    |		Action	Signal_Completion
011a 0000 0000  |    |		.BLANK	0000[0x6]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123       | #  |		.CONST	0x0123								; Address of begin
0121 0004       |    |		.CONST	0x0004								; Address of exception handler
0122 0001       |    |		.CONST	0x0001								; Number of locals
0123			BODY_0120:
0123			INIT_0120:
0123 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2 = .DEBUG	0x0123,0x0590,0x0002,0x0000,0x0015,0xa284,0x0000,0x0006
													; Debug Table 0x2.0x0 = 0x123,0x1
0124 700d       |p   |		Jump_Nonzero	0x132
0125 480a       |H   |		Short_Literal	0xa							; Debug Table 0x2.0x1 = 0x125,0x2
0126 480a       |H   |		Short_Literal	0xa
0127 e21a       |    |		Load	0x1,0x1a
0128 01cb       |    |		Execute	Vector,Append
0129 e21c       |    |		Load	0x1,0x1c
012a 01cc       |    |		Execute	Vector,Catenate
012b 01cb       |    |		Execute	Vector,Append
012c 4801       |H   |		Short_Literal	0x1
012d e5fe       |    |		Load	0x2,-0x2
012e e5ff       |    |		Load	0x2,-0x1
012f 821f       |    |		Call	0x1,0x1f
0130 01cc       |    |		Execute	Vector,Catenate
0131 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0132 480a       |H   |		Short_Literal	0xa							; Debug Table 0x2.0x2 = 0x132,0x3
0133 480a       |H   |		Short_Literal	0xa
0134 e21b       |    |		Load	0x1,0x1b
0135 01cb       |    |		Execute	Vector,Append
0136 e21d       |    |		Load	0x1,0x1d
0137 01cc       |    |		Execute	Vector,Catenate
0138 01cb       |    |		Execute	Vector,Append
0139 4801       |H   |		Short_Literal	0x1
013a e5fe       |    |		Load	0x2,-0x2
013b e5ff       |    |		Load	0x2,-0x1
013c 821f       |    |		Call	0x1,0x1f
013d 01cc       |    |		Execute	Vector,Catenate
013e 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
013f 0000       |    |		.XXX[0x1]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 014a       | J  |		.CONST	0x014a								; Address of begin
0141 0004       |    |		.CONST	0x0004								; Address of exception handler
0142 0004       |    |		.CONST	0x0004								; Number of locals
0143			INIT_0140:
0143 e003       |    |		Load	0x0,0x3								; Debug Table 0x3 = .DEBUG	0x0143,0x0598,0x0002,0x0000,0x0015,0xa284,0x0000,0x001b
													; Debug Table 0x3.0x0 = 0x143,0xffff
0144 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0145 e003       |    |		Load	0x0,0x3								; Debug Table 0x3.0x1 = 0x145,0xfffe
0146 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
0147 0322       | "  |		Declare_Variable	Record
0148 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x3.0x2 = 0x148,0xfffd
0149 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
014a			BODY_0140:
014a 48ff       |H   |		Short_Literal	0xff							; Debug Table 0x3.0x3 = 0x14a,0x1
014b 4800       |H   |		Short_Literal	0x0
014c 0007       |    |		Action	Break_Optional
014d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x4 = 0x14d,0x2
014e e004       |    |		Load	0x0,0x4
014f 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0150 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0151 6803       |h   |		Jump_Zero	0x155
0152 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x5 = 0x152,0x3
0153 0a01       |    |		Execute_Immediate	Plus,0x1
0154 005b       | [  |		Store_Top	Discrete,At_Offset_3
0155 3ff7       |?   |		Loop_Increasing	0x14d
0156 0007       |    |		Action	Break_Optional							; Debug Table 0x3.0x6 = 0x156,0x4
0157 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0x7 = 0x157,0xfbff
0158 00d9       |    |		Load_Top	At_Offset_1
0159 0a0a       |    |		Execute_Immediate	Plus,0xa
015a 4850       |HP  |		Short_Literal	0x50
015b 0271       | q  |		Execute	Discrete,Times
015c 0248       | H  |		Execute	Discrete,Check_In_Integer
015d 00e9       |    |		Load_Encached	String_Cache
015e 0334       | 4  |		Declare_Variable	Array,With_Constraint
015f 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x3.0x8 = 0x15f,0xfbfe
0160 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
0161 029f 036b  |   k|		Declare_Subprogram	INIT_0368,For_Call				; Debug Table 0x3.0x9 = 0x161,0xfbfd
0163 029f 039b  |    |		Declare_Subprogram	INIT_0398,For_Call
0165 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3.0xa = 0x165,0x401
0166 7005       |p   |		Jump_Nonzero	0x16c
0167 e21a       |    |		Load	0x1,0x1a							; Debug Table 0x3.0xb = 0x167,0x402
0168 8407       |    |		Call	0x2,0x7
0169 e21c       |    |		Load	0x1,0x1c							; Debug Table 0x3.0xc = 0x169,0x403
016a 8407       |    |		Call	0x2,0x7
016b 7804       |x   |		Jump	0x170
016c e21b       |    |		Load	0x1,0x1b							; Debug Table 0x3.0xd = 0x16c,0x404
016d 8407       |    |		Call	0x2,0x7
016e e21d       |    |		Load	0x1,0x1d							; Debug Table 0x3.0xe = 0x16e,0x405
016f 8407       |    |		Call	0x2,0x7
0170 48ff       |H   |		Short_Literal	0xff							; Debug Table 0x3.0xf = 0x170,0x406
0171 4800       |H   |		Short_Literal	0x0
0172 0007       |    |		Action	Break_Optional
0173 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x10 = 0x173,0x407
0174 e004       |    |		Load	0x0,0x4
0175 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0176 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0177 6801       |h   |		Jump_Zero	0x179
0178 8408       |    |		Call	0x2,0x8								; Debug Table 0x3.0x11 = 0x178,0x408
0179 3ff9       |?   |		Loop_Increasing	0x173
017a 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0x12 = 0x17a,0x409
017b 00db       |    |		Load_Top	At_Offset_3
017c 0aff       |    |		Execute_Immediate	Plus,-0x1
017d 0248       | H  |		Execute	Discrete,Check_In_Integer
017e e405       |    |		Load	0x2,0x5
017f 01cf       |    |		Execute	Vector,Slice_Read
0180 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0181 0000 0000  |    |		.BLANK	0000[0x7]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018f       |    |		.CONST	0x018f								; Address of begin
0189 0004       |    |		.CONST	0x0004								; Address of exception handler
018a 0003       |    |		.CONST	0x0003								; Number of locals
018b			INIT_0188:
018b 029f 03bb  |    |		Declare_Subprogram	INIT_03b8,For_Call				; Debug Table 0x4 = .DEBUG	0x018b,0x05c0,0x0002,0x0000,0x0036,0xb7a4,0x0000,0x0034
													; Debug Table 0x4.0x0 = 0x18b,0xffff
018d 029f 03db  |    |		Declare_Subprogram	INIT_03d8,For_Call				; Debug Table 0x4.0x1 = 0x18d,0xfffe
018f			BODY_0188:
018f e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0x2 = 0x18f,0x1
0190 8402       |    |		Call	0x2,0x2
0191 0092 0468  |   h|		Action	Push_String_Extended,0x468					; ","
0193 01cc       |    |		Execute	Vector,Catenate
0194 e5fe       |    |		Load	0x2,-0x2
0195 8403       |    |		Call	0x2,0x3
0196 01cc       |    |		Execute	Vector,Catenate
0197 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 01a2       |    |		.CONST	0x01a2								; Address of begin
0199 0004       |    |		.CONST	0x0004								; Address of exception handler
019a 0002       |    |		.CONST	0x0002								; Number of locals
019b			INIT_0198:
019b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5 = .DEBUG	0x019b,0x05c8,0x0002,0x0000,0x0036,0xb7a4,0x0000,0x00ce
													; Debug Table 0x5.0x0 = 0x19b,0xffff
019c e212       |    |		Load	0x1,0x12
019d e213       |    |		Load	0x1,0x13
019e 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
019f 8001       |    |		Call	0x0,0x1
01a0 00e5       |    |		Load_Encached	Long_Integer_Cache
01a1 03f1       |    |		Declare_Variable	Discrete,With_Value
01a2			BODY_0198:
01a2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x1 = 0x1a2,0x1
01a3 4802       |H   |		Short_Literal	0x2
01a4 4820       |H   |		Short_Literal	0x20
01a5 026d       | m  |		Execute	Discrete,Exponentiate
01a6 0270       | p  |		Execute	Discrete,Divide
01a7 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
01a8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x2 = 0x1a8,0x2
01a9 0d00       |    |		Execute_Immediate	Less,0x0
01aa 6806       |h   |		Jump_Zero	0x1b1
01ab 4802       |H   |		Short_Literal	0x2							; Debug Table 0x5.0x3 = 0x1ab,0x3
01ac 4820       |H   |		Short_Literal	0x20
01ad 026d       | m  |		Execute	Discrete,Exponentiate
01ae 00d9       |    |		Load_Top	At_Offset_1
01af 0273       | s  |		Execute	Discrete,Plus
01b0 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
01b1 4820       |H   |		Short_Literal	0x20							; Debug Table 0x5.0x4 = 0x1b1,0x4
01b2 4800       |H   |		Short_Literal	0x0
01b3 4810       |H   |		Short_Literal	0x10
01b4 00db       |    |		Load_Top	At_Offset_3
01b5 e005       |    |		Load	0x0,0x5
01b6 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
01b7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bb       |    |		.CONST	0x01bb								; Address of begin
01b9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ba 0001       |    |		.CONST	0x0001								; Number of locals
01bb			BODY_01b8:
01bb			INIT_01b8:
01bb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6 = .DEBUG	0x01bb,0x05d4,0x0002,0x0000,0x0036,0xb7a4,0x0000,0x0111
													; Debug Table 0x6.0x0 = 0x1bb,0x1
01bc 01db       |    |		Execute	Vector,Length
01bd e5fe       |    |		Load	0x2,-0x2
01be 027a       | z  |		Execute	Discrete,Less_Equal
01bf 6802       |h   |		Jump_Zero	0x1c2
01c0 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x1 = 0x1c0,0x2
01c1 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01c2 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x2 = 0x1c2,0x3
01c3 01dd       |    |		Execute	Vector,First
01c4 00db       |    |		Load_Top	At_Offset_3
01c5 01dd       |    |		Execute	Vector,First
01c6 e5fe       |    |		Load	0x2,-0x2
01c7 0273       | s  |		Execute	Discrete,Plus
01c8 0aff       |    |		Execute_Immediate	Plus,-0x1
01c9 0248       | H  |		Execute	Discrete,Check_In_Integer
01ca e5ff       |    |		Load	0x2,-0x1
01cb 01cf       |    |		Execute	Vector,Slice_Read
01cc 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01cd 0000 0000  |    |		.XXX[0x3]
01cf 0000       |    |
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3       |    |		.CONST	0x01d3								; Address of begin
01d1 0004       |    |		.CONST	0x0004								; Address of exception handler
01d2 0001       |    |		.CONST	0x0001								; Number of locals
01d3			BODY_01d0:
01d3			INIT_01d0:
01d3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7 = .DEBUG	0x01d3,0x05dc,0x0002,0x0000,0x0036,0xb7a4,0x0000,0x0142
													; Debug Table 0x7.0x0 = 0x1d3,0x1
01d4 01db       |    |		Execute	Vector,Length
01d5 e5fe       |    |		Load	0x2,-0x2
01d6 027f       |    |		Execute	Discrete,Equal
01d7 6805       |h   |		Jump_Zero	0x1dd
01d8 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x1 = 0x1d8,0x2
01d9 0092 0469  |   i|		Action	Push_String_Extended,0x469					; " "
01db 01cc       |    |		Execute	Vector,Catenate
01dc 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
01dd 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x2 = 0x1dd,0x3
01de 01db       |    |		Execute	Vector,Length
01df e5fe       |    |		Load	0x2,-0x2
01e0 027c       | |  |		Execute	Discrete,Less
01e1 681c       |h   |		Jump_Zero	0x1fe
01e2 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x7.0x3 = 0x1e2,0x4
01e3 680e       |h   |		Jump_Zero	0x1f2
01e4 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0x4 = 0x1e4,0x5
01e5 e5fe       |    |		Load	0x2,-0x2
01e6 e5ff       |    |		Load	0x2,-0x1
01e7 01db       |    |		Execute	Vector,Length
01e8 0272       | r  |		Execute	Discrete,Minus
01e9 0248       | H  |		Execute	Discrete,Check_In_Integer
01ea e20f       |    |		Load	0x1,0xf
01eb 01cf       |    |		Execute	Vector,Slice_Read
01ec 00db       |    |		Load_Top	At_Offset_3
01ed 01cc       |    |		Execute	Vector,Catenate
01ee 0092 0469  |   i|		Action	Push_String_Extended,0x469					; " "
01f0 01cc       |    |		Execute	Vector,Catenate
01f1 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
01f2 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x5 = 0x1f2,0x6
01f3 4801       |H   |		Short_Literal	0x1
01f4 e5fe       |    |		Load	0x2,-0x2
01f5 e5ff       |    |		Load	0x2,-0x1
01f6 01db       |    |		Execute	Vector,Length
01f7 0272       | r  |		Execute	Discrete,Minus
01f8 0a01       |    |		Execute_Immediate	Plus,0x1
01f9 0248       | H  |		Execute	Discrete,Check_In_Integer
01fa e20f       |    |		Load	0x1,0xf
01fb 01cf       |    |		Execute	Vector,Slice_Read
01fc 01cc       |    |		Execute	Vector,Catenate
01fd 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
01fe e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x7.0x6 = 0x1fe,0x7
01ff 680e       |h   |		Jump_Zero	0x20e
0200 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x7 = 0x200,0x8
0201 01dc       |    |		Execute	Vector,Last
0202 e5fe       |    |		Load	0x2,-0x2
0203 0272       | r  |		Execute	Discrete,Minus
0204 0a01       |    |		Execute_Immediate	Plus,0x1
0205 0248       | H  |		Execute	Discrete,Check_In_Integer
0206 00db       |    |		Load_Top	At_Offset_3
0207 01dc       |    |		Execute	Vector,Last
0208 e5ff       |    |		Load	0x2,-0x1
0209 01cf       |    |		Execute	Vector,Slice_Read
020a 0092 0469  |   i|		Action	Push_String_Extended,0x469					; " "
020c 01cc       |    |		Execute	Vector,Catenate
020d 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
020e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x8 = 0x20e,0x9
020f 01dd       |    |		Execute	Vector,First
0210 00db       |    |		Load_Top	At_Offset_3
0211 01dd       |    |		Execute	Vector,First
0212 e5fe       |    |		Load	0x2,-0x2
0213 0273       | s  |		Execute	Discrete,Plus
0214 0aff       |    |		Execute_Immediate	Plus,-0x1
0215 0248       | H  |		Execute	Discrete,Check_In_Integer
0216 e5ff       |    |		Load	0x2,-0x1
0217 01cf       |    |		Execute	Vector,Slice_Read
0218 0092 0469  |   i|		Action	Push_String_Extended,0x469					; " "
021a 01cc       |    |		Execute	Vector,Catenate
021b 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
021c 0000 0000  |    |		.BLANK	0000[0x4]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223       | #  |		.CONST	0x0223								; Address of begin
0221 0227       | '  |		.CONST	0x0227								; Address of exception handler
0222 0001       |    |		.CONST	0x0001								; Number of locals
0223			BODY_0220:
0223			INIT_0220:
0223 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8 = .DEBUG	0x0223,0x05f0,0x0002,0x0000,0x0036,0xb7a4,0x0000,0x0303
													; Debug Table 0x8.0x0 = 0x223,0x1
0224 e003       |    |		Load	0x0,0x3
0225 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0226 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0227			TRAP_0220:
0227 0007       |    |		Action	Break_Optional
0228 0092 046a  |   j|		Action	Push_String_Extended,0x46a					; "<?>"
													; Debug Table 0x8.0x1 = 0x228,0x2
022a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
022b 0000 0000  |    |		.BLANK	0000[0x5]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 026f       | o  |		.CONST	0x026f								; Address of begin
0231 0004       |    |		.CONST	0x0004								; Address of exception handler
0232 0011       |    |		.CONST	0x0011								; Number of locals
0233			INIT_0230:
0233 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x9 = .DEBUG	0x0233,0x05f6,0x0002,0x0000,0x0036,0xb7a4,0x0000,0x031f
													; Debug Table 0x9.0x0 = 0x233,0xffff
0234 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0235 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x9.0x1 = 0x235,0xfffe
0236 821e       |    |		Call	0x1,0x1e
0237 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x9.0x2 = 0x237,0xfffd
0238 e004       |    |		Load	0x0,0x4
0239 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
023a 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
023b 00e2       |    |		Load_Encached	Integer_Cache
023c 03f1       |    |		Declare_Variable	Discrete,With_Value
023d e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x9.0x3 = 0x23d,0xfffc
023e e004       |    |		Load	0x0,0x4
023f 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0240 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0241 00e2       |    |		Load_Encached	Integer_Cache
0242 03f1       |    |		Declare_Variable	Discrete,With_Value
0243 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x9.0x4 = 0x243,0xfffb
0244 e004       |    |		Load	0x0,0x4
0245 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0246 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0247 00e2       |    |		Load_Encached	Integer_Cache
0248 03f1       |    |		Declare_Variable	Discrete,With_Value
0249 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x9.0x5 = 0x249,0xfffa
024a e004       |    |		Load	0x0,0x4
024b 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
024c 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
024d 00e2       |    |		Load_Encached	Integer_Cache
024e 03f1       |    |		Declare_Variable	Discrete,With_Value
024f e006       |    |		Load	0x0,0x6								; Debug Table 0x9.0x6 = 0x24f,0xfff9
0250 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0251 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0252 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x9.0x7 = 0x252,0xfff8
0253 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0254 e007       |    |		Load	0x0,0x7								; Debug Table 0x9.0x8 = 0x254,0xfff7
0255 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
0256 0602       |    |		Execute_Immediate	Set_Value_Unchecked,0x2
0257 e003       |    |		Load	0x0,0x3								; Debug Table 0x9.0x9 = 0x257,0xfff6
0258 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0259 0602       |    |		Execute_Immediate	Set_Value_Unchecked,0x2
025a e007       |    |		Load	0x0,0x7								; Debug Table 0x9.0xa = 0x25a,0xfff5
025b 1b2e       | .  |		Execute	Package,Field_Read,Field_Number 0x2e
025c 0322       | "  |		Declare_Variable	Record
025d e5ff       |    |		Load	0x2,-0x1
025e e007       |    |		Load	0x0,0x7
025f 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0260 00d9       |    |		Load_Top	At_Offset_1
0261 017d       | }  |		Execute	Record,Structure_Write
0262 00f0       |    |		Load_Encached	Segment_Cache						; Debug Table 0x9.0xb = 0x262,0xfff4
0263 e5ff       |    |		Load	0x2,-0x1
0264 e008       |    |		Load	0x0,0x8
0265 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0266 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0267 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x9.0xc = 0x267,0xfff3
0268 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0269 029f 03fb  |    |		Declare_Subprogram	INIT_03f8,For_Call				; Debug Table 0x9.0xd = 0x269,0xfff2
026b 029f 0423  |   #|		Declare_Subprogram	INIT_0420,For_Call				; Debug Table 0x9.0xe = 0x26b,0xfff1
026d 029f 0443  |   C|		Declare_Subprogram	INIT_0440,For_Call
026f			BODY_0230:
026f 8411       |    |		Call	0x2,0x11							; Debug Table 0x9.0xf = 0x26f,0x1
0270 e40d       |    |		Load	0x2,0xd								; Debug Table 0x9.0x10 = 0x270,0x2
0271 00f0       |    |		Load_Encached	Segment_Cache
0272 021e       |    |		Execute	Heap_Access,Maximum
0273 6807       |h   |		Jump_Zero	0x27b
0274 e40d       |    |		Load	0x2,0xd								; Debug Table 0x9.0x11 = 0x274,0x3
0275 e009       |    |		Load	0x0,0x9
0276 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0277 09f3       |    |		Execute_Immediate	Binary_Scale,-0xd
0278 00e3       |    |		Load_Encached	Natural_Cache
0279 025b       | [  |		Execute	Discrete,Check_In_Type
027a a40e       |    |		Store_Unchecked	0x2,0xe
027b 8410       |    |		Call	0x2,0x10							; Debug Table 0x9.0x12 = 0x27b,0x4
027c 6898       |h   |		Jump_Zero	0x315
027d e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x13 = 0x27d,0x5
027e 7033       |p3  |		Jump_Nonzero	0x2b2
027f e00a       |    |		Load	0x0,0xa								; Debug Table 0x9.0x14 = 0x27f,0x6
0280 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
0281 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0282 840f       |    |		Call	0x2,0xf
0283 4801       |H   |		Short_Literal	0x1							; Debug Table 0x9.0x15 = 0x283,0x7
0284 4804       |H   |		Short_Literal	0x4
0285 e5ff       |    |		Load	0x2,-0x1
0286 00e0       |    |		Load_Encached	Standard_Cache
0287 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0288 8219       |    |		Call	0x1,0x19
0289 4801       |H   |		Short_Literal	0x1
028a 4804       |H   |		Short_Literal	0x4
028b e40c       |    |		Load	0x2,0xc
028c 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
028d 480a       |H   |		Short_Literal	0xa
028e 0270       | p  |		Execute	Discrete,Divide
028f 00e0       |    |		Load_Encached	Standard_Cache
0290 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0291 8219       |    |		Call	0x1,0x19
0292 01cc       |    |		Execute	Vector,Catenate
0293 4801       |H   |		Short_Literal	0x1
0294 4808       |H   |		Short_Literal	0x8
0295 4820       |H   |		Short_Literal	0x20
0296 4800       |H   |		Short_Literal	0x0
0297 4810       |H   |		Short_Literal	0x10
0298 e408       |    |		Load	0x2,0x8
0299 e005       |    |		Load	0x0,0x5
029a 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
029b 8219       |    |		Call	0x1,0x19
029c 01cc       |    |		Execute	Vector,Catenate
029d 4801       |H   |		Short_Literal	0x1
029e 4809       |H   |		Short_Literal	0x9
029f e40d       |    |		Load	0x2,0xd
02a0 8217       |    |		Call	0x1,0x17
02a1 8219       |    |		Call	0x1,0x19
02a2 01cc       |    |		Execute	Vector,Catenate
02a3 4801       |H   |		Short_Literal	0x1
02a4 4804       |H   |		Short_Literal	0x4
02a5 e402       |    |		Load	0x2,0x2
02a6 00e0       |    |		Load_Encached	Standard_Cache
02a7 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02a8 8219       |    |		Call	0x1,0x19
02a9 01cc       |    |		Execute	Vector,Catenate
02aa 482e       |H.  |		Short_Literal	0x2e
02ab 4820       |H   |		Short_Literal	0x20
02ac e403       |    |		Load	0x2,0x3
02ad e005       |    |		Load	0x0,0x5
02ae 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
02af 8218       |    |		Call	0x1,0x18
02b0 01cc       |    |		Execute	Vector,Catenate
02b1 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
02b2 4801       |H   |		Short_Literal	0x1							; Debug Table 0x9.0x16 = 0x2b2,0x8
02b3 4804       |H   |		Short_Literal	0x4
02b4 e5ff       |    |		Load	0x2,-0x1
02b5 00e0       |    |		Load_Encached	Standard_Cache
02b6 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02b7 8219       |    |		Call	0x1,0x19
02b8 4801       |H   |		Short_Literal	0x1
02b9 4803       |H   |		Short_Literal	0x3
02ba e40c       |    |		Load	0x2,0xc
02bb 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02bc 00e0       |    |		Load_Encached	Standard_Cache
02bd 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02be 8219       |    |		Call	0x1,0x19
02bf 01cc       |    |		Execute	Vector,Catenate
02c0 4801       |H   |		Short_Literal	0x1
02c1 4804       |H   |		Short_Literal	0x4
02c2 e40a       |    |		Load	0x2,0xa
02c3 e40b       |    |		Load	0x2,0xb
02c4 8211       |    |		Call	0x1,0x11
02c5 8219       |    |		Call	0x1,0x19
02c6 01cc       |    |		Execute	Vector,Catenate
02c7 4801       |H   |		Short_Literal	0x1
02c8 4804       |H   |		Short_Literal	0x4
02c9 e40c       |    |		Load	0x2,0xc
02ca 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
02cb 480a       |H   |		Short_Literal	0xa
02cc 0270       | p  |		Execute	Discrete,Divide
02cd 00e0       |    |		Load_Encached	Standard_Cache
02ce 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02cf 8219       |    |		Call	0x1,0x19
02d0 01cc       |    |		Execute	Vector,Catenate
02d1 4801       |H   |		Short_Literal	0x1
02d2 4806       |H   |		Short_Literal	0x6
02d3 e404       |    |		Load	0x2,0x4
02d4 00e0       |    |		Load_Encached	Standard_Cache
02d5 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02d6 8219       |    |		Call	0x1,0x19
02d7 01cc       |    |		Execute	Vector,Catenate
02d8 4801       |H   |		Short_Literal	0x1
02d9 4805       |H   |		Short_Literal	0x5
02da e405       |    |		Load	0x2,0x5
02db 00e0       |    |		Load_Encached	Standard_Cache
02dc 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02dd 8219       |    |		Call	0x1,0x19
02de 01cc       |    |		Execute	Vector,Catenate
02df 4801       |H   |		Short_Literal	0x1
02e0 4806       |H   |		Short_Literal	0x6
02e1 e406       |    |		Load	0x2,0x6
02e2 00e0       |    |		Load_Encached	Standard_Cache
02e3 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02e4 8219       |    |		Call	0x1,0x19
02e5 01cc       |    |		Execute	Vector,Catenate
02e6 4801       |H   |		Short_Literal	0x1
02e7 4806       |H   |		Short_Literal	0x6
02e8 e407       |    |		Load	0x2,0x7
02e9 00e0       |    |		Load_Encached	Standard_Cache
02ea 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02eb 8219       |    |		Call	0x1,0x19
02ec 01cc       |    |		Execute	Vector,Catenate
02ed 4801       |H   |		Short_Literal	0x1
02ee 4806       |H   |		Short_Literal	0x6
02ef e40c       |    |		Load	0x2,0xc
02f0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
02f1 00e0       |    |		Load_Encached	Standard_Cache
02f2 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02f3 8219       |    |		Call	0x1,0x19
02f4 01cc       |    |		Execute	Vector,Catenate
02f5 4801       |H   |		Short_Literal	0x1
02f6 4803       |H   |		Short_Literal	0x3
02f7 e40c       |    |		Load	0x2,0xc
02f8 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
02f9 00e0       |    |		Load_Encached	Standard_Cache
02fa 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02fb 8219       |    |		Call	0x1,0x19
02fc 01cc       |    |		Execute	Vector,Catenate
02fd 4801       |H   |		Short_Literal	0x1
02fe 4806       |H   |		Short_Literal	0x6
02ff e40e       |    |		Load	0x2,0xe
0300 00e0       |    |		Load_Encached	Standard_Cache
0301 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0302 8219       |    |		Call	0x1,0x19
0303 01cc       |    |		Execute	Vector,Catenate
0304 4801       |H   |		Short_Literal	0x1
0305 4805       |H   |		Short_Literal	0x5
0306 e40c       |    |		Load	0x2,0xc
0307 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0308 00e0       |    |		Load_Encached	Standard_Cache
0309 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
030a 8219       |    |		Call	0x1,0x19
030b 01cc       |    |		Execute	Vector,Catenate
030c 4801       |H   |		Short_Literal	0x1
030d 4805       |H   |		Short_Literal	0x5
030e e40c       |    |		Load	0x2,0xc
030f 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0310 00e0       |    |		Load_Encached	Standard_Cache
0311 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0312 8219       |    |		Call	0x1,0x19
0313 01cc       |    |		Execute	Vector,Catenate
0314 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0315 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x9.0x17 = 0x315,0x9
0316 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0317 0000       |    |		.XXX[0x1]
0318 0000 0000  |    |		.LITERAL	{0x00000000, 0x00000744}
031c 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000073a}
0320 0000 0000  |    |		.LITERAL	{0x00000000, 0x0036b7a4}
0324 2020 2020  |    |		.LITERAL	{0x20202020, 0x20202020}
0328 2020 2020  |    |		.BLANK	2020[0x20]
0348 2d2d 2d2d  |----|		.LITERAL	{0x2d2d2d2d, 0x2d2d2d2d}
034c 2d2d 2d2d  |----|		.BLANK	2d2d[0x15]
0361 2020 2020  |    |		.XXX[0x3]
0363 2020       |    |
0364 0000 0000  |    |		.BLANK	0000[0x4]
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 036b       | k  |		.CONST	0x036b								; Address of begin
0369 0004       |    |		.CONST	0x0004								; Address of exception handler
036a 0001       |    |		.CONST	0x0001								; Number of locals
036b			BODY_0368:
036b			INIT_0368:
036b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa = .DEBUG	0x036b,0x0628,0x0001,0x0000,0x0036,0xb7a4,0x0000,0x0608
													; Debug Table 0xa.0x0 = 0x36b,0x1
036c 01db       |    |		Execute	Vector,Length
036d 7001       |p   |		Jump_Nonzero	0x36f
036e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0xa.0x1 = 0x36e,0x2
036f 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x2 = 0x36f,0x3
0370 01db       |    |		Execute	Vector,Length
0371 e405       |    |		Load	0x2,0x5
0372 01dc       |    |		Execute	Vector,Last
0373 e406       |    |		Load	0x2,0x6
0374 0272       | r  |		Execute	Discrete,Minus
0375 027d       | }  |		Execute	Discrete,Greater
0376 680a       |h   |		Jump_Zero	0x381
0377 e405       |    |		Load	0x2,0x5								; Debug Table 0xa.0x3 = 0x377,0x4
0378 01dc       |    |		Execute	Vector,Last
0379 e406       |    |		Load	0x2,0x6
037a 0272       | r  |		Execute	Discrete,Minus
037b 0c05       |    |		Execute_Immediate	Greater_Equal,0x5
037c 681a       |h   |		Jump_Zero	0x397
037d 0092 046b  |   k|		Action	Push_String_Extended,0x46b					; "..."
													; Debug Table 0xa.0x4 = 0x37d,0x5
037f 8407       |    |		Call	0x2,0x7
0380 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0381 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x5 = 0x381,0x6
0382 e406       |    |		Load	0x2,0x6
0383 e406       |    |		Load	0x2,0x6
0384 e7ff       |    |		Load	0x3,-0x1
0385 01db       |    |		Execute	Vector,Length
0386 0273       | s  |		Execute	Discrete,Plus
0387 0aff       |    |		Execute_Immediate	Plus,-0x1
0388 0248       | H  |		Execute	Discrete,Check_In_Integer
0389 e405       |    |		Load	0x2,0x5
038a 01ce       |    |		Execute	Vector,Slice_Write
038b e406       |    |		Load	0x2,0x6								; Debug Table 0xa.0x6 = 0x38b,0x7
038c 00db       |    |		Load_Top	At_Offset_3
038d 01db       |    |		Execute	Vector,Length
038e 0273       | s  |		Execute	Discrete,Plus
038f c406       |    |		Store	0x2,0x6
0390 480a       |H   |		Short_Literal	0xa							; Debug Table 0xa.0x7 = 0x390,0x8
0391 e406       |    |		Load	0x2,0x6
0392 e405       |    |		Load	0x2,0x5
0393 01d6       |    |		Execute	Vector,Field_Write
0394 e406       |    |		Load	0x2,0x6								; Debug Table 0xa.0x8 = 0x394,0x9
0395 0a01       |    |		Execute_Immediate	Plus,0x1
0396 c406       |    |		Store	0x2,0x6
0397 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 039b       |    |		.CONST	0x039b								; Address of begin
0399 03a1       |    |		.CONST	0x03a1								; Address of exception handler
039a 0001       |    |		.CONST	0x0001								; Number of locals
039b			BODY_0398:
039b			INIT_0398:
039b e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb = .DEBUG	0x039b,0x063c,0x0004,0x0000,0x0036,0xb7a4,0x0000,0x06ca
													; Debug Table 0xb.0x0 = 0x39b,0x1
039c e5ff       |    |		Load	0x2,-0x1
039d e40a       |    |		Load	0x2,0xa
039e 821f       |    |		Call	0x1,0x1f
039f 8407       |    |		Call	0x2,0x7
03a0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03a1			TRAP_0398:
03a1 0007       |    |		Action	Break_Optional
03a2 e40a       |    |		Load	0x2,0xa								; Debug Table 0xb.0x1 = 0x3a2,0x2
03a3 0e06       |    |		Execute_Immediate	Not_Equal,0x6
03a4 680d       |h   |		Jump_Zero	0x3b2
03a5 e40a       |    |		Load	0x2,0xa
03a6 0e07       |    |		Execute_Immediate	Not_Equal,0x7
03a7 680a       |h   |		Jump_Zero	0x3b2
03a8 0092 046c  |   l|		Action	Push_String_Extended,0x46c					; "  "
													; Debug Table 0xb.0x2 = 0x3a8,0x3
03aa e40a       |    |		Load	0x2,0xa
03ab 00e0       |    |		Load_Encached	Standard_Cache
03ac 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
03ad 01cc       |    |		Execute	Vector,Catenate
03ae 0092 046d  |   m|		Action	Push_String_Extended,0x46d					; "  Exception getting info"
03b0 01cc       |    |		Execute	Vector,Catenate
03b1 8407       |    |		Call	0x2,0x7
03b2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03b3 0000 0000  |    |		.BLANK	0000[0x5]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bb       |    |		.CONST	0x03bb								; Address of begin
03b9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ba 0001       |    |		.CONST	0x0001								; Number of locals
03bb			BODY_03b8:
03bb			INIT_03b8:
03bb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc = .DEBUG	0x03bb,0x0644,0x0002,0x0000,0x0036,0xb7a4,0x0000,0x0046
													; Debug Table 0xc.0x0 = 0x3bb,0x1
03bc 4604       |F   |		Jump_Case	0x5
03bd 7804       |x   |		Jump	0x3c2								; case 0x0
03be 7806       |x   |		Jump	0x3c5								; case 0x1
03bf 7808       |x   |		Jump	0x3c8								; case 0x2
03c0 780a       |x   |		Jump	0x3cb								; case 0x3
03c1 780c       |x   |		Jump	0x3ce								; case 0x4
03c2 0092 046e  |   n|		Action	Push_String_Extended,0x46e					; "R"
													; Debug Table 0xc.0x1 = 0x3c2,0x2
03c4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03c5 0092 046f  |   o|		Action	Push_String_Extended,0x46f					; "W"
													; Debug Table 0xc.0x2 = 0x3c5,0x3
03c7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03c8 0092 0470  |   p|		Action	Push_String_Extended,0x470					; "I"
													; Debug Table 0xc.0x3 = 0x3c8,0x4
03ca 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03cb 0092 0471  |   q|		Action	Push_String_Extended,0x471					; "D"
													; Debug Table 0xc.0x4 = 0x3cb,0x5
03cd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03ce 0092 0472  |   r|		Action	Push_String_Extended,0x472					; "Q"
													; Debug Table 0xc.0x5 = 0x3ce,0x6
03d0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03d1 0000 0000  |    |		.BLANK	0000[0x7]
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03db       |    |		.CONST	0x03db								; Address of begin
03d9 0004       |    |		.CONST	0x0004								; Address of exception handler
03da 0001       |    |		.CONST	0x0001								; Number of locals
03db			BODY_03d8:
03db			INIT_03d8:
03db 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd = .DEBUG	0x03db,0x0652,0x0002,0x0000,0x0036,0xb7a4,0x0000,0x0076
													; Debug Table 0xd.0x0 = 0x3db,0x1
03dc 4605       |F   |		Jump_Case	0x6
03dd 7805       |x   |		Jump	0x3e3								; case 0x0
03de 7807       |x   |		Jump	0x3e6								; case 0x1
03df 7809       |x   |		Jump	0x3e9								; case 0x2
03e0 780b       |x   |		Jump	0x3ec								; case 0x3
03e1 780d       |x   |		Jump	0x3ef								; case 0x4
03e2 780f       |x   |		Jump	0x3f2								; case 0x5
03e3 0092 0473  |   s|		Action	Push_String_Extended,0x473					; "CE"
													; Debug Table 0xd.0x1 = 0x3e3,0x2
03e5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03e6 0092 0474  |   t|		Action	Push_String_Extended,0x474					; "OE"
													; Debug Table 0xd.0x2 = 0x3e6,0x3
03e8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03e9 0092 0475  |   u|		Action	Push_String_Extended,0x475					; "AT"
													; Debug Table 0xd.0x3 = 0x3e9,0x4
03eb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03ec 0092 0476  |   v|		Action	Push_String_Extended,0x476					; "DT"
													; Debug Table 0xd.0x4 = 0x3ec,0x5
03ee 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03ef 0092 0477  |   w|		Action	Push_String_Extended,0x477					; "SV"
													; Debug Table 0xd.0x5 = 0x3ef,0x6
03f1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03f2 0092 0478  |   x|		Action	Push_String_Extended,0x478					; "??"
													; Debug Table 0xd.0x6 = 0x3f2,0x7
03f4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03f5 0000 0000  |    |		.XXX[0x3]
03f7 0000       |    |
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 03ff       |    |		.CONST	0x03ff								; Address of begin
03f9 0004       |    |		.CONST	0x0004								; Address of exception handler
03fa 0003       |    |		.CONST	0x0003								; Number of locals
03fb			INIT_03f8:
03fb e00a       |    |		Load	0x0,0xa								; Debug Table 0xe = .DEBUG	0x03fb,0x0662,0x0001,0x0000,0x0036,0xb7a4,0x0000,0x03ba
													; Debug Table 0xe.0x0 = 0x3fb,0xffff
03fc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03fd e003       |    |		Load	0x0,0x3								; Debug Table 0xe.0x1 = 0x3fd,0xfffe
03fe 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03ff			BODY_03f8:
03ff e7ff       |    |		Load	0x3,-0x1							; Debug Table 0xe.0x2 = 0x3ff,0x1
0400 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0401 4801       |H   |		Short_Literal	0x1
0402 0263       | c  |		Execute	Discrete,Above_Bound
0403 7018       |p   |		Jump_Nonzero	0x41c
0404 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x3 = 0x404,0x2
0405 e7ff       |    |		Load	0x3,-0x1
0406 2504       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0407 01d7       |    |		Execute	Vector,Field_Read
0408 a602       |    |		Store_Unchecked	0x3,0x2
0409 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x4 = 0x409,0x3
040a e00a       |    |		Load	0x0,0xa
040b 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
040c 680e       |h   |		Jump_Zero	0x41b
040d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x5 = 0x40d,0x4
040e e00a       |    |		Load	0x0,0xa
040f 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
0410 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0411 e006       |    |		Load	0x0,0x6
0412 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0413 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0414 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe.0x6 = 0x414,0x5
0415 e5ff       |    |		Load	0x2,-0x1
0416 027f       |    |		Execute	Discrete,Equal
0417 6803       |h   |		Jump_Zero	0x41b
0418 e402       |    |		Load	0x2,0x2								; Debug Table 0xe.0x7 = 0x418,0x6
0419 0a01       |    |		Execute_Immediate	Plus,0x1
041a c402       |    |		Store	0x2,0x2
041b 3fe8       |?   |		Loop_Increasing	0x404
041c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
041d 0000 0000  |    |		.XXX[0x3]
041f 0000       |    |
0420 ; --------------------------------------------------------------------------------------
0420 ; SUBPROGRAM
0420 ; --------------------------------------------------------------------------------------
0420 0423       | #  |		.CONST	0x0423								; Address of begin
0421 0004       |    |		.CONST	0x0004								; Address of exception handler
0422 0001       |    |		.CONST	0x0001								; Number of locals
0423			BODY_0420:
0423			INIT_0420:
0423 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xf = .DEBUG	0x0423,0x0674,0x0002,0x0000,0x0036,0xb7a4,0x0000,0x0410
													; Debug Table 0xf.0x0 = 0x423,0x1
0424 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0425 6802       |h   |		Jump_Zero	0x428
0426 4801       |H   |		Short_Literal	0x1							; Debug Table 0xf.0x1 = 0x426,0x2
0427 00ca       |    |		Action	Exit_Nullary_Function
0428 e40c       |    |		Load	0x2,0xc								; Debug Table 0xf.0x2 = 0x428,0x3
0429 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
042a 0c1f       |    |		Execute_Immediate	Greater_Equal,0x1f
042b 700c       |p   |		Jump_Nonzero	0x438
042c e405       |    |		Load	0x2,0x5
042d e406       |    |		Load	0x2,0x6
042e 0273       | s  |		Execute	Discrete,Plus
042f 0c65       | e  |		Execute_Immediate	Greater_Equal,0x65
0430 7007       |p   |		Jump_Nonzero	0x438
0431 e40e       |    |		Load	0x2,0xe
0432 0c65       | e  |		Execute_Immediate	Greater_Equal,0x65
0433 7004       |p   |		Jump_Nonzero	0x438
0434 e40c       |    |		Load	0x2,0xc
0435 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0436 0c0b       |    |		Execute_Immediate	Greater_Equal,0xb
0437 00ca       |    |		Action	Exit_Nullary_Function
0438 4801       |H   |		Short_Literal	0x1
0439 00ca       |    |		Action	Exit_Nullary_Function
043a 0000 0000  |    |		.BLANK	0000[0x6]
0440 ; --------------------------------------------------------------------------------------
0440 ; SUBPROGRAM
0440 ; --------------------------------------------------------------------------------------
0440 0443       | C  |		.CONST	0x0443								; Address of begin
0441 0454       | T  |		.CONST	0x0454								; Address of exception handler
0442 0001       |    |		.CONST	0x0001								; Number of locals
0443			BODY_0440:
0443			INIT_0440:
0443 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x10 = .DEBUG	0x0443,0x067c,0x0004,0x0000,0x0036,0xb7a4,0x0000,0x0476
													; Debug Table 0x10.0x0 = 0x443,0x1
0444 e003       |    |		Load	0x0,0x3
0445 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0446 a408       |    |		Store_Unchecked	0x2,0x8
0447 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x10.0x1 = 0x447,0x2
0448 e003       |    |		Load	0x0,0x3
0449 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
044a a409       |    |		Store_Unchecked	0x2,0x9
044b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x10.0x2 = 0x44b,0x3
044c e007       |    |		Load	0x0,0x7
044d 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
044e a40a       |    |		Store_Unchecked	0x2,0xa
044f e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x10.0x3 = 0x44f,0x4
0450 e003       |    |		Load	0x0,0x3
0451 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
0452 a40b       |    |		Store_Unchecked	0x2,0xb
0453 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0454			TRAP_0440:
0454 0007       |    |		Action	Break_Optional
0455 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x10.0x4 = 0x455,0x5
0456 ; --------------------------------------------------------------------------------------
0456 ; STRING TABLE
0456 ; --------------------------------------------------------------------------------------
0456 0048       | H  |		.STRTAB	0x0048->0x047a							; "Job"
0457 0049       | I  |		.STRTAB	0x0049->0x047b							; "CPU%"
0458 004b       | K  |		.STRTAB	0x004b->0x047d							; "Root"
0459 004d       | M  |		.STRTAB	0x004d->0x047f							; "Job Seg"
045a 0052       | R  |		.STRTAB	0x0052->0x0483							; "Acts"
045b 0054       | T  |		.STRTAB	0x0054->0x0485							; "  Name"
045c 0058       | X  |		.STRTAB	0x0058->0x0488							; "Pri"
045d 0059       | Y  |		.STRTAB	0x0059->0x0489							; "Stat"
045e 005b       | [  |		.STRTAB	0x005b->0x048b							; "ModCt"
045f 005e       | ^  |		.STRTAB	0x005e->0x048e							; "Cache"
0460 0061       | a  |		.STRTAB	0x0061->0x0490							; "Disk"
0461 0063       | c  |		.STRTAB	0x0063->0x0492							; "PgLim"
0462 0066       | f  |		.STRTAB	0x0066->0x0495							; "DskWts"
0463 006a       | j  |		.STRTAB	0x006a->0x0498							; "D/S"
0464 006b       | k  |		.STRTAB	0x006b->0x0499							; "JSegSz"
0465 006f       | o  |		.STRTAB	0x006f->0x049c							; "WsSiz"
0466 0072       | r  |		.STRTAB	0x0072->0x049f							; "WsLim"
0467 0075       | u  |		.STRTAB	0x0075->0x04a1							; " --------------------------"
0468 008e       |    |		.STRTAB	0x008e->0x04af							; ","
0469 008d       |    |		.STRTAB	0x008d->0x04af							; " "
046a 008c       |    |		.STRTAB	0x008c->0x04b0							; "<?>"
046b 008d       |    |		.STRTAB	0x008d->0x04b1							; "..."
046c 008e       |    |		.STRTAB	0x008e->0x04b3							; "  "
046d 008e       |    |		.STRTAB	0x008e->0x04b4							; "  Exception getting info"
046e 00a4       |    |		.STRTAB	0x00a4->0x04c0							; "R"
046f 00a3       |    |		.STRTAB	0x00a3->0x04c0							; "W"
0470 00a2       |    |		.STRTAB	0x00a2->0x04c1							; "I"
0471 00a1       |    |		.STRTAB	0x00a1->0x04c1							; "D"
0472 00a0       |    |		.STRTAB	0x00a0->0x04c2							; "Q"
0473 009f       |    |		.STRTAB	0x009f->0x04c2							; "CE"
0474 009f       |    |		.STRTAB	0x009f->0x04c3							; "OE"
0475 009f       |    |		.STRTAB	0x009f->0x04c4							; "AT"
0476 009f       |    |		.STRTAB	0x009f->0x04c5							; "DT"
0477 009f       |    |		.STRTAB	0x009f->0x04c6							; "SV"
0478 009f       |    |		.STRTAB	0x009f->0x04c7							; "??"
0479 009f       |    |		.STREND 0x009f->0x04c8
047a 4a6f 6243  |JobC|		.STRTAB_STRINGS
04c9 0000 0000  |    |		.BLANK	0000[0x7]
04d0 ; --------------------------------------------------------------------------------------
04d0 ; Debug Table
04d0 ; --------------------------------------------------------------------------------------
04d0 0003 0011  |    |		.CONST	0x0003,0x0011
04d2 000b 055a  |   Z|		.DEBUG	0x000b,0x055a,0x8000,0x0000,0x0015,0xa284,0x0000,0x0005
04da 0011 0564  |   d|		.DEBUG	0x0011,0x0564,0x8000,0x0000,0x0036,0xb7a4,0x0000,0x0019
04e2 0123 0590  | #  |		.DEBUG	0x0123,0x0590,0x0002,0x0000,0x0015,0xa284,0x0000,0x0006
04ea 0143 0598  | C  |		.DEBUG	0x0143,0x0598,0x0002,0x0000,0x0015,0xa284,0x0000,0x001b
04f2 018b 05c0  |    |		.DEBUG	0x018b,0x05c0,0x0002,0x0000,0x0036,0xb7a4,0x0000,0x0034
04fa 019b 05c8  |    |		.DEBUG	0x019b,0x05c8,0x0002,0x0000,0x0036,0xb7a4,0x0000,0x00ce
0502 01bb 05d4  |    |		.DEBUG	0x01bb,0x05d4,0x0002,0x0000,0x0036,0xb7a4,0x0000,0x0111
050a 01d3 05dc  |    |		.DEBUG	0x01d3,0x05dc,0x0002,0x0000,0x0036,0xb7a4,0x0000,0x0142
0512 0223 05f0  | #  |		.DEBUG	0x0223,0x05f0,0x0002,0x0000,0x0036,0xb7a4,0x0000,0x0303
051a 0233 05f6  | 3  |		.DEBUG	0x0233,0x05f6,0x0002,0x0000,0x0036,0xb7a4,0x0000,0x031f
0522 036b 0628  | k (|		.DEBUG	0x036b,0x0628,0x0001,0x0000,0x0036,0xb7a4,0x0000,0x0608
052a 039b 063c  |   <|		.DEBUG	0x039b,0x063c,0x0004,0x0000,0x0036,0xb7a4,0x0000,0x06ca
0532 03bb 0644  |   D|		.DEBUG	0x03bb,0x0644,0x0002,0x0000,0x0036,0xb7a4,0x0000,0x0046
053a 03db 0652  |   R|		.DEBUG	0x03db,0x0652,0x0002,0x0000,0x0036,0xb7a4,0x0000,0x0076
0542 03fb 0662  |   b|		.DEBUG	0x03fb,0x0662,0x0001,0x0000,0x0036,0xb7a4,0x0000,0x03ba
054a 0423 0674  | # t|		.DEBUG	0x0423,0x0674,0x0002,0x0000,0x0036,0xb7a4,0x0000,0x0410
0552 0443 067c  | C ||		.DEBUG	0x0443,0x067c,0x0004,0x0000,0x0036,0xb7a4,0x0000,0x0476
055a ; --------------------------------------------------------------------------------------
055a ; Debug3 Subtable 0x0
055a ; --------------------------------------------------------------------------------------
055a 0004 0000  |    |		.DBG3TAB	0x0004,0x0000
055c 000b ffff  |    |		.CONST	0x000b,0xffff
055e 000d fffe  |    |		.CONST	0x000d,0xfffe
0560 000f fffd  |    |		.CONST	0x000f,0xfffd
0562 0010 fffc  |    |		.CONST	0x0010,0xfffc
0564 ; --------------------------------------------------------------------------------------
0564 ; Debug3 Subtable 0x1
0564 ; --------------------------------------------------------------------------------------
0564 0012 0003  |    |		.DBG3TAB	0x0012,0x0003
0566 0011 ffff  |    |		.CONST	0x0011,0xffff
0568 0012 fffe  |    |		.CONST	0x0012,0xfffe
056a 0017 fffd  |    |		.CONST	0x0017,0xfffd
056c 001c fffc  |    |		.CONST	0x001c,0xfffc
056e 001e fffb  |    |		.CONST	0x001e,0xfffb
0570 0026 fffa  | &  |		.CONST	0x0026,0xfffa
0572 0028 fff9  | (  |		.CONST	0x0028,0xfff9
0574 002a fff8  | *  |		.CONST	0x002a,0xfff8
0576 002c fff7  | ,  |		.CONST	0x002c,0xfff7
0578 004d fff6  | M  |		.CONST	0x004d,0xfff6
057a 009b fff5  |    |		.CONST	0x009b,0xfff5
057c 00b7 fff4  |    |		.CONST	0x00b7,0xfff4
057e 00f8 fff3  |    |		.CONST	0x00f8,0xfff3
0580 00fa fff2  |    |		.CONST	0x00fa,0xfff2
0582 00fc fff1  |    |		.CONST	0x00fc,0xfff1
0584 00fe fff0  |    |		.CONST	0x00fe,0xfff0
0586 0100 ffef  |    |		.CONST	0x0100,0xffef
0588 0108 ffee  |    |		.CONST	0x0108,0xffee
058a 0110 0001  |    |		.CONST	0x0110,0x0001
058c 0114 0002  |    |		.CONST	0x0114,0x0002
058e 0118 0003  |    |		.CONST	0x0118,0x0003
0590 ; --------------------------------------------------------------------------------------
0590 ; Debug3 Subtable 0x2
0590 ; --------------------------------------------------------------------------------------
0590 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0592 0123 0001  | #  |		.CONST	0x0123,0x0001
0594 0125 0002  | %  |		.CONST	0x0125,0x0002
0596 0132 0003  | 2  |		.CONST	0x0132,0x0003
0598 ; --------------------------------------------------------------------------------------
0598 ; Debug3 Subtable 0x3
0598 ; --------------------------------------------------------------------------------------
0598 0006 000d  |    |		.DBG3TAB	0x0006,0x000d
059a 0143 ffff  | C  |		.CONST	0x0143,0xffff
059c 0145 fffe  | E  |		.CONST	0x0145,0xfffe
059e 0148 fffd  | H  |		.CONST	0x0148,0xfffd
05a0 014a 0001  | J  |		.CONST	0x014a,0x0001
05a2 014d 0002  | M  |		.CONST	0x014d,0x0002
05a4 0152 0003  | R  |		.CONST	0x0152,0x0003
05a6 0156 0004  | V  |		.CONST	0x0156,0x0004
05a8 0157 fbff  | W  |		.CONST	0x0157,0xfbff
05aa 015f fbfe  | _  |		.CONST	0x015f,0xfbfe
05ac 0161 fbfd  | a  |		.CONST	0x0161,0xfbfd
05ae 0165 0401  | e  |		.CONST	0x0165,0x0401
05b0 0167 0402  | g  |		.CONST	0x0167,0x0402
05b2 0169 0403  | i  |		.CONST	0x0169,0x0403
05b4 016c 0404  | l  |		.CONST	0x016c,0x0404
05b6 016e 0405  | n  |		.CONST	0x016e,0x0405
05b8 0170 0406  | p  |		.CONST	0x0170,0x0406
05ba 0173 0407  | s  |		.CONST	0x0173,0x0407
05bc 0178 0408  | x  |		.CONST	0x0178,0x0408
05be 017a 0409  | z  |		.CONST	0x017a,0x0409
05c0 ; --------------------------------------------------------------------------------------
05c0 ; Debug3 Subtable 0x4
05c0 ; --------------------------------------------------------------------------------------
05c0 0002 0001  |    |		.DBG3TAB	0x0002,0x0001
05c2 018b ffff  |    |		.CONST	0x018b,0xffff
05c4 018d fffe  |    |		.CONST	0x018d,0xfffe
05c6 018f 0001  |    |		.CONST	0x018f,0x0001
05c8 ; --------------------------------------------------------------------------------------
05c8 ; Debug3 Subtable 0x5
05c8 ; --------------------------------------------------------------------------------------
05c8 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
05ca 019b ffff  |    |		.CONST	0x019b,0xffff
05cc 01a2 0001  |    |		.CONST	0x01a2,0x0001
05ce 01a8 0002  |    |		.CONST	0x01a8,0x0002
05d0 01ab 0003  |    |		.CONST	0x01ab,0x0003
05d2 01b1 0004  |    |		.CONST	0x01b1,0x0004
05d4 ; --------------------------------------------------------------------------------------
05d4 ; Debug3 Subtable 0x6
05d4 ; --------------------------------------------------------------------------------------
05d4 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
05d6 01bb 0001  |    |		.CONST	0x01bb,0x0001
05d8 01c0 0002  |    |		.CONST	0x01c0,0x0002
05da 01c2 0003  |    |		.CONST	0x01c2,0x0003
05dc ; --------------------------------------------------------------------------------------
05dc ; Debug3 Subtable 0x7
05dc ; --------------------------------------------------------------------------------------
05dc 0000 0009  |    |		.DBG3TAB	0x0000,0x0009
05de 01d3 0001  |    |		.CONST	0x01d3,0x0001
05e0 01d8 0002  |    |		.CONST	0x01d8,0x0002
05e2 01dd 0003  |    |		.CONST	0x01dd,0x0003
05e4 01e2 0004  |    |		.CONST	0x01e2,0x0004
05e6 01e4 0005  |    |		.CONST	0x01e4,0x0005
05e8 01f2 0006  |    |		.CONST	0x01f2,0x0006
05ea 01fe 0007  |    |		.CONST	0x01fe,0x0007
05ec 0200 0008  |    |		.CONST	0x0200,0x0008
05ee 020e 0009  |    |		.CONST	0x020e,0x0009
05f0 ; --------------------------------------------------------------------------------------
05f0 ; Debug3 Subtable 0x8
05f0 ; --------------------------------------------------------------------------------------
05f0 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
05f2 0223 0001  | #  |		.CONST	0x0223,0x0001
05f4 0228 0002  | (  |		.CONST	0x0228,0x0002
05f6 ; --------------------------------------------------------------------------------------
05f6 ; Debug3 Subtable 0x9
05f6 ; --------------------------------------------------------------------------------------
05f6 000f 0009  |    |		.DBG3TAB	0x000f,0x0009
05f8 0233 ffff  | 3  |		.CONST	0x0233,0xffff
05fa 0235 fffe  | 5  |		.CONST	0x0235,0xfffe
05fc 0237 fffd  | 7  |		.CONST	0x0237,0xfffd
05fe 023d fffc  | =  |		.CONST	0x023d,0xfffc
0600 0243 fffb  | C  |		.CONST	0x0243,0xfffb
0602 0249 fffa  | I  |		.CONST	0x0249,0xfffa
0604 024f fff9  | O  |		.CONST	0x024f,0xfff9
0606 0252 fff8  | R  |		.CONST	0x0252,0xfff8
0608 0254 fff7  | T  |		.CONST	0x0254,0xfff7
060a 0257 fff6  | W  |		.CONST	0x0257,0xfff6
060c 025a fff5  | Z  |		.CONST	0x025a,0xfff5
060e 0262 fff4  | b  |		.CONST	0x0262,0xfff4
0610 0267 fff3  | g  |		.CONST	0x0267,0xfff3
0612 0269 fff2  | i  |		.CONST	0x0269,0xfff2
0614 026b fff1  | k  |		.CONST	0x026b,0xfff1
0616 026f 0001  | o  |		.CONST	0x026f,0x0001
0618 0270 0002  | p  |		.CONST	0x0270,0x0002
061a 0274 0003  | t  |		.CONST	0x0274,0x0003
061c 027b 0004  | {  |		.CONST	0x027b,0x0004
061e 027d 0005  | }  |		.CONST	0x027d,0x0005
0620 027f 0006  |    |		.CONST	0x027f,0x0006
0622 0283 0007  |    |		.CONST	0x0283,0x0007
0624 02b2 0008  |    |		.CONST	0x02b2,0x0008
0626 0315 0009  |    |		.CONST	0x0315,0x0009
0628 ; --------------------------------------------------------------------------------------
0628 ; Debug3 Subtable 0xa
0628 ; --------------------------------------------------------------------------------------
0628 0000 0009  |    |		.DBG3TAB	0x0000,0x0009
062a 036b 0001  | k  |		.CONST	0x036b,0x0001
062c 036e 0002  | n  |		.CONST	0x036e,0x0002
062e 036f 0003  | o  |		.CONST	0x036f,0x0003
0630 0377 0004  | w  |		.CONST	0x0377,0x0004
0632 037d 0005  | }  |		.CONST	0x037d,0x0005
0634 0381 0006  |    |		.CONST	0x0381,0x0006
0636 038b 0007  |    |		.CONST	0x038b,0x0007
0638 0390 0008  |    |		.CONST	0x0390,0x0008
063a 0394 0009  |    |		.CONST	0x0394,0x0009
063c ; --------------------------------------------------------------------------------------
063c ; Debug3 Subtable 0xb
063c ; --------------------------------------------------------------------------------------
063c 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
063e 039b 0001  |    |		.CONST	0x039b,0x0001
0640 03a2 0002  |    |		.CONST	0x03a2,0x0002
0642 03a8 0003  |    |		.CONST	0x03a8,0x0003
0644 ; --------------------------------------------------------------------------------------
0644 ; Debug3 Subtable 0xc
0644 ; --------------------------------------------------------------------------------------
0644 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
0646 03bb 0001  |    |		.CONST	0x03bb,0x0001
0648 03c2 0002  |    |		.CONST	0x03c2,0x0002
064a 03c5 0003  |    |		.CONST	0x03c5,0x0003
064c 03c8 0004  |    |		.CONST	0x03c8,0x0004
064e 03cb 0005  |    |		.CONST	0x03cb,0x0005
0650 03ce 0006  |    |		.CONST	0x03ce,0x0006
0652 ; --------------------------------------------------------------------------------------
0652 ; Debug3 Subtable 0xd
0652 ; --------------------------------------------------------------------------------------
0652 0000 0007  |    |		.DBG3TAB	0x0000,0x0007
0654 03db 0001  |    |		.CONST	0x03db,0x0001
0656 03e3 0002  |    |		.CONST	0x03e3,0x0002
0658 03e6 0003  |    |		.CONST	0x03e6,0x0003
065a 03e9 0004  |    |		.CONST	0x03e9,0x0004
065c 03ec 0005  |    |		.CONST	0x03ec,0x0005
065e 03ef 0006  |    |		.CONST	0x03ef,0x0006
0660 03f2 0007  |    |		.CONST	0x03f2,0x0007
0662 ; --------------------------------------------------------------------------------------
0662 ; Debug3 Subtable 0xe
0662 ; --------------------------------------------------------------------------------------
0662 0002 0006  |    |		.DBG3TAB	0x0002,0x0006
0664 03fb ffff  |    |		.CONST	0x03fb,0xffff
0666 03fd fffe  |    |		.CONST	0x03fd,0xfffe
0668 03ff 0001  |    |		.CONST	0x03ff,0x0001
066a 0404 0002  |    |		.CONST	0x0404,0x0002
066c 0409 0003  |    |		.CONST	0x0409,0x0003
066e 040d 0004  |    |		.CONST	0x040d,0x0004
0670 0414 0005  |    |		.CONST	0x0414,0x0005
0672 0418 0006  |    |		.CONST	0x0418,0x0006
0674 ; --------------------------------------------------------------------------------------
0674 ; Debug3 Subtable 0xf
0674 ; --------------------------------------------------------------------------------------
0674 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0676 0423 0001  | #  |		.CONST	0x0423,0x0001
0678 0426 0002  | &  |		.CONST	0x0426,0x0002
067a 0428 0003  | (  |		.CONST	0x0428,0x0003
067c ; --------------------------------------------------------------------------------------
067c ; Debug3 Subtable 0x10
067c ; --------------------------------------------------------------------------------------
067c 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
067e 0443 0001  | C  |		.CONST	0x0443,0x0001
0680 0447 0002  | G  |		.CONST	0x0447,0x0002
0682 044b 0003  | K  |		.CONST	0x044b,0x0003
0684 044f 0004  | O  |		.CONST	0x044f,0x0004
0686 0455 0005  | U  |		.CONST	0x0455,0x0005
0688 0000 0000  |    |		.BLANK	0000[0x178]