[commit: packages/binary] master: Don't use tyConString (d7ab033)

[git at git.haskell.org]

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

On branch  : master
Link       : http://git.haskell.org/packages/binary.git/commitdiff/d7ab0337977e192d0c9d0c3dc5a78b00f42d2b87

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

commit d7ab0337977e192d0c9d0c3dc5a78b00f42d2b87
Author: David Feuer <David.Feuer at gmail.com>
Date:   Tue Jan 10 01:37:03 2017 -0500

    Don't use tyConString
    
    `tyConString` has been deprecated since GHC 7.4. I'd like to move toward actually removing it. That can't happen until `binary` stops using it.


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

d7ab0337977e192d0c9d0c3dc5a78b00f42d2b87
 tools/derive/BinaryDerive.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tools/derive/BinaryDerive.hs b/tools/derive/BinaryDerive.hs
index 914dbb0..cf3afb6 100644
--- a/tools/derive/BinaryDerive.hs
+++ b/tools/derive/BinaryDerive.hs
@@ -17,7 +17,7 @@ derive x =
         | nTypeChildren > 0 =
             wrap (join ", " (map ("Binary "++) typeLetters)) ++ " => "
         | otherwise = ""
-    inst = wrap $ tyConString typeName ++ concatMap (" "++) typeLetters
+    inst = wrap $ tyConName typeName ++ concatMap (" "++) typeLetters
     wrap x = if nTypeChildren > 0 then "("++x++")" else x 
     join sep lst = concat $ intersperse sep lst
     nTypeChildren = length typeChildren