id,summary,reporter,owner,description,type,status,priority,milestone,component,version,resolution,keywords,cc
21,Texture binding for IndexScalar does not work properly with the projection on tuple arrays.,seanl,seanl,"The execution of the code fragment

{{{
bar3 :: Vector (Word32, Int, Word32) -> Acc (Vector (Word32, Int, Word32))
bar3 xs
  = let
      xs' = use xs
      ys' = use (fromList 10 $ Prelude.zip3 [100..] [1000..] [10000..]) :: Acc (Vector (Word32, Int, Word32))
    in flip map xs' $ \x -> let (a  :: Exp Word32, b  :: Exp Int, c  :: Exp Word32) = untuple x
                                (a' :: Exp Word32, b' :: Exp Int, c' :: Exp Word32) = untuple (ys' Acc.! (b - 1))
                            in  tuple (a * a', b * b', c * c')

main :: IO ()
main = do
  let input3  = fromList 10 (Prelude.zip3 [0..9] [1..10] [2..11]) :: Vector (Word32, Int, Word32)
  r <- CUDA.run $ bar3 input3
  putStrLn $ show r
}}}

must produce

{{{
Array 10 [(0,1000,20000),(101,2002,30003),(204,3006,40008),(309,4012,50015),(416,5020,60024),(525,6030,70035),(636,7042,80048),(749,8056,90063),(864,9072,100080),(981,10090,110099)]
}}}

as the result.

As the {{{liftExp (Prj _ e)}}} in {{{Data/Array/Accelerate/CUDA/Execute.hs}}} simply returns an empty list and {{{bind}}} in the same module computes the texture number incorrectly, the CUDA backend failed to produce the correct result:

{{{
Array 10 [(0,0,0),(0,0,0),(0,0,0),(0,0,0),(0,0,0),(0,0,0),(0,0,0),(0,0,0),(0,0,0),(0,0,0)]
}}}",defect,closed,major,,CUDA backend,0.7.1.0,fixed,,