Commit a6fdf61f authored by chak@cse.unsw.edu.au.'s avatar chak@cse.unsw.edu.au.

Fix -DDEBUG warning

parent 03b468c4
......@@ -597,7 +597,7 @@ tcConPat pstate con_span data_con tycon pat_ty arg_pats thing_inside
(unwrapFamInstScrutinee tycon ctxt_res_tys $
ConPatOut { pat_con = L con_span data_con,
pat_tvs = ex_tvs' ++ co_vars,
pat_dicts = map instToId dicts,
pat_dicts = map instToVar dicts,
pat_binds = dict_binds,
pat_args = arg_pats', pat_ty = pat_ty },
ex_tvs' ++ inner_tvs, res)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment