equal
deleted
inserted
replaced
425 bytes := self asBytes. |
425 bytes := self asBytes. |
426 self class isBigEndian ifFalse:[ |
426 self class isBigEndian ifFalse:[ |
427 self class adjustByteOrder:bytes. |
427 self class adjustByteOrder:bytes. |
428 ]. |
428 ]. |
429 ^ bytes. |
429 ^ bytes. |
|
430 ! |
|
431 |
|
432 asUUID |
|
433 ^ self |
430 ! |
434 ! |
431 |
435 |
432 literalArrayEncoding |
436 literalArrayEncoding |
433 ^ Array |
437 ^ Array |
434 with:(self class name) |
438 with:(self class name) |
650 ! ! |
654 ! ! |
651 |
655 |
652 !UUID class methodsFor:'documentation'! |
656 !UUID class methodsFor:'documentation'! |
653 |
657 |
654 version |
658 version |
655 ^ '$Header: /cvs/stx/stx/libbasic2/UUID.st,v 1.29 2009-04-24 06:19:16 ca Exp $' |
659 ^ '$Header: /cvs/stx/stx/libbasic2/UUID.st,v 1.30 2009-06-15 12:43:41 stefan Exp $' |
656 ! ! |
660 ! ! |
657 |
661 |
658 UUID initialize! |
662 UUID initialize! |