The input routine used to skip space. This "feature" has been removed

because it is also used to read strings, in which space is significant.

diff --git a/util/LLgen/src/tokens.g b/util/LLgen/src/tokens.g
index 3a91a4c..4f2f856 100644 (file)
--- a/util/LLgen/src/tokens.g
+++ b/util/LLgen/src/tokens.g
@@ -232,14 +232,6 @@ input() {
                nostartline = 0;
                nonline = 1;
        }
-       if (c == ' ' || c == '\t') {    /*
-                                        * Deliver space, but only once
-                                        */
-               do      c = getc(f);
-               while (c == ' ' || c == '\t');
-               ungetc(c,f);
-               return ' ';
-       }
        if (c == '\n') nonline = 0;
        return c;
 }