|  | /* Copyright (C) 2013-2016 Free Software Foundation, Inc. | 
|  | This file is part of the GNU C Library. | 
|  |  | 
|  | The GNU C Library 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 2.1 of the License, or (at your option) any later version. | 
|  |  | 
|  | The GNU C Library 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 the GNU C Library; if not, see | 
|  | <http://www.gnu.org/licenses/>.  */ | 
|  |  | 
|  | #include <stdio.h> | 
|  | #include <string.h> | 
|  |  | 
|  | int | 
|  | main (void) | 
|  | { | 
|  | FILE *f; | 
|  | int lost = 0; | 
|  | int c; | 
|  | double d; | 
|  | char s[] = "+.e"; | 
|  |  | 
|  | f = fmemopen (s, strlen (s), "r"); | 
|  | /* This should fail to parse a floating-point number, and leave 'e' in the | 
|  | input.  */ | 
|  | lost |= (fscanf (f, "%lf", &d) != 0); | 
|  | c = fgetc (f); | 
|  | lost |= c != 'e'; | 
|  | puts (lost ? "Test FAILED!" : "Test succeeded."); | 
|  | return lost; | 
|  | } |