add install-includes: field
[packages/pretty.git] / Text / Show / Functions.hs
index 5b85b4c..d0e2207 100644 (file)
@@ -2,21 +2,24 @@
 -- |
 -- Module      :  Text.Show.Functions
 -- Copyright   :  (c) The University of Glasgow 2001
--- License     :  BSD-style (see the file libraries/core/LICENSE)
+-- License     :  BSD-style (see the file libraries/base/LICENSE)
 -- 
 -- Maintainer  :  libraries@haskell.org
 -- Stability   :  provisional
 -- Portability :  portable
 --
--- $Id: Functions.hs,v 1.2 2002/04/24 16:31:47 simonmar Exp $
+-- Optional instance of 'Text.Show.Show' for functions:
 --
--- Optional instance of Text.Show.Show for functions.
+-- > instance Show (a -> b) where
+-- >   showsPrec _ _ = showString \"\<function\>\"
 --
 -----------------------------------------------------------------------------
 
-module Text.Show.Functions where
+module Text.Show.Functions () where
 
 import Prelude
 
+#ifndef __NHC__
 instance Show (a -> b) where
        showsPrec _ _ = showString "<function>"
+#endif