I see that a big earthquake hit Chile :
http://www.alertnet.org/thenews/newsdesk/LDE61Q02O.htm
I hope everything is ok with you.

On Fri, Feb 26, 2010 at 6:58 PM, Alexandre Bergel <[email protected]> wrote:
> issue #2085
>
> Replace the method PackageOrganizer>>packageOfClass: aClass ifNone:
> errorBlock by
> -=-=-=-=-=
> packageOfClass: aClass ifNone: errorBlock
>        | classCategory |
>        classCategory := aClass category.
>        packages at: classCategory ifPresent: [:v | ^ v].
>
>        (classCategory includes: $-)
>                ifTrue: [ packages at: (classCategory copyUpTo: $-) ifPresent: 
> [:v |
> ^ v] ].
>
>        ^ self packages detect: [:ea | ea includesClass: aClass] ifNone:
> errorBlock
> -=-=-=-=-=
>
> Before this enhancement:
> [100 timesRepeat: [Object package]] timeToRun
> => 141
>
> After the fix:
> => 2
>
> Easy thing to do.
>
> Cheers,
> Alexandre
> --
> _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
> Alexandre Bergel  http://www.bergel.eu
> ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
>
>
>
>
>
>
>
> --
> _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
> Alexandre Bergel  http://www.bergel.eu
> ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
>
>
>
>
>
>
> _______________________________________________
> Pharo-project mailing list
> [email protected]
> http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
>



-- 
Serge Stinckwich
UMI UMMISCO 209 (IRD/UPMC), Hanoi, Vietnam
Smalltalkers do: [:it | All with: Class, (And love: it)]
http://doesnotunderstand.org/

_______________________________________________
Pharo-project mailing list
[email protected]
http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project

Reply via email to