Skip to content
Snippets Groups Projects
Commit 7979ad1f authored by David Waern's avatar David Waern
Browse files

Wibble

parent e05c4873
Branches
Tags
No related merge requests found
......@@ -117,7 +117,7 @@ toHsInstHead (_, preds, cls, ts) = (map toHsPred preds, className cls, map toHsT
--------------------------------------------------------------------------------
toHsPred :: PredType -> HsPred Name
toHsPred :: PredType -> HsPred Name
toHsPred (ClassP cls ts) = HsClassP (className cls) (map toLHsType ts)
toHsPred (IParam n t) = HsIParam n (toLHsType t)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment