--- a/UUID.st Fri Apr 24 14:17:37 2015 +0200
+++ b/UUID.st Fri Apr 24 14:18:00 2015 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 2002 by eXept Software AG
All Rights Reserved
@@ -11,6 +13,8 @@
"
"{ Package: 'stx:libbasic2' }"
+"{ NameSpace: Smalltalk }"
+
ByteArray variableByteSubclass:#UUID
instanceVariableNames:''
classVariableNames:'CachedMACAddress Lock SequenceNumber LastTime Increment
@@ -198,7 +202,7 @@
|uuid|
uuid := self fromBytes:aByteArray.
- self isBigEndian ifFalse:[
+ IsBigEndian ifFalse:[
self adjustByteOrder:uuid.
].
^ uuid.
@@ -535,7 +539,7 @@
|bytes|
bytes := self asBytes.
- self class isBigEndian ifFalse:[
+ IsBigEndian ifFalse:[
self class adjustByteOrder:bytes.
].
^ bytes.
@@ -901,11 +905,11 @@
!UUID class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic2/UUID.st,v 1.47 2013-10-09 08:01:45 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/UUID.st,v 1.48 2015-04-24 12:18:00 stefan Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic2/UUID.st,v 1.47 2013-10-09 08:01:45 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/UUID.st,v 1.48 2015-04-24 12:18:00 stefan Exp $'
! !