From 9e862765ffe161da8a4fd9cd67b0a600874feaa9 Mon Sep 17 00:00:00 2001
From: Ryan Scott <ryan.gl.scott@gmail.com>
Date: Fri, 30 Sep 2016 20:15:25 -0400
Subject: Implement deriving strategies

Allows users to explicitly request which approach to `deriving` to use
via keywords, e.g.,

```
newtype Foo = Foo Bar
  deriving Eq
  deriving stock    Ord
  deriving newtype Show
```

Fixes #10598. Updates haddock submodule.

Test Plan: ./validate

Reviewers: hvr, kosmikus, goldfire, alanz, bgamari, simonpj, austin,
erikd, simonmar

Reviewed By: alanz, bgamari, simonpj

Subscribers: thomie, mpickering, oerjan

Differential Revision: https://phabricator.haskell.org/D2280

GHC Trac Issues: #10598
---
 testsuite/tests/th/TH_dataD1.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'testsuite/tests/th/TH_dataD1.hs')

diff --git a/testsuite/tests/th/TH_dataD1.hs b/testsuite/tests/th/TH_dataD1.hs
index 1a51ac4aef..9d0c95b1a9 100644
--- a/testsuite/tests/th/TH_dataD1.hs
+++ b/testsuite/tests/th/TH_dataD1.hs
@@ -6,7 +6,7 @@ import Language.Haskell.TH
 ds :: Q [Dec]
 ds = [d|
           $(do { d <- dataD (cxt []) (mkName "D") [] Nothing
-                             [normalC (mkName "K") []] (cxt [])
+                             [normalC (mkName "K") []] []
                ; return [d]})
        |]
 
-- 
cgit v1.2.1