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

⟦e8eeb2bc0⟧

    Length: 3072 (0xc00)
    Notes: 00_class, 5811_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df

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 0328       | (  |		.CONST	0x0328								; 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 0002       |    |		.CONST	0x0002								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0036       | 6  |		.CONST	0x0036								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0017       |    |		.CONST	0x0017								; Number of locals
000b			INIT_0008:
000b e001       |    |		Load	0x0,0x1								; Debug Table 0x0 = .DEBUG	0x000b,0x036a,0x8000,0x0000,0x0037,0xdc04,0x0000,0x0005
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
000d 0129       | )  |		Execute	Any,Make_Visible
000e e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x1 = 0xe,0xfffe
000f 1b4c       | L  |		Execute	Package,Field_Read,Field_Number 0x4c
0010 0129       | )  |		Execute	Any,Make_Visible
0011 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x2 = 0x11,0xfffd
0012 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
0013 0129       | )  |		Execute	Any,Make_Visible
0014 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x3 = 0x14,0xfffc
0015 4803       |H   |		Short_Literal	0x3
0016 029f 003b  |   ;|		Declare_Subprogram	INIT_0038,For_Call
0018 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0019 029a 0053  |   S|		Declare_Subprogram	INIT_0050,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x19,0xfffb
001b 029a 00ab  |    |		Declare_Subprogram	INIT_00a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x1b,0xfffa
001d 029a 0183  |    |		Declare_Subprogram	INIT_0180,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x1d,0xfff9
001f 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x7 = 0x1f,0xfff8
0020 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x8 = 0x20,0xfff7
0021 00bf       |    |		Action	Accept_Activation						; Debug Table 0x0.0x9 = 0x21,0xfff6
0022 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x0022,0x0380,0x8000,0x0000,0x0037,0xdc14,0x0000,0x000f
													; Debug Table 0x1.0x0 = 0x22,0xffff
0023 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0x23,0xfffe
0024 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x2 = 0x24,0xfffd
0025 1b58       | X  |		Execute	Package,Field_Read,Field_Number 0x58
0026 190f       |    |		Execute	Package,Field_Reference,Field_Number 0xf
0027 0007       |    |		Action	Break_Optional
0028 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x3 = 0x28,0xfffc
0029 1b58       | X  |		Execute	Package,Field_Read,Field_Number 0x58
002a 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
002b 0007       |    |		Action	Break_Optional
002c 029d 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Outer_Call			; Debug Table 0x1.0x4 = 0x2c,0xfffb
002e 029d 0243  |   C|		Declare_Subprogram	INIT_0240,For_Outer_Call			; Debug Table 0x1.0x5 = 0x2e,0xfffa
0030 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x6 = 0x30,0xfff9
0031 00c7       |    |		Action	Elaborate_Subprogram
0032 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x7 = 0x32,0xfff8
0033 00c7       |    |		Action	Elaborate_Subprogram
0034 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x8 = 0x34,0xfff7
0035 00c7       |    |		Action	Elaborate_Subprogram
0036			BODY_0008:
0036 00bc       |    |		Action	Signal_Activated
0037 00bb       |    |		Action	Signal_Completion
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 003b       | ;  |		.CONST	0x003b								; Address of begin
0039 0004       |    |		.CONST	0x0004								; Address of exception handler
003a 0001       |    |		.CONST	0x0001								; Number of locals
003b			BODY_0038:
003b			INIT_0038:
003b 4603       |F   |		Jump_Case	0x4							; Debug Table 0x2 = .DEBUG	0x003b,0x0394,0x0005,0x0000,0x0037,0xdc04,0x0000,0x0018
003c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
003d 7802       |x   |		Jump	0x40								; case 0x1
003e 7805       |x   |		Jump	0x44								; case 0x2
003f 7809       |x   |		Jump	0x49								; case 0x3
0040 00da       |    |		Load_Top	At_Offset_2
0041 0091 0294  |    |		Action	Push_String_Extended_Indexed,0x294				; "NAMED_ASSOCIATION"
0043 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0044 00db       |    |		Load_Top	At_Offset_3
0045 00db       |    |		Load_Top	At_Offset_3
0046 00e0       |    |		Load_Encached	Standard_Cache
0047 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0048 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0049 00da       |    |		Load_Top	At_Offset_2
004a 00e0       |    |		Load_Encached	Standard_Cache
004b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
004c 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
004d 0000 0000  |    |		.XXX[0x3]
004f 0000       |    |
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0057       | W  |		.CONST	0x0057								; Address of begin
0051 0004       |    |		.CONST	0x0004								; Address of exception handler
0052 0002       |    |		.CONST	0x0002								; Number of locals
0053			INIT_0050:
0053 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3 = .DEBUG	0x0053,0x0396,0x0002,0x0000,0x0037,0xdc04,0x0000,0x0020
													; Debug Table 0x3.0x0 = 0x53,0xffff
