aihc-parser-1.0.0.2: test/Test/Fixtures/oracle/QualifiedDo/qualified-mdo-bind.hs
{- ORACLE_TEST pass -}
{-# LANGUAGE QualifiedDo, RecursiveDo #-}
module QualifiedMdoBind where
f = M.mdo
x <- action
return x
{- ORACLE_TEST pass -}
{-# LANGUAGE QualifiedDo, RecursiveDo #-}
module QualifiedMdoBind where
f = M.mdo
x <- action
return x