actors: Update actor ids to use a vector rather than a cons cell.

This is a bit easier to read when read/written, and should be
comparatively efficient.

* 8sync/actors.scm (make-address, address-actor-id, address-hive-id):
Update to use a vector rather than a cons cell.

diff --git a/8sync/actors.scm b/8sync/actors.scm
index 9b079b8a1754c788ac860a8cbccf78904f1a5b42..2c7381d556457b839e9b23123777f80eeb700313 100644 (file)
--- a/8sync/actors.scm
+++ b/8sync/actors.scm
@@ -322,13 +322,13 @@ raise an exception if an error."
 ;;
 
 (define (make-address actor-id hive-id)
 ;;
 
 (define (make-address actor-id hive-id)

-  (cons actor-id hive-id))
+  (vector actor-id hive-id))

 
 (define (address-actor-id address)
 
 (define (address-actor-id address)

-  (car address))
+  (vector-ref address 0))

 
 (define (address-hive-id address)
 
 (define (address-hive-id address)

-  (cdr address))
+  (vector-ref address 1))

 
 (define (address->string address)
   (string-append (address-actor-id address) "@"
 
 (define (address->string address)
   (string-append (address-actor-id address) "@"