ghc-exactprint-1.14.0.0: tests/examples/pre-ghc910/T10999.hs

module T10999 where

import qualified Data.Set as Set

f :: _ => () -> _
f _ = Set.fromList undefined

g = map fst $ Set.toList $ f ()