git.sur5r.net Git - cc65/blob - libsrc/geos-common/memory/fillram.s

   1 ;
   2 ; Maciej 'YTM/Elysium' Witkowiak
   3 ;
   4 ; 30.10.99, 15.07.2001
   5
   6 ; void * FillRam         (char *dest, char what, int length);
   7
   8             .import popa, popax
   9             .export _FillRam
  10
  11             .include "jumptab.inc"
  12             .include "geossym.inc"
  13
  14 _FillRam:
  15         sta r0L
  16         stx r0H
  17         jsr popa
  18         sta r2L
  19         jsr popax
  20         sta r1L
  21         stx r1H
  22         pha
  23         txa
  24         pha
  25         jsr FillRam
  26         pla
  27         tax
  28         pla
  29         rts