let s = Sexp.load_sexp file in
(* CR pszilagyi: Why is this downcased? Won't that mangle shell commands with
- uppercase letters in them? *)
+ uppercase letters in them?
+ I found a concrete example of one I wanted, which got broken by the downcasing:
+ config_command "omake -j 12 .DEFAULT runtest". *)
let sexp_of_string s = String.lowercase (String.t_of_sexp s) in
Ok (T.t_of_sexp sexp_of_string s)