use babel instead of sb-ext for string to octet translation

deserialize.lisp

@@ -50,14 +50,14 @@
 	 (array (make-array length :element-type '(unsigned-byte 8))))
     (dotimes (i length)
       (setf (aref array i) (read-byte stream)))
-    (sb-ext:octets-to-string array)))
+    (babel:octets-to-string array)))
 
 (defmethod deserialize ((code (eql +compressed-string+)) stream)
   (let* ((length (deserialize (read-byte stream) stream))
 	 (array (make-array length :element-type '(unsigned-byte 8))))
     (dotimes (i length)
       (setf (aref array i) (read-byte stream)))
-    (sb-ext:octets-to-string (chipz:decompress nil 'chipz:zlib array))))
+    (babel:octets-to-string (chipz:decompress nil 'chipz:zlib array))))
 
 (defmethod deserialize ((code (eql +t+)) stream)
   t)

serialize.lisp

@@ -50,13 +50,13 @@
   ;; FIXME: what is the right length to enable compression?
   (if (and *compression-enabled?* (> (length string) 20))
       (let* ((comp (salza2:compress-data 
-		    (sb-ext:string-to-octets string) 'salza2:zlib-compressor))
+		    (babel:string-to-octets string) 'salza2:zlib-compressor))
 	     (length (length comp)))
 	(write-byte +compressed-string+ stream)
 	(serialize length stream)
 	(dotimes (i length)
 	  (write-byte (aref comp i) stream)))
-      (let* ((unicode (sb-ext:string-to-octets string))
+      (let* ((unicode (babel:string-to-octets string))
 	     (length (length unicode)))
 	(write-byte +string+ stream)
 	(serialize length stream)

vivace-graph-v2.asd

@@ -12,6 +12,7 @@
   :long-description "Vivace Graph Version 2."
   :depends-on (:sb-concurrency
 	       :sb-posix
+               :babel
 	       :cffi
 	       :bordeaux-threads
 	       ;;:cl-btree-0.5