Mercurial > hg > xemacs-beta
comparison src/lread.c @ 142:1856695b1fa9 r20-2b5
Import from CVS: tag r20-2b5
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:33:18 +0200 |
parents | 585fb297b004 |
children | 538048ae2ab8 |
comparison
equal
deleted
inserted
replaced
141:ea67ad3963dc | 142:1856695b1fa9 |
---|---|
1845 } | 1845 } |
1846 | 1846 |
1847 if (p == lim) | 1847 if (p == lim) |
1848 goto loser; | 1848 goto loser; |
1849 | 1849 |
1850 for (; p < lim; p++) | 1850 for (; (p < lim) && (*p != '\0'); p++) |
1851 { | 1851 { |
1852 int c = *p; | 1852 int c = *p; |
1853 unsigned EMACS_INT onum; | 1853 unsigned EMACS_INT onum; |
1854 | 1854 |
1855 if (isdigit (c)) | 1855 if (isdigit (c)) |