module MkId where mkDataConId :: Name.Name -> DataCon.DataCon -> Var.Id mkDataConWrapId :: DataCon.DataCon -> Var.Id