Permalink
Browse files

update T5045 for new typing of arrow forms

  • Loading branch information...
1 parent 0eaf4a6 commit d41307d19adcab6bedf0a19b4cf579138c38dd15 Ross Paterson committed Mar 4, 2013
Showing with 1 addition and 1 deletion.
  1. +1 −1 tests/ghci/scripts/T5045.hs
@@ -6,7 +6,7 @@ module T5045 where
import Control.Arrow
class (Control.Arrow.Arrow a') => ArrowAddReader r a a' | a -> a' where
- elimReader :: a e b -> a' (e, r) b
+ elimReader :: a (e, s) b -> a' (e, (r, s)) b
newtype ByteString = FakeByteString String

0 comments on commit d41307d

Please sign in to comment.