From 728e93597381366b520006dd75a28b08261c5237 Mon Sep 17 00:00:00 2001 From: Michiel Borkent Date: Mon, 21 Dec 2020 15:00:08 +0100 Subject: [PATCH] fix test --- test/babashka/main_test.clj | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/test/babashka/main_test.clj b/test/babashka/main_test.clj index c68e755b..7ec984c9 100644 --- a/test/babashka/main_test.clj +++ b/test/babashka/main_test.clj @@ -429,10 +429,10 @@ (deftest unrestricted-access (testing "babashka is allowed to mess with built-in vars" - (is (= 1 (bb nil " -(def inc2 inc) (alter-var-root #'clojure.core/inc (constantly dec)) -(let [res (inc 2)] - (alter-var-root #'clojure.core/inc (constantly inc2)) + (is (= {} (bb nil " +(def assoc2 assoc) (alter-var-root #'clojure.core/assoc (constantly dissoc)) +(let [res (assoc {:a 1} :a 2)] + (alter-var-root #'clojure.core/assoc (constantly assoc2)) res)"))))) (deftest pprint-test