Subversion Repositories Kolibri OS

Rev

Rev 5941 | Rev 5943 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5941 Rev 5942
Line 396... Line 396...
396 
 }
 396 
 }
Line 397... Line 397...
397 
 
 397 
 
398 
; optimize the code for size
 398 
; optimize the code for size
Line 399... Line -...
399 
__regs fix
- 
 
400 
 
 - 
 
401 
macro cmp arg1,arg2
 - 
 
402 
{
 - 
 
403 
  if (arg1 in __regs) & (arg2 eqtype 0)
 - 
 
404 
    if (arg2) = 0
 - 
 
405 
      test arg1,arg1
 - 
 
406 
    else
 - 
 
407 
      cmp arg1,arg2
 - 
 
408 
    end if
 - 
 
409 
  else
 - 
 
410 
    cmp arg1,arg2
 - 
 
411 
  end if
 - 
 
412 
}
 - 
 
413 
 
 - 
 
414 
macro add arg1,arg2
 - 
 
415 
 {
 - 
 
416 
   if (arg2 eqtype 0)
 - 
 
417 
      if (arg2) = 1
 - 
 
418 
     inc arg1
 - 
 
419 
      else
 - 
 
420 
     add arg1,arg2
 - 
 
421 
      end if
 - 
 
422 
   else
 - 
 
423 
      add arg1,arg2
 - 
 
424 
   end if
 - 
 
425 
 }
 - 
 
426 
 
 - 
 
427 
macro sub arg1,arg2
 - 
 
428 
 {
 - 
 
429 
   if (arg2 eqtype 0)
 - 
 
430 
      if (arg2) = 1
 - 
 
431 
     dec arg1
 - 
 
432 
      else
 - 
 
433 
     sub arg1,arg2
 - 
 
434 
      end if
 - 
 
435 
   else
 - 
 
436 
      sub arg1,arg2
 - 
 
437 
   end if
 - 
 
438 
 }
 399 
__regs fix
439 
 
 400 
 
440 
macro mov arg1,arg2
 401 
macro mov arg1,arg2
441 
 {
 402 
 {
442 
   if (arg1 in __regs) & ((arg2 eqtype 0) | (arg2 eqtype '0'))
 403 
   if (arg1 in __regs) & ((arg2 eqtype 0) | (arg2 eqtype '0'))