1 2 3 4 5 6
{-# LANGUAGE DisambiguateRecordFields #-} -- Trac #2901 module T2901 where f = F.Foo { F.field = "" }