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

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