diff options
| author | simonpj@microsoft.com <unknown> | 2009-10-29 12:02:37 +0000 |
|---|---|---|
| committer | simonpj@microsoft.com <unknown> | 2009-10-29 12:02:37 +0000 |
| commit | 241fdb3509084d0f00bc62f91cf65ade9df5f0e7 (patch) | |
| tree | 614e5eadeb00a88847394d1b60b37a1015b6f4d7 | |
| parent | f96194794bf099020706c3816d1a5678b40addbb (diff) | |
| download | haskell-241fdb3509084d0f00bc62f91cf65ade9df5f0e7.tar.gz | |
Make `consBag` infixr, and `snocBag` infixl
| -rw-r--r-- | compiler/utils/Bag.lhs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/compiler/utils/Bag.lhs b/compiler/utils/Bag.lhs index b7e92a332c..481dedfd8e 100644 --- a/compiler/utils/Bag.lhs +++ b/compiler/utils/Bag.lhs @@ -22,6 +22,9 @@ import Outputable import Util ( isSingleton ) import Data.List ( partition ) + +infixr 3 `consBag` +infixl 3 `snocBag` \end{code} |