Rev 134 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 134 | Rev 139 | ||
---|---|---|---|
Line 141... | Line 141... | ||
141 | int 0x40 |
141 | int 0x40 |
142 | } |
142 | } |
Line 143... | Line -... | ||
143 | - | ||
144 | - | ||
145 | - | ||
146 | ; language for programs |
- | |
147 | lang fix ru ; ru en fr ge fi |
- | |
148 | 143 | ||
149 | 144 | ||
Line 150... | Line 145... | ||
150 | 145 | ||
151 | ; optimize the code for size |
146 | ; optimize the code for size |
Line 177... | Line 172... | ||
177 | end if |
172 | end if |
178 | } |
173 | } |
Line 179... | Line 174... | ||
179 | 174 | ||
180 | macro mov arg1,arg2 |
175 | macro mov arg1,arg2 |
181 | { |
176 | { |
182 | if (arg1 in __regs) & (arg2 eqtype 0) |
177 | if (arg1 in __regs) & ((arg2 eqtype 0) | (arg2 eqtype '0')) |
183 | if (arg2) = 0 |
178 | if (arg2) = 0 |
184 | xor arg1,arg1 |
179 | xor arg1,arg1 |
185 | else if (arg2) = 1 |
180 | else if (arg2) = 1 |
186 | xor arg1,arg1 |
181 | xor arg1,arg1 |