X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=src%2Fparser.mly;h=9d6988b28ae3a8d266eb5cb8f4f92b569ac37171;hb=017d19bf31e5e4d15423fe7c8068b50034b919a3;hp=eedbddbdfebc7bab5a611b1a76e14be774693dce;hpb=bc05c5c0eef21e7f80a9b6a7fa7e551b200ad905;p=goals.git

diff --git a/src/parser.mly b/src/parser.mly
index eedbddb..9d6988b 100644
--- a/src/parser.mly
+++ b/src/parser.mly
@@ -118,6 +118,10 @@ stmt:
       let name, params = $1 in
       name, Ast.EGoalDefn ($loc, (params, [], [], Some $2))
     }
+    | GOAL ID
+    {
+      $2, Ast.EGoalDefn ($loc, ([], [], [], None))
+    }
     | option(PURE) FUNCTION ID params_decl return_decl EQUALS CODE
     {
       $3, Ast.EFuncDefn ($loc, ($4, $5, $1 <> None, $7))