T2506.hs 100 Bytes
Newer Older
simonpj's avatar
simonpj committed
1
2
3
4
5
6
-- Trac #2506

module ShouldCompile where
import Control.Exception (assert)

foo = True `assert` ()