[project @ 2002-05-27 15:57:01 by simonmar]
[ghc-base.git] / Text / Show / Functions.hs
1 -----------------------------------------------------------------------------
2 -- |
3 -- Module      :  Text.Show.Functions
4 -- Copyright   :  (c) The University of Glasgow 2001
5 -- License     :  BSD-style (see the file libraries/base/LICENSE)
6 -- 
7 -- Maintainer  :  libraries@haskell.org
8 -- Stability   :  provisional
9 -- Portability :  portable
10 --
11 -- Optional instance of 'Text.Show.Show' for functions:
12 --
13 -- > instance Show (a -> b) where
14 -- >    showsPrec _ _ = showString \"\<function\>\"
15 --
16 -----------------------------------------------------------------------------
17
18 module Text.Show.Functions () where
19
20 import Prelude
21
22 instance Show (a -> b) where
23         showsPrec _ _ = showString "<function>"