Commit 7233046f authored by simonpj's avatar simonpj
Browse files

[project @ 2000-05-24 12:43:20 by simonpj]

Fix unused-import warning --- again!
parent 6e04c7e8
......@@ -259,7 +259,7 @@ improveAvails imp_mod iloc explicits is_unqual avails
= map improve_avail avails
where
improve_avail (Avail n) = Avail (improve n)
improve_avail (AvailTC n ns) = AvailTC n (map improve ns) -- n doesn't matter
improve_avail (AvailTC n ns) = AvailTC (improve n) (map improve ns)
improve name = setNameProvenance name
(NonLocalDef (UserImport imp_mod iloc (is_explicit name))
......
......@@ -25,7 +25,7 @@ import VarSet
import Id ( Id, idType, idInfo, idUnique, isDataConId, isDataConId_maybe,
idUnfolding, setIdUnfolding, isExportedId, isDeadBinder,
idSpecialisation, setIdSpecialisation,
idDemandInfo, setIdDemandInfo,
idDemandInfo,
setIdInfo,
idOccInfo, setIdOccInfo,
zapLamIdInfo, zapFragileIdInfo,
......
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