purge remaining gpl code from clib, and make clib build again
[tangerine.git] / compiler / clib / scanf.c
blob0293d270277963f6bc483b820e3add4856e1d5af
1 /*
2 Copyright © 1995-2003, The AROS Development Team. All rights reserved.
3 $Id$
5 ANSI C function scanf().
6 */
8 /*****************************************************************************
10 NAME */
11 #include <stdio.h>
12 #include <stdarg.h>
14 int scanf (
16 /* SYNOPSIS */
17 const char * format,
18 ...)
20 /* FUNCTION
22 INPUTS
24 RESULT
25 The number of converted parameters
27 NOTES
29 EXAMPLE
31 BUGS
33 SEE ALSO
34 fscanf(), vscanf(), vfscanf(), sscanf(), vsscanf(),
35 vnsscanf()
37 INTERNALS
39 ******************************************************************************/
41 int retval;
42 va_list args;
44 va_start (args, format);
46 retval = vfscanf (stdin, format, args);
48 va_end (args);
50 fflush (stdout);
52 return retval;
53 } /* scanf */