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

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