Squeak-dev December 2011

squeak-dev@lists.squeakfoundation.org

52 participants
175 discussions

The Trunk: Kernel-dtl.658.mcz
by commits＠source.squeak.org 12 Dec '11

12 Dec '11

David T. Lewis uploaded a new version of Kernel to project The Trunk: http://source.squeak.org/trunk/Kernel-dtl.658.mcz ==================== Summary ==================== Name: Kernel-dtl.658 Author: dtl Time: 11 December 2011, 7:50:47.904 pm UUID: 8f8f6e77-b113-446b-b593-aa5aa0f8db4e Ancestors: Kernel-ul.657 The primitive fallback code in object:perform:withArguments:inClass: should test 'selector isSymbol' rather than 'selector isMemberOf: Symbol' because #someSelector isMemberOf: Symbol ==> false Observed when running testMirrorPerform on a VM with failing primitivePerformInSuperclass, resulting in a misleading error message. =============== Diff against Kernel-ul.657 =============== Item was changed: ----- Method: ContextPart>>object:perform:withArguments:inClass: (in category 'mirror primitives') ----- object: anObject perform: selector withArguments: argArray inClass: lookupClass "Send the selector, aSymbol, to anObject with arguments in argArray. Fail if the number of arguments expected by the selector does not match the size of argArray, or if lookupClass cannot be found among the anObject's superclasses. Primitive. Essential for the debugger." <primitive: 100 error: error> + (selector isSymbol) ifFalse: - (selector isMemberOf: Symbol) ifFalse: [^self error: 'selector argument must be a Symbol']. (argArray isMemberOf: Array) ifFalse: [^self error: 'argArray must be an Array']. (selector numArgs = argArray size) ifFalse: [^self error: 'incorrect number of arguments']. ((self objectClass: anObject) == lookupClass or: [(self objectClass: anObject) inheritsFrom: lookupClass]) ifFalse: [^self error: 'lookupClass is not in anObject''s inheritance chain']. self primitiveFailed!

1 0

Re: [ANN] Magma 1.3
by Stephan Eggermont 11 Dec '11

11 Dec '11

Hi Chris, Great! I'd love to have someone explain and demo Magma at the FOSDEM2011 devroom (Feb 5, Brussels). You already told me you'd not be available. Anyone else capable & willing to do a presentation? Stephan

1 0

[Q] How can I use Fuel in old version of squeak (without traits)?
by Sungjin Chun 11 Dec '11

11 Dec '11

