diff options
Diffstat (limited to 'testsuite/tests/simplCore/should_compile/T18231.hs')
-rw-r--r-- | testsuite/tests/simplCore/should_compile/T18231.hs | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/testsuite/tests/simplCore/should_compile/T18231.hs b/testsuite/tests/simplCore/should_compile/T18231.hs new file mode 100644 index 0000000000..d9c6e0c93b --- /dev/null +++ b/testsuite/tests/simplCore/should_compile/T18231.hs @@ -0,0 +1,7 @@ +module T18231 where + +import Control.Monad (forever) +import Control.Monad.Trans.State.Strict + +m :: State Int () +m = forever $ modify' (+1) |