X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=compiler%2FcoreSyn%2FMkExternalCore.lhs;h=818175478f7c4807cca8c322979404df5607f36e;hb=c94408e522e5af3b79a5beadc7e6d15cee553ee7;hp=c8885f7f1cc41e5f41bd56bf5aad2f5d14e8ebd0;hpb=3e83dfb21b2f2220dce97427fff5c19459ae68d1;p=ghc-hetmet.git diff --git a/compiler/coreSyn/MkExternalCore.lhs b/compiler/coreSyn/MkExternalCore.lhs index c8885f7..8181754 100644 --- a/compiler/coreSyn/MkExternalCore.lhs +++ b/compiler/coreSyn/MkExternalCore.lhs @@ -179,7 +179,6 @@ make_kind (FunTy k1 k2) = C.Karrow (make_kind k1) (make_kind k2) make_kind k | isLiftedTypeKind k = C.Klifted | isUnliftedTypeKind k = C.Kunlifted --- | isUnboxedTypeKind k = C.Kunboxed Fix me | isOpenTypeKind k = C.Kopen make_kind _ = error "MkExternalCore died: make_kind"