--- a/UUID.st	Tue Dec 16 15:16:22 2003 +0100
+++ b/UUID.st	Sat Dec 20 16:19:26 2003 +0100
@@ -77,6 +77,10 @@
 
 !UUID class methodsFor:'instance creation'!
 
+fromBytes:aByteArray
+    ^ self fromBytes:aByteArray msb:(UninterpretedBytes isBigEndian)
+!
+
 fromBytes:aByteArray msb:msb
     |uuid d1 d2 d3|
 
@@ -241,6 +245,10 @@
 
 !UUID methodsFor:'converting'!
 
+asBytes
+    ^ self asBytesMSB:(UninterpretedBytes isBigEndian)
+!
+
 asBytesMSB:msb
     |bytes d1 d2 d3|
 
@@ -352,7 +360,7 @@
 !UUID class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/UUID.st,v 1.6 2003-09-26 15:36:58 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/UUID.st,v 1.7 2003-12-20 15:19:26 cg Exp $'
 ! !
 
 UUID initialize!