From f0f40b7f745925089967d209dc47c7fb8cd0c3ef Mon Sep 17 00:00:00 2001 From: Herwig Hochleitner Date: Fri, 19 Oct 2012 08:00:22 +0200 Subject: [PATCH] Test for extend-instance --- test/cljs/cljs/core_test.cljs | 6 ++++++ 1 files changed, 6 insertions(+), 0 deletions(-) diff --git a/test/cljs/cljs/core_test.cljs b/test/cljs/cljs/core_test.cljs index 5ef8a79..7f65074 100644 --- a/test/cljs/cljs/core_test.cljs +++ b/test/cljs/cljs/core_test.cljs @@ -1684,5 +1684,11 @@ uuid (UUID. uuid-str)] (assert (= (pr-str uuid) (str "#uuid \"" uuid-str "\"")))) + ;;; extend-instance + + (let [working (js-obj)] + (extend-instance working IDeref (-deref [_] true)) + (assert @working)) + :ok ) -- 1.7.8.6