From f9f2147156f9bc5555a2187362b351ffa094af5a Mon Sep 17 00:00:00 2001 From: Michiel Borkent Date: Thu, 3 Dec 2020 11:49:19 +0100 Subject: [PATCH] Use public interface for print-method of vars --- sci | 2 +- test/babashka/main_test.clj | 4 ++++ 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/sci b/sci index 89d31ed4..dd286608 160000 --- a/sci +++ b/sci @@ -1 +1 @@ -Subproject commit 89d31ed4d17cc6d7066ca7696478e0768c505e89 +Subproject commit dd286608fc7a492c59385bcc0238dda1476ff5db diff --git a/test/babashka/main_test.clj b/test/babashka/main_test.clj index a8fed5fb..c68e755b 100644 --- a/test/babashka/main_test.clj +++ b/test/babashka/main_test.clj @@ -572,6 +572,10 @@ (= [1 2 3] (iterator-seq (iter [1 2 3])))")))) +(deftest var-print-method-test + (when test-utils/native? + (is (bb nil "(defmethod print-method sci.lang.IVar [o w] (.write w (str :foo (symbol o)))) (def x 1) (= \":foouser/x\" (pr-str #'x))")))) + ;;;; Scratch (comment