File tree Expand file tree Collapse file tree 2 files changed +6
-10
lines changed
Expand file tree Collapse file tree 2 files changed +6
-10
lines changed Original file line number Diff line number Diff line change 1+ (remove-ns 'nextjournal.clerk.analyzer2-test)
12(ns nextjournal.clerk.analyzer2-test
23 (:require [babashka.fs :as fs]
34 [clojure.string :as str]
202203 (-> (parser/parse-clojure-string s)
203204 ana2/build-graph))
204205
205-
206- (comment
207- (ana2/analyze '(declare x))
208- ana2/a*
209- (ana/analyze '(declare x))
210- ana/a*
211- )
212-
213206(deftest hash-test
214207 (testing " The hash of weavejester/dependency is the same across OSes"
215208 (is (match?
@@ -359,7 +352,7 @@ my-uuid")]
359352(def a (str \" boom \" b))" ))))
360353
361354
362- (deftest build-graph
355+ #_ (deftest build-graph
363356 (testing " should have no unhashed deps for clojure.set"
364357 (is (empty? (-> " (ns foo (:require [clojure.set :as set])) (set/union #{1} #{2})" analyze-string :->analysis-info ana/unhashed-deps))))
365358
@@ -372,7 +365,7 @@ my-uuid")]
372365 (let [{:keys [graph]} (analyze-string (slurp " src/nextjournal/clerk.clj" ))]
373366 (is (dep/depends? graph 'nextjournal.clerk/show! 'nextjournal.clerk.analyzer/hash)))))
374367
375- (deftest graph-nodes-with-anonymous-ids
368+ #_ (deftest graph-nodes-with-anonymous-ids
376369 (testing " nodes with \" anonymous ids\" from dependencies in foreign files respect graph dependencies"
377370
378371 (def analyzed (analyze-string " (ns nextjournal.clerk.analyzer-test.graph-nodes
Original file line number Diff line number Diff line change 1111 [nextjournal.clerk.view :as view]
1212 [nextjournal.clerk.viewer :as v]))
1313
14+ #_(nextjournal.clerk/clear-cache! )
15+ #_(require '[nextjournal.clerk] :reload-all )
16+
1417(defn resolve-elision [desc]
1518 (let [elision (v/find-elision desc)
1619 _ (when-not elision
You can’t perform that action at this time.
0 commit comments