diff --git a/Tests/arcadia/arcadia_tests.clj b/Tests/arcadia/arcadia_tests.clj
index 9ca3b6ed..1a5fee2e 100644
--- a/Tests/arcadia/arcadia_tests.clj
+++ b/Tests/arcadia/arcadia_tests.clj
@@ -432,12 +432,12 @@
            "partial state retrieval after state-"))))
   (as-sub-closing [t "update-state"]
     (let [s {:counter 0}]
-      (with-temp-objects [obj (ac/instantiate obj)]
+      (with-temp-objects :lit [obj]
         (ac/state+ obj :test s)
         (ac/update-state obj :test update :counter inc)
         (at/is (= (ac/state obj :test) {:counter 1})
           "`update-state` works with 5 arguments"))
-      (with-temp-objects [obj (ac/instantiate obj)]
+      (with-temp-objects :lit [obj]
         (ac/state+ obj :test {})
         (ac/update-state obj :test assoc :a :A,:b :B,:c :C,:d :D,:e :E)
         (at/is (= (ac/state obj :test) {:a :A,:b :B,:c :C,:d :D,:e :E})