Packages July 2012

packages@lists.squeakfoundation.org

1 participants
135 discussions

The Trunk: PackageInfo-Base-bf.64.mcz
by commits＠source.squeak.org 28 Jul '12

28 Jul '12

Bert Freudenberg uploaded a new version of PackageInfo-Base to project The Trunk: http://source.squeak.org/trunk/PackageInfo-Base-bf.64.mcz ==================== Summary ==================== Name: PackageInfo-Base-bf.64 Author: bf Time: 28 July 2012, 2:13:11.917 pm UUID: 507e2d95-0634-454b-9ab1-3401c8575d06 Ancestors: PackageInfo-Base-bf.63 Improve PackageInfo class comment. =============== Diff against PackageInfo-Base-bf.63 =============== Item was changed: Object subclass: #PackageInfo instanceVariableNames: 'packageName methodCategoryPrefix preamble postscript preambleOfRemoval postscriptOfRemoval' classVariableNames: '' poolDictionaries: '' category: 'PackageInfo-Base'! PackageInfo class instanceVariableNames: 'default'! + !PackageInfo commentStamp: 'bf 7/28/2012 14:11' prior: 0! + PackageInfo is used by the system to figure out which classes and methods belong to which package. By default, class categories and method categories are matched against my packageName, but subclasses could override this behavior. + + For an interesting use of PackageInfo subclasses have a look at OMeta2. It presents the same code base as two different packages, one using decompiled code for bootstrapping, the other using the actual OMeta syntax.! - !PackageInfo commentStamp: '<historical>' prior: 0! - Subclass this class to create new Packages.! PackageInfo class instanceVariableNames: 'default'!

1 0

The Trunk: PackageInfo-Base-bf.64.mcz
by commits＠source.squeak.org 28 Jul '12

28 Jul '12

1 0

The Trunk: PackageInfo-Base-bf.64.mcz
by commits＠source.squeak.org 28 Jul '12

28 Jul '12

1 0

The Trunk: System-cmm.492.mcz
by commits＠source.squeak.org 28 Jul '12

28 Jul '12

