Prelude.Parallel test suite failing with "--flag dev"

[harendra-kumar]

Failures:

  lib/Streamly/Test/Prelude/Common.hs:1599:5:
  1) Prelude.Parallel, Tests for exceptions, default, parallely bracket partial stream
       uncaught exception: ErrorCall
       refValue == 2
       CallStack (from HasCallStack):
         error, called at lib/Streamly/Test/Prelude/Common.hs:1462:21 in streamly-tests-0.0.0-inplace:Streamly.Test.Prelude.Common
       (after 33 tests and 10 shrinks)
         [2,-32,2,6,0,-18]
         4

  To rerun use: --match "/Prelude.Parallel/Tests for exceptions/default/parallely bracket partial stream/"

  lib/Streamly/Test/Prelude/Common.hs:1599:5:
  2) Prelude.Parallel, Tests for exceptions, rate AvgRate 10000, parallely bracket partial stream
       uncaught exception: ErrorCall
       refValue == 2
       CallStack (from HasCallStack):
         error, called at lib/Streamly/Test/Prelude/Common.hs:1462:21 in streamly-tests-0.0.0-inplace:Streamly.Test.Prelude.Common
       (after 18 tests and 7 shrinks)
         [-3,-8,3,11,-8,-7,15,-12,-3,11,10,0]
         6

  To rerun use: --match "/Prelude.Parallel/Tests for exceptions/rate AvgRate 10000/parallely bracket partial stream/"

  lib/Streamly/Test/Prelude/Common.hs:1599:5:
  3) Prelude.Parallel, Tests for exceptions, rate Nothing, parallely bracket partial stream
       uncaught exception: ErrorCall
       refValue == 2
       CallStack (from HasCallStack):
         error, called at lib/Streamly/Test/Prelude/Common.hs:1462:21 in streamly-tests-0.0.0-inplace:Streamly.Test.Prelude.Common
       (after 91 tests and 19 shrinks)
         [36,-26,24,-53,-47,-62,20,89]
         1

  To rerun use: --match "/Prelude.Parallel/Tests for exceptions/rate Nothing/parallely bracket partial stream/"

  lib/Streamly/Test/Prelude/Common.hs:1605:5:
  4) Prelude.Parallel, Tests for exceptions, rate Nothing, parallely finally partial stream
       uncaught exception: ErrorCall
       refValue == 1
       CallStack (from HasCallStack):
         error, called at lib/Streamly/Test/Prelude/Common.hs:1522:21 in streamly-tests-0.0.0-inplace:Streamly.Test.Prelude.Common
       (after 73 tests and 14 shrinks)
         [43,1,10,18,-34,-2,-23,-62,12,-4,-43,24,-31,68]
         11

  To rerun use: --match "/Prelude.Parallel/Tests for exceptions/rate Nothing/parallely finally partial stream/"

  lib/Streamly/Test/Prelude/Common.hs:1599:5:
  5) Prelude.Parallel, Tests for exceptions, maxBuffer 0, parallely bracket partial stream
       uncaught exception: ErrorCall
       refValue == 2
       CallStack (from HasCallStack):
         error, called at lib/Streamly/Test/Prelude/Common.hs:1462:21 in streamly-tests-0.0.0-inplace:Streamly.Test.Prelude.Common
       (after 13 tests and 8 shrinks)
         [0,-2,0,10,2,3,9]
         3

  To rerun use: --match "/Prelude.Parallel/Tests for exceptions/maxBuffer 0/parallely bracket partial stream/"

  lib/Streamly/Test/Prelude/Common.hs:1605:5:
  6) Prelude.Parallel, Tests for exceptions, maxBuffer 0, parallely finally partial stream
       uncaught exception: ErrorCall
       refValue == 1
       CallStack (from HasCallStack):
         error, called at lib/Streamly/Test/Prelude/Common.hs:1522:21 in streamly-tests-0.0.0-inplace:Streamly.Test.Prelude.Common
       (after 13 tests and 4 shrinks)
         [0,-2,-1,4]
         1

  To rerun use: --match "/Prelude.Parallel/Tests for exceptions/maxBuffer 0/parallely finally partial stream/"

  lib/Streamly/Test/Prelude/Common.hs:1599:5:
  7) Prelude.Parallel, Tests for exceptions, maxThreads 0, parallely bracket partial stream
       uncaught exception: ErrorCall
       refValue == 2
       CallStack (from HasCallStack):
         error, called at lib/Streamly/Test/Prelude/Common.hs:1462:21 in streamly-tests-0.0.0-inplace:Streamly.Test.Prelude.Common
       (after 29 tests and 12 shrinks)
         [-10,-9,18,-15]
         1

  To rerun use: --match "/Prelude.Parallel/Tests for exceptions/maxThreads 0/parallely bracket partial stream/"

  lib/Streamly/Test/Prelude/Common.hs:1599:5:
  8) Prelude.Parallel, Tests for exceptions, maxThreads 1, parallely bracket partial stream
       uncaught exception: ErrorCall
       refValue == 2
       CallStack (from HasCallStack):
         error, called at lib/Streamly/Test/Prelude/Common.hs:1462:21 in streamly-tests-0.0.0-inplace:Streamly.Test.Prelude.Common
       (after 97 tests and 16 shrinks)
         [-41,70,-52,-10,-53,15,-83,53]
         5

  To rerun use: --match "/Prelude.Parallel/Tests for exceptions/maxThreads 1/parallely bracket partial stream/"

  lib/Streamly/Test/Prelude/Common.hs:1605:5:
  9) Prelude.Parallel, Tests for exceptions, maxThreads 1, parallely finally partial stream
       uncaught exception: ErrorCall
       refValue == 1
       CallStack (from HasCallStack):
         error, called at lib/Streamly/Test/Prelude/Common.hs:1522:21 in streamly-tests-0.0.0-inplace:Streamly.Test.Prelude.Common
       (after 91 tests and 6 shrinks)
         [52,2,-19,-77,0,66,-65,49,32,-69,1,-21,-74,-21,-64,-11,-53,-50,-62,20,89,-73,45,-11]
         9

  To rerun use: --match "/Prelude.Parallel/Tests for exceptions/maxThreads 1/parallely finally partial stream/"

  lib/Streamly/Test/Prelude/Common.hs:1599:5:
  10) Prelude.Parallel, Tests for exceptions, maxThreads -1, parallely bracket partial stream
       uncaught exception: ErrorCall
       refValue == 2
       CallStack (from HasCallStack):
         error, called at lib/Streamly/Test/Prelude/Common.hs:1462:21 in streamly-tests-0.0.0-inplace:Streamly.Test.Prelude.Common
       (after 40 tests and 5 shrinks)
         [-37,1,32,-16,-10,2,-11,2,26]
         3

  To rerun use: --match "/Prelude.Parallel/Tests for exceptions/maxThreads -1/parallely bracket partial stream/"

  lib/Streamly/Test/Prelude/Common.hs:1605:5:
  11) Prelude.Parallel, Tests for exceptions, maxThreads -1, parallely finally partial stream
       uncaught exception: ErrorCall
       refValue == 1
       CallStack (from HasCallStack):
         error, called at lib/Streamly/Test/Prelude/Common.hs:1522:21 in streamly-tests-0.0.0-inplace:Streamly.Test.Prelude.Common
       (after 15 tests)
         [13,-13,3]
         1

  To rerun use: --match "/Prelude.Parallel/Tests for exceptions/maxThreads -1/parallely finally partial stream/"

  lib/Streamly/Test/Prelude/Common.hs:1599:5:
  12) Prelude.Parallel, Tests for exceptions, rate AvgRate 0.00000001, parallely bracket partial stream
       uncaught exception: ErrorCall
       refValue == 2
       CallStack (from HasCallStack):
         error, called at lib/Streamly/Test/Prelude/Common.hs:1462:21 in streamly-tests-0.0.0-inplace:Streamly.Test.Prelude.Common
       (after 27 tests and 7 shrinks)
         [0,0,-23,-1,15,13,-4,-1,1,6,-18,-23]
         2

  To rerun use: --match "/Prelude.Parallel/Tests for exceptions/rate AvgRate 0.00000001/parallely bracket partial stream/"

  lib/Streamly/Test/Prelude/Common.hs:1605:5:
  13) Prelude.Parallel, Tests for exceptions, rate AvgRate 0.00000001, parallely finally partial stream
       uncaught exception: ErrorCall
       refValue == 1
       CallStack (from HasCallStack):
         error, called at lib/Streamly/Test/Prelude/Common.hs:1522:21 in streamly-tests-0.0.0-inplace:Streamly.Test.Prelude.Common
       (after 84 tests and 10 shrinks)
         [76,-55,-18,81,-73,46,43,-6,21,-62,-19,-66,-9,58]
         8

  To rerun use: --match "/Prelude.Parallel/Tests for exceptions/rate AvgRate 0.00000001/parallely finally partial stream/"

  lib/Streamly/Test/Prelude/Common.hs:1599:5:
  14) Prelude.Parallel, Tests for exceptions, maxBuffer (-1), parallely bracket partial stream
       uncaught exception: ErrorCall
       refValue == 2
       CallStack (from HasCallStack):
         error, called at lib/Streamly/Test/Prelude/Common.hs:1462:21 in streamly-tests-0.0.0-inplace:Streamly.Test.Prelude.Common
       (after 63 tests and 18 shrinks)
         [-8,31,23,29,21,0,25,54,-61,-6,-49,22,24]
         7

  To rerun use: --match "/Prelude.Parallel/Tests for exceptions/maxBuffer (-1)/parallely bracket partial stream/"

  lib/Streamly/Test/Prelude/Common.hs:1682:5:
  15) Prelude.Parallel take 1 parallely
       expected: 0
        but got: -1

  To rerun use: --match "/Prelude.Parallel/take 1 parallely/"

