Return to bzero.c CVS log

Up to [local] / OpenXM / src / asir-doc / jtexindex / C

Annotation of OpenXM/src/asir-doc/jtexindex/C/bzero.c, Revision 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 */