libs/lib_parsing/Regexp_string.ml

Rama main · réplica de lectura del repositorio original.

open Common

(* A string literal "=~/regexp/flags" in a pattern denotes a regular
   expression. *)

(* TODO: deprecate this *)
let regexp_regexp_string = "^=~/\\(.*\\)/\\([mi]?\\)$"

(* TODO: deprecate this *)
let is_regexp_string (s : string) : bool = s =~ regexp_regexp_string