1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-30 08:09:04 +00:00

(GET_UNSIGNED_NUMBER): Give proper error for spaces.

This commit is contained in:
Richard M. Stallman 2002-03-25 00:45:48 +00:00
parent e643ceae67
commit 060cc8ffa0

View File

@ -1944,7 +1944,8 @@ struct range_table_work_area
do { if (p != pend) \
{ \
PATFETCH (c); \
while (c == ' ') PATFETCH (c); \
if (c == ' ') \
FREE_STACK_RETURN (REG_BADBR); \
while ('0' <= c && c <= '9') \
{ \
int prev; \
@ -1958,7 +1959,8 @@ struct range_table_work_area
break; \
PATFETCH (c); \
} \
while (c == ' ') PATFETCH (c); \
if (c == ' ') \
FREE_STACK_RETURN (REG_BADBR); \
} \
} while (0)