let raise_ignored e = if !errors_as_warnings then Printf.printf "Warning: ignored expression at %s.\n%!" (T.print_pos ~prefix:"" (Utils.get_some e.t.T.pos)) else raise (Ignored e)