Add support for specifying compiler options.

Author: cmf

README.md

@@ -20,6 +20,11 @@ compileClojure {
                                // If projectOnly is true, only warnings from your project are errors.
   }
 
+  // Compiler options for AOT
+  disableLocalsClearing = true                 // Defaults to false
+  elideMeta = ['doc', 'file', 'line', 'added'] // Defaults to []
+  directLinking = true                         // Defaults to false
+
   // compileClojure implements the standard JavaForkOptions interface, and thus supports the
   // standard Gradle mechanisms for configuring a Java process:
   // systemProperty systemProperties minHeapSize maxHeapSize
@@ -41,6 +46,7 @@ compileTestClojure {
 testClojure {
   // Standard JVM execution options here for test process
   systemProperty 'java.awt.headless', true
+
   // Specifying junitReport will trigger JUnit XML report generation
   // in addition to standard console output (turned off by default)
   junitReport = file("$buildDir/reports/junit-report.xml")

src/main/kotlin/cursive/ClojurePlugin.kt

@@ -193,6 +193,10 @@ open class ClojureCompiler @Inject constructor(val fileResolver: FileResolver) :
   var copySourceToOutput: Boolean? = null
   var reflectionWarnings = ReflectionWarnings(false, false, false)
 
+  var disableLocalsClearing: Boolean = false
+  var elideMeta: Collection<String> = emptyList()
+  var directLinking: Boolean = false
+
   var namespaces: Collection<String> = emptyList()
 
   fun reflectionWarnings(configureClosure: Closure<Any?>?): ReflectionWarnings {
@@ -225,7 +229,10 @@ open class ClojureCompiler @Inject constructor(val fileResolver: FileResolver) :
 
       val script = listOf("(try",
                           "  (binding [*compile-path* \"${destinationDir.canonicalPath}\"",
-                          "            *warn-on-reflection* ${reflectionWarnings.enabled}]",
+                          "            *warn-on-reflection* ${reflectionWarnings.enabled}",
+                          "            *compiler-options* {:disable-locals-clearing $disableLocalsClearing",
+                          "                                :elide-meta [${elideMeta.map { ":$it" }.joinToString(" ")}]",
+                          "                                :direct-linking $directLinking}]",
                           "    " + namespaces.map { "(compile '$it)" }.joinToString("\n    ") + ")",
                           "  (catch Throwable e",
                           "    (.printStackTrace e)",