Ticket #295: verbose-warnings-2.patch

stabshll.c

@@ -381 +381 @@
 
 static int unnamed_struct_number;
 
+/* Show more warnings if this variable is TRUE (-v option). */
+extern int verbose;
+
 /* kso #456 2003-06-11: Reversed quiet workaround. */
 #define no_warning warning_parse
 
@@ -1781 +1784 @@
         t.index = 0x8a;         /* 80 bit real */
       else
         {
-          no_warning ("Unknown range type: %lld..%lld", range_lo, range_hi);
+          if (verbose) no_warning ("Unknown range type: %lld..%lld", range_lo, range_hi);
           goto syntax;
         }
       break;
@@ -2024 +2027 @@
               }
             else
               {
-                warning_parse ("Invalid BASE_OFFSET GNU extension format!");
+                if (verbose) warning_parse ("Invalid BASE_OFFSET GNU extension format!");
                 goto syntax;
               }
             break;
@@ -2643 +2646 @@
   return result;
 
 syntax:
-  no_warning ("syntax error in stabs: %c (off %ld)\n stabs: %s",
+  if (verbose) no_warning ("syntax error in stabs: %c (off %ld)\n stabs: %s",
               *parse_ptr, parse_ptr - parse_start, parse_start);
 
   grow_free (&g1);
@@ -2693 +2696 @@
        * The normal issue is C++ class references. */
       if (tp->tag != ty_alias || tp->index <= -3)
         {
-          warning_parse ("Cycle detected by make_type.");
+          if (verbose) warning_parse ("Cycle detected by make_type.");
           RETURN (0);
         }
     }
@@ -2706 +2709 @@
       t1 = stype_find (tp->d.stabs_ref);
       if (t1 == NULL)
         {
-          warning_parse ("Undefined stabs type %d referenced", tp->d.stabs_ref);
+          if (verbose) warning_parse ("Undefined stabs type %d referenced", tp->d.stabs_ref);
           RETURN (0x82);        /* 32 bit signed */
         }
       make_type (t1, &tp->index);

emxomf.c

@@ -407 +407 @@
 /* Supress certain warnings if this variable is TRUE (-q option). */
 static int quiet = FALSE;
 
+/* Show more warnings if this variable is TRUE (-v option). */
+int verbose = FALSE;
+
 /* The libreq_head variable contains a pointer to the head of the list
    of default libraries.  The -i option is used to add a default
    library request.  The libreq_add pointer is used for appending new
@@ -587 +590 @@
 }
 
 
-/* Set the hll_type of a symbols. */
+/* Set the hll_type of a symbol. */
 void set_hll_type (int index, int hll_type)
 {
   if (index > sym_count || index < 0)
@@ -822 +825 @@
         memcpy(pszOutBuf + SYMBOL_MAX_LENGTH, szHash, SYMBOL_HASH_LENGTH);
         pszOutBuf[SYMBOL_MAX_LENGTH + SYMBOL_HASH_LENGTH] = '\0';
 
-        warning ("Truncated symbol '%.*s' to '%.*s%s'", cch, pszName, SYMBOL_MAX_LENGTH, pszName, szHash);
+        if (verbose)
+                warning ("Truncated symbol '%.*s' to '%.*s%s'", cch, pszName, SYMBOL_MAX_LENGTH, pszName, szHash);
 
         cch = SYMBOL_MAX_LENGTH + SYMBOL_HASH_LENGTH;
     }
@@ -3744 +3761 @@
   puts ("  -O <directory>     Extract files to <directory>");
   puts ("  -z                 Remove underscores from all symbol names");
   puts ("  -P <dbgpackdll>    Name the dbgpack DLL (ilink)");
+  puts ("  -v                 Show more warnings (truncated symbols and HLL warnings)");
   exit (1);
 }
 
@@ -4244 +4262 @@
       case 'u':
         unknown_stabs = TRUE;
         break;
+      case 'v':
+        verbose = TRUE;
+        break;
       case 'x':
         opt_x = TRUE;
         break;