|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 6144 (0x1800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6a18da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0a28 | ( | .CONST 0x0a28 ; 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 8006 | | .CONST 0x8006 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00d9 | | .CONST 0x00d9 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0039 | 9 | .CONST 0x0039 ; Number of locals
000b INIT_0008:
000b 4800 |H | Short_Literal 0x0
000c 4900 |I | Short_Literal 0x100
000d 00e3 | | Load_Encached Natural_Cache
000e 03f9 | | Declare_Type Discrete,Constrained,Visible
000f e001 | | Load 0x0,0x1
0010 0129 | ) | Execute Any,Make_Visible
0011 e002 | | Load 0x0,0x2
0012 0129 | ) | Execute Any,Make_Visible
0013 e003 | | Load 0x0,0x3
0014 0129 | ) | Execute Any,Make_Visible
0015 4800 |H | Short_Literal 0x0
0016 0093 0833 | 3| push_full_address INIT_0830
0018 02a0 | | Declare_Subprogram Null_Subprogram
0019 038f | | Declare_Type Package,Defined,Visible
001a 0386 | | Declare_Variable Package,Visible
001b 4800 |H | Short_Literal 0x0
001c e004 | | Load 0x0,0x4
001d 02a0 | | Declare_Subprogram Null_Subprogram
001e 038f | | Declare_Type Package,Defined,Visible
001f 00b6 | | Action Make_Scope
0020 e005 | | Load 0x0,0x5
0021 4802 |H | Short_Literal 0x2
0022 00db | | Load_Top At_Offset_3
0023 020e | | Execute Module,Augment_Imports
0024 0386 | | Declare_Variable Package,Visible
0025 4800 |H | Short_Literal 0x0
0026 e006 | | Load 0x0,0x6
0027 02a0 | | Declare_Subprogram Null_Subprogram
0028 038f | | Declare_Type Package,Defined,Visible
0029 e007 | | Load 0x0,0x7
002a e008 | | Load 0x0,0x8
002b 00b6 | | Action Make_Scope
002c e005 | | Load 0x0,0x5
002d 4804 |H | Short_Literal 0x4
002e e213 | | Load 0x1,0x13
002f 020e | | Execute Module,Augment_Imports
0030 0386 | | Declare_Variable Package,Visible
0031 4800 |H | Short_Literal 0x0
0032 e009 | | Load 0x0,0x9
0033 02a0 | | Declare_Subprogram Null_Subprogram
0034 038f | | Declare_Type Package,Defined,Visible
0035 e00a | | Load 0x0,0xa
0036 00b6 | | Action Make_Scope
0037 4802 |H | Short_Literal 0x2
0038 00db | | Load_Top At_Offset_3
0039 020e | | Execute Module,Augment_Imports
003a 0386 | | Declare_Variable Package,Visible
003b 4800 |H | Short_Literal 0x0
003c e00b | | Load 0x0,0xb
003d 02a0 | | Declare_Subprogram Null_Subprogram
003e 038f | | Declare_Type Package,Defined,Visible
003f e00c | | Load 0x0,0xc
0040 00b6 | | Action Make_Scope
0041 4802 |H | Short_Literal 0x2
0042 00db | | Load_Top At_Offset_3
0043 020e | | Execute Module,Augment_Imports
0044 0386 | | Declare_Variable Package,Visible
0045 4800 |H | Short_Literal 0x0
0046 e00d | | Load 0x0,0xd
0047 02a0 | | Declare_Subprogram Null_Subprogram
0048 038f | | Declare_Type Package,Defined,Visible
0049 00b6 | | Action Make_Scope
004a e00e | | Load 0x0,0xe
004b e005 | | Load 0x0,0x5
004c 4803 |H | Short_Literal 0x3
004d e216 | | Load 0x1,0x16
004e 020e | | Execute Module,Augment_Imports
004f 0386 | | Declare_Variable Package,Visible
0050 00bf | | Action Accept_Activation
0051 029d 00e3 | | Declare_Subprogram INIT_00e0,For_Outer_Call
0053 029d 010b | | Declare_Subprogram INIT_0108,For_Outer_Call
0055 029d 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call
0057 029d 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call
0059 e00f | | Load 0x0,0xf
005a e010 | | Load 0x0,0x10
005b 00e6 | | Load_Encached Float_Cache
005c e011 | | Load 0x0,0x11
005d 1b51 | Q | Execute Package,Field_Read,Field_Number 0x51
005e 0387 | | Declare_Variable Package
005f 00d8 | | Load_Top At_Offset_0
0060 020f | | Execute Module,Activate
0061 029d 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call
0063 029d 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call
0065 029d 01f3 | | Declare_Subprogram INIT_01f0,For_Outer_Call
0067 029d 021b | | Declare_Subprogram INIT_0218,For_Outer_Call
0069 029d 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call
006b 029d 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call
006d 029d 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call
006f 029d 02e3 | | Declare_Subprogram INIT_02e0,For_Outer_Call
0071 029d 0343 | C| Declare_Subprogram INIT_0340,For_Outer_Call
0073 029d 0373 | s| Declare_Subprogram INIT_0370,For_Outer_Call
0075 029d 039b | | Declare_Subprogram INIT_0398,For_Outer_Call
0077 029d 03ab | | Declare_Subprogram INIT_03a8,For_Outer_Call
0079 029d 03eb | | Declare_Subprogram INIT_03e8,For_Outer_Call
007b 029d 0433 | 3| Declare_Subprogram INIT_0430,For_Outer_Call
007d 029d 0453 | S| Declare_Subprogram INIT_0450,For_Outer_Call
007f 029d 04f3 | | Declare_Subprogram INIT_04f0,For_Outer_Call
0081 029d 0513 | | Declare_Subprogram INIT_0510,For_Outer_Call
0083 029d 056b | k| Declare_Subprogram INIT_0568,For_Outer_Call
0085 029d 05db | | Declare_Subprogram INIT_05d8,For_Outer_Call
0087 029d 05fb | | Declare_Subprogram INIT_05f8,For_Outer_Call
0089 029d 0623 | #| Declare_Subprogram INIT_0620,For_Outer_Call
008b 029d 0643 | C| Declare_Subprogram INIT_0640,For_Outer_Call
008d 029d 0683 | | Declare_Subprogram INIT_0680,For_Outer_Call
008f 029d 06a3 | | Declare_Subprogram INIT_06a0,For_Outer_Call
0091 029d 06db | | Declare_Subprogram INIT_06d8,For_Outer_Call
0093 029d 0723 | #| Declare_Subprogram INIT_0720,For_Outer_Call
0095 029d 0753 | S| Declare_Subprogram INIT_0750,For_Outer_Call
0097 029d 078b | | Declare_Subprogram INIT_0788,For_Outer_Call
0099 029d 07b3 | | Declare_Subprogram INIT_07b0,For_Outer_Call
009b 029d 07db | | Declare_Subprogram INIT_07d8,For_Outer_Call
009d e012 | | Load 0x0,0x12
009e e013 | | Load 0x0,0x13
009f 4802 |H | Short_Literal 0x2
00a0 e212 | | Load 0x1,0x12
00a1 020e | | Execute Module,Augment_Imports
00a2 e212 | | Load 0x1,0x12
00a3 020f | | Execute Module,Activate
00a4 e013 | | Load 0x0,0x13
00a5 e012 | | Load 0x0,0x12
00a6 e014 | | Load 0x0,0x14
00a7 1d17 | | Execute_Immediate Reference_Lex_1,0x17
00a8 1d19 | | Execute_Immediate Reference_Lex_1,0x19
00a9 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
00aa 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b
00ab 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
00ac e015 | | Load 0x0,0x15
00ad 4809 |H | Short_Literal 0x9
00ae e213 | | Load 0x1,0x13
00af 020e | | Execute Module,Augment_Imports
00b0 e213 | | Load 0x1,0x13
00b1 020f | | Execute Module,Activate
00b2 e012 | | Load 0x0,0x12
00b3 e013 | | Load 0x0,0x13
00b4 e014 | | Load 0x0,0x14
00b5 1d17 | | Execute_Immediate Reference_Lex_1,0x17
00b6 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
00b7 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32
00b8 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
00b9 4807 |H | Short_Literal 0x7
00ba e214 | | Load 0x1,0x14
00bb 020e | | Execute Module,Augment_Imports
00bc e214 | | Load 0x1,0x14
00bd 020f | | Execute Module,Activate
00be e013 | | Load 0x0,0x13
00bf e012 | | Load 0x0,0x12
00c0 e014 | | Load 0x0,0x14
00c1 1d17 | | Execute_Immediate Reference_Lex_1,0x17
00c2 1d37 | 7 | Execute_Immediate Reference_Lex_1,0x37
00c3 4805 |H | Short_Literal 0x5
00c4 e215 | | Load 0x1,0x15
00c5 020e | | Execute Module,Augment_Imports
00c6 e215 | | Load 0x1,0x15
00c7 020f | | Execute Module,Activate
00c8 e013 | | Load 0x0,0x13
00c9 e014 | | Load 0x0,0x14
00ca 1d17 | | Execute_Immediate Reference_Lex_1,0x17
00cb 1d38 | 8 | Execute_Immediate Reference_Lex_1,0x38
00cc 1d39 | 9 | Execute_Immediate Reference_Lex_1,0x39
00cd 4805 |H | Short_Literal 0x5
00ce e216 | | Load 0x1,0x16
00cf 020e | | Execute Module,Augment_Imports
00d0 e216 | | Load 0x1,0x16
00d1 020f | | Execute Module,Activate
00d2 e013 | | Load 0x0,0x13
00d3 00b6 | | Action Make_Scope
00d4 4802 |H | Short_Literal 0x2
00d5 e211 | | Load 0x1,0x11
00d6 020e | | Execute Module,Augment_Imports
00d7 e211 | | Load 0x1,0x11
00d8 020f | | Execute Module,Activate
00d9 BODY_0008:
00d9 00bc | | Action Signal_Activated
00da 00bb | | Action Signal_Completion
00db 0000 0000 | | .BLANK 0000[0x5]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00fd | | .CONST 0x00fd ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0002 | | .CONST 0x0002 ; Number of locals
00e3 INIT_00e0:
00e3 4801 |H | Short_Literal 0x1
00e4 00db | | Load_Top At_Offset_3
00e5 4803 |H | Short_Literal 0x3
00e6 0271 | q | Execute Discrete,Times
00e7 00d8 | | Load_Top At_Offset_0
00e8 00e2 | | Load_Encached Integer_Cache
00e9 0260 | ` | Execute Discrete,In_Type
00ea 7001 |p | Jump_Nonzero 0xec
00eb 0801 | | Execute_Immediate Raise,0x1
00ec 00e9 | | Load_Encached String_Cache
00ed 035b | [ | Declare_Type Array,Constrained
00ee 0337 | 7 | Declare_Variable Array
00ef 00d8 | | Load_Top At_Offset_0
00f0 0335 | 5 | Declare_Variable Array,Duplicate
00f1 00cd | | Action Spare6_Action
00f2 00d9 | | Load_Top At_Offset_1
00f3 01d9 | | Execute Vector,Reverse_Bounds
00f4 0263 | c | Execute Discrete,Above_Bound
00f5 7005 |p | Jump_Nonzero 0xfb
00f6 4820 |H | Short_Literal 0x20
00f7 00d9 | | Load_Top At_Offset_1
00f8 e403 | | Load 0x2,0x3
00f9 01d6 | | Execute Vector,Field_Write
00fa 3ffb |? | Loop_Increasing 0xf6
00fb 00d9 | | Load_Top At_Offset_1
00fc 01d4 | | Execute Vector,Structure_Write
00fd BODY_00e0:
00fd 00d8 | | Load_Top At_Offset_0
00fe e5fe | | Load 0x2,-0x2
00ff 01cc | | Execute Vector,Catenate
0100 0092 0878 | x| Action Push_String_Extended,0x878 ; " => "
0102 01cc | | Execute Vector,Catenate
0103 e011 | | Load 0x0,0x11
0104 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0105 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0106 0000 0000 | | .XXX[0x2]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 0125 | % | .CONST 0x0125 ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 0002 | | .CONST 0x0002 ; Number of locals
010b INIT_0108:
010b 4801 |H | Short_Literal 0x1
010c 00db | | Load_Top At_Offset_3
010d 4803 |H | Short_Literal 0x3
010e 0271 | q | Execute Discrete,Times
010f 00d8 | | Load_Top At_Offset_0
0110 00e2 | | Load_Encached Integer_Cache
0111 0260 | ` | Execute Discrete,In_Type
0112 7001 |p | Jump_Nonzero 0x114
0113 0801 | | Execute_Immediate Raise,0x1
0114 00e9 | | Load_Encached String_Cache
0115 035b | [ | Declare_Type Array,Constrained
0116 0337 | 7 | Declare_Variable Array
0117 00d8 | | Load_Top At_Offset_0
0118 0335 | 5 | Declare_Variable Array,Duplicate
0119 00cd | | Action Spare6_Action
011a 00d9 | | Load_Top At_Offset_1
011b 01d9 | | Execute Vector,Reverse_Bounds
011c 0263 | c | Execute Discrete,Above_Bound
011d 7005 |p | Jump_Nonzero 0x123
011e 4820 |H | Short_Literal 0x20
011f 00d9 | | Load_Top At_Offset_1
0120 e403 | | Load 0x2,0x3
0121 01d6 | | Execute Vector,Field_Write
0122 3ffb |? | Loop_Increasing 0x11e
0123 00d9 | | Load_Top At_Offset_1
0124 01d4 | | Execute Vector,Structure_Write
0125 BODY_0108:
0125 00d8 | | Load_Top At_Offset_0
0126 e5fe | | Load 0x2,-0x2
0127 01cc | | Execute Vector,Catenate
0128 0092 0878 | x| Action Push_String_Extended,0x878 ; " => "
012a 01cc | | Execute Vector,Catenate
012b e5fd | | Load 0x2,-0x3
012c 00e1 | | Load_Encached Boolean_Cache
012d 011c | | Execute Any,Convert_Unchecked
012e 1c01 | | Execute_Immediate Run_Utility,0x1
012f 01cc | | Execute Vector,Catenate
0130 e011 | | Load 0x0,0x11
0131 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0132 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0133 0000 0000 | | .BLANK 0000[0x5]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 0155 | U | .CONST 0x0155 ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0002 | | .CONST 0x0002 ; Number of locals
013b INIT_0138:
013b 4801 |H | Short_Literal 0x1
013c 00db | | Load_Top At_Offset_3
013d 4803 |H | Short_Literal 0x3
013e 0271 | q | Execute Discrete,Times
013f 00d8 | | Load_Top At_Offset_0
0140 00e2 | | Load_Encached Integer_Cache
0141 0260 | ` | Execute Discrete,In_Type
0142 7001 |p | Jump_Nonzero 0x144
0143 0801 | | Execute_Immediate Raise,0x1
0144 00e9 | | Load_Encached String_Cache
0145 035b | [ | Declare_Type Array,Constrained
0146 0337 | 7 | Declare_Variable Array
0147 00d8 | | Load_Top At_Offset_0
0148 0335 | 5 | Declare_Variable Array,Duplicate
0149 00cd | | Action Spare6_Action
014a 00d9 | | Load_Top At_Offset_1
014b 01d9 | | Execute Vector,Reverse_Bounds
014c 0263 | c | Execute Discrete,Above_Bound
014d 7005 |p | Jump_Nonzero 0x153
014e 4820 |H | Short_Literal 0x20
014f 00d9 | | Load_Top At_Offset_1
0150 e403 | | Load 0x2,0x3
0151 01d6 | | Execute Vector,Field_Write
0152 3ffb |? | Loop_Increasing 0x14e
0153 00d9 | | Load_Top At_Offset_1
0154 01d4 | | Execute Vector,Structure_Write
0155 BODY_0138:
0155 00d8 | | Load_Top At_Offset_0
0156 e5fe | | Load 0x2,-0x2
0157 01cc | | Execute Vector,Catenate
0158 0092 0878 | x| Action Push_String_Extended,0x878 ; " => "
015a 01cc | | Execute Vector,Catenate
015b e5fd | | Load 0x2,-0x3
015c 00e0 | | Load_Encached Standard_Cache
015d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
015e 01cc | | Execute Vector,Catenate
015f e011 | | Load 0x0,0x11
0160 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0161 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0162 0000 0000 | | .BLANK 0000[0x6]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 0185 | | .CONST 0x0185 ; Address of begin
0169 0004 | | .CONST 0x0004 ; Address of exception handler
016a 0002 | | .CONST 0x0002 ; Number of locals
016b INIT_0168:
016b 4801 |H | Short_Literal 0x1
016c 00db | | Load_Top At_Offset_3
016d 4803 |H | Short_Literal 0x3
016e 0271 | q | Execute Discrete,Times
016f 00d8 | | Load_Top At_Offset_0
0170 00e2 | | Load_Encached Integer_Cache
0171 0260 | ` | Execute Discrete,In_Type
0172 7001 |p | Jump_Nonzero 0x174
0173 0801 | | Execute_Immediate Raise,0x1
0174 00e9 | | Load_Encached String_Cache
0175 035b | [ | Declare_Type Array,Constrained
0176 0337 | 7 | Declare_Variable Array
0177 00d8 | | Load_Top At_Offset_0
0178 0335 | 5 | Declare_Variable Array,Duplicate
0179 00cd | | Action Spare6_Action
017a 00d9 | | Load_Top At_Offset_1
017b 01d9 | | Execute Vector,Reverse_Bounds
017c 0263 | c | Execute Discrete,Above_Bound
017d 7005 |p | Jump_Nonzero 0x183
017e 4820 |H | Short_Literal 0x20
017f 00d9 | | Load_Top At_Offset_1
0180 e403 | | Load 0x2,0x3
0181 01d6 | | Execute Vector,Field_Write
0182 3ffb |? | Loop_Increasing 0x17e
0183 00d9 | | Load_Top At_Offset_1
0184 01d4 | | Execute Vector,Structure_Write
0185 BODY_0168:
0185 00d8 | | Load_Top At_Offset_0
0186 e5fe | | Load 0x2,-0x2
0187 01cc | | Execute Vector,Catenate
0188 0092 0878 | x| Action Push_String_Extended,0x878 ; " => "
018a 01cc | | Execute Vector,Catenate
018b e5fd | | Load 0x2,-0x3
018c 01cc | | Execute Vector,Catenate
018d e011 | | Load 0x0,0x11
018e 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
018f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 01ad | | .CONST 0x01ad ; Address of begin
0191 0004 | | .CONST 0x0004 ; Address of exception handler
0192 0002 | | .CONST 0x0002 ; Number of locals
0193 INIT_0190:
0193 4801 |H | Short_Literal 0x1
0194 00db | | Load_Top At_Offset_3
0195 4803 |H | Short_Literal 0x3
0196 0271 | q | Execute Discrete,Times
0197 00d8 | | Load_Top At_Offset_0
0198 00e2 | | Load_Encached Integer_Cache
0199 0260 | ` | Execute Discrete,In_Type
019a 7001 |p | Jump_Nonzero 0x19c
019b 0801 | | Execute_Immediate Raise,0x1
019c 00e9 | | Load_Encached String_Cache
019d 035b | [ | Declare_Type Array,Constrained
019e 0337 | 7 | Declare_Variable Array
019f 00d8 | | Load_Top At_Offset_0
01a0 0335 | 5 | Declare_Variable Array,Duplicate
01a1 00cd | | Action Spare6_Action
01a2 00d9 | | Load_Top At_Offset_1
01a3 01d9 | | Execute Vector,Reverse_Bounds
01a4 0263 | c | Execute Discrete,Above_Bound
01a5 7005 |p | Jump_Nonzero 0x1ab
01a6 4820 |H | Short_Literal 0x20
01a7 00d9 | | Load_Top At_Offset_1
01a8 e403 | | Load 0x2,0x3
01a9 01d6 | | Execute Vector,Field_Write
01aa 3ffb |? | Loop_Increasing 0x1a6
01ab 00d9 | | Load_Top At_Offset_1
01ac 01d4 | | Execute Vector,Structure_Write
01ad BODY_0190:
01ad 00d8 | | Load_Top At_Offset_0
01ae e5fe | | Load 0x2,-0x2
01af 01cc | | Execute Vector,Catenate
01b0 0092 0878 | x| Action Push_String_Extended,0x878 ; " => "
01b2 01cc | | Execute Vector,Catenate
01b3 e011 | | Load 0x0,0x11
01b4 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
01b5 e21b | | Load 0x1,0x1b
01b6 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01b7 e21b | | Load 0x1,0x1b
01b8 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01b9 e21b | | Load 0x1,0x1b
01ba 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01bb e5fd | | Load 0x2,-0x3
01bc e21b | | Load 0x1,0x1b
01bd 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01be 4801 |H | Short_Literal 0x1
01bf e011 | | Load 0x0,0x11
01c0 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
01c1 4504 |E | Exit_Suprogram New_Top_Offset 0x4
01c2 0000 0000 | | .BLANK 0000[0x6]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01cb | | .CONST 0x01cb ; Address of begin
01c9 0004 | | .CONST 0x0004 ; Address of exception handler
01ca 0001 | | .CONST 0x0001 ; Number of locals
01cb BODY_01c8:
01cb INIT_01c8:
01cb 00db | | Load_Top At_Offset_3
01cc e212 | | Load 0x1,0x12
01cd 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01ce 01df | | Execute Vector,Equal
01cf 6801 |h | Jump_Zero 0x1d1
01d0 4504 |E | Exit_Suprogram New_Top_Offset 0x4
01d1 00da | | Load_Top At_Offset_2
01d2 e5fd | | Load 0x2,-0x3
01d3 8217 | | Call 0x1,0x17
01d4 00cf | | Action Mark_Auxiliary
01d5 e212 | | Load 0x1,0x12
01d6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d7 0265 | e | Execute Discrete,Reverse_Bounds
01d8 0007 | | Action Break_Optional
01d9 00d8 | | Load_Top At_Offset_0
01da e5fe | | Load 0x2,-0x2
01db 01d7 | | Execute Vector,Field_Read
01dc 00d9 | | Load_Top At_Offset_1
01dd e212 | | Load 0x1,0x12
01de 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01df 011c | | Execute Any,Convert_Unchecked
01e0 1c01 | | Execute_Immediate Run_Utility,0x1
01e1 e5fd | | Load 0x2,-0x3
01e2 0a01 | | Execute_Immediate Plus,0x1
01e3 00d8 | | Load_Top At_Offset_0
01e4 00e3 | | Load_Encached Natural_Cache
01e5 0260 | ` | Execute Discrete,In_Type
01e6 7001 |p | Jump_Nonzero 0x1e8
01e7 0801 | | Execute_Immediate Raise,0x1
01e8 8218 | | Call 0x1,0x18
01e9 00c8 | | Action Pop_Auxiliary_Range
01ea 3fee |? | Loop_Increasing 0x1d9
01eb 4504 |E | Exit_Suprogram New_Top_Offset 0x4
01ec 0000 0000 | | .BLANK 0000[0x4]
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f3 | | .CONST 0x01f3 ; Address of begin
01f1 0004 | | .CONST 0x0004 ; Address of exception handler
01f2 0001 | | .CONST 0x0001 ; Number of locals
01f3 BODY_01f0:
01f3 INIT_01f0:
01f3 00db | | Load_Top At_Offset_3
01f4 e212 | | Load 0x1,0x12
01f5 1b14 | | Execute Package,Field_Read,Field_Number 0x14
01f6 01df | | Execute Vector,Equal
01f7 6801 |h | Jump_Zero 0x1f9
01f8 4504 |E | Exit_Suprogram New_Top_Offset 0x4
01f9 00da | | Load_Top At_Offset_2
01fa e5fd | | Load 0x2,-0x3
01fb 8217 | | Call 0x1,0x17
01fc 00cf | | Action Mark_Auxiliary
01fd e212 | | Load 0x1,0x12
01fe 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01ff 0265 | e | Execute Discrete,Reverse_Bounds
0200 0007 | | Action Break_Optional
0201 00d8 | | Load_Top At_Offset_0
0202 e5fe | | Load 0x2,-0x2
0203 01d7 | | Execute Vector,Field_Read
0204 00d9 | | Load_Top At_Offset_1
0205 e212 | | Load 0x1,0x12
0206 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0207 011c | | Execute Any,Convert_Unchecked
0208 1c01 | | Execute_Immediate Run_Utility,0x1
0209 e5fd | | Load 0x2,-0x3
020a 0a01 | | Execute_Immediate Plus,0x1
020b 00d8 | | Load_Top At_Offset_0
020c 00e3 | | Load_Encached Natural_Cache
020d 0260 | ` | Execute Discrete,In_Type
020e 7001 |p | Jump_Nonzero 0x210
020f 0801 | | Execute_Immediate Raise,0x1
0210 8218 | | Call 0x1,0x18
0211 00c8 | | Action Pop_Auxiliary_Range
0212 3fee |? | Loop_Increasing 0x201
0213 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0214 0000 0000 | | .BLANK 0000[0x4]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 021b | | .CONST 0x021b ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0001 | | .CONST 0x0001 ; Number of locals
021b BODY_0218:
021b INIT_0218:
021b 00db | | Load_Top At_Offset_3
021c 01db | | Execute Vector,Length
021d 7001 |p | Jump_Nonzero 0x21f
021e 4504 |E | Exit_Suprogram New_Top_Offset 0x4
021f 00da | | Load_Top At_Offset_2
0220 e5fd | | Load 0x2,-0x3
0221 8217 | | Call 0x1,0x17
0222 00cf | | Action Mark_Auxiliary
0223 e5fe | | Load 0x2,-0x2
0224 01d9 | | Execute Vector,Reverse_Bounds
0225 0263 | c | Execute Discrete,Above_Bound
0226 7012 |p | Jump_Nonzero 0x239
0227 00d8 | | Load_Top At_Offset_0
0228 e5fe | | Load 0x2,-0x2
0229 01d7 | | Execute Vector,Field_Read
022a e211 | | Load 0x1,0x11
022b 180f | | Execute Package,Field_Execute,Field_Number 0xf
022c 00d9 | | Load_Top At_Offset_1
022d 00e0 | | Load_Encached Standard_Cache
022e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
022f e5fd | | Load 0x2,-0x3
0230 0a01 | | Execute_Immediate Plus,0x1
0231 00d8 | | Load_Top At_Offset_0
0232 00e3 | | Load_Encached Natural_Cache
0233 0260 | ` | Execute Discrete,In_Type
0234 7001 |p | Jump_Nonzero 0x236
0235 0801 | | Execute_Immediate Raise,0x1
0236 821a | | Call 0x1,0x1a
0237 00c8 | | Action Pop_Auxiliary_Range
0238 3fee |? | Loop_Increasing 0x227
0239 4504 |E | Exit_Suprogram New_Top_Offset 0x4
023a 0000 0000 | | .BLANK 0000[0x6]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0243 | C | .CONST 0x0243 ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0001 | | .CONST 0x0001 ; Number of locals
0243 BODY_0240:
0243 INIT_0240:
0243 00db | | Load_Top At_Offset_3
0244 e212 | | Load 0x1,0x12
0245 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
0246 01df | | Execute Vector,Equal
0247 6801 |h | Jump_Zero 0x249
0248 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0249 00da | | Load_Top At_Offset_2
024a e5fd | | Load 0x2,-0x3
024b 8217 | | Call 0x1,0x17
024c 00cf | | Action Mark_Auxiliary
024d e5fe | | Load 0x2,-0x2
024e 01d9 | | Execute Vector,Reverse_Bounds
024f 0007 | | Action Break_Optional
0250 00d8 | | Load_Top At_Offset_0
0251 e5fe | | Load 0x2,-0x2
0252 01d7 | | Execute Vector,Field_Read
0253 00d9 | | Load_Top At_Offset_1
0254 e212 | | Load 0x1,0x12
0255 1b3c | < | Execute Package,Field_Read,Field_Number 0x3c
0256 011c | | Execute Any,Convert_Unchecked
0257 1c01 | | Execute_Immediate Run_Utility,0x1
0258 e5fd | | Load 0x2,-0x3
0259 0a01 | | Execute_Immediate Plus,0x1
025a 00d8 | | Load_Top At_Offset_0
025b 00e3 | | Load_Encached Natural_Cache
025c 0260 | ` | Execute Discrete,In_Type
025d 7001 |p | Jump_Nonzero 0x25f
025e 0801 | | Execute_Immediate Raise,0x1
025f 8218 | | Call 0x1,0x18
0260 00c8 | | Action Pop_Auxiliary_Range
0261 3fee |? | Loop_Increasing 0x250
0262 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0263 0000 0000 | | .BLANK 0000[0x5]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026b | k | .CONST 0x026b ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 0001 | | .CONST 0x0001 ; Number of locals
026b BODY_0268:
026b INIT_0268:
026b 00db | | Load_Top At_Offset_3
026c e212 | | Load 0x1,0x12
026d 1b42 | B | Execute Package,Field_Read,Field_Number 0x42
026e 01df | | Execute Vector,Equal
026f 6801 |h | Jump_Zero 0x271
0270 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0271 00da | | Load_Top At_Offset_2
0272 e5fd | | Load 0x2,-0x3
0273 8217 | | Call 0x1,0x17
0274 00cf | | Action Mark_Auxiliary
0275 e5fe | | Load 0x2,-0x2
0276 01d9 | | Execute Vector,Reverse_Bounds
0277 0007 | | Action Break_Optional
0278 00d8 | | Load_Top At_Offset_0
0279 e5fe | | Load 0x2,-0x2
027a 01d7 | | Execute Vector,Field_Read
027b 00d9 | | Load_Top At_Offset_1
027c e212 | | Load 0x1,0x12
027d 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
027e 011c | | Execute Any,Convert_Unchecked
027f 1c01 | | Execute_Immediate Run_Utility,0x1
0280 e5fd | | Load 0x2,-0x3
0281 0a01 | | Execute_Immediate Plus,0x1
0282 00d8 | | Load_Top At_Offset_0
0283 00e3 | | Load_Encached Natural_Cache
0284 0260 | ` | Execute Discrete,In_Type
0285 7001 |p | Jump_Nonzero 0x287
0286 0801 | | Execute_Immediate Raise,0x1
0287 8218 | | Call 0x1,0x18
0288 00c8 | | Action Pop_Auxiliary_Range
0289 3fee |? | Loop_Increasing 0x278
028a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
028b 0000 0000 | | .BLANK 0000[0x5]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0293 | | .CONST 0x0293 ; Address of begin
0291 0004 | | .CONST 0x0004 ; Address of exception handler
0292 0001 | | .CONST 0x0001 ; Number of locals
0293 BODY_0290:
0293 INIT_0290:
0293 00db | | Load_Top At_Offset_3
0294 e212 | | Load 0x1,0x12
0295 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0296 6801 |h | Jump_Zero 0x298
0297 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0298 00da | | Load_Top At_Offset_2
0299 e5fd | | Load 0x2,-0x3
029a 8217 | | Call 0x1,0x17
029b e5fd | | Load 0x2,-0x3
029c 0a01 | | Execute_Immediate Plus,0x1
029d 00d8 | | Load_Top At_Offset_0
029e 00e3 | | Load_Encached Natural_Cache
029f 0260 | ` | Execute Discrete,In_Type
02a0 7001 |p | Jump_Nonzero 0x2a2
02a1 0801 | | Execute_Immediate Raise,0x1
02a2 e5fe | | Load 0x2,-0x2
02a3 e212 | | Load 0x1,0x12
02a4 181e | | Execute Package,Field_Execute,Field_Number 0x1e
02a5 0092 0879 | y| Action Push_String_Extended,0x879 ; "Enforced Type Restrictions"
02a7 821e | | Call 0x1,0x1e
02a8 e5fd | | Load 0x2,-0x3
02a9 0a01 | | Execute_Immediate Plus,0x1
02aa 00d8 | | Load_Top At_Offset_0
02ab 00e3 | | Load_Encached Natural_Cache
02ac 0260 | ` | Execute Discrete,In_Type
02ad 7001 |p | Jump_Nonzero 0x2af
02ae 0801 | | Execute_Immediate Raise,0x1
02af e5fe | | Load 0x2,-0x2
02b0 e212 | | Load 0x1,0x12
02b1 181f | | Execute Package,Field_Execute,Field_Number 0x1f
02b2 0092 087a | z| Action Push_String_Extended,0x87a ; "Valid Structural Types"
02b4 821d | | Call 0x1,0x1d
02b5 e5fd | | Load 0x2,-0x3
02b6 0a01 | | Execute_Immediate Plus,0x1
02b7 00d8 | | Load_Top At_Offset_0
02b8 00e3 | | Load_Encached Natural_Cache
02b9 0260 | ` | Execute Discrete,In_Type
02ba 7001 |p | Jump_Nonzero 0x2bc
02bb 0801 | | Execute_Immediate Raise,0x1
02bc e5fe | | Load 0x2,-0x2
02bd e212 | | Load 0x1,0x12
02be 1820 | | Execute Package,Field_Execute,Field_Number 0x20
02bf 0092 087b | {| Action Push_String_Extended,0x87b ; "Valid Textual Types"
02c1 821f | | Call 0x1,0x1f
02c2 e5fd | | Load 0x2,-0x3
02c3 0a01 | | Execute_Immediate Plus,0x1
02c4 00d8 | | Load_Top At_Offset_0
02c5 00e3 | | Load_Encached Natural_Cache
02c6 0260 | ` | Execute Discrete,In_Type
02c7 7001 |p | Jump_Nonzero 0x2c9
02c8 0801 | | Execute_Immediate Raise,0x1
02c9 e5fe | | Load 0x2,-0x2
02ca e212 | | Load 0x1,0x12
02cb 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
02cc 0092 087c | || Action Push_String_Extended,0x87c ; "Required Pragmas"
02ce 821f | | Call 0x1,0x1f
02cf e5fd | | Load 0x2,-0x3
02d0 0a01 | | Execute_Immediate Plus,0x1
02d1 00d8 | | Load_Top At_Offset_0
02d2 00e3 | | Load_Encached Natural_Cache
02d3 0260 | ` | Execute Discrete,In_Type
02d4 7001 |p | Jump_Nonzero 0x2d6
02d5 0801 | | Execute_Immediate Raise,0x1
02d6 e5fe | | Load 0x2,-0x2
02d7 e212 | | Load 0x1,0x12
02d8 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
02d9 0092 087d | }| Action Push_String_Extended,0x87d ; "Prohibited Pragmas"
02db 821f | | Call 0x1,0x1f
02dc 4504 |E | Exit_Suprogram New_Top_Offset 0x4
02dd 0000 0000 | | .XXX[0x3]
02df 0000 | |
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02e5 | | .CONST 0x02e5 ; Address of begin
02e1 0004 | | .CONST 0x0004 ; Address of exception handler
02e2 0002 | | .CONST 0x0002 ; Number of locals
02e3 INIT_02e0:
02e3 e212 | | Load 0x1,0x12
02e4 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
02e5 BODY_02e0:
02e5 00db | | Load_Top At_Offset_3
02e6 e5fd | | Load 0x2,-0x3
02e7 8217 | | Call 0x1,0x17
02e8 e5fe | | Load 0x2,-0x2
02e9 e212 | | Load 0x1,0x12
02ea 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
02eb 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
02ec 00d8 | | Load_Top At_Offset_0
02ed e212 | | Load 0x1,0x12
02ee 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
02ef 011c | | Execute Any,Convert_Unchecked
02f0 1c01 | | Execute_Immediate Run_Utility,0x1
02f1 0092 087e | ~| Action Push_String_Extended,0x87e ; "Form"
02f3 e5fd | | Load 0x2,-0x3
02f4 0a01 | | Execute_Immediate Plus,0x1
02f5 00d8 | | Load_Top At_Offset_0
02f6 00e3 | | Load_Encached Natural_Cache
02f7 0260 | ` | Execute Discrete,In_Type
02f8 7001 |p | Jump_Nonzero 0x2fa
02f9 0801 | | Execute_Immediate Raise,0x1
02fa 821a | | Call 0x1,0x1a
02fb 00d8 | | Load_Top At_Offset_0
02fc 4602 |F | Jump_Case 0x3
02fd 781d |x | Jump 0x31b ; case 0x0
02fe 7801 |x | Jump 0x300 ; case 0x1
02ff 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x2
0300 e5fe | | Load 0x2,-0x2
0301 e212 | | Load 0x1,0x12
0302 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0303 0092 087f | | Action Push_String_Extended,0x87f ; "Real Lo"
0305 e5fd | | Load 0x2,-0x3
0306 0a01 | | Execute_Immediate Plus,0x1
0307 00d8 | | Load_Top At_Offset_0
0308 00e3 | | Load_Encached Natural_Cache
0309 0260 | ` | Execute Discrete,In_Type
030a 7001 |p | Jump_Nonzero 0x30c
030b 0801 | | Execute_Immediate Raise,0x1
030c 821c | | Call 0x1,0x1c
030d e5fe | | Load 0x2,-0x2
030e e212 | | Load 0x1,0x12
030f 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0310 0092 0880 | | Action Push_String_Extended,0x880 ; "Real Hi"
0312 e5fd | | Load 0x2,-0x3
0313 0a01 | | Execute_Immediate Plus,0x1
0314 00d8 | | Load_Top At_Offset_0
0315 00e3 | | Load_Encached Natural_Cache
0316 0260 | ` | Execute Discrete,In_Type
0317 7001 |p | Jump_Nonzero 0x319
0318 0801 | | Execute_Immediate Raise,0x1
0319 821c | | Call 0x1,0x1c
031a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
031b e5fe | | Load 0x2,-0x2
031c e212 | | Load 0x1,0x12
031d 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
031e e005 | | Load 0x0,0x5
031f 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
0320 0092 0881 | | Action Push_String_Extended,0x881 ; "Integer Lo"
0322 e5fd | | Load 0x2,-0x3
0323 0a01 | | Execute_Immediate Plus,0x1
0324 00d8 | | Load_Top At_Offset_0
0325 00e3 | | Load_Encached Natural_Cache
0326 0260 | ` | Execute Discrete,In_Type
0327 7001 |p | Jump_Nonzero 0x329
0328 0801 | | Execute_Immediate Raise,0x1
0329 821a | | Call 0x1,0x1a
032a e5fe | | Load 0x2,-0x2
032b e212 | | Load 0x1,0x12
032c 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
032d e005 | | Load 0x0,0x5
032e 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
032f 0092 0882 | | Action Push_String_Extended,0x882 ; "Integer Hi"
0331 e5fd | | Load 0x2,-0x3
0332 0a01 | | Execute_Immediate Plus,0x1
0333 00d8 | | Load_Top At_Offset_0
0334 00e3 | | Load_Encached Natural_Cache
0335 0260 | ` | Execute Discrete,In_Type
0336 7001 |p | Jump_Nonzero 0x338
0337 0801 | | Execute_Immediate Raise,0x1
0338 821a | | Call 0x1,0x1a
0339 4504 |E | Exit_Suprogram New_Top_Offset 0x4
033a 0000 0000 | | .BLANK 0000[0x6]
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 0344 | D | .CONST 0x0344 ; Address of begin
0341 0004 | | .CONST 0x0004 ; Address of exception handler
0342 0002 | | .CONST 0x0002 ; Number of locals
0343 INIT_0340:
0343 00e1 | | Load_Encached Boolean_Cache
0344 BODY_0340:
0344 e5fe | | Load 0x2,-0x2
0345 e212 | | Load 0x1,0x12
0346 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0347 6801 |h | Jump_Zero 0x349
0348 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0349 00db | | Load_Top At_Offset_3
034a e5fd | | Load 0x2,-0x3
034b 8217 | | Call 0x1,0x17
034c e5fe | | Load 0x2,-0x2
034d e212 | | Load 0x1,0x12
034e 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
034f 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0350 00d8 | | Load_Top At_Offset_0
0351 0092 0883 | | Action Push_String_Extended,0x883 ; "Must Be Static"
0353 e5fd | | Load 0x2,-0x3
0354 0a01 | | Execute_Immediate Plus,0x1
0355 00d8 | | Load_Top At_Offset_0
0356 00e3 | | Load_Encached Natural_Cache
0357 0260 | ` | Execute Discrete,In_Type
0358 7001 |p | Jump_Nonzero 0x35a
0359 0801 | | Execute_Immediate Raise,0x1
035a 8218 | | Call 0x1,0x18
035b 00d8 | | Load_Top At_Offset_0
035c 680d |h | Jump_Zero 0x36a
035d e5fd | | Load 0x2,-0x3
035e 0a01 | | Execute_Immediate Plus,0x1
035f 00d8 | | Load_Top At_Offset_0
0360 00e3 | | Load_Encached Natural_Cache
0361 0260 | ` | Execute Discrete,In_Type
0362 7001 |p | Jump_Nonzero 0x364
0363 0801 | | Execute_Immediate Raise,0x1
0364 e5fe | | Load 0x2,-0x2
0365 e212 | | Load 0x1,0x12
0366 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0367 0092 0884 | | Action Push_String_Extended,0x884 ; "Range Data"
0369 8223 | # | Call 0x1,0x23
036a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
036b 0000 0000 | | .BLANK 0000[0x5]
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 0373 | s | .CONST 0x0373 ; Address of begin
0371 0004 | | .CONST 0x0004 ; Address of exception handler
0372 0001 | | .CONST 0x0001 ; Number of locals
0373 BODY_0370:
0373 INIT_0370:
0373 00db | | Load_Top At_Offset_3
0374 e212 | | Load 0x1,0x12
0375 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0376 6801 |h | Jump_Zero 0x378
0377 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0378 00da | | Load_Top At_Offset_2
0379 e5fd | | Load 0x2,-0x3
037a 8217 | | Call 0x1,0x17
037b 00db | | Load_Top At_Offset_3
037c e212 | | Load 0x1,0x12
037d 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
037e 0092 0885 | | Action Push_String_Extended,0x885 ; "Expression Types"
0380 e5fd | | Load 0x2,-0x3
0381 0a01 | | Execute_Immediate Plus,0x1
0382 00d8 | | Load_Top At_Offset_0
0383 00e3 | | Load_Encached Natural_Cache
0384 0260 | ` | Execute Discrete,In_Type
0385 7001 |p | Jump_Nonzero 0x387
0386 0801 | | Execute_Immediate Raise,0x1
0387 821a | | Call 0x1,0x1a
0388 e5fd | | Load 0x2,-0x3
0389 0a01 | | Execute_Immediate Plus,0x1
038a 00d8 | | Load_Top At_Offset_0
038b 00e3 | | Load_Encached Natural_Cache
038c 0260 | ` | Execute Discrete,In_Type
038d 7001 |p | Jump_Nonzero 0x38f
038e 0801 | | Execute_Immediate Raise,0x1
038f e5fe | | Load 0x2,-0x2
0390 e212 | | Load 0x1,0x12
0391 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0392 0092 0886 | | Action Push_String_Extended,0x886 ; "Constraint"
0394 8224 | $ | Call 0x1,0x24
0395 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0396 0000 0000 | | .XXX[0x2]
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 039b | | .CONST 0x039b ; Address of begin
0399 0004 | | .CONST 0x0004 ; Address of exception handler
039a 0001 | | .CONST 0x0001 ; Number of locals
039b BODY_0398:
039b INIT_0398:
039b 00db | | Load_Top At_Offset_3
039c e212 | | Load 0x1,0x12
039d 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
039e 6801 |h | Jump_Zero 0x3a0
039f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03a0 00da | | Load_Top At_Offset_2
03a1 e5fd | | Load 0x2,-0x3
03a2 8217 | | Call 0x1,0x17
03a3 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03a4 0000 0000 | | .BLANK 0000[0x4]
03a8 ; --------------------------------------------------------------------------------------
03a8 ; SUBPROGRAM
03a8 ; --------------------------------------------------------------------------------------
03a8 03ab | | .CONST 0x03ab ; Address of begin
03a9 0004 | | .CONST 0x0004 ; Address of exception handler
03aa 0001 | | .CONST 0x0001 ; Number of locals
03ab BODY_03a8:
03ab INIT_03a8:
03ab 00db | | Load_Top At_Offset_3
03ac e212 | | Load 0x1,0x12
03ad 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
03ae 6801 |h | Jump_Zero 0x3b0
03af 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03b0 00da | | Load_Top At_Offset_2
03b1 e5fd | | Load 0x2,-0x3
03b2 8217 | | Call 0x1,0x17
03b3 00db | | Load_Top At_Offset_3
03b4 e212 | | Load 0x1,0x12
03b5 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
03b6 0092 0887 | | Action Push_String_Extended,0x887 ; "Ambiguity Allowed"
03b8 e5fd | | Load 0x2,-0x3
03b9 0a01 | | Execute_Immediate Plus,0x1
03ba 00d8 | | Load_Top At_Offset_0
03bb 00e3 | | Load_Encached Natural_Cache
03bc 0260 | ` | Execute Discrete,In_Type
03bd 7001 |p | Jump_Nonzero 0x3bf
03be 0801 | | Execute_Immediate Raise,0x1
03bf 8218 | | Call 0x1,0x18
03c0 e5fd | | Load 0x2,-0x3
03c1 0a01 | | Execute_Immediate Plus,0x1
03c2 00d8 | | Load_Top At_Offset_0
03c3 00e3 | | Load_Encached Natural_Cache
03c4 0260 | ` | Execute Discrete,In_Type
03c5 7001 |p | Jump_Nonzero 0x3c7
03c6 0801 | | Execute_Immediate Raise,0x1
03c7 e5fe | | Load 0x2,-0x2
03c8 e212 | | Load 0x1,0x12
03c9 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
03ca 0092 0888 | | Action Push_String_Extended,0x888 ; "Valid Kinds"
03cc 8221 | ! | Call 0x1,0x21
03cd e5fd | | Load 0x2,-0x3
03ce 0a01 | | Execute_Immediate Plus,0x1
03cf 00d8 | | Load_Top At_Offset_0
03d0 00e3 | | Load_Encached Natural_Cache
03d1 0260 | ` | Execute Discrete,In_Type
03d2 7001 |p | Jump_Nonzero 0x3d4
03d3 0801 | | Execute_Immediate Raise,0x1
03d4 e5fe | | Load 0x2,-0x2
03d5 e212 | | Load 0x1,0x12
03d6 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
03d7 0092 087c | || Action Push_String_Extended,0x87c ; "Required Pragmas"
03d9 821f | | Call 0x1,0x1f
03da e5fd | | Load 0x2,-0x3
03db 0a01 | | Execute_Immediate Plus,0x1
03dc 00d8 | | Load_Top At_Offset_0
03dd 00e3 | | Load_Encached Natural_Cache
03de 0260 | ` | Execute Discrete,In_Type
03df 7001 |p | Jump_Nonzero 0x3e1
03e0 0801 | | Execute_Immediate Raise,0x1
03e1 e5fe | | Load 0x2,-0x2
03e2 e212 | | Load 0x1,0x12
03e3 1853 | S | Execute Package,Field_Execute,Field_Number 0x53
03e4 0092 0889 | | Action Push_String_Extended,0x889 ; "prohibited Pragmas"
03e6 821f | | Call 0x1,0x1f
03e7 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03eb | | .CONST 0x03eb ; Address of begin
03e9 0004 | | .CONST 0x0004 ; Address of exception handler
03ea 0001 | | .CONST 0x0001 ; Number of locals
03eb BODY_03e8:
03eb INIT_03e8:
03eb 00db | | Load_Top At_Offset_3
03ec e213 | | Load 0x1,0x13
03ed 180f | | Execute Package,Field_Execute,Field_Number 0xf
03ee 6801 |h | Jump_Zero 0x3f0
03ef 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03f0 00da | | Load_Top At_Offset_2
03f1 e5fd | | Load 0x2,-0x3
03f2 8217 | | Call 0x1,0x17
03f3 00db | | Load_Top At_Offset_3
03f4 e213 | | Load 0x1,0x13
03f5 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03f6 0092 088a | | Action Push_String_Extended,0x88a ; "Name"
03f8 e5fd | | Load 0x2,-0x3
03f9 0a01 | | Execute_Immediate Plus,0x1
03fa 00d8 | | Load_Top At_Offset_0
03fb 00e3 | | Load_Encached Natural_Cache
03fc 0260 | ` | Execute Discrete,In_Type
03fd 7001 |p | Jump_Nonzero 0x3ff
03fe 0801 | | Execute_Immediate Raise,0x1
03ff 821a | | Call 0x1,0x1a
0400 00db | | Load_Top At_Offset_3
0401 e213 | | Load 0x1,0x13
0402 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0403 0092 088b | | Action Push_String_Extended,0x88b ; "Size"
0405 e5fd | | Load 0x2,-0x3
0406 0a01 | | Execute_Immediate Plus,0x1
0407 00d8 | | Load_Top At_Offset_0
0408 00e3 | | Load_Encached Natural_Cache
0409 0260 | ` | Execute Discrete,In_Type
040a 7001 |p | Jump_Nonzero 0x40c
040b 0801 | | Execute_Immediate Raise,0x1
040c 8219 | | Call 0x1,0x19
040d 00db | | Load_Top At_Offset_3
040e e213 | | Load 0x1,0x13
040f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0410 e005 | | Load 0x0,0x5
0411 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
0412 0092 088c | | Action Push_String_Extended,0x88c ; "Lo Bound"
0414 e5fd | | Load 0x2,-0x3
0415 0a01 | | Execute_Immediate Plus,0x1
0416 00d8 | | Load_Top At_Offset_0
0417 00e3 | | Load_Encached Natural_Cache
0418 0260 | ` | Execute Discrete,In_Type
0419 7001 |p | Jump_Nonzero 0x41b
041a 0801 | | Execute_Immediate Raise,0x1
041b 821a | | Call 0x1,0x1a
041c 00db | | Load_Top At_Offset_3
041d e213 | | Load 0x1,0x13
041e 1814 | | Execute Package,Field_Execute,Field_Number 0x14
041f e005 | | Load 0x0,0x5
0420 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
0421 0092 088d | | Action Push_String_Extended,0x88d ; "Hi Bound"
0423 e5fd | | Load 0x2,-0x3
0424 0a01 | | Execute_Immediate Plus,0x1
0425 00d8 | | Load_Top At_Offset_0
0426 00e3 | | Load_Encached Natural_Cache
0427 0260 | ` | Execute Discrete,In_Type
0428 7001 |p | Jump_Nonzero 0x42a
0429 0801 | | Execute_Immediate Raise,0x1
042a 821a | | Call 0x1,0x1a
042b 4504 |E | Exit_Suprogram New_Top_Offset 0x4
042c 0000 0000 | | .BLANK 0000[0x4]
0430 ; --------------------------------------------------------------------------------------
0430 ; SUBPROGRAM
0430 ; --------------------------------------------------------------------------------------
0430 0433 | 3 | .CONST 0x0433 ; Address of begin
0431 0004 | | .CONST 0x0004 ; Address of exception handler
0432 0001 | | .CONST 0x0001 ; Number of locals
0433 BODY_0430:
0433 INIT_0430:
0433 00db | | Load_Top At_Offset_3
0434 01db | | Execute Vector,Length
0435 7001 |p | Jump_Nonzero 0x437
0436 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0437 00da | | Load_Top At_Offset_2
0438 e5fd | | Load 0x2,-0x3
0439 8217 | | Call 0x1,0x17
043a 00cf | | Action Mark_Auxiliary
043b e5fe | | Load 0x2,-0x2
043c 01d9 | | Execute Vector,Reverse_Bounds
043d 0263 | c | Execute Discrete,Above_Bound
043e 7010 |p | Jump_Nonzero 0x44f
043f e5fd | | Load 0x2,-0x3
0440 0a01 | | Execute_Immediate Plus,0x1
0441 00d8 | | Load_Top At_Offset_0
0442 00e3 | | Load_Encached Natural_Cache
0443 0260 | ` | Execute Discrete,In_Type
0444 7001 |p | Jump_Nonzero 0x446
0445 0801 | | Execute_Immediate Raise,0x1
0446 00d9 | | Load_Top At_Offset_1
0447 e5fe | | Load 0x2,-0x2
0448 01d7 | | Execute Vector,Field_Read
0449 00da | | Load_Top At_Offset_2
044a 00e0 | | Load_Encached Standard_Cache
044b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
044c 8228 | ( | Call 0x1,0x28
044d 00c8 | | Action Pop_Auxiliary_Range
044e 3ff0 |? | Loop_Increasing 0x43f
044f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0450 ; --------------------------------------------------------------------------------------
0450 ; SUBPROGRAM
0450 ; --------------------------------------------------------------------------------------
0450 0453 | S | .CONST 0x0453 ; Address of begin
0451 0004 | | .CONST 0x0004 ; Address of exception handler
0452 0001 | | .CONST 0x0001 ; Number of locals
0453 BODY_0450:
0453 INIT_0450:
0453 00db | | Load_Top At_Offset_3
0454 e213 | | Load 0x1,0x13
0455 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0456 6801 |h | Jump_Zero 0x458
0457 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0458 00da | | Load_Top At_Offset_2
0459 e5fd | | Load 0x2,-0x3
045a 8217 | | Call 0x1,0x17
045b 00db | | Load_Top At_Offset_3
045c e213 | | Load 0x1,0x13
045d 1819 | | Execute Package,Field_Execute,Field_Number 0x19
045e 0092 088a | | Action Push_String_Extended,0x88a ; "Name"
0460 e5fd | | Load 0x2,-0x3
0461 0a01 | | Execute_Immediate Plus,0x1
0462 00d8 | | Load_Top At_Offset_0
0463 00e3 | | Load_Encached Natural_Cache
0464 0260 | ` | Execute Discrete,In_Type
0465 7001 |p | Jump_Nonzero 0x467
0466 0801 | | Execute_Immediate Raise,0x1
0467 821a | | Call 0x1,0x1a
0468 00db | | Load_Top At_Offset_3
0469 e213 | | Load 0x1,0x13
046a 181a | | Execute Package,Field_Execute,Field_Number 0x1a
046b 0092 088e | | Action Push_String_Extended,0x88e ; "Digits"
046d e5fd | | Load 0x2,-0x3
046e 0a01 | | Execute_Immediate Plus,0x1
046f 00d8 | | Load_Top At_Offset_0
0470 00e3 | | Load_Encached Natural_Cache
0471 0260 | ` | Execute Discrete,In_Type
0472 7001 |p | Jump_Nonzero 0x474
0473 0801 | | Execute_Immediate Raise,0x1
0474 8219 | | Call 0x1,0x19
0475 00db | | Load_Top At_Offset_3
0476 e213 | | Load 0x1,0x13
0477 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0478 0092 088b | | Action Push_String_Extended,0x88b ; "Size"
047a e5fd | | Load 0x2,-0x3
047b 0a01 | | Execute_Immediate Plus,0x1
047c 00d8 | | Load_Top At_Offset_0
047d 00e3 | | Load_Encached Natural_Cache
047e 0260 | ` | Execute Discrete,In_Type
047f 7001 |p | Jump_Nonzero 0x481
0480 0801 | | Execute_Immediate Raise,0x1
0481 8219 | | Call 0x1,0x19
0482 00db | | Load_Top At_Offset_3
0483 e213 | | Load 0x1,0x13
0484 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0485 e005 | | Load 0x0,0x5
0486 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0487 0092 088c | | Action Push_String_Extended,0x88c ; "Lo Bound"
0489 e5fd | | Load 0x2,-0x3
048a 0a01 | | Execute_Immediate Plus,0x1
048b 00d8 | | Load_Top At_Offset_0
048c 00e3 | | Load_Encached Natural_Cache
048d 0260 | ` | Execute Discrete,In_Type
048e 7001 |p | Jump_Nonzero 0x490
048f 0801 | | Execute_Immediate Raise,0x1
0490 821c | | Call 0x1,0x1c
0491 00db | | Load_Top At_Offset_3
0492 e213 | | Load 0x1,0x13
0493 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0494 e005 | | Load 0x0,0x5
0495 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0496 0092 088d | | Action Push_String_Extended,0x88d ; "Hi Bound"
0498 e5fd | | Load 0x2,-0x3
0499 0a01 | | Execute_Immediate Plus,0x1
049a 00d8 | | Load_Top At_Offset_0
049b 00e3 | | Load_Encached Natural_Cache
049c 0260 | ` | Execute Discrete,In_Type
049d 7001 |p | Jump_Nonzero 0x49f
049e 0801 | | Execute_Immediate Raise,0x1
049f 821c | | Call 0x1,0x1c
04a0 00db | | Load_Top At_Offset_3
04a1 e213 | | Load 0x1,0x13
04a2 181f | | Execute Package,Field_Execute,Field_Number 0x1f
04a3 0092 088f | | Action Push_String_Extended,0x88f ; "Machine Emax"
04a5 e5fd | | Load 0x2,-0x3
04a6 0a01 | | Execute_Immediate Plus,0x1
04a7 00d8 | | Load_Top At_Offset_0
04a8 00e3 | | Load_Encached Natural_Cache
04a9 0260 | ` | Execute Discrete,In_Type
04aa 7001 |p | Jump_Nonzero 0x4ac
04ab 0801 | | Execute_Immediate Raise,0x1
04ac 8219 | | Call 0x1,0x19
04ad 00db | | Load_Top At_Offset_3
04ae e213 | | Load 0x1,0x13
04af 1820 | | Execute Package,Field_Execute,Field_Number 0x20
04b0 0092 0890 | | Action Push_String_Extended,0x890 ; "Machine Emin"
04b2 e5fd | | Load 0x2,-0x3
04b3 0a01 | | Execute_Immediate Plus,0x1
04b4 00d8 | | Load_Top At_Offset_0
04b5 00e3 | | Load_Encached Natural_Cache
04b6 0260 | ` | Execute Discrete,In_Type
04b7 7001 |p | Jump_Nonzero 0x4b9
04b8 0801 | | Execute_Immediate Raise,0x1
04b9 8219 | | Call 0x1,0x19
04ba 00db | | Load_Top At_Offset_3
04bb e213 | | Load 0x1,0x13
04bc 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
04bd 0092 0891 | | Action Push_String_Extended,0x891 ; "Machine Radix"
04bf e5fd | | Load 0x2,-0x3
04c0 0a01 | | Execute_Immediate Plus,0x1
04c1 00d8 | | Load_Top At_Offset_0
04c2 00e3 | | Load_Encached Natural_Cache
04c3 0260 | ` | Execute Discrete,In_Type
04c4 7001 |p | Jump_Nonzero 0x4c6
04c5 0801 | | Execute_Immediate Raise,0x1
04c6 8219 | | Call 0x1,0x19
04c7 00db | | Load_Top At_Offset_3
04c8 e213 | | Load 0x1,0x13
04c9 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
04ca 0092 0892 | | Action Push_String_Extended,0x892 ; "Machine Mantissa"
04cc e5fd | | Load 0x2,-0x3
04cd 0a01 | | Execute_Immediate Plus,0x1
04ce 00d8 | | Load_Top At_Offset_0
04cf 00e3 | | Load_Encached Natural_Cache
04d0 0260 | ` | Execute Discrete,In_Type
04d1 7001 |p | Jump_Nonzero 0x4d3
04d2 0801 | | Execute_Immediate Raise,0x1
04d3 8219 | | Call 0x1,0x19
04d4 00db | | Load_Top At_Offset_3
04d5 e213 | | Load 0x1,0x13
04d6 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
04d7 0092 0893 | | Action Push_String_Extended,0x893 ; "Machine Rounds"
04d9 e5fd | | Load 0x2,-0x3
04da 0a01 | | Execute_Immediate Plus,0x1
04db 00d8 | | Load_Top At_Offset_0
04dc 00e3 | | Load_Encached Natural_Cache
04dd 0260 | ` | Execute Discrete,In_Type
04de 7001 |p | Jump_Nonzero 0x4e0
04df 0801 | | Execute_Immediate Raise,0x1
04e0 8218 | | Call 0x1,0x18
04e1 00db | | Load_Top At_Offset_3
04e2 e213 | | Load 0x1,0x13
04e3 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
04e4 0092 0894 | | Action Push_String_Extended,0x894 ; "Machine Overflows"
04e6 e5fd | | Load 0x2,-0x3
04e7 0a01 | | Execute_Immediate Plus,0x1
04e8 00d8 | | Load_Top At_Offset_0
04e9 00e3 | | Load_Encached Natural_Cache
04ea 0260 | ` | Execute Discrete,In_Type
04eb 7001 |p | Jump_Nonzero 0x4ed
04ec 0801 | | Execute_Immediate Raise,0x1
04ed 8218 | | Call 0x1,0x18
04ee 4504 |E | Exit_Suprogram New_Top_Offset 0x4
04ef 0000 | | .XXX[0x1]
04f0 ; --------------------------------------------------------------------------------------
04f0 ; SUBPROGRAM
04f0 ; --------------------------------------------------------------------------------------
04f0 04f3 | | .CONST 0x04f3 ; Address of begin
04f1 0004 | | .CONST 0x0004 ; Address of exception handler
04f2 0001 | | .CONST 0x0001 ; Number of locals
04f3 BODY_04f0:
04f3 INIT_04f0:
04f3 00db | | Load_Top At_Offset_3
04f4 01db | | Execute Vector,Length
04f5 7001 |p | Jump_Nonzero 0x4f7
04f6 4504 |E | Exit_Suprogram New_Top_Offset 0x4
04f7 00da | | Load_Top At_Offset_2
04f8 e5fd | | Load 0x2,-0x3
04f9 8217 | | Call 0x1,0x17
04fa 00cf | | Action Mark_Auxiliary
04fb e5fe | | Load 0x2,-0x2
04fc 01d9 | | Execute Vector,Reverse_Bounds
04fd 0263 | c | Execute Discrete,Above_Bound
04fe 7010 |p | Jump_Nonzero 0x50f
04ff e5fd | | Load 0x2,-0x3
0500 0a01 | | Execute_Immediate Plus,0x1
0501 00d8 | | Load_Top At_Offset_0
0502 00e3 | | Load_Encached Natural_Cache
0503 0260 | ` | Execute Discrete,In_Type
0504 7001 |p | Jump_Nonzero 0x506
0505 0801 | | Execute_Immediate Raise,0x1
0506 00d9 | | Load_Top At_Offset_1
0507 e5fe | | Load 0x2,-0x2
0508 01d7 | | Execute Vector,Field_Read
0509 00da | | Load_Top At_Offset_2
050a 00e0 | | Load_Encached Standard_Cache
050b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
050c 822a | * | Call 0x1,0x2a
050d 00c8 | | Action Pop_Auxiliary_Range
050e 3ff0 |? | Loop_Increasing 0x4ff
050f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0510 ; --------------------------------------------------------------------------------------
0510 ; SUBPROGRAM
0510 ; --------------------------------------------------------------------------------------
0510 0513 | | .CONST 0x0513 ; Address of begin
0511 0004 | | .CONST 0x0004 ; Address of exception handler
0512 0001 | | .CONST 0x0001 ; Number of locals
0513 BODY_0510:
0513 INIT_0510:
0513 00db | | Load_Top At_Offset_3
0514 e213 | | Load 0x1,0x13
0515 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0516 6801 |h | Jump_Zero 0x518
0517 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0518 00da | | Load_Top At_Offset_2
0519 e5fd | | Load 0x2,-0x3
051a 8217 | | Call 0x1,0x17
051b 00db | | Load_Top At_Offset_3
051c e213 | | Load 0x1,0x13
051d 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
051e 0092 088a | | Action Push_String_Extended,0x88a ; "Name"
0520 e5fd | | Load 0x2,-0x3
0521 0a01 | | Execute_Immediate Plus,0x1
0522 00d8 | | Load_Top At_Offset_0
0523 00e3 | | Load_Encached Natural_Cache
0524 0260 | ` | Execute Discrete,In_Type
0525 7001 |p | Jump_Nonzero 0x527
0526 0801 | | Execute_Immediate Raise,0x1
0527 821a | | Call 0x1,0x1a
0528 00db | | Load_Top At_Offset_3
0529 e213 | | Load 0x1,0x13
052a 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
052b 0092 088b | | Action Push_String_Extended,0x88b ; "Size"
052d e5fd | | Load 0x2,-0x3
052e 0a01 | | Execute_Immediate Plus,0x1
052f 00d8 | | Load_Top At_Offset_0
0530 00e3 | | Load_Encached Natural_Cache
0531 0260 | ` | Execute Discrete,In_Type
0532 7001 |p | Jump_Nonzero 0x534
0533 0801 | | Execute_Immediate Raise,0x1
0534 8219 | | Call 0x1,0x19
0535 00db | | Load_Top At_Offset_3
0536 e213 | | Load 0x1,0x13
0537 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0538 0092 0895 | | Action Push_String_Extended,0x895 ; "Scale"
053a e5fd | | Load 0x2,-0x3
053b 0a01 | | Execute_Immediate Plus,0x1
053c 00d8 | | Load_Top At_Offset_0
053d 00e3 | | Load_Encached Natural_Cache
053e 0260 | ` | Execute Discrete,In_Type
053f 7001 |p | Jump_Nonzero 0x541
0540 0801 | | Execute_Immediate Raise,0x1
0541 8219 | | Call 0x1,0x19
0542 00db | | Load_Top At_Offset_3
0543 e213 | | Load 0x1,0x13
0544 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0545 e005 | | Load 0x0,0x5
0546 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0547 0092 088c | | Action Push_String_Extended,0x88c ; "Lo Bound"
0549 e5fd | | Load 0x2,-0x3
054a 0a01 | | Execute_Immediate Plus,0x1
054b 00d8 | | Load_Top At_Offset_0
054c 00e3 | | Load_Encached Natural_Cache
054d 0260 | ` | Execute Discrete,In_Type
054e 7001 |p | Jump_Nonzero 0x550
054f 0801 | | Execute_Immediate Raise,0x1
0550 821c | | Call 0x1,0x1c
0551 00db | | Load_Top At_Offset_3
0552 e213 | | Load 0x1,0x13
0553 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0554 e005 | | Load 0x0,0x5
0555 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0556 0092 088d | | Action Push_String_Extended,0x88d ; "Hi Bound"
0558 e5fd | | Load 0x2,-0x3
0559 0a01 | | Execute_Immediate Plus,0x1
055a 00d8 | | Load_Top At_Offset_0
055b 00e3 | | Load_Encached Natural_Cache
055c 0260 | ` | Execute Discrete,In_Type
055d 7001 |p | Jump_Nonzero 0x55f
055e 0801 | | Execute_Immediate Raise,0x1
055f 821c | | Call 0x1,0x1c
0560 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0561 0000 0000 | | .BLANK 0000[0x7]
0568 ; --------------------------------------------------------------------------------------
0568 ; SUBPROGRAM
0568 ; --------------------------------------------------------------------------------------
0568 056b | k | .CONST 0x056b ; Address of begin
0569 0004 | | .CONST 0x0004 ; Address of exception handler
056a 0001 | | .CONST 0x0001 ; Number of locals
056b BODY_0568:
056b INIT_0568:
056b 00db | | Load_Top At_Offset_3
056c e214 | | Load 0x1,0x14
056d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
056e 6801 |h | Jump_Zero 0x570
056f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0570 00da | | Load_Top At_Offset_2
0571 e5fd | | Load 0x2,-0x3
0572 8217 | | Call 0x1,0x17
0573 00db | | Load_Top At_Offset_3
0574 e214 | | Load 0x1,0x14
0575 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0576 0092 088a | | Action Push_String_Extended,0x88a ; "Name"
0578 e5fd | | Load 0x2,-0x3
0579 0a01 | | Execute_Immediate Plus,0x1
057a 00d8 | | Load_Top At_Offset_0
057b 00e3 | | Load_Encached Natural_Cache
057c 0260 | ` | Execute Discrete,In_Type
057d 7001 |p | Jump_Nonzero 0x57f
057e 0801 | | Execute_Immediate Raise,0x1
057f 821a | | Call 0x1,0x1a
0580 00db | | Load_Top At_Offset_3
0581 e214 | | Load 0x1,0x14
0582 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0583 0092 0896 | | Action Push_String_Extended,0x896 ; "Is Name"
0585 e5fd | | Load 0x2,-0x3
0586 0a01 | | Execute_Immediate Plus,0x1
0587 00d8 | | Load_Top At_Offset_0
0588 00e3 | | Load_Encached Natural_Cache
0589 0260 | ` | Execute Discrete,In_Type
058a 7001 |p | Jump_Nonzero 0x58c
058b 0801 | | Execute_Immediate Raise,0x1
058c 8218 | | Call 0x1,0x18
058d 00db | | Load_Top At_Offset_3
058e e214 | | Load 0x1,0x14
058f 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0590 0f01 | | Execute_Immediate Equal,0x1
0591 700e |p | Jump_Nonzero 0x5a0
0592 e5fd | | Load 0x2,-0x3
0593 0a01 | | Execute_Immediate Plus,0x1
0594 00d8 | | Load_Top At_Offset_0
0595 00e3 | | Load_Encached Natural_Cache
0596 0260 | ` | Execute Discrete,In_Type
0597 7001 |p | Jump_Nonzero 0x599
0598 0801 | | Execute_Immediate Raise,0x1
0599 e5fe | | Load 0x2,-0x2
059a e214 | | Load 0x1,0x14
059b 181f | | Execute Package,Field_Execute,Field_Number 0x1f
059c 0092 0897 | | Action Push_String_Extended,0x897 ; "Valid Expressions"
059e 8225 | % | Call 0x1,0x25
059f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
05a0 e5fd | | Load 0x2,-0x3
05a1 0a01 | | Execute_Immediate Plus,0x1
05a2 00d8 | | Load_Top At_Offset_0
05a3 00e3 | | Load_Encached Natural_Cache
05a4 0260 | ` | Execute Discrete,In_Type
05a5 7001 |p | Jump_Nonzero 0x5a7
05a6 0801 | | Execute_Immediate Raise,0x1
05a7 e5fe | | Load 0x2,-0x2
05a8 e214 | | Load 0x1,0x14
05a9 181b | | Execute Package,Field_Execute,Field_Number 0x1b
05aa 0092 0898 | | Action Push_String_Extended,0x898 ; "Valid Objects"
05ac 8226 | & | Call 0x1,0x26
05ad e5fd | | Load 0x2,-0x3
05ae 0a01 | | Execute_Immediate Plus,0x1
05af 00d8 | | Load_Top At_Offset_0
05b0 00e3 | | Load_Encached Natural_Cache
05b1 0260 | ` | Execute Discrete,In_Type
05b2 7001 |p | Jump_Nonzero 0x5b4
05b3 0801 | | Execute_Immediate Raise,0x1
05b4 e5fe | | Load 0x2,-0x2
05b5 e214 | | Load 0x1,0x14
05b6 181c | | Execute Package,Field_Execute,Field_Number 0x1c
05b7 0092 0899 | | Action Push_String_Extended,0x899 ; "Valid Miscellaneous Names"
05b9 8227 | ' | Call 0x1,0x27
05ba e5fd | | Load 0x2,-0x3
05bb 0a01 | | Execute_Immediate Plus,0x1
05bc 00d8 | | Load_Top At_Offset_0
05bd 00e3 | | Load_Encached Natural_Cache
05be 0260 | ` | Execute Discrete,In_Type
05bf 7001 |p | Jump_Nonzero 0x5c1
05c0 0801 | | Execute_Immediate Raise,0x1
05c1 e5fe | | Load 0x2,-0x2
05c2 e214 | | Load 0x1,0x14
05c3 181d | | Execute Package,Field_Execute,Field_Number 0x1d
05c4 0092 089a | | Action Push_String_Extended,0x89a ; "Valid Types"
05c6 8222 | " | Call 0x1,0x22
05c7 e5fd | | Load 0x2,-0x3
05c8 0a01 | | Execute_Immediate Plus,0x1
05c9 00d8 | | Load_Top At_Offset_0
05ca 00e3 | | Load_Encached Natural_Cache
05cb 0260 | ` | Execute Discrete,In_Type
05cc 7001 |p | Jump_Nonzero 0x5ce
05cd 0801 | | Execute_Immediate Raise,0x1
05ce e5fe | | Load 0x2,-0x2
05cf e214 | | Load 0x1,0x14
05d0 181e | | Execute Package,Field_Execute,Field_Number 0x1e
05d1 0092 089b | | Action Push_String_Extended,0x89b ; "Valid Special Identifiers"
05d3 821f | | Call 0x1,0x1f
05d4 4504 |E | Exit_Suprogram New_Top_Offset 0x4
05d5 0000 0000 | | .XXX[0x3]
05d7 0000 | |
05d8 ; --------------------------------------------------------------------------------------
05d8 ; SUBPROGRAM
05d8 ; --------------------------------------------------------------------------------------
05d8 05db | | .CONST 0x05db ; Address of begin
05d9 0004 | | .CONST 0x0004 ; Address of exception handler
05da 0001 | | .CONST 0x0001 ; Number of locals
05db BODY_05d8:
05db INIT_05d8:
05db 00db | | Load_Top At_Offset_3
05dc 01db | | Execute Vector,Length
05dd 7001 |p | Jump_Nonzero 0x5df
05de 4504 |E | Exit_Suprogram New_Top_Offset 0x4
05df 00da | | Load_Top At_Offset_2
05e0 e5fd | | Load 0x2,-0x3
05e1 8217 | | Call 0x1,0x17
05e2 00cf | | Action Mark_Auxiliary
05e3 e5fe | | Load 0x2,-0x2
05e4 01d9 | | Execute Vector,Reverse_Bounds
05e5 0263 | c | Execute Discrete,Above_Bound
05e6 7010 |p | Jump_Nonzero 0x5f7
05e7 e5fd | | Load 0x2,-0x3
05e8 0a01 | | Execute_Immediate Plus,0x1
05e9 00d8 | | Load_Top At_Offset_0
05ea 00e3 | | Load_Encached Natural_Cache
05eb 0260 | ` | Execute Discrete,In_Type
05ec 7001 |p | Jump_Nonzero 0x5ee
05ed 0801 | | Execute_Immediate Raise,0x1
05ee 00d9 | | Load_Top At_Offset_1
05ef e5fe | | Load 0x2,-0x2
05f0 01d7 | | Execute Vector,Field_Read
05f1 00da | | Load_Top At_Offset_2
05f2 00e0 | | Load_Encached Standard_Cache
05f3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
05f4 822d | - | Call 0x1,0x2d
05f5 00c8 | | Action Pop_Auxiliary_Range
05f6 3ff0 |? | Loop_Increasing 0x5e7
05f7 4504 |E | Exit_Suprogram New_Top_Offset 0x4
05f8 ; --------------------------------------------------------------------------------------
05f8 ; SUBPROGRAM
05f8 ; --------------------------------------------------------------------------------------
05f8 05fb | | .CONST 0x05fb ; Address of begin
05f9 0004 | | .CONST 0x0004 ; Address of exception handler
05fa 0001 | | .CONST 0x0001 ; Number of locals
05fb BODY_05f8:
05fb INIT_05f8:
05fb 00db | | Load_Top At_Offset_3
05fc e214 | | Load 0x1,0x14
05fd 1b10 | | Execute Package,Field_Read,Field_Number 0x10
05fe 01df | | Execute Vector,Equal
05ff 6801 |h | Jump_Zero 0x601
0600 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0601 00da | | Load_Top At_Offset_2
0602 e5fd | | Load 0x2,-0x3
0603 8217 | | Call 0x1,0x17
0604 00cf | | Action Mark_Auxiliary
0605 e5fe | | Load 0x2,-0x2
0606 01d9 | | Execute Vector,Reverse_Bounds
0607 0007 | | Action Break_Optional
0608 00d8 | | Load_Top At_Offset_0
0609 e5fe | | Load 0x2,-0x2
060a 01d7 | | Execute Vector,Field_Read
060b 00d9 | | Load_Top At_Offset_1
060c e214 | | Load 0x1,0x14
060d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
060e 011c | | Execute Any,Convert_Unchecked
060f 1c01 | | Execute_Immediate Run_Utility,0x1
0610 e5fd | | Load 0x2,-0x3
0611 0a01 | | Execute_Immediate Plus,0x1
0612 00d8 | | Load_Top At_Offset_0
0613 00e3 | | Load_Encached Natural_Cache
0614 0260 | ` | Execute Discrete,In_Type
0615 7001 |p | Jump_Nonzero 0x617
0616 0801 | | Execute_Immediate Raise,0x1
0617 8218 | | Call 0x1,0x18
0618 00c8 | | Action Pop_Auxiliary_Range
0619 3fee |? | Loop_Increasing 0x608
061a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
061b 0000 0000 | | .BLANK 0000[0x5]
0620 ; --------------------------------------------------------------------------------------
0620 ; SUBPROGRAM
0620 ; --------------------------------------------------------------------------------------
0620 0623 | # | .CONST 0x0623 ; Address of begin
0621 0004 | | .CONST 0x0004 ; Address of exception handler
0622 0001 | | .CONST 0x0001 ; Number of locals
0623 BODY_0620:
0623 INIT_0620:
0623 00da | | Load_Top At_Offset_2
0624 e5fd | | Load 0x2,-0x3
0625 8217 | | Call 0x1,0x17
0626 00cf | | Action Mark_Auxiliary
0627 e5fe | | Load 0x2,-0x2
0628 01d9 | | Execute Vector,Reverse_Bounds
0629 0007 | | Action Break_Optional
062a 00d8 | | Load_Top At_Offset_0
062b e5fe | | Load 0x2,-0x2
062c 01d7 | | Execute Vector,Field_Read
062d 00d9 | | Load_Top At_Offset_1
062e e214 | | Load 0x1,0x14
062f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0630 011c | | Execute Any,Convert_Unchecked
0631 1c01 | | Execute_Immediate Run_Utility,0x1
0632 e5fd | | Load 0x2,-0x3
0633 0a01 | | Execute_Immediate Plus,0x1
0634 00d8 | | Load_Top At_Offset_0
0635 00e3 | | Load_Encached Natural_Cache
0636 0260 | ` | Execute Discrete,In_Type
0637 7001 |p | Jump_Nonzero 0x639
0638 0801 | | Execute_Immediate Raise,0x1
0639 8218 | | Call 0x1,0x18
063a 00c8 | | Action Pop_Auxiliary_Range
063b 3fee |? | Loop_Increasing 0x62a
063c 4504 |E | Exit_Suprogram New_Top_Offset 0x4
063d 0000 0000 | | .XXX[0x3]
063f 0000 | |
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 0643 | C | .CONST 0x0643 ; Address of begin
0641 0004 | | .CONST 0x0004 ; Address of exception handler
0642 0001 | | .CONST 0x0001 ; Number of locals
0643 BODY_0640:
0643 INIT_0640:
0643 00db | | Load_Top At_Offset_3
0644 e214 | | Load 0x1,0x14
0645 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0646 6801 |h | Jump_Zero 0x648
0647 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0648 00da | | Load_Top At_Offset_2
0649 e5fd | | Load 0x2,-0x3
064a 8217 | | Call 0x1,0x17
064b 00db | | Load_Top At_Offset_3
064c e214 | | Load 0x1,0x14
064d 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
064e 0092 088a | | Action Push_String_Extended,0x88a ; "Name"
0650 e5fd | | Load 0x2,-0x3
0651 0a01 | | Execute_Immediate Plus,0x1
0652 00d8 | | Load_Top At_Offset_0
0653 00e3 | | Load_Encached Natural_Cache
0654 0260 | ` | Execute Discrete,In_Type
0655 7001 |p | Jump_Nonzero 0x657
0656 0801 | | Execute_Immediate Raise,0x1
0657 821a | | Call 0x1,0x1a
0658 e5fd | | Load 0x2,-0x3
0659 0a01 | | Execute_Immediate Plus,0x1
065a 00d8 | | Load_Top At_Offset_0
065b 00e3 | | Load_Encached Natural_Cache
065c 0260 | ` | Execute Discrete,In_Type
065d 7001 |p | Jump_Nonzero 0x65f
065e 0801 | | Execute_Immediate Raise,0x1
065f e5fe | | Load 0x2,-0x2
0660 e214 | | Load 0x1,0x14
0661 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0662 0092 089c | | Action Push_String_Extended,0x89c ; "Valid Locations"
0664 8230 | 0 | Call 0x1,0x30
0665 e5fd | | Load 0x2,-0x3
0666 0a01 | | Execute_Immediate Plus,0x1
0667 00d8 | | Load_Top At_Offset_0
0668 00e3 | | Load_Encached Natural_Cache
0669 0260 | ` | Execute Discrete,In_Type
066a 7001 |p | Jump_Nonzero 0x66c
066b 0801 | | Execute_Immediate Raise,0x1
066c e5fe | | Load 0x2,-0x2
066d e214 | | Load 0x1,0x14
066e 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
066f 0092 089d | | Action Push_String_Extended,0x89d ; "Arguments"
0671 822e | . | Call 0x1,0x2e
0672 00db | | Load_Top At_Offset_3
0673 e214 | | Load 0x1,0x14
0674 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0675 0092 089e | | Action Push_String_Extended,0x89e ; "Last Required Argument"
0677 e5fd | | Load 0x2,-0x3
0678 0a01 | | Execute_Immediate Plus,0x1
0679 00d8 | | Load_Top At_Offset_0
067a 00e3 | | Load_Encached Natural_Cache
067b 0260 | ` | Execute Discrete,In_Type
067c 7001 |p | Jump_Nonzero 0x67e
067d 0801 | | Execute_Immediate Raise,0x1
067e 8219 | | Call 0x1,0x19
067f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0680 ; --------------------------------------------------------------------------------------
0680 ; SUBPROGRAM
0680 ; --------------------------------------------------------------------------------------
0680 0683 | | .CONST 0x0683 ; Address of begin
0681 0004 | | .CONST 0x0004 ; Address of exception handler
0682 0001 | | .CONST 0x0001 ; Number of locals
0683 BODY_0680:
0683 INIT_0680:
0683 00db | | Load_Top At_Offset_3
0684 01db | | Execute Vector,Length
0685 7001 |p | Jump_Nonzero 0x687
0686 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0687 00da | | Load_Top At_Offset_2
0688 e5fd | | Load 0x2,-0x3
0689 8217 | | Call 0x1,0x17
068a 00cf | | Action Mark_Auxiliary
068b e5fe | | Load 0x2,-0x2
068c 01d9 | | Execute Vector,Reverse_Bounds
068d 0263 | c | Execute Discrete,Above_Bound
068e 7010 |p | Jump_Nonzero 0x69f
068f e5fd | | Load 0x2,-0x3
0690 0a01 | | Execute_Immediate Plus,0x1
0691 00d8 | | Load_Top At_Offset_0
0692 00e3 | | Load_Encached Natural_Cache
0693 0260 | ` | Execute Discrete,In_Type
0694 7001 |p | Jump_Nonzero 0x696
0695 0801 | | Execute_Immediate Raise,0x1
0696 00d9 | | Load_Top At_Offset_1
0697 e5fe | | Load 0x2,-0x2
0698 01d7 | | Execute Vector,Field_Read
0699 00da | | Load_Top At_Offset_2
069a 00e0 | | Load_Encached Standard_Cache
069b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
069c 8231 | 1 | Call 0x1,0x31
069d 00c8 | | Action Pop_Auxiliary_Range
069e 3ff0 |? | Loop_Increasing 0x68f
069f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
06a0 ; --------------------------------------------------------------------------------------
06a0 ; SUBPROGRAM
06a0 ; --------------------------------------------------------------------------------------
06a0 06a3 | | .CONST 0x06a3 ; Address of begin
06a1 0004 | | .CONST 0x0004 ; Address of exception handler
06a2 0001 | | .CONST 0x0001 ; Number of locals
06a3 BODY_06a0:
06a3 INIT_06a0:
06a3 00db | | Load_Top At_Offset_3
06a4 e215 | | Load 0x1,0x15
06a5 180f | | Execute Package,Field_Execute,Field_Number 0xf
06a6 6801 |h | Jump_Zero 0x6a8
06a7 4504 |E | Exit_Suprogram New_Top_Offset 0x4
06a8 00da | | Load_Top At_Offset_2
06a9 e5fd | | Load 0x2,-0x3
06aa 8217 | | Call 0x1,0x17
06ab e5fd | | Load 0x2,-0x3
06ac 0a01 | | Execute_Immediate Plus,0x1
06ad 00d8 | | Load_Top At_Offset_0
06ae 00e3 | | Load_Encached Natural_Cache
06af 0260 | ` | Execute Discrete,In_Type
06b0 7001 |p | Jump_Nonzero 0x6b2
06b1 0801 | | Execute_Immediate Raise,0x1
06b2 e5fe | | Load 0x2,-0x2
06b3 e215 | | Load 0x1,0x15
06b4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
06b5 0092 089f | | Action Push_String_Extended,0x89f ; "Valid Valued Objects"
06b7 8226 | & | Call 0x1,0x26
06b8 e5fd | | Load 0x2,-0x3
06b9 0a01 | | Execute_Immediate Plus,0x1
06ba 00d8 | | Load_Top At_Offset_0
06bb 00e3 | | Load_Encached Natural_Cache
06bc 0260 | ` | Execute Discrete,In_Type
06bd 7001 |p | Jump_Nonzero 0x6bf
06be 0801 | | Execute_Immediate Raise,0x1
06bf e5fe | | Load 0x2,-0x2
06c0 e215 | | Load 0x1,0x15
06c1 1812 | | Execute Package,Field_Execute,Field_Number 0x12
06c2 0092 08a0 | | Action Push_String_Extended,0x8a0 ; "Valid Miscellaneous Objects"
06c4 8227 | ' | Call 0x1,0x27
06c5 e5fd | | Load 0x2,-0x3
06c6 0a01 | | Execute_Immediate Plus,0x1
06c7 00d8 | | Load_Top At_Offset_0
06c8 00e3 | | Load_Encached Natural_Cache
06c9 0260 | ` | Execute Discrete,In_Type
06ca 7001 |p | Jump_Nonzero 0x6cc
06cb 0801 | | Execute_Immediate Raise,0x1
06cc e5fe | | Load 0x2,-0x2
06cd e215 | | Load 0x1,0x15
06ce 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06cf 0092 08a1 | | Action Push_String_Extended,0x8a1 ; "Valid Type Objects"
06d1 8222 | " | Call 0x1,0x22
06d2 4504 |E | Exit_Suprogram New_Top_Offset 0x4
06d3 0000 0000 | | .BLANK 0000[0x5]
06d8 ; --------------------------------------------------------------------------------------
06d8 ; SUBPROGRAM
06d8 ; --------------------------------------------------------------------------------------
06d8 06de | | .CONST 0x06de ; Address of begin
06d9 0004 | | .CONST 0x0004 ; Address of exception handler
06da 0003 | | .CONST 0x0003 ; Number of locals
06db INIT_06d8:
06db e215 | | Load 0x1,0x15
06dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06dd 00e1 | | Load_Encached Boolean_Cache
06de BODY_06d8:
06de e5fe | | Load 0x2,-0x2
06df e215 | | Load 0x1,0x15
06e0 1815 | | Execute Package,Field_Execute,Field_Number 0x15
06e1 6801 |h | Jump_Zero 0x6e3
06e2 4504 |E | Exit_Suprogram New_Top_Offset 0x4
06e3 e5ff | | Load 0x2,-0x1
06e4 e5fd | | Load 0x2,-0x3
06e5 8217 | | Call 0x1,0x17
06e6 e5fe | | Load 0x2,-0x2
06e7 e215 | | Load 0x1,0x15
06e8 181b | | Execute Package,Field_Execute,Field_Number 0x1b
06e9 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
06ea 00d9 | | Load_Top At_Offset_1
06eb e215 | | Load 0x1,0x15
06ec 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06ed 011c | | Execute Any,Convert_Unchecked
06ee 1c01 | | Execute_Immediate Run_Utility,0x1
06ef 0092 08a2 | | Action Push_String_Extended,0x8a2 ; "Kind"
06f1 e5fd | | Load 0x2,-0x3
06f2 0a01 | | Execute_Immediate Plus,0x1
06f3 00d8 | | Load_Top At_Offset_0
06f4 00e3 | | Load_Encached Natural_Cache
06f5 0260 | ` | Execute Discrete,In_Type
06f6 7001 |p | Jump_Nonzero 0x6f8
06f7 0801 | | Execute_Immediate Raise,0x1
06f8 821a | | Call 0x1,0x1a
06f9 e5fe | | Load 0x2,-0x2
06fa e215 | | Load 0x1,0x15
06fb 181c | | Execute Package,Field_Execute,Field_Number 0x1c
06fc 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
06fd 00d8 | | Load_Top At_Offset_0
06fe 00e1 | | Load_Encached Boolean_Cache
06ff 011c | | Execute Any,Convert_Unchecked
0700 1c01 | | Execute_Immediate Run_Utility,0x1
0701 0092 08a3 | | Action Push_String_Extended,0x8a3 ; "Is Prefix Type"
0703 e5fd | | Load 0x2,-0x3
0704 0a01 | | Execute_Immediate Plus,0x1
0705 00d8 | | Load_Top At_Offset_0
0706 00e3 | | Load_Encached Natural_Cache
0707 0260 | ` | Execute Discrete,In_Type
0708 7001 |p | Jump_Nonzero 0x70a
0709 0801 | | Execute_Immediate Raise,0x1
070a 821a | | Call 0x1,0x1a
070b 00d9 | | Load_Top At_Offset_1
070c 0f01 | | Execute_Immediate Equal,0x1
070d 7011 |p | Jump_Nonzero 0x71f
070e 7800 |x | Jump 0x70f
070f 00d8 | | Load_Top At_Offset_0
0710 0f01 | | Execute_Immediate Equal,0x1
0711 700d |p | Jump_Nonzero 0x71f
0712 e5fe | | Load 0x2,-0x2
0713 e215 | | Load 0x1,0x15
0714 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0715 0092 088a | | Action Push_String_Extended,0x88a ; "Name"
0717 e5fd | | Load 0x2,-0x3
0718 0a01 | | Execute_Immediate Plus,0x1
0719 00d8 | | Load_Top At_Offset_0
071a 00e3 | | Load_Encached Natural_Cache
071b 0260 | ` | Execute Discrete,In_Type
071c 7001 |p | Jump_Nonzero 0x71e
071d 0801 | | Execute_Immediate Raise,0x1
071e 821a | | Call 0x1,0x1a
071f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0720 ; --------------------------------------------------------------------------------------
0720 ; SUBPROGRAM
0720 ; --------------------------------------------------------------------------------------
0720 0724 | $ | .CONST 0x0724 ; Address of begin
0721 0004 | | .CONST 0x0004 ; Address of exception handler
0722 0002 | | .CONST 0x0002 ; Number of locals
0723 INIT_0720:
0723 00e1 | | Load_Encached Boolean_Cache
0724 BODY_0720:
0724 e5fe | | Load 0x2,-0x2
0725 e215 | | Load 0x1,0x15
0726 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0727 6801 |h | Jump_Zero 0x729
0728 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0729 00db | | Load_Top At_Offset_3
072a e5fd | | Load 0x2,-0x3
072b 8217 | | Call 0x1,0x17
072c e5fe | | Load 0x2,-0x2
072d e215 | | Load 0x1,0x15
072e 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
072f 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0730 00d8 | | Load_Top At_Offset_0
0731 00e1 | | Load_Encached Boolean_Cache
0732 011c | | Execute Any,Convert_Unchecked
0733 1c01 | | Execute_Immediate Run_Utility,0x1
0734 0092 08a3 | | Action Push_String_Extended,0x8a3 ; "Is Prefix Type"
0736 e5fd | | Load 0x2,-0x3
0737 0a01 | | Execute_Immediate Plus,0x1
0738 00d8 | | Load_Top At_Offset_0
0739 00e3 | | Load_Encached Natural_Cache
073a 0260 | ` | Execute Discrete,In_Type
073b 7001 |p | Jump_Nonzero 0x73d
073c 0801 | | Execute_Immediate Raise,0x1
073d 821a | | Call 0x1,0x1a
073e 00d8 | | Load_Top At_Offset_0
073f 700d |p | Jump_Nonzero 0x74d
0740 e5fd | | Load 0x2,-0x3
0741 0a01 | | Execute_Immediate Plus,0x1
0742 00d8 | | Load_Top At_Offset_0
0743 00e3 | | Load_Encached Natural_Cache
0744 0260 | ` | Execute Discrete,In_Type
0745 7001 |p | Jump_Nonzero 0x747
0746 0801 | | Execute_Immediate Raise,0x1
0747 e5fe | | Load 0x2,-0x2
0748 e215 | | Load 0x1,0x15
0749 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
074a 0092 08a4 | | Action Push_String_Extended,0x8a4 ; "Function Parameter"
074c 8225 | % | Call 0x1,0x25
074d 4504 |E | Exit_Suprogram New_Top_Offset 0x4
074e 0000 0000 | | .XXX[0x2]
0750 ; --------------------------------------------------------------------------------------
0750 ; SUBPROGRAM
0750 ; --------------------------------------------------------------------------------------
0750 0753 | S | .CONST 0x0753 ; Address of begin
0751 0004 | | .CONST 0x0004 ; Address of exception handler
0752 0001 | | .CONST 0x0001 ; Number of locals
0753 BODY_0750:
0753 INIT_0750:
0753 00db | | Load_Top At_Offset_3
0754 e215 | | Load 0x1,0x15
0755 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0756 6801 |h | Jump_Zero 0x758
0757 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0758 00da | | Load_Top At_Offset_2
0759 e5fd | | Load 0x2,-0x3
075a 8217 | | Call 0x1,0x17
075b e5fd | | Load 0x2,-0x3
075c 0a01 | | Execute_Immediate Plus,0x1
075d 00d8 | | Load_Top At_Offset_0
075e 00e3 | | Load_Encached Natural_Cache
075f 0260 | ` | Execute Discrete,In_Type
0760 7001 |p | Jump_Nonzero 0x762
0761 0801 | | Execute_Immediate Raise,0x1
0762 e5fe | | Load 0x2,-0x2
0763 e215 | | Load 0x1,0x15
0764 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0765 0092 08a5 | | Action Push_String_Extended,0x8a5 ; "Prefix"
0767 8233 | 3 | Call 0x1,0x33
0768 e5fd | | Load 0x2,-0x3
0769 0a01 | | Execute_Immediate Plus,0x1
076a 00d8 | | Load_Top At_Offset_0
076b 00e3 | | Load_Encached Natural_Cache
076c 0260 | ` | Execute Discrete,In_Type
076d 7001 |p | Jump_Nonzero 0x76f
076e 0801 | | Execute_Immediate Raise,0x1
076f e5fe | | Load 0x2,-0x2
0770 e215 | | Load 0x1,0x15
0771 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0772 0092 08a6 | | Action Push_String_Extended,0x8a6 ; "Result"
0774 8234 | 4 | Call 0x1,0x34
0775 e5fd | | Load 0x2,-0x3
0776 0a01 | | Execute_Immediate Plus,0x1
0777 00d8 | | Load_Top At_Offset_0
0778 00e3 | | Load_Encached Natural_Cache
0779 0260 | ` | Execute Discrete,In_Type
077a 7001 |p | Jump_Nonzero 0x77c
077b 0801 | | Execute_Immediate Raise,0x1
077c e5fe | | Load 0x2,-0x2
077d e215 | | Load 0x1,0x15
077e 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
077f 0092 08a7 | | Action Push_String_Extended,0x8a7 ; "Designator"
0781 8235 | 5 | Call 0x1,0x35
0782 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0783 0000 0000 | | .BLANK 0000[0x5]
0788 ; --------------------------------------------------------------------------------------
0788 ; SUBPROGRAM
0788 ; --------------------------------------------------------------------------------------
0788 078b | | .CONST 0x078b ; Address of begin
0789 0004 | | .CONST 0x0004 ; Address of exception handler
078a 0001 | | .CONST 0x0001 ; Number of locals
078b BODY_0788:
078b INIT_0788:
078b 00db | | Load_Top At_Offset_3
078c e215 | | Load 0x1,0x15
078d 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
078e 01df | | Execute Vector,Equal
078f 6801 |h | Jump_Zero 0x791
0790 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0791 00da | | Load_Top At_Offset_2
0792 e5fd | | Load 0x2,-0x3
0793 8217 | | Call 0x1,0x17
0794 00cf | | Action Mark_Auxiliary
0795 e5fe | | Load 0x2,-0x2
0796 01d9 | | Execute Vector,Reverse_Bounds
0797 0263 | c | Execute Discrete,Above_Bound
0798 7010 |p | Jump_Nonzero 0x7a9
0799 e5fd | | Load 0x2,-0x3
079a 0a01 | | Execute_Immediate Plus,0x1
079b 00d8 | | Load_Top At_Offset_0
079c 00e3 | | Load_Encached Natural_Cache
079d 0260 | ` | Execute Discrete,In_Type
079e 7001 |p | Jump_Nonzero 0x7a0
079f 0801 | | Execute_Immediate Raise,0x1
07a0 00d9 | | Load_Top At_Offset_1
07a1 e5fe | | Load 0x2,-0x2
07a2 01d7 | | Execute Vector,Field_Read
07a3 00da | | Load_Top At_Offset_2
07a4 00e0 | | Load_Encached Standard_Cache
07a5 1818 | | Execute Package,Field_Execute,Field_Number 0x18
07a6 8236 | 6 | Call 0x1,0x36
07a7 00c8 | | Action Pop_Auxiliary_Range
07a8 3ff0 |? | Loop_Increasing 0x799
07a9 4504 |E | Exit_Suprogram New_Top_Offset 0x4
07aa 0000 0000 | | .BLANK 0000[0x6]
07b0 ; --------------------------------------------------------------------------------------
07b0 ; SUBPROGRAM
07b0 ; --------------------------------------------------------------------------------------
07b0 07b3 | | .CONST 0x07b3 ; Address of begin
07b1 0004 | | .CONST 0x0004 ; Address of exception handler
07b2 0001 | | .CONST 0x0001 ; Number of locals
07b3 BODY_07b0:
07b3 INIT_07b0:
07b3 00db | | Load_Top At_Offset_3
07b4 e216 | | Load 0x1,0x16
07b5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07b6 6801 |h | Jump_Zero 0x7b8
07b7 4504 |E | Exit_Suprogram New_Top_Offset 0x4
07b8 00da | | Load_Top At_Offset_2
07b9 e5fd | | Load 0x2,-0x3
07ba 8217 | | Call 0x1,0x17
07bb e5fd | | Load 0x2,-0x3
07bc 0a01 | | Execute_Immediate Plus,0x1
07bd 00d8 | | Load_Top At_Offset_0
07be 00e3 | | Load_Encached Natural_Cache
07bf 0260 | ` | Execute Discrete,In_Type
07c0 7001 |p | Jump_Nonzero 0x7c2
07c1 0801 | | Execute_Immediate Raise,0x1
07c2 e5fe | | Load 0x2,-0x2
07c3 e216 | | Load 0x1,0x16
07c4 1815 | | Execute Package,Field_Execute,Field_Number 0x15
07c5 0092 08a8 | | Action Push_String_Extended,0x8a8 ; "Address Clause Data"
07c7 8226 | & | Call 0x1,0x26
07c8 e5fd | | Load 0x2,-0x3
07c9 0a01 | | Execute_Immediate Plus,0x1
07ca 00d8 | | Load_Top At_Offset_0
07cb 00e3 | | Load_Encached Natural_Cache
07cc 0260 | ` | Execute Discrete,In_Type
07cd 7001 |p | Jump_Nonzero 0x7cf
07ce 0801 | | Execute_Immediate Raise,0x1
07cf e5fe | | Load 0x2,-0x2
07d0 e216 | | Load 0x1,0x16
07d1 1816 | | Execute Package,Field_Execute,Field_Number 0x16
07d2 0092 08a0 | | Action Push_String_Extended,0x8a0 ; "Valid Miscellaneous Objects"
07d4 8227 | ' | Call 0x1,0x27
07d5 4504 |E | Exit_Suprogram New_Top_Offset 0x4
07d6 0000 0000 | | .XXX[0x2]
07d8 ; --------------------------------------------------------------------------------------
07d8 ; SUBPROGRAM
07d8 ; --------------------------------------------------------------------------------------
07d8 07db | | .CONST 0x07db ; Address of begin
07d9 0004 | | .CONST 0x0004 ; Address of exception handler
07da 0001 | | .CONST 0x0001 ; Number of locals
07db BODY_07d8:
07db INIT_07d8:
07db 00db | | Load_Top At_Offset_3
07dc e216 | | Load 0x1,0x16
07dd 1819 | | Execute Package,Field_Execute,Field_Number 0x19
07de 6801 |h | Jump_Zero 0x7e0
07df 4504 |E | Exit_Suprogram New_Top_Offset 0x4
07e0 00da | | Load_Top At_Offset_2
07e1 e5fd | | Load 0x2,-0x3
07e2 8217 | | Call 0x1,0x17
07e3 00db | | Load_Top At_Offset_3
07e4 e216 | | Load 0x1,0x16
07e5 181b | | Execute Package,Field_Execute,Field_Number 0x1b
07e6 0092 08a9 | | Action Push_String_Extended,0x8a9 ; "Allowed For Tasks"
07e8 e5fd | | Load 0x2,-0x3
07e9 0a01 | | Execute_Immediate Plus,0x1
07ea 00d8 | | Load_Top At_Offset_0
07eb 00e3 | | Load_Encached Natural_Cache
07ec 0260 | ` | Execute Discrete,In_Type
07ed 7001 |p | Jump_Nonzero 0x7ef
07ee 0801 | | Execute_Immediate Raise,0x1
07ef 8218 | | Call 0x1,0x18
07f0 00db | | Load_Top At_Offset_3
07f1 e216 | | Load 0x1,0x16
07f2 181c | | Execute Package,Field_Execute,Field_Number 0x1c
07f3 0092 08aa | | Action Push_String_Extended,0x8aa ; "Allowed For Access Types"
07f5 e5fd | | Load 0x2,-0x3
07f6 0a01 | | Execute_Immediate Plus,0x1
07f7 00d8 | | Load_Top At_Offset_0
07f8 00e3 | | Load_Encached Natural_Cache
07f9 0260 | ` | Execute Discrete,In_Type
07fa 7001 |p | Jump_Nonzero 0x7fc
07fb 0801 | | Execute_Immediate Raise,0x1
07fc 8218 | | Call 0x1,0x18
07fd 00db | | Load_Top At_Offset_3
07fe e216 | | Load 0x1,0x16
07ff 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0800 0092 08ab | | Action Push_String_Extended,0x8ab ; "Allowed With Size Specs"
0802 e5fd | | Load 0x2,-0x3
0803 0a01 | | Execute_Immediate Plus,0x1
0804 00d8 | | Load_Top At_Offset_0
0805 00e3 | | Load_Encached Natural_Cache
0806 0260 | ` | Execute Discrete,In_Type
0807 7001 |p | Jump_Nonzero 0x809
0808 0801 | | Execute_Immediate Raise,0x1
0809 8218 | | Call 0x1,0x18
080a 00db | | Load_Top At_Offset_3
080b e216 | | Load 0x1,0x16
080c 181e | | Execute Package,Field_Execute,Field_Number 0x1e
080d e005 | | Load 0x0,0x5
080e 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
080f 0092 08ac | | Action Push_String_Extended,0x8ac ; "Task Upper Bound"
0811 e5fd | | Load 0x2,-0x3
0812 0a01 | | Execute_Immediate Plus,0x1
0813 00d8 | | Load_Top At_Offset_0
0814 00e3 | | Load_Encached Natural_Cache
0815 0260 | ` | Execute Discrete,In_Type
0816 7001 |p | Jump_Nonzero 0x818
0817 0801 | | Execute_Immediate Raise,0x1
0818 821a | | Call 0x1,0x1a
0819 00db | | Load_Top At_Offset_3
081a e216 | | Load 0x1,0x16
081b 181f | | Execute Package,Field_Execute,Field_Number 0x1f
081c e005 | | Load 0x0,0x5
081d 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
081e 0092 08ad | | Action Push_String_Extended,0x8ad ; "Access Upper Bound"
0820 e5fd | | Load 0x2,-0x3
0821 0a01 | | Execute_Immediate Plus,0x1
0822 00d8 | | Load_Top At_Offset_0
0823 00e3 | | Load_Encached Natural_Cache
0824 0260 | ` | Execute Discrete,In_Type
0825 7001 |p | Jump_Nonzero 0x827
0826 0801 | | Execute_Immediate Raise,0x1
0827 821a | | Call 0x1,0x1a
0828 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0829 0000 0000 | | .BLANK 0000[0x7]
0830 ; --------------------------------------------------------------------------------------
0830 ; SUBPROGRAM
0830 ; --------------------------------------------------------------------------------------
0830 0847 | G | .CONST 0x0847 ; Address of begin
0831 0004 | | .CONST 0x0004 ; Address of exception handler
0832 0010 | | .CONST 0x0010 ; Number of locals
0833 INIT_0830:
0833 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible
0834 029a 0853 | S| Declare_Subprogram INIT_0850,For_Outer_Call,Visible,Unelaborated
0836 029a 0873 | s| Declare_Subprogram INIT_0870,For_Outer_Call,Visible,Unelaborated
0838 00e4 | | Load_Encached Positive_Cache
0839 0266 | f | Execute Discrete,Bounds
083a e20d | | Load 0x1,0xd
083b 02a0 | | Declare_Subprogram Null_Subprogram
083c 4801 |H | Short_Literal 0x1
083d 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
083e 00e9 | | Load_Encached String_Cache
083f 02a0 | | Declare_Subprogram Null_Subprogram
0840 e20d | | Load 0x1,0xd
0841 03a3 | | Complete_Type Heap_Access,By_Defining
0842 00bf | | Action Accept_Activation
0843 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0844 00c7 | | Action Elaborate_Subprogram
0845 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0846 00c7 | | Action Elaborate_Subprogram
0847 BODY_0830:
0847 00bc | | Action Signal_Activated
0848 00bb | | Action Signal_Completion
0849 0000 0000 | | .BLANK 0000[0x7]
0850 ; --------------------------------------------------------------------------------------
0850 ; SUBPROGRAM
0850 ; --------------------------------------------------------------------------------------
0850 0853 | S | .CONST 0x0853 ; Address of begin
0851 085a | Z | .CONST 0x085a ; Address of exception handler
0852 0001 | | .CONST 0x0001 ; Number of locals
0853 BODY_0850:
0853 INIT_0850:
0853 00da | | Load_Top At_Offset_2
0854 e20d | | Load 0x1,0xd
0855 e5fe | | Load 0x2,-0x2
0856 e001 | | Load 0x0,0x1
0857 180f | | Execute Package,Field_Execute,Field_Number 0xf
0858 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0859 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
085a TRAP_0850:
085a e001 | | Load 0x0,0x1
085b 1b12 | | Execute Package,Field_Read,Field_Number 0x12
085c 010f | | Execute Exception,Equal
085d 6803 |h | Jump_Zero 0x861
085e e002 | | Load 0x0,0x2
085f 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0860 0257 | W | Execute Discrete,Raise
0861 e001 | | Load 0x0,0x1
0862 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0863 010f | | Execute Exception,Equal
0864 6803 |h | Jump_Zero 0x868
0865 e002 | | Load 0x0,0x2
0866 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0867 0257 | W | Execute Discrete,Raise
0868 0100 | | Execute Exception,Raise
0869 0000 0000 | | .BLANK 0000[0x7]
0870 ; --------------------------------------------------------------------------------------
0870 ; SUBPROGRAM
0870 ; --------------------------------------------------------------------------------------
0870 0873 | s | .CONST 0x0873 ; Address of begin
0871 0004 | | .CONST 0x0004 ; Address of exception handler
0872 0001 | | .CONST 0x0001 ; Number of locals
0873 BODY_0870:
0873 INIT_0870:
0873 00da | | Load_Top At_Offset_2
0874 0217 | | Execute Heap_Access,All_Reference
0875 0335 | 5 | Declare_Variable Array,Duplicate
0876 00cd | | Action Spare6_Action
0877 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0878 ; --------------------------------------------------------------------------------------
0878 ; STRING TABLE
0878 ; --------------------------------------------------------------------------------------
0878 006e | n | .STRTAB 0x006e->0x08af ; " => "
0879 0070 | p | .STRTAB 0x0070->0x08b1 ; "Enforced Type Restrictions"
087a 0088 | | .STRTAB 0x0088->0x08be ; "Valid Structural Types"
087b 009c | | .STRTAB 0x009c->0x08c9 ; "Valid Textual Types"
087c 00ad | | .STRTAB 0x00ad->0x08d2 ; "Required Pragmas"
087d 00bb | | .STRTAB 0x00bb->0x08da ; "Prohibited Pragmas"
087e 00cb | | .STRTAB 0x00cb->0x08e3 ; "Form"
087f 00cd | | .STRTAB 0x00cd->0x08e5 ; "Real Lo"
0880 00d2 | | .STRTAB 0x00d2->0x08e9 ; "Real Hi"
0881 00d7 | | .STRTAB 0x00d7->0x08ec ; "Integer Lo"
0882 00df | | .STRTAB 0x00df->0x08f1 ; "Integer Hi"
0883 00e7 | | .STRTAB 0x00e7->0x08f6 ; "Must Be Static"
0884 00f3 | | .STRTAB 0x00f3->0x08fd ; "Range Data"
0885 00fb | | .STRTAB 0x00fb->0x0902 ; "Expression Types"
0886 0109 | | .STRTAB 0x0109->0x090a ; "Constraint"
0887 0111 | | .STRTAB 0x0111->0x090f ; "Ambiguity Allowed"
0888 0120 | | .STRTAB 0x0120->0x0918 ; "Valid Kinds"
0889 0129 | ) | .STRTAB 0x0129->0x091d ; "prohibited Pragmas"
088a 0139 | 9 | .STRTAB 0x0139->0x0926 ; "Name"
088b 013b | ; | .STRTAB 0x013b->0x0928 ; "Size"
088c 013d | = | .STRTAB 0x013d->0x092a ; "Lo Bound"
088d 0143 | C | .STRTAB 0x0143->0x092e ; "Hi Bound"
088e 0149 | I | .STRTAB 0x0149->0x0932 ; "Digits"
088f 014d | M | .STRTAB 0x014d->0x0935 ; "Machine Emax"
0890 0157 | W | .STRTAB 0x0157->0x093b ; "Machine Emin"
0891 0161 | a | .STRTAB 0x0161->0x0941 ; "Machine Radix"
0892 016c | l | .STRTAB 0x016c->0x0948 ; "Machine Mantissa"
0893 017a | z | .STRTAB 0x017a->0x0950 ; "Machine Rounds"
0894 0186 | | .STRTAB 0x0186->0x0957 ; "Machine Overflows"
0895 0195 | | .STRTAB 0x0195->0x095f ; "Scale"
0896 0198 | | .STRTAB 0x0198->0x0962 ; "Is Name"
0897 019d | | .STRTAB 0x019d->0x0965 ; "Valid Expressions"
0898 01ac | | .STRTAB 0x01ac->0x096e ; "Valid Objects"
0899 01b7 | | .STRTAB 0x01b7->0x0974 ; "Valid Miscellaneous Names"
089a 01ce | | .STRTAB 0x01ce->0x0981 ; "Valid Types"
089b 01d7 | | .STRTAB 0x01d7->0x0986 ; "Valid Special Identifiers"
089c 01ee | | .STRTAB 0x01ee->0x0993 ; "Valid Locations"
089d 01fb | | .STRTAB 0x01fb->0x099a ; "Arguments"
089e 0202 | | .STRTAB 0x0202->0x099f ; "Last Required Argument"
089f 0216 | | .STRTAB 0x0216->0x09aa ; "Valid Valued Objects"
08a0 0228 | ( | .STRTAB 0x0228->0x09b4 ; "Valid Miscellaneous Objects"
08a1 0241 | A | .STRTAB 0x0241->0x09c1 ; "Valid Type Objects"
08a2 0251 | Q | .STRTAB 0x0251->0x09ca ; "Kind"
08a3 0253 | S | .STRTAB 0x0253->0x09cc ; "Is Prefix Type"
08a4 025f | _ | .STRTAB 0x025f->0x09d3 ; "Function Parameter"
08a5 026f | o | .STRTAB 0x026f->0x09dc ; "Prefix"
08a6 0273 | s | .STRTAB 0x0273->0x09df ; "Result"
08a7 0277 | w | .STRTAB 0x0277->0x09e2 ; "Designator"
08a8 027f | | .STRTAB 0x027f->0x09e7 ; "Address Clause Data"
08a9 0290 | | .STRTAB 0x0290->0x09f1 ; "Allowed For Tasks"
08aa 029f | | .STRTAB 0x029f->0x09f9 ; "Allowed For Access Types"
08ab 02b5 | | .STRTAB 0x02b5->0x0a05 ; "Allowed With Size Specs"
08ac 02ca | | .STRTAB 0x02ca->0x0a11 ; "Task Upper Bound"
08ad 02d8 | | .STRTAB 0x02d8->0x0a19 ; "Access Upper Bound"
08ae 02e8 | | .STREND 0x02e8->0x0a22
08af 203d 3e20 | => | .STRTAB_STRINGS
0a22 0000 0000 | | .BLANK 0000[0x6]
0a28 ; --------------------------------------------------------------------------------------
0a28 ; Debug Table
0a28 ; --------------------------------------------------------------------------------------
0a28 0004 000c | | .DEBUG4 0x0004,0x000c,0x2e6c,0x0000,0x0001,0x0000
0a2e 0000 0000 | | .BLANK 0000[0x1ca]
0bf8 6314 0000 |c | .XXX[0x4]
0bfa 2054 4100 | TA |
0bfc 0000 0000 | | .BLANK 0000[0x4]