[cvs-nhc98] Correct transformation of pattern bindings in do.

[User olaf]

olaf: Fri Mar 16 20:42:07 CET 2001

Update of /usr/src/master/nhc/src/compiler98
In directory hinken:/tmp/cvs-serv22166/src/compiler98

Modified Files:
	DbgDataTrans.hs 
Log Message:
Correct transformation of pattern bindings in do.
Function dRemoveDo still assumed pre-Haskell98 translation that
uses Monad.zero. Changed it to correctly use fail "...".
Confusingly token fail is called t_zero, probably because
t_fail is used by the tracer for different purposes.