Mercurial > emacs
changeset 11172:e1ca77e22c12
(isfloat_string): Permit trailing space.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Fri, 31 Mar 1995 19:16:44 +0000 |
| parents | 89d742696b3d |
| children | f1a876b8bf5c |
| files | src/lread.c |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/lread.c Fri Mar 31 19:13:22 1995 +0000 +++ b/src/lread.c Fri Mar 31 19:16:44 1995 +0000 @@ -1453,7 +1453,7 @@ while (*cp >= '0' && *cp <= '9') cp++; } - return (*cp == 0 + return (((*cp == 0) || (*cp == ' ') || (*cp == '\t') || (*cp == '\n') || (*cp == '\r') || (*cp == '\f')) && (state == (LEAD_INT|DOT_CHAR|TRAIL_INT) || state == (DOT_CHAR|TRAIL_INT) || state == (LEAD_INT|E_CHAR|EXP_INT)