mirror of
https://github.com/KevinMidboe/linguist.git
synced 2025-10-29 09:40:21 +00:00
21 lines
369 B
Perl
21 lines
369 B
Perl
if not terralib.cudacompile then
|
|
print("CUDA not enabled, not performing test...")
|
|
return
|
|
end
|
|
C = terralib.includec("cuda_runtime.h")
|
|
|
|
cudalib.linkruntime()
|
|
|
|
terra foo()
|
|
var stuff : &opaque
|
|
C.cudaMalloc(&stuff,sizeof(int))
|
|
return stuff
|
|
end
|
|
|
|
local a = foo()
|
|
|
|
terra blank() end
|
|
terralib.cudacompile { blank = blank }
|
|
|
|
assert(0 == C.cudaMemset(a,0,4))
|