0054 00db       |    |		Load_Top	At_Offset_3
0055 8214       |    |		Call	0x1,0x14
0056 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0057			BODY_0050:
0057 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x1 = 0x57,0x1
0058 00eb       |    |		Load_Encached	Diana_Cache
0059 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
005a 0ba9       |    |		Execute_Immediate	Case_Compare,0xa9
005b 7030       |p0  |		Jump_Nonzero	0x8c
005c 0b16       |    |		Execute_Immediate	Case_Compare,0x16
005d 7030       |p0  |		Jump_Nonzero	0x8e
005e 0b17       |    |		Execute_Immediate	Case_Compare,0x17
005f 702e       |p.  |		Jump_Nonzero	0x8e
0060 0b18       |    |		Execute_Immediate	Case_Compare,0x18
0061 702c       |p,  |		Jump_Nonzero	0x8e
0062 0b14       |    |		Execute_Immediate	Case_Compare,0x14
0063 702a       |p*  |		Jump_Nonzero	0x8e
0064 0b15       |    |		Execute_Immediate	Case_Compare,0x15
0065 7028       |p(  |		Jump_Nonzero	0x8e
0066 0b0c       |    |		Execute_Immediate	Case_Compare,0xc
0067 7026       |p&  |		Jump_Nonzero	0x8e
0068 0b11       |    |		Execute_Immediate	Case_Compare,0x11
0069 7024       |p$  |		Jump_Nonzero	0x8e
006a 0b13       |    |		Execute_Immediate	Case_Compare,0x13
006b 7022       |p"  |		Jump_Nonzero	0x8e
006c 0b12       |    |		Execute_Immediate	Case_Compare,0x12
006d 7020       |p   |		Jump_Nonzero	0x8e
006e 0b0d       |    |		Execute_Immediate	Case_Compare,0xd
006f 701e       |p   |		Jump_Nonzero	0x8e
0070 0b0e       |    |		Execute_Immediate	Case_Compare,0xe
0071 701c       |p   |		Jump_Nonzero	0x8e
0072 0b0f       |    |		Execute_Immediate	Case_Compare,0xf
0073 701a       |p   |		Jump_Nonzero	0x8e
0074 0b10       |    |		Execute_Immediate	Case_Compare,0x10
0075 7018       |p   |		Jump_Nonzero	0x8e
0076 0b08       |    |		Execute_Immediate	Case_Compare,0x8
0077 7016       |p   |		Jump_Nonzero	0x8e
0078 0b07       |    |		Execute_Immediate	Case_Compare,0x7
0079 7014       |p   |		Jump_Nonzero	0x8e
007a 0b01       |    |		Execute_Immediate	Case_Compare,0x1
007b 7012       |p   |		Jump_Nonzero	0x8e
007c 0b0b       |    |		Execute_Immediate	Case_Compare,0xb
007d 7010       |p   |		Jump_Nonzero	0x8e
007e 0b03       |    |		Execute_Immediate	Case_Compare,0x3
007f 700e       |p   |		Jump_Nonzero	0x8e
0080 0b05       |    |		Execute_Immediate	Case_Compare,0x5
0081 700c       |p   |		Jump_Nonzero	0x8e
0082 0b0a       |    |		Execute_Immediate	Case_Compare,0xa
0083 700a       |p   |		Jump_Nonzero	0x8e
0084 0b09       |    |		Execute_Immediate	Case_Compare,0x9
0085 7008       |p   |		Jump_Nonzero	0x8e
0086 0b04       |    |		Execute_Immediate	Case_Compare,0x4
0087 7006       |p   |		Jump_Nonzero	0x8e
0088 0b06       |    |		Execute_Immediate	Case_Compare,0x6
0089 7004       |p   |		Jump_Nonzero	0x8e
008a 4803       |H   |		Short_Literal	0x3							; Debug Table 0x3.0x2 = 0x8a,0x8
008b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
008c 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3.0x3 = 0x8c,0x2
008d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
008e 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x4 = 0x8e,0x3
008f 00eb       |    |		Load_Encached	Diana_Cache
0090 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0091 00eb       |    |		Load_Encached	Diana_Cache
0092 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0093 0b7e       | ~  |		Execute_Immediate	Case_Compare,0x7e
0094 7008       |p   |		Jump_Nonzero	0x9d
0095 0ba9       |    |		Execute_Immediate	Case_Compare,0xa9
0096 7008       |p   |		Jump_Nonzero	0x9f
0097 0b93       |    |		Execute_Immediate	Case_Compare,0x93
0098 7008       |p   |		Jump_Nonzero	0xa1
0099 0b8e       |    |		Execute_Immediate	Case_Compare,0x8e
009a 7006       |p   |		Jump_Nonzero	0xa1
009b 4803       |H   |		Short_Literal	0x3							; Debug Table 0x3.0x5 = 0x9b,0x7
009c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
009d 4802       |H   |		Short_Literal	0x2							; Debug Table 0x3.0x6 = 0x9d,0x4
009e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
009f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3.0x7 = 0x9f,0x5
00a0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00a1 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0x8 = 0xa1,0x6
00a2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00a3 0000 0000  |    |		.BLANK	0000[0x5]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00b7       |    |		.CONST	0x00b7								; Address of begin
00a9 0004       |    |		.CONST	0x0004								; Address of exception handler
00aa 0007       |    |		.CONST	0x0007								; Number of locals
00ab			INIT_00a8:
00ab 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4 = .DEBUG	0x00ab,0x03aa,0x0002,0x0000,0x0037,0xdc04,0x0000,0x0029
													; Debug Table 0x4.0x0 = 0xab,0xffff
00ac 00db       |    |		Load_Top	At_Offset_3
00ad 8214       |    |		Call	0x1,0x14
00ae 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
00af 00ed       |    |		Load_Encached	Diana_Symbol_Rep_Cache					; Debug Table 0x4.0x1 = 0xaf,0xfffe
00b0 02c7       |    |		Declare_Variable	Any
00b1 00d8       |    |		Load_Top	At_Offset_0
00b2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00b3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4.0x2 = 0xb3,0xfffd
00b4 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4.0x3 = 0xb4,0xfffc
00b5 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x4.0x4 = 0xb5,0xfffb
00b6 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4.0x5 = 0xb6,0xfffa
00b7			BODY_00a8:
00b7 e402       |    |		Load	0x2,0x2								; Debug Table 0x4.0x6 = 0xb7,0x1
00b8 00eb       |    |		Load_Encached	Diana_Cache
00b9 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
00ba 0ba9       |    |		Execute_Immediate	Case_Compare,0xa9
00bb 7037       |p7  |		Jump_Nonzero	0xf3
00bc 0b16       |    |		Execute_Immediate	Case_Compare,0x16
00bd 704f       |pO  |		Jump_Nonzero	0x10d
00be 0b17       |    |		Execute_Immediate	Case_Compare,0x17
00bf 704d       |pM  |		Jump_Nonzero	0x10d
00c0 0b18       |    |		Execute_Immediate	Case_Compare,0x18
00c1 704b       |pK  |		Jump_Nonzero	0x10d
00c2 0b14       |    |		Execute_Immediate	Case_Compare,0x14
00c3 7049       |pI  |		Jump_Nonzero	0x10d
00c4 0b15       |    |		Execute_Immediate	Case_Compare,0x15
00c5 7047       |pG  |		Jump_Nonzero	0x10d
00c6 0b0c       |    |		Execute_Immediate	Case_Compare,0xc
00c7 7045       |pE  |		Jump_Nonzero	0x10d
00c8 0b11       |    |		Execute_Immediate	Case_Compare,0x11
00c9 7043       |pC  |		Jump_Nonzero	0x10d
00ca 0b13       |    |		Execute_Immediate	Case_Compare,0x13
00cb 7041       |pA  |		Jump_Nonzero	0x10d
00cc 0b12       |    |		Execute_Immediate	Case_Compare,0x12
00cd 703f       |p?  |		Jump_Nonzero	0x10d
00ce 0b0d       |    |		Execute_Immediate	Case_Compare,0xd
00cf 703d       |p=  |		Jump_Nonzero	0x10d
00d0 0b0e       |    |		Execute_Immediate	Case_Compare,0xe
00d1 703b       |p;  |		Jump_Nonzero	0x10d
00d2 0b0f       |    |		Execute_Immediate	Case_Compare,0xf
00d3 7039       |p9  |		Jump_Nonzero	0x10d
00d4 0b10       |    |		Execute_Immediate	Case_Compare,0x10
00d5 7037       |p7  |		Jump_Nonzero	0x10d
00d6 0b08       |    |		Execute_Immediate	Case_Compare,0x8
00d7 7035       |p5  |		Jump_Nonzero	0x10d
00d8 0b07       |    |		Execute_Immediate	Case_Compare,0x7
00d9 7033       |p3  |		Jump_Nonzero	0x10d
00da 0b01       |    |		Execute_Immediate	Case_Compare,0x1
00db 7031       |p1  |		Jump_Nonzero	0x10d
00dc 0b0b       |    |		Execute_Immediate	Case_Compare,0xb
00dd 702f       |p/  |		Jump_Nonzero	0x10d
00de 0b03       |    |		Execute_Immediate	Case_Compare,0x3
00df 702d       |p-  |		Jump_Nonzero	0x10d
00e0 0b05       |    |		Execute_Immediate	Case_Compare,0x5
00e1 702b       |p+  |		Jump_Nonzero	0x10d
00e2 0b0a       |    |		Execute_Immediate	Case_Compare,0xa
00e3 7029       |p)  |		Jump_Nonzero	0x10d
00e4 0b09       |    |		Execute_Immediate	Case_Compare,0x9
00e5 7027       |p'  |		Jump_Nonzero	0x10d
00e6 0b04       |    |		Execute_Immediate	Case_Compare,0x4
00e7 7025       |p%  |		Jump_Nonzero	0x10d
00e8 0b06       |    |		Execute_Immediate	Case_Compare,0x6
00e9 7023       |p#  |		Jump_Nonzero	0x10d
00ea 0092 0298  |    |		Action	Push_String_Extended,0x298					; "Element is not an Association"
													; Debug Table 0x4.0x7 = 0xea,0x1c
