From 1aaf8ae4d48bb9404b8faef2ba55024a6d6bac23 Mon Sep 17 00:00:00 2001
From: Chimrod <>
Date: Fri, 22 Sep 2023 18:19:02 +0200
Subject: Made the syntax analyzer generic

---
 lib/analyzer.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib/analyzer.ml')

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 ->
-- 
cgit v1.2.3