fix position invalid test

2024-09-16 14:57:13 +03:00 · 2024-07-30 17:58:01 +02:00 · 2024-07-30 17:58:01 +02:00 · f5b9e5df2d
commit f5b9e5df2d
parent 9d5052147a
1 changed files with 1 additions and 1 deletions
--- a/compiler/catala_utils/pos.ml
+++ b/compiler/catala_utils/pos.ml
@ -135,7 +135,7 @@ let format_loc_text_parts (pos : t) =
        let ic, input_line_opt =
          let from_contents =
            match Global.options.input_src with
-            | Contents (str, _) when str = filename -> Some str
+            | Contents (str, uri) when uri = filename -> Some str
            | _ -> None
          in
          match from_contents with