Mercurial > hg > octave-nkf > gnulib-hg
view lib/unistr/u32-strcspn.c @ 14079:97fc9a21a8fb
maint: update almost all copyright ranges to include 2011
Run the new "make update-copyright" rule.
author | Jim Meyering <meyering@redhat.com> |
---|---|
date | Sat, 01 Jan 2011 20:17:23 +0100 |
parents | c2cbabec01dd |
children | 8250f2777afc |
line wrap: on
line source
/* Search for some characters in UTF-32 string. Copyright (C) 1999, 2002, 2006, 2009-2011 Free Software Foundation, Inc. Written by Bruno Haible <bruno@clisp.org>, 2002. This program is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 3 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see <http://www.gnu.org/licenses/>. */ #include <config.h> /* Specification. */ #include "unistr.h" #define FUNC u32_strcspn #define UNIT uint32_t #define U_STRLEN u32_strlen #define U_STRCHR u32_strchr size_t FUNC (const UNIT *str, const UNIT *reject) { /* Optimize two cases. */ if (reject[0] == 0) return U_STRLEN (str); if (reject[1] == 0) { ucs4_t uc = reject[0]; const UNIT *ptr = str; for (; *ptr != 0; ptr++) if (*ptr == uc) break; return ptr - str; } /* General case. */ { const UNIT *ptr = str; for (; *ptr != 0; ptr++) if (U_STRCHR (reject, *ptr)) break; return ptr - str; } }