[project @ 1999-01-23 18:10:00 by sof]
[ghc-hetmet.git] / ghc / tests / codeGen / should_run / cg016.hs
1 -- !!! tests calls of `error' (that make calls of `error'...)
2 --
3 main = error ("1st call to error\n"++(
4        error ("2nd call to error\n"++(
5        error ("3rd call to error\n"++(
6        error ("4th call to error\n"++(
7        error ("5th call to error\n"++(
8        error ("6th call to error"
9        )))))))))))