We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 133ed94 commit 86eb250Copy full SHA for 86eb250
doc/cookbook/uverb/UVerb.lhs
@@ -12,7 +12,6 @@ handlers that respond with arbitrary open unions of types.
12
{-# LANGUAGE DeriveAnyClass #-}
13
{-# LANGUAGE DeriveGeneric #-}
14
{-# LANGUAGE DerivingStrategies #-}
15
-{-# LANGUAGE DerivingVia #-}
16
{-# LANGUAGE FlexibleContexts #-}
17
{-# LANGUAGE FlexibleInstances #-}
18
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
@@ -158,7 +157,9 @@ Example usage:
158
157
```haskell
159
data Foo = Foo Int Int Int
160
deriving (Show, Eq, GHC.Generic, ToJSON)
161
- deriving HasStatus via WithStatus 200 Foo
+
+instance HasStatus Foo where
162
+ type StatusOf Foo = 200
163
164
data Bar = Bar
165
0 commit comments