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

   1 ;
   2 ; Ullrich von Bassewitz, 06.08.1998
   3 ;
   4 ; CC65 runtime: Compare >= for unsigned ints
   5 ;
   6
   7         .export         tosuge00, tosugea0, tosugeax
   8         .import         tosicmp, booluge
   9
  10
  11 tosuge00:
  12         lda     #$00
  13 tosugea0:
  14         ldx     #$00
  15 tosugeax:
  16         jsr     tosicmp         ; Set flags
  17         jmp     booluge         ; Convert to boolean
  18
  19
  20