Skip to content

Commit 40567fb

Browse files
Apply suggestion from @Soupstraw
Co-authored-by: Joosep Jääger <[email protected]>
1 parent 2dcfe17 commit 40567fb

File tree

1 file changed

+0
-2
lines changed

1 file changed

+0
-2
lines changed

src/Constrained/Generation.hs

Lines changed: 0 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1317,8 +1317,6 @@ fromGESpec ge = case ge of
13171317
GenError xs -> ErrorSpec (catMessageList xs)
13181318
FatalError es -> error $ catMessages es
13191319

1320-
-- TODO: move this somewhere sensible
1321-
13221320
-- | Functor like property for Specification, but instead of a Haskell function (a -> b),
13231321
-- it takes a function symbol (t '[a] b) from a to b.
13241322
-- Note, in this context, a function symbol is some constructor of a witnesstype.

0 commit comments

Comments
 (0)