|
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_6148f2
└─⟦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 0a60 | ` | .CONST 0x0a60 ; 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 0010 | | .CONST 0x0010 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0001 | | .CONST 0x0001 ; Number of locals
000b INIT_0008:
000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 00bf | | Action Accept_Activation
000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd
000f 00c7 | | Action Elaborate_Subprogram
0010 BODY_0008:
0010 00bc | | Action Signal_Activated
0011 00bb | | Action Signal_Completion
0012 0000 0000 | | .BLANK 0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 00ba | | .CONST 0x00ba ; Address of begin
0019 00dd | | .CONST 0x00dd ; Address of exception handler
001a 0020 | | .CONST 0x0020 ; Number of locals
001b INIT_0018:
001b 00e9 | | Load_Encached String_Cache
001c 02a0 | | Declare_Subprogram Null_Subprogram
001d 4818 |H | Short_Literal 0x18
001e 03d3 | | Declare_Type Access,Defined,Accesses_Protected
001f e001 | | Load 0x0,0x1
0020 e002 | | Load 0x0,0x2
0021 480b |H | Short_Literal 0xb
0022 00db | | Load_Top At_Offset_3
0023 4801 |H | Short_Literal 0x1
0024 e003 | | Load 0x0,0x3
0025 0387 | | Declare_Variable Package
0026 00d8 | | Load_Top At_Offset_0
0027 020f | | Execute Module,Activate
0028 00d8 | | Load_Top At_Offset_0
0029 1b12 | | Execute Package,Field_Read,Field_Number 0x12
002a e004 | | Load 0x0,0x4
002b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
002c 02c7 | | Declare_Variable Any
002d 00d8 | | Load_Top At_Offset_0
002e 1c00 | | Execute_Immediate Run_Utility,0x0
002f 480f |H | Short_Literal 0xf
0030 48ff |H | Short_Literal 0xff
0031 00e3 | | Load_Encached Natural_Cache
0032 03f8 | | Declare_Type Discrete,Constrained
0033 e005 | | Load 0x0,0x5
0034 e006 | | Load 0x0,0x6
0035 00da | | Load_Top At_Offset_2
0036 480f |H | Short_Literal 0xf
0037 4810 |H | Short_Literal 0x10
0038 48ff |H | Short_Literal 0xff
0039 0092 07ef | | Action Push_String_Extended,0x7ef ; "others => Unspecified"
003b 00ea | | Load_Encached Null_String_Cache
003c 00ea | | Load_Encached Null_String_Cache
003d 4810 |H | Short_Literal 0x10
003e 48ff |H | Short_Literal 0xff
003f e007 | | Load 0x0,0x7
0040 0387 | | Declare_Variable Package
0041 00d8 | | Load_Top At_Offset_0
0042 020f | | Execute Module,Activate
0043 4800 |H | Short_Literal 0x0
0044 4814 |H | Short_Literal 0x14
0045 029f 00fb | | Declare_Subprogram INIT_00f8,For_Call
0047 03fd | | Declare_Type Discrete,Defined
0048 e008 | | Load 0x0,0x8
0049 e009 | | Load 0x0,0x9
004a 00da | | Load_Top At_Offset_2
004b 4800 |H | Short_Literal 0x0
004c 4801 |H | Short_Literal 0x1
004d 4814 |H | Short_Literal 0x14
004e 0092 07f0 | | Action Push_String_Extended,0x7f0 ; "Enable | Disable | Disconnect_On_Logoff..Detach_On_Disconnect => Boolean_Valued,Stop_Bits => Integer_Valued, others => Unspecified"
0050 00ea | | Load_Encached Null_String_Cache
0051 00ea | | Load_Encached Null_String_Cache
0052 4801 |H | Short_Literal 0x1
0053 4814 |H | Short_Literal 0x14
0054 e007 | | Load 0x0,0x7
0055 0387 | | Declare_Variable Package
0056 00d8 | | Load_Top At_Offset_0
0057 020f | | Execute Module,Activate
0058 4800 |H | Short_Literal 0x0
0059 4810 |H | Short_Literal 0x10
005a 029f 0123 | #| Declare_Subprogram INIT_0120,For_Call
005c 03fd | | Declare_Type Discrete,Defined
005d 4800 |H | Short_Literal 0x0
005e 4803 |H | Short_Literal 0x3
005f 029f 014b | K| Declare_Subprogram INIT_0148,For_Call
0061 03fd | | Declare_Type Discrete,Defined
0062 4800 |H | Short_Literal 0x0
0063 4804 |H | Short_Literal 0x4
0064 029f 0173 | s| Declare_Subprogram INIT_0170,For_Call
0066 03fd | | Declare_Type Discrete,Defined
0067 4800 |H | Short_Literal 0x0
0068 4804 |H | Short_Literal 0x4
0069 029f 019b | | Declare_Subprogram INIT_0198,For_Call
006b 03fd | | Declare_Type Discrete,Defined
006c e00a | | Load 0x0,0xa
006d e00b | | Load 0x0,0xb
006e e40a | | Load 0x2,0xa
006f 4800 |H | Short_Literal 0x0
0070 4800 |H | Short_Literal 0x0
0071 4801 |H | Short_Literal 0x1
0072 e409 | | Load 0x2,0x9
0073 1b32 | 2 | Execute Package,Field_Read,Field_Number 0x32
0074 0387 | | Declare_Variable Package
0075 00d8 | | Load_Top At_Offset_0
0076 020f | | Execute Module,Activate
0077 e00c | | Load 0x0,0xc
0078 e00d | | Load 0x0,0xd
0079 e40b | | Load 0x2,0xb
007a 4800 |H | Short_Literal 0x0
007b 4800 |H | Short_Literal 0x0
007c 4801 |H | Short_Literal 0x1
007d e409 | | Load 0x2,0x9
007e 1b32 | 2 | Execute Package,Field_Read,Field_Number 0x32
007f 0387 | | Declare_Variable Package
0080 00d8 | | Load_Top At_Offset_0
0081 020f | | Execute Module,Activate
0082 e00e | | Load 0x0,0xe
0083 e00f | | Load 0x0,0xf
0084 e40c | | Load 0x2,0xc
0085 4800 |H | Short_Literal 0x0
0086 4800 |H | Short_Literal 0x0
0087 4801 |H | Short_Literal 0x1
0088 e409 | | Load 0x2,0x9
0089 1b32 | 2 | Execute Package,Field_Read,Field_Number 0x32
008a 0387 | | Declare_Variable Package
008b 00d8 | | Load_Top At_Offset_0
008c 020f | | Execute Module,Activate
008d e010 | | Load 0x0,0x10
008e e011 | | Load 0x0,0x11
008f e40d | | Load 0x2,0xd
0090 4800 |H | Short_Literal 0x0
0091 4800 |H | Short_Literal 0x0
0092 4801 |H | Short_Literal 0x1
0093 e409 | | Load 0x2,0x9
0094 1b32 | 2 | Execute Package,Field_Read,Field_Number 0x32
0095 0387 | | Declare_Variable Package
0096 00d8 | | Load_Top At_Offset_0
0097 020f | | Execute Module,Activate
0098 029f 01c3 | | Declare_Subprogram INIT_01c0,For_Call
009a 029f 01e3 | | Declare_Subprogram INIT_01e0,For_Call
009c 029f 0203 | | Declare_Subprogram INIT_0200,For_Call
009e 029f 0223 | #| Declare_Subprogram INIT_0220,For_Call
00a0 029f 026b | k| Declare_Subprogram INIT_0268,For_Call
00a2 029f 028b | | Declare_Subprogram INIT_0288,For_Call
00a4 029f 02bb | | Declare_Subprogram INIT_02b8,For_Call
00a6 029f 02eb | | Declare_Subprogram INIT_02e8,For_Call
00a8 029f 0343 | C| Declare_Subprogram INIT_0340,For_Call
00aa 029f 0393 | | Declare_Subprogram INIT_0390,For_Call
00ac 029f 03fb | | Declare_Subprogram INIT_03f8,For_Call
00ae 029e 0443 | C| Declare_Subprogram INIT_0440,For_Call,Unelaborated
00b0 029f 0493 | | Declare_Subprogram INIT_0490,For_Call
00b2 481d |H | Short_Literal 0x1d
00b3 4802 |H | Short_Literal 0x2
00b4 0099 | | Action Reference_Dynamic
00b5 00c7 | | Action Elaborate_Subprogram
00b6 029f 056b | k| Declare_Subprogram INIT_0568,For_Call
00b8 029f 05eb | | Declare_Subprogram INIT_05e8,For_Call
00ba BODY_0018:
00ba e5fe | | Load 0x2,-0x2
00bb 7004 |p | Jump_Nonzero 0xc0
00bc 4800 |H | Short_Literal 0x0
00bd 4810 |H | Short_Literal 0x10
00be e012 | | Load 0x0,0x12
00bf 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00c0 e403 | | Load 0x2,0x3
00c1 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00c2 4864 |Hd | Short_Literal 0x64
00c3 e403 | | Load 0x2,0x3
00c4 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00c5 c404 | | Store 0x2,0x4
00c6 e405 | | Load 0x2,0x5
00c7 00ea | | Load_Encached Null_String_Cache
00c8 e5ff | | Load 0x2,-0x1
00c9 4800 |H | Short_Literal 0x0
00ca e004 | | Load 0x0,0x4
00cb 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00cc c405 | | Store 0x2,0x5
00cd 00cf | | Action Mark_Auxiliary
00ce 7804 |x | Jump 0xd3
00cf e405 | | Load 0x2,0x5
00d0 8420 | | Call 0x2,0x20
00d1 841f | | Call 0x2,0x1f
00d2 00c9 | | Action Pop_Auxiliary_Loop
00d3 e405 | | Load 0x2,0x5
00d4 e004 | | Load 0x0,0x4
00d5 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
00d6 6ff8 |o | Jump_Zero 0xcf
00d7 00ce | | Action Pop_Auxiliary
00d8 e405 | | Load 0x2,0x5
00d9 e004 | | Load 0x0,0x4
00da 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00db c405 | | Store 0x2,0x5
00dc 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00dd TRAP_0018:
00dd 00d8 | | Load_Top At_Offset_0
00de 0107 | | Execute Exception,Get_Name
00df 4920 |I | Short_Literal 0x120
00e0 492f |I/ | Short_Literal 0x12f
00e1 0262 | b | Execute Discrete,In_Range
00e2 6807 |h | Jump_Zero 0xea
00e3 e5ff | | Load 0x2,-0x1
00e4 0092 07f1 | | Action Push_String_Extended,0x7f1 ; " does not exist"
00e6 01cc | | Execute Vector,Catenate
00e7 e004 | | Load 0x0,0x4
00e8 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
00e9 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00ea 00d8 | | Load_Top At_Offset_0
00eb 0107 | | Execute Exception,Get_Name
00ec 4950 |IP | Short_Literal 0x150
00ed 495f |I_ | Short_Literal 0x15f
00ee 0262 | b | Execute Discrete,In_Range
00ef 6801 |h | Jump_Zero 0xf1
00f0 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00f1 0100 | | Execute Exception,Raise
00f2 0000 0000 | | .BLANK 0000[0x6]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00fb | | .CONST 0x00fb ; Address of begin
00f9 0004 | | .CONST 0x0004 ; Address of exception handler
00fa 0001 | | .CONST 0x0001 ; Number of locals
00fb BODY_00f8:
00fb INIT_00f8:
00fb 4607 |F | Jump_Case 0x8
00fc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
00fd 7806 |x | Jump 0x104 ; case 0x1
00fe 7809 |x | Jump 0x108 ; case 0x2
00ff 780d |x | Jump 0x10d ; case 0x3
0100 7810 |x | Jump 0x111 ; case 0x4
0101 7811 |x | Jump 0x113 ; case 0x5
0102 7812 |x | Jump 0x115 ; case 0x6
0103 7815 |x | Jump 0x119 ; case 0x7
0104 00da | | Load_Top At_Offset_2
0105 0091 07bb | | Action Push_String_Extended_Indexed,0x7bb ; "NIL"
0107 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0108 00db | | Load_Top At_Offset_3
0109 00db | | Load_Top At_Offset_3
010a 00e0 | | Load_Encached Standard_Cache
010b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
010c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
010d 00da | | Load_Top At_Offset_2
010e 00e0 | | Load_Encached Standard_Cache
010f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0110 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0111 00db | | Load_Top At_Offset_3
0112 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0113 00db | | Load_Top At_Offset_3
0114 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0115 e408 | | Load 0x2,0x8
0116 00dc | | Load_Top At_Offset_4
0117 0267 | g | Execute Discrete,Predecessor
0118 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0119 e408 | | Load 0x2,0x8
011a 00dc | | Load_Top At_Offset_4
011b 0268 | h | Execute Discrete,Successor
011c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
011d 0000 0000 | | .XXX[0x3]
011f 0000 | |
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123 | # | .CONST 0x0123 ; Address of begin
0121 0004 | | .CONST 0x0004 ; Address of exception handler
0122 0001 | | .CONST 0x0001 ; Number of locals
0123 BODY_0120:
0123 INIT_0120:
0123 4607 |F | Jump_Case 0x8
0124 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
0125 7806 |x | Jump 0x12c ; case 0x1
0126 7809 |x | Jump 0x130 ; case 0x2
0127 780d |x | Jump 0x135 ; case 0x3
0128 7810 |x | Jump 0x139 ; case 0x4
0129 7811 |x | Jump 0x13b ; case 0x5
012a 7812 |x | Jump 0x13d ; case 0x6
012b 7815 |x | Jump 0x141 ; case 0x7
012c 00da | | Load_Top At_Offset_2
012d 0091 07d0 | | Action Push_String_Extended_Indexed,0x7d0 ; "NIL"
012f 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0130 00db | | Load_Top At_Offset_3
0131 00db | | Load_Top At_Offset_3
0132 00e0 | | Load_Encached Standard_Cache
0133 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0134 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0135 00da | | Load_Top At_Offset_2
0136 00e0 | | Load_Encached Standard_Cache
0137 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0138 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0139 00db | | Load_Top At_Offset_3
013a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
013b 00db | | Load_Top At_Offset_3
013c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
013d e40a | | Load 0x2,0xa
013e 00dc | | Load_Top At_Offset_4
013f 0267 | g | Execute Discrete,Predecessor
0140 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0141 e40a | | Load 0x2,0xa
0142 00dc | | Load_Top At_Offset_4
0143 0268 | h | Execute Discrete,Successor
0144 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0145 0000 0000 | | .XXX[0x3]
0147 0000 | |
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b | K | .CONST 0x014b ; Address of begin
0149 0004 | | .CONST 0x0004 ; Address of exception handler
014a 0001 | | .CONST 0x0001 ; Number of locals
014b BODY_0148:
014b INIT_0148:
014b 4607 |F | Jump_Case 0x8
014c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
014d 7806 |x | Jump 0x154 ; case 0x1
014e 7809 |x | Jump 0x158 ; case 0x2
014f 780d |x | Jump 0x15d ; case 0x3
0150 7810 |x | Jump 0x161 ; case 0x4
0151 7811 |x | Jump 0x163 ; case 0x5
0152 7812 |x | Jump 0x165 ; case 0x6
0153 7815 |x | Jump 0x169 ; case 0x7
0154 00da | | Load_Top At_Offset_2
0155 0091 07e1 | | Action Push_String_Extended_Indexed,0x7e1 ; "NIL"
0157 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0158 00db | | Load_Top At_Offset_3
0159 00db | | Load_Top At_Offset_3
015a 00e0 | | Load_Encached Standard_Cache
015b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
015c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
015d 00da | | Load_Top At_Offset_2
015e 00e0 | | Load_Encached Standard_Cache
015f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0160 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0161 00db | | Load_Top At_Offset_3
0162 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0163 00db | | Load_Top At_Offset_3
0164 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0165 e40b | | Load 0x2,0xb
0166 00dc | | Load_Top At_Offset_4
0167 0267 | g | Execute Discrete,Predecessor
0168 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0169 e40b | | Load 0x2,0xb
016a 00dc | | Load_Top At_Offset_4
016b 0268 | h | Execute Discrete,Successor
016c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
016d 0000 0000 | | .XXX[0x3]
016f 0000 | |
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0173 | s | .CONST 0x0173 ; Address of begin
0171 0004 | | .CONST 0x0004 ; Address of exception handler
0172 0001 | | .CONST 0x0001 ; Number of locals
0173 BODY_0170:
0173 INIT_0170:
0173 4607 |F | Jump_Case 0x8
0174 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
0175 7806 |x | Jump 0x17c ; case 0x1
0176 7809 |x | Jump 0x180 ; case 0x2
0177 780d |x | Jump 0x185 ; case 0x3
0178 7810 |x | Jump 0x189 ; case 0x4
0179 7811 |x | Jump 0x18b ; case 0x5
017a 7812 |x | Jump 0x18d ; case 0x6
017b 7815 |x | Jump 0x191 ; case 0x7
017c 00da | | Load_Top At_Offset_2
017d 0091 07e5 | | Action Push_String_Extended_Indexed,0x7e5 ; "NIL"
017f 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0180 00db | | Load_Top At_Offset_3
0181 00db | | Load_Top At_Offset_3
0182 00e0 | | Load_Encached Standard_Cache
0183 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0184 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0185 00da | | Load_Top At_Offset_2
0186 00e0 | | Load_Encached Standard_Cache
0187 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0188 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0189 00db | | Load_Top At_Offset_3
018a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
018b 00db | | Load_Top At_Offset_3
018c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
018d e40c | | Load 0x2,0xc
018e 00dc | | Load_Top At_Offset_4
018f 0267 | g | Execute Discrete,Predecessor
0190 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0191 e40c | | Load 0x2,0xc
0192 00dc | | Load_Top At_Offset_4
0193 0268 | h | Execute Discrete,Successor
0194 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0195 0000 0000 | | .XXX[0x3]
0197 0000 | |
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b | | .CONST 0x019b ; Address of begin
0199 0004 | | .CONST 0x0004 ; Address of exception handler
019a 0001 | | .CONST 0x0001 ; Number of locals
019b BODY_0198:
019b INIT_0198:
019b 4607 |F | Jump_Case 0x8
019c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
019d 7806 |x | Jump 0x1a4 ; case 0x1
019e 7809 |x | Jump 0x1a8 ; case 0x2
019f 780d |x | Jump 0x1ad ; case 0x3
01a0 7810 |x | Jump 0x1b1 ; case 0x4
01a1 7811 |x | Jump 0x1b3 ; case 0x5
01a2 7812 |x | Jump 0x1b5 ; case 0x6
01a3 7815 |x | Jump 0x1b9 ; case 0x7
01a4 00da | | Load_Top At_Offset_2
01a5 0091 07ea | | Action Push_String_Extended_Indexed,0x7ea ; "NIL"
01a7 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
01a8 00db | | Load_Top At_Offset_3
01a9 00db | | Load_Top At_Offset_3
01aa 00e0 | | Load_Encached Standard_Cache
01ab 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01ac 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01ad 00da | | Load_Top At_Offset_2
01ae 00e0 | | Load_Encached Standard_Cache
01af 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01b0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
01b1 00db | | Load_Top At_Offset_3
01b2 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01b3 00db | | Load_Top At_Offset_3
01b4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01b5 e40d | | Load 0x2,0xd
01b6 00dc | | Load_Top At_Offset_4
01b7 0267 | g | Execute Discrete,Predecessor
01b8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01b9 e40d | | Load 0x2,0xd
01ba 00dc | | Load_Top At_Offset_4
01bb 0268 | h | Execute Discrete,Successor
01bc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01bd 0000 0000 | | .XXX[0x3]
01bf 0000 | |
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01d5 | | .CONST 0x01d5 ; Address of begin
01c1 0004 | | .CONST 0x0004 ; Address of exception handler
01c2 0002 | | .CONST 0x0002 ; Number of locals
01c3 INIT_01c0:
01c3 00da | | Load_Top At_Offset_2
01c4 0092 07f2 | | Action Push_String_Extended,0x7f2 ; " (Line => "
01c6 01cc | | Execute Vector,Catenate
01c7 e7fe | | Load 0x3,-0x2
01c8 00e0 | | Load_Encached Standard_Cache
01c9 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01ca 01cc | | Execute Vector,Catenate
01cb 0092 07f3 | | Action Push_String_Extended,0x7f3 ; ", To_Be => "
01cd 01cc | | Execute Vector,Catenate
01ce e7fd | | Load 0x3,-0x3
01cf 01cc | | Execute Vector,Catenate
01d0 0092 07f4 | | Action Push_String_Extended,0x7f4 ; ");"
01d2 01cc | | Execute Vector,Catenate
01d3 e013 | | Load 0x0,0x13
01d4 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
01d5 BODY_01c0:
01d5 00d8 | | Load_Top At_Offset_0
01d6 e004 | | Load 0x0,0x4
01d7 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
01d8 4504 |E | Exit_Suprogram New_Top_Offset 0x4
01d9 0000 0000 | | .BLANK 0000[0x7]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e3 | | .CONST 0x01e3 ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0001 | | .CONST 0x0001 ; Number of locals
01e3 BODY_01e0:
01e3 INIT_01e0:
01e3 0092 07f5 | | Action Push_String_Extended,0x7f5 ; "Illegal value: The "
01e5 00db | | Load_Top At_Offset_3
01e6 e013 | | Load 0x0,0x13
01e7 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
01e8 01cc | | Execute Vector,Catenate
01e9 0092 07f6 | | Action Push_String_Extended,0x7f6 ; " could not be set for port "
01eb 01cc | | Execute Vector,Catenate
01ec e7fd | | Load 0x3,-0x3
01ed 00e0 | | Load_Encached Standard_Cache
01ee 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01ef 01cc | | Execute Vector,Catenate
01f0 e004 | | Load 0x0,0x4
01f1 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
01f2 0092 07f7 | | Action Push_String_Extended,0x7f7 ; " because \x22"
01f4 e7fe | | Load 0x3,-0x2
01f5 01cc | | Execute Vector,Catenate
01f6 0092 07f8 | | Action Push_String_Extended,0x7f8 ; "\x22 is not a valid setting."
01f8 01cc | | Execute Vector,Catenate
01f9 e004 | | Load 0x0,0x4
01fa 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
01fb 4504 |E | Exit_Suprogram New_Top_Offset 0x4
01fc 0000 0000 | | .BLANK 0000[0x4]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0208 | | .CONST 0x0208 ; Address of begin
0201 0004 | | .CONST 0x0004 ; Address of exception handler
0202 0002 | | .CONST 0x0002 ; Number of locals
0203 INIT_0200:
0203 00ea | | Load_Encached Null_String_Cache
0204 4803 |H | Short_Literal 0x3
0205 e7ff | | Load 0x3,-0x1
0206 e409 | | Load 0x2,0x9
0207 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0208 BODY_0200:
0208 0092 07f9 | | Action Push_String_Extended,0x7f9 ; "\x22"
020a 00d9 | | Load_Top At_Offset_1
020b 01cc | | Execute Vector,Catenate
020c 0092 07f9 | | Action Push_String_Extended,0x7f9 ; "\x22"
020e 01cc | | Execute Vector,Catenate
020f e7fe | | Load 0x3,-0x2
0210 0092 07fa | | Action Push_String_Extended,0x7fa ; "Terminal.Set_Terminal_Type"
0212 8412 | | Call 0x2,0x12
0213 e5fe | | Load 0x2,-0x2
0214 7004 |p | Jump_Nonzero 0x219
0215 00d8 | | Load_Top At_Offset_0
0216 e7fe | | Load 0x3,-0x2
0217 e012 | | Load 0x0,0x12
0218 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0219 4503 |E | Exit_Suprogram New_Top_Offset 0x3
021a 0000 0000 | | .BLANK 0000[0x6]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 022f | / | .CONST 0x022f ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0003 | | .CONST 0x0003 ; Number of locals
0223 INIT_0220:
0223 4800 |H | Short_Literal 0x0
0224 4801 |H | Short_Literal 0x1
0225 4800 |H | Short_Literal 0x0
0226 e7ff | | Load 0x3,-0x1
0227 e40e | | Load 0x2,0xe
0228 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0229 e40a | | Load 0x2,0xa
022a 03f1 | | Declare_Variable Discrete,With_Value
022b e7fd | | Load 0x3,-0x3
022c e408 | | Load 0x2,0x8
022d 011c | | Execute Any,Convert_Unchecked
022e 1c01 | | Execute_Immediate Run_Utility,0x1
022f BODY_0220:
022f 00d9 | | Load_Top At_Offset_1
0230 6829 |h) | Jump_Zero 0x25a
0231 0092 07f9 | | Action Push_String_Extended,0x7f9 ; "\x22"
0233 00da | | Load_Top At_Offset_2
0234 e40a | | Load 0x2,0xa
0235 011c | | Execute Any,Convert_Unchecked
0236 1c01 | | Execute_Immediate Run_Utility,0x1
0237 01cc | | Execute Vector,Catenate
0238 0092 07f9 | | Action Push_String_Extended,0x7f9 ; "\x22"
023a 01cc | | Execute Vector,Catenate
023b e7fe | | Load 0x3,-0x2
023c 0092 07fb | | Action Push_String_Extended,0x7fb ; "Terminal.Set_"
023e 00db | | Load_Top At_Offset_3
023f 01cc | | Execute Vector,Catenate
0240 8412 | | Call 0x2,0x12
0241 e5fe | | Load 0x2,-0x2
0242 7016 |p | Jump_Nonzero 0x259
0243 e7fd | | Load 0x3,-0x3
0244 0b04 | | Execute_Immediate Case_Compare,0x4
0245 700b |p | Jump_Nonzero 0x251
0246 0f05 | | Execute_Immediate Equal,0x5
0247 7001 |p | Jump_Nonzero 0x249
0248 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0249 00d9 | | Load_Top At_Offset_1
024a e40a | | Load 0x2,0xa
024b 011c | | Execute Any,Convert_Unchecked
024c 1c01 | | Execute_Immediate Run_Utility,0x1
024d e7fe | | Load 0x3,-0x2
024e e012 | | Load 0x0,0x12
024f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0250 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0251 00d1 | | Pop_Control Pop_Count_1
0252 00d9 | | Load_Top At_Offset_1
0253 e40a | | Load 0x2,0xa
0254 011c | | Execute Any,Convert_Unchecked
0255 1c01 | | Execute_Immediate Run_Utility,0x1
0256 e7fe | | Load 0x3,-0x2
0257 e012 | | Load 0x0,0x12
0258 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0259 4504 |E | Exit_Suprogram New_Top_Offset 0x4
025a e7fe | | Load 0x3,-0x2
025b 00ea | | Load_Encached Null_String_Cache
025c 4800 |H | Short_Literal 0x0
025d e7ff | | Load 0x3,-0x1
025e e409 | | Load 0x2,0x9
025f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0260 00da | | Load_Top At_Offset_2
0261 8413 | | Call 0x2,0x13
0262 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0263 0000 0000 | | .BLANK 0000[0x5]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 0275 | u | .CONST 0x0275 ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 0003 | | .CONST 0x0003 ; Number of locals
026b INIT_0268:
026b 4800 |H | Short_Literal 0x0
026c 4801 |H | Short_Literal 0x1
026d 4800 |H | Short_Literal 0x0
026e e7ff | | Load 0x3,-0x1
026f e40f | | Load 0x2,0xf
0270 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0271 e40b | | Load 0x2,0xb
0272 03f1 | | Declare_Variable Discrete,With_Value
0273 029f 0623 | #| Declare_Subprogram INIT_0620,For_Call
0275 BODY_0268:
0275 00d9 | | Load_Top At_Offset_1
0276 6802 |h | Jump_Zero 0x279
0277 8603 | | Call 0x3,0x3
0278 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0279 e7fe | | Load 0x3,-0x2
027a 00ea | | Load_Encached Null_String_Cache
027b 4800 |H | Short_Literal 0x0
027c e7ff | | Load 0x3,-0x1
027d e409 | | Load 0x2,0x9
027e 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
027f 0092 07fc | | Action Push_String_Extended,0x7fc ; "Parity"
0281 8413 | | Call 0x2,0x13
0282 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0283 0000 0000 | | .BLANK 0000[0x5]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028d | | .CONST 0x028d ; Address of begin
0289 02a7 | | .CONST 0x02a7 ; Address of exception handler
028a 0002 | | .CONST 0x0002 ; Number of locals
028b INIT_0288:
028b e012 | | Load 0x0,0x12
028c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
028d BODY_0288:
028d 6026 |`& | Indirect_Literal Discrete,0x2b4,{0x00000000, 0x7fffffff}
028e 4800 |H | Short_Literal 0x0
028f e7ff | | Load 0x3,-0x1
0290 e409 | | Load 0x2,0x9
0291 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0292 00d8 | | Load_Top At_Offset_0
0293 e014 | | Load 0x0,0x14
0294 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
0295 0260 | ` | Execute Discrete,In_Type
0296 7001 |p | Jump_Nonzero 0x298
0297 0801 | | Execute_Immediate Raise,0x1
0298 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0299 00d8 | | Load_Top At_Offset_0
029a 00e0 | | Load_Encached Standard_Cache
029b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
029c e7fe | | Load 0x3,-0x2
029d 0092 07fd | | Action Push_String_Extended,0x7fd ; "Terminal.Set_Stop_Bits"
029f 8412 | | Call 0x2,0x12
02a0 e5fe | | Load 0x2,-0x2
02a1 7004 |p | Jump_Nonzero 0x2a6
02a2 00d8 | | Load_Top At_Offset_0
02a3 e7fe | | Load 0x3,-0x2
02a4 e012 | | Load 0x0,0x12
02a5 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02a6 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02a7 TRAP_0288:
02a7 0007 | | Action Break_Optional
02a8 e7fe | | Load 0x3,-0x2
02a9 00ea | | Load_Encached Null_String_Cache
02aa 4800 |H | Short_Literal 0x0
02ab e7ff | | Load 0x3,-0x1
02ac e409 | | Load 0x2,0x9
02ad 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
02ae 0092 07fe | | Action Push_String_Extended,0x7fe ; "Stop_Bits"
02b0 8413 | | Call 0x2,0x13
02b1 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02b2 0000 0000 | | .XXX[0x2]
02b4 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02c4 | | .CONST 0x02c4 ; Address of begin
02b9 0004 | | .CONST 0x0004 ; Address of exception handler
02ba 0003 | | .CONST 0x0003 ; Number of locals
02bb INIT_02b8:
02bb 4800 |H | Short_Literal 0x0
02bc 4801 |H | Short_Literal 0x1
02bd 4800 |H | Short_Literal 0x0
02be e7ff | | Load 0x3,-0x1
02bf e410 | | Load 0x2,0x10
02c0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02c1 e40c | | Load 0x2,0xc
02c2 03f1 | | Declare_Variable Discrete,With_Value
02c3 00e3 | | Load_Encached Natural_Cache
02c4 BODY_02b8:
02c4 00d9 | | Load_Top At_Offset_1
02c5 6817 |h | Jump_Zero 0x2dd
02c6 00d9 | | Load_Top At_Offset_1
02c7 0a04 | | Execute_Immediate Plus,0x4
02c8 0059 | Y | Store_Top Discrete,At_Offset_1
02c9 00d8 | | Load_Top At_Offset_0
02ca 00e0 | | Load_Encached Standard_Cache
02cb 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02cc e7fe | | Load 0x3,-0x2
02cd 0092 07ff | | Action Push_String_Extended,0x7ff ; "Terminal.Set_Character_Size"
02cf 8412 | | Call 0x2,0x12
02d0 e5fe | | Load 0x2,-0x2
02d1 700a |p | Jump_Nonzero 0x2dc
02d2 00d8 | | Load_Top At_Offset_0
02d3 00d8 | | Load_Top At_Offset_0
02d4 e014 | | Load 0x0,0x14
02d5 1b2d | - | Execute Package,Field_Read,Field_Number 0x2d
02d6 0260 | ` | Execute Discrete,In_Type
02d7 7001 |p | Jump_Nonzero 0x2d9
02d8 0801 | | Execute_Immediate Raise,0x1
02d9 e7fe | | Load 0x3,-0x2
02da e012 | | Load 0x0,0x12
02db 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02dc 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02dd e7fe | | Load 0x3,-0x2
02de 00ea | | Load_Encached Null_String_Cache
02df 4800 |H | Short_Literal 0x0
02e0 e7ff | | Load 0x3,-0x1
02e1 e409 | | Load 0x2,0x9
02e2 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
02e3 0092 0800 | | Action Push_String_Extended,0x800 ; "Bits_Per_Char"
02e5 8413 | | Call 0x2,0x13
02e6 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02e7 0000 | | .XXX[0x1]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02f7 | | .CONST 0x02f7 ; Address of begin
02e9 0004 | | .CONST 0x0004 ; Address of exception handler
02ea 0003 | | .CONST 0x0003 ; Number of locals
02eb INIT_02e8:
02eb 4800 |H | Short_Literal 0x0
02ec 4801 |H | Short_Literal 0x1
02ed 4800 |H | Short_Literal 0x0
02ee e7ff | | Load 0x3,-0x1
02ef e411 | | Load 0x2,0x11
02f0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02f1 e40d | | Load 0x2,0xd
02f2 03f1 | | Declare_Variable Discrete,With_Value
02f3 e7fd | | Load 0x3,-0x3
02f4 e408 | | Load 0x2,0x8
02f5 011c | | Execute Any,Convert_Unchecked
02f6 1c01 | | Execute_Immediate Run_Utility,0x1
02f7 BODY_02e8:
02f7 00d9 | | Load_Top At_Offset_1
02f8 6839 |h9 | Jump_Zero 0x332
02f9 0092 07f9 | | Action Push_String_Extended,0x7f9 ; "\x22"
02fb 00da | | Load_Top At_Offset_2
02fc e40d | | Load 0x2,0xd
02fd 011c | | Execute Any,Convert_Unchecked
02fe 1c01 | | Execute_Immediate Run_Utility,0x1
02ff 01cc | | Execute Vector,Catenate
0300 0092 07f9 | | Action Push_String_Extended,0x7f9 ; "\x22"
0302 01cc | | Execute Vector,Catenate
0303 e7fe | | Load 0x3,-0x2
0304 0092 07fb | | Action Push_String_Extended,0x7fb ; "Terminal.Set_"
0306 00db | | Load_Top At_Offset_3
0307 01cc | | Execute Vector,Catenate
0308 8412 | | Call 0x2,0x12
0309 e5fe | | Load 0x2,-0x2
030a 7026 |p& | Jump_Nonzero 0x331
030b e7fd | | Load 0x3,-0x3
030c 4614 |F | Jump_Case 0x15
030d 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x0
030e 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x1
030f 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x2
0310 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x3
0311 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x4
0312 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x5
0313 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x6
0314 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x7
0315 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x8
0316 780b |x | Jump 0x322 ; case 0x9
0317 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0xa
0318 7811 |x | Jump 0x32a ; case 0xb
0319 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0xc
031a 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0xd
031b 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0xe
031c 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0xf
031d 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x10
031e 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x11
031f 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x12
0320 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x13
0321 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x14
0322 00d9 | | Load_Top At_Offset_1
0323 e40d | | Load 0x2,0xd
0324 011c | | Execute Any,Convert_Unchecked
0325 1c01 | | Execute_Immediate Run_Utility,0x1
0326 e7fe | | Load 0x3,-0x2
0327 e012 | | Load 0x0,0x12
0328 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0329 4504 |E | Exit_Suprogram New_Top_Offset 0x4
032a 00d9 | | Load_Top At_Offset_1
032b e40d | | Load 0x2,0xd
032c 011c | | Execute Any,Convert_Unchecked
032d 1c01 | | Execute_Immediate Run_Utility,0x1
032e e7fe | | Load 0x3,-0x2
032f e012 | | Load 0x0,0x12
0330 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0331 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0332 e7fe | | Load 0x3,-0x2
0333 00ea | | Load_Encached Null_String_Cache
0334 4800 |H | Short_Literal 0x0
0335 e7ff | | Load 0x3,-0x1
0336 e409 | | Load 0x2,0x9
0337 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0338 00da | | Load_Top At_Offset_2
0339 8413 | | Call 0x2,0x13
033a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
033b 0000 0000 | | .BLANK 0000[0x5]
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 0354 | T | .CONST 0x0354 ; Address of begin
0341 0004 | | .CONST 0x0004 ; Address of exception handler
0342 0005 | | .CONST 0x0005 ; Number of locals
0343 INIT_0340:
0343 00ea | | Load_Encached Null_String_Cache
0344 4800 |H | Short_Literal 0x0
0345 e7ff | | Load 0x3,-0x1
0346 e409 | | Load 0x2,0x9
0347 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0348 4801 |H | Short_Literal 0x1
0349 4802 |H | Short_Literal 0x2
034a e015 | | Load 0x0,0x15
034b 1b12 | | Execute Package,Field_Read,Field_Number 0x12
034c 035b | [ | Declare_Type Array,Constrained
034d 0337 | 7 | Declare_Variable Array
034e e7fd | | Load 0x3,-0x3
034f e408 | | Load 0x2,0x8
0350 011c | | Execute Any,Convert_Unchecked
0351 1c01 | | Execute_Immediate Run_Utility,0x1
0352 029f 0643 | C| Declare_Subprogram INIT_0640,For_Call
0354 BODY_0340:
0354 8605 | | Call 0x3,0x5
0355 4801 |H | Short_Literal 0x1
0356 00db | | Load_Top At_Offset_3
0357 01d7 | | Execute Vector,Field_Read
0358 00e0 | | Load_Encached Standard_Cache
0359 1818 | | Execute Package,Field_Execute,Field_Number 0x18
035a 0092 0801 | | Action Push_String_Extended,0x801 ; ","
035c 01cc | | Execute Vector,Catenate
035d 4802 |H | Short_Literal 0x2
035e e603 | | Load 0x3,0x3
035f 01d7 | | Execute Vector,Field_Read
0360 00e0 | | Load_Encached Standard_Cache
0361 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0362 01cc | | Execute Vector,Catenate
0363 e7fe | | Load 0x3,-0x2
0364 0092 07fb | | Action Push_String_Extended,0x7fb ; "Terminal.Set_"
0366 e604 | | Load 0x3,0x4
0367 01cc | | Execute Vector,Catenate
0368 8412 | | Call 0x2,0x12
0369 e5fe | | Load 0x2,-0x2
036a 7020 |p | Jump_Nonzero 0x38b
036b e7fd | | Load 0x3,-0x3
036c 4614 |F | Jump_Case 0x15
036d 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x0
036e 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x1
036f 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x2
0370 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x3
0371 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x4
0372 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x5
0373 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x6
0374 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x7
0375 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x8
0376 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x9
0377 780a |x | Jump 0x382 ; case 0xa
0378 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0xb
0379 780d |x | Jump 0x387 ; case 0xc
037a 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0xd
037b 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0xe
037c 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0xf
037d 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x10
037e 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x11
037f 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x12
0380 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x13
0381 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x14
0382 00da | | Load_Top At_Offset_2
0383 e7fe | | Load 0x3,-0x2
0384 e012 | | Load 0x0,0x12
0385 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0386 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0387 00da | | Load_Top At_Offset_2
0388 e7fe | | Load 0x3,-0x2
0389 e012 | | Load 0x0,0x12
038a 181d | | Execute Package,Field_Execute,Field_Number 0x1d
038b 4504 |E | Exit_Suprogram New_Top_Offset 0x4
038c 0000 0000 | | .BLANK 0000[0x4]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 03b5 | | .CONST 0x03b5 ; Address of begin
0391 0004 | | .CONST 0x0004 ; Address of exception handler
0392 0003 | | .CONST 0x0003 ; Number of locals
0393 INIT_0390:
0393 4800 |H | Short_Literal 0x0
0394 4800 |H | Short_Literal 0x0
0395 e7ff | | Load 0x3,-0x1
0396 e409 | | Load 0x2,0x9
0397 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0398 00e1 | | Load_Encached Boolean_Cache
0399 03f1 | | Declare_Variable Discrete,With_Value
039a 0092 0802 | | Action Push_String_Extended,0x802 ; "Terminal.SET_"
039c e7fe | | Load 0x3,-0x2
039d e408 | | Load 0x2,0x8
039e 011c | | Execute Any,Convert_Unchecked
039f 1c01 | | Execute_Immediate Run_Utility,0x1
03a0 01cc | | Execute Vector,Catenate
03a1 0092 07f2 | | Action Push_String_Extended,0x7f2 ; " (Line => "
03a3 01cc | | Execute Vector,Catenate
03a4 e7fd | | Load 0x3,-0x3
03a5 00e0 | | Load_Encached Standard_Cache
03a6 1818 | | Execute Package,Field_Execute,Field_Number 0x18
03a7 01cc | | Execute Vector,Catenate
03a8 0092 0803 | | Action Push_String_Extended,0x803 ; ", Enable => "
03aa 01cc | | Execute Vector,Catenate
03ab 00d9 | | Load_Top At_Offset_1
03ac 00e1 | | Load_Encached Boolean_Cache
03ad 011c | | Execute Any,Convert_Unchecked
03ae 1c01 | | Execute_Immediate Run_Utility,0x1
03af 01cc | | Execute Vector,Catenate
03b0 0092 07f4 | | Action Push_String_Extended,0x7f4 ; ");"
03b2 01cc | | Execute Vector,Catenate
03b3 e013 | | Load 0x0,0x13
03b4 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
03b5 BODY_0390:
03b5 00d8 | | Load_Top At_Offset_0
03b6 e004 | | Load 0x0,0x4
03b7 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
03b8 e5fe | | Load 0x2,-0x2
03b9 7039 |p9 | Jump_Nonzero 0x3f3
03ba e7fe | | Load 0x3,-0x2
03bb 4614 |F | Jump_Case 0x15
03bc 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x0
03bd 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x1
03be 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x2
03bf 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x3
03c0 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x4
03c1 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x5
03c2 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x6
03c3 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x7
03c4 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x8
03c5 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x9
03c6 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0xa
03c7 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0xb
03c8 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0xc
03c9 7825 |x% | Jump 0x3ef ; case 0xd
03ca 7806 |x | Jump 0x3d1 ; case 0xe
03cb 780a |x | Jump 0x3d6 ; case 0xf
03cc 780e |x | Jump 0x3db ; case 0x10
03cd 7812 |x | Jump 0x3e0 ; case 0x11
03ce 7816 |x | Jump 0x3e5 ; case 0x12
03cf 781a |x | Jump 0x3ea ; case 0x13
03d0 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x14
03d1 00d9 | | Load_Top At_Offset_1
03d2 e7fd | | Load 0x3,-0x3
03d3 e012 | | Load 0x0,0x12
03d4 1820 | | Execute Package,Field_Execute,Field_Number 0x20
03d5 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03d6 00d9 | | Load_Top At_Offset_1
03d7 e7fd | | Load 0x3,-0x3
03d8 e012 | | Load 0x0,0x12
03d9 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
03da 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03db 00d9 | | Load_Top At_Offset_1
03dc e7fd | | Load 0x3,-0x3
03dd e012 | | Load 0x0,0x12
03de 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
03df 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03e0 00d9 | | Load_Top At_Offset_1
03e1 e7fd | | Load 0x3,-0x3
03e2 e012 | | Load 0x0,0x12
03e3 181f | | Execute Package,Field_Execute,Field_Number 0x1f
03e4 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03e5 00d9 | | Load_Top At_Offset_1
03e6 e7fd | | Load 0x3,-0x3
03e7 e012 | | Load 0x0,0x12
03e8 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
03e9 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03ea 00d9 | | Load_Top At_Offset_1
03eb e7fd | | Load 0x3,-0x3
03ec e012 | | Load 0x0,0x12
03ed 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
03ee 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03ef 00d9 | | Load_Top At_Offset_1
03f0 e7fd | | Load 0x3,-0x3
03f1 e012 | | Load 0x0,0x12
03f2 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
03f3 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03f4 0000 0000 | | .BLANK 0000[0x4]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 042f | / | .CONST 0x042f ; Address of begin
03f9 0004 | | .CONST 0x0004 ; Address of exception handler
03fa 0007 | | .CONST 0x0007 ; Number of locals
03fb INIT_03f8:
03fb 00da | | Load_Top At_Offset_2
03fc 01dd | | Execute Vector,First
03fd 00e3 | | Load_Encached Natural_Cache
03fe 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
03ff 4801 |H | Short_Literal 0x1
0400 e7ff | | Load 0x3,-0x1
0401 0092 0804 | | Action Push_String_Extended,0x804 ; "="
0403 e013 | | Load 0x0,0x13
0404 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0405 00e3 | | Load_Encached Natural_Cache
0406 03f1 | | Declare_Variable Discrete,With_Value
0407 e7ff | | Load 0x3,-0x1
0408 01dc | | Execute Vector,Last
0409 00e3 | | Load_Encached Natural_Cache
040a 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
040b 4801 |H | Short_Literal 0x1
040c 00da | | Load_Top At_Offset_2
040d 0a01 | | Execute_Immediate Plus,0x1
040e 00d8 | | Load_Top At_Offset_0
040f 00e2 | | Load_Encached Integer_Cache
0410 0260 | ` | Execute Discrete,In_Type
0411 7001 |p | Jump_Nonzero 0x413
0412 0801 | | Execute_Immediate Raise,0x1
0413 00da | | Load_Top At_Offset_2
0414 e7ff | | Load 0x3,-0x1
0415 01cf | | Execute Vector,Slice_Read
0416 0092 0805 | | Action Push_String_Extended,0x805 ; "("
0418 e013 | | Load 0x0,0x13
0419 181d | | Execute Package,Field_Execute,Field_Number 0x1d
041a 00e3 | | Load_Encached Natural_Cache
041b 03f1 | | Declare_Variable Discrete,With_Value
041c 4801 |H | Short_Literal 0x1
041d 00db | | Load_Top At_Offset_3
041e 0a01 | | Execute_Immediate Plus,0x1
041f 00d8 | | Load_Top At_Offset_0
0420 00e2 | | Load_Encached Integer_Cache
0421 0260 | ` | Execute Discrete,In_Type
0422 7001 |p | Jump_Nonzero 0x424
0423 0801 | | Execute_Immediate Raise,0x1
0424 00db | | Load_Top At_Offset_3
0425 e7ff | | Load 0x3,-0x1
0426 01cf | | Execute Vector,Slice_Read
0427 0092 0806 | | Action Push_String_Extended,0x806 ; ")"
0429 e013 | | Load 0x0,0x13
042a 181f | | Execute Package,Field_Execute,Field_Number 0x1f
042b 00e3 | | Load_Encached Natural_Cache
042c 03f1 | | Declare_Variable Discrete,With_Value
042d 029f 0683 | | Declare_Subprogram INIT_0680,For_Call
042f BODY_03f8:
042f e603 | | Load 0x3,0x3
0430 0c01 | | Execute_Immediate Greater_Equal,0x1
0431 6808 |h | Jump_Zero 0x43a
0432 00da | | Load_Top At_Offset_2
0433 0c01 | | Execute_Immediate Greater_Equal,0x1
0434 00da | | Load_Top At_Offset_2
0435 e605 | | Load 0x3,0x5
0436 027d | } | Execute Discrete,Greater
0437 0279 | y | Execute Discrete,And
0438 6801 |h | Jump_Zero 0x43a
0439 8607 | | Call 0x3,0x7
043a 4502 |E | Exit_Suprogram New_Top_Offset 0x2
043b 0000 0000 | | .BLANK 0000[0x5]
0440 ; --------------------------------------------------------------------------------------
0440 ; SUBPROGRAM
0440 ; --------------------------------------------------------------------------------------
0440 0445 | E | .CONST 0x0445 ; Address of begin
0441 0004 | | .CONST 0x0004 ; Address of exception handler
0442 0002 | | .CONST 0x0002 ; Number of locals
0443 INIT_0440:
0443 e409 | | Load 0x2,0x9
0444 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
0445 BODY_0440:
0445 e7fe | | Load 0x3,-0x2
0446 01db | | Execute Vector,Length
0447 6843 |hC | Jump_Zero 0x48b
0448 e7fe | | Load 0x3,-0x2
0449 e409 | | Load 0x2,0x9
044a 1820 | | Execute Package,Field_Execute,Field_Number 0x20
044b 0031 | 1 | Store_Top Heap_Access,At_Offset_1
044c 00d8 | | Load_Top At_Offset_0
044d e409 | | Load 0x2,0x9
044e 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
044f 682c |h, | Jump_Zero 0x47c
0450 00cf | | Action Mark_Auxiliary
0451 7824 |x$ | Jump 0x476
0452 4800 |H | Short_Literal 0x0
0453 00da | | Load_Top At_Offset_2
0454 e409 | | Load 0x2,0x9
0455 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0456 680a |h | Jump_Zero 0x461
0457 4800 |H | Short_Literal 0x0
0458 00da | | Load_Top At_Offset_2
0459 e409 | | Load 0x2,0x9
045a 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
045b 6815 |h | Jump_Zero 0x471
045c e7ff | | Load 0x3,-0x1
045d e7fe | | Load 0x3,-0x2
045e 00db | | Load_Top At_Offset_3
045f 841e | | Call 0x2,0x1e
0460 7810 |x | Jump 0x471
0461 480a |H | Short_Literal 0xa
0462 0092 0807 | | Action Push_String_Extended,0x807 ; "Illegal item in line: "
0464 e7fe | | Load 0x3,-0x2
0465 01cc | | Execute Vector,Catenate
0466 01cb | | Execute Vector,Append
0467 0092 0808 | | Action Push_String_Extended,0x808 ; " "
0469 01cc | | Execute Vector,Catenate
046a 4800 |H | Short_Literal 0x0
046b 00db | | Load_Top At_Offset_3
046c e409 | | Load 0x2,0x9
046d 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
046e 01cc | | Execute Vector,Catenate
046f e004 | | Load 0x0,0x4
0470 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0471 00d9 | | Load_Top At_Offset_1
0472 e409 | | Load 0x2,0x9
0473 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0474 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0475 00c9 | | Action Pop_Auxiliary_Loop
0476 00d9 | | Load_Top At_Offset_1
0477 e409 | | Load 0x2,0x9
0478 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0479 6fd8 |o | Jump_Zero 0x452
047a 00ce | | Action Pop_Auxiliary
047b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
047c 0092 0809 | | Action Push_String_Extended,0x809 ; "Illegal format: "
047e e7fe | | Load 0x3,-0x2
047f 01cc | | Execute Vector,Catenate
0480 e004 | | Load 0x0,0x4
0481 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0482 0092 0808 | | Action Push_String_Extended,0x808 ; " "
0484 4800 |H | Short_Literal 0x0
0485 00da | | Load_Top At_Offset_2
0486 e409 | | Load 0x2,0x9
0487 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0488 01cc | | Execute Vector,Catenate
0489 e004 | | Load 0x0,0x4
048a 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
048b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
048c 0000 0000 | | .BLANK 0000[0x4]
0490 ; --------------------------------------------------------------------------------------
0490 ; SUBPROGRAM
0490 ; --------------------------------------------------------------------------------------
0490 0496 | | .CONST 0x0496 ; Address of begin
0491 0004 | | .CONST 0x0004 ; Address of exception handler
0492 0003 | | .CONST 0x0003 ; Number of locals
0493 INIT_0490:
0493 e408 | | Load 0x2,0x8
0494 029f 06eb | | Declare_Subprogram INIT_06e8,For_Call
0496 BODY_0490:
0496 e7ff | | Load 0x3,-0x1
0497 e409 | | Load 0x2,0x9
0498 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0499 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
049a 00d9 | | Load_Top At_Offset_1
049b 4614 |F | Jump_Case 0x15
049c 7816 |x | Jump 0x4b3 ; case 0x0
049d 7826 |x& | Jump 0x4c4 ; case 0x1
049e 783f |x? | Jump 0x4de ; case 0x2
049f 7858 |xX | Jump 0x4f8 ; case 0x3
04a0 7860 |x` | Jump 0x501 ; case 0x4
04a1 7869 |xi | Jump 0x50b ; case 0x5
04a2 7872 |xr | Jump 0x515 ; case 0x6
04a3 787a |xz | Jump 0x51e ; case 0x7
04a4 7882 |x | Jump 0x527 ; case 0x8
04a5 788a |x | Jump 0x530 ; case 0x9
04a6 7893 |x | Jump 0x53a ; case 0xa
04a7 789c |x | Jump 0x544 ; case 0xb
04a8 78a5 |x | Jump 0x54e ; case 0xc
04a9 78ae |x | Jump 0x558 ; case 0xd
04aa 78ad |x | Jump 0x558 ; case 0xe
04ab 78ac |x | Jump 0x558 ; case 0xf
04ac 78ab |x | Jump 0x558 ; case 0x10
04ad 78aa |x | Jump 0x558 ; case 0x11
04ae 78a9 |x | Jump 0x558 ; case 0x12
04af 78a8 |x | Jump 0x558 ; case 0x13
04b0 7800 |x | Jump 0x4b1 ; case 0x14
04b1 8603 | | Call 0x3,0x3
04b2 4504 |E | Exit_Suprogram New_Top_Offset 0x4
04b3 480a |H | Short_Literal 0xa
04b4 0092 080a | | Action Push_String_Extended,0x80a ; "Illegal value on line: "
04b6 e7fe | | Load 0x3,-0x2
04b7 01cc | | Execute Vector,Catenate
04b8 01cb | | Execute Vector,Append
04b9 0092 080b | | Action Push_String_Extended,0x80b ; " "
04bb 01cc | | Execute Vector,Catenate
04bc 4800 |H | Short_Literal 0x0
04bd e7ff | | Load 0x3,-0x1
04be e409 | | Load 0x2,0x9
04bf 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
04c0 01cc | | Execute Vector,Catenate
04c1 e004 | | Load 0x0,0x4
04c2 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
04c3 4504 |E | Exit_Suprogram New_Top_Offset 0x4
04c4 0092 080c | | Action Push_String_Extended,0x80c ; "Operator.Enable_Terminal ("
04c6 e7fd | | Load 0x3,-0x3
04c7 00e0 | | Load_Encached Standard_Cache
04c8 1818 | | Execute Package,Field_Execute,Field_Number 0x18
04c9 01cc | | Execute Vector,Catenate
04ca 0092 07f4 | | Action Push_String_Extended,0x7f4 ; ");"
04cc 01cc | | Execute Vector,Catenate
04cd e004 | | Load 0x0,0x4
04ce 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
04cf e5fe | | Load 0x2,-0x2
04d0 7090 |p | Jump_Nonzero 0x561
04d1 0092 080d | | Action Push_String_Extended,0x80d ; "<PROFILE>"
04d3 e7fd | | Load 0x3,-0x3
04d4 e012 | | Load 0x0,0x12
04d5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04d6 00d9 | | Load_Top At_Offset_1
04d7 00d0 | | Action Swap_Control
04d8 0260 | ` | Execute Discrete,In_Type
04d9 7001 |p | Jump_Nonzero 0x4db
04da 0801 | | Execute_Immediate Raise,0x1
04db e016 | | Load 0x0,0x16
04dc 1819 | | Execute Package,Field_Execute,Field_Number 0x19
04dd 4504 |E | Exit_Suprogram New_Top_Offset 0x4
04de 0092 080e | | Action Push_String_Extended,0x80e ; "Operator.Disable_Terminal ("
04e0 e7fd | | Load 0x3,-0x3
04e1 00e0 | | Load_Encached Standard_Cache
04e2 1818 | | Execute Package,Field_Execute,Field_Number 0x18
04e3 01cc | | Execute Vector,Catenate
04e4 0092 07f4 | | Action Push_String_Extended,0x7f4 ; ");"
04e6 01cc | | Execute Vector,Catenate
04e7 e004 | | Load 0x0,0x4
04e8 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
04e9 e5fe | | Load 0x2,-0x2
04ea 7076 |pv | Jump_Nonzero 0x561
04eb 0092 080d | | Action Push_String_Extended,0x80d ; "<PROFILE>"
04ed e7fd | | Load 0x3,-0x3
04ee e012 | | Load 0x0,0x12
04ef 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04f0 00d9 | | Load_Top At_Offset_1
04f1 00d0 | | Action Swap_Control
04f2 0260 | ` | Execute Discrete,In_Type
04f3 7001 |p | Jump_Nonzero 0x4f5
04f4 0801 | | Execute_Immediate Raise,0x1
04f5 e016 | | Load 0x0,0x16
04f6 181a | | Execute Package,Field_Execute,Field_Number 0x1a
04f7 4504 |E | Exit_Suprogram New_Top_Offset 0x4
04f8 e7fd | | Load 0x3,-0x3
04f9 00d8 | | Load_Top At_Offset_0
04fa e406 | | Load 0x2,0x6
04fb 0260 | ` | Execute Discrete,In_Type
04fc 7001 |p | Jump_Nonzero 0x4fe
04fd 0801 | | Execute_Immediate Raise,0x1
04fe e7ff | | Load 0x3,-0x1
04ff 8414 | | Call 0x2,0x14
0500 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0501 00d9 | | Load_Top At_Offset_1
0502 e7fd | | Load 0x3,-0x3
0503 00d8 | | Load_Top At_Offset_0
0504 e406 | | Load 0x2,0x6
0505 0260 | ` | Execute Discrete,In_Type
0506 7001 |p | Jump_Nonzero 0x508
0507 0801 | | Execute_Immediate Raise,0x1
0508 e7ff | | Load 0x3,-0x1
0509 8415 | | Call 0x2,0x15
050a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
050b 00d9 | | Load_Top At_Offset_1
050c e7fd | | Load 0x3,-0x3
050d 00d8 | | Load_Top At_Offset_0
050e e406 | | Load 0x2,0x6
050f 0260 | ` | Execute Discrete,In_Type
0510 7001 |p | Jump_Nonzero 0x512
0511 0801 | | Execute_Immediate Raise,0x1
0512 e7ff | | Load 0x3,-0x1
0513 8415 | | Call 0x2,0x15
0514 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0515 e7fd | | Load 0x3,-0x3
0516 00d8 | | Load_Top At_Offset_0
0517 e406 | | Load 0x2,0x6
0518 0260 | ` | Execute Discrete,In_Type
0519 7001 |p | Jump_Nonzero 0x51b
051a 0801 | | Execute_Immediate Raise,0x1
051b e7ff | | Load 0x3,-0x1
051c 8416 | | Call 0x2,0x16
051d 4504 |E | Exit_Suprogram New_Top_Offset 0x4
051e e7fd | | Load 0x3,-0x3
051f 00d8 | | Load_Top At_Offset_0
0520 e406 | | Load 0x2,0x6
0521 0260 | ` | Execute Discrete,In_Type
0522 7001 |p | Jump_Nonzero 0x524
0523 0801 | | Execute_Immediate Raise,0x1
0524 e7ff | | Load 0x3,-0x1
0525 8418 | | Call 0x2,0x18
0526 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0527 e7fd | | Load 0x3,-0x3
0528 00d8 | | Load_Top At_Offset_0
0529 e406 | | Load 0x2,0x6
052a 0260 | ` | Execute Discrete,In_Type
052b 7001 |p | Jump_Nonzero 0x52d
052c 0801 | | Execute_Immediate Raise,0x1
052d e7ff | | Load 0x3,-0x1
052e 8417 | | Call 0x2,0x17
052f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0530 00d9 | | Load_Top At_Offset_1
0531 e7fd | | Load 0x3,-0x3
0532 00d8 | | Load_Top At_Offset_0
0533 e406 | | Load 0x2,0x6
0534 0260 | ` | Execute Discrete,In_Type
0535 7001 |p | Jump_Nonzero 0x537
0536 0801 | | Execute_Immediate Raise,0x1
0537 e7ff | | Load 0x3,-0x1
0538 8419 | | Call 0x2,0x19
0539 4504 |E | Exit_Suprogram New_Top_Offset 0x4
053a 00d9 | | Load_Top At_Offset_1
053b e7fd | | Load 0x3,-0x3
053c 00d8 | | Load_Top At_Offset_0
053d e406 | | Load 0x2,0x6
053e 0260 | ` | Execute Discrete,In_Type
053f 7001 |p | Jump_Nonzero 0x541
0540 0801 | | Execute_Immediate Raise,0x1
0541 e7ff | | Load 0x3,-0x1
0542 841a | | Call 0x2,0x1a
0543 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0544 00d9 | | Load_Top At_Offset_1
0545 e7fd | | Load 0x3,-0x3
0546 00d8 | | Load_Top At_Offset_0
0547 e406 | | Load 0x2,0x6
0548 0260 | ` | Execute Discrete,In_Type
0549 7001 |p | Jump_Nonzero 0x54b
054a 0801 | | Execute_Immediate Raise,0x1
054b e7ff | | Load 0x3,-0x1
054c 8419 | | Call 0x2,0x19
054d 4504 |E | Exit_Suprogram New_Top_Offset 0x4
054e 00d9 | | Load_Top At_Offset_1
054f e7fd | | Load 0x3,-0x3
0550 00d8 | | Load_Top At_Offset_0
0551 e406 | | Load 0x2,0x6
0552 0260 | ` | Execute Discrete,In_Type
0553 7001 |p | Jump_Nonzero 0x555
0554 0801 | | Execute_Immediate Raise,0x1
0555 e7ff | | Load 0x3,-0x1
0556 841a | | Call 0x2,0x1a
0557 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0558 e7fd | | Load 0x3,-0x3
0559 00d8 | | Load_Top At_Offset_0
055a e406 | | Load 0x2,0x6
055b 0260 | ` | Execute Discrete,In_Type
055c 7001 |p | Jump_Nonzero 0x55e
055d 0801 | | Execute_Immediate Raise,0x1
055e 00da | | Load_Top At_Offset_2
055f e7ff | | Load 0x3,-0x1
0560 841b | | Call 0x2,0x1b
0561 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0562 0000 0000 | | .BLANK 0000[0x6]
0568 ; --------------------------------------------------------------------------------------
0568 ; SUBPROGRAM
0568 ; --------------------------------------------------------------------------------------
0568 056f | o | .CONST 0x056f ; Address of begin
0569 0004 | | .CONST 0x0004 ; Address of exception handler
056a 0003 | | .CONST 0x0003 ; Number of locals
056b INIT_0568:
056b e406 | | Load 0x2,0x6
056c 0007 | | Action Break_Optional
056d e407 | | Load 0x2,0x7
056e 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
056f BODY_0568:
056f e7ff | | Load 0x3,-0x1
0570 01db | | Execute Vector,Length
0571 6873 |hs | Jump_Zero 0x5e5
0572 e7ff | | Load 0x3,-0x1
0573 01db | | Execute Vector,Length
0574 0c02 | | Execute_Immediate Greater_Equal,0x2
0575 6811 |h | Jump_Zero 0x587
0576 e7ff | | Load 0x3,-0x1
0577 01dd | | Execute Vector,First
0578 e7ff | | Load 0x3,-0x1
0579 01dd | | Execute Vector,First
057a 0a01 | | Execute_Immediate Plus,0x1
057b 00d8 | | Load_Top At_Offset_0
057c 00e2 | | Load_Encached Integer_Cache
057d 0260 | ` | Execute Discrete,In_Type
057e 7001 |p | Jump_Nonzero 0x580
057f 0801 | | Execute_Immediate Raise,0x1
0580 e7ff | | Load 0x3,-0x1
0581 01cf | | Execute Vector,Slice_Read
0582 0092 080f | | Action Push_String_Extended,0x80f ; "--"
0584 01df | | Execute Vector,Equal
0585 6801 |h | Jump_Zero 0x587
0586 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0587 e7ff | | Load 0x3,-0x1
0588 e407 | | Load 0x2,0x7
0589 1820 | | Execute Package,Field_Execute,Field_Number 0x20
058a 0031 | 1 | Store_Top Heap_Access,At_Offset_1
058b 00d8 | | Load_Top At_Offset_0
058c e407 | | Load 0x2,0x7
058d 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
058e 682e |h. | Jump_Zero 0x5bd
058f 00cf | | Action Mark_Auxiliary
0590 7826 |x& | Jump 0x5b7
0591 480f |H | Short_Literal 0xf
0592 00da | | Load_Top At_Offset_2
0593 e407 | | Load 0x2,0x7
0594 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0595 680c |h | Jump_Zero 0x5a2
0596 00d9 | | Load_Top At_Offset_1
0597 e407 | | Load 0x2,0x7
0598 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0599 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
059a 00ea | | Load_Encached Null_String_Cache
059b 480f |H | Short_Literal 0xf
059c 00db | | Load_Top At_Offset_3
059d e407 | | Load 0x2,0x7
059e 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
059f 00db | | Load_Top At_Offset_3
05a0 841d | | Call 0x2,0x1d
05a1 7810 |x | Jump 0x5b2
05a2 480a |H | Short_Literal 0xa
05a3 0092 0807 | | Action Push_String_Extended,0x807 ; "Illegal item in line: "
05a5 e7ff | | Load 0x3,-0x1
05a6 01cc | | Execute Vector,Catenate
05a7 01cb | | Execute Vector,Append
05a8 0092 0808 | | Action Push_String_Extended,0x808 ; " "
05aa 01cc | | Execute Vector,Catenate
05ab 480f |H | Short_Literal 0xf
05ac 00db | | Load_Top At_Offset_3
05ad e407 | | Load 0x2,0x7
05ae 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
05af 01cc | | Execute Vector,Catenate
05b0 e004 | | Load 0x0,0x4
05b1 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
05b2 00d9 | | Load_Top At_Offset_1
05b3 e407 | | Load 0x2,0x7
05b4 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
05b5 0032 | 2 | Store_Top Heap_Access,At_Offset_2
05b6 00c9 | | Action Pop_Auxiliary_Loop
05b7 00d9 | | Load_Top At_Offset_1
05b8 e407 | | Load 0x2,0x7
05b9 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
05ba 6fd6 |o | Jump_Zero 0x591
05bb 00ce | | Action Pop_Auxiliary
05bc 4502 |E | Exit_Suprogram New_Top_Offset 0x2
05bd 4800 |H | Short_Literal 0x0
05be e7ff | | Load 0x3,-0x1
05bf 0092 0804 | | Action Push_String_Extended,0x804 ; "="
05c1 e013 | | Load 0x0,0x13
05c2 181d | | Execute Package,Field_Execute,Field_Number 0x1d
05c3 0c01 | | Execute_Immediate Greater_Equal,0x1
05c4 6811 |h | Jump_Zero 0x5d6
05c5 4800 |H | Short_Literal 0x0
05c6 e7ff | | Load 0x3,-0x1
05c7 0092 0804 | | Action Push_String_Extended,0x804 ; "="
05c9 e013 | | Load 0x0,0x13
05ca 181d | | Execute Package,Field_Execute,Field_Number 0x1d
05cb 4800 |H | Short_Literal 0x0
05cc e7ff | | Load 0x3,-0x1
05cd 0092 0810 | | Action Push_String_Extended,0x810 ; "=>"
05cf e013 | | Load 0x0,0x13
05d0 181d | | Execute Package,Field_Execute,Field_Number 0x1d
05d1 027e | ~ | Execute Discrete,Not_Equal
05d2 6803 |h | Jump_Zero 0x5d6
05d3 e7ff | | Load 0x3,-0x1
05d4 841c | | Call 0x2,0x1c
05d5 4502 |E | Exit_Suprogram New_Top_Offset 0x2
05d6 0092 0809 | | Action Push_String_Extended,0x809 ; "Illegal format: "
05d8 e7ff | | Load 0x3,-0x1
05d9 01cc | | Execute Vector,Catenate
05da e004 | | Load 0x0,0x4
05db 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
05dc 0092 0808 | | Action Push_String_Extended,0x808 ; " "
05de 480f |H | Short_Literal 0xf
05df 00da | | Load_Top At_Offset_2
05e0 e407 | | Load 0x2,0x7
05e1 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
05e2 01cc | | Execute Vector,Catenate
05e3 e004 | | Load 0x0,0x4
05e4 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
05e5 4502 |E | Exit_Suprogram New_Top_Offset 0x2
05e6 0000 0000 | | .XXX[0x2]
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 05fa | | .CONST 0x05fa ; Address of begin
05e9 0606 | | .CONST 0x0606 ; Address of exception handler
05ea 0007 | | .CONST 0x0007 ; Number of locals
05eb INIT_05e8:
05eb 4801 |H | Short_Literal 0x1
05ec 4be8 |K | Short_Literal 0x3e8
05ed 00e9 | | Load_Encached String_Cache
05ee 035b | [ | Declare_Type Array,Constrained
05ef 0337 | 7 | Declare_Variable Array
05f0 00e3 | | Load_Encached Natural_Cache
05f1 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
05f2 00e3 | | Load_Encached Natural_Cache
05f3 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
05f4 00e3 | | Load_Encached Natural_Cache
05f5 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
05f6 029f 0713 | | Declare_Subprogram INIT_0710,For_Call
05f8 029f 0733 | 3| Declare_Subprogram INIT_0730,For_Call
05fa BODY_05e8:
05fa 00cf | | Action Mark_Auxiliary
05fb 8607 | | Call 0x3,0x7
05fc 00c9 | | Action Pop_Auxiliary_Loop
05fd 7ffd | | Jump 0x5fb
05fe 00ce | | Action Pop_Auxiliary
05ff 4801 |H | Short_Literal 0x1
0600 e603 | | Load 0x3,0x3
0601 e602 | | Load 0x3,0x2
0602 01cf | | Execute Vector,Slice_Read
0603 00e9 | | Load_Encached String_Cache
0604 01c6 | | Execute Vector,Convert_To_Formal
0605 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0606 TRAP_05e8:
0606 00d8 | | Load_Top At_Offset_0
0607 0107 | | Execute Exception,Get_Name
0608 4950 |IP | Short_Literal 0x150
0609 495f |I_ | Short_Literal 0x15f
060a 0262 | b | Execute Discrete,In_Range
060b 680f |h | Jump_Zero 0x61b
060c e604 | | Load 0x3,0x4
060d e605 | | Load 0x3,0x5
060e 027e | ~ | Execute Discrete,Not_Equal
060f 6809 |h | Jump_Zero 0x619
0610 0092 0811 | | Action Push_String_Extended,0x811 ; "The parentheses in the file "
0612 e5ff | | Load 0x2,-0x1
0613 01cc | | Execute Vector,Catenate
0614 0092 0812 | | Action Push_String_Extended,0x812 ; " do not match"
0616 01cc | | Execute Vector,Catenate
0617 e004 | | Load 0x0,0x4
0618 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0619 00d8 | | Load_Top At_Offset_0
061a 0101 | | Execute Exception,Reraise
061b 0100 | | Execute Exception,Raise
061c 0000 0000 | | .BLANK 0000[0x4]
0620 ; --------------------------------------------------------------------------------------
0620 ; SUBPROGRAM
0620 ; --------------------------------------------------------------------------------------
0620 062d | - | .CONST 0x062d ; Address of begin
0621 0004 | | .CONST 0x0004 ; Address of exception handler
0622 0002 | | .CONST 0x0002 ; Number of locals
0623 INIT_0620:
0623 e602 | | Load 0x3,0x2
0624 e40b | | Load 0x2,0xb
0625 011c | | Execute Any,Convert_Unchecked
0626 1c01 | | Execute_Immediate Run_Utility,0x1
0627 e014 | | Load 0x0,0x14
0628 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
0629 1c02 | | Execute_Immediate Run_Utility,0x2
062a e014 | | Load 0x0,0x14
062b 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
062c 03f1 | | Declare_Variable Discrete,With_Value
062d BODY_0620:
062d 00d8 | | Load_Top At_Offset_0
062e e014 | | Load 0x0,0x14
062f 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
0630 011c | | Execute Any,Convert_Unchecked
0631 1c01 | | Execute_Immediate Run_Utility,0x1
0632 e7fe | | Load 0x3,-0x2
0633 0092 0813 | | Action Push_String_Extended,0x813 ; "Terminal.Set_Parity"
0635 8412 | | Call 0x2,0x12
0636 e5fe | | Load 0x2,-0x2
0637 7004 |p | Jump_Nonzero 0x63c
0638 00d8 | | Load_Top At_Offset_0
0639 e7fe | | Load 0x3,-0x2
063a e012 | | Load 0x0,0x12
063b 1816 | | Execute Package,Field_Execute,Field_Number 0x16
063c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
063d 0000 0000 | | .XXX[0x3]
063f 0000 | |
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 0644 | D | .CONST 0x0644 ; Address of begin
0641 0672 | r | .CONST 0x0672 ; Address of exception handler
0642 0002 | | .CONST 0x0002 ; Number of locals
0643 INIT_0640:
0643 00e3 | | Load_Encached Natural_Cache
0644 BODY_0640:
0644 4801 |H | Short_Literal 0x1
0645 e602 | | Load 0x3,0x2
0646 0092 0801 | | Action Push_String_Extended,0x801 ; ","
0648 e013 | | Load 0x0,0x13
0649 181d | | Execute Package,Field_Execute,Field_Number 0x1d
064a 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
064b 00d8 | | Load_Top At_Offset_0
064c 0c01 | | Execute_Immediate Greater_Equal,0x1
064d 681e |h | Jump_Zero 0x66c
064e e602 | | Load 0x3,0x2
064f 01dd | | Execute Vector,First
0650 00d9 | | Load_Top At_Offset_1
0651 0aff | | Execute_Immediate Plus,-0x1
0652 e602 | | Load 0x3,0x2
0653 01cf | | Execute Vector,Slice_Read
0654 00e2 | | Load_Encached Integer_Cache
0655 00e0 | | Load_Encached Standard_Cache
0656 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0657 4801 |H | Short_Literal 0x1
0658 e603 | | Load 0x3,0x3
0659 01d6 | | Execute Vector,Field_Write
065a 00d8 | | Load_Top At_Offset_0
065b 0a01 | | Execute_Immediate Plus,0x1
065c 00d8 | | Load_Top At_Offset_0
065d 00e2 | | Load_Encached Integer_Cache
065e 0260 | ` | Execute Discrete,In_Type
065f 7001 |p | Jump_Nonzero 0x661
0660 0801 | | Execute_Immediate Raise,0x1
0661 e602 | | Load 0x3,0x2
0662 01dc | | Execute Vector,Last
0663 e602 | | Load 0x3,0x2
0664 01cf | | Execute Vector,Slice_Read
0665 00e2 | | Load_Encached Integer_Cache
0666 00e0 | | Load_Encached Standard_Cache
0667 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0668 4802 |H | Short_Literal 0x2
0669 e603 | | Load 0x3,0x3
066a 01d6 | | Execute Vector,Field_Write
066b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
066c e7fe | | Load 0x3,-0x2
066d e602 | | Load 0x3,0x2
066e e604 | | Load 0x3,0x4
066f 8413 | | Call 0x2,0x13
0670 00cc | | Action Pop_Block
0671 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0672 TRAP_0640:
0672 0007 | | Action Break_Optional
0673 e7fe | | Load 0x3,-0x2
0674 e602 | | Load 0x3,0x2
0675 e604 | | Load 0x3,0x4
0676 8413 | | Call 0x2,0x13
0677 00cc | | Action Pop_Block
0678 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0679 0000 0000 | | .BLANK 0000[0x7]
0680 ; --------------------------------------------------------------------------------------
0680 ; SUBPROGRAM
0680 ; --------------------------------------------------------------------------------------
0680 06a1 | | .CONST 0x06a1 ; Address of begin
0681 0004 | | .CONST 0x0004 ; Address of exception handler
0682 0008 | | .CONST 0x0008 ; Number of locals
0683 INIT_0680:
0683 4820 |H | Short_Literal 0x20
0684 e602 | | Load 0x3,0x2
0685 e603 | | Load 0x3,0x3
0686 0aff | | Execute_Immediate Plus,-0x1
0687 e7ff | | Load 0x3,-0x1
0688 01cf | | Execute Vector,Slice_Read
0689 e013 | | Load 0x0,0x13
068a 181c | | Execute Package,Field_Execute,Field_Number 0x1c
068b e605 | | Load 0x3,0x5
068c 0a01 | | Execute_Immediate Plus,0x1
068d 00d8 | | Load_Top At_Offset_0
068e 00e2 | | Load_Encached Integer_Cache
068f 0260 | ` | Execute Discrete,In_Type
0690 7001 |p | Jump_Nonzero 0x692
0691 0801 | | Execute_Immediate Raise,0x1
0692 e606 | | Load 0x3,0x6
0693 0aff | | Execute_Immediate Plus,-0x1
0694 e7ff | | Load 0x3,-0x1
0695 01cf | | Execute Vector,Slice_Read
0696 0335 | 5 | Declare_Variable Array,Duplicate
0697 00cd | | Action Spare6_Action
0698 e402 | | Load 0x2,0x2
0699 0007 | | Action Break_Optional
069a 00d8 | | Load_Top At_Offset_0
069b 0007 | | Action Break_Optional
069c 00e1 | | Load_Encached Boolean_Cache
069d e409 | | Load 0x2,0x9
069e 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
069f 029f 0793 | | Declare_Subprogram INIT_0790,For_Call
06a1 BODY_0680:
06a1 e803 | | Load 0x4,0x3
06a2 e409 | | Load 0x2,0x9
06a3 1820 | | Execute Package,Field_Execute,Field_Number 0x20
06a4 0032 | 2 | Store_Top Heap_Access,At_Offset_2
06a5 00d9 | | Load_Top At_Offset_1
06a6 e409 | | Load 0x2,0x9
06a7 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
06a8 7017 |p | Jump_Nonzero 0x6c0
06a9 0092 0809 | | Action Push_String_Extended,0x809 ; "Illegal format: "
06ab e803 | | Load 0x4,0x3
06ac 01cc | | Execute Vector,Catenate
06ad e004 | | Load 0x0,0x4
06ae 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
06af 0092 0808 | | Action Push_String_Extended,0x808 ; " "
06b1 4800 |H | Short_Literal 0x0
06b2 00db | | Load_Top At_Offset_3
06b3 e409 | | Load 0x2,0x9
06b4 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
06b5 01cc | | Execute Vector,Catenate
06b6 e004 | | Load 0x0,0x4
06b7 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
06b8 e802 | | Load 0x4,0x2
06b9 0092 0814 | | Action Push_String_Extended,0x814 ; " therefore cannot be defined"
06bb 01cc | | Execute Vector,Catenate
06bc e004 | | Load 0x0,0x4
06bd 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
06be 00cc | | Action Pop_Block
06bf 4502 |E | Exit_Suprogram New_Top_Offset 0x2
06c0 00e1 | | Load_Encached Boolean_Cache
06c1 e805 | | Load 0x4,0x5
06c2 e802 | | Load 0x4,0x2
06c3 e404 | | Load 0x2,0x4
06c4 e403 | | Load 0x2,0x3
06c5 1814 | | Execute Package,Field_Execute,Field_Number 0x14
06c6 c805 | | Store 0x4,0x5
06c7 005b | [ | Store_Top Discrete,At_Offset_3
06c8 00da | | Load_Top At_Offset_2
06c9 6802 |h | Jump_Zero 0x6cc
06ca 8808 | | Call 0x4,0x8
06cb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
06cc e803 | | Load 0x4,0x3
06cd 01da | | Execute Vector,Bounds
06ce e402 | | Load 0x2,0x2
06cf 03ba | | Declare_Variable Access,By_Allocation,With_Constraint
06d0 a804 | | Store_Unchecked 0x4,0x4
06d1 e803 | | Load 0x4,0x3
06d2 e804 | | Load 0x4,0x4
06d3 0228 | ( | Execute Access,All_Write
06d4 e404 | | Load 0x2,0x4
06d5 4800 |H | Short_Literal 0x0
06d6 e804 | | Load 0x4,0x4
06d7 e802 | | Load 0x4,0x2
06d8 e403 | | Load 0x2,0x3
06d9 1815 | | Execute Package,Field_Execute,Field_Number 0x15
06da c404 | | Store 0x2,0x4
06db 4800 |H | Short_Literal 0x0
06dc 00ea | | Load_Encached Null_String_Cache
06dd 4805 |H | Short_Literal 0x5
06de e802 | | Load 0x4,0x2
06df 4814 |H | Short_Literal 0x14
06e0 e409 | | Load 0x2,0x9
06e1 1819 | | Execute Package,Field_Execute,Field_Number 0x19
06e2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
06e3 0000 0000 | | .BLANK 0000[0x5]
06e8 ; --------------------------------------------------------------------------------------
06e8 ; SUBPROGRAM
06e8 ; --------------------------------------------------------------------------------------
06e8 06eb | | .CONST 0x06eb ; Address of begin
06e9 06fc | | .CONST 0x06fc ; Address of exception handler
06ea 0001 | | .CONST 0x0001 ; Number of locals
06eb BODY_06e8:
06eb INIT_06e8:
06eb 00ea | | Load_Encached Null_String_Cache
06ec 4800 |H | Short_Literal 0x0
06ed e7ff | | Load 0x3,-0x1
06ee e409 | | Load 0x2,0x9
06ef 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
06f0 e404 | | Load 0x2,0x4
06f1 e403 | | Load 0x2,0x3
06f2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06f3 0227 | ' | Execute Access,All_Reference
06f4 e7fd | | Load 0x3,-0x3
06f5 00d8 | | Load_Top At_Offset_0
06f6 e406 | | Load 0x2,0x6
06f7 0260 | ` | Execute Discrete,In_Type
06f8 7001 |p | Jump_Nonzero 0x6fa
06f9 0801 | | Execute_Immediate Raise,0x1
06fa 841d | | Call 0x2,0x1d
06fb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
06fc TRAP_06e8:
06fc e403 | | Load 0x2,0x3
06fd 1b20 | | Execute Package,Field_Read,Field_Number 0x20
06fe 010f | | Execute Exception,Equal
06ff 680b |h | Jump_Zero 0x70b
0700 0092 0815 | | Action Push_String_Extended,0x815 ; "Illegal predefined value: "
0702 00ea | | Load_Encached Null_String_Cache
0703 4800 |H | Short_Literal 0x0
0704 e7ff | | Load 0x3,-0x1
0705 e409 | | Load 0x2,0x9
0706 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0707 01cc | | Execute Vector,Catenate
0708 e004 | | Load 0x0,0x4
0709 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
070a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
070b 0100 | | Execute Exception,Raise
070c 0000 0000 | | .BLANK 0000[0x4]
0710 ; --------------------------------------------------------------------------------------
0710 ; SUBPROGRAM
0710 ; --------------------------------------------------------------------------------------
0710 0713 | | .CONST 0x0713 ; Address of begin
0711 0004 | | .CONST 0x0004 ; Address of exception handler
0712 0001 | | .CONST 0x0001 ; Number of locals
0713 BODY_0710:
0713 INIT_0710:
0713 00cf | | Action Mark_Auxiliary
0714 00db | | Load_Top At_Offset_3
0715 01dc | | Execute Vector,Last
0716 e9ff | | Load 0x4,-0x1
0717 01dd | | Execute Vector,First
0718 0263 | c | Execute Discrete,Above_Bound
0719 7012 |p | Jump_Nonzero 0x72c
071a 00d8 | | Load_Top At_Offset_0
071b e9ff | | Load 0x4,-0x1
071c 01d7 | | Execute Vector,Field_Read
071d 0f28 | ( | Execute_Immediate Equal,0x28
071e 6803 |h | Jump_Zero 0x722
071f e9fe | | Load 0x4,-0x2
0720 0a01 | | Execute_Immediate Plus,0x1
0721 c9fe | | Store 0x4,-0x2
0722 00d8 | | Load_Top At_Offset_0
0723 e9ff | | Load 0x4,-0x1
0724 01d7 | | Execute Vector,Field_Read
0725 0f29 | ) | Execute_Immediate Equal,0x29
0726 6803 |h | Jump_Zero 0x72a
0727 e9fd | | Load 0x4,-0x3
0728 0a01 | | Execute_Immediate Plus,0x1
0729 c9fd | | Store 0x4,-0x3
072a 00c8 | | Action Pop_Auxiliary_Range
072b 3fee |? | Loop_Increasing 0x71a
072c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
072d 0000 0000 | | .XXX[0x3]
072f 0000 | |
0730 ; --------------------------------------------------------------------------------------
0730 ; SUBPROGRAM
0730 ; --------------------------------------------------------------------------------------
0730 074d | M | .CONST 0x074d ; Address of begin
0731 0004 | | .CONST 0x0004 ; Address of exception handler
0732 0006 | | .CONST 0x0006 ; Number of locals
0733 INIT_0730:
0733 4820 |H | Short_Literal 0x20
0734 e7ff | | Load 0x3,-0x1
0735 e004 | | Load 0x0,0x4
0736 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0737 e013 | | Load 0x0,0x13
0738 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0739 00d8 | | Load_Top At_Offset_0
073a 01dd | | Execute Vector,First
073b 00e3 | | Load_Encached Natural_Cache
073c 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
073d 00d9 | | Load_Top At_Offset_1
073e 01dc | | Execute Vector,Last
073f 00e3 | | Load_Encached Natural_Cache
0740 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0741 00da | | Load_Top At_Offset_2
0742 01db | | Execute Vector,Length
0743 00e3 | | Load_Encached Natural_Cache
0744 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0745 4801 |H | Short_Literal 0x1
0746 e802 | | Load 0x4,0x2
0747 0092 080f | | Action Push_String_Extended,0x80f ; "--"
0749 e013 | | Load 0x0,0x13
074a 181d | | Execute Package,Field_Execute,Field_Number 0x1d
074b 00e3 | | Load_Encached Natural_Cache
074c 03f1 | | Declare_Variable Discrete,With_Value
074d BODY_0730:
074d 00d8 | | Load_Top At_Offset_0
074e 0c01 | | Execute_Immediate Greater_Equal,0x1
074f 6810 |h | Jump_Zero 0x760
0750 4820 |H | Short_Literal 0x20
0751 e803 | | Load 0x4,0x3
0752 00da | | Load_Top At_Offset_2
0753 0aff | | Execute_Immediate Plus,-0x1
0754 e802 | | Load 0x4,0x2
0755 01cf | | Execute Vector,Slice_Read
0756 e013 | | Load 0x0,0x13
0757 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0758 01dc | | Execute Vector,Last
0759 005b | [ | Store_Top Discrete,At_Offset_3
075a 00db | | Load_Top At_Offset_3
075b 00db | | Load_Top At_Offset_3
075c e802 | | Load 0x4,0x2
075d 01cf | | Execute Vector,Slice_Read
075e 01db | | Execute Vector,Length
075f 005a | Z | Store_Top Discrete,At_Offset_2
0760 00da | | Load_Top At_Offset_2
0761 e803 | | Load 0x4,0x3
0762 027d | } | Execute Discrete,Greater
0763 6828 |h( | Jump_Zero 0x78c
0764 00db | | Load_Top At_Offset_3
0765 00db | | Load_Top At_Offset_3
0766 e802 | | Load 0x4,0x2
0767 01cf | | Execute Vector,Slice_Read
0768 e603 | | Load 0x3,0x3
0769 0a01 | | Execute_Immediate Plus,0x1
076a 00d8 | | Load_Top At_Offset_0
076b 00e2 | | Load_Encached Integer_Cache
076c 0260 | ` | Execute Discrete,In_Type
076d 7001 |p | Jump_Nonzero 0x76f
076e 0801 | | Execute_Immediate Raise,0x1
076f e603 | | Load 0x3,0x3
0770 e805 | | Load 0x4,0x5
0771 0273 | s | Execute Discrete,Plus
0772 00d8 | | Load_Top At_Offset_0
0773 00e2 | | Load_Encached Integer_Cache
0774 0260 | ` | Execute Discrete,In_Type
0775 7001 |p | Jump_Nonzero 0x777
0776 0801 | | Execute_Immediate Raise,0x1
0777 e602 | | Load 0x3,0x2
0778 01ce | | Execute Vector,Slice_Write
0779 e603 | | Load 0x3,0x3
077a 00da | | Load_Top At_Offset_2
077b 0273 | s | Execute Discrete,Plus
077c c603 | | Store 0x3,0x3
077d e605 | | Load 0x3,0x5
077e e604 | | Load 0x3,0x4
077f e803 | | Load 0x4,0x3
0780 e804 | | Load 0x4,0x4
0781 e802 | | Load 0x4,0x2
0782 01cf | | Execute Vector,Slice_Read
0783 8606 | | Call 0x3,0x6
0784 c604 | | Store 0x3,0x4
0785 c605 | | Store 0x3,0x5
0786 e604 | | Load 0x3,0x4
0787 e605 | | Load 0x3,0x5
0788 027f | | Execute Discrete,Equal
0789 6802 |h | Jump_Zero 0x78c
078a 00cc | | Action Pop_Block
078b 7e72 |~r | Jump 0x5fe
078c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
078d 0000 0000 | | .XXX[0x3]
078f 0000 | |
0790 ; --------------------------------------------------------------------------------------
0790 ; SUBPROGRAM
0790 ; --------------------------------------------------------------------------------------
0790 0797 | | .CONST 0x0797 ; Address of begin
0791 0004 | | .CONST 0x0004 ; Address of exception handler
0792 0002 | | .CONST 0x0002 ; Number of locals
0793 INIT_0790:
0793 e805 | | Load 0x4,0x5
0794 0227 | ' | Execute Access,All_Reference
0795 0335 | 5 | Declare_Variable Array,Duplicate
0796 00cd | | Action Spare6_Action
0797 BODY_0790:
0797 4801 |H | Short_Literal 0x1
0798 00d9 | | Load_Top At_Offset_1
0799 01db | | Execute Vector,Length
079a e803 | | Load 0x4,0x3
079b 01db | | Execute Vector,Length
079c 0273 | s | Execute Discrete,Plus
079d 0a01 | | Execute_Immediate Plus,0x1
079e 00d8 | | Load_Top At_Offset_0
079f 00e2 | | Load_Encached Integer_Cache
07a0 0260 | ` | Execute Discrete,In_Type
07a1 7001 |p | Jump_Nonzero 0x7a3
07a2 0801 | | Execute_Immediate Raise,0x1
07a3 e402 | | Load 0x2,0x2
07a4 03ba | | Declare_Variable Access,By_Allocation,With_Constraint
07a5 a804 | | Store_Unchecked 0x4,0x4
07a6 00d8 | | Load_Top At_Offset_0
07a7 0092 0801 | | Action Push_String_Extended,0x801 ; ","
07a9 01cc | | Execute Vector,Catenate
07aa e803 | | Load 0x4,0x3
07ab 01cc | | Execute Vector,Catenate
07ac e804 | | Load 0x4,0x4
07ad 0228 | ( | Execute Access,All_Write
07ae e404 | | Load 0x2,0x4
07af e802 | | Load 0x4,0x2
07b0 e403 | | Load 0x2,0x3
07b1 1816 | | Execute Package,Field_Execute,Field_Number 0x16
07b2 c404 | | Store 0x2,0x4
07b3 e404 | | Load 0x2,0x4
07b4 4800 |H | Short_Literal 0x0
07b5 e804 | | Load 0x4,0x4
07b6 e802 | | Load 0x4,0x2
07b7 e403 | | Load 0x2,0x3
07b8 1815 | | Execute Package,Field_Execute,Field_Number 0x15
07b9 c404 | | Store 0x2,0x4
07ba 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07bb ; --------------------------------------------------------------------------------------
07bb ; STRING TABLE
07bb ; --------------------------------------------------------------------------------------
07bb 00b8 | | .STRTAB 0x00b8->0x0817 ; "NIL"
07bc 00b9 | | .STRTAB 0x00b9->0x0818 ; "ENABLE"
07bd 00bd | | .STRTAB 0x00bd->0x081b ; "DISABLE"
07be 00c2 | | .STRTAB 0x00c2->0x081f ; "TERMINAL_TYPE"
07bf 00cd | | .STRTAB 0x00cd->0x0825 ; "INPUT_RATE"
07c0 00d5 | | .STRTAB 0x00d5->0x082a ; "OUTPUT_RATE"
07c1 00de | | .STRTAB 0x00de->0x0830 ; "PARITY"
07c2 00e2 | | .STRTAB 0x00e2->0x0833 ; "BITS_PER_CHAR"
07c3 00ed | | .STRTAB 0x00ed->0x0839 ; "STOP_BITS"
07c4 00f4 | | .STRTAB 0x00f4->0x083e ; "FLOW_CONTROL"
07c5 00fe | | .STRTAB 0x00fe->0x0844 ; "XON_XOFF_BYTES"
07c6 010a | | .STRTAB 0x010a->0x084b ; "RECEIVE_FLOW_CONTROL"
07c7 011c | | .STRTAB 0x011c->0x0855 ; "RECEIVE_XON_XOFF_BYTES"
07c8 0130 | 0 | .STRTAB 0x0130->0x0860 ; "DISCONNECT_ON_LOGOFF"
07c9 0142 | B | .STRTAB 0x0142->0x086a ; "LOGOFF_ON_DISCONNECT"
07ca 0154 | T | .STRTAB 0x0154->0x0874 ; "LOG_FAILED_LOGINS"
07cb 0163 | c | .STRTAB 0x0163->0x087c ; "DISCONNECT_ON_FAILED_LOGIN"
07cc 017b | { | .STRTAB 0x017b->0x0889 ; "DISCONNECT_ON_DISCONNECT"
07cd 0191 | | .STRTAB 0x0191->0x0895 ; "LOGIN_DISABLED"
07ce 019d | | .STRTAB 0x019d->0x089c ; "DETACH_ON_DISCONNECT"
07cf 01af | | .STRTAB 0x01af->0x08a6 ; "PREDEFINED"
07d0 01b7 | | .STRTAB 0x01b7->0x08ab ; "NIL"
07d1 01b8 | | .STRTAB 0x01b8->0x08ad ; "DISABLE"
07d2 01bd | | .STRTAB 0x01bd->0x08b0 ; "BAUD_50"
07d3 01c2 | | .STRTAB 0x01c2->0x08b4 ; "BAUD_75"
07d4 01c7 | | .STRTAB 0x01c7->0x08b7 ; "BAUD_110"
07d5 01cd | | .STRTAB 0x01cd->0x08bb ; "BAUD_134_5"
07d6 01d5 | | .STRTAB 0x01d5->0x08c0 ; "BAUD_150"
07d7 01db | | .STRTAB 0x01db->0x08c4 ; "BAUD_200"
07d8 01e1 | | .STRTAB 0x01e1->0x08c8 ; "BAUD_300"
07d9 01e7 | | .STRTAB 0x01e7->0x08cc ; "BAUD_600"
07da 01ed | | .STRTAB 0x01ed->0x08d0 ; "BAUD_1200"
07db 01f4 | | .STRTAB 0x01f4->0x08d5 ; "BAUD_1800"
07dc 01fb | | .STRTAB 0x01fb->0x08d9 ; "BAUD_2400"
07dd 0202 | | .STRTAB 0x0202->0x08de ; "BAUD_4800"
07de 0209 | | .STRTAB 0x0209->0x08e2 ; "BAUD_9600"
07df 0210 | | .STRTAB 0x0210->0x08e7 ; "BAUD_19200"
07e0 0218 | | .STRTAB 0x0218->0x08ec ; "EXT_REC_CLK"
07e1 0221 | ! | .STRTAB 0x0221->0x08f1 ; "NIL"
07e2 0222 | " | .STRTAB 0x0222->0x08f3 ; "NONE"
07e3 0224 | $ | .STRTAB 0x0224->0x08f5 ; "EVEN"
07e4 0226 | & | .STRTAB 0x0226->0x08f7 ; "ODD"
07e5 0227 | ' | .STRTAB 0x0227->0x08f8 ; "NIL"
07e6 0228 | ( | .STRTAB 0x0228->0x08fa ; "CHAR_5"
07e7 022c | , | .STRTAB 0x022c->0x08fd ; "CHAR_6"
07e8 0230 | 0 | .STRTAB 0x0230->0x0900 ; "CHAR_7"
07e9 0234 | 4 | .STRTAB 0x0234->0x0903 ; "CHAR_8"
07ea 0238 | 8 | .STRTAB 0x0238->0x0906 ; "NIL"
07eb 0239 | 9 | .STRTAB 0x0239->0x0907 ; "NONE"
07ec 023b | ; | .STRTAB 0x023b->0x0909 ; "XON_XOFF"
07ed 0241 | A | .STRTAB 0x0241->0x090d ; "DTR"
07ee 0242 | B | .STRTAB 0x0242->0x090f ; "RTS"
07ef 0243 | C | .STRTAB 0x0243->0x0910 ; "others => Unspecified"
07f0 0256 | V | .STRTAB 0x0256->0x091b ; "Enable | Disable | Disconnect_On_Logoff..Detach_On_Disconnect => Boolean_Valued,Stop_Bits => Integer_Valued, others => Unspecified"
07f1 02d6 | | .STRTAB 0x02d6->0x095c ; " does not exist"
07f2 02e3 | | .STRTAB 0x02e3->0x0963 ; " (Line => "
07f3 02eb | | .STRTAB 0x02eb->0x0968 ; ", To_Be => "
07f4 02f4 | | .STRTAB 0x02f4->0x096e ; ");"
07f5 02f4 | | .STRTAB 0x02f4->0x096f ; "Illegal value: The "
07f6 0305 | | .STRTAB 0x0305->0x0978 ; " could not be set for port "
07f7 031e | | .STRTAB 0x031e->0x0986 ; " because \x22"
07f8 032a | * | .STRTAB 0x032a->0x098d ; "\x22 is not a valid setting."
07f9 0341 | A | .STRTAB 0x0341->0x0999 ; "\x22"
07fa 0340 | @ | .STRTAB 0x0340->0x099a ; "Terminal.Set_Terminal_Type"
07fb 0358 | X | .STRTAB 0x0358->0x09a7 ; "Terminal.Set_"
07fc 0363 | c | .STRTAB 0x0363->0x09ad ; "Parity"
07fd 0367 | g | .STRTAB 0x0367->0x09b0 ; "Terminal.Set_Stop_Bits"
07fe 037b | { | .STRTAB 0x037b->0x09bb ; "Stop_Bits"
07ff 0382 | | .STRTAB 0x0382->0x09c0 ; "Terminal.Set_Character_Size"
0800 039b | | .STRTAB 0x039b->0x09cd ; "Bits_Per_Char"
0801 03a6 | | .STRTAB 0x03a6->0x09d4 ; ","
0802 03a5 | | .STRTAB 0x03a5->0x09d4 ; "Terminal.SET_"
0803 03b0 | | .STRTAB 0x03b0->0x09db ; ", Enable => "
0804 03ba | | .STRTAB 0x03ba->0x09e1 ; "="
0805 03b9 | | .STRTAB 0x03b9->0x09e1 ; "("
0806 03b8 | | .STRTAB 0x03b8->0x09e2 ; ")"
0807 03b7 | | .STRTAB 0x03b7->0x09e2 ; "Illegal item in line: "
0808 03cb | | .STRTAB 0x03cb->0x09ed ; " "
0809 03ce | | .STRTAB 0x03ce->0x09f0 ; "Illegal format: "
080a 03dc | | .STRTAB 0x03dc->0x09f8 ; "Illegal value on line: "
080b 03f1 | | .STRTAB 0x03f1->0x0a03 ; " "
080c 03f3 | | .STRTAB 0x03f3->0x0a05 ; "Operator.Enable_Terminal ("
080d 040b | | .STRTAB 0x040b->0x0a12 ; "<PROFILE>"
080e 0412 | | .STRTAB 0x0412->0x0a17 ; "Operator.Disable_Terminal ("
080f 042b | + | .STRTAB 0x042b->0x0a24 ; "--"
0810 042b | + | .STRTAB 0x042b->0x0a25 ; "=>"
0811 042b | + | .STRTAB 0x042b->0x0a26 ; "The parentheses in the file "
0812 0445 | E | .STRTAB 0x0445->0x0a34 ; " do not match"
0813 0450 | P | .STRTAB 0x0450->0x0a3b ; "Terminal.Set_Parity"
0814 0461 | a | .STRTAB 0x0461->0x0a44 ; " therefore cannot be defined"
0815 047b | { | .STRTAB 0x047b->0x0a52 ; "Illegal predefined value: "
0816 0493 | | .STREND 0x0493->0x0a5f
0817 4e49 4c45 |NILE| .STRTAB_STRINGS
0a60 ; --------------------------------------------------------------------------------------
0a60 ; Debug Table
0a60 ; --------------------------------------------------------------------------------------
0a60 0004 000e | | .DEBUG4 0x0004,0x000e,0x9dcd,0x0000,0x0001,0x0000
0a66 6162 6173 |abas| .XXX[0x19a]
0a68 6520 696e |e in|
0a6a 2077 6f72 | wor|
0a6c 6c64 203a |ld :|
0a6e 204f 5645 | OVE|
0a70 5257 5249 |RWRI|
0a72 5445 5f45 |TE_E|
0a74 5252 4f52 |RROR|
0a76 4572 726f |Erro|
0a78 7220 7265 |r re|
0a7a 736f 6c76 |solv|
0a7c 696e 6720 |ing |
0a7e 6c69 6272 |libr|
0a80 6172 7920 |ary |
0a82 6e61 6d65 |name|
0a84 2020 3a20 | : |
0a86 756e 6974 |unit|
0a88 2020 6e61 | na|
0a8a 6d65 7320 |mes |
0a8c 6974 7320 |its |
0a8e 656e 636c |encl|
0a90 6f73 696e |osin|
0a92 6720 6c69 |g li|
0a94 6272 6172 |brar|
0a96 7920 756e |y un|
0a98 6974 2020 |it |
0a9a 696e 2061 |in a|
0a9c 6e20 454c |n EL|
0a9e 4142 4f52 |ABOR|
0aa0 4154 4520 |ATE |
0aa2 7072 6167 |prag|
0aa4 6d61 206e |ma n|
0aa6 616d 6573 |ames|
0aa8 2075 6e2d | un-|
0aaa 7769 7468 |with|
0aac 6564 2075 |ed u|
0aae 6e69 7420 |nit |
0ab0 6361 6e27 |can'|
0ab2 7420 6669 |t fi|
0ab4 6e64 2073 |nd s|
0ab6 7562 756e |ubun|
0ab8 6974 204c |it L|
0aba 6f61 6465 |oade|
0abc 645f 4d61 |d_Ma|
0abe 696e 2075 |in u|
0ac0 6e69 7420 |nit |
0ac2 2068 6173 | has|
0ac4 206e 6f20 | no |
0ac6 6173 736f |asso|
0ac8 6369 6174 |ciat|
0aca 6564 2063 |ed c|
0acc 6f64 6520 |ode |
0ace 6172 6368 |arch|
0ad0 6976 653b |ive;|
0ad2 2070 6572 | per|
0ad4 6861 7073 |haps|
0ad6 2074 6865 | the|
0ad8 2052 3130 | R10|
0ada 3030 5f43 |00_C|
0adc 672e 4465 |g.De|
0ade 6c74 6131 |lta1|
0ae0 5f43 6f64 |_Cod|
0ae2 655f 5669 |e_Vi|
0ae4 6577 5f43 |ew_C|
0ae6 6f6d 7061 |ompa|
0ae8 7469 6269 |tibi|
0aea 6c69 7479 |lity|
0aec 2073 7769 | swi|
0aee 7463 6820 |tch |
0af0 7761 7320 |was |
0af2 7365 7420 |set |
0af4 746f 2046 |to F|
0af6 414c 5345 |ALSE|
0af8 2077 6865 | whe|
0afa 6e20 7468 |n th|
0afc 6973 2075 |is u|
0afe 6e69 7420 |nit |
0b00 7761 7320 |was |
0b02 6c6f 6164 |load|
0b04 6564 2e44 |ed.D|
0b06 6972 6563 |irec|
0b08 746f 7279 |tory|
0b0a 2e41 6461 |.Ada|
0b0c 2e47 6574 |.Get|
0b0e 5f52 6f6f |_Roo|
0b10 7420 6661 |t fa|
0b12 696c 6564 |iled|
0b14 2066 6f72 | for|
0b16 2020 7769 | wi|
0b18 7468 2073 |th s|
0b1a 7461 7475 |tatu|
0b1c 7320 4469 |s Di|
0b1e 7265 6374 |rect|
0b20 6f72 792e |ory.|
0b22 4465 636c |Decl|
0b24 6172 6174 |arat|
0b26 696f 6e5f |ion_|
0b28 4f70 6572 |Oper|
0b2a 6174 696f |atio|
0b2c 6e73 2e47 |ns.G|
0b2e 6574 5f55 |et_U|
0b30 6e69 745f |nit_|
0b32 5374 6174 |Stat|
0b34 6520 6661 |e fa|
0b36 696c 6564 |iled|
0b38 2066 6f72 | for|
0b3a 2055 6e61 | Una|
0b3c 626c 6520 |ble |
0b3e 746f 2067 |to g|
0b40 6574 2076 |et v|
0b42 6572 7369 |ersi|
0b44 6f6e 2066 |on f|
0b46 6f72 206e |or n|
0b48 6577 6c79 |ewly|
0b4a 2069 6d70 | imp|
0b4c 6f72 7465 |orte|
0b4e 6420 6f62 |d ob|
0b50 6a65 6374 |ject|
0b52 2055 6e61 | Una|
0b54 626c 6520 |ble |
0b56 746f 206f |to o|
0b58 7065 6e20 |pen |
0b5a 6e65 776c |newl|
0b5c 7920 696d |y im|
0b5e 706f 7274 |port|
0b60 6564 206f |ed o|
0b62 626a 6563 |bjec|
0b64 7420 4e65 |t Ne|
0b66 7720 696d |w im|
0b68 706f 7274 |port|
0b6a 2075 6e69 | uni|
0b6c 7420 2069 |t i|
0b6e 7320 6e6f |s no|
0b70 7420 696e |t in|
0b72 7374 616c |stal|
0b74 6c65 642e |led.|
0b76 2069 7320 | is |
0b78 696e 636f |inco|
0b7a 6d70 6174 |mpat|
0b7c 6962 6c65 |ible|
0b7e 2077 6974 | wit|
0b80 6820 6f6c |h ol|
0b82 6420 756e |d un|
0b84 6974 2055 |it U|
0b86 6e61 626c |nabl|
0b88 6520 746f |e to|
0b8a 2072 6573 | res|
0b8c 6f6c 7665 |olve|
0b8e 206f 6c64 | old|
0b90 2069 6d70 | imp|
0b92 6f72 7420 |ort |
0b94 756e 6974 |unit|
0b96 2055 6e61 | Una|
0b98 626c 6520 |ble |
0b9a 746f 2066 |to f|
0b9c 696e 6420 |ind |
0b9e 656e 636c |encl|
0ba0 6f73 696e |osin|
0ba2 6720 776f |g wo|
0ba4 726c 6420 |rld |
0ba6 666f 7220 |for |
0ba8 696d 706f |impo|
0baa 7274 6564 |rted|
0bac 2075 6e69 | uni|
0bae 7420 556e |t Un|
0bb0 6162 6c65 |able|
0bb2 2074 6f20 | to |
0bb4 6765 7420 |get |
0bb6 636f 6e74 |cont|
0bb8 6578 7420 |ext |
0bba 666f 7220 |for |
0bbc 6e65 776c |newl|
0bbe 7920 696d |y im|
0bc0 706f 7274 |port|
0bc2 6564 2076 |ed v|
0bc4 6965 7720 |iew |
0bc6 556e 6162 |Unab|
0bc8 6c65 2074 |le t|
0bca 6f20 7265 |o re|
0bcc 736f 6c76 |solv|
0bce 6520 6e65 |e ne|
0bd0 7720 696d |w im|
0bd2 706f 7274 |port|
0bd4 2075 6e69 | uni|
0bd6 7420 4261 |t Ba|
0bd8 6420 7374 |d st|
0bda 6174 7573 |atus|
0bdc 2064 656d | dem|
0bde 6f74 696e |otin|
0be0 6720 2073 |g s|
0be2 7065 6320 |pec |
0be4 746f 2073 |to s|
0be6 6f75 7263 |ourc|
0be8 6520 746f |e to|
0bea 206d 6f64 | mod|
0bec 6966 7920 |ify |
0bee 6974 7320 |its |
0bf0 7072 6167 |prag|
0bf2 6d61 206c |ma l|
0bf4 6973 743a |ist:|
0bf6 2043 6f75 | Cou|
0bf8 6c64 206e |ld n|
0bfa 6f74 2064 |ot d|
0bfc 656d 6f74 |emot|
0bfe 6520 2073 |e s|