Okay, I figured it out. Here's my method:

generateUUID
    | aStream hex s x |
    hex := '0123456789ABCDEF'.
    x := ByteArray new: 16.
    UUIDGenerator default generateBytes: x forVersion: 4.
    s := String new: 32.
    aStream := WriteStream on: s.
    x do: [ :each | aStream nextPut: (hex at: each // 16 + 1).
        aStream nextPut: (hex at: each \\ 16 + 1) ].
    ^ s

Works like a charm. It would've been nice if a similar example was available
/somewhere/ on the web.



--
View this message in context: 
http://forum.world.st/UUIDGenerator-tp4951725p4951731.html
Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.

Reply via email to