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

diff --git a/ChangeLog b/ChangeLog
index 401bea13f45160d4da9965cf4556e3ad16384665..2e5e0c27510f8dad5154794ddf31b9489367cbc8 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2002-04-07  Akim Demaille  <akim@epita.fr>
+
+       * src/reader.c, symtab.c: Remove debugging code.
+

 2002-04-07  Akim Demaille  <akim@epita.fr>
 
        Rename all the `bucket's as `symbol_t'.
 2002-04-07  Akim Demaille  <akim@epita.fr>
 
        Rename all the `bucket's as `symbol_t'.

diff --git a/src/reader.c b/src/reader.c
index df7415d1e3598d79c43dcfb4f97125b64d291200..db168b68edcaef7539823557814c331ea0cb7040 100644 (file)
--- a/src/reader.c
+++ b/src/reader.c
@@ -190,11 +190,6 @@ symbol_check_alias_consistence (symbol_t *this)
 static bool
 symbol_pack (symbol_t *this)
 {
 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;
   if (this->class == nterm_sym)
     {
       this->number += ntokens;


@@ -223,8 +218,6 @@ symbol_pack (symbol_t *this)
       assert (this->number != -1);
     }
 
       assert (this->number != -1);
     }
 

-  if (getenv ("DEBUG"))
-    fprintf (stderr, "Setting %d = %s\n", this->number, this->tag);

   symbols[this->number] = this;
   return TRUE;
 }
   symbols[this->number] = this;
   return TRUE;
 }


@@ -239,10 +232,6 @@ symbol_pack (symbol_t *this)
 static bool
 symbol_translation (symbol_t *this)
 {
 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)
   /* Non-terminal? */
   if (this->class == token_sym
       && this->user_token_number != SALIAS)


@@ -253,9 +242,6 @@ symbol_translation (symbol_t *this)
                  symbols[token_translations[this->user_token_number]]->tag,
                  this->tag, this->user_token_number);
 
                  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;
     }
 
       token_translations[this->user_token_number] = this->number;
     }
 


@@ -720,12 +706,7 @@ parse_token_decl (symbol_class what_is, symbol_class what_is_not)
          if (what_is == nterm_sym && oldclass != nterm_sym)
            symbol->number = nvars++;
          if (what_is == token_sym && symbol->number == -1)
          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)
            {
 
          if (typename)
            {


@@ -1659,9 +1640,6 @@ readgram (void)
     fatal (_("too many symbols (tokens plus nonterminals); maximum %d"),
           MAXSHORT);
 
     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);
 }
 
   assert (nsyms == ntokens + nvars);
 }
 


@@ -1706,16 +1684,10 @@ token_translations_init (void)
   for (i = 0; i < ntokens; ++i)
     {
       symbol_t *this = symbols[i];
   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 (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);
     }
 
   token_translations = XCALLOC (short, max_user_token_number + 1);

diff --git a/src/symtab.c b/src/symtab.c
index 12aabb7219157a96264680bbd4d0b9348f410b1b..01cf9202fcdb46bf247956908e94cbdb5df34064 100644 (file)
--- a/src/symtab.c
+++ b/src/symtab.c
@@ -42,9 +42,6 @@ symbol_new (const char *tag)
   res->alias = NULL;
   res->class = unknown_sym;
 
   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;
   nsyms++;
 
   return res;