Missing entry from previous commit:
* io/unix.c (fd_to_stream): Add an avoid_mmap argument indicating
we don't we to mmap this stream. Use fd_open instead of mmap_open
in that case.
(open_external): Call fd_to_stream with avoid_mmap = 0.
(input_stream): Call fd_to_stream with avoid_mmap = 1.
(output_stream): Likewise.
(error_stream): Likewise.
Really committing:
* io/read.c (read_f): Accept 'e', 'E', 'd' and 'D' as first
non-blank characters of a real number.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@99508
138bc75d-0d04-0410-961f-
82ee72b054a4
+2005-05-10 Francois-Xavier Coudert <coudert@clipper.ens.fr>
+
+ PR libfortran/20788
+ * io/unix.c (fd_to_stream): Add an avoid_mmap argument indicating
+ we don't we to mmap this stream. Use fd_open instead of mmap_open
+ in that case.
+ (open_external): Call fd_to_stream with avoid_mmap = 0.
+ (input_stream): Call fd_to_stream with avoid_mmap = 1.
+ (output_stream): Likewise.
+ (error_stream): Likewise.
+
2005-05-09 Mike Stump <mrs@apple.com>
* configure: Regenerate.
exponent_sign = 1;
- /* A digit (or a '.') is required at this point */
+ /* A digit, a '.' or a exponent character ('e', 'E', 'd' or 'D')
+ is required at this point */
- if (!isdigit (*p) && *p != '.')
+ if (!isdigit (*p) && *p != '.' && *p != 'd' && *p != 'D'
+ && *p != 'e' && *p != 'E')
goto bad_float;
/* Remember the position of the first digit. */