From 180529c30282d39f3506633716e3fe439db03309 Mon Sep 17 00:00:00 2001
From: Chimrod <>
Date: Fri, 3 Nov 2023 10:19:29 +0100
Subject: Extracting the report from the Location checker is now in it’s own
 function
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

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

(limited to 'lib/qparser/analyzer.ml')

diff --git a/lib/qparser/analyzer.ml b/lib/qparser/analyzer.ml
index a79535e..e3a2774 100644
--- a/lib/qparser/analyzer.ml
+++ b/lib/qparser/analyzer.ml
@@ -36,6 +36,7 @@ let parse :
     in
 
     evaluation
+    |> Result.map (fun r -> (r, S.Location.v r))
     |> Result.map_error (fun e ->
            let message =
              match e.IncrementalParser.code with
-- 
cgit v1.2.3