[project @ 1997-12-17 11:08:16 by simonm]

add typechecker bug which we currently don't have a fix for

ghc/tests/typecheck/should_compile/tc094.hs

+module ShouldSucceed where
+
+-- From a bug report by Sven Panne.
+
+foo = bar
+   where bar = \_ -> (truncate boing, truncate boing)
+         boing = 0