blob: 15d63e39e57aefd0abb6bd8def42af0553bdfc8a (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
/* Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.
*/
#define import_spp
#define import_knames
#include <iraf.h>
/* ACLRB -- Clear a block of memory.
*/
void
ACLRB (XCHAR *a, XINT *nbytes)
{
register char *p;
register int n;
for (p=(char *)a, n = *nbytes; --n >= 0; )
*p++ = 0;
}
|
