native tests: upgrade sci-test

The sci-test project supports testing rewrite-clj when exposed via
sci. It has moved from a single-segment namespace to a multi-segment
namespace to expose lib under test.

Supports use of clj-easy/graal-build-time: #165

Author: lread

deps.edn

@@ -87,7 +87,7 @@
            :sci-test {:override-deps {org.clojure/clojure {:mvn/version "1.10.3"}}
                       :extra-paths ["target/generated/sci-test/src"]
                       :extra-deps {lread/sci-test {:git/url "https://github.com/lread/sci-test.git"
-                                                   :sha "9fbac1d8d7ef73a35b03446fdf3844c0872d178e"}}}
+                                                   :sha "db4f6886774e865bd451fc500721d1148a6618b4"}}}
 
            :native-test {:override-deps {org.clojure/clojure {:mvn/version "1.10.3"}}
                          :extra-paths ["target/generated/graal"]}

script/sci_test_gen_publics.clj

@@ -56,7 +56,7 @@
               :exclude-ns-regexes ["rewrite-clj\\.node\\.coercer" ]
               :exclude-var-regexes [".*Node.*"]
               :fn-wrappers {'import/fn-out-to-sci-out [".*/print" ".*/print-root"]}}
-        ns-name "lib-under-sci-test"
+        ns-name "lib-under-sci-test.defs"
         pubs (-> (find-nses opts)
                  (find-pubs opts))
         nses (->> (keys pubs)
@@ -72,7 +72,7 @@
               (list (list 'def 'namespaces (gen-sci-ns-map-code pubs opts))))]
     (binding [pprint/*print-right-margin* 130
               pprint/*print-miser-width* 130]
-      (let [out-file (io/file "target/generated/sci-test/src" (str (.replace ns-name "-" "_") ".clj"))]
+      (let [out-file (io/file "target/generated/sci-test/src" (str (string/escape ns-name {\- "_" \. "/"}) ".clj"))]
         (io/make-parents out-file)
         (io/delete-file out-file true)
         (run! #(pprint/pprint % (io/writer out-file :append true)) code)