UUID.st
changeset 4623 29cb9dac3a89
parent 4505 c1ade3c06219
child 4634 134765d28a26
equal deleted inserted replaced
4622:9f3869b87a95 4623:29cb9dac3a89
   879 
   879 
   880 
   880 
   881     "Modified: / 10-10-2007 / 23:19:03 / cg"
   881     "Modified: / 10-10-2007 / 23:19:03 / cg"
   882 !
   882 !
   883 
   883 
       
   884 printString 
       
   885     "return a printed representation of the receiver for printing.
       
   886      Uses the basic print mechanism of the underlying technology."
       
   887 
       
   888     |s|
       
   889 
       
   890     "Speed: we know, that the printed representation of a UUID has exactly 36 chars"
       
   891     s := WriteStream on:(String new:36).
       
   892     self printOn:s.
       
   893     ^ s contents.
       
   894 
       
   895     "
       
   896         UUID genUUID printString
       
   897     "
       
   898 
       
   899     "Created: / 20-03-2018 / 16:08:10 / stefan"
       
   900 !
       
   901 
   884 storeOn:aStream
   902 storeOn:aStream
   885     aStream 
   903     aStream 
   886         nextPut:$(; 
   904         nextPut:$(; 
   887         nextPutAll:self class name; 
   905         nextPutAll:self class name; 
   888         nextPutAll:' fromString:'''.
   906         nextPutAll:' fromString:'''.