git.sur5r.net Git - cc65/blob - libsrc/runtime/gt.s

   1 ;
   2 ; Ullrich von Bassewitz, 06.08.1998
   3 ;
   4 ; CC65 runtime: Compare > for signed ints
   5 ;
   6
   7         .export         tosgt00, tosgta0, tosgtax
   8         .import         tosicmp, boolgt
   9
  10
  11 tosgt00:
  12         lda     #$00
  13 tosgta0:
  14         ldx     #$00
  15 tosgtax:
  16         jsr     tosicmp         ; Set the flags
  17         jmp     boolgt          ; Convert to boolean
  18