From bb9ce9bf44a7adc323aed228f67532dad4915add Mon Sep 17 00:00:00 2001
From: Lucas Franceschino <lucas@cryspen.dev>
Date: Mon, 24 Jun 2024 09:46:54 +0200
Subject: [PATCH] fix(engine/generate_visitors): use `Ppxlib_ast`s `Parse`

---
 engine/utils/generate_visitors/generate_visitors.ml | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/engine/utils/generate_visitors/generate_visitors.ml b/engine/utils/generate_visitors/generate_visitors.ml
index eda5b45ca..21f303d9e 100644
--- a/engine/utils/generate_visitors/generate_visitors.ml
+++ b/engine/utils/generate_visitors/generate_visitors.ml
@@ -4,7 +4,8 @@ open Types
 
 let _main =
   let ocaml_file =
-    Stdio.In_channel.stdin |> Lexing.from_channel |> Parse.implementation
+    Stdio.In_channel.stdin |> Lexing.from_channel
+    |> Ppxlib_ast.Parse.implementation
   in
   let datatypes =
     type_declaration_of_structure ocaml_file