--------------------------------------------------------------------------- --------------------------------------------------------------------------- --------------------------------------------------------------------------- --------------------------------------------------------------------------- --------------------------------------------------------------------------- --------------------------------------------------------------------------- --------------------------------------------------------------------------- --------------------------------------------------------------------------- --------------------------------------------------------------------------- --------------------------------------------------------------------------- --------------------------------------------------------------------------- --------------------------------------------------------------------------- --------------------------------------------------------------------------- --------------------------------------------------------------------------- --------------------------------------------------------------------------- --------------------------------------------------------------------------- -- There is enough comment to fill up one buffer (1024 bytes) of the code -- in GHC that looks for OPTIONS_GHC pragmas etc. {-# OPTIONS_GHC -w #-} module Pragma001 () where -- This will make a warning if the pragma isn't picked up foo _ = () foo _ = ()