[cvs-nhc98] Replaced definition of wrapForward by def. of wrapUForward

[User olaf]

olaf: Fri May 10 21:11:49 CEST 2002

Update of /usr/src/master/nhc/src/hat/lib
In directory hinken:/tmp/cvs-serv17868

Modified Files:
	Hat.hs 
Log Message:
Replaced definition of wrapForward by def. of wrapUForward.

This combinator is always used in an untraced context. Hence it is unnecessary to have two variants.

Actually expected slightly smaller traces and less performance with nhc98, but there seems to be no difference.