The Trunk: Network-cmm.101.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
2 messages Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: Network-cmm.101.mcz

commits-2
Chris Muller uploaded a new version of Network to project The Trunk:
http://source.squeak.org/trunk/Network-cmm.101.mcz

==================== Summary ====================

Name: Network-cmm.101
Author: cmm
Time: 14 December 2010, 2:00:15.884 pm
UUID: e8e30b98-a243-41bb-8a84-748016c865ab
Ancestors: Network-nice.100

Fix UUIDGenerator>>makeUnixSeed.

=============== Diff against Network-nice.100 ===============

Item was changed:
  ----- Method: UUIDGenerator>>makeUnixSeed (in category 'random seed') -----
  makeUnixSeed
  ^[FileStream readOnlyFileNamed: '/dev/urandom' do: [:strm |
  strm binary.
  strm converter: Latin1TextConverter new.
+ (Integer
- Integer
  byte1: strm next
  byte2: strm next
  byte3: strm next
+ byte4: strm next) normalize].
- byte4: strm next;
- normalize].
  ] on: FileStreamException do: [nil]!


Reply | Threaded
Open this post in threaded view
|

Re: The Trunk: Network-cmm.101.mcz

Nicolas Cellier
Oops !

2010/12/14  <[hidden email]>:

> Chris Muller uploaded a new version of Network to project The Trunk:
> http://source.squeak.org/trunk/Network-cmm.101.mcz
>
> ==================== Summary ====================
>
> Name: Network-cmm.101
> Author: cmm
> Time: 14 December 2010, 2:00:15.884 pm
> UUID: e8e30b98-a243-41bb-8a84-748016c865ab
> Ancestors: Network-nice.100
>
> Fix UUIDGenerator>>makeUnixSeed.
>
> =============== Diff against Network-nice.100 ===============
>
> Item was changed:
>  ----- Method: UUIDGenerator>>makeUnixSeed (in category 'random seed') -----
>  makeUnixSeed
>        ^[FileStream readOnlyFileNamed: '/dev/urandom' do: [:strm |
>                strm binary.
>                strm converter: Latin1TextConverter new.
> +               (Integer
> -               Integer
>                        byte1: strm next
>                        byte2: strm next
>                        byte3: strm next
> +                       byte4: strm next) normalize].
> -                       byte4: strm next;
> -                       normalize].
>        ] on: FileStreamException do: [nil]!
>
>
>