diff --git a/project.clj b/project.clj index 58b4a2c..bd5ad29 100644 --- a/project.clj +++ b/project.clj @@ -1,4 +1,4 @@ -(defproject uncomplicate/clojurecl "0.1.0" +(defproject uncomplicate/clojurecl "0.1.1" :description "ClojureCL is a Clojure library for parallel computations with OpenCL." :url "https://github.com/uncomplicate/clojurecl" :scm {:name "git" @@ -8,6 +8,7 @@ :dependencies [[org.clojure/clojure "1.7.0-RC1"] [org.jocl/jocl "0.2.0-RC00"] [org.clojure/core.async "0.1.346.0-17112a-alpha"] + [vertigo "0.1.3"] [com.outpace/config "0.9.0"]] :codox {:defaults {:doc/format :markdown} @@ -25,8 +26,7 @@ *unchecked-math* :warn-on-boxed *print-length* 128} :dependencies [[midje "1.7.0-beta1"] - [criterium "0.4.3"] - [vertigo "0.1.3"]]}} + [criterium "0.4.3"]]}} :javac-options ["-target" "1.6" "-source" "1.6" "-Xlint:-options"] :source-paths ["src/clojure"] diff --git a/src/clojure/uncomplicate/clojurecl/info.clj b/src/clojure/uncomplicate/clojurecl/info.clj index a22218b..9e989e5 100644 --- a/src/clojure/uncomplicate/clojurecl/info.clj +++ b/src/clojure/uncomplicate/clojurecl/info.clj @@ -117,7 +117,7 @@ * [`cl_program`] (http://www.jocl.org/doc/org/jocl/cl_program.html) info: [[program-context]], [[program-num-devices]], [[program-devices]], - [[source]], [[binary-sizes]], [[binaries]], [[program-num-kernels]], + [[program-source]], [[binary-sizes]], [[binaries]], [[program-num-kernels]], [[kernel-names]], [[reference-count]] * program build info: **[[build-info]]**, @@ -1341,7 +1341,7 @@ (vec (info-native* CL/clGetProgramInfo p CL/CL_PROGRAM_DEVICES cl_device_id Sizeof/cl_device_id))) -(defn source [p] +(defn program-source [p] (info-string* CL/clGetProgramInfo p CL/CL_PROGRAM_SOURCE)) (defn binary-sizes [p] @@ -1380,7 +1380,7 @@ :context (program-context p) :num-devices (program-num-devices p) :devices (program-devices p) - :source (source p) + :source (program-source p) :binary-sizes (binary-sizes p) :binaries (binaries p) :num-kernels (program-num-kernels p) @@ -1389,7 +1389,7 @@ ([p] (->ProgramInfo (maybe (reference-count p)) (maybe (program-context p)) (maybe (program-num-devices p)) (maybe (program-devices p)) - (maybe (source p)) (maybe (binary-sizes p)) + (maybe (program-source p)) (maybe (binary-sizes p)) (maybe (binaries p)) (maybe (program-num-kernels p)) (maybe (kernel-names p))))) InfoReferenceCount