aboutsummaryrefslogtreecommitdiff
path: root/lib/analyzer.ml
diff options
context:
space:
mode:
Diffstat (limited to 'lib/analyzer.ml')
-rw-r--r--lib/analyzer.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/analyzer.ml b/lib/analyzer.ml
index 1a9b17b..f0f8ca5 100644
--- a/lib/analyzer.ml
+++ b/lib/analyzer.ml
@@ -26,7 +26,7 @@ let parse :
Lexing.lexbuf ->
('a, error) Result.t =
fun (type a) (module S : Qsp_syntax.S.Analyzer with type Location.repr = a) ->
- let module Parser = Parser.Make (Qsp_syntax.Tree) in
+ let module Parser = Parser.Make (S) in
let module IncrementalParser =
Interpreter.Interpreter (Parser.MenhirInterpreter) in
fun lexbuf ->