Make stray ; outside of functions an error in strict mode.

[r22102]

diff --git a/parser.c b/parser.c
index 14a84c4..5f76904 100644 (file)
--- a/parser.c
+++ b/parser.c
@@ -9984,10 +9984,12 @@ static void parse_translation_unit(void)
                                return;
 
                        case ';':
-                               /* TODO error in strict mode */
-                               warningf(HERE, "stray ';' outside of function");
-                               next_token();
-                               break;
+                               if (!strict_mode) {
+                                       warningf(HERE, "stray ';' outside of function");
+                                       next_token();
+                                       break;
+                               }
+                               /* FALLTHROUGH */
 
                        default:
                                errorf(HERE, "stray %K outside of function", &token);