Commit 14d5afa7 authored by's avatar
Browse files

Make mkApps etc infix, and left-associative

parent 6d4bd8f7
......@@ -57,6 +57,9 @@ import DataCon ( DataCon, dataConWorkId, dataConTag )
import BasicTypes ( Activation )
import FastString
import Outputable
infixl 4 `mkApps`, `mkValApps`, `mkTyApps`, `mkVarApps`
-- Left associative, so that we can say (f `mkTyApps` xs `mkVarApps` ys)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment