diff --git a/test/babashka/main_test.clj b/test/babashka/main_test.clj index c590d89a..d48dea65 100644 --- a/test/babashka/main_test.clj +++ b/test/babashka/main_test.clj @@ -568,6 +568,10 @@ (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))")) (is (= :foouser/x (bb nil "(defmethod print-method sci.lang.IVar [o w] (.write w (str :foo (symbol o)))) (def x 1)"))))) +(deftest stdout-interop-test + (when test-utils/native? + (is (= 'Something (bb nil "(.print (System/out) \"Something\")"))))) + ;;;; Scratch (comment