diff --git a/feature-yaml/babashka/impl/ordered.clj b/feature-yaml/babashka/impl/ordered.clj index 0c87bee6..bdb9c7b3 100644 --- a/feature-yaml/babashka/impl/ordered.clj +++ b/feature-yaml/babashka/impl/ordered.clj @@ -7,7 +7,7 @@ (def omap-ns (sci/create-ns 'flatland.ordered.map nil)) (def oset-ns (sci/create-ns 'flatland.ordered.set nil)) -(def ordered-ns +(def ordered-map-ns {'ordered-map (sci/copy-var omap/ordered-map omap-ns)}) (def ordered-set-ns diff --git a/test-resources/pod.clj b/test-resources/pod.clj index b2fbc58f..698471e0 100644 --- a/test-resources/pod.clj +++ b/test-resources/pod.clj @@ -50,8 +50,7 @@ (do (write {"format" (if (= format :json) "json" "edn") - "readers" {"ordered/map" "flatland.ordered.map/ordered-map" - "ordered/set" "flatland.ordered.set/ordered-set"} + "readers" {"ordered/map" "flatland.ordered.map/ordered-map"} "namespaces" [{"name" "pod.test-pod" "vars" [{"name" "add-sync"} @@ -65,8 +64,7 @@ {"name" "error"} {"name" "print"} {"name" "print-err"} - {"name" "ordered-map"} - {"name" "ordered-set"}]}] + {"name" "ordered-map"}]}] "ops" {"shutdown" {}}}) (recur)) :invoke (let [var (-> (get message "var") @@ -121,11 +119,6 @@ pod.test-pod/ordered-map (write {"value" "#ordered/map([:a 1] [:b 2])" - "status" ["done"] - "id" id}) - pod.test-pod/ordered-set - (write - {"value" "#ordered/set([:a 1 :b 2])" "status" ["done"] "id" id})) (recur)) @@ -166,7 +159,4 @@ (debug "Running reader test") (require '[flatland.ordered.map :refer [ordered-map]]) (prn (= ((resolve 'flatland.ordered.map/ordered-map) :a 1 :b 2) - ((resolve 'pod.test-pod/ordered-map)))) - (require '[flatland.ordered.set :refer [ordered-set]]) - (prn (= ((resolve 'flatland.ordered.set/ordered-set) :a 1 :b 2) - ((resolve 'pod.test-pod/ordered-set))))))))) + ((resolve 'pod.test-pod/ordered-map)))))))))