diff options
author | Oleg Grenrus <oleg.grenrus@iki.fi> | 2015-04-02 11:28:03 +0200 |
---|---|---|
committer | Thomas Miedema <thomasmiedema@gmail.com> | 2015-04-02 11:28:17 +0200 |
commit | 0721e552b863c28ffb5920c70b208947831c3dc2 (patch) | |
tree | 9e90fc0a146e02ef5033d85c937f60e4b8da0cf1 /compiler/iface/LoadIface.hs | |
parent | f15dbc22545964f301c736dba198da643690b5a0 (diff) | |
download | haskell-0721e552b863c28ffb5920c70b208947831c3dc2.tar.gz |
Fake (->) fixity declaration (#10145)
Reviewed By: simonpj, austin
Differential Revision: https://phabricator.haskell.org/D741
Diffstat (limited to 'compiler/iface/LoadIface.hs')
-rw-r--r-- | compiler/iface/LoadIface.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/compiler/iface/LoadIface.hs b/compiler/iface/LoadIface.hs index 169e929ae4..cfb8a11446 100644 --- a/compiler/iface/LoadIface.hs +++ b/compiler/iface/LoadIface.hs @@ -46,6 +46,7 @@ import PrelNames import PrelInfo import PrimOp ( allThePrimOps, primOpFixity, primOpOcc ) import MkId ( seqId ) +import TysPrim ( funTyConName ) import Rules import TyCon import Annotations @@ -871,6 +872,7 @@ ghcPrimIface } where fixities = (getOccName seqId, Fixity 0 InfixR) -- seq is infixr 0 + : (occName funTyConName, funTyFixity) -- trac #10145 : mapMaybe mkFixity allThePrimOps mkFixity op = (,) (primOpOcc op) <$> primOpFixity op |