DocTest.hs

module DocTest where

-- | Problematic doctest example 1
--
-- >>> x = 1
-- >>> :{
-- x
-- :}
-- 1
-- >>> x
-- 1
f :: Int
f = 1

-- | Problematic doctest example 2
--
-- >>> :{
-- x = 1
-- :}
-- >>> x
-- 1
g :: Int
g = 1

-- | Working doctest example 1
--
-- >>> x = 1
-- >>> :{
-- x
-- :}
-- 1
--
-- >>> x
-- 1
h :: Int
h = 1

-- | Working doctest example 2
--
-- >>> :{
-- x = 1
-- :}
--
-- >>> x
-- 1
j :: Int
j = 1

output.txt

[...]/DocTest.hs:6: failure in expression `:{
 x
:}'
expected: 1
          >>> x
          1
 but got: 1
          ^

[...]/DocTest.hs:17: failure in expression `:{
 x = 1
:}'
expected: >>> x
          1
 but got: ^