#14152: Float exit paths out of recursive functions -------------------------------------+------------------------------------- Reporter: nomeata | Owner: (none) Type: task | Status: patch Priority: normal | Milestone: Component: Compiler | Version: 8.2.1 Resolution: | Keywords: JoinPoints Operating System: Unknown/Multiple | Architecture: | Unknown/Multiple Type of failure: None/Unknown | Test Case: Blocked By: | Blocking: Related Tickets: #14137 #10918 | Differential Rev(s): Wiki Page: | -------------------------------------+------------------------------------- Comment (by simonpj):
All join-point should have OneOcc
Aha. They should, but indeed they don't. I've created Trac #15091 to fix this -- Ticket URL: http://ghc.haskell.org/trac/ghc/ticket/14152#comment:43 GHC http://www.haskell.org/ghc/ The Glasgow Haskell Compiler