[commit: ghc] master: FastString: Supply mconcat implementation (c4a9dca)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/c4a9dcad885a7bbe0f60b7bef39a7d1789eae5e9/ghc

>---------------------------------------------------------------

commit c4a9dcad885a7bbe0f60b7bef39a7d1789eae5e9
Author: Ben Gamari <bgamari.foss at gmail.com>
Date:   Fri Jul 8 14:09:09 2016 +0200

    FastString: Supply mconcat implementation
    
    Test Plan: Validate
    
    Reviewers: austin
    
    Subscribers: thomie
    
    Differential Revision: https://phabricator.haskell.org/D2389


>---------------------------------------------------------------

c4a9dcad885a7bbe0f60b7bef39a7d1789eae5e9
 compiler/utils/FastString.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/compiler/utils/FastString.hs b/compiler/utils/FastString.hs
index 490eb13..651719a 100644
--- a/compiler/utils/FastString.hs
+++ b/compiler/utils/FastString.hs
@@ -198,6 +198,7 @@ instance IsString FastString where
 instance Monoid FastString where
     mempty = nilFS
     mappend = appendFS
+    mconcat = concatFS
 
 instance Show FastString where
    show fs = show (unpackFS fs)