# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1017017148 0
# Node ID aad3682a49ba61722b09ac2600c9063363d6cfab
# Parent  88194f722f30cf6668afb2eac55644322b130bbb
(GET_UNSIGNED_NUMBER): Give proper error for spaces.

diff -r 88194f722f30 -r aad3682a49ba src/regex.c
--- a/src/regex.c	Mon Mar 25 00:44:51 2002 +0000
+++ b/src/regex.c	Mon Mar 25 00:45:48 2002 +0000
@@ -1944,7 +1944,8 @@
  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 @@
 	     break;							\
 	   PATFETCH (c);						\
 	 }								\
-       while (c == ' ') PATFETCH (c);					\
+       if (c == ' ')							\
+	 FREE_STACK_RETURN (REG_BADBR);					\
        }								\
     } while (0)