)
where
-import GHC.Exts (State#)
+--import GHC.Exts (State#)
import Panic
import Data.IORef
#endif
-- stop warnings about things that aren't used
-_unused :: State# () -> FS.FastString
+_unused :: {-State#-} () -> FS.FastString
_unused = undefined panic