We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent ca6051f commit 7b03bccCopy full SHA for 7b03bcc
1 file changed
src/ecMatching.ml
@@ -397,8 +397,8 @@ module Position = struct
397
(* Normalize a codegap1 to nm_codegap1 *)
398
let normalize_cgap1 (env : env) (g : codegap1) (s : stmt) : nm_codegap1 =
399
let nm = match g with
400
- | GapBefore cp -> normalize_cpos1 env cp s |> gap_before
401
- | GapAfter cp -> normalize_cpos1 env cp s |> gap_after
+ | GapBefore cp -> normalize_cpos1 ~check:false env cp s |> gap_before
+ | GapAfter cp -> normalize_cpos1 ~check:false env cp s |> gap_after
402
in
403
check_nm_cgap1 nm s; nm
404
0 commit comments