--- p/gpcpp.c.orig	Mon Jun  3 20:02:27 2002
+++ p/gpcpp.c	Mon Jun  3 20:02:29 2002
@@ -3806,7 +3806,7 @@
           case '(':
             if (!no_charescape && *ibp == '\\' && ibp[1] == '\n')
               newline_fix (ibp);
-            if (nested_comments && pascal_comments && warn_comments && *ibp == '*')
+            if (nested_comments && pascal_comments && *ibp == '*')
               {
                 warn_nested_comment ();
                 ibp++;