- ; simpl_result <- dsThenSimplThenTidy dflags pcs_tc hst this_mod
- print_unqualified is_exported tc_result
- ; let (pcs_simpl, tidy_binds, orphan_rules, foreign_stuff) = simpl_result
+ ; (pcs_simpl, tidy_binds, orphan_rules, foreign_stuff)
+ <- dsThenSimplThenTidy dflags pcs_tc hst this_mod
+ print_unqualified is_exported tc_result