path: root/testsuite/tests/parser/should_compile/NondecreasingIndentation.hs

{-# LANGUAGE NondecreasingIndentation #-}

module ShouldCompile where

f :: IO ()
f = do if True then f else do
       f
       if True then f else do
       f