mirror of
https://github.com/i-am-tom/higgledy.git
synced 2024-10-26 16:53:13 +03:00
Relax doctests
This commit is contained in:
parent
4f2170e7b8
commit
3b9171e303
@ -65,7 +65,7 @@ import qualified Data.Generics.Product as G
|
|||||||
-- >>> total & field @"oops" .~ pure ()
|
-- >>> total & field @"oops" .~ pure ()
|
||||||
-- ...
|
-- ...
|
||||||
-- ... error:
|
-- ... error:
|
||||||
-- ... • The type HKD User Last does not contain a field named 'oops'.
|
-- ... The type HKD User Last does not contain a field named 'oops'.
|
||||||
-- ...
|
-- ...
|
||||||
field
|
field
|
||||||
:: forall field f structure inner
|
:: forall field f structure inner
|
||||||
@ -91,8 +91,8 @@ field
|
|||||||
-- >>> deconstruct ("Hello", True) ^. position @4
|
-- >>> deconstruct ("Hello", True) ^. position @4
|
||||||
-- ...
|
-- ...
|
||||||
-- ... error:
|
-- ... error:
|
||||||
-- ... • The type HKD
|
-- ... The type HKD
|
||||||
-- ... ([Char], Bool) f does not contain a field at position 4
|
-- ... ([Char], Bool) f does not contain a field at position 4
|
||||||
-- ...
|
-- ...
|
||||||
position
|
position
|
||||||
:: forall index f structure inner
|
:: forall index f structure inner
|
||||||
|
@ -75,14 +75,14 @@ instance (Generic shape, GFill f with '[] (Rep shape))
|
|||||||
-- = User { name :: String, age :: Int, likesDogs :: Bool }
|
-- = User { name :: String, age :: Int, likesDogs :: Bool }
|
||||||
-- deriving Generic
|
-- deriving Generic
|
||||||
-- :}
|
-- :}
|
||||||
--
|
--
|
||||||
-- >>> :{
|
-- >>> :{
|
||||||
-- test :: _
|
-- test :: _
|
||||||
-- test = build @User
|
-- test = build @User
|
||||||
-- :}
|
-- :}
|
||||||
-- ...
|
-- ...
|
||||||
-- ... • Found type wildcard ‘_’
|
-- ... Found type wildcard ...
|
||||||
-- ... standing for ‘f [Char] -> f Int -> f Bool -> HKD User f’
|
-- ... standing for ...f [Char] -> f Int -> f Bool -> HKD User f...
|
||||||
-- ...
|
-- ...
|
||||||
--
|
--
|
||||||
-- Once we call the 'build' function, and indicate the type we want to build,
|
-- Once we call the 'build' function, and indicate the type we want to build,
|
||||||
|
Loading…
Reference in New Issue
Block a user