[squeak-dev] The Trunk: Collections-eem.881.mcz

Nicolas Cellier nicolas.cellier.aka.nice at gmail.com
Thu Mar 12 11:23:14 UTC 2020


So we have a strange ancestry now:
...-->eem.880-->eem.881-->eem.882-->eem.881
The former 881 has
UUID: 012691b6-410a-4e9a-9c64-97b5abfdba49
The later has
UUID: e9cf9901-53d5-4b5c-ab37-88beb605d007

Le jeu. 12 mars 2020 à 03:01, <commits at source.squeak.org> a écrit :

> Eliot Miranda uploaded a new version of Collections to project The Trunk:
> http://source.squeak.org/trunk/Collections-eem.881.mcz
>
> ==================== Summary ====================
>
> Name: Collections-eem.881
> Author: eem
> Time: 11 March 2020, 7:01:23.310819 pm
> UUID: e9cf9901-53d5-4b5c-ab37-88beb605d007
> Ancestors: Collections-eem.882
>
> Include the Array become primitives in the ModificationForbidden framework.
>
> =============== Diff against Collections-eem.882 ===============
>
> Item was changed:
>   ----- Method: Symbol class>>intern: (in category 'instance creation')
> -----
>   intern: aStringOrSymbol
>
>         | originalNewSymbols |
>         originalNewSymbols := NewSymbols.
>         ^(self lookup: aStringOrSymbol) ifNil:[
> +               | aClass aSymbol newNewSymbols |
> -               | aSymbol newNewSymbols |
>                 aStringOrSymbol isSymbol ifTrue:[
>                         aSymbol := aStringOrSymbol.
>                 ] ifFalse:[
> +                       aClass := aStringOrSymbol isOctetString
> ifTrue:[ByteSymbol] ifFalse:[WideSymbol].
> +                       aSymbol := aClass new: aStringOrSymbol size.
> -                       aSymbol := (aStringOrSymbol isOctetString
> ifTrue:[ByteSymbol] ifFalse:[WideSymbol])
> -                                                       new:
> aStringOrSymbol size.
>                         aSymbol string: aStringOrSymbol.
> -                       aSymbol beReadOnlyObject.
>                 ].
>                 newNewSymbols := originalNewSymbols copyWith: aSymbol.
>                 originalNewSymbols == NewSymbols
>                         ifTrue: [
>                                 NewSymbols := newNewSymbols.
>                                 newNewSymbols size > 1000 ifTrue: [ self
> condenseNewSymbols ].
>                                 aSymbol ]
>                         ifFalse: [
>                                 "Some other process has modified the
> symbols. Try again."
>                                 self intern: aStringOrSymbol ] ]!
>
> Item was changed:
> + (PackageInfo named: 'Collections') postscript: 'Character
> initializeClassificationTable.
> + HashedCollection rehashAll.'!
> - (PackageInfo named: 'Collections') postscript: '"below, add code to be
> run after the loading of this package"
> -
> - "Make all Symbols read-only at the VM level"
> - Symbol allSubInstancesDo: [:s| s beReadOnlyObject]'!
>
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20200312/20370d29/attachment.html>


More information about the Squeak-dev mailing list