|
|
1.1 root 1: /* Copyright (c) 1979 Regents of the University of California */
2:
3: static char sccsid[] = "@(#)ZFRAME.c 1.1 10/29/80";
4:
5: ZFRAME(size, ptr)
6:
7: int size;
8: register long *ptr;
9: {
10: register long *end;
11: short *sptr;
12:
13: end = ptr + (size / sizeof(long));
14: for (; ptr < end; *ptr++ = 0)
15: /* void */;
16: if (size % sizeof(long)) {
17: sptr = (short *)ptr;
18: *sptr = 0;
19: }
20: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.