[GHC] #5807: lengthP returns bad result

[GHC]

#5807: lengthP returns bad result
-----------------------------------------+----------------------------------
 Reporter:  benl                         |          Owner:  benl                 
     Type:  bug                          |         Status:  new                  
 Priority:  normal                       |      Component:  Data Parallel Haskell
  Version:  7.2.2                        |       Keywords:                       
       Os:  Unknown/Multiple             |   Architecture:  Unknown/Multiple     
  Failure:  Incorrect result at runtime  |       Testcase:                       
Blockedby:                               |       Blocking:                       
  Related:                               |  
-----------------------------------------+----------------------------------
 Mukesh Tiwari reports:

 {{{
 ghci>import Data.Array.Parallel
 ghci>import Data.Array.Parallel.PArray
 ghci>let u = Data.Array.Parallel.PArray.fromList [ 1 .. 10 ]
 ghci>:t u
 u :: PArray Double
 ghci>u
 fromList<PArray> [1.0,2.0,3.0,4.0,5.0,6.0,7.0,8.0,9.0,10.0]
 ghci>let v = Data.Array.Parallel.fromPArrayP u
 ghci>:t v
 v :: [:Double:]
 ghci>lengthP v
 0
 }}}

-- 
Ticket URL: <http://hackage.haskell.org/trac/ghc/ticket/5807>
GHC <http://www.haskell.org/ghc/>
The Glasgow Haskell Compiler