rmeta-slot: Rename wrap-rmeta-slot to build-rmeta-slot.
[8sync.git] / tests / test-rmeta-slot.scm
index 46d30dbafe70dd2ab0d1bc83c4b7e0e77ffd9762..37dac50ec3dfacd2cad3f12fb8bb8dec1576e47e 100644 (file)
@@ -28,7 +28,7 @@
 (define-class <kah-lassy> ()
   (entries #:allocation #:each-subclass
            #:init-thunk
-           (wrap-rmeta-slot
+           (build-rmeta-slot
             `((foo . "bar")
               (baz . "basil")))))
 
@@ -42,7 +42,7 @@
 (define-class <sub-lassy> (<kah-lassy>)
   (entries #:allocation #:each-subclass
            #:init-thunk
-           (wrap-rmeta-slot
+           (build-rmeta-slot
             `((foo . "foo2")
               (peanut . "gallery")))))