{-# LANGUAGE RecursiveDo #-}
main = do {rec {x <- return 1}; print x}