[harendra-kumar]

Similar failure was seen in Ahead streams:

  lib/Streamly/Test/Prelude/Common.hs:1605:5:
  1) Prelude.Ahead, Tests for exceptions, rate AvgRate 10000, aheadly finally partial stream
       uncaught exception: ErrorCall
       refValue == 1
       CallStack (from HasCallStack):
         error, called at lib/Streamly/Test/Prelude/Common.hs:1522:21 in streamly-tests-0.0.0-inplace:Streamly.Test.Prelude.Common
       (after 55 tests and 2 shrinks)
         [26,-30,51,-18,15,-47,39,17,-28,-41,36,-27,10,-34,32,-28,-16,-20,-34,-4,-7,25,-43,-28,-13,-48,-37,34,9,22,37,-5,-46,29,24,-9,11,38,18,51,-15,-31,-47,-26,-37,-38,-14,-37,39,-51,51,-31,38]
         35

  To rerun use: --match "/Prelude.Ahead/Tests for exceptions/rate AvgRate 10000/aheadly finally partial stream/"

Also, the test was stuck here for Ahead:

    maxBuffer 1
      aheadly before
        +++ OK, passed 100 tests.
      aheadly after
        +++ OK, passed 100 tests.
      aheadly bracket end of stream
        +++ OK, passed 100 tests.
74/100^C