Log.ml

let verbose = ref false
let log msg = if !verbose then print_endline msg