1 2 3 4
{-# LANGUAGE DuplicateRecordFields #-} module NoDRFModuleExport_aux where data A = MkA { foo :: A } data B = MkB { foo :: B }