|
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: 2048 (0x800)
Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_3c7cc5
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0238 | 8 | .CONST 0x0238 ; 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 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0092 | | .CONST 0x0092 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0010 | | .CONST 0x0010 ; Number of locals
000b INIT_0008:
000b 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated
000d 00bf | | Action Accept_Activation
000e e002 | | Load 0x0,0x2
000f 0337 | 7 | Declare_Variable Array
0010 4801 |H | Short_Literal 0x1
0011 480e |H | Short_Literal 0xe
0012 e003 | | Load 0x0,0x3
0013 035b | [ | Declare_Type Array,Constrained
0014 0337 | 7 | Declare_Variable Array
0015 483e |H> | Short_Literal 0x3e
0016 4801 |H | Short_Literal 0x1
0017 00da | | Load_Top At_Offset_2
0018 01d6 | | Execute Vector,Field_Write
0019 4813 |H | Short_Literal 0x13
001a 4802 |H | Short_Literal 0x2
001b 00da | | Load_Top At_Offset_2
001c 01d6 | | Execute Vector,Field_Write
001d 4842 |HB | Short_Literal 0x42
001e 4803 |H | Short_Literal 0x3
001f 00da | | Load_Top At_Offset_2
0020 01d6 | | Execute Vector,Field_Write
0021 4803 |H | Short_Literal 0x3
0022 4804 |H | Short_Literal 0x4
0023 00da | | Load_Top At_Offset_2
0024 01d6 | | Execute Vector,Field_Write
0025 4835 |H5 | Short_Literal 0x35
0026 4805 |H | Short_Literal 0x5
0027 00da | | Load_Top At_Offset_2
0028 01d6 | | Execute Vector,Field_Write
0029 4837 |H7 | Short_Literal 0x37
002a 4806 |H | Short_Literal 0x6
002b 00da | | Load_Top At_Offset_2
002c 01d6 | | Execute Vector,Field_Write
002d 4838 |H8 | Short_Literal 0x38
002e 4807 |H | Short_Literal 0x7
002f 00da | | Load_Top At_Offset_2
0030 01d6 | | Execute Vector,Field_Write
0031 4829 |H) | Short_Literal 0x29
0032 4808 |H | Short_Literal 0x8
0033 00da | | Load_Top At_Offset_2
0034 01d6 | | Execute Vector,Field_Write
0035 482a |H* | Short_Literal 0x2a
0036 4809 |H | Short_Literal 0x9
0037 00da | | Load_Top At_Offset_2
0038 01d6 | | Execute Vector,Field_Write
0039 482b |H+ | Short_Literal 0x2b
003a 480a |H | Short_Literal 0xa
003b 00da | | Load_Top At_Offset_2
003c 01d6 | | Execute Vector,Field_Write
003d 4827 |H' | Short_Literal 0x27
003e 480b |H | Short_Literal 0xb
003f 00da | | Load_Top At_Offset_2
0040 01d6 | | Execute Vector,Field_Write
0041 4825 |H% | Short_Literal 0x25
0042 480c |H | Short_Literal 0xc
0043 00da | | Load_Top At_Offset_2
0044 01d6 | | Execute Vector,Field_Write
0045 4839 |H9 | Short_Literal 0x39
0046 480d |H | Short_Literal 0xd
0047 00da | | Load_Top At_Offset_2
0048 01d6 | | Execute Vector,Field_Write
0049 484a |HJ | Short_Literal 0x4a
004a 480e |H | Short_Literal 0xe
004b 00da | | Load_Top At_Offset_2
004c 01d6 | | Execute Vector,Field_Write
004d 8004 | | Call 0x0,0x4
004e 00d9 | | Load_Top At_Offset_1
004f 01d4 | | Execute Vector,Structure_Write
0050 e002 | | Load 0x0,0x2
0051 0337 | 7 | Declare_Variable Array
0052 4801 |H | Short_Literal 0x1
0053 480d |H | Short_Literal 0xd
0054 e003 | | Load 0x0,0x3
0055 035b | [ | Declare_Type Array,Constrained
0056 0337 | 7 | Declare_Variable Array
0057 483e |H> | Short_Literal 0x3e
0058 4801 |H | Short_Literal 0x1
0059 00da | | Load_Top At_Offset_2
005a 01d6 | | Execute Vector,Field_Write
005b 4842 |HB | Short_Literal 0x42
005c 4802 |H | Short_Literal 0x2
005d 00da | | Load_Top At_Offset_2
005e 01d6 | | Execute Vector,Field_Write
005f 4803 |H | Short_Literal 0x3
0060 4803 |H | Short_Literal 0x3
0061 00da | | Load_Top At_Offset_2
0062 01d6 | | Execute Vector,Field_Write
0063 4837 |H7 | Short_Literal 0x37
0064 4804 |H | Short_Literal 0x4
0065 00da | | Load_Top At_Offset_2
0066 01d6 | | Execute Vector,Field_Write
0067 4838 |H8 | Short_Literal 0x38
0068 4805 |H | Short_Literal 0x5
0069 00da | | Load_Top At_Offset_2
006a 01d6 | | Execute Vector,Field_Write
006b 482a |H* | Short_Literal 0x2a
006c 4806 |H | Short_Literal 0x6
006d 00da | | Load_Top At_Offset_2
006e 01d6 | | Execute Vector,Field_Write
006f 482b |H+ | Short_Literal 0x2b
0070 4807 |H | Short_Literal 0x7
0071 00da | | Load_Top At_Offset_2
0072 01d6 | | Execute Vector,Field_Write
0073 4827 |H' | Short_Literal 0x27
0074 4808 |H | Short_Literal 0x8
0075 00da | | Load_Top At_Offset_2
0076 01d6 | | Execute Vector,Field_Write
0077 4825 |H% | Short_Literal 0x25
0078 4809 |H | Short_Literal 0x9
0079 00da | | Load_Top At_Offset_2
007a 01d6 | | Execute Vector,Field_Write
007b 4839 |H9 | Short_Literal 0x39
007c 480a |H | Short_Literal 0xa
007d 00da | | Load_Top At_Offset_2
007e 01d6 | | Execute Vector,Field_Write
007f 484a |HJ | Short_Literal 0x4a
0080 480b |H | Short_Literal 0xb
0081 00da | | Load_Top At_Offset_2
0082 01d6 | | Execute Vector,Field_Write
0083 4841 |HA | Short_Literal 0x41
0084 480c |H | Short_Literal 0xc
0085 00da | | Load_Top At_Offset_2
0086 01d6 | | Execute Vector,Field_Write
0087 483d |H= | Short_Literal 0x3d
0088 480d |H | Short_Literal 0xd
0089 00da | | Load_Top At_Offset_2
008a 01d6 | | Execute Vector,Field_Write
008b 8004 | | Call 0x0,0x4
008c 00d9 | | Load_Top At_Offset_1
008d 01d4 | | Execute Vector,Structure_Write
008e 029d 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call
0090 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0091 00c7 | | Action Elaborate_Subprogram
0092 BODY_0008:
0092 00bc | | Action Signal_Activated
0093 00bb | | Action Signal_Completion
0094 0000 0000 | | .BLANK 0000[0x4]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009b | | .CONST 0x009b ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0001 | | .CONST 0x0001 ; Number of locals
009b BODY_0098:
009b INIT_0098:
009b e5fb | | Load 0x2,-0x5
009c e5fc | | Load 0x2,-0x4
009d e5fd | | Load 0x2,-0x3
009e e5fe | | Load 0x2,-0x2
009f e5ff | | Load 0x2,-0x1
00a0 8210 | | Call 0x1,0x10
00a1 c5fb | | Store 0x2,-0x5
00a2 00cf | | Action Mark_Auxiliary
00a3 7808 |x | Jump 0xac
00a4 e5fb | | Load 0x2,-0x5
00a5 e5fc | | Load 0x2,-0x4
00a6 e5fd | | Load 0x2,-0x3
00a7 e5fe | | Load 0x2,-0x2
00a8 e5ff | | Load 0x2,-0x1
00a9 8210 | | Call 0x1,0x10
00aa c5fb | | Store 0x2,-0x5
00ab 00c9 | | Action Pop_Auxiliary_Loop
00ac e20e | | Load 0x1,0xe
00ad 8005 | | Call 0x0,0x5
00ae 8006 | | Call 0x0,0x6
00af 77f4 |w | Jump_Nonzero 0xa4
00b0 4505 |E | Exit_Suprogram New_Top_Offset 0x5
00b1 0000 0000 | | .BLANK 0000[0x7]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00e1 | | .CONST 0x00e1 ; Address of begin
00b9 0004 | | .CONST 0x0004 ; Address of exception handler
00ba 000a | | .CONST 0x000a ; Number of locals
00bb INIT_00b8:
00bb e007 | | Load 0x0,0x7
00bc 0007 | | Action Break_Optional
00bd 4820 |H | Short_Literal 0x20
00be e008 | | Load 0x0,0x8
00bf 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00c0 1c08 | | Execute_Immediate Run_Utility,0x8
00c1 00d8 | | Load_Top At_Offset_0
00c2 1c00 | | Execute_Immediate Run_Utility,0x0
00c3 4820 |H | Short_Literal 0x20
00c4 e008 | | Load 0x0,0x8
00c5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00c6 1c08 | | Execute_Immediate Run_Utility,0x8
00c7 00d8 | | Load_Top At_Offset_0
00c8 1c00 | | Execute_Immediate Run_Utility,0x0
00c9 4820 |H | Short_Literal 0x20
00ca e008 | | Load 0x0,0x8
00cb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00cc 1c08 | | Execute_Immediate Run_Utility,0x8
00cd 00d8 | | Load_Top At_Offset_0
00ce 1c00 | | Execute_Immediate Run_Utility,0x0
00cf 4820 |H | Short_Literal 0x20
00d0 e008 | | Load 0x0,0x8
00d1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00d2 1c08 | | Execute_Immediate Run_Utility,0x8
00d3 00d8 | | Load_Top At_Offset_0
00d4 1c00 | | Execute_Immediate Run_Utility,0x0
00d5 4820 |H | Short_Literal 0x20
00d6 e008 | | Load 0x0,0x8
00d7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00d8 1c08 | | Execute_Immediate Run_Utility,0x8
00d9 00d8 | | Load_Top At_Offset_0
00da 1c00 | | Execute_Immediate Run_Utility,0x0
00db e007 | | Load 0x0,0x7
00dc 0007 | | Action Break_Optional
00dd e009 | | Load 0x0,0x9
00de 0007 | | Action Break_Optional
00df e00a | | Load 0x0,0xa
00e0 0322 | " | Declare_Variable Record
00e1 BODY_00b8:
00e1 e00b | | Load 0x0,0xb
00e2 8005 | | Call 0x0,0x5
00e3 8006 | | Call 0x0,0x6
00e4 6808 |h | Jump_Zero 0xed
00e5 e5fb | | Load 0x2,-0x5
00e6 e5fc | | Load 0x2,-0x4
00e7 e5fd | | Load 0x2,-0x3
00e8 e5fe | | Load 0x2,-0x2
00e9 e5ff | | Load 0x2,-0x1
00ea 800c | | Call 0x0,0xc
00eb c5fb | | Store 0x2,-0x5
00ec 4505 |E | Exit_Suprogram New_Top_Offset 0x5
00ed e00d | | Load 0x0,0xd
00ee 8005 | | Call 0x0,0x5
00ef 8006 | | Call 0x0,0x6
00f0 681a |h | Jump_Zero 0x10b
00f1 e404 | | Load 0x2,0x4
00f2 e403 | | Load 0x2,0x3
00f3 800e | | Call 0x0,0xe
00f4 00d2 | | Pop_Control Pop_Count_2
00f5 8005 | | Call 0x0,0x5
00f6 0f04 | | Execute_Immediate Equal,0x4
00f7 680e |h | Jump_Zero 0x106
00f8 800f | | Call 0x0,0xf
00f9 00d9 | | Load_Top At_Offset_1
00fa e5fe | | Load 0x2,-0x2
00fb e5ff | | Load 0x2,-0x1
00fc 8010 | | Call 0x0,0x10
00fd 003a | : | Store_Top Access,At_Offset_2
00fe e5fb | | Load 0x2,-0x5
00ff 00da | | Load_Top At_Offset_2
0100 e404 | | Load 0x2,0x4
0101 e403 | | Load 0x2,0x3
0102 8011 | | Call 0x0,0x11
0103 8012 | | Call 0x0,0x12
0104 c5fb | | Store 0x2,-0x5
0105 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0106 e20f | | Load 0x1,0xf
0107 0092 0217 | | Action Push_String_Extended,0x217 ; "Manque :="
0109 8013 | | Call 0x0,0x13
010a 4505 |E | Exit_Suprogram New_Top_Offset 0x5
010b 8005 | | Call 0x0,0x5
010c 00d8 | | Load_Top At_Offset_0
010d 0d25 | % | Execute_Immediate Less,0x25
010e 702e |p. | Jump_Nonzero 0x13d
010f 0adb | | Execute_Immediate Plus,-0x25
0110 4625 |F% | Jump_Case 0x26
0111 7831 |x1 | Jump 0x143 ; case 0x0
0112 782b |x+ | Jump 0x13e ; case 0x1
0113 78bb |x | Jump 0x1cf ; case 0x2
0114 7829 |x) | Jump 0x13e ; case 0x3
0115 7828 |x( | Jump 0x13e ; case 0x4
0116 7864 |xd | Jump 0x17b ; case 0x5
0117 7863 |xc | Jump 0x17b ; case 0x6
0118 7825 |x% | Jump 0x13e ; case 0x7
0119 7824 |x$ | Jump 0x13e ; case 0x8
011a 7823 |x# | Jump 0x13e ; case 0x9
011b 7822 |x" | Jump 0x13e ; case 0xa
011c 7821 |x! | Jump 0x13e ; case 0xb
011d 7820 |x | Jump 0x13e ; case 0xc
011e 781f |x | Jump 0x13e ; case 0xd
011f 781e |x | Jump 0x13e ; case 0xe
0120 781d |x | Jump 0x13e ; case 0xf
0121 781c |x | Jump 0x13e ; case 0x10
0122 781b |x | Jump 0x13e ; case 0x11
0123 7857 |xW | Jump 0x17b ; case 0x12
0124 7856 |xV | Jump 0x17b ; case 0x13
0125 78d2 |x | Jump 0x1f8 ; case 0x14
0126 7817 |x | Jump 0x13e ; case 0x15
0127 7816 |x | Jump 0x13e ; case 0x16
0128 7815 |x | Jump 0x13e ; case 0x17
0129 7814 |x | Jump 0x13e ; case 0x18
012a 7813 |x | Jump 0x13e ; case 0x19
012b 7812 |x | Jump 0x13e ; case 0x1a
012c 7811 |x | Jump 0x13e ; case 0x1b
012d 7810 |x | Jump 0x13e ; case 0x1c
012e 780f |x | Jump 0x13e ; case 0x1d
012f 780e |x | Jump 0x13e ; case 0x1e
0130 780d |x | Jump 0x13e ; case 0x1f
0131 780c |x | Jump 0x13e ; case 0x20
0132 780b |x | Jump 0x13e ; case 0x21
0133 780a |x | Jump 0x13e ; case 0x22
0134 7809 |x | Jump 0x13e ; case 0x23
0135 7808 |x | Jump 0x13e ; case 0x24
0136 7800 |x | Jump 0x137 ; case 0x25
0137 800f | | Call 0x0,0xf
0138 e5fb | | Load 0x2,-0x5
0139 8014 | | Call 0x0,0x14
013a 8012 | | Call 0x0,0x12
013b c5fb | | Store 0x2,-0x5
013c 4505 |E | Exit_Suprogram New_Top_Offset 0x5
013d 00d1 | | Pop_Control Pop_Count_1
013e e20f | | Load 0x1,0xf
013f 0092 0218 | | Action Push_String_Extended,0x218 ; "Mauvaise instruction"
0141 8013 | | Call 0x0,0x13
0142 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0143 8005 | | Call 0x0,0x5
0144 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0145 800f | | Call 0x0,0xf
0146 8005 | | Call 0x0,0x5
0147 0f0a | | Execute_Immediate Equal,0xa
0148 682d |h- | Jump_Zero 0x176
0149 800f | | Call 0x0,0xf
014a e405 | | Load 0x2,0x5
014b 8015 | | Call 0x0,0x15
014c 00d1 | | Pop_Control Pop_Count_1
014d 8005 | | Call 0x0,0x5
014e 0f0c | | Execute_Immediate Equal,0xc
014f 6821 |h! | Jump_Zero 0x171
0150 800f | | Call 0x0,0xf
0151 e406 | | Load 0x2,0x6
0152 8015 | | Call 0x0,0x15
0153 00d1 | | Pop_Control Pop_Count_1
0154 8005 | | Call 0x0,0x5
0155 0f0c | | Execute_Immediate Equal,0xc
0156 6815 |h | Jump_Zero 0x16c
0157 800f | | Call 0x0,0xf
0158 00db | | Load_Top At_Offset_3
0159 8015 | | Call 0x0,0x15
015a 00d1 | | Pop_Control Pop_Count_1
015b 8005 | | Call 0x0,0x5
015c 0f0b | | Execute_Immediate Equal,0xb
015d 6809 |h | Jump_Zero 0x167
015e 800f | | Call 0x0,0xf
015f e5fb | | Load 0x2,-0x5
0160 e407 | | Load 0x2,0x7
0161 e406 | | Load 0x2,0x6
0162 e405 | | Load 0x2,0x5
0163 8016 | | Call 0x0,0x16
0164 8012 | | Call 0x0,0x12
0165 c5fb | | Store 0x2,-0x5
0166 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0167 e20f | | Load 0x1,0xf
0168 0092 0219 | | Action Push_String_Extended,0x219 ; "Manque )"
016a 8013 | | Call 0x0,0x13
016b 4505 |E | Exit_Suprogram New_Top_Offset 0x5
016c e20f | | Load 0x1,0xf
016d 0092 021a | | Action Push_String_Extended,0x21a ; "Manque ,"
016f 8013 | | Call 0x0,0x13
0170 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0171 e20f | | Load 0x1,0xf
0172 0092 021a | | Action Push_String_Extended,0x21a ; "Manque ,"
0174 8013 | | Call 0x0,0x13
0175 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0176 e20f | | Load 0x1,0xf
0177 0092 021b | | Action Push_String_Extended,0x21b ; "Manque ("
0179 8013 | | Call 0x0,0x13
017a 4505 |E | Exit_Suprogram New_Top_Offset 0x5
017b 8005 | | Call 0x0,0x5
017c 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
017d 800f | | Call 0x0,0xf
017e 8005 | | Call 0x0,0x5
017f 0f0a | | Execute_Immediate Equal,0xa
0180 6849 |hI | Jump_Zero 0x1ca
0181 800f | | Call 0x0,0xf
0182 e405 | | Load 0x2,0x5
0183 8015 | | Call 0x0,0x15
0184 00d1 | | Pop_Control Pop_Count_1
0185 8005 | | Call 0x0,0x5
0186 0f0c | | Execute_Immediate Equal,0xc
0187 683d |h= | Jump_Zero 0x1c5
0188 800f | | Call 0x0,0xf
0189 e406 | | Load 0x2,0x6
018a 8015 | | Call 0x0,0x15
018b 00d1 | | Pop_Control Pop_Count_1
018c 8005 | | Call 0x0,0x5
018d 0f0b | | Execute_Immediate Equal,0xb
018e 6831 |h1 | Jump_Zero 0x1c0
018f 800f | | Call 0x0,0xf
0190 00da | | Load_Top At_Offset_2
0191 00d8 | | Load_Top At_Offset_0
0192 482a |H* | Short_Literal 0x2a
0193 4838 |H8 | Short_Literal 0x38
0194 0262 | b | Execute Discrete,In_Range
0195 680a |h | Jump_Zero 0x1a0
0196 0b2a | * | Execute_Immediate Case_Compare,0x2a
0197 7011 |p | Jump_Nonzero 0x1a9
0198 0b2b | + | Execute_Immediate Case_Compare,0x2b
0199 7017 |p | Jump_Nonzero 0x1b1
019a 00d8 | | Load_Top At_Offset_0
019b 0c37 | 7 | Execute_Immediate Greater_Equal,0x37
019c 6803 |h | Jump_Zero 0x1a0
019d 0f38 | 8 | Execute_Immediate Equal,0x38
019e 7003 |p | Jump_Nonzero 0x1a2
019f 7819 |x | Jump 0x1b9
01a0 00d1 | | Pop_Control Pop_Count_1
01a1 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01a2 e5fb | | Load 0x2,-0x5
01a3 e406 | | Load 0x2,0x6
01a4 e405 | | Load 0x2,0x5
01a5 8017 | | Call 0x0,0x17
01a6 8012 | | Call 0x0,0x12
01a7 c5fb | | Store 0x2,-0x5
01a8 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01a9 00d1 | | Pop_Control Pop_Count_1
01aa e5fb | | Load 0x2,-0x5
01ab e406 | | Load 0x2,0x6
01ac e405 | | Load 0x2,0x5
01ad 8018 | | Call 0x0,0x18
01ae 8012 | | Call 0x0,0x12
01af c5fb | | Store 0x2,-0x5
01b0 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01b1 00d1 | | Pop_Control Pop_Count_1
01b2 e5fb | | Load 0x2,-0x5
01b3 e406 | | Load 0x2,0x6
01b4 e405 | | Load 0x2,0x5
01b5 8018 | | Call 0x0,0x18
01b6 8012 | | Call 0x0,0x12
01b7 c5fb | | Store 0x2,-0x5
01b8 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01b9 e5fb | | Load 0x2,-0x5
01ba e406 | | Load 0x2,0x6
01bb e405 | | Load 0x2,0x5
01bc 8019 | | Call 0x0,0x19
01bd 8012 | | Call 0x0,0x12
01be c5fb | | Store 0x2,-0x5
01bf 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01c0 e20f | | Load 0x1,0xf
01c1 0092 0219 | | Action Push_String_Extended,0x219 ; "Manque )"
01c3 8013 | | Call 0x0,0x13
01c4 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01c5 e20f | | Load 0x1,0xf
01c6 0092 021a | | Action Push_String_Extended,0x21a ; "Manque ,"
01c8 8013 | | Call 0x0,0x13
01c9 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01ca e20f | | Load 0x1,0xf
01cb 0092 021b | | Action Push_String_Extended,0x21b ; "Manque ("
01cd 8013 | | Call 0x0,0x13
01ce 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01cf 800f | | Call 0x0,0xf
01d0 8005 | | Call 0x0,0x5
01d1 0f0a | | Execute_Immediate Equal,0xa
01d2 6820 |h | Jump_Zero 0x1f3
01d3 800f | | Call 0x0,0xf
01d4 e405 | | Load 0x2,0x5
01d5 8015 | | Call 0x0,0x15
01d6 00d1 | | Pop_Control Pop_Count_1
01d7 8005 | | Call 0x0,0x5
01d8 0f0c | | Execute_Immediate Equal,0xc
01d9 6814 |h | Jump_Zero 0x1ee
01da 800f | | Call 0x0,0xf
01db e007 | | Load 0x0,0x7
01dc 801a | | Call 0x0,0x1a
01dd c402 | | Store 0x2,0x2
01de 8005 | | Call 0x0,0x5
01df 0f0b | | Execute_Immediate Equal,0xb
01e0 6808 |h | Jump_Zero 0x1e9
01e1 800f | | Call 0x0,0xf
01e2 e5fb | | Load 0x2,-0x5
01e3 e402 | | Load 0x2,0x2
01e4 e405 | | Load 0x2,0x5
01e5 801b | | Call 0x0,0x1b
01e6 8012 | | Call 0x0,0x12
01e7 c5fb | | Store 0x2,-0x5
01e8 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01e9 e20f | | Load 0x1,0xf
01ea 0092 0219 | | Action Push_String_Extended,0x219 ; "Manque )"
01ec 8013 | | Call 0x0,0x13
01ed 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01ee e20f | | Load 0x1,0xf
01ef 0092 021a | | Action Push_String_Extended,0x21a ; "Manque ,"
01f1 8013 | | Call 0x0,0x13
01f2 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01f3 e20f | | Load 0x1,0xf
01f4 0092 021b | | Action Push_String_Extended,0x21b ; "Manque ("
01f6 8013 | | Call 0x0,0x13
01f7 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01f8 800f | | Call 0x0,0xf
01f9 8005 | | Call 0x0,0x5
01fa 0f0a | | Execute_Immediate Equal,0xa
01fb 6816 |h | Jump_Zero 0x212
01fc 800f | | Call 0x0,0xf
01fd 00d8 | | Load_Top At_Offset_0
01fe 801c | | Call 0x0,0x1c
01ff 00d1 | | Pop_Control Pop_Count_1
0200 00d8 | | Load_Top At_Offset_0
0201 801d | | Call 0x0,0x1d
0202 00d1 | | Pop_Control Pop_Count_1
0203 8005 | | Call 0x0,0x5
0204 0f0b | | Execute_Immediate Equal,0xb
0205 6807 |h | Jump_Zero 0x20d
0206 800f | | Call 0x0,0xf
0207 e5fb | | Load 0x2,-0x5
0208 00d9 | | Load_Top At_Offset_1
0209 801e | | Call 0x0,0x1e
020a 8012 | | Call 0x0,0x12
020b c5fb | | Store 0x2,-0x5
020c 4505 |E | Exit_Suprogram New_Top_Offset 0x5
020d e20f | | Load 0x1,0xf
020e 0092 0219 | | Action Push_String_Extended,0x219 ; "Manque )"
0210 8013 | | Call 0x0,0x13
0211 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0212 e20f | | Load 0x1,0xf
0213 0092 021b | | Action Push_String_Extended,0x21b ; "Manque ("
0215 8013 | | Call 0x0,0x13
0216 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0217 ; --------------------------------------------------------------------------------------
0217 ; STRING TABLE
0217 ; --------------------------------------------------------------------------------------
0217 000c | | .STRTAB 0x000c->0x021d ; "Manque :="
0218 0013 | | .STRTAB 0x0013->0x0221 ; "Mauvaise instruction"
0219 0025 | % | .STRTAB 0x0025->0x022b ; "Manque )"
021a 002b | + | .STRTAB 0x002b->0x022f ; "Manque ,"
021b 0031 | 1 | .STRTAB 0x0031->0x0233 ; "Manque ("
021c 0037 | 7 | .STREND 0x0037->0x0237
021d 4d61 6e71 |Manq| .STRTAB_STRINGS
0238 ; --------------------------------------------------------------------------------------
0238 ; Debug Table
0238 ; --------------------------------------------------------------------------------------
0238 0004 0008 | | .DEBUG4 0x0004,0x0008,0xd0eb,0x0000,0x0001,0x0004
023e 000b 024e | N| .DBG4T 0x000b,0x024e,0x8000,0x0000
0242 000e 0251 | Q| .DBG4T 0x000e,0x0251,0x8000,0x0000
0246 009b 0257 | W| .DBG4T 0x009b,0x0257,0x0001,0x4000
024a 00bb 025f | _| .DBG4T 0x00bb,0x025f,0x0001,0x4000
024e ; --------------------------------------------------------------------------------------
024e ; Debug chain
024e ; --------------------------------------------------------------------------------------
024e 0001 0000 | | .DBGLEN 0x0001,0x0000
0250 000b | | .DBGLNO 0x000b
0251 ; --------------------------------------------------------------------------------------
0251 ; Debug chain
0251 ; --------------------------------------------------------------------------------------
0251 0004 0000 | | .DBGLEN 0x0004,0x0000
0253 000e 0050 | P| .DBGLNO 0x000e,0x0050,0x008e,0x0090
0257 ; --------------------------------------------------------------------------------------
0257 ; Debug chain
0257 ; --------------------------------------------------------------------------------------
0257 0000 0003 | | .DBGLEN 0x0000,0x0003
0259 009b 00a4 | | .DBGLNO 0x009b,0x00a4,0x00ac
025c 0001 0003 | | .XXX[0x3]
025e 0002 | |
025f ; --------------------------------------------------------------------------------------
025f ; Debug chain
025f ; --------------------------------------------------------------------------------------
025f 0006 0048 | H| .DBGLEN 0x0006,0x0048
0261 00bb 00bd | | .DBGLNO 0x00bb,0x00bd,0x00c9,0x00db,0x00dd,0x00df,0x00e1,0x00e5,0x00ed,0x00f1,0x00f5,0x00f8,0x00f9,0x00fe,0x0106,0x010b,0x0137,0x0138,0x013e,0x0143,0x0145,0x0146,0x0149,0x014a,0x014d,0x0150,0x0151,0x0154,0x0157,0x0158,0x015b,0x015e,0x015f,0x0167,0x016c,0x0171,0x0176,0x017b,0x017d,0x017e,0x0181,0x0182,0x0185,0x0188,0x0189,0x018c,0x018f,0x0190,0x01a2,0x01aa,0x01b2,0x01b9,0x01c0,0x01c5,0x01ca,0x01cf,0x01d0,0x01d3,0x01d4,0x01d7,0x01da,0x01db,0x01de,0x01e1,0x01e2,0x01e9,0x01ee,0x01f3,0x01f8,0x01f9,0x01fc,0x01fd,0x0200,0x0203,0x0206,0x0207,0x020d,0x0212
02af 0001 0002 | | .XXX[0x48]
02b1 0003 0004 | |
02b3 0005 0006 | |
02b5 0007 0008 | |
02b7 0009 000a | |
02b9 0047 0048 | G H|
02bb 0049 000b | I |
02bd 000c 000d | |
02bf 000e 000f | |
02c1 0010 0011 | |
02c3 0012 0013 | |
02c5 0014 0015 | |
02c7 0016 0017 | |
02c9 0018 0019 | |
02cb 001a 001b | |
02cd 001c 001d | |
02cf 001e 001f | |
02d1 0020 0021 | !|
02d3 0022 0023 | " #|
02d5 0024 0025 | $ %|
02d7 0026 0027 | & '|
02d9 0029 002a | ) *|
02db 002b 0028 | + (|
02dd 002d 002e | - .|
02df 002f 0030 | / 0|
02e1 0031 0032 | 1 2|
02e3 0033 0034 | 3 4|
02e5 0035 0036 | 5 6|
02e7 0037 0038 | 7 8|
02e9 0039 003a | 9 :|
02eb 003b 003c | ; <|
02ed 003d 003e | = >|
02ef 003f 0040 | ? @|
02f1 0041 0042 | A B|
02f3 0043 0044 | C D|
02f5 0045 0046 | E F|
02f7 0000 0000 | | .BLANK 0000[0x109]