diff options
| author | Jim Blandy <jimb@redhat.com> | 1992-07-21 04:09:28 +0000 |
|---|---|---|
| committer | Jim Blandy <jimb@redhat.com> | 1992-07-21 04:09:28 +0000 |
| commit | 151bdc833ef6611acf656aef027513d578b44592 (patch) | |
| tree | da1b882779041aa7d7d30c58224673c92cd611f3 /src/lread.c | |
| parent | 0b0ef30f7987eb125e05d0a653036cd7f58a6c43 (diff) | |
| download | emacs-151bdc833ef6611acf656aef027513d578b44592.tar.gz | |
*** empty log message ***
Diffstat (limited to 'src/lread.c')
| -rw-r--r-- | src/lread.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/lread.c b/src/lread.c index db0ff297783..279f64a81b7 100644 --- a/src/lread.c +++ b/src/lread.c @@ -1049,8 +1049,10 @@ isfloat_string (cp) } return (*cp == 0 && (state == (LEAD_INT|DOT_CHAR|TRAIL_INT) + || state == (DOT_CHAR|TRAIL_INT) || state == (LEAD_INT|E_CHAR|EXP_INT) - || state == (LEAD_INT|DOT_CHAR|TRAIL_INT|E_CHAR|EXP_INT))); + || state == (LEAD_INT|DOT_CHAR|TRAIL_INT|E_CHAR|EXP_INT) + || state == (DOT_CHAR|TRAIL_INT|E_CHAR|EXP_INT))); } #endif /* LISP_FLOAT_TYPE */ |