diff --git a/CHANGELOG.md b/CHANGELOG.md index 3d288a67..968acb93 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -13,6 +13,8 @@ A preview of the next release can be installed from - SCI: implement `declare` as macro - #938: drop location metadata from symbols, except top level - #1199: support `print-method` impls on records +- `babashka.fs`: add `windows?` predicate +- SCI: add `*clojure-version*` and `(clojure-version)` ## 0.7.7 (2022-03-04) diff --git a/src/babashka/impl/clojure/core.clj b/src/babashka/impl/clojure/core.clj index d24596a7..b60f38d1 100644 --- a/src/babashka/impl/clojure/core.clj +++ b/src/babashka/impl/clojure/core.clj @@ -32,33 +32,6 @@ (def warn-on-reflection (core-dynamic-var '*warn-on-reflection* false)) (def math-context (core-dynamic-var '*math-context*)) -;; (def major (:major *clojure-version*)) -;; (def minor (:minor *clojure-version*)) -;; (def incremental (:incremental *clojure-version*)) -;; (def qualifier (str "sci" (when-let [q (:qualifier *clojure-version*)] -;; (str "+" q)))) - -;; (def clojure-ver {:major major -;; :minor minor -;; :incremental incremental -;; :qualifier qualifier}) - -;; (defn clojure-version -;; "Returns clojure version as a printable string." -;; {:added "1.0"} -;; [] -;; (str major -;; "." -;; minor -;; (when-let [i incremental] -;; (str "." i)) -;; (when-let [q qualifier] -;; (when (pos? (count q)) (str "-" q))) -;; (when incremental -;; "-SNAPSHOT"))) - -;; (def clojure-version-var (sci/new-dynamic-var '*clojure-version* clojure-ver)) - (defn read+string "Added for compatibility. Must be used with clojure.lang.LineNumberingPushbackReader. Does not support all of @@ -205,8 +178,6 @@ 'sync (sci/copy-var sync clojure-core-ns) 'ref (sci/copy-var ref clojure-core-ns) 'ref-set (sci/copy-var ref-set clojure-core-ns) - ;;'*clojure-version* clojure-version-var - ;;'clojure-version (sci/copy-var clojure-version clojure-core-ns) 'update-vals (sci/copy-var update-vals clojure-core-ns) 'update-keys (sci/copy-var update-keys clojure-core-ns) 'parse-boolean (sci/copy-var parse-boolean clojure-core-ns)