aihc-parser-1.0.0.2: test/Test/Fixtures/oracle/DoAndIfThenElse/do-and-if-then-else-nested-do.hs

{- ORACLE_TEST pass -}
{-# LANGUAGE DoAndIfThenElse #-}

module DoAndIfThenElseNestedDo where

nested :: Bool -> Maybe Int
nested cond = do
  if cond
  then do
    x <- pure 1
    pure x
  else do
    y <- pure 2
    pure y