00ec e002       |    |		Load	0x0,0x2
00ed 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
00ee e003       |    |		Load	0x0,0x3
00ef 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00f0 e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0x8 = 0xf0,0x1d
00f1 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
00f2 0257       | W  |		Execute	Discrete,Raise
00f3 e402       |    |		Load	0x2,0x2								; Debug Table 0x4.0x9 = 0xf3,0x2
00f4 00eb       |    |		Load_Encached	Diana_Cache
00f5 18bf       |    |		Execute	Package,Field_Execute,Field_Number 0xbf
00f6 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
00f7 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0xa = 0xf7,0x3
00f8 00eb       |    |		Load_Encached	Diana_Cache
00f9 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
00fa c403       |    |		Store	0x2,0x3
00fb 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0xb = 0xfb,0x4
00fc 8216       |    |		Call	0x1,0x16
00fd a405       |    |		Store_Unchecked	0x2,0x5
00fe 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0xc = 0xfe,0x5
00ff 00eb       |    |		Load_Encached	Diana_Cache
0100 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0101 6803       |h   |		Jump_Zero	0x105
0102 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0xd = 0x102,0x6
0103 8215       |    |		Call	0x1,0x15
0104 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0105 e403       |    |		Load	0x2,0x3								; Debug Table 0x4.0xe = 0x105,0x7
0106 e405       |    |		Load	0x2,0x5
0107 4972       |Ir  |		Short_Literal	0x172
0108 00eb       |    |		Load_Encached	Diana_Cache
0109 0098       |    |		Execute	Package,Field_Read_Dynamic
010a 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
010b 8215       |    |		Call	0x1,0x15
010c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
010d e402       |    |		Load	0x2,0x2								; Debug Table 0x4.0xf = 0x10d,0x8
010e 00eb       |    |		Load_Encached	Diana_Cache
010f 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0110 00eb       |    |		Load_Encached	Diana_Cache
0111 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0112 0b7e       | ~  |		Execute_Immediate	Case_Compare,0x7e
0113 700f       |p   |		Jump_Nonzero	0x123
0114 0ba9       |    |		Execute_Immediate	Case_Compare,0xa9
0115 7031       |p1  |		Jump_Nonzero	0x147
0116 0b93       |    |		Execute_Immediate	Case_Compare,0x93
0117 704b       |pK  |		Jump_Nonzero	0x163
0118 0b8e       |    |		Execute_Immediate	Case_Compare,0x8e
0119 7049       |pI  |		Jump_Nonzero	0x163
011a 0092 0299  |    |		Action	Push_String_Extended,0x299					; "Unexpected context for an actual parameter"
													; Debug Table 0x4.0x10 = 0x11a,0x1a
011c e002       |    |		Load	0x0,0x2
011d 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
011e e003       |    |		Load	0x0,0x3
011f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0120 e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0x11 = 0x120,0x1b
0121 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
0122 0257       | W  |		Execute	Discrete,Raise
0123 e402       |    |		Load	0x2,0x2								; Debug Table 0x4.0x12 = 0x123,0x9
0124 00eb       |    |		Load_Encached	Diana_Cache
0125 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0126 00eb       |    |		Load_Encached	Diana_Cache
0127 18d0       |    |		Execute	Package,Field_Execute,Field_Number 0xd0
0128 a404       |    |		Store_Unchecked	0x2,0x4
0129 e404       |    |		Load	0x2,0x4								; Debug Table 0x4.0x13 = 0x129,0xa
012a 00eb       |    |		Load_Encached	Diana_Cache
012b 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
012c 4975       |Iu  |		Short_Literal	0x175
012d 00eb       |    |		Load_Encached	Diana_Cache
012e 0098       |    |		Execute	Package,Field_Read_Dynamic
012f 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0130 4602       |F   |		Jump_Case	0x3
0131 7802       |x   |		Jump	0x134								; case 0x0
0132 780a       |x   |		Jump	0x13d								; case 0x1
0133 7810       |x   |		Jump	0x144								; case 0x2
0134 0092 029a  |    |		Action	Push_String_Extended,0x29a					; "Parameter declaration contains zero parameters"
													; Debug Table 0x4.0x14 = 0x134,0xb
