Cleanup uuid a bit more, thanks Slava!

2008-12-22 06:42:08 -08:00 · 2008-12-22 06:42:08 -08:00 · 001dc3b251
parent 87c19e1219
commit 001dc3b251
1 changed files with 1 additions and 4 deletions
--- a/basis/uuid/uuid.factor
+++ b/basis/uuid/uuid.factor
@ -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 ;