1. Dmitry Grebeniuk
  2. amall

Source

amall / src / am_String.ml

open Cd_All;
module String = Strings.Latin1.String;

(*
module String
 =
  struct

    include String
    ;



(*
    value () =
      if split_exact ((=) '.') ".asd..sdf." = ["";"asd";"";"sdf";""]
         && split_exact ((=) '.') "" = [""]
         && split_exact ((=) '.') "asd" = ["asd"]
      then failwith "ok"
      else failwith "bad"
    ;
*)


  end
;
*)