X-Git-Url: https://jxself.org/git/?a=blobdiff_plain;f=8sync%2Fdebug.scm;h=27438e5f51a08cc26a520d614c0a538d1351ace4;hb=063be529581b7004dae5ecb106bcf33729b9fef7;hp=a05f131b06e3d37b1c623981bf9415b20e264c8a;hpb=61fed4138184d12cfcdca93035492119999dfa48;p=8sync.git

diff --git a/8sync/debug.scm b/8sync/debug.scm
index a05f131..27438e5 100644
--- a/8sync/debug.scm
+++ b/8sync/debug.scm
@@ -22,8 +22,8 @@
   #:export (hive-resolve-local-actor
             actor-hive
 
-            hive-create-actor-gimmie
-            hive-create-actor-gimmie*))
+            bootstrap-actor-gimmie
+            bootstrap-actor-gimmie*))
 
 
 ;;; Expose not normally exposed methods
@@ -42,16 +42,16 @@
 ;;; Some utilities
 ;;; =============
 
-(define (hive-create-actor-gimmie hive actor-class . init)
+(define (bootstrap-actor-gimmie hive actor-class . init)
   "Create an actor on the hive, and give us that actor.
-Uses hive-create-actor* arguments."
-  (let ((actor-id (apply hive-create-actor hive actor-class init)))
+Uses bootstrap-actor* arguments."
+  (let ((actor-id (apply bootstrap-actor hive actor-class init)))
     (hive-resolve-local-actor hive actor-id)))
 
-(define (hive-create-actor-gimmie* hive actor-class id-cookie . init)
+(define (bootstrap-actor-gimmie* hive actor-class id-cookie . init)
   "Create an actor on the hive, and give us that actor.
-Uses hive-create-actor* arguments."
-  (let ((actor-id (apply hive-create-actor*
+Uses bootstrap-actor* arguments."
+  (let ((actor-id (apply bootstrap-actor*
                          hive actor-class id-cookie init)))
     (hive-resolve-local-actor hive actor-id)))