Module Desugar.Loops

Desugaring loops into a usual case

val opt_desugar_for_range : bool ref
val opt_desugar_for_tuple : bool ref
module Domain : sig ... end