aboutsummaryrefslogtreecommitdiff
path: root/unix/as.macintel/amovd.c
blob: 0cfa8906c94731bdb1ded96eb9c358cf9957f871 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
/* Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.
 */

#define import_spp
#define import_knames
#include <iraf.h>

/* AMOVD -- Copy a block of memory.
 * [Specially optimized for Sun/IRAF].
 */
AMOVD (a, b, n)
XDOUBLE	*a, *b;
XINT	*n;
{
	if (a != b)
	    memmove ((char *)b, (char *)a, *n * sizeof(*a));
}