Chris Muller uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-cmm.492.mcz ==================== Summary ==================== Name: System-cmm.492 Author: cmm Time: 28 July 2012, 11:26:22.065 am UUID: dac56f2b-83e8-4ac2-a129-95446e02ee50 Ancestors: System-eem.491 - Remove instance of NaturalLanguageTranslator in InternalTranslator, since it breaks its own startup method. - Stop using a deprecated method. =============== Diff against System-eem.491 =============== Item was changed: ----- Method: MessageTally>>reportGCStatsOn: (in category 'reporting') ----- reportGCStatsOn: str | oldSpaceEnd youngSpaceEnd memoryEnd fullGCs fullGCTime incrGCs incrGCTime tenureCount upTime rootOverflows | upTime := time. oldSpaceEnd := gcStats at: 1. youngSpaceEnd := gcStats at: 2. memoryEnd := gcStats at: 3. fullGCs := gcStats at: 7. fullGCTime := gcStats at: 8. incrGCs := gcStats at: 9. incrGCTime := gcStats at: 10. tenureCount := gcStats at: 11. rootOverflows := gcStats at: 22. str cr. str nextPutAll: '**Memory**'; cr. str nextPutAll: ' old '; + nextPutAll: (oldSpaceEnd asStringWithCommasSigned: true); nextPutAll: ' bytes'; cr. - nextPutAll: oldSpaceEnd asStringWithCommasSigned; nextPutAll: ' bytes'; cr. str nextPutAll: ' young '; + nextPutAll: ((youngSpaceEnd - oldSpaceEnd) asStringWithCommasSigned: true); nextPutAll: ' bytes'; cr. - nextPutAll: (youngSpaceEnd - oldSpaceEnd) asStringWithCommasSigned; nextPutAll: ' bytes'; cr. str nextPutAll: ' used '; + nextPutAll: (youngSpaceEnd asStringWithCommasSigned: true); nextPutAll: ' bytes'; cr. - nextPutAll: youngSpaceEnd asStringWithCommasSigned; nextPutAll: ' bytes'; cr. str nextPutAll: ' free '; + nextPutAll: ((memoryEnd - youngSpaceEnd) asStringWithCommasSigned: true); nextPutAll: ' bytes'; cr. - nextPutAll: (memoryEnd - youngSpaceEnd) asStringWithCommasSigned; nextPutAll: ' bytes'; cr. str cr. str nextPutAll: '**GCs**'; cr. str nextPutAll: ' full '; print: fullGCs; nextPutAll: ' totalling '; nextPutAll: fullGCTime asStringWithCommas; nextPutAll: ' ms ('; print: (fullGCTime / upTime * 100) maxDecimalPlaces: 2; nextPutAll: '% uptime)'. fullGCs = 0 ifFalse: [str nextPutAll: ', avg '; print: (fullGCTime / fullGCs) maxDecimalPlaces: 1; nextPutAll: ' ms']. str cr. str nextPutAll: ' incr '; print: incrGCs; nextPutAll: ' totalling '; nextPutAll: incrGCTime asStringWithCommas; nextPutAll: ' ms ('; print: (incrGCTime / upTime * 100) maxDecimalPlaces: 1; nextPutAll: '% uptime)'. incrGCs = 0 ifFalse: [str nextPutAll: ', avg '; print: (incrGCTime / incrGCs) maxDecimalPlaces: 1; nextPutAll: ' ms']. str cr. str nextPutAll: ' tenures '; nextPutAll: tenureCount asStringWithCommas. tenureCount = 0 ifFalse: [str nextPutAll: ' (avg '; print: incrGCs // tenureCount; nextPutAll: ' GCs/tenure)']. str cr. str nextPutAll: ' root table '; nextPutAll: rootOverflows asStringWithCommas; nextPutAll: ' overflows'. str cr. ! Item was changed: + (PackageInfo named: 'System') postscript: '"Remove instance of NaturalLanguageTranslator in InternalTranslator, since it breaks its own startup method." + InternalTranslator resetCaches. + "Remove obsolete preferences." - (PackageInfo named: 'System') postscript: '"Remove obsolete preferences." #(allowUnderscoreAssignment allowBlockArgumentAssignment soundsEnabled soundQuickStart soundStopWhenDone canRecordWhilePlaying) do: [ :each | Preferences removePreference: each ].'!

1 0

The Trunk: System-cmm.492.mcz
by commits＠source.squeak.org 28 Jul '12

28 Jul '12

1 0

The Trunk: System-cmm.492.mcz
by commits＠source.squeak.org 28 Jul '12

28 Jul '12

1 0

The Trunk: Environments-cmm.4.mcz
by commits＠source.squeak.org 28 Jul '12

28 Jul '12

Chris Muller uploaded a new version of Environments to project The Trunk: http://source.squeak.org/trunk/Environments-cmm.4.mcz ==================== Summary ==================== Name: Environments-cmm.4 Author: cmm Time: 28 July 2012, 11:05:17.638 am UUID: 80382ca3-1ba3-4bfc-8b9a-4a88fdf47402 Ancestors: Environments-fbs.3 - Environments broke loading Connectors. Fix it. =============== Diff against Environments-fbs.3 =============== Item was added: + ----- Method: Environment>>at:ifAbsentPut: (in category 'accessing') ----- + at: aSymbol ifAbsentPut: aBlock + ^ contents + at: aSymbol + ifAbsentPut: aBlock!

1 0

The Trunk: Environments-cmm.4.mcz
by commits＠source.squeak.org 28 Jul '12

28 Jul '12

1 0

The Trunk: Environments-cmm.4.mcz
by commits＠source.squeak.org 28 Jul '12

28 Jul '12

1 0

The Trunk: Tests-nice.154.mcz
by commits＠source.squeak.org 27 Jul '12

27 Jul '12

Nicolas Cellier uploaded a new version of Tests to project The Trunk: http://source.squeak.org/trunk/Tests-nice.154.mcz ==================== Summary ==================== Name: Tests-nice.154 Author: nice Time: 27 July 2012, 8:14:03.431 pm UUID: fa846130-25ce-4a75-bcee-212b658a274a Ancestors: Tests-cwp.153 Use a workaround for testBecomeIdentityHash knowing that two objects created consecutively may share same identityHash. =============== Diff against Tests-cwp.153 =============== Item was changed: ----- Method: BecomeTest>>testBecomeIdentityHash (in category 'Testing') ----- testBecomeIdentityHash | a b c d numberOfRetry newAIdentityHash newBIdentityHash oldAIdentityHash oldBIdentityHash | numberOfRetry := 0. [a := 'ab' copy. + c := IdentitySet new: 1000. b := 'cd' copy. + d := IdentitySet new: 1000. "Note: the sets are allocated with enough room to reduce probability that two different hash lead to same slot" + "Note2: a & b creation are interleaved with c & d, because some VM allocate the same identityHash for two consecutively created objects" + c add: a; add: b. + d add: a. - (c := IdentitySet new: 1000) add: a; add: b. - (d := IdentitySet new: 1000) add: a. oldAIdentityHash := a identityHash. oldBIdentityHash := b identityHash. oldAIdentityHash = oldBIdentityHash and: [numberOfRetry < 10]] whileTrue: [numberOfRetry := numberOfRetry + 1]. self assert: oldAIdentityHash ~= oldBIdentityHash description: 'The VM is spawning too many equal identityHash to be honest'. a become: b. newAIdentityHash := a identityHash. newBIdentityHash := b identityHash. self "The set c & d can still retrieve their elements because elements did not change their expected position" assert: (c includes: a); assert: (c includes: b); assert: (d includes: a); deny: (d includes: b); "Elements didn't change their expected position because identityHash did not change" assert: oldAIdentityHash = newAIdentityHash; assert: oldBIdentityHash = newBIdentityHash!

1 0

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

Packages July 2012