__interface MkId 1 0 where
-__export MkId mkDataConId mkPrimitiveId ;
-1 mkDataConId :: DataCon.DataCon -> Var.Id ;
-1 mkPrimitiveId :: PrimOp.PrimOp -> Var.Id ;
+__export MkId mkDataConId mkDataConWrapId ;
+1 mkDataConId :: Name.Name -> DataCon.DataCon -> Var.Id ;
+1 mkDataConWrapId :: DataCon.DataCon -> Var.Id ;