diff options
| author | Ian Lynagh <ian@well-typed.com> | 2012-11-23 16:26:23 +0000 |
|---|---|---|
| committer | Ian Lynagh <ian@well-typed.com> | 2012-11-23 16:26:23 +0000 |
| commit | eb5196c48480c7dbec25aa175e43b9c20277f29c (patch) | |
| tree | 6027a7473f2e862422eab6ecf2428a29c079e343 /compiler/iface | |
| parent | 64efee6225ac18e54919d1690073fa2404a74a6c (diff) | |
| download | haskell-eb5196c48480c7dbec25aa175e43b9c20277f29c.tar.gz | |
Move seq's fixity declaration info primops.txt.pp
Diffstat (limited to 'compiler/iface')
| -rw-r--r-- | compiler/iface/LoadIface.lhs | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/compiler/iface/LoadIface.lhs b/compiler/iface/LoadIface.lhs index 6dfac27d5d..f77cb1e3b4 100644 --- a/compiler/iface/LoadIface.lhs +++ b/compiler/iface/LoadIface.lhs @@ -39,7 +39,6 @@ import Constants import PrelNames import PrelInfo import PrimOp ( allThePrimOps, primOpFixity, primOpOcc ) -import MkId ( seqId ) import Rules import Annotations import InstEnv @@ -605,8 +604,7 @@ ghcPrimIface mi_fix_fn = mkIfaceFixCache fixities } where - fixities = (getOccName seqId, Fixity 0 InfixR) -- seq is infixr 0 - : mapMaybe mkFixity allThePrimOps + fixities = mapMaybe mkFixity allThePrimOps mkFixity op = (,) (primOpOcc op) <$> primOpFixity op \end{code} |