haskell-debugger-0.13.0.0: test/integration/T107a/b/src/MyLib.hs

module MyLib (thenDo) where

thenDo :: (String -> IO String) -> String -> IO ()
thenDo a b = do
  print =<< a ("test" ++ b)
{-# OPAQUE thenDo #-}