/*
   memcpy and memcpyl.
   
   See COPYLEFT.JRD.
*/

#ifdef __GNUC__
/* doing things right, 32-bit ints? ok, just do it this way... */
asm (".text");
asm (".even\n.globl _memcpy\n_memcpy:");
#else
char * memcpyl(buf1, buf2, nbytes)
char * buf1;
char * buf2;
int nbytes;
{
  return(memcpyl(buf1, buf2, nbytes));
}
#endif

char * memcpyl(buf1, buf2, nbytes)
char * buf1;
char * buf2;
long nbytes;
{
  char * result = buf1;

  for ( ; nbytes > 0 ; --nbytes)
	*buf1++ = *buf2++;
  return(result);
}