Fix clash between format and call_expression

Also allows parsing `foo()` as a standalone statement, which could be
a compiler extension or preprocessor macro

Author: ZedThree

grammar.js

@@ -1086,6 +1086,8 @@ module.exports = grammar({
       $.coarray_statement,
       $.coarray_team_statement,
       $.coarray_critical_statement,
+      // Not strictly valid, but can catch extensions and preprocessor macros
+      $.call_expression,
     ),
 
     statement_label: $ => prec(1, alias($._integer_literal, 'statement_label')),
@@ -1569,12 +1571,12 @@ module.exports = grammar({
       optional($._block_label)
     ),
 
-    format_statement: $ => seq(
+    format_statement: $ => prec.dynamic(PREC.CALL, seq(
       caseInsensitive('format'),
       '(',
       alias($._transfer_items, $.transfer_items),
       ')'
-    ),
+    )),
 
     _transfer_item: $ => choice(
       $.string_literal,

src/grammar.json

@@ -13152,6 +13152,10 @@
         {
           "type": "SYMBOL",
           "name": "coarray_critical_statement"
+        },
+        {
+          "type": "SYMBOL",
+          "name": "call_expression"
         }
       ]
     },
@@ -16474,35 +16478,39 @@
       ]
     },
     "format_statement": {
-      "type": "SEQ",
-      "members": [
-        {
-          "type": "ALIAS",
-          "content": {
-            "type": "PATTERN",
-            "value": "[fF][oO][rR][mM][aA][tT]"
+      "type": "PREC_DYNAMIC",
+      "value": 80,
+      "content": {
+        "type": "SEQ",
+        "members": [
+          {
+            "type": "ALIAS",
+            "content": {
+              "type": "PATTERN",
+              "value": "[fF][oO][rR][mM][aA][tT]"
+            },
+            "named": false,
+            "value": "format"
           },
-          "named": false,
-          "value": "format"
-        },
-        {
-          "type": "STRING",
-          "value": "("
-        },
-        {
-          "type": "ALIAS",
-          "content": {
-            "type": "SYMBOL",
-            "name": "_transfer_items"
+          {
+            "type": "STRING",
+            "value": "("
           },
-          "named": true,
-          "value": "transfer_items"
-        },
-        {
-          "type": "STRING",
-          "value": ")"
-        }
-      ]
+          {
+            "type": "ALIAS",
+            "content": {
+              "type": "SYMBOL",
+              "name": "_transfer_items"
+            },
+            "named": true,
+            "value": "transfer_items"
+          },
+          {
+            "type": "STRING",
+            "value": ")"
+          }
+        ]
+      }
     },
     "_transfer_item": {
       "type": "CHOICE",
@@ -20934,6 +20942,15 @@
           "named": false,
           "value": "fail"
         },
+        {
+          "type": "ALIAS",
+          "content": {
+            "type": "PATTERN",
+            "value": "[fF][lL][uU][sS][hH]"
+          },
+          "named": false,
+          "value": "flush"
+        },
         {
           "type": "ALIAS",
           "content": {
@@ -21251,6 +21268,15 @@
           "named": false,
           "value": "value"
         },
+        {
+          "type": "ALIAS",
+          "content": {
+            "type": "PATTERN",
+            "value": "[wW][aA][iI][tT]"
+          },
+          "named": false,
+          "value": "wait"
+        },
         {
           "type": "PREC",
           "value": -1,
@@ -21405,6 +21431,10 @@
       "arithmetic_if_statement",
       "_block_if_statement",
       "identifier"
+    ],
+    [
+      "file_position_statement",
+      "identifier"
     ]
   ],
   "precedences": [],