This doesn't seem right:


        Objective Caml version 3.08.0
open Str

let search r str =
  search_forward (regexp r) str 0;
  matched_string str;;
 
# search "[aA-zZ]+" "_test";;
- : string = "_test"

whereas:

# search "[a-zA-Z]+" "_test";;
- : string = "test"


-- eliot