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

   1 ;
   2 ; Maciej 'YTM/Elysium' Witkowiak
   3 ;
   4 ; 22.12.99, 29.07.2000
   5
   6 ; void CopyFString (char length, char *dest, char* source);
   7
   8             .import DoubleSPop, SetPtrXY
   9             .import popa
  10             .export _CopyFString
  11
  12             .include "jumptab.inc"
  13
  14 _CopyFString:
  15         jsr DoubleSPop
  16         jsr popa
  17         jsr SetPtrXY
  18         jmp CopyFString