|
|
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.