core: cramp -> bound (was short)

[factor.git] / basis / uuid / uuid.factor

diff --git a/basis/uuid/uuid.factor b/basis/uuid/uuid.factor
index d20e61f265775310990be5a40dff0ded43f80628..13b055a6c6036ca55cfb46e194127b5c74a6e5c2 100644 (file)
--- a/basis/uuid/uuid.factor
+++ b/basis/uuid/uuid.factor
@@ -64,7 +64,7 @@ PRIVATE>
 
 : uuid3 ( namespace name -- string )
     [ uuid-parse ] dip append
-    md5 checksum-bytes 16 cramp head be>
+    md5 checksum-bytes 16 bound head be>
     3 (version) uuid>string ;
 
 : uuid4 ( -- string )
@@ -73,7 +73,7 @@ PRIVATE>
 
 : uuid5 ( namespace name -- string )
     [ uuid-parse ] dip append
-    sha1 checksum-bytes 16 cramp head be>
+    sha1 checksum-bytes 16 bound head be>
     5 (version) uuid>string ;
 
 : uuid6 ( -- string )