steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity
factor/extra/cuda/demos/prefix-sum/prefix-sum.factor

16 lines
439 B
Factor
Raw Normal View History

CUDA-FUNCTION: works, splitting up CUDA into more vocabs
2010-04-18 19:33:18 -04:00
! Copyright (C) 2010 Doug Coleman.
! See http://factorcode.org/license.txt for BSD license.
USING: alien.c-types cuda cuda.syntax locals ;
IN: cuda.demos.prefix-sum
CUDA-LIBRARY: prefix-sum vocab:cuda/demos/prefix-sum/prefix-sum.ptx
CUDA-FUNCTION: prefix_sum_block ( uint* in, uint* out, uint n ) ;
:: cuda-prefix-sum ( -- )
cuda: more API cleanups: - remove useless with-cuda and with-cuda-program combinators - eliminate redundant cuda-device, cuda-context variables - rearrange arguments of with-*cuda-context to ( device flags quot -- ) - don't pass context to with-cuda-context quot - add context-device word to ask for current device
2010-05-15 14:45:02 -04:00
0 0 [
CUDA-FUNCTION: works, splitting up CUDA into more vocabs
2010-04-18 19:33:18 -04:00
! { 1 1 1 } { 2 1 } 0 3<<< prefix_sum_block
cuda: more API cleanups: - remove useless with-cuda and with-cuda-program combinators - eliminate redundant cuda-device, cuda-context variables - rearrange arguments of with-*cuda-context to ( device flags quot -- ) - don't pass context to with-cuda-context quot - add context-device word to ask for current device
2010-05-15 14:45:02 -04:00
] with-cuda-context ;
CUDA-FUNCTION: works, splitting up CUDA into more vocabs
2010-04-18 19:33:18 -04:00
MAIN: cuda-prefix-sum