Also switch separator in cookie from "-" to ":".
* 8sync/actors.scm (hive-gen-actor-id): Switch separator from "-" to ":".
(hive-create-actor): Automatically add a cookie based on the class name.
(hive-create-actor*): Tweak docstring.
(define-method (hive-gen-actor-id (hive <hive>) cookie)
(make-address (if cookie
(define-method (hive-gen-actor-id (hive <hive>) cookie)
(make-address (if cookie
- (string-append cookie "-" (big-random-number-string))
+ (string-append cookie ":" (big-random-number-string))
(big-random-number-string))
(hive-id hive)))
(big-random-number-string))
(hive-id hive)))
actor-id))
(define* (hive-create-actor hive actor-class #:rest init)
actor-id))
(define* (hive-create-actor hive actor-class #:rest init)
+ "Create an actor on HIVE using ACTOR-CLASS passing in INIT args"
(%hive-create-actor hive actor-class
(%hive-create-actor hive actor-class
+ init (symbol->string (class-name actor-class))))
(define* (hive-create-actor* hive actor-class id-cookie #:rest init)
(define* (hive-create-actor* hive actor-class id-cookie #:rest init)
- "Create an actor, but also add a 'cookie' to the name for debugging"
+ "Create an actor, but also allow customizing a 'cookie' added to the id
+for debugging"
(%hive-create-actor hive actor-class
init id-cookie))
(%hive-create-actor hive actor-class
init id-cookie))