lookupBindGroupOcc: recommend names in the same namespace (#17593)
[ghc.git] / testsuite / tests / perf / should_run / T9339.hs
1 -- Tests that `last` successfully fuses.
2
3 main :: IO ()
4 main = print $ last $ filter odd $ [1::Int ..10000000]