From 3b5c4f8cc65a9b781ffdea09ee6b725fb8341d4d Mon Sep 17 00:00:00 2001
From: Chimrod <>
Date: Thu, 25 Jan 2024 08:10:37 +0100
Subject: Make the option --global effective with qsrc file

---
 bin/qsp_parser.ml | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'bin/qsp_parser.ml')

diff --git a/bin/qsp_parser.ml b/bin/qsp_parser.ml
index 5a34ab2..6d045b8 100644
--- a/bin/qsp_parser.ml
+++ b/bin/qsp_parser.ml
@@ -131,7 +131,9 @@ let () =
     | ".qsrc" ->
         (* The source file are in UTF-8, and we can use the file line number as
            we have only a single location. *)
-        (Sedlexing.Utf8.from_channel ic, { parameters with reset_line = false })
+        ( Sedlexing.Utf8.from_channel ic,
+          { parameters with reset_line = parameters.Args.reset_line || false }
+        )
     | ".txt" ->
         (Sedlexing.Utf16.from_channel ic (Some Little_endian), parameters)
     | _ -> raise (Failure "unknown extension")
-- 
cgit v1.2.3