Better error reports.

diff --git a/cupl.l b/cupl.l
index b81cef1fad3f2329c82b42724573f294499c78d1..c88afdc6633454d18f65cc3a7b00dced8e2cf831 100644 (file)
--- a/cupl.l
+++ b/cupl.l
@@ -115,13 +115,13 @@ static node *intern_identifier(char *str)
        n->next = idlist;
        n->node = new;
        idlist = n;
+    }
 
 #ifdef PARSEDEBUG
        if (verbose >= 2)
            (void) printf("intern: %9x                        (IDENTIFIER: %s)\n",
-                         new, str);
+                 new, str);
 #endif /* PARSEDEBUG */
-    }
 
     return(new);
 }
@@ -143,7 +143,7 @@ static node *intern_number(char *str)
 
 #ifdef PARSEDEBUG
     if (verbose >= 2)
-       (void) printf("intern: %x (NUMBER: %d)\n", new, numval);
+       (void) printf("intern: %x                             (NUMBER: %d)\n", new, numval);
 #endif /* PARSEDEBUG */
     return(new);
 }