diff options
| author | Ian Lynagh <ian@well-typed.com> | 2012-08-05 14:18:22 +0100 |
|---|---|---|
| committer | Ian Lynagh <ian@well-typed.com> | 2012-08-05 14:18:22 +0100 |
| commit | 0e7aad2c6cda3db0a050bfe8afc56bbb2815e30c (patch) | |
| tree | 14ebed297b997dffec35dcb22ab50614c8eb1aec /compiler/utils/Outputable.lhs | |
| parent | 89900ff3096f34f1212dfe2b1dfd32adf5b3bf1b (diff) | |
| download | haskell-0e7aad2c6cda3db0a050bfe8afc56bbb2815e30c.tar.gz | |
De-orphan the Outputable Char instance
Diffstat (limited to 'compiler/utils/Outputable.lhs')
| -rw-r--r-- | compiler/utils/Outputable.lhs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/compiler/utils/Outputable.lhs b/compiler/utils/Outputable.lhs index 35abf5be07..2ac49b33ab 100644 --- a/compiler/utils/Outputable.lhs +++ b/compiler/utils/Outputable.lhs @@ -597,6 +597,9 @@ class Outputable a where \end{code} \begin{code} +instance Outputable Char where + ppr c = text [c] + instance Outputable Bool where ppr True = ptext (sLit "True") ppr False = ptext (sLit "False") |