Annotation of OpenXM/src/asir-doc/jtexindex/C/bzero.c, Revision 1.1.1.1
1.1 noro 1: /*
2: * Copyright (C) 1993 Free Software Foundation, Inc.
3: *
4: * This program is free software; you can redistribute it and/or modify
5: * it under the terms of the GNU General Public License as published by
6: * the Free Software Foundation; either version 2, or (at your option)
7: * any later version.
8: *
9: * This program is distributed in the hope that it will be useful,
10: * but WITHOUT ANY WARRANTY; without even the implied warranty of
11: * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12: * GNU General Public License for more details.
13: *
14: * You should have received a copy of the GNU General Public License
15: * along with this program; if not, you can either send email to this
16: * program's author (see below) or write to: The Free Software Foundation,
17: * Inc.; 59 Temple Place - Suite 330. Boston, MA 02111-1307, USA.
18: */
19:
20: #if !defined (HAVE_MEMSET) && !defined (HAVE_BZERO)
21:
22: void
23: bzero (b, length)
24: register char *b;
25: register int length;
26: {
27: #ifdef VMS /* but this is definitely VMS-specific */
28: short zero = 0;
29: long max_str = 65535;
30:
31: while (length > max_str)
32: {
33: (void) LIB$MOVC5 (&zero, &zero, &zero, &max_str, b);
34: length -= max_str;
35: b += max_str;
36: }
37: (void) LIB$MOVC5 (&zero, &zero, &zero, &length, b);
38: #else
39: while (length-- > 0)
40: *b++ = 0;
41: #endif /* not VMS */
42: }
43:
44: #endif /* not HAVE_MEMSET && not HAVE_BZERO */
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>