Quash warning in s_sincosl.
[platform/upstream/glibc.git] / stdio-common / fprintf.c
1 /* Copyright (C) 1991, 1997, 2002, 2004, 2006 Free Software Foundation, Inc.
2    This file is part of the GNU C Library.
3
4    The GNU C Library is free software; you can redistribute it and/or
5    modify it under the terms of the GNU Lesser General Public
6    License as published by the Free Software Foundation; either
7    version 2.1 of the License, or (at your option) any later version.
8
9    The GNU C Library 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 GNU
12    Lesser General Public License for more details.
13
14    You should have received a copy of the GNU Lesser General Public
15    License along with the GNU C Library; if not, see
16    <http://www.gnu.org/licenses/>.  */
17
18 #include <stdarg.h>
19 #include <stdio.h>
20 #include <libioP.h>
21
22
23 /* Write formatted output to STREAM from the format string FORMAT.  */
24 /* VARARGS2 */
25 int
26 __fprintf (FILE *stream, const char *format, ...)
27 {
28   va_list arg;
29   int done;
30
31   va_start (arg, format);
32   done = vfprintf (stream, format, arg);
33   va_end (arg);
34
35   return done;
36 }
37 ldbl_hidden_def (__fprintf, fprintf)
38 ldbl_strong_alias (__fprintf, fprintf)
39
40 /* We define the function with the real name here.  But deep down in
41    libio the original function _IO_fprintf is also needed.  So make
42    an alias.  */
43 ldbl_weak_alias (__fprintf, _IO_fprintf)