chore: move deprecated alias to [Core]

ocaml · Aug 30, 2024 · 0b57fdd · 0b57fdd
1 parent aa8860e
commit 0b57fdd
Show file tree

Hide file tree

Showing 3 changed files with 1 addition and 5 deletions.
diff --git a/lib/compile.ml b/lib/compile.ml
@@ -90,7 +90,6 @@ type re =
   }
 
 let pp_re ch re = Automata.pp ch re.initial
-let print_re = pp_re
 let group_count re = re.group_count
 let group_names re = re.group_names
 

diff --git a/lib/compile.mli b/lib/compile.mli
@@ -17,7 +17,4 @@ val match_str
 val compile : Ast.t -> re
 val group_count : re -> int
 val group_names : re -> (string * int) list
-
-(* CR-someday rgrinberg: deprecate one of these *)
-val print_re : re Fmt.t
 val pp_re : re Fmt.t
diff --git a/lib/core.ml b/lib/core.ml
@@ -208,7 +208,7 @@ include struct
 
   let compile = compile
   let pp_re = pp_re
-  let print_re = print_re
+  let print_re = pp_re
   let group_names = group_names
   let group_count = group_count
 end