CUDA in Delphi

I created CUDA wrapper for pascal language :)

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

simple kernel:


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 =