started ProgramDSL

gradlew

@@ -1,4 +1,4 @@
-#!/usr/bin/env bash
+#!/usr/bin/env sh
 
 ##############################################################################
 ##
@@ -33,11 +33,11 @@ DEFAULT_JVM_OPTS=""
 # Use the maximum available, or set MAX_FD != -1 to use that value.
 MAX_FD="maximum"
 
-warn ( ) {
+warn () {
     echo "$*"
 }
 
-die ( ) {
+die () {
     echo
     echo "$*"
     echo
@@ -154,11 +154,19 @@ if $cygwin ; then
     esac
 fi
 
-# Split up the JVM_OPTS And GRADLE_OPTS values into an array, following the shell quoting and substitution rules
-function splitJvmOpts() {
-    JVM_OPTS=("$@")
+# Escape application args
+save () {
+    for i do printf %s\\n "$i" | sed "s/'/'\\\\''/g;1s/^/'/;\$s/\$/' \\\\/" ; done
+    echo " "
 }
-eval splitJvmOpts $DEFAULT_JVM_OPTS $JAVA_OPTS $GRADLE_OPTS
-JVM_OPTS[${#JVM_OPTS[*]}]="-Dorg.gradle.appname=$APP_BASE_NAME"
+APP_ARGS=$(save "$@")
 
-exec "$JAVACMD" "${JVM_OPTS[@]}" -classpath "$CLASSPATH" org.gradle.wrapper.GradleWrapperMain "$@"
+# Collect all arguments for the java command, following the shell quoting and substitution rules
+eval set -- $DEFAULT_JVM_OPTS $JAVA_OPTS $GRADLE_OPTS "\"-Dorg.gradle.appname=$APP_BASE_NAME\"" -classpath "\"$CLASSPATH\"" org.gradle.wrapper.GradleWrapperMain "$APP_ARGS"
+
+# by default we should be in the correct project dir, but when run from Finder on Mac, the cwd is wrong
+if [ "$(uname)" = "Darwin" ] && [ "$HOME" = "$PWD" ]; then
+  cd "$(dirname "$0")"
+fi
+
+exec "$JAVACMD" "$@"

gradlew.bat

@@ -49,7 +49,6 @@ goto fail
 @rem Get command-line arguments, handling Windows variants
 
 if not "%OS%" == "Windows_NT" goto win9xME_args
-if "%@eval[2+2]" == "4" goto 4NT_args
 
 :win9xME_args
 @rem Slurp the command line arguments.
@@ -60,11 +59,6 @@ set _SKIP=2
 if "x%~1" == "x" goto execute
 
 set CMD_LINE_ARGS=%*
-goto execute
-
-:4NT_args
-@rem Get arguments from the 4NT Shell from JP Software
-set CMD_LINE_ARGS=%$
 
 :execute
 @rem Setup the command line

src/main/kotlin/Main.kt

@@ -169,7 +169,7 @@ object Main {
 }
 
 fun main(args: Array<String>) {
-	val numElements = 4096
+	val numElements = 2048
 	Main.addVectors(numElements * numElements)
 	println("###############\n")
 	Main.multiplyMatrices(numElements)

src/main/kotlin/OpenCLProgramDSL.kt

@@ -0,0 +1,42 @@
+import com.jogamp.opencl.CLContext
+import com.jogamp.opencl.CLProgram
+
+fun CLContext.clProgram(op: OpenCLProgramBuilder.() -> Unit) : CLProgram =
+		createProgram(OpenCLProgramBuilder().apply(op).build())
+
+class OpenCLProgramBuilder internal constructor() {
+	private val functionList = mutableListOf<String>()
+
+	fun kernelFun(name: String, op: CLFunctionBuilder.() -> Unit) {
+		functionList += CLFunctionBuilder(name, true).apply(op).build()
+	}
+
+	internal fun build() : String = functionList.joinToString("\n\n")
+}
+
+class CLFunctionBuilder internal constructor(private val name: String, private val isKernel: Boolean) {
+
+	internal fun build() : String {
+		val stringBuilder = StringBuilder()
+
+		if(isKernel) stringBuilder.append("kernel")
+		else stringBuilder.append("local")
+
+		stringBuilder.append(" void $name(")
+
+		stringBuilder.append(") {\n")
+
+		stringBuilder.append("}\n")
+		return stringBuilder.toString()
+	}
+}
+
+interface CLExpression
+
+fun main(args: Array<String>) {
+	println(CLContext.create().clProgram {
+		kernelFun("HelloWorld") {
+
+		}
+	}.source)
+}