module Escape: Bracetax_escapeval replace_string : src:string -> find:string -> replace_with:string -> stringval replace_chars : src:string -> patterns:(char * string) list -> string let patterns = [('<', "<"); ('>', ">"); ('&', "&")] in
Escape.replace_chars ~src:line ~patterns val is_white_space : string -> boolval clean_string : string -> string