Arrows

[Simon Peyton-Jones]

Dan

I've built your tick7071 branch.  I only get these testsuite failues:

Unexpected failures:
   arrows/should_fail        T2111 [stderr mismatch] (normal)
   arrows/should_fail        arrowfail003 [stderr mismatch] (normal)

So this is good.


(plus some I-think-spurious ones)
   driver                    dynHelloWorld [exit code non-0] (dyn)
   dynlibs                   T3807 [bad exit code] (normal)
   dynlibs                   T5373 [bad exit code] (normal)
   perf/compiler             T6048 [stat not good enough] (optasm)
   perf/haddock              haddock.base [stat not good enough] (normal)
   perf/haddock              haddock.compiler [stat not good enough] (normal)

What's next?  I guess we could merge your changes once you are happy.

Simon


The arrow failures are these

=====> arrowfail003(normal) 909 of 3412 [0, 1, 0]
cd ./arrows/should_fail && '/5playpen/simonpj/HEAD-1/bindisttest/install   dir/bin/ghc' -fforce-recomp -dcore-lint -dcmm-lint -dno-debug-output -no-user-package-db -rtsopts -fno-ghci-history -c arrowfail003.hs    >arrowfail003.comp.stderr 2>&1
Actual stderr output differs from expected:
--- ./arrows/should_fail/arrowfail003.stderr 2012-08-15 15:05:05.000000000 +0100
+++ ./arrows/should_fail/arrowfail003.comp.stderr        2012-08-16 16:22:20.074881971 +0100
@@ -3,12 +3,3 @@
     The arrow command
       returnA -< []
     was found where an expression was expected
-    In the expression: returnA -< []
-    In an equation for `foo': foo = returnA -< []
-
-arrowfail003.hs:9:7:
-    The arrow command
-      (|zeroArrow |)
-    was found where an expression was expected
-    In the expression: (|zeroArrow |)
-    In an equation for `bar': bar = (|zeroArrow |)
*** unexpected failure for arrowfail003(normal)
=====> arrowfail004(normal) 910 of 3412 [0, 2, 0]
cd ./arrows/should_fail && '/5playpen/simonpj/HEAD-1/bindisttest/install   dir/bin/ghc' -fforce-recomp -dcore-lint -dcmm-lint -dno-debug-output -no-user-package-db -rtsopts -fno-ghci-history -c arrowfail004.hs    >arrowfail004.comp.stderr 2>&1
=====> T2111(normal) 911 of 3412 [0, 2, 0]
cd ./arrows/should_fail && '/5playpen/simonpj/HEAD-1/bindisttest/install   dir/bin/ghc' -fforce-recomp -dcore-lint -dcmm-lint -dno-debug-output -no-user-package-db -rtsopts -fno-ghci-history -c T2111.hs    >T2111.comp.stderr 2>&1
Actual stderr output differs from expected:
--- ./arrows/should_fail/T2111.stderr 2012-08-15 15:05:05.000000000 +0100
+++ ./arrows/should_fail/T2111.comp.stderr        2012-08-16 16:22:20.226882323 +0100
@@ -3,8 +3,3 @@
     The arrow command
       undefined -< x
     was found where an expression was expected
-    In a stmt of a 'do' block: x <- undefined -< x
-    In a stmt of a 'do' block: rec { x <- undefined -< x }
-    In the expression:
-      do { rec { x <- undefined -< x };
-           undefined -< x }
*** unexpected failure for T2111(normal)
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://www.haskell.org/pipermail/cvs-ghc/attachments/20120817/607c4748/attachment.htm>