Modified to allow a space between the sign and the first digit of a constant.

diff --git a/modules/src/read_em/reade.c b/modules/src/read_em/reade.c
index 69acf27..f8bf157 100644 (file)
--- a/modules/src/read_em/reade.c
+++ b/modules/src/read_em/reade.c
@@ -293,6 +293,11 @@ getnumber(c, ap)
                c = getbyte();
        }
 
+       /* Soak up any whitespace (to allow "- 4" to be considered a number). */
+       
+       while (isspace(c))
+               c = getbyte();
+               
        if (! isdigit(c)) {
                ungetbyte(c);
                syntax("digit expected");