Bump version

CHANGELOG.md

@@ -6,6 +6,8 @@ The format is based on [Keep a Changelog](http://keepachangelog.com/)
 
 ## [Unreleased]
 
+## [22.4] - 2020-03-07
+
 ### Fixed
 
 - Fixed compilation of empty vector pattern matching.
@@ -396,7 +398,8 @@ The format is based on [Keep a Changelog](http://keepachangelog.com/)
 - y-or-n? fixed
 - compiler warnings suppressed in CLisp
 
-[Unreleased]: https://github.com/Shen-Language/shen-sources/compare/shen-22.3...HEAD
+[Unreleased]: https://github.com/Shen-Language/shen-sources/compare/shen-22.4...HEAD
+[22.4]: https://github.com/Shen-Language/shen-sources/compare/shen-22.3...shen-22.4
 [22.3]: https://github.com/Shen-Language/shen-sources/compare/shen-22.2...shen-22.3
 [22.2]: https://github.com/Shen-Language/shen-sources/compare/shen-22.1...shen-22.2
 [22.1]: https://github.com/Shen-Language/shen-sources/compare/shen-22.0...shen-22.1

README.md

@@ -1,4 +1,4 @@
-[![Current Release](https://img.shields.io/badge/release-22.3-blue.svg)](https://github.com/Shen-Language/shen-sources/releases)
+[![Current Release](https://img.shields.io/badge/release-22.4-blue.svg)](https://github.com/Shen-Language/shen-sources/releases)
 
 # Official Shen Sources
 
@@ -32,7 +32,7 @@ Packages can be created for any version, but when uploading to the releases page
 
 ```
 make pure
-git checkout shen-22.3
+git checkout shen-22.4
 make fetch
 make klambda
 make release

benchmarks/benchmarks.shen

@@ -25,7 +25,7 @@
   setup _ -> skip
   cleanup _ -> skip
   begin [_ Description RunsPower] -> (output "Measuring 10^~S runs of: ~A~%" RunsPower Description)
-  finish [_ _ _ Start End] -> (output "run time: ~S secs~%" (- End Start)))
+  finish [_ _ _ Start End] -> (output "    run time: ~S secs~%" (- End Start)))
 
 (define save-report
   setup _ -> (set *benchmark-results* [])
@@ -39,13 +39,14 @@
                  Results (map (run-benchmark Report) Benchmarks)
                  Cleanup (Report cleanup Benchmarks)
               done))
-
+\\(set _scm.*factorize-patterns* false)
 (set *hush* true)
-(load "benchmarks/data.shen")
-(load "benchmarks/control-flow.shen")
-(load "benchmarks/shen-compilation.shen")
+\\(set shen-cl.*factorise-patterns* false)
+\\(load "benchmarks/data.shen")
+\\(load "benchmarks/control-flow.shen")
+\\(load "benchmarks/shen-compilation.shen")
 (load "benchmarks/pattern-matching.shen")
-(load "benchmarks/equality-check.shen")
+\\(load "benchmarks/equality-check.shen")
 (set *hush* false)
 
 (if (bound? *argv*)

sources/declarations.shen

@@ -84,7 +84,7 @@ SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 (set *infs* 0)
 (set *hush* false)
 (set *optimise* false)
-(set *version* "Shen 22.3")
+(set *version* "Shen 22.4")
 
 (if (not (bound? *home-directory*))
     (set *home-directory* "")