From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 25 Mar 2002 00:45:48 +0000 (+0000)
Subject: (GET_UNSIGNED_NUMBER): Give proper error for spaces.
X-Git-Tag: ttn-vms-21-2-B4~15980
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=060cc8ffa032a46578ada342a77342a24d5c5513;p=emacs.git

(GET_UNSIGNED_NUMBER): Give proper error for spaces.
---

diff --git a/src/regex.c b/src/regex.c
index cd05bf8860b..591d6f14e12 100644
--- a/src/regex.c
+++ b/src/regex.c
@@ -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)