22-fyi-dedebugging.patch

[Akim Demaille]

Index: ChangeLog
from  Akim Demaille  <address@hidden>

        * src/reader.c, symtab.c: Remove debugging code.

Index: src/reader.c
--- src/reader.c Sat, 06 Apr 2002 22:14:47 +0200 akim
+++ src/reader.c Sat, 06 Apr 2002 22:20:00 +0200 akim
@@ -190,11 +190,6 @@
 static bool
 symbol_pack (symbol_t *this)
 {
-  if (getenv ("DEBUG"))
-    fprintf (stderr, "Packing %s, %s, number = %d\n",
-            this->tag,
-            this->class == nterm_sym ? "nterm" : "TERM",
-            this->number);
   if (this->class == nterm_sym)
     {
       this->number += ntokens;
@@ -223,8 +218,6 @@
       assert (this->number != -1);
     }

-  if (getenv ("DEBUG"))
-    fprintf (stderr, "Setting %d = %s\n", this->number, this->tag);
   symbols[this->number] = this;
   return TRUE;
 }
@@ -239,10 +232,6 @@
 static bool
 symbol_translation (symbol_t *this)
 {
-  if (getenv ("DEBUG"))
-    fprintf (stderr, "Considering Setting UserVal %s = %d (val = %d)\n",
-            this->tag, this->user_token_number, this->number);
-
   /* Non-terminal? */
   if (this->class == token_sym
       && this->user_token_number != SALIAS)
@@ -253,9 +242,6 @@
                  symbols[token_translations[this->user_token_number]]->tag,
                  this->tag, this->user_token_number);

-      if (getenv ("DEBUG"))
-       fprintf (stderr, "Setting UserVal %s = %d (val = %d)\n",
-                this->tag, this->user_token_number, this->number);
       token_translations[this->user_token_number] = this->number;
     }

@@ -720,12 +706,7 @@
          if (what_is == nterm_sym && oldclass != nterm_sym)
            symbol->number = nvars++;
          if (what_is == token_sym && symbol->number == -1)
-           {
-             symbol->number = ntokens++;
-             if (getenv ("DEBUG"))
-               fprintf (stderr, "Set %s to %d\n",
-                        symbol->tag, symbol->number);
-           }
+           symbol->number = ntokens++;

          if (typename)
            {
@@ -1659,9 +1641,6 @@
     fatal (_("too many symbols (tokens plus nonterminals); maximum %d"),
           MAXSHORT);

-  if (getenv ("DEBUG"))
-    fprintf (stderr, "nsyms == ntokens + nvars: %d == %d + %d\n",
-            nsyms, ntokens, nvars);
   assert (nsyms == ntokens + nvars);
 }

@@ -1706,16 +1685,10 @@
   for (i = 0; i < ntokens; ++i)
     {
       symbol_t *this = symbols[i];
-      if (getenv ("DEBUG"))
-       fprintf (stderr, "UserVal %s = %d (val = %d)\n",
-                this->tag, this->user_token_number, this->number);
       if (this->user_token_number == SUNDEF)
        this->user_token_number = ++last_user_token_number;
       if (this->user_token_number > max_user_token_number)
        max_user_token_number = this->user_token_number;
-      if (getenv ("DEBUG"))
-       fprintf (stderr, "Now: UserVal %s = %d (val = %d)\n",
-                this->tag, this->user_token_number, this->number);
     }

   token_translations = XCALLOC (short, max_user_token_number + 1);
Index: src/symtab.c
--- src/symtab.c Sat, 06 Apr 2002 22:14:47 +0200 akim
+++ src/symtab.c Sat, 06 Apr 2002 22:16:11 +0200 akim
@@ -42,9 +42,6 @@
   res->alias = NULL;
   res->class = unknown_sym;

-  if (getenv ("DEBUG"))
-    fprintf (stderr, "Creating: nsyms = %d, ntokens = %d: %s\n",
-            nsyms, ntokens, tag);
   nsyms++;

   return res;