1module HamletTestTypes where 2 3-- This record is defined outside of the HamletTest module 4-- because record wildcards use 'reify' and reify doesn't 5-- see types defined in the local module. 6 7data ARecord = ARecord { field1 :: Int, field2 :: Bool } 8