X-Git-Url: https://git.xandkar.net/?a=blobdiff_plain;f=compiler%2Fsrc%2Flib%2Ftiger%2Ftiger_parser.mly;h=b40892a7606f08639c0c1c37e776cd50de9f2701;hb=c16dd441582b7c7c09cdb3e706f4767a5b266177;hp=78d56a0c8a9216f297e608ec6fe3371ec2f56242;hpb=7c14a966d15aab098a4239b6ae6a3fc207504e7f;p=tiger.ml.git

diff --git a/compiler/src/lib/tiger/tiger_parser.mly b/compiler/src/lib/tiger/tiger_parser.mly
index 78d56a0..b40892a 100644
--- a/compiler/src/lib/tiger/tiger_parser.mly
+++ b/compiler/src/lib/tiger/tiger_parser.mly
@@ -1,5 +1,6 @@
 %{
   module Ast = Tiger_absyn
+  module Err = Tiger_error
   module Sym = Tiger_symbol
 
   let pos () =
@@ -75,7 +76,7 @@
 
 program:
   | exp EOF { $1 }
-  | error {Tiger_error.exn ~pos:(pos ()) ~msg:"invalid syntax"}
+  | error {Err.raise (Err.Invalid_syntax (pos ()))}
   ;
 
 exp: