|
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: 3072 (0xc00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5e40f2
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦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 0558 | X | .CONST 0x0558 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 8003 | | .CONST 0x8003 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0010 | | .CONST 0x0010 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0001 | | .CONST 0x0001 ; Number of locals
000b INIT_0008:
000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 00bf | | Action Accept_Activation
000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd
000f 00c7 | | Action Elaborate_Subprogram
0010 BODY_0008:
0010 00bc | | Action Signal_Activated
0011 00bb | | Action Signal_Completion
0012 0000 0000 | | .BLANK 0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 013e | > | .CONST 0x013e ; Address of begin
0019 021a | | .CONST 0x021a ; Address of exception handler
001a 0070 | p | .CONST 0x0070 ; 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 4801 |H | Short_Literal 0x1
0020 4802 |H | Short_Literal 0x2
0021 e001 | | Load 0x0,0x1
0022 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0023 035b | [ | Declare_Type Array,Constrained
0024 e002 | | Load 0x0,0x2
0025 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0026 02c7 | | Declare_Variable Any
0027 00d8 | | Load_Top At_Offset_0
0028 1c00 | | Execute_Immediate Run_Utility,0x0
0029 029f 0233 | 3| Declare_Subprogram INIT_0230,For_Call
002b 029f 024b | K| Declare_Subprogram INIT_0248,For_Call
002d 029e 027b | {| Declare_Subprogram INIT_0278,For_Call,Unelaborated
002f 4807 |H | Short_Literal 0x7
0030 4802 |H | Short_Literal 0x2
0031 0099 | | Action Reference_Dynamic
0032 00c7 | | Action Elaborate_Subprogram
0033 029f 03bb | | Declare_Subprogram INIT_03b8,For_Call
0035 029f 03c3 | | Declare_Subprogram INIT_03c0,For_Call
0037 029f 03cb | | Declare_Subprogram INIT_03c8,For_Call
0039 029f 03db | | Declare_Subprogram INIT_03d8,For_Call
003b 029f 03e3 | | Declare_Subprogram INIT_03e0,For_Call
003d 029f 03eb | | Declare_Subprogram INIT_03e8,For_Call
003f 4807 |H | Short_Literal 0x7
0040 4802 |H | Short_Literal 0x2
0041 0099 | | Action Reference_Dynamic
0042 00c6 | | Action Check_Subprogram_Elaborated
0043 00e1 | | Load_Encached Boolean_Cache
0044 0092 049d | | Action Push_String_Extended,0x49d ; "Enable"
0046 4800 |H | Short_Literal 0x0
0047 480d |H | Short_Literal 0xd
0048 4802 |H | Short_Literal 0x2
0049 0099 | | Action Reference_Dynamic
004a e001 | | Load 0x0,0x1
004b 193e | > | Execute Package,Field_Reference,Field_Number 0x3e
004c 480b |H | Short_Literal 0xb
004d 4802 |H | Short_Literal 0x2
004e 0099 | | Action Reference_Dynamic
004f e003 | | Load 0x0,0x3
0050 e004 | | Load 0x0,0x4
0051 4816 |H | Short_Literal 0x16
0052 0007 | | Action Break_Optional
0053 029f 03f3 | | Declare_Subprogram INIT_03f0,For_Call
0055 4807 |H | Short_Literal 0x7
0056 4802 |H | Short_Literal 0x2
0057 0099 | | Action Reference_Dynamic
0058 00c6 | | Action Check_Subprogram_Elaborated
0059 e402 | | Load 0x2,0x2
005a 0092 049e | | Action Push_String_Extended,0x49e ; "Input_Rate"
005c 0092 049f | | Action Push_String_Extended,0x49f ; "Baud_9600"
005e 8408 | | Call 0x2,0x8
005f 4809 |H | Short_Literal 0x9
0060 4802 |H | Short_Literal 0x2
0061 0099 | | Action Reference_Dynamic
0062 4817 |H | Short_Literal 0x17
0063 4802 |H | Short_Literal 0x2
0064 0099 | | Action Reference_Dynamic
0065 480a |H | Short_Literal 0xa
0066 4802 |H | Short_Literal 0x2
0067 0099 | | Action Reference_Dynamic
0068 e005 | | Load 0x0,0x5
0069 e006 | | Load 0x0,0x6
006a 4820 |H | Short_Literal 0x20
006b 0007 | | Action Break_Optional
006c 029f 0403 | | Declare_Subprogram INIT_0400,For_Call
006e 4807 |H | Short_Literal 0x7
006f 4802 |H | Short_Literal 0x2
0070 0099 | | Action Reference_Dynamic
0071 00c6 | | Action Check_Subprogram_Elaborated
0072 e402 | | Load 0x2,0x2
0073 0092 04a0 | | Action Push_String_Extended,0x4a0 ; "Output_Rate"
0075 0092 049f | | Action Push_String_Extended,0x49f ; "Baud_9600"
0077 8408 | | Call 0x2,0x8
0078 4809 |H | Short_Literal 0x9
0079 4802 |H | Short_Literal 0x2
007a 0099 | | Action Reference_Dynamic
007b 4821 |H! | Short_Literal 0x21
007c 4802 |H | Short_Literal 0x2
007d 0099 | | Action Reference_Dynamic
007e 480a |H | Short_Literal 0xa
007f 4802 |H | Short_Literal 0x2
0080 0099 | | Action Reference_Dynamic
0081 e007 | | Load 0x0,0x7
0082 e008 | | Load 0x0,0x8
0083 482a |H* | Short_Literal 0x2a
0084 0007 | | Action Break_Optional
0085 029f 0413 | | Declare_Subprogram INIT_0410,For_Call
0087 4807 |H | Short_Literal 0x7
0088 4802 |H | Short_Literal 0x2
0089 0099 | | Action Reference_Dynamic
008a 00c6 | | Action Check_Subprogram_Elaborated
008b e001 | | Load 0x0,0x1
008c 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
008d 0092 04a1 | | Action Push_String_Extended,0x4a1 ; "Parity"
008f 4800 |H | Short_Literal 0x0
0090 482b |H+ | Short_Literal 0x2b
0091 4802 |H | Short_Literal 0x2
0092 0099 | | Action Reference_Dynamic
0093 e001 | | Load 0x0,0x1
0094 1935 | 5 | Execute Package,Field_Reference,Field_Number 0x35
0095 00e0 | | Load_Encached Standard_Cache
0096 1923 | # | Execute Package,Field_Reference,Field_Number 0x23
0097 e009 | | Load 0x0,0x9
0098 e00a | | Load 0x0,0xa
0099 4834 |H4 | Short_Literal 0x34
009a 0007 | | Action Break_Optional
009b 029f 0423 | #| Declare_Subprogram INIT_0420,For_Call
009d 4807 |H | Short_Literal 0x7
009e 4802 |H | Short_Literal 0x2
009f 0099 | | Action Reference_Dynamic
00a0 00c6 | | Action Check_Subprogram_Elaborated
00a1 e402 | | Load 0x2,0x2
00a2 0092 04a2 | | Action Push_String_Extended,0x4a2 ; "Bits_Per_Char"
00a4 0092 04a3 | | Action Push_String_Extended,0x4a3 ; "Char_8"
00a6 8408 | | Call 0x2,0x8
00a7 4809 |H | Short_Literal 0x9
00a8 4802 |H | Short_Literal 0x2
00a9 0099 | | Action Reference_Dynamic
00aa 4835 |H5 | Short_Literal 0x35
00ab 4802 |H | Short_Literal 0x2
00ac 0099 | | Action Reference_Dynamic
00ad 480a |H | Short_Literal 0xa
00ae 4802 |H | Short_Literal 0x2
00af 0099 | | Action Reference_Dynamic
00b0 e00b | | Load 0x0,0xb
00b1 e00c | | Load 0x0,0xc
00b2 483e |H> | Short_Literal 0x3e
00b3 0007 | | Action Break_Optional
00b4 029f 043b | ;| Declare_Subprogram INIT_0438,For_Call
00b6 4807 |H | Short_Literal 0x7
00b7 4802 |H | Short_Literal 0x2
00b8 0099 | | Action Reference_Dynamic
00b9 00c6 | | Action Check_Subprogram_Elaborated
00ba 00e3 | | Load_Encached Natural_Cache
00bb 0092 04a4 | | Action Push_String_Extended,0x4a4 ; "Stop_Bits"
00bd 4802 |H | Short_Literal 0x2
00be 483f |H? | Short_Literal 0x3f
00bf 4802 |H | Short_Literal 0x2
00c0 0099 | | Action Reference_Dynamic
00c1 e001 | | Load 0x0,0x1
00c2 1936 | 6 | Execute Package,Field_Reference,Field_Number 0x36
00c3 480c |H | Short_Literal 0xc
00c4 4802 |H | Short_Literal 0x2
00c5 0099 | | Action Reference_Dynamic
00c6 e00d | | Load 0x0,0xd
00c7 e00e | | Load 0x0,0xe
00c8 4848 |HH | Short_Literal 0x48
00c9 0007 | | Action Break_Optional
00ca 029f 044b | K| Declare_Subprogram INIT_0448,For_Call
00cc 4807 |H | Short_Literal 0x7
00cd 4802 |H | Short_Literal 0x2
00ce 0099 | | Action Reference_Dynamic
00cf 00c6 | | Action Check_Subprogram_Elaborated
00d0 e402 | | Load 0x2,0x2
00d1 0092 04a5 | | Action Push_String_Extended,0x4a5 ; "Flow_Control"
00d3 0092 04a6 | | Action Push_String_Extended,0x4a6 ; "None"
00d5 8408 | | Call 0x2,0x8
00d6 4809 |H | Short_Literal 0x9
00d7 4802 |H | Short_Literal 0x2
00d8 0099 | | Action Reference_Dynamic
00d9 4849 |HI | Short_Literal 0x49
00da 4802 |H | Short_Literal 0x2
00db 0099 | | Action Reference_Dynamic
00dc 480a |H | Short_Literal 0xa
00dd 4802 |H | Short_Literal 0x2
00de 0099 | | Action Reference_Dynamic
00df e00f | | Load 0x0,0xf
00e0 e010 | | Load 0x0,0x10
00e1 4852 |HR | Short_Literal 0x52
00e2 0007 | | Action Break_Optional
00e3 029f 045b | [| Declare_Subprogram INIT_0458,For_Call
00e5 4807 |H | Short_Literal 0x7
00e6 4802 |H | Short_Literal 0x2
00e7 0099 | | Action Reference_Dynamic
00e8 00c6 | | Action Check_Subprogram_Elaborated
00e9 e402 | | Load 0x2,0x2
00ea 0092 04a7 | | Action Push_String_Extended,0x4a7 ; "Receive_Flow_Control"
00ec 0092 04a6 | | Action Push_String_Extended,0x4a6 ; "None"
00ee 8408 | | Call 0x2,0x8
00ef 4809 |H | Short_Literal 0x9
00f0 4802 |H | Short_Literal 0x2
00f1 0099 | | Action Reference_Dynamic
00f2 4853 |HS | Short_Literal 0x53
00f3 4802 |H | Short_Literal 0x2
00f4 0099 | | Action Reference_Dynamic
00f5 480a |H | Short_Literal 0xa
00f6 4802 |H | Short_Literal 0x2
00f7 0099 | | Action Reference_Dynamic
00f8 e011 | | Load 0x0,0x11
00f9 e012 | | Load 0x0,0x12
00fa 485c |H\ | Short_Literal 0x5c
00fb 0007 | | Action Break_Optional
00fc 029f 046b | k| Declare_Subprogram INIT_0468,For_Call
00fe 029f 048b | | Declare_Subprogram INIT_0488,For_Call
0100 4807 |H | Short_Literal 0x7
0101 4802 |H | Short_Literal 0x2
0102 0099 | | Action Reference_Dynamic
0103 00c6 | | Action Check_Subprogram_Elaborated
0104 e403 | | Load 0x2,0x3
0105 0092 04a8 | | Action Push_String_Extended,0x4a8 ; "Xon_Xoff"
0107 e403 | | Load 0x2,0x3
0108 0337 | 7 | Declare_Variable Array
0109 4811 |H | Short_Literal 0x11
010a 4801 |H | Short_Literal 0x1
010b 00da | | Load_Top At_Offset_2
010c 01d6 | | Execute Vector,Field_Write
010d 4813 |H | Short_Literal 0x13
010e 4802 |H | Short_Literal 0x2
010f 00da | | Load_Top At_Offset_2
0110 01d6 | | Execute Vector,Field_Write
0111 e403 | | Load 0x2,0x3
0112 01c3 | | Execute Vector,Check_In_Type
0113 485d |H] | Short_Literal 0x5d
0114 4802 |H | Short_Literal 0x2
0115 0099 | | Action Reference_Dynamic
0116 e001 | | Load 0x0,0x1
0117 1939 | 9 | Execute Package,Field_Reference,Field_Number 0x39
0118 485e |H^ | Short_Literal 0x5e
0119 4802 |H | Short_Literal 0x2
011a 0099 | | Action Reference_Dynamic
011b e013 | | Load 0x0,0x13
011c e014 | | Load 0x0,0x14
011d 4867 |Hg | Short_Literal 0x67
011e 0007 | | Action Break_Optional
011f 4807 |H | Short_Literal 0x7
0120 4802 |H | Short_Literal 0x2
0121 0099 | | Action Reference_Dynamic
0122 00c6 | | Action Check_Subprogram_Elaborated
0123 e403 | | Load 0x2,0x3
0124 0092 04a9 | | Action Push_String_Extended,0x4a9 ; "Receive_Xon_Xoff"
0126 e403 | | Load 0x2,0x3
0127 0337 | 7 | Declare_Variable Array
0128 4811 |H | Short_Literal 0x11
0129 4801 |H | Short_Literal 0x1
012a 00da | | Load_Top At_Offset_2
012b 01d6 | | Execute Vector,Field_Write
012c 4813 |H | Short_Literal 0x13
012d 4802 |H | Short_Literal 0x2
012e 00da | | Load_Top At_Offset_2
012f 01d6 | | Execute Vector,Field_Write
0130 e403 | | Load 0x2,0x3
0131 01c3 | | Execute Vector,Check_In_Type
0132 485d |H] | Short_Literal 0x5d
0133 4802 |H | Short_Literal 0x2
0134 0099 | | Action Reference_Dynamic
0135 e001 | | Load 0x0,0x1
0136 193b | ; | Execute Package,Field_Reference,Field_Number 0x3b
0137 485e |H^ | Short_Literal 0x5e
0138 4802 |H | Short_Literal 0x2
0139 0099 | | Action Reference_Dynamic
013a e015 | | Load 0x0,0x15
013b e016 | | Load 0x0,0x16
013c 4870 |Hp | Short_Literal 0x70
013d 0007 | | Action Break_Optional
013e BODY_0018:
013e e5fe | | Load 0x2,-0x2
013f 7008 |p | Jump_Nonzero 0x148
0140 e404 | | Load 0x2,0x4
0141 00ea | | Load_Encached Null_String_Cache
0142 e5ff | | Load 0x2,-0x1
0143 4801 |H | Short_Literal 0x1
0144 e002 | | Load 0x0,0x2
0145 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0146 c404 | | Store 0x2,0x4
0147 7803 |x | Jump 0x14b
0148 e002 | | Load 0x0,0x2
0149 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
014a c404 | | Store 0x2,0x4
014b 4800 |H | Short_Literal 0x0
014c 48ff |H | Short_Literal 0xff
014d 4810 |H | Short_Literal 0x10
014e e404 | | Load 0x2,0x4
014f e40e | | Load 0x2,0xe
0150 e40f | | Load 0x2,0xf
0151 e410 | | Load 0x2,0x10
0152 4811 |H | Short_Literal 0x11
0153 4802 |H | Short_Literal 0x2
0154 0099 | | Action Reference_Dynamic
0155 4812 |H | Short_Literal 0x12
0156 4802 |H | Short_Literal 0x2
0157 0099 | | Action Reference_Dynamic
0158 4813 |H | Short_Literal 0x13
0159 4802 |H | Short_Literal 0x2
015a 0099 | | Action Reference_Dynamic
015b 4814 |H | Short_Literal 0x14
015c 4802 |H | Short_Literal 0x2
015d 0099 | | Action Reference_Dynamic
015e 8407 | | Call 0x2,0x7
015f 4801 |H | Short_Literal 0x1
0160 48ff |H | Short_Literal 0xff
0161 4810 |H | Short_Literal 0x10
0162 e404 | | Load 0x2,0x4
0163 e418 | | Load 0x2,0x18
0164 e419 | | Load 0x2,0x19
0165 e41a | | Load 0x2,0x1a
0166 481b |H | Short_Literal 0x1b
0167 4802 |H | Short_Literal 0x2
0168 0099 | | Action Reference_Dynamic
0169 481c |H | Short_Literal 0x1c
016a 4802 |H | Short_Literal 0x2
016b 0099 | | Action Reference_Dynamic
016c 481d |H | Short_Literal 0x1d
016d 4802 |H | Short_Literal 0x2
016e 0099 | | Action Reference_Dynamic
016f 481e |H | Short_Literal 0x1e
0170 4802 |H | Short_Literal 0x2
0171 0099 | | Action Reference_Dynamic
0172 8407 | | Call 0x2,0x7
0173 4801 |H | Short_Literal 0x1
0174 48ff |H | Short_Literal 0xff
0175 4810 |H | Short_Literal 0x10
0176 e404 | | Load 0x2,0x4
0177 e422 | " | Load 0x2,0x22
0178 e423 | # | Load 0x2,0x23
0179 e424 | $ | Load 0x2,0x24
017a 4825 |H% | Short_Literal 0x25
017b 4802 |H | Short_Literal 0x2
017c 0099 | | Action Reference_Dynamic
017d 4826 |H& | Short_Literal 0x26
017e 4802 |H | Short_Literal 0x2
017f 0099 | | Action Reference_Dynamic
0180 4827 |H' | Short_Literal 0x27
0181 4802 |H | Short_Literal 0x2
0182 0099 | | Action Reference_Dynamic
0183 4828 |H( | Short_Literal 0x28
0184 4802 |H | Short_Literal 0x2
0185 0099 | | Action Reference_Dynamic
0186 8407 | | Call 0x2,0x7
0187 4801 |H | Short_Literal 0x1
0188 48ff |H | Short_Literal 0xff
0189 4810 |H | Short_Literal 0x10
018a e404 | | Load 0x2,0x4
018b e42c | , | Load 0x2,0x2c
018c e42d | - | Load 0x2,0x2d
018d e42e | . | Load 0x2,0x2e
018e 482f |H/ | Short_Literal 0x2f
018f 4802 |H | Short_Literal 0x2
0190 0099 | | Action Reference_Dynamic
0191 4830 |H0 | Short_Literal 0x30
0192 4802 |H | Short_Literal 0x2
0193 0099 | | Action Reference_Dynamic
0194 4831 |H1 | Short_Literal 0x31
0195 4802 |H | Short_Literal 0x2
0196 0099 | | Action Reference_Dynamic
0197 4832 |H2 | Short_Literal 0x32
0198 4802 |H | Short_Literal 0x2
0199 0099 | | Action Reference_Dynamic
019a 8407 | | Call 0x2,0x7
019b 4801 |H | Short_Literal 0x1
019c 48ff |H | Short_Literal 0xff
019d 4810 |H | Short_Literal 0x10
019e e404 | | Load 0x2,0x4
019f e436 | 6 | Load 0x2,0x36
01a0 e437 | 7 | Load 0x2,0x37
01a1 e438 | 8 | Load 0x2,0x38
01a2 4839 |H9 | Short_Literal 0x39
01a3 4802 |H | Short_Literal 0x2
01a4 0099 | | Action Reference_Dynamic
01a5 483a |H: | Short_Literal 0x3a
01a6 4802 |H | Short_Literal 0x2
01a7 0099 | | Action Reference_Dynamic
01a8 483b |H; | Short_Literal 0x3b
01a9 4802 |H | Short_Literal 0x2
01aa 0099 | | Action Reference_Dynamic
01ab 483c |H< | Short_Literal 0x3c
01ac 4802 |H | Short_Literal 0x2
01ad 0099 | | Action Reference_Dynamic
01ae 8407 | | Call 0x2,0x7
01af 4801 |H | Short_Literal 0x1
01b0 48ff |H | Short_Literal 0xff
01b1 4810 |H | Short_Literal 0x10
01b2 e404 | | Load 0x2,0x4
01b3 e440 | @ | Load 0x2,0x40
01b4 e441 | A | Load 0x2,0x41
01b5 e442 | B | Load 0x2,0x42
01b6 4843 |HC | Short_Literal 0x43
01b7 4802 |H | Short_Literal 0x2
01b8 0099 | | Action Reference_Dynamic
01b9 4844 |HD | Short_Literal 0x44
01ba 4802 |H | Short_Literal 0x2
01bb 0099 | | Action Reference_Dynamic
01bc 4845 |HE | Short_Literal 0x45
01bd 4802 |H | Short_Literal 0x2
01be 0099 | | Action Reference_Dynamic
01bf 4846 |HF | Short_Literal 0x46
01c0 4802 |H | Short_Literal 0x2
01c1 0099 | | Action Reference_Dynamic
01c2 8407 | | Call 0x2,0x7
01c3 4801 |H | Short_Literal 0x1
01c4 48ff |H | Short_Literal 0xff
01c5 4810 |H | Short_Literal 0x10
01c6 e404 | | Load 0x2,0x4
01c7 e44a | J | Load 0x2,0x4a
01c8 e44b | K | Load 0x2,0x4b
01c9 e44c | L | Load 0x2,0x4c
01ca 484d |HM | Short_Literal 0x4d
01cb 4802 |H | Short_Literal 0x2
01cc 0099 | | Action Reference_Dynamic
01cd 484e |HN | Short_Literal 0x4e
01ce 4802 |H | Short_Literal 0x2
01cf 0099 | | Action Reference_Dynamic
01d0 484f |HO | Short_Literal 0x4f
01d1 4802 |H | Short_Literal 0x2
01d2 0099 | | Action Reference_Dynamic
01d3 4850 |HP | Short_Literal 0x50
01d4 4802 |H | Short_Literal 0x2
01d5 0099 | | Action Reference_Dynamic
01d6 8407 | | Call 0x2,0x7
01d7 4801 |H | Short_Literal 0x1
01d8 48ff |H | Short_Literal 0xff
01d9 4810 |H | Short_Literal 0x10
01da e404 | | Load 0x2,0x4
01db e454 | T | Load 0x2,0x54
01dc e455 | U | Load 0x2,0x55
01dd e456 | V | Load 0x2,0x56
01de 4857 |HW | Short_Literal 0x57
01df 4802 |H | Short_Literal 0x2
01e0 0099 | | Action Reference_Dynamic
01e1 4858 |HX | Short_Literal 0x58
01e2 4802 |H | Short_Literal 0x2
01e3 0099 | | Action Reference_Dynamic
01e4 4859 |HY | Short_Literal 0x59
01e5 4802 |H | Short_Literal 0x2
01e6 0099 | | Action Reference_Dynamic
01e7 485a |HZ | Short_Literal 0x5a
01e8 4802 |H | Short_Literal 0x2
01e9 0099 | | Action Reference_Dynamic
01ea 8407 | | Call 0x2,0x7
01eb 4801 |H | Short_Literal 0x1
01ec 48ff |H | Short_Literal 0xff
01ed 4810 |H | Short_Literal 0x10
01ee e404 | | Load 0x2,0x4
01ef e45f | _ | Load 0x2,0x5f
01f0 e460 | ` | Load 0x2,0x60
01f1 e461 | a | Load 0x2,0x61
01f2 4862 |Hb | Short_Literal 0x62
01f3 4802 |H | Short_Literal 0x2
01f4 0099 | | Action Reference_Dynamic
01f5 4863 |Hc | Short_Literal 0x63
01f6 4802 |H | Short_Literal 0x2
01f7 0099 | | Action Reference_Dynamic
01f8 4864 |Hd | Short_Literal 0x64
01f9 4802 |H | Short_Literal 0x2
01fa 0099 | | Action Reference_Dynamic
01fb 4865 |He | Short_Literal 0x65
01fc 4802 |H | Short_Literal 0x2
01fd 0099 | | Action Reference_Dynamic
01fe 8407 | | Call 0x2,0x7
01ff 4801 |H | Short_Literal 0x1
0200 48ff |H | Short_Literal 0xff
0201 4810 |H | Short_Literal 0x10
0202 e404 | | Load 0x2,0x4
0203 e468 | h | Load 0x2,0x68
0204 e469 | i | Load 0x2,0x69
0205 e46a | j | Load 0x2,0x6a
0206 486b |Hk | Short_Literal 0x6b
0207 4802 |H | Short_Literal 0x2
0208 0099 | | Action Reference_Dynamic
0209 486c |Hl | Short_Literal 0x6c
020a 4802 |H | Short_Literal 0x2
020b 0099 | | Action Reference_Dynamic
020c 486d |Hm | Short_Literal 0x6d
020d 4802 |H | Short_Literal 0x2
020e 0099 | | Action Reference_Dynamic
020f 486e |Hn | Short_Literal 0x6e
0210 4802 |H | Short_Literal 0x2
0211 0099 | | Action Reference_Dynamic
0212 8407 | | Call 0x2,0x7
0213 e5fe | | Load 0x2,-0x2
0214 7004 |p | Jump_Nonzero 0x219
0215 e404 | | Load 0x2,0x4
0216 e002 | | Load 0x0,0x2
0217 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0218 c404 | | Store 0x2,0x4
0219 4503 |E | Exit_Suprogram New_Top_Offset 0x3
021a TRAP_0018:
021a 0007 | | Action Break_Optional
021b e5fe | | Load 0x2,-0x2
021c 0f00 | | Execute_Immediate Equal,0x0
021d e404 | | Load 0x2,0x4
021e e002 | | Load 0x0,0x2
021f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0220 0279 | y | Execute Discrete,And
0221 6804 |h | Jump_Zero 0x226
0222 e404 | | Load 0x2,0x4
0223 e002 | | Load 0x0,0x2
0224 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0225 c404 | | Store 0x2,0x4
0226 e017 | | Load 0x0,0x17
0227 180e | | Execute Package,Field_Execute,Field_Number 0xe
0228 4807 |H | Short_Literal 0x7
0229 0092 04aa | | Action Push_String_Extended,0x4aa ; "An error occured creating the terminal configuration file, please check and correct by hand."
022b e018 | | Load 0x0,0x18
022c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
022d 4503 |E | Exit_Suprogram New_Top_Offset 0x3
022e 0000 0000 | | .XXX[0x2]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0233 | 3 | .CONST 0x0233 ; Address of begin
0231 0004 | | .CONST 0x0004 ; Address of exception handler
0232 0001 | | .CONST 0x0001 ; Number of locals
0233 BODY_0230:
0233 INIT_0230:
0233 00da | | Load_Top At_Offset_2
0234 e7fe | | Load 0x3,-0x2
0235 027b | { | Execute Discrete,Greater_Equal
0236 6804 |h | Jump_Zero 0x23b
0237 00da | | Load_Top At_Offset_2
0238 00e0 | | Load_Encached Standard_Cache
0239 1818 | | Execute Package,Field_Execute,Field_Number 0x18
023a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
023b 00da | | Load_Top At_Offset_2
023c 00e0 | | Load_Encached Standard_Cache
023d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
023e 0092 04ab | | Action Push_String_Extended,0x4ab ; " .."
0240 01cc | | Execute Vector,Catenate
0241 e7fe | | Load 0x3,-0x2
0242 00e0 | | Load_Encached Standard_Cache
0243 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0244 01cc | | Execute Vector,Catenate
0245 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0246 0000 0000 | | .XXX[0x2]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b | K | .CONST 0x024b ; Address of begin
0249 0004 | | .CONST 0x0004 ; Address of exception handler
024a 0001 | | .CONST 0x0001 ; Number of locals
024b BODY_0248:
024b INIT_0248:
024b e5fe | | Load 0x2,-0x2
024c 7025 |p% | Jump_Nonzero 0x272
024d 00db | | Load_Top At_Offset_3
024e 00db | | Load_Top At_Offset_3
024f 027d | } | Execute Discrete,Greater
0250 6811 |h | Jump_Zero 0x262
0251 e017 | | Load 0x0,0x17
0252 180e | | Execute Package,Field_Execute,Field_Number 0xe
0253 4803 |H | Short_Literal 0x3
0254 0092 04ac | | Action Push_String_Extended,0x4ac ; "The ports"
0256 e7fe | | Load 0x3,-0x2
0257 e7ff | | Load 0x3,-0x1
0258 8405 | | Call 0x2,0x5
0259 01cc | | Execute Vector,Catenate
025a 0092 04ad | | Action Push_String_Extended,0x4ad ; " have been set to "
025c 01cc | | Execute Vector,Catenate
025d e7fd | | Load 0x3,-0x3
025e 01cc | | Execute Vector,Catenate
025f e018 | | Load 0x0,0x18
0260 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0261 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0262 e017 | | Load 0x0,0x17
0263 180e | | Execute Package,Field_Execute,Field_Number 0xe
0264 4803 |H | Short_Literal 0x3
0265 0092 04ae | | Action Push_String_Extended,0x4ae ; "The port"
0267 e7fe | | Load 0x3,-0x2
0268 e7ff | | Load 0x3,-0x1
0269 8405 | | Call 0x2,0x5
026a 01cc | | Execute Vector,Catenate
026b 0092 04af | | Action Push_String_Extended,0x4af ; " has been set to "
026d 01cc | | Execute Vector,Catenate
026e e7fd | | Load 0x3,-0x3
026f 01cc | | Execute Vector,Catenate
0270 e018 | | Load 0x0,0x18
0271 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0272 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0273 0000 0000 | | .BLANK 0000[0x5]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 028d | | .CONST 0x028d ; Address of begin
0279 03ab | | .CONST 0x03ab ; Address of exception handler
027a 0007 | | .CONST 0x0007 ; Number of locals
027b INIT_0278:
027b e001 | | Load 0x0,0x1
027c 1b50 | P | Execute Package,Field_Read,Field_Number 0x50
027d 02c7 | | Declare_Variable Any
027e 00d8 | | Load_Top At_Offset_0
027f 1c00 | | Execute_Immediate Run_Utility,0x0
0280 e7f9 | | Load 0x3,-0x7
0281 02c7 | | Declare_Variable Any
0282 00d8 | | Load_Top At_Offset_0
0283 1c00 | | Execute_Immediate Run_Utility,0x0
0284 e7f9 | | Load 0x3,-0x7
0285 02c7 | | Declare_Variable Any
0286 00d8 | | Load_Top At_Offset_0
0287 1c00 | | Execute_Immediate Run_Utility,0x0
0288 00e2 | | Load_Encached Integer_Cache
0289 4fff |O | Short_Literal -0x1
028a 00e2 | | Load_Encached Integer_Cache
028b 03f1 | | Declare_Variable Discrete,With_Value
028c 00e2 | | Load_Encached Integer_Cache
028d BODY_0278:
028d 00be | | Action Activate_Tasks
028e e602 | | Load 0x3,0x2
028f 0120 | | Execute Any,Is_Value
0290 6803 |h | Jump_Zero 0x294
0291 e001 | | Load 0x0,0x1
0292 1b50 | P | Execute Package,Field_Read,Field_Number 0x50
0293 7801 |x | Jump 0x295
0294 e602 | | Load 0x3,0x2
0295 e001 | | Load 0x0,0x1
0296 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0297 c602 | | Store 0x3,0x2
0298 00cf | | Action Mark_Auxiliary
0299 78cd |x | Jump 0x367
029a e602 | | Load 0x3,0x2
029b e001 | | Load 0x0,0x1
029c 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
029d a605 | | Store_Unchecked 0x3,0x5
029e 00db | | Load_Top At_Offset_3
029f e7f7 | | Load 0x3,-0x9
02a0 027b | { | Execute Discrete,Greater_Equal
02a1 e605 | | Load 0x3,0x5
02a2 e7f6 | | Load 0x3,-0xa
02a3 027a | z | Execute Discrete,Less_Equal
02a4 0279 | y | Execute Discrete,And
02a5 68bc |h | Jump_Zero 0x362
02a6 e7f5 | | Load 0x3,-0xb
02a7 680b |h | Jump_Zero 0x2b3
02a8 00db | | Load_Top At_Offset_3
02a9 e001 | | Load 0x0,0x1
02aa 1b11 | | Execute Package,Field_Read,Field_Number 0x11
02ab 00d9 | | Load_Top At_Offset_1
02ac 00d0 | | Action Swap_Control
02ad 0260 | ` | Execute Discrete,In_Type
02ae 7001 |p | Jump_Nonzero 0x2b0
02af 0801 | | Execute_Immediate Raise,0x1
02b0 e019 | | Load 0x0,0x19
02b1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02b2 70af |p | Jump_Nonzero 0x362
02b3 00db | | Load_Top At_Offset_3
02b4 00d8 | | Load_Top At_Offset_0
02b5 00e3 | | Load_Encached Natural_Cache
02b6 0260 | ` | Execute Discrete,In_Type
02b7 7001 |p | Jump_Nonzero 0x2b9
02b8 0801 | | Execute_Immediate Raise,0x1
02b9 87fd | | Call 0x3,-0x3
02ba c603 | | Store 0x3,0x3
02bb 00da | | Load_Top At_Offset_2
02bc 4fff |O | Short_Literal -0x1
02bd 027f | | Execute Discrete,Equal
02be 6807 |h | Jump_Zero 0x2c6
02bf 00db | | Load_Top At_Offset_3
02c0 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
02c1 00db | | Load_Top At_Offset_3
02c2 0aff | | Execute_Immediate Plus,-0x1
02c3 005a | Z | Store_Top Discrete,At_Offset_2
02c4 e603 | | Load 0x3,0x3
02c5 c604 | | Store 0x3,0x4
02c6 e7fb | | Load 0x3,-0x5
02c7 e7f9 | | Load 0x3,-0x7
02c8 0119 | | Execute Any,Check_In_Formal_Type
02c9 e603 | | Load 0x3,0x3
02ca e7f9 | | Load 0x3,-0x7
02cb 0119 | | Execute Any,Check_In_Formal_Type
02cc 87fe | | Call 0x3,-0x2
02cd 7050 |pP | Jump_Nonzero 0x31e
02ce 00db | | Load_Top At_Offset_3
02cf 00da | | Load_Top At_Offset_2
02d0 0a01 | | Execute_Immediate Plus,0x1
02d1 027e | ~ | Execute Discrete,Not_Equal
02d2 7008 |p | Jump_Nonzero 0x2db
02d3 e604 | | Load 0x3,0x4
02d4 e7f9 | | Load 0x3,-0x7
02d5 0119 | | Execute Any,Check_In_Formal_Type
02d6 e603 | | Load 0x3,0x3
02d7 e7f9 | | Load 0x3,-0x7
02d8 0119 | | Execute Any,Check_In_Formal_Type
02d9 87fe | | Call 0x3,-0x2
02da 7085 |p | Jump_Nonzero 0x360
02db e7fb | | Load 0x3,-0x5
02dc e7f9 | | Load 0x3,-0x7
02dd 0119 | | Execute Any,Check_In_Formal_Type
02de e604 | | Load 0x3,0x4
02df e7f9 | | Load 0x3,-0x7
02e0 0119 | | Execute Any,Check_In_Formal_Type
02e1 87fe | | Call 0x3,-0x2
02e2 7036 |p6 | Jump_Nonzero 0x319
02e3 00d9 | | Load_Top At_Offset_1
02e4 00d8 | | Load_Top At_Offset_0
02e5 00e3 | | Load_Encached Natural_Cache
02e6 0260 | ` | Execute Discrete,In_Type
02e7 7001 |p | Jump_Nonzero 0x2e9
02e8 0801 | | Execute_Immediate Raise,0x1
02e9 00db | | Load_Top At_Offset_3
02ea 00d8 | | Load_Top At_Offset_0
02eb 00e3 | | Load_Encached Natural_Cache
02ec 0260 | ` | Execute Discrete,In_Type
02ed 7001 |p | Jump_Nonzero 0x2ef
02ee 0801 | | Execute_Immediate Raise,0x1
02ef 8405 | | Call 0x2,0x5
02f0 0092 04b0 | | Action Push_String_Extended,0x4b0 ; " => ("
02f2 01cc | | Execute Vector,Catenate
02f3 e7fa | | Load 0x3,-0x6
02f4 01cc | | Execute Vector,Catenate
02f5 0092 04b1 | | Action Push_String_Extended,0x4b1 ; " => "
02f7 01cc | | Execute Vector,Catenate
02f8 e604 | | Load 0x3,0x4
02f9 e7f9 | | Load 0x3,-0x7
02fa 0119 | | Execute Any,Check_In_Formal_Type
02fb 87fc | | Call 0x3,-0x4
02fc 01cc | | Execute Vector,Catenate
02fd 0092 04b2 | | Action Push_String_Extended,0x4b2 ; ")"
02ff 01cc | | Execute Vector,Catenate
0300 e7f8 | | Load 0x3,-0x8
0301 e002 | | Load 0x0,0x2
0302 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0303 e7fa | | Load 0x3,-0x6
0304 0092 04b1 | | Action Push_String_Extended,0x4b1 ; " => "
0306 01cc | | Execute Vector,Catenate
0307 e604 | | Load 0x3,0x4
0308 e7f9 | | Load 0x3,-0x7
0309 0119 | | Execute Any,Check_In_Formal_Type
030a 87fc | | Call 0x3,-0x4
030b 01cc | | Execute Vector,Catenate
030c 00da | | Load_Top At_Offset_2
030d 00d8 | | Load_Top At_Offset_0
030e 00e3 | | Load_Encached Natural_Cache
030f 0260 | ` | Execute Discrete,In_Type
0310 7001 |p | Jump_Nonzero 0x312
0311 0801 | | Execute_Immediate Raise,0x1
0312 e606 | | Load 0x3,0x6
0313 00d8 | | Load_Top At_Offset_0
0314 00e3 | | Load_Encached Natural_Cache
0315 0260 | ` | Execute Discrete,In_Type
0316 7001 |p | Jump_Nonzero 0x318
0317 0801 | | Execute_Immediate Raise,0x1
0318 8406 | | Call 0x2,0x6
0319 e603 | | Load 0x3,0x3
031a c604 | | Store 0x3,0x4
031b 00db | | Load_Top At_Offset_3
031c 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
031d 7842 |xB | Jump 0x360
031e e604 | | Load 0x3,0x4
031f e7f9 | | Load 0x3,-0x7
0320 0119 | | Execute Any,Check_In_Formal_Type
0321 e603 | | Load 0x3,0x3
0322 e7f9 | | Load 0x3,-0x7
0323 0119 | | Execute Any,Check_In_Formal_Type
0324 87fe | | Call 0x3,-0x2
0325 703a |p: | Jump_Nonzero 0x360
0326 00d9 | | Load_Top At_Offset_1
0327 00d8 | | Load_Top At_Offset_0
0328 00e3 | | Load_Encached Natural_Cache
0329 0260 | ` | Execute Discrete,In_Type
032a 7001 |p | Jump_Nonzero 0x32c
032b 0801 | | Execute_Immediate Raise,0x1
032c 00db | | Load_Top At_Offset_3
032d 00d8 | | Load_Top At_Offset_0
032e 00e3 | | Load_Encached Natural_Cache
032f 0260 | ` | Execute Discrete,In_Type
0330 7001 |p | Jump_Nonzero 0x332
0331 0801 | | Execute_Immediate Raise,0x1
0332 8405 | | Call 0x2,0x5
0333 0092 04b0 | | Action Push_String_Extended,0x4b0 ; " => ("
0335 01cc | | Execute Vector,Catenate
0336 e7fa | | Load 0x3,-0x6
0337 01cc | | Execute Vector,Catenate
0338 0092 04b1 | | Action Push_String_Extended,0x4b1 ; " => "
033a 01cc | | Execute Vector,Catenate
033b e604 | | Load 0x3,0x4
033c e7f9 | | Load 0x3,-0x7
033d 0119 | | Execute Any,Check_In_Formal_Type
033e 87fc | | Call 0x3,-0x4
033f 01cc | | Execute Vector,Catenate
0340 0092 04b2 | | Action Push_String_Extended,0x4b2 ; ")"
0342 01cc | | Execute Vector,Catenate
0343 e7f8 | | Load 0x3,-0x8
0344 e002 | | Load 0x0,0x2
0345 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0346 e7fa | | Load 0x3,-0x6
0347 0092 04b1 | | Action Push_String_Extended,0x4b1 ; " => "
0349 01cc | | Execute Vector,Catenate
034a e604 | | Load 0x3,0x4
034b e7f9 | | Load 0x3,-0x7
034c 0119 | | Execute Any,Check_In_Formal_Type
034d 87fc | | Call 0x3,-0x4
034e 01cc | | Execute Vector,Catenate
034f 00da | | Load_Top At_Offset_2
0350 00d8 | | Load_Top At_Offset_0
0351 00e3 | | Load_Encached Natural_Cache
0352 0260 | ` | Execute Discrete,In_Type
0353 7001 |p | Jump_Nonzero 0x355
0354 0801 | | Execute_Immediate Raise,0x1
0355 e606 | | Load 0x3,0x6
0356 00d8 | | Load_Top At_Offset_0
0357 00e3 | | Load_Encached Natural_Cache
0358 0260 | ` | Execute Discrete,In_Type
0359 7001 |p | Jump_Nonzero 0x35b
035a 0801 | | Execute_Immediate Raise,0x1
035b 8406 | | Call 0x2,0x6
035c e603 | | Load 0x3,0x3
035d c604 | | Store 0x3,0x4
035e 00db | | Load_Top At_Offset_3
035f 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0360 00db | | Load_Top At_Offset_3
0361 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0362 e602 | | Load 0x3,0x2
0363 e001 | | Load 0x0,0x1
0364 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
0365 c602 | | Store 0x3,0x2
0366 00c9 | | Action Pop_Auxiliary_Loop
0367 e602 | | Load 0x3,0x2
0368 e001 | | Load 0x0,0x1
0369 1853 | S | Execute Package,Field_Execute,Field_Number 0x53
036a 6f2f |o/ | Jump_Zero 0x29a
036b 00ce | | Action Pop_Auxiliary
036c e7fb | | Load 0x3,-0x5
036d e7f9 | | Load 0x3,-0x7
036e 0119 | | Execute Any,Check_In_Formal_Type
036f e604 | | Load 0x3,0x4
0370 e7f9 | | Load 0x3,-0x7
0371 0119 | | Execute Any,Check_In_Formal_Type
0372 87fe | | Call 0x3,-0x2
0373 7036 |p6 | Jump_Nonzero 0x3aa
0374 00d8 | | Load_Top At_Offset_0
0375 00d8 | | Load_Top At_Offset_0
0376 00e3 | | Load_Encached Natural_Cache
0377 0260 | ` | Execute Discrete,In_Type
0378 7001 |p | Jump_Nonzero 0x37a
0379 0801 | | Execute_Immediate Raise,0x1
037a 00da | | Load_Top At_Offset_2
037b 00d8 | | Load_Top At_Offset_0
037c 00e3 | | Load_Encached Natural_Cache
037d 0260 | ` | Execute Discrete,In_Type
037e 7001 |p | Jump_Nonzero 0x380
037f 0801 | | Execute_Immediate Raise,0x1
0380 8405 | | Call 0x2,0x5
0381 0092 04b0 | | Action Push_String_Extended,0x4b0 ; " => ("
0383 01cc | | Execute Vector,Catenate
0384 e7fa | | Load 0x3,-0x6
0385 01cc | | Execute Vector,Catenate
0386 0092 04b1 | | Action Push_String_Extended,0x4b1 ; " => "
0388 01cc | | Execute Vector,Catenate
0389 e604 | | Load 0x3,0x4
038a e7f9 | | Load 0x3,-0x7
038b 0119 | | Execute Any,Check_In_Formal_Type
038c 87fc | | Call 0x3,-0x4
038d 01cc | | Execute Vector,Catenate
038e 0092 04b2 | | Action Push_String_Extended,0x4b2 ; ")"
0390 01cc | | Execute Vector,Catenate
0391 e7f8 | | Load 0x3,-0x8
0392 e002 | | Load 0x0,0x2
0393 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0394 e7fa | | Load 0x3,-0x6
0395 0092 04b1 | | Action Push_String_Extended,0x4b1 ; " => "
0397 01cc | | Execute Vector,Catenate
0398 e604 | | Load 0x3,0x4
0399 e7f9 | | Load 0x3,-0x7
039a 0119 | | Execute Any,Check_In_Formal_Type
039b 87fc | | Call 0x3,-0x4
039c 01cc | | Execute Vector,Catenate
039d 00d9 | | Load_Top At_Offset_1
039e 00d8 | | Load_Top At_Offset_0
039f 00e3 | | Load_Encached Natural_Cache
03a0 0260 | ` | Execute Discrete,In_Type
03a1 7001 |p | Jump_Nonzero 0x3a3
03a2 0801 | | Execute_Immediate Raise,0x1
03a3 00db | | Load_Top At_Offset_3
03a4 00d8 | | Load_Top At_Offset_0
03a5 00e3 | | Load_Encached Natural_Cache
03a6 0260 | ` | Execute Discrete,In_Type
03a7 7001 |p | Jump_Nonzero 0x3a9
03a8 0801 | | Execute_Immediate Raise,0x1
03a9 8406 | | Call 0x2,0x6
03aa 450c |E | Exit_Suprogram New_Top_Offset 0xc
03ab TRAP_0278:
03ab 0007 | | Action Break_Optional
03ac e017 | | Load 0x0,0x17
03ad 180e | | Execute Package,Field_Execute,Field_Number 0xe
03ae 4807 |H | Short_Literal 0x7
03af e7fa | | Load 0x3,-0x6
03b0 0092 04b3 | | Action Push_String_Extended,0x4b3 ; " could not be set."
03b2 01cc | | Execute Vector,Catenate
03b3 e018 | | Load 0x0,0x18
03b4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03b5 450c |E | Exit_Suprogram New_Top_Offset 0xc
03b6 0000 0000 | | .XXX[0x2]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bb | | .CONST 0x03bb ; Address of begin
03b9 0004 | | .CONST 0x0004 ; Address of exception handler
03ba 0001 | | .CONST 0x0001 ; Number of locals
03bb BODY_03b8:
03bb INIT_03b8:
03bb 00da | | Load_Top At_Offset_2
03bc e402 | | Load 0x2,0x2
03bd 03b6 | | Declare_Variable Access,By_Allocation,With_Value
03be 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03bf 0000 | | .XXX[0x1]
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03c3 | | .CONST 0x03c3 ; Address of begin
03c1 0004 | | .CONST 0x0004 ; Address of exception handler
03c2 0001 | | .CONST 0x0001 ; Number of locals
03c3 BODY_03c0:
03c3 INIT_03c0:
03c3 00da | | Load_Top At_Offset_2
03c4 0227 | ' | Execute Access,All_Reference
03c5 0335 | 5 | Declare_Variable Array,Duplicate
03c6 00cd | | Action Spare6_Action
03c7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03cb | | .CONST 0x03cb ; Address of begin
03c9 0004 | | .CONST 0x0004 ; Address of exception handler
03ca 0001 | | .CONST 0x0001 ; Number of locals
03cb BODY_03c8:
03cb INIT_03c8:
03cb 4801 |H | Short_Literal 0x1
03cc e7fe | | Load 0x3,-0x2
03cd 0227 | ' | Execute Access,All_Reference
03ce e7ff | | Load 0x3,-0x1
03cf 0227 | ' | Execute Access,All_Reference
03d0 e01a | | Load 0x0,0x1a
03d1 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
03d2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03d3 0000 0000 | | .BLANK 0000[0x5]
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03db | | .CONST 0x03db ; Address of begin
03d9 0004 | | .CONST 0x0004 ; Address of exception handler
03da 0001 | | .CONST 0x0001 ; Number of locals
03db BODY_03d8:
03db INIT_03d8:
03db 00da | | Load_Top At_Offset_2
03dc e7fe | | Load 0x3,-0x2
03dd 027f | | Execute Discrete,Equal
03de 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03df 0000 | | .XXX[0x1]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03e3 | | .CONST 0x03e3 ; Address of begin
03e1 0004 | | .CONST 0x0004 ; Address of exception handler
03e2 0001 | | .CONST 0x0001 ; Number of locals
03e3 BODY_03e0:
03e3 INIT_03e0:
03e3 00da | | Load_Top At_Offset_2
03e4 e7fe | | Load 0x3,-0x2
03e5 027f | | Execute Discrete,Equal
03e6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03e7 0000 | | .XXX[0x1]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03eb | | .CONST 0x03eb ; Address of begin
03e9 0004 | | .CONST 0x0004 ; Address of exception handler
03ea 0001 | | .CONST 0x0001 ; Number of locals
03eb BODY_03e8:
03eb INIT_03e8:
03eb 00da | | Load_Top At_Offset_2
03ec 00e1 | | Load_Encached Boolean_Cache
03ed 011c | | Execute Any,Convert_Unchecked
03ee 1c01 | | Execute_Immediate Run_Utility,0x1
03ef 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 03f3 | | .CONST 0x03f3 ; Address of begin
03f1 0004 | | .CONST 0x0004 ; Address of exception handler
03f2 0001 | | .CONST 0x0001 ; Number of locals
03f3 BODY_03f0:
03f3 INIT_03f0:
03f3 00da | | Load_Top At_Offset_2
03f4 e001 | | Load 0x0,0x1
03f5 1b11 | | Execute Package,Field_Read,Field_Number 0x11
03f6 00d9 | | Load_Top At_Offset_1
03f7 00d0 | | Action Swap_Control
03f8 0260 | ` | Execute Discrete,In_Type
03f9 7001 |p | Jump_Nonzero 0x3fb
03fa 0801 | | Execute_Immediate Raise,0x1
03fb e001 | | Load 0x0,0x1
03fc 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
03fd 8408 | | Call 0x2,0x8
03fe 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03ff 0000 | | .XXX[0x1]
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0403 | | .CONST 0x0403 ; Address of begin
0401 0004 | | .CONST 0x0004 ; Address of exception handler
0402 0001 | | .CONST 0x0001 ; Number of locals
0403 BODY_0400:
0403 INIT_0400:
0403 00da | | Load_Top At_Offset_2
0404 e001 | | Load 0x0,0x1
0405 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0406 00d9 | | Load_Top At_Offset_1
0407 00d0 | | Action Swap_Control
0408 0260 | ` | Execute Discrete,In_Type
0409 7001 |p | Jump_Nonzero 0x40b
040a 0801 | | Execute_Immediate Raise,0x1
040b e001 | | Load 0x0,0x1
040c 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
040d 8408 | | Call 0x2,0x8
040e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
040f 0000 | | .XXX[0x1]
0410 ; --------------------------------------------------------------------------------------
0410 ; SUBPROGRAM
0410 ; --------------------------------------------------------------------------------------
0410 0413 | | .CONST 0x0413 ; Address of begin
0411 0004 | | .CONST 0x0004 ; Address of exception handler
0412 0001 | | .CONST 0x0001 ; Number of locals
0413 BODY_0410:
0413 INIT_0410:
0413 00da | | Load_Top At_Offset_2
0414 e001 | | Load 0x0,0x1
0415 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
0416 011c | | Execute Any,Convert_Unchecked
0417 1c01 | | Execute_Immediate Run_Utility,0x1
0418 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0419 0000 0000 | | .BLANK 0000[0x7]
0420 ; --------------------------------------------------------------------------------------
0420 ; SUBPROGRAM
0420 ; --------------------------------------------------------------------------------------
0420 0423 | # | .CONST 0x0423 ; Address of begin
0421 0004 | | .CONST 0x0004 ; Address of exception handler
0422 0001 | | .CONST 0x0001 ; Number of locals
0423 BODY_0420:
0423 INIT_0420:
0423 0092 04b4 | | Action Push_String_Extended,0x4b4 ; "Char_"
0425 4820 |H | Short_Literal 0x20
0426 4800 |H | Short_Literal 0x0
0427 480a |H | Short_Literal 0xa
0428 e7ff | | Load 0x3,-0x1
0429 e001 | | Load 0x0,0x1
042a 1b11 | | Execute Package,Field_Read,Field_Number 0x11
042b 00d9 | | Load_Top At_Offset_1
042c 00d0 | | Action Swap_Control
042d 0260 | ` | Execute Discrete,In_Type
042e 7001 |p | Jump_Nonzero 0x430
042f 0801 | | Execute_Immediate Raise,0x1
0430 e001 | | Load 0x0,0x1
0431 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
0432 e01a | | Load 0x0,0x1a
0433 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0434 01cc | | Execute Vector,Catenate
0435 8408 | | Call 0x2,0x8
0436 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0437 0000 | | .XXX[0x1]
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 043b | ; | .CONST 0x043b ; Address of begin
0439 0004 | | .CONST 0x0004 ; Address of exception handler
043a 0001 | | .CONST 0x0001 ; Number of locals
043b BODY_0438:
043b INIT_0438:
043b 00da | | Load_Top At_Offset_2
043c 00d8 | | Load_Top At_Offset_0
043d 00e2 | | Load_Encached Integer_Cache
043e 0260 | ` | Execute Discrete,In_Type
043f 7001 |p | Jump_Nonzero 0x441
0440 0801 | | Execute_Immediate Raise,0x1
0441 00e0 | | Load_Encached Standard_Cache
0442 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0443 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0444 0000 0000 | | .BLANK 0000[0x4]
0448 ; --------------------------------------------------------------------------------------
0448 ; SUBPROGRAM
0448 ; --------------------------------------------------------------------------------------
0448 044b | K | .CONST 0x044b ; Address of begin
0449 0004 | | .CONST 0x0004 ; Address of exception handler
044a 0001 | | .CONST 0x0001 ; Number of locals
044b BODY_0448:
044b INIT_0448:
044b 00da | | Load_Top At_Offset_2
044c e001 | | Load 0x0,0x1
044d 1b11 | | Execute Package,Field_Read,Field_Number 0x11
044e 00d9 | | Load_Top At_Offset_1
044f 00d0 | | Action Swap_Control
0450 0260 | ` | Execute Discrete,In_Type
0451 7001 |p | Jump_Nonzero 0x453
0452 0801 | | Execute_Immediate Raise,0x1
0453 e001 | | Load 0x0,0x1
0454 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
0455 8408 | | Call 0x2,0x8
0456 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0457 0000 | | .XXX[0x1]
0458 ; --------------------------------------------------------------------------------------
0458 ; SUBPROGRAM
0458 ; --------------------------------------------------------------------------------------
0458 045b | [ | .CONST 0x045b ; Address of begin
0459 0004 | | .CONST 0x0004 ; Address of exception handler
045a 0001 | | .CONST 0x0001 ; Number of locals
045b BODY_0458:
045b INIT_0458:
045b 00da | | Load_Top At_Offset_2
045c e001 | | Load 0x0,0x1
045d 1b11 | | Execute Package,Field_Read,Field_Number 0x11
045e 00d9 | | Load_Top At_Offset_1
045f 00d0 | | Action Swap_Control
0460 0260 | ` | Execute Discrete,In_Type
0461 7001 |p | Jump_Nonzero 0x463
0462 0801 | | Execute_Immediate Raise,0x1
0463 e001 | | Load 0x0,0x1
0464 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0465 8408 | | Call 0x2,0x8
0466 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0467 0000 | | .XXX[0x1]
0468 ; --------------------------------------------------------------------------------------
0468 ; SUBPROGRAM
0468 ; --------------------------------------------------------------------------------------
0468 046b | k | .CONST 0x046b ; Address of begin
0469 0004 | | .CONST 0x0004 ; Address of exception handler
046a 0001 | | .CONST 0x0001 ; Number of locals
046b BODY_0468:
046b INIT_0468:
046b 0092 04b5 | | Action Push_String_Extended,0x4b5 ; "("
046d 4820 |H | Short_Literal 0x20
046e 4800 |H | Short_Literal 0x0
046f 480a |H | Short_Literal 0xa
0470 4801 |H | Short_Literal 0x1
0471 e7ff | | Load 0x3,-0x1
0472 01d7 | | Execute Vector,Field_Read
0473 e01a | | Load 0x0,0x1a
0474 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0475 01cc | | Execute Vector,Catenate
0476 0092 04b6 | | Action Push_String_Extended,0x4b6 ; ","
0478 01cc | | Execute Vector,Catenate
0479 4820 |H | Short_Literal 0x20
047a 4800 |H | Short_Literal 0x0
047b 480a |H | Short_Literal 0xa
047c 4802 |H | Short_Literal 0x2
047d e7ff | | Load 0x3,-0x1
047e 01d7 | | Execute Vector,Field_Read
047f e01a | | Load 0x0,0x1a
0480 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0481 01cc | | Execute Vector,Catenate
0482 0092 04b2 | | Action Push_String_Extended,0x4b2 ; ")"
0484 01cc | | Execute Vector,Catenate
0485 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0486 0000 0000 | | .XXX[0x2]
0488 ; --------------------------------------------------------------------------------------
0488 ; SUBPROGRAM
0488 ; --------------------------------------------------------------------------------------
0488 048b | | .CONST 0x048b ; Address of begin
0489 0004 | | .CONST 0x0004 ; Address of exception handler
048a 0001 | | .CONST 0x0001 ; Number of locals
048b BODY_0488:
048b INIT_0488:
048b 4801 |H | Short_Literal 0x1
048c 00db | | Load_Top At_Offset_3
048d 01d7 | | Execute Vector,Field_Read
048e 4801 |H | Short_Literal 0x1
048f e7fe | | Load 0x3,-0x2
0490 01d7 | | Execute Vector,Field_Read
0491 027f | | Execute Discrete,Equal
0492 6808 |h | Jump_Zero 0x49b
0493 4802 |H | Short_Literal 0x2
0494 00db | | Load_Top At_Offset_3
0495 01d7 | | Execute Vector,Field_Read
0496 4802 |H | Short_Literal 0x2
0497 e7fe | | Load 0x3,-0x2
0498 01d7 | | Execute Vector,Field_Read
0499 027f | | Execute Discrete,Equal
049a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
049b 4800 |H | Short_Literal 0x0
049c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
049d ; --------------------------------------------------------------------------------------
049d ; STRING TABLE
049d ; --------------------------------------------------------------------------------------
049d 0036 | 6 | .STRTAB 0x0036->0x04b8 ; "Enable"
049e 003a | : | .STRTAB 0x003a->0x04bb ; "Input_Rate"
049f 0042 | B | .STRTAB 0x0042->0x04c0 ; "Baud_9600"
04a0 0049 | I | .STRTAB 0x0049->0x04c4 ; "Output_Rate"
04a1 0052 | R | .STRTAB 0x0052->0x04ca ; "Parity"
04a2 0056 | V | .STRTAB 0x0056->0x04cd ; "Bits_Per_Char"
04a3 0061 | a | .STRTAB 0x0061->0x04d3 ; "Char_8"
04a4 0065 | e | .STRTAB 0x0065->0x04d6 ; "Stop_Bits"
04a5 006c | l | .STRTAB 0x006c->0x04db ; "Flow_Control"
04a6 0076 | v | .STRTAB 0x0076->0x04e1 ; "None"
04a7 0078 | x | .STRTAB 0x0078->0x04e3 ; "Receive_Flow_Control"
04a8 008a | | .STRTAB 0x008a->0x04ed ; "Xon_Xoff"
04a9 0090 | | .STRTAB 0x0090->0x04f1 ; "Receive_Xon_Xoff"
04aa 009e | | .STRTAB 0x009e->0x04f9 ; "An error occured creating the terminal configuration file, please check and correct by hand."
04ab 00f8 | | .STRTAB 0x00f8->0x0527 ; " .."
04ac 00f9 | | .STRTAB 0x00f9->0x0528 ; "The ports"
04ad 0100 | | .STRTAB 0x0100->0x052d ; " have been set to "
04ae 0110 | | .STRTAB 0x0110->0x0536 ; "The port"
04af 0116 | | .STRTAB 0x0116->0x053a ; " has been set to "
04b0 0125 | % | .STRTAB 0x0125->0x0542 ; " => ("
04b1 0128 | ( | .STRTAB 0x0128->0x0545 ; " => "
04b2 012a | * | .STRTAB 0x012a->0x0547 ; ")"
04b3 0129 | ) | .STRTAB 0x0129->0x0547 ; " could not be set."
04b4 0139 | 9 | .STRTAB 0x0139->0x0550 ; "Char_"
04b5 013c | < | .STRTAB 0x013c->0x0553 ; "("
04b6 013b | ; | .STRTAB 0x013b->0x0553 ; ","
04b7 013a | : | .STREND 0x013a->0x0554
04b8 456e 6162 |Enab| .STRTAB_STRINGS
0554 0000 0000 | | .BLANK 0000[0x4]
0558 ; --------------------------------------------------------------------------------------
0558 ; Debug Table
0558 ; --------------------------------------------------------------------------------------
0558 0004 000e | | .DEBUG4 0x0004,0x000e,0xb3ae,0x0000,0x0001,0x0000
055e 9194 e881 | | .XXX[0x1e]
0560 259d b9bd |% |
0562 c995 7d09 | } |
0564 b185 b9ad | |
0566 7d31 a5b9 |}1 |
0568 95cc e880 | |
056a 8081 8d85 | |
056c d5cd 95cc | |
056e 81bd b9b1 | |
0570 e481 bdb8 | |
0572 b589 b185 | |
0574 b9ac 81b1 | |
0576 a5b9 95cc | |
0578 2880 8080 |( |
057a 80b4 b480 | |
057c 8080 8080 | | .BLANK 8080[0x13]
058f 81d1 bc81 | | .XXX[0x14]
0591 8994 818d | |
0593 bdb9 cda5 | |
0595 9195 c995 | |
0597 9081 a5b8 | |
0599 81d1 a194 | |
059b 818d bdb5 | |
059d c185 c994 | |
059f 2880 8080 |( |
05a1 80b4 b480 | |
05a3 8080 8080 | | .BLANK 8080[0x8]
05ab 8119 a5b1 | | .XXX[0x1e]
05ad 957c c97d | | }|
05af 2185 cd7d |! }|
05b1 5da5 b191 |] |
05b3 8d85 c991 | |
05b5 cce8 8125 | %|
05b7 b9d1 95c9 | |
05b9 c1c9 95d0 | |
05bb 818d a185 | |
05bd c985 8dd1 | |
05bf 95c9 cc81 | |
05c1 a5b8 8119 | |
05c3 a5b1 957c | ||
05c5 c828 8080 | ( |
05c7 8080 b4b4 | |
05c9 8080 8080 | | .BLANK 8080[0x13]
05dc 8081 85cc | | .XXX[0x15]
05de 81c1 bdcd | |
05e0 cda5 89b1 | |
05e2 9481 5da5 | ] |
05e4 b191 8d85 | |
05e6 c991 ccb8 | |
05e8 8081 5da5 | ] |
05ea b191 8d85 | |
05ec c990 2880 | ( |
05ee 8080 80b4 | |
05f0 b480 | |
05f1 8080 8080 | | .BLANK 8080[0xf]