git.sur5r.net Git - cc65/blob - ge.s

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