diff --git a/Language/SQL/SimpleSQL/Pretty.lhs b/Language/SQL/SimpleSQL/Pretty.lhs index eff2a87..52aaa15 100644 --- a/Language/SQL/SimpleSQL/Pretty.lhs +++ b/Language/SQL/SimpleSQL/Pretty.lhs @@ -1,4 +1,5 @@ +> {-# LANGUAGE CPP #-} > -- | These is the pretty printing functions, which produce SQL > -- source from ASTs. The code attempts to format the output in a > -- readable way. @@ -9,6 +10,12 @@ > ,prettyStatements > ) where +#if MIN_VERSION_base(4,11,0) + +> import Prelude hiding ((<>)) + +#endif + TODO: there should be more comments in this file, especially the bits which have been changed to try to improve the layout of the output.