Mercurial > hg > octave-nkf > gnulib-hg

annotate lib/wcslen-impl.h @ 16040:b8acd8099b25

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
New module 'fmaf'. * lib/math.in.h (fmaf): New declaration. * lib/fmaf.c: New file. * m4/fmaf.m4: New file. * m4/math_h.m4 (gl_MATH_H): Test whethern fmaf is declared. (gl_MATH_H_DEFAULTS): Initialize GNULIB_FMAF, HAVE_FMAF, REPLACE_FMAF. * modules/math (Makefile.am): Substitute GNULIB_FMAF, HAVE_FMAF, REPLACE_FMAF. * modules/fmaf: New file. * doc/posix-functions/fmaf.texi: Mention the new module and the various bugs.
author Bruno Haible <bruno@clisp.org>
date Mon, 17 Oct 2011 23:51:21 +0200 (2011-10-17)
parents cae17a11c789
children 8250f2777afc
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
14281
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
1 /* Determine the length of a wide string.
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
2 Copyright (C) 1999, 2011 Free Software Foundation, Inc.
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
3 Written by Bruno Haible <bruno@clisp.org>, 1999.
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
4
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
5 This program is free software: you can redistribute it and/or modify
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
6 it under the terms of the GNU General Public License as published by
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
7 the Free Software Foundation; either version 3 of the License, or
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
8 (at your option) any later version.
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
9
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
10 This program is distributed in the hope that it will be useful,
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
13 GNU General Public License for more details.
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
14
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
15 You should have received a copy of the GNU General Public License
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
16 along with this program. If not, see <http://www.gnu.org/licenses/>. */
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
17
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
18 size_t
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
19 wcslen (const wchar_t *s)
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
20 {
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
21 const wchar_t *ptr;
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
22
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
23 for (ptr = s; *ptr != (wchar_t)'\0'; ptr++)
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
24 ;
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
25 return ptr - s;
cae17a11c789 New module 'wcslen'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
26 }