CLJS-2276: Self-host: Need test.check dep for CLJS-2275

Revives addition of test.check

Author: mfikes

script/test-self-parity

@@ -10,10 +10,10 @@ if [ ! -f lib/clojure.jar ]; then
   exit 1
 fi
 jar xvf lib/clojure.jar clojure/template.clj > /dev/null
-jar xvf lib/test.check.jar clojure/test/check/random clojure/test/check/generators.cljc clojure/test/check/rose_tree.cljc > /dev/null
+jar xvf lib/test.check.jar clojure/test/check.cljc clojure/test/check/results.cljc clojure/test/check/clojure_test.cljc clojure/test/check/impl.cljc clojure/test/check/properties.cljc clojure/test/check/generators.cljc clojure/test/check/random.clj clojure/test/check/random/doubles.cljs clojure/test/check/random/longs/bit_count_impl.cljs clojure/test/check/random/longs.cljs clojure/test/check/random.cljs clojure/test/check/rose_tree.cljc > /dev/null
 mkdir -p builds/out-self-parity/clojure/test
 mv clojure/template.clj builds/out-self-parity/clojure
-mv clojure/test/check builds/out-self-parity/clojure/test
+mv clojure/test builds/out-self-parity/clojure
 
 if ! bin/cljsc src/test/self/self_parity "{:optimizations :none :output-to \"builds/out-self-parity/main.js\" :output-dir \"builds/out-self-parity\" :main self-parity.test :target :nodejs}"; then
   >&2 echo ClojureScript compilation failed

src/test/cljs/cljs/core_test.cljs

@@ -9,6 +9,10 @@
 (ns cljs.core-test
   (:refer-clojure :exclude [iter])
   (:require [cljs.test :refer-macros [deftest testing is]]
+            [clojure.test.check :as tc]
+            [clojure.test.check.clojure-test :refer-macros [defspec]]
+            [clojure.test.check.generators :as gen]
+            [clojure.test.check.properties :as prop :include-macros true]
             [clojure.string :as s]
             [clojure.set :as set]
             [goog.object :as gobject]))
@@ -547,6 +551,10 @@
   (is (= 0 (loop [x 0] (cond-> x false recur))))
   (is (= 0 (loop [x 0] (cond->> x false recur)))))
 
+(defspec boolean-test 10
+  (prop/for-all [b gen/boolean]
+    (boolean? b)))
+
 (deftest aget-test
   (is (= 11 (aget #js [10 11 12] 1)))
   (is (= 11 (apply aget [#js [10 11 12] 1])))