maint: more syntax-checks

[bison.git] / src / complain.c

diff --git a/src/complain.c b/src/complain.c
index 2e4e71afb92e1deac07c1d9e7bd69643fd746c2a..984b13610d8297fe465962926634a9bd5f03c713 100644 (file)
--- a/src/complain.c
+++ b/src/complain.c
@@ -110,12 +110,15 @@ error_message (const location *loc, warnings flags, const char *prefix,
   warnings_print_categories (flags);
   {
     size_t l = strlen (message);
-    if (l < 2 || message[l-2] != ':' || message[l-1] != ' ')
+    if (l < 2 || message[l - 2] != ':' || message[l - 1] != ' ')
       {
         putc ('\n', stderr);
         fflush (stderr);
+        if (loc && feature_flag & feature_caret && !(flags & no_caret))
+          location_caret (stderr, *loc);
       }
   }
+  fflush (stderr);
 }
 
 /** Raise a complaint. That can be a fatal error, a complaint or just a