add backend to COMPILER_KWARGS

Author: simeonschaub

src/compiler/execution.jl

@@ -4,7 +4,7 @@ export @opencl, clfunction
 ## high-level @opencl interface
 
 const MACRO_KWARGS = [:launch]
-const COMPILER_KWARGS = [:kernel, :name, :always_inline, :extensions]
+const COMPILER_KWARGS = [:kernel, :name, :always_inline, :extensions, :backend]
 const LAUNCH_KWARGS = [:global_size, :local_size, :queue]
 
 macro opencl(ex...)

test/execution.jl

@@ -1,3 +1,5 @@
+using GPUCompiler: isavailable, SPIRV_LLVM_Translator_jll
+
 @testset "execution" begin
 
 @testset "@opencl" begin
@@ -133,4 +135,22 @@ end
     end
 end
 
+@testset "backends" begin
+    llvm_backend_llvm = sprint() do io
+        OpenCL.code_llvm(io, () -> nothing, (); dump_module = true, backend = :llvm)
+    end
+    if Int === Int64
+        @test occursin("target triple = \"spirv64-unknown-unknown-unknown\"", llvm_backend_llvm)
+    end
+
+    if isavailable(SPIRV_LLVM_Translator_jll)
+        llvm_backend_khronos = sprint() do io
+            OpenCL.code_llvm(io, () -> nothing, (); dump_module = true, backend = :khronos)
+        end
+        if Int === Int64
+            @test occursin("target triple = \"spir64-unknown-unknown\"", llvm_backend_khronos)
+        end
+    end
+end
+
 end