(* Various types used by configure and real_configure.ml *)
type switch =
| Yes
| No
| Auto
let string_of_switch = function
| Yes -> "Yes"
| No -> "No"
| Auto -> "Auto"