[project @ 2001-07-25 13:29:07 by simonpj]
authorsimonpj <unknown>
Wed, 25 Jul 2001 13:29:07 +0000 (13:29 +0000)
committersimonpj <unknown>
Wed, 25 Jul 2001 13:29:07 +0000 (13:29 +0000)
commit92428681b382c173a3d29bff6322e81bc9a7e403
tree16a209dc8a6549d57aec9c62e015cd8ff01c725b
parentf734124308bb4eb2f4e766abbaab6829d87b1cb1
[project @ 2001-07-25 13:29:07 by simonpj]
---------------------------------
Fix a bug in the defn of "both"
---------------------------------

This bug made the bootstrapped GHC enter an absent argument.

The change is from

both Lazy (Seq k Now ds) = Seq Keep Now ds
to
both Lazy (Seq k l ds) = Seq Keep l ds

Simple, eh?  (Comments with the code.)
ghc/compiler/stranal/DmdAnal.lhs