1Input input.ml /^(* the string "(*" does NOT start a comment *)$/;" M 2_ input.ml /^let _ = p "foo"$/;" f 3p input.ml /^let p = print_endline$/;" v 4