aihc-parser-1.0.0.2: test/Test/Fixtures/oracle/RecursiveDo/mdo.hs
{- ORACLE_TEST pass -}
{-# LANGUAGE RecursiveDo #-}
module MDo where
f = mdo
x <- return 1
return x{- ORACLE_TEST pass -}
{-# LANGUAGE RecursiveDo #-}
module MDo where
f = mdo
x <- return 1
return x