I created CUDA wrapper for pascal language :)
http://code.google.com/p/pascuda/
I tested CUFFFT and “CUDA Kernel API”
and all works OK, “CUDA Runtime API” exists too but I tested only “cudaGetDeviceCount” and “cudaGetDeviceProperties”
At this moment is one example
https://code.google.com/p/pascuda/source/browse/trunk/examples/add_vector/add_vector.dpr
simple kernel:
__global__
void add(int *a, int *b, int *c, int *n)
{
int index = blockIdx.x;
if( index < *n)
{
c[index] = a[index] + b[index] ;
}
}
I tested my code only in Delphi 2010
but should works in freepascal
CUDA + Delphi = Google Code Archive - Long-term storage for Google Code Project Hosting.
:D