diff options
author | simonm <unknown> | 1998-01-08 18:12:31 +0000 |
---|---|---|
committer | simonm <unknown> | 1998-01-08 18:12:31 +0000 |
commit | 9dd6e1c216993624a2cd74b62ca0f0569c02c26b (patch) | |
tree | 28a471729f40b0a69dae5f748b53e0955aa300a3 /ghc/compiler/deSugar/MatchCon.lhs | |
parent | ff14742cc328f19b9bf7c04d9a69408e641cf64a (diff) | |
download | haskell-9dd6e1c216993624a2cd74b62ca0f0569c02c26b.tar.gz |
[project @ 1998-01-08 18:03:08 by simonm]
The Great Multi-Parameter Type Classes Merge.
Notes from Simon (abridged):
* Multi-parameter type classes are fully implemented.
* Error messages from the type checker should be noticeably improved
* Warnings for unused bindings (-fwarn-unused-names)
* many other minor bug fixes.
Internally there are the following changes
* Removal of Haskell 1.2 compatibility.
* Dramatic clean-up of the PprStyle stuff.
* The type Type has been substantially changed.
* The dictionary for each class is represented by a new
data type for that purpose, rather than by a tuple.
Diffstat (limited to 'ghc/compiler/deSugar/MatchCon.lhs')
-rw-r--r-- | ghc/compiler/deSugar/MatchCon.lhs | 13 |
1 files changed, 4 insertions, 9 deletions
diff --git a/ghc/compiler/deSugar/MatchCon.lhs b/ghc/compiler/deSugar/MatchCon.lhs index 280103b056..152d082050 100644 --- a/ghc/compiler/deSugar/MatchCon.lhs +++ b/ghc/compiler/deSugar/MatchCon.lhs @@ -4,16 +4,11 @@ \section[MatchCon]{Pattern-matching constructors} \begin{code} -#include "HsVersions.h" - module MatchCon ( matchConFamily ) where -IMP_Ubiq() -#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ <= 201 -IMPORT_DELOOPER(DsLoop) ( match ) -- break match-ish loop -#else -import {-# SOURCE #-} Match -#endif +#include "HsVersions.h" + +import {-# SOURCE #-} Match ( match ) import HsSyn ( OutPat(..), HsLit, HsExpr ) import DsHsSyn ( outPatType ) @@ -21,7 +16,7 @@ import DsHsSyn ( outPatType ) import DsMonad import DsUtils -import Id ( GenId{-instances-}, SYN_IE(Id) ) +import Id ( GenId{-instances-}, Id ) import Util ( panic, assertPanic ) \end{code} |