0136 e002       |    |		Load	0x0,0x2
0137 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
0138 e003       |    |		Load	0x0,0x3
0139 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
013a e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0x15 = 0x13a,0xc
013b 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
013c 0257       | W  |		Execute	Discrete,Raise
013d e404       |    |		Load	0x2,0x4								; Debug Table 0x4.0x16 = 0x13d,0xd
013e 00eb       |    |		Load_Encached	Diana_Cache
013f 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
0140 00eb       |    |		Load_Encached	Diana_Cache
0141 1859       | Y  |		Execute	Package,Field_Execute,Field_Number 0x59
0142 8215       |    |		Call	0x1,0x15
0143 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0144 e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0x17 = 0x144,0xe
0145 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0146 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0147 e402       |    |		Load	0x2,0x2								; Debug Table 0x4.0x18 = 0x147,0xf
0148 00eb       |    |		Load_Encached	Diana_Cache
0149 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
014a 00eb       |    |		Load_Encached	Diana_Cache
014b 18bf       |    |		Execute	Package,Field_Execute,Field_Number 0xbf
014c 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
014d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0x19 = 0x14d,0x10
014e 00eb       |    |		Load_Encached	Diana_Cache
014f 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0150 c403       |    |		Store	0x2,0x3
0151 e402       |    |		Load	0x2,0x2								; Debug Table 0x4.0x1a = 0x151,0x11
0152 8216       |    |		Call	0x1,0x16
0153 a405       |    |		Store_Unchecked	0x2,0x5
0154 e405       |    |		Load	0x2,0x5								; Debug Table 0x4.0x1b = 0x154,0x12
0155 00eb       |    |		Load_Encached	Diana_Cache
0156 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0157 6803       |h   |		Jump_Zero	0x15b
0158 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0x1c = 0x158,0x13
0159 8215       |    |		Call	0x1,0x15
015a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
015b e403       |    |		Load	0x2,0x3								; Debug Table 0x4.0x1d = 0x15b,0x14
015c e405       |    |		Load	0x2,0x5
015d 4972       |Ir  |		Short_Literal	0x172
015e 00eb       |    |		Load_Encached	Diana_Cache
015f 0098       |    |		Execute	Package,Field_Read_Dynamic
0160 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0161 8215       |    |		Call	0x1,0x15
0162 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0163 e402       |    |		Load	0x2,0x2								; Debug Table 0x4.0x1e = 0x163,0x15
0164 8216       |    |		Call	0x1,0x16
0165 a405       |    |		Store_Unchecked	0x2,0x5
0166 e405       |    |		Load	0x2,0x5								; Debug Table 0x4.0x1f = 0x166,0x16
0167 00eb       |    |		Load_Encached	Diana_Cache
0168 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0169 6803       |h   |		Jump_Zero	0x16d
016a e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0x20 = 0x16a,0x17
016b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
016c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
016d e402       |    |		Load	0x2,0x2								; Debug Table 0x4.0x21 = 0x16d,0x18
016e 00eb       |    |		Load_Encached	Diana_Cache
016f 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0170 00eb       |    |		Load_Encached	Diana_Cache
0171 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
0172 e402       |    |		Load	0x2,0x2
0173 4975       |Iu  |		Short_Literal	0x175
0174 00eb       |    |		Load_Encached	Diana_Cache
0175 0098       |    |		Execute	Package,Field_Read_Dynamic
0176 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0177 c406       |    |		Store	0x2,0x6
0178 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x22 = 0x178,0x19
0179 0a01       |    |		Execute_Immediate	Plus,0x1
017a 00e4       |    |		Load_Encached	Positive_Cache
017b 025b       | [  |		Execute	Discrete,Check_In_Type
017c e405       |    |		Load	0x2,0x5
017d 8217       |    |		Call	0x1,0x17
017e 8215       |    |		Call	0x1,0x15
017f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0187       |    |		.CONST	0x0187								; Address of begin
0181 0004       |    |		.CONST	0x0004								; Address of exception handler
0182 0002       |    |		.CONST	0x0002								; Number of locals
0183			INIT_0180:
0183 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x5 = .DEBUG	0x0183,0x03f2,0x0002,0x0000,0x0037,0xdc04,0x0000,0x0032
													; Debug Table 0x5.0x0 = 0x183,0xffff
0184 00db       |    |		Load_Top	At_Offset_3
0185 8214       |    |		Call	0x1,0x14
0186 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0187			BODY_0180:
0187 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x1 = 0x187,0x1
0188 00eb       |    |		Load_Encached	Diana_Cache
0189 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
018a 0ba9       |    |		Execute_Immediate	Case_Compare,0xa9
018b 7037       |p7  |		Jump_Nonzero	0x1c3
018c 0b16       |    |		Execute_Immediate	Case_Compare,0x16
018d 703a       |p:  |		Jump_Nonzero	0x1c8
018e 0b17       |    |		Execute_Immediate	Case_Compare,0x17
018f 7038       |p8  |		Jump_Nonzero	0x1c8
0190 0b18       |    |		Execute_Immediate	Case_Compare,0x18
0191 7036       |p6  |		Jump_Nonzero	0x1c8
0192 0b14       |    |		Execute_Immediate	Case_Compare,0x14
0193 7034       |p4  |		Jump_Nonzero	0x1c8
0194 0b15       |    |		Execute_Immediate	Case_Compare,0x15
0195 7032       |p2  |		Jump_Nonzero	0x1c8
0196 0b0c       |    |		Execute_Immediate	Case_Compare,0xc
0197 7030       |p0  |		Jump_Nonzero	0x1c8
0198 0b11       |    |		Execute_Immediate	Case_Compare,0x11
0199 702e       |p.  |		Jump_Nonzero	0x1c8
019a 0b13       |    |		Execute_Immediate	Case_Compare,0x13
019b 702c       |p,  |		Jump_Nonzero	0x1c8
019c 0b12       |    |		Execute_Immediate	Case_Compare,0x12
019d 702a       |p*  |		Jump_Nonzero	0x1c8
019e 0b0d       |    |		Execute_Immediate	Case_Compare,0xd
019f 7028       |p(  |		Jump_Nonzero	0x1c8
01a0 0b0e       |    |		Execute_Immediate	Case_Compare,0xe
01a1 7026       |p&  |		Jump_Nonzero	0x1c8
01a2 0b0f       |    |		Execute_Immediate	Case_Compare,0xf
01a3 7024       |p$  |		Jump_Nonzero	0x1c8
01a4 0b10       |    |		Execute_Immediate	Case_Compare,0x10
01a5 7022       |p"  |		Jump_Nonzero	0x1c8
01a6 0b08       |    |		Execute_Immediate	Case_Compare,0x8
01a7 7020       |p   |		Jump_Nonzero	0x1c8
01a8 0b07       |    |		Execute_Immediate	Case_Compare,0x7
01a9 701e       |p   |		Jump_Nonzero	0x1c8
01aa 0b01       |    |		Execute_Immediate	Case_Compare,0x1
01ab 701c       |p   |		Jump_Nonzero	0x1c8
01ac 0b0b       |    |		Execute_Immediate	Case_Compare,0xb
01ad 701a       |p   |		Jump_Nonzero	0x1c8
01ae 0b03       |    |		Execute_Immediate	Case_Compare,0x3
01af 7018       |p   |		Jump_Nonzero	0x1c8
01b0 0b05       |    |		Execute_Immediate	Case_Compare,0x5
01b1 7016       |p   |		Jump_Nonzero	0x1c8
01b2 0b0a       |    |		Execute_Immediate	Case_Compare,0xa
01b3 7014       |p   |		Jump_Nonzero	0x1c8
01b4 0b09       |    |		Execute_Immediate	Case_Compare,0x9
01b5 7012       |p   |		Jump_Nonzero	0x1c8
01b6 0b04       |    |		Execute_Immediate	Case_Compare,0x4
01b7 7010       |p   |		Jump_Nonzero	0x1c8
01b8 0b06       |    |		Execute_Immediate	Case_Compare,0x6
01b9 700e       |p   |		Jump_Nonzero	0x1c8
01ba 0092 0298  |    |		Action	Push_String_Extended,0x298					; "Element is not an Association"
													; Debug Table 0x5.0x2 = 0x1ba,0x4
01bc e002       |    |		Load	0x0,0x2
01bd 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
01be e003       |    |		Load	0x0,0x3
01bf 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01c0 e001       |    |		Load	0x0,0x1								; Debug Table 0x5.0x3 = 0x1c0,0x5
01c1 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
01c2 0257       | W  |		Execute	Discrete,Raise
01c3 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x4 = 0x1c3,0x2
01c4 00eb       |    |		Load_Encached	Diana_Cache
01c5 18b2       |    |		Execute	Package,Field_Execute,Field_Number 0xb2
01c6 8215       |    |		Call	0x1,0x15
01c7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01c8 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0x5 = 0x1c8,0x3
01c9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01ca 0000 0000  |    |		.BLANK	0000[0x6]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01da       |    |		.CONST	0x01da								; Address of begin
01d1 0004       |    |		.CONST	0x0004								; Address of exception handler
01d2 0006       |    |		.CONST	0x0006								; Number of locals
01d3			INIT_01d0:
01d3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x6 = .DEBUG	0x01d3,0x0400,0x0002,0x0000,0x0037,0xdc14,0x0000,0x0042
													; Debug Table 0x6.0x0 = 0x1d3,0xffff
01d4 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x6.0x1 = 0x1d4,0xfffe
01d5 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x6.0x2 = 0x1d5,0xfffd
01d6 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x6.0x3 = 0x1d6,0xfffc
01d7 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x6.0x4 = 0x1d7,0xfffb
01d8 e5ff       |    |		Load	0x2,-0x1
01d9 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
01da			BODY_01d0:
01da 00cf       |    |		Action	Mark_Auxiliary
01db 0007       |    |		Action	Break_Optional							; Debug Table 0x6.0x5 = 0x1db,0x1
01dc 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x6 = 0x1dc,0x2
01dd 00eb       |    |		Load_Encached	Diana_Cache
01de 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01df 6809       |h   |		Jump_Zero	0x1e9
01e0 0092 029b  |    |		Action	Push_String_Extended,0x29b					; "Root encountered while looking for a valid association context"
													; Debug Table 0x6.0x7 = 0x1e0,0x3
01e2 e002       |    |		Load	0x0,0x2
01e3 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
01e4 e003       |    |		Load	0x0,0x3
01e5 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01e6 e001       |    |		Load	0x0,0x1								; Debug Table 0x6.0x8 = 0x1e6,0x4
01e7 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
01e8 0257       | W  |		Execute	Discrete,Raise
01e9 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x9 = 0x1e9,0x5
01ea 00eb       |    |		Load_Encached	Diana_Cache
01eb 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01ec 0b36       | 6  |		Execute_Immediate	Case_Compare,0x36
01ed 700d       |p   |		Jump_Nonzero	0x1fb
01ee 0b5b       | [  |		Execute_Immediate	Case_Compare,0x5b
01ef 7017       |p   |		Jump_Nonzero	0x207
01f0 0b53       | S  |		Execute_Immediate	Case_Compare,0x53
01f1 7026       |p&  |		Jump_Nonzero	0x218
01f2 0b10       |    |		Execute_Immediate	Case_Compare,0x10
01f3 7035       |p5  |		Jump_Nonzero	0x229
01f4 0b40       | @  |		Execute_Immediate	Case_Compare,0x40
01f5 7044       |pD  |		Jump_Nonzero	0x23a
01f6 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0xa = 0x1f6,0x12
01f7 00eb       |    |		Load_Encached	Diana_Cache
01f8 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
01f9 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
01fa 7842       |xB  |		Jump	0x23d
01fb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0xb = 0x1fb,0x6
01fc 00eb       |    |		Load_Encached	Diana_Cache
01fd 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
01fe 8215       |    |		Call	0x1,0x15
01ff e004       |    |		Load	0x0,0x4
0200 1851       | Q  |		Execute	Package,Field_Execute,Field_Number 0x51
0201 8214       |    |		Call	0x1,0x14
0202 a402       |    |		Store_Unchecked	0x2,0x2
0203 e402       |    |		Load	0x2,0x2								; Debug Table 0x6.0xc = 0x203,0x7
0204 00eb       |    |		Load_Encached	Diana_Cache
0205 18cd       |    |		Execute	Package,Field_Execute,Field_Number 0xcd
0206 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0207 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0xd = 0x207,0x8
0208 8215       |    |		Call	0x1,0x15
0209 e005       |    |		Load	0x0,0x5
020a 1845       | E  |		Execute	Package,Field_Execute,Field_Number 0x45
020b 8214       |    |		Call	0x1,0x14
020c a402       |    |		Store_Unchecked	0x2,0x2
020d e402       |    |		Load	0x2,0x2								; Debug Table 0x6.0xe = 0x20d,0x9
020e 00eb       |    |		Load_Encached	Diana_Cache
020f 18bf       |    |		Execute	Package,Field_Execute,Field_Number 0xbf
0210 a405       |    |		Store_Unchecked	0x2,0x5
0211 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0xf = 0x211,0xa
0212 4904       |I   |		Short_Literal	0x104
0213 00eb       |    |		Load_Encached	Diana_Cache
0214 0096       |    |		Execute	Package,Entry
0215 00eb       |    |		Load_Encached	Diana_Cache
0216 18da       |    |		Execute	Package,Field_Execute,Field_Number 0xda
0217 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0218 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x10 = 0x218,0xb
0219 8215       |    |		Call	0x1,0x15
021a e005       |    |		Load	0x0,0x5
021b 1845       | E  |		Execute	Package,Field_Execute,Field_Number 0x45
021c 8214       |    |		Call	0x1,0x14
021d a402       |    |		Store_Unchecked	0x2,0x2
021e e402       |    |		Load	0x2,0x2								; Debug Table 0x6.0x11 = 0x21e,0xc
021f 00eb       |    |		Load_Encached	Diana_Cache
0220 18bf       |    |		Execute	Package,Field_Execute,Field_Number 0xbf
0221 a403       |    |		Store_Unchecked	0x2,0x3
0222 e403       |    |		Load	0x2,0x3								; Debug Table 0x6.0x12 = 0x222,0xd
0223 4904       |I   |		Short_Literal	0x104
0224 00eb       |    |		Load_Encached	Diana_Cache
0225 0096       |    |		Execute	Package,Entry
0226 00eb       |    |		Load_Encached	Diana_Cache
0227 18da       |    |		Execute	Package,Field_Execute,Field_Number 0xda
0228 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0229 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x13 = 0x229,0xe
022a 8215       |    |		Call	0x1,0x15
022b e006       |    |		Load	0x0,0x6
022c 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
022d 8214       |    |		Call	0x1,0x14
022e a402       |    |		Store_Unchecked	0x2,0x2
022f e402       |    |		Load	0x2,0x2								; Debug Table 0x6.0x14 = 0x22f,0xf
0230 00eb       |    |		Load_Encached	Diana_Cache
0231 18bf       |    |		Execute	Package,Field_Execute,Field_Number 0xbf
0232 a404       |    |		Store_Unchecked	0x2,0x4
0233 e404       |    |		Load	0x2,0x4								; Debug Table 0x6.0x15 = 0x233,0x10
0234 4904       |I   |		Short_Literal	0x104
0235 00eb       |    |		Load_Encached	Diana_Cache
0236 0096       |    |		Execute	Package,Entry
0237 00eb       |    |		Load_Encached	Diana_Cache
0238 18da       |    |		Execute	Package,Field_Execute,Field_Number 0xda
0239 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
023a 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x6.0x16 = 0x23a,0x11
023b 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
023c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
023d 00d1       |    |		Pop_Control	Pop_Count_1
023e 00c9       |    |		Action	Pop_Auxiliary_Loop
023f 7f9c       |    |		Jump	0x1dc
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0251       | Q  |		.CONST	0x0251								; Address of begin
0241 0004       |    |		.CONST	0x0004								; Address of exception handler
0242 0006       |    |		.CONST	0x0006								; Number of locals
0243			INIT_0240:
0243 00ef       |    |		Load_Encached	Diana_Sequence_Cache					; Debug Table 0x7 = .DEBUG	0x0243,0x0430,0x0002,0x0000,0x0037,0xdc14,0x0000,0x0145
													; Debug Table 0x7.0x0 = 0x243,0xffff
0244 00db       |    |		Load_Top	At_Offset_3
0245 4976       |Iv  |		Short_Literal	0x176
0246 00eb       |    |		Load_Encached	Diana_Cache
0247 0098       |    |		Execute	Package,Field_Read_Dynamic
0248 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0249 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
024a 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x7.0x1 = 0x24a,0xfffe
024b 00ef       |    |		Load_Encached	Diana_Sequence_Cache					; Debug Table 0x7.0x2 = 0x24b,0xfffd
024c 00da       |    |		Load_Top	At_Offset_2
024d 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
024e 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x7.0x3 = 0x24e,0xfffc
024f 00e4       |    |		Load_Encached	Positive_Cache						; Debug Table 0x7.0x4 = 0x24f,0xfffb
0250 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
0251			BODY_0240:
0251 00cf       |    |		Action	Mark_Auxiliary
0252 0007       |    |		Action	Break_Optional							; Debug Table 0x7.0x5 = 0x252,0x1
0253 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x6 = 0x253,0x2
0254 00eb       |    |		Load_Encached	Diana_Cache
0255 1865       | e  |		Execute	Package,Field_Execute,Field_Number 0x65
0256 a403       |    |		Store_Unchecked	0x2,0x3
0257 e403       |    |		Load	0x2,0x3								; Debug Table 0x7.0x7 = 0x257,0x3
0258 00eb       |    |		Load_Encached	Diana_Cache
0259 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
025a 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
025b 00cf       |    |		Action	Mark_Auxiliary
025c 0007       |    |		Action	Break_Optional							; Debug Table 0x7.0x8 = 0x25c,0x4
025d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x9 = 0x25d,0x5
025e 00eb       |    |		Load_Encached	Diana_Cache
025f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0260 6801       |h   |		Jump_Zero	0x262
0261 781a       |x   |		Jump	0x27c								; Debug Table 0x7.0xa = 0x261,0x6
0262 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0xb = 0x262,0x7
0263 00eb       |    |		Load_Encached	Diana_Cache
0264 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0265 0b94       |    |		Execute_Immediate	Case_Compare,0x94
0266 7003       |p   |		Jump_Nonzero	0x26a
0267 0b8f       |    |		Execute_Immediate	Case_Compare,0x8f
0268 7001       |p   |		Jump_Nonzero	0x26a
0269 780b       |x   |		Jump	0x275								; Debug Table 0x7.0xc = 0x269,0xc
026a 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0xd = 0x26a,0x8
026b e5fe       |    |		Load	0x2,-0x2
026c 027f       |    |		Execute	Discrete,Equal
026d 6802       |h   |		Jump_Zero	0x270
026e e403       |    |		Load	0x2,0x3								; Debug Table 0x7.0xe = 0x26e,0x9
026f 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0270 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0xf = 0x270,0xa
0271 0a01       |    |		Execute_Immediate	Plus,0x1
0272 c406       |    |		Store	0x2,0x6
0273 00d1       |    |		Pop_Control	Pop_Count_1						; Debug Table 0x7.0x10 = 0x273,0xb
0274 7807       |x   |		Jump	0x27c
0275 00d1       |    |		Pop_Control	Pop_Count_1
0276 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x11 = 0x276,0xd
0277 00eb       |    |		Load_Encached	Diana_Cache
0278 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0279 a405       |    |		Store_Unchecked	0x2,0x5
027a 00c9       |    |		Action	Pop_Auxiliary_Loop
027b 7fe1       |    |		Jump	0x25d
027c 00ce       |    |		Action	Pop_Auxiliary
027d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x12 = 0x27d,0xe
027e 00eb       |    |		Load_Encached	Diana_Cache
027f 1866       | f  |		Execute	Package,Field_Execute,Field_Number 0x66
0280 a404       |    |		Store_Unchecked	0x2,0x4
0281 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x13 = 0x281,0xf
0282 00eb       |    |		Load_Encached	Diana_Cache
0283 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0284 680d       |h   |		Jump_Zero	0x292
0285 0092 029c  |    |		Action	Push_String_Extended,0x29c					; "No parameter found at position"
													; Debug Table 0x7.0x14 = 0x285,0x10
0287 e5fe       |    |		Load	0x2,-0x2
0288 00e0       |    |		Load_Encached	Standard_Cache
0289 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
028a 01cc       |    |		Execute	Vector,Catenate
028b e002       |    |		Load	0x0,0x2
028c 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
028d e003       |    |		Load	0x0,0x3
028e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
028f e001       |    |		Load	0x0,0x1								; Debug Table 0x7.0x15 = 0x28f,0x11
0290 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
0291 0257       | W  |		Execute	Discrete,Raise
0292 00c9       |    |		Action	Pop_Auxiliary_Loop
0293 7fbf       |    |		Jump	0x253
0294 ; --------------------------------------------------------------------------------------
0294 ; STRING TABLE
0294 ; --------------------------------------------------------------------------------------
0294 0014       |    |		.STRTAB	0x0014->0x029e							; "NAMED_ASSOCIATION"
0295 0023       | #  |		.STRTAB	0x0023->0x02a6							; "POSITIONAL_ASSOCIATION"
0296 0037       | 7  |		.STRTAB	0x0037->0x02b1							; "DEFAULTED"
0297 003e       | >  |		.STRTAB	0x003e->0x02b6							; "NOT_AN_ASSOCIATION"
0298 004e       | N  |		.STRTAB	0x004e->0x02bf							; "Element is not an Association"
0299 0069       | i  |		.STRTAB	0x0069->0x02cd							; "Unexpected context for an actual parameter"
029a 0091       |    |		.STRTAB	0x0091->0x02e2							; "Parameter declaration contains zero parameters"
029b 00bd       |    |		.STRTAB	0x00bd->0x02f9							; "Root encountered while looking for a valid association context"
029c 00f9       |    |		.STRTAB	0x00f9->0x0318							; "No parameter found at position"
029d 0115       |    |		.STREND 0x0115->0x0327
029e 4e41 4d45  |NAME|		.STRTAB_STRINGS
0328 ; --------------------------------------------------------------------------------------
0328 ; Debug Table
0328 ; --------------------------------------------------------------------------------------
0328 0003 0008  |    |		.CONST	0x0003,0x0008
032a 000b 036a  |   j|		.DEBUG	0x000b,0x036a,0x8000,0x0000,0x0037,0xdc04,0x0000,0x0005
0332 0022 0380  | "  |		.DEBUG	0x0022,0x0380,0x8000,0x0000,0x0037,0xdc14,0x0000,0x000f
033a 003b 0394  | ;  |		.DEBUG	0x003b,0x0394,0x0005,0x0000,0x0037,0xdc04,0x0000,0x0018
0342 0053 0396  | S  |		.DEBUG	0x0053,0x0396,0x0002,0x0000,0x0037,0xdc04,0x0000,0x0020
034a 00ab 03aa  |    |		.DEBUG	0x00ab,0x03aa,0x0002,0x0000,0x0037,0xdc04,0x0000,0x0029
0352 0183 03f2  |    |		.DEBUG	0x0183,0x03f2,0x0002,0x0000,0x0037,0xdc04,0x0000,0x0032
035a 01d3 0400  |    |		.DEBUG	0x01d3,0x0400,0x0002,0x0000,0x0037,0xdc14,0x0000,0x0042
0362 0243 0430  | C 0|		.DEBUG	0x0243,0x0430,0x0002,0x0000,0x0037,0xdc14,0x0000,0x0145
036a ; --------------------------------------------------------------------------------------
036a ; Debug3 Subtable 0x0
036a ; --------------------------------------------------------------------------------------
036a 000a 0000  |    |		.DBG3TAB	0x000a,0x0000
036c 000b ffff  |    |		.CONST	0x000b,0xffff
036e 000e fffe  |    |		.CONST	0x000e,0xfffe
0370 0011 fffd  |    |		.CONST	0x0011,0xfffd
0372 0014 fffc  |    |		.CONST	0x0014,0xfffc
0374 0019 fffb  |    |		.CONST	0x0019,0xfffb
0376 001b fffa  |    |		.CONST	0x001b,0xfffa
0378 001d fff9  |    |		.CONST	0x001d,0xfff9
037a 001f fff8  |    |		.CONST	0x001f,0xfff8
037c 0020 fff7  |    |		.CONST	0x0020,0xfff7
037e 0021 fff6  | !  |		.CONST	0x0021,0xfff6
0380 ; --------------------------------------------------------------------------------------
0380 ; Debug3 Subtable 0x1
0380 ; --------------------------------------------------------------------------------------
0380 0009 0000  |    |		.DBG3TAB	0x0009,0x0000
0382 0022 ffff  | "  |		.CONST	0x0022,0xffff
0384 0023 fffe  | #  |		.CONST	0x0023,0xfffe
0386 0024 fffd  | $  |		.CONST	0x0024,0xfffd
0388 0028 fffc  | (  |		.CONST	0x0028,0xfffc
038a 002c fffb  | ,  |		.CONST	0x002c,0xfffb
038c 002e fffa  | .  |		.CONST	0x002e,0xfffa
038e 0030 fff9  | 0  |		.CONST	0x0030,0xfff9
0390 0032 fff8  | 2  |		.CONST	0x0032,0xfff8
0392 0034 fff7  | 4  |		.CONST	0x0034,0xfff7
0394 ; --------------------------------------------------------------------------------------
0394 ; Debug3 Subtable 0x2
0394 ; --------------------------------------------------------------------------------------
0394 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0396 ; --------------------------------------------------------------------------------------
0396 ; Debug3 Subtable 0x3
0396 ; --------------------------------------------------------------------------------------
0396 0001 0008  |    |		.DBG3TAB	0x0001,0x0008
0398 0053 ffff  | S  |		.CONST	0x0053,0xffff
039a 0057 0001  | W  |		.CONST	0x0057,0x0001
039c 008a 0008  |    |		.CONST	0x008a,0x0008
039e 008c 0002  |    |		.CONST	0x008c,0x0002
03a0 008e 0003  |    |		.CONST	0x008e,0x0003
03a2 009b 0007  |    |		.CONST	0x009b,0x0007
03a4 009d 0004  |    |		.CONST	0x009d,0x0004
03a6 009f 0005  |    |		.CONST	0x009f,0x0005
03a8 00a1 0006  |    |		.CONST	0x00a1,0x0006
03aa ; --------------------------------------------------------------------------------------
03aa ; Debug3 Subtable 0x4
03aa ; --------------------------------------------------------------------------------------
03aa 0006 001d  |    |		.DBG3TAB	0x0006,0x001d
03ac 00ab ffff  |    |		.CONST	0x00ab,0xffff
03ae 00af fffe  |    |		.CONST	0x00af,0xfffe
03b0 00b3 fffd  |    |		.CONST	0x00b3,0xfffd
03b2 00b4 fffc  |    |		.CONST	0x00b4,0xfffc
03b4 00b5 fffb  |    |		.CONST	0x00b5,0xfffb
03b6 00b6 fffa  |    |		.CONST	0x00b6,0xfffa
03b8 00b7 0001  |    |		.CONST	0x00b7,0x0001
03ba 00ea 001c  |    |		.CONST	0x00ea,0x001c
03bc 00f0 001d  |    |		.CONST	0x00f0,0x001d
03be 00f3 0002  |    |		.CONST	0x00f3,0x0002
03c0 00f7 0003  |    |		.CONST	0x00f7,0x0003
03c2 00fb 0004  |    |		.CONST	0x00fb,0x0004
03c4 00fe 0005  |    |		.CONST	0x00fe,0x0005
03c6 0102 0006  |    |		.CONST	0x0102,0x0006
03c8 0105 0007  |    |		.CONST	0x0105,0x0007
03ca 010d 0008  |    |		.CONST	0x010d,0x0008
03cc 011a 001a  |    |		.CONST	0x011a,0x001a
03ce 0120 001b  |    |		.CONST	0x0120,0x001b
03d0 0123 0009  | #  |		.CONST	0x0123,0x0009
03d2 0129 000a  | )  |		.CONST	0x0129,0x000a
03d4 0134 000b  | 4  |		.CONST	0x0134,0x000b
03d6 013a 000c  | :  |		.CONST	0x013a,0x000c
03d8 013d 000d  | =  |		.CONST	0x013d,0x000d
03da 0144 000e  | D  |		.CONST	0x0144,0x000e
03dc 0147 000f  | G  |		.CONST	0x0147,0x000f
03de 014d 0010  | M  |		.CONST	0x014d,0x0010
03e0 0151 0011  | Q  |		.CONST	0x0151,0x0011
03e2 0154 0012  | T  |		.CONST	0x0154,0x0012
03e4 0158 0013  | X  |		.CONST	0x0158,0x0013
03e6 015b 0014  | [  |		.CONST	0x015b,0x0014
03e8 0163 0015  | c  |		.CONST	0x0163,0x0015
03ea 0166 0016  | f  |		.CONST	0x0166,0x0016
03ec 016a 0017  | j  |		.CONST	0x016a,0x0017
03ee 016d 0018  | m  |		.CONST	0x016d,0x0018
03f0 0178 0019  | x  |		.CONST	0x0178,0x0019
03f2 ; --------------------------------------------------------------------------------------
03f2 ; Debug3 Subtable 0x5
03f2 ; --------------------------------------------------------------------------------------
03f2 0001 0005  |    |		.DBG3TAB	0x0001,0x0005
03f4 0183 ffff  |    |		.CONST	0x0183,0xffff
03f6 0187 0001  |    |		.CONST	0x0187,0x0001
03f8 01ba 0004  |    |		.CONST	0x01ba,0x0004
03fa 01c0 0005  |    |		.CONST	0x01c0,0x0005
03fc 01c3 0002  |    |		.CONST	0x01c3,0x0002
03fe 01c8 0003  |    |		.CONST	0x01c8,0x0003
0400 ; --------------------------------------------------------------------------------------
0400 ; Debug3 Subtable 0x6
0400 ; --------------------------------------------------------------------------------------
0400 0005 0012  |    |		.DBG3TAB	0x0005,0x0012
0402 01d3 ffff  |    |		.CONST	0x01d3,0xffff
0404 01d4 fffe  |    |		.CONST	0x01d4,0xfffe
0406 01d5 fffd  |    |		.CONST	0x01d5,0xfffd
0408 01d6 fffc  |    |		.CONST	0x01d6,0xfffc
040a 01d7 fffb  |    |		.CONST	0x01d7,0xfffb
040c 01db 0001  |    |		.CONST	0x01db,0x0001
040e 01dc 0002  |    |		.CONST	0x01dc,0x0002
0410 01e0 0003  |    |		.CONST	0x01e0,0x0003
0412 01e6 0004  |    |		.CONST	0x01e6,0x0004
0414 01e9 0005  |    |		.CONST	0x01e9,0x0005
0416 01f6 0012  |    |		.CONST	0x01f6,0x0012
0418 01fb 0006  |    |		.CONST	0x01fb,0x0006
041a 0203 0007  |    |		.CONST	0x0203,0x0007
041c 0207 0008  |    |		.CONST	0x0207,0x0008
041e 020d 0009  |    |		.CONST	0x020d,0x0009
0420 0211 000a  |    |		.CONST	0x0211,0x000a
0422 0218 000b  |    |		.CONST	0x0218,0x000b
0424 021e 000c  |    |		.CONST	0x021e,0x000c
0426 0222 000d  | "  |		.CONST	0x0222,0x000d
0428 0229 000e  | )  |		.CONST	0x0229,0x000e
042a 022f 000f  | /  |		.CONST	0x022f,0x000f
042c 0233 0010  | 3  |		.CONST	0x0233,0x0010
042e 023a 0011  | :  |		.CONST	0x023a,0x0011
0430 ; --------------------------------------------------------------------------------------
0430 ; Debug3 Subtable 0x7
0430 ; --------------------------------------------------------------------------------------
0430 0005 0011  |    |		.DBG3TAB	0x0005,0x0011
0432 0243 ffff  | C  |		.CONST	0x0243,0xffff
0434 024a fffe  | J  |		.CONST	0x024a,0xfffe
0436 024b fffd  | K  |		.CONST	0x024b,0xfffd
0438 024e fffc  | N  |		.CONST	0x024e,0xfffc
043a 024f fffb  | O  |		.CONST	0x024f,0xfffb
043c 0252 0001  | R  |		.CONST	0x0252,0x0001
043e 0253 0002  | S  |		.CONST	0x0253,0x0002
0440 0257 0003  | W  |		.CONST	0x0257,0x0003
0442 025c 0004  | \  |		.CONST	0x025c,0x0004
0444 025d 0005  | ]  |		.CONST	0x025d,0x0005
0446 0261 0006  | a  |		.CONST	0x0261,0x0006
0448 0262 0007  | b  |		.CONST	0x0262,0x0007
044a 0269 000c  | i  |		.CONST	0x0269,0x000c
044c 026a 0008  | j  |		.CONST	0x026a,0x0008
044e 026e 0009  | n  |		.CONST	0x026e,0x0009
0450 0270 000a  | p  |		.CONST	0x0270,0x000a
0452 0273 000b  | s  |		.CONST	0x0273,0x000b
0454 0276 000d  | v  |		.CONST	0x0276,0x000d
0456 027d 000e  | }  |		.CONST	0x027d,0x000e
0458 0281 000f  |    |		.CONST	0x0281,0x000f
045a 0285 0010  |    |		.CONST	0x0285,0x0010
045c 028f 0011  |    |		.CONST	0x028f,0x0011
045e 0000 0000  |    |		.BLANK	0000[0x1a2]