I found that Fuel is very promising persistent mechanism for me but I found that it seems that Fuel needs trais to work(which I'm not sure but simple file-in does not work on 3.8). Anyone can help me on this problem?

2 3

U8 Release - Beta Testing
by U8 10 Dec '11

10 Dec '11

Smalltaking is excited to announce that U8, the first platform for social development for Smalltalkers, is coming soon! We have been working hard and we can't wait to share the results with all of you. Now we need your help. We are looking for volunteers for testing the service before the first public release. If you are interested in becoming a beta tester for U8, please email us to u8(a)smalltaking.net with subject [beta tester]. Smalltalking Association. ---------------------------------------------------------------------------- ---------------------------------------------------------------------------- ---------------------------- Smalltalking está orgulloso de anunciar que U8, la primer plataforma para desarrollo social en Smalltalk, esta pronto a su lanzamiento. Hemos estado trabajando duro y estamos ansiosos de compartir los resultados con todos uds. Ahora necesitamos de tu ayuda. Estamos en la búsqueda de voluntarios para el testeo del servicio antes de su lanzamiento público. Si estás interesado en ser beta tester de U8, por favor envíanos un email a u8(a)smalltaking.net con asunto [beta tester]. Asociación Smalltalking.

1 0

Daily Commit Log
by commits＠source.squeak.org 10 Dec '11

10 Dec '11

Changes to Trunk (http://source.squeak.org/trunk.html) in the last 24 hours: http://lists.squeakfoundation.org/pipermail/packages/2011-December/005115.h… Name: Morphic-cwp.590 Ancestors: Morphic-cmm.589 Fixed a layout bug affecting window panes with a top fraction of zero and a top offset that is non-zero. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2011-December/005116.h… Name: Kernel-ul.656 Ancestors: Kernel-dtl.655 Eliot's fix of ContextPart >> #runUntilErrorOrReturnFrom: from http://lists.squeakfoundation.org/pipermail/squeak-dev/2011-December/162373… . ============================================= http://lists.squeakfoundation.org/pipermail/packages/2011-December/005117.h… Name: Compression-ul.31 Ancestors: Compression-nice.30 Allow reading zero bytes in InflateStream >> #next:into:startingAt: and InflateStream >> #readInto:startingAt:count:. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2011-December/005118.h… Name: Kernel-ul.657 Ancestors: Kernel-dtl.656, Kernel-ul.656 Merged. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2011-December/005119.h… Name: Tests-ul.138 Ancestors: Tests-dtl.137 Updated PackageDependencyTest to reflect the current status. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2011-December/005120.h… Name: System-ul.463 Ancestors: System-dtl.462 - log class creation in SmalltalkImage >> #event: ============================================= http://lists.squeakfoundation.org/pipermail/packages/2011-December/005121.h… Name: Tools-ul.387 Ancestors: Tools-ul.386 - no need to log the class creation doIt in Browser >> #defineClass:notifying:, because it's already logged by SmalltalkImage >> #event: ============================================= http://lists.squeakfoundation.org/pipermail/packages/2011-December/005122.h… Name: ToolsTests-ul.52 Ancestors: ToolsTests-eem.51 Updated DependencyBrowserTest >> #testClassList, because String >> #numArgs now also depend on String. =============================================

1 0

[ANN] Magma 1.3
by Chris Muller 10 Dec '11

10 Dec '11

I am very pleased to announce the immediate availability of Magma 1.3. The following detail the major improvements to 1.3 over 1.2: Serializer Upgrade ==== BlockClosures (Contexts and CompiledMethods too, of course), can now be stored in the database, even with references to inst-vars, self, temps or globals. Split-Ordered Lists ==== Tom Rushworth developed a fantastic Split-Ordered list implementation for Squeak. Working closely with Tom, this package has been extended in Magma to support very large SOL collections, implemented as a MagmaSolHashTable. Thank you Tom! The MagmaSolHashTable is actually a fairly primitive collection, and was used as the basis for two new collections: A MagmaHashTable and a completely new implementation of MagmaDictionary which is much faster than the old one (almost as fast as a preallocated dictionary). Full Monticello Model ==== When using Magma as a Monticello repository the package versions are not zipped but stored directly in the repository as native instances of MCVersions, MCPackages, MCInfos, MCDefinitions, etc. All of these original MC object instances are canonicalized so there is only ONE copy of that MCMethodDefinition from 2002 which is shared rather than copied in every version since. MCPackages are also canonicalized, as is all ancestry! For packages stored in a Magma repository, two new menu options appear on the methods menu and classes menu: browse mc versions browse mc origin The first shows all versions of a particular method or class-definition across all MC versions saved to that repository, in chronological order (no latency). The second opens the MC-Version Inspector in which that version of the method was saved, to see the version notes. This is very useful for quickly knowing WHY changes were made. Note: Currently only Squeak has its IDE tools updated to support this. WriteBarrier Resurrection ==== After two years dormancy, Avi Bryant's original WriteBarrier has been resurrected for use in closure/Cog images. Its original dependency on NewCompiler has been removed. With both the WriteBarrier and Cog, the MagmaBenchmarker reports a new record maximum commit rate -- 456 commits per second !! The WriteBarrier is now on by default, so nothing needs to be done to enjoy the speed up. Proxy Transparency ==== A new extension to the WriteBarrier should now alleviate the need to send #yourself to primitive arguments! Primitives which require arguments are now overridden in the anonymous subclass so that the arguments will automatically be ensured to be fully-reified for the super call. Immutability ==== For performance, TimeSpans, Durations, DateAndTimes, Points, Intervals, Colors are now immutable. Strings are also immutable by default, but now a custom ImmutabilityStrategy may be specified, providing fine control over immutability in case mutable Strings are needed (or if other objects can be made immutable). Platform Independence ==== Magma 1.3 runs on Squeak 4.3 and Pharo 1.3. All of the packages have been renamed in accordance with contemporary package naming conventions employed by most other active Squeak and Pharo projects. Platform-specific behaviors are now in platform-specific packages (named with "-Squeak" or "-Pharo"). The package hierarchy is documented at http://wiki.squeak.org/squeak/6178. More ==== Many minor cleanups, fixes, and usability improvements. This is, by far, the best Magma ever. Please enjoy the new version. - Chris

3 2

Re: [Pharo-project] Prune stack serialization
by Eliot Miranda 10 Dec '11

10 Dec '11

On Fri, Dec 2, 2011 at 10:20 AM, Nicolas Cellier < nicolas.cellier.aka.nice(a)gmail.com> wrote: > 2011/12/2 Martin Dias <tinchodias(a)gmail.com>: > > Hi folks > > > > In Fuel, we serialize a block closure with its state, including its > > outerContext. This enables to serialize a sorted collection with its > > sortBlock: > > > > | bytes result | > > bytes := FLSerializer serializeToByteArray: (SortedCollection sortBlock: > [:a > > :b | a > b ]). > > result := FLMaterializer materializeFromByteArray: bytes. > > result > > addAll: #(1 2 3); > > yourself. > > ---> a SortedCollection(3 2 1) > > > > Here the problem: the byte array is huge! (800kb) because we are > serializing > > unneeded context for the sort block. > > > > We wonder how to prune it and save time and space. > > > > Thanks in advance > > Martín > > In the case of such clean block, there is no need of outer context > during block execution. > However I don't know if implementation makes it possible to ignore the > context... > That's more a question directed to Eliot ;) > Arguably there is a bug in my closure implementation, which is that both the receiver and the method are fetched from the outerContext. That's not a bug which can be fixed without a new VM/image combination and may be something I'll look at long-term, but is something we have to live with at the moment. This means that you *do* have to serialize the outerContext. But the outerContext is used only for the receiver and method. So you don't need to full serialize the outerContext. In particular you don't need to serialize any of the outerContext's stack contents or its sender. This needs special handling, I guess in BlockClosure, to substitute a suitably reduced outerContext, but it shouldn't be hard to do. e.g. BlockClosure methods for: '*Fuel-serialization' outerContextForSerialization ^MethodContext sender: nil receiver outerContext receiver method: outerContext method args: #() BlockClosure methods for: '*Fuel-serialization' outerContextForSerialization ^MethodContext sender: nil receiver self receiver method: self method args: #() > Nicolas > > -- best, Eliot

3 26

The Trunk: ToolsTests-ul.52.mcz
by commits＠source.squeak.org 09 Dec '11

09 Dec '11

Levente Uzonyi uploaded a new version of ToolsTests to project The Trunk: http://source.squeak.org/trunk/ToolsTests-ul.52.mcz ==================== Summary ==================== Name: ToolsTests-ul.52 Author: ul Time: 8 December 2011, 3:16:19.625 am UUID: 371cb701-cfa1-7f4c-b891-a4823abd8ddf Ancestors: ToolsTests-eem.51 Updated DependencyBrowserTest >> #testClassList, because String >> #numArgs now also depend on String. =============== Diff against ToolsTests-eem.51 =============== Item was changed: ----- Method: DependencyBrowserTest>>testClassList (in category 'testing - class list') ----- testClassList "Warning!! When Collections' dependencies change, this test may start to fail!!" self assert: browser classList isEmpty. browser packageListIndex: (browser packageList indexOf: #Collections). self assert: browser classList isEmpty. browser packageDepsIndex: (browser packageDeps indexOf: #Compiler). self assert: browser classList isEmpty. browser classDepsIndex: (browser classDeps indexOf: #Scanner). + self assert: browser classList = #(String Symbol 'Symbol class'). - self assert: browser classList = #(Symbol #'Symbol class'). browser classListIndex: (browser classList indexOf: #Symbol). + self assert: browser classList = #(String Symbol 'Symbol class')! - self assert: browser classList = #(Symbol #'Symbol class').!

1 0

The Trunk: Tools-ul.387.mcz
by commits＠source.squeak.org 09 Dec '11

09 Dec '11

Levente Uzonyi uploaded a new version of Tools to project The Trunk: http://source.squeak.org/trunk/Tools-ul.387.mcz ==================== Summary ==================== Name: Tools-ul.387 Author: ul Time: 9 December 2011, 11:23:52.89 am UUID: 1b789c14-63ee-5e4b-b977-1385ae741570 Ancestors: Tools-ul.386 - no need to log the class creation doIt in Browser >> #defineClass:notifying:, because it's already logged by SmalltalkImage >> #event: =============== Diff against Tools-ul.386 =============== Item was changed: ----- Method: Browser>>defineClass:notifying: (in category 'class functions') ----- defineClass: defString notifying: aController "The receiver's textual content is a request to define a new class. The source code is defString. If any errors occur in compilation, notify aController." | oldClass class newClassName defTokens keywdIx envt | oldClass := self selectedClassOrMetaClass. defTokens := defString findTokens: Character separators. ((defTokens first = 'Trait' and: [defTokens second = 'named:']) or: [defTokens second = 'classTrait']) ifTrue: [^self defineTrait: defString notifying: aController]. keywdIx := defTokens findFirst: [:x | x beginsWith: 'category']. envt := Smalltalk. keywdIx := defTokens findFirst: [:x | '*subclass*' match: x]. newClassName := (defTokens at: keywdIx+1) copyWithoutAll: '#()'. ((oldClass isNil or: [oldClass theNonMetaClass name asString ~= newClassName]) and: [envt includesKey: newClassName asSymbol]) ifTrue: ["Attempting to define new class over existing one when not looking at the original one in this browser..." (self confirm: ((newClassName , ' is an existing class in this system. Redefining it might cause serious problems. Is this really what you want to do?') asText makeBoldFrom: 1 to: newClassName size)) ifFalse: [^ false]]. "ar 8/29/1999: Use oldClass superclass for defining oldClass since oldClass superclass knows the definerClass of oldClass." oldClass ifNotNil:[oldClass := oldClass superclass]. class := oldClass subclassDefinerClass evaluate: defString notifying: aController + logged: false. - logged: true. (class isKindOf: Behavior) ifTrue: [self changed: #systemCategoryList. self changed: #classList. self clearUserEditFlag. self setClass: class selector: nil. "self clearUserEditFlag; editClass." ^ true] ifFalse: [^ false]!

1 0

The Trunk: System-ul.463.mcz
by commits＠source.squeak.org 09 Dec '11

09 Dec '11

Levente Uzonyi uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-ul.463.mcz ==================== Summary ==================== Name: System-ul.463 Author: ul Time: 9 December 2011, 11:24:39.002 am UUID: fe76ac7d-1ea5-a641-abdf-4672a7b3f28d Ancestors: System-dtl.462 - log class creation in SmalltalkImage >> #event: =============== Diff against System-dtl.462 =============== Item was changed: ----- Method: SmalltalkImage>>event: (in category 'sources, changes log') ----- event: anEvent "Hook for SystemChangeNotifier" anEvent isDoIt ifTrue: [^self logChange: anEvent item]. (anEvent itemKind = SystemChangeNotifier categoryKind) ifTrue: [ anEvent isAdded ifTrue: [^self logChange: 'SystemOrganization addCategory: ', anEvent item storeString]. anEvent isRemoved ifTrue: [^self logChange: 'SystemOrganization removeSystemCategory: ', anEvent item storeString]. anEvent isRenamed ifTrue: [^self logChange: 'SystemOrganization renameCategory: ', anEvent oldName storeString, ' toBe: ', anEvent newName storeString]. ]. (anEvent itemKind = SystemChangeNotifier classKind) ifTrue: [ anEvent item acceptsLoggingOfCompilation ifFalse: [^self]. + anEvent isAdded ifTrue: [ - "anEvent isAdded ifTrue: [ self logChange: anEvent item definition. + ]. - ]." anEvent isModified ifTrue: [^self logChange: anEvent item definition]. anEvent isRemoved ifTrue: [^self logChange: 'Smalltalk removeClassNamed: ' , anEvent item name storeString]. anEvent isRenamed ifTrue: [^self logChange: 'Smalltalk renameClassNamed: ', anEvent oldName storeString, ' as: ', anEvent newName storeString]. ]. (anEvent itemKind = SystemChangeNotifier protocolKind) ifTrue: [ anEvent isAdded ifTrue: [^self logChange: anEvent itemClass name , ' organization addCategory: ' , anEvent itemProtocol storeString]. anEvent isRemoved ifTrue: [^self logChange: anEvent itemClass name , ' organization removeCategory: ' , anEvent itemProtocol storeString]. anEvent isRenamed ifTrue: [^self logChange: anEvent itemClass name , ' organization renameCategory: ' , anEvent oldName storeString, ' toBe: ', anEvent newName storeString]. ]. (anEvent itemKind = SystemChangeNotifier methodKind) ifTrue: [ anEvent itemClass acceptsLoggingOfCompilation ifFalse: [^self]. anEvent isRemoved ifTrue: [^self logChange: anEvent itemClass name , ' removeSelector: ' , anEvent itemSelector storeString]. anEvent isRecategorized ifTrue: [ | newProtocol | newProtocol := anEvent itemClass organization categoryOfElement: anEvent item selector. ^self logChange: anEvent itemClass name , ' organization classify: ', anEvent item selector storeString, ' under: ', newProtocol storeString. ]. ].!

1 0

← Newer
1
...
11
12
13
14
15
16
17
18
Older →

Jump to page: