[commit: ghc] master: ghci/scripts/ghci016: Add implementation for negate (3a67aba)

[git at git.haskell.org]

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

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

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

commit 3a67aba2be3a7a6681d4349033c064596ce7fcde
Author: Ben Gamari <bgamari.foss at gmail.com>
Date:   Mon Aug 18 21:37:15 2014 -0500

    ghci/scripts/ghci016: Add implementation for negate
    
    Summary: This previously produced a warning
    
    Test Plan: validate
    
    Reviewers: austin
    
    Reviewed By: austin
    
    Subscribers: simonmar, relrod, ezyang, carter
    
    Differential Revision: https://phabricator.haskell.org/D162


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

3a67aba2be3a7a6681d4349033c064596ce7fcde
 testsuite/tests/ghci/scripts/ghci016.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/testsuite/tests/ghci/scripts/ghci016.hs b/testsuite/tests/ghci/scripts/ghci016.hs
index 2740a66..0c86f02 100644
--- a/testsuite/tests/ghci/scripts/ghci016.hs
+++ b/testsuite/tests/ghci/scripts/ghci016.hs
@@ -13,6 +13,7 @@ instance Num T where
     (*)    = error "urk"
     abs    = error "urk"
     signum = error "urk"
+    negate = error "urk"
 
 -- Typing 3 at the ghci prompt should print T