]> gitweb.factorcode.org Git - factor.git/commitdiff
Merge branch 'master' of git://factorcode.org/git/factor
authorJohn Benediktsson <mrjbq7@gmail.com>
Wed, 7 Jan 2009 00:13:41 +0000 (16:13 -0800)
committerJohn Benediktsson <mrjbq7@gmail.com>
Wed, 7 Jan 2009 00:13:41 +0000 (16:13 -0800)
basis/uuid/uuid.factor

index 337ea22df5b9694318db51366a480cd319a8d18a..209485b3bc0cec8bec53daa4cf219e8703ca8d86 100644 (file)
@@ -52,13 +52,10 @@ IN: uuid
 : string>uuid ( string -- n )
     [ CHAR: - = not ] filter 16 base> ;
 
-: uuid>byte-array ( n -- byte-array ) 
-    16 >be ;
-
 PRIVATE>
 
 : uuid-parse ( string -- byte-array ) 
-    string>uuid uuid>byte-array ;
+    string>uuid 16 >be ;
 
 : uuid-unparse ( byte-array -- string ) 
     be> uuid>string ;