Fix and test split_kwargs. (#290)

Author: maleadt

src/execution.jl

@@ -17,7 +17,7 @@ function split_kwargs(kwargs, kw_groups...)
         isa(key, Symbol) || throw(ArgumentError("non-symbolic keyword '$key'"))
 
         # find a matching group
-        group = length(kw_groups)
+        group = length(kwarg_groups)
         for (i, kws) in enumerate(kw_groups)
             if key in kws
                 group = i

test/util.jl

@@ -1,3 +1,5 @@
+## test helpers
+
 # @test_throw, with additional testing for the exception message
 macro test_throws_message(f, typ, ex...)
     quote
@@ -46,3 +48,15 @@ end
 
 struct TestCompilerParams <: AbstractCompilerParams end
 GPUCompiler.runtime_module(::CompilerJob{<:Any,TestCompilerParams}) = TestRuntime
+
+
+## tests of auxiliary functionality
+
+@testset "split_kwargs" begin
+    kwargs = [:(a=1), :(b=2), :(c=3), :(d=4)]
+    groups = GPUCompiler.split_kwargs(kwargs, [:a], [:b, :c])
+    @test length(groups) == 3
+    @test groups[1] == [:(a=1)]
+    @test groups[2] == [:(b=2), :(c=3)]
+    @test groups[3] == [:(d=4)]
+end