On 30 nov. 2009, at 18:15, Nicolas Cellier wrote: > 2009/11/30 Simon Denier <[email protected]>: >> >> On 30 nov. 2009, at 16:49, Nicolas Cellier wrote: >> >>> Just the full source code would do: >>> >>> lastStoredRun >>> ^ ((Dictionary new) add: (#passed->((Set new) add: >>> #testA...etc... >> >> >> Can you be a bit more precise? I feel concerned about this, it's part >> of something we did with Alex. >> > > Are these auto-generated ?
Yes, these are generated. > If yes, I guess you might easily cross some bytecode limits and > produce un-compilable code... > I would try to store Sets differently - for example: > > #passed -> #(#testSuite #testAssert #testRanOnlyOnce #testFail > #testIsNotRerunOnDebug #testDefects #testResult > #testDialectLocalizedException #testRunning #testError #testException > #testShould #testWithExceptionDo) asSet ok, thanks for the tip. > > Nicolas > >>> >>> Nicolas >>> >>> 2009/11/30 Stéphane Ducasse <[email protected]>: >>>> thanks can you let us knw the exact sequence your did? >>>> >>>> Stef >>>> >>>> On Nov 30, 2009, at 8:30 PM, [email protected] wrote: >>>> >>>>> I got a recent dev-image and ran some tests (all CollectionTests >>>>> if this matter) and attempted to store the result. >>>>> >>>>> 30 November 2009 5:26:40 pm >>>>> >>>>> VM: Win32 - IX86 - NT - Squeak3.10.2 of '5 June 2008' [latest >>>>> update: #7179] >>>>> Image: PharoCore1.0rc1 [Latest update: #10498] >>>>> >>>>> SecurityManager state: >>>>> Restricted: false >>>>> FileAccess: true >>>>> SocketAccess: true >>>>> Working Dir E:\Pharo >>>>> Trusted Dir E:\Pharo\Cesar S. Rabak >>>>> Untrusted Dir C:\Documents and Settings\Cesar S. Rabak\Meus >>>>> documentos\My Squeak >>>>> >>>>> UndefinedObject(Object)>>doesNotUnderstand: #< >>>>> Receiver: nil >>>>> Arguments and temporary variables: >>>>> aMessage: < 0 >>>>> exception: MessageNotUnderstood: receiver of >>>>> "<" is nil >>>>> resumeValue: nil >>>>> Receiver's instance variables: >>>>> nil >>>>> >>>>> EncoderForV3PlusClosures(EncoderForV3)>>genPushLiteral: >>>>> Receiver: {an EncoderForV3PlusClosures} >>>>> Arguments and temporary variables: >>>>> literalIndex: nil >>>>> Receiver's instance variables: >>>>> comment: nil >>>>> pc: nil >>>>> scopeTable: a Dictionary('category'->{category} >>>>> 'classPool'->{classPool} 'envir...etc... >>>>> nTemps: 0 >>>>> supered: false >>>>> requestor: nil >>>>> class: StringTest class >>>>> selector: #lastStoredRun >>>>> literalStream: a WriteStream {#Dictionary- >>>>>> Dictionary. #add:. #'->'. #passed. #...etc... >>>>> selectorSet: a Dictionary(#*->{*} #+->{+} #-->{-} >>>>> #'->'->{->} #/->{/} #'//'->{/...etc... >>>>> litIndSet: a Dictionary(#Dictionary- >>>>> >Dictionary- >>>>>> {Dictionary} #Set->Set->{Set} ...etc... >>>>> litSet: a LiteralDictionary(size 302) >>>>> sourceRanges: a Dictionary(size 309) >>>>> globalSourceRanges: an OrderedCollection >>>>> ({'Dictionary'. (20 to: 29). false} {'S...etc... >>>>> addedSelectorAndMethodClassLiterals: false >>>>> stream: {an EncoderForV3PlusClosures} >>>>> position: 0 >>>>> rootNode: lastStoredRun >>>>> ^ Dictionary new add: #passed -> (Set new add: >>>>> #testAs...etc... >>>>> blockExtentsToLocals: nil >>>>> >>>>> EncoderForV3PlusClosures(BytecodeEncoder) >>>>>>> sizeOpcodeSelector:withArguments: >>>>> Receiver: {an EncoderForV3PlusClosures} >>>>> Arguments and temporary variables: >>>>> genSelector: #genPushLiteral: >>>>> args: #(nil) >>>>> Receiver's instance variables: >>>>> comment: nil >>>>> pc: nil >>>>> scopeTable: a Dictionary('category'->{category} >>>>> 'classPool'->{classPool} 'envir...etc... >>>>> nTemps: 0 >>>>> supered: false >>>>> requestor: nil >>>>> class: StringTest class >>>>> selector: #lastStoredRun >>>>> literalStream: a WriteStream {#Dictionary- >>>>>> Dictionary. #add:. #'->'. #passed. #...etc... >>>>> selectorSet: a Dictionary(#*->{*} #+->{+} #-->{-} >>>>> #'->'->{->} #/->{/} #'//'->{/...etc... >>>>> litIndSet: a Dictionary(#Dictionary- >>>>> >Dictionary- >>>>>> {Dictionary} #Set->Set->{Set} ...etc... >>>>> litSet: a LiteralDictionary(size 302) >>>>> sourceRanges: a Dictionary(size 309) >>>>> globalSourceRanges: an OrderedCollection >>>>> ({'Dictionary'. (20 to: 29). false} {'S...etc... >>>>> addedSelectorAndMethodClassLiterals: false >>>>> stream: {an EncoderForV3PlusClosures} >>>>> position: 0 >>>>> rootNode: lastStoredRun >>>>> ^ Dictionary new add: #passed -> (Set new add: >>>>> #testAs...etc... >>>>> blockExtentsToLocals: nil >>>>> >>>>> EncoderForV3PlusClosures(BytecodeEncoder)>>sizePushLiteral: >>>>> Receiver: {an EncoderForV3PlusClosures} >>>>> Arguments and temporary variables: >>>>> literalIndex: nil >>>>> Receiver's instance variables: >>>>> comment: nil >>>>> pc: nil >>>>> scopeTable: a Dictionary('category'->{category} >>>>> 'classPool'->{classPool} 'envir...etc... >>>>> nTemps: 0 >>>>> supered: false >>>>> requestor: nil >>>>> class: StringTest class >>>>> selector: #lastStoredRun >>>>> literalStream: a WriteStream {#Dictionary- >>>>>> Dictionary. #add:. #'->'. #passed. #...etc... >>>>> selectorSet: a Dictionary(#*->{*} #+->{+} #-->{-} >>>>> #'->'->{->} #/->{/} #'//'->{/...etc... >>>>> litIndSet: a Dictionary(#Dictionary- >>>>> >Dictionary- >>>>>> {Dictionary} #Set->Set->{Set} ...etc... >>>>> litSet: a LiteralDictionary(size 302) >>>>> sourceRanges: a Dictionary(size 309) >>>>> globalSourceRanges: an OrderedCollection >>>>> ({'Dictionary'. (20 to: 29). false} {'S...etc... >>>>> addedSelectorAndMethodClassLiterals: false >>>>> stream: {an EncoderForV3PlusClosures} >>>>> position: 0 >>>>> rootNode: lastStoredRun >>>>> ^ Dictionary new add: #passed -> (Set new add: >>>>> #testAs...etc... >>>>> blockExtentsToLocals: nil >>>>> >>>>> LiteralNode>>sizeCodeForValue: >>>>> Receiver: {#testWithWithWithWith} >>>>> Arguments and temporary variables: >>>>> encoder: {an EncoderForV3PlusClosures} >>>>> Receiver's instance variables: >>>>> comment: nil >>>>> pc: nil >>>>> key: #testWithWithWithWith >>>>> code: -3 >>>>> index: nil >>>>> >>>>> [] in MessageNode>>sizeCodeForValue: >>>>> Receiver: { add: #testWithWithWithWith} >>>>> Arguments and temporary variables: >>>>> <<error during printing> >>>>> Receiver's instance variables: >>>>> comment: nil >>>>> pc: nil >>>>> receiver: nil >>>>> selector: {add:} >>>>> precedence: 3 >>>>> special: 0 >>>>> arguments: an OrderedCollection >>>>> ({#testWithWithWithWith}) >>>>> sizes: #(nil) >>>>> equalNode: nil >>>>> caseErrorNode: nil >>>>> >>>>> OrderedCollection>>collect: >>>>> Receiver: an OrderedCollection({#testWithWithWithWith}) >>>>> Arguments and temporary variables: >>>>> aBlock: [closure] in >>>>> MessageNode>>sizeCodeForValue: >>>>> newCollection: an OrderedCollection() >>>>> index: 3 >>>>> Receiver's instance variables: >>>>> array: #(nil nil {#testWithWithWithWith} nil nil >>>>> nil nil nil nil nil) >>>>> firstIndex: 3 >>>>> lastIndex: 3 >>>>> >>>>> MessageNode>>sizeCodeForValue: >>>>> Receiver: { add: #testWithWithWithWith} >>>>> Arguments and temporary variables: >>>>> <<error during printing> >>>>> Receiver's instance variables: >>>>> comment: nil >>>>> pc: nil >>>>> receiver: nil >>>>> selector: {add:} >>>>> precedence: 3 >>>>> special: 0 >>>>> arguments: an OrderedCollection >>>>> ({#testWithWithWithWith}) >>>>> sizes: #(nil) >>>>> equalNode: nil >>>>> caseErrorNode: nil >>>>> >>>>> [] in CascadeNode>>sizeCodeForValue: >>>>> Receiver: {Set new add: #testAsArray; >>>>> add: #testAsSet; >>>>> add: #testAsSortedCollection; >>>>> add: #tes...etc... >>>>> Arguments and temporary variables: >>>>> encoder: { add: #testWithWithWithWith} >>>>> size: {an EncoderForV3PlusClosures} >>>>> aMessage: #(1506) >>>>> Receiver's instance variables: >>>>> comment: nil >>>>> pc: nil >>>>> receiver: {Set new} >>>>> messages: an OrderedCollection({ add: >>>>> #testAsArray} { add: #testAsSet} { add: #...etc... >>>>> >>>>> OrderedCollection>>do: >>>>> Receiver: an OrderedCollection({ add: #testAsArray} { add: >>>>> #testAsSet} { add: #testAsSortedCollectio...etc... >>>>> Arguments and temporary variables: >>>>> aBlock: [closure] in >>>>> CascadeNode>>sizeCodeForValue: >>>>> index: 252 >>>>> Receiver's instance variables: >>>>> array: an Array({ add: #testAsArray} { add: >>>>> #testAsSet} { add: #testAsSortedCol...etc... >>>>> firstIndex: 1 >>>>> lastIndex: 294 >>>>> >>>>> CascadeNode>>sizeCodeForValue: >>>>> Receiver: {Set new add: #testAsArray; >>>>> add: #testAsSet; >>>>> add: #testAsSortedCollection; >>>>> add: #tes...etc... >>>>> Arguments and temporary variables: >>>>> encoder: {an EncoderForV3PlusClosures} >>>>> size: #(1506) >>>>> Receiver's instance variables: >>>>> comment: nil >>>>> pc: nil >>>>> receiver: {Set new} >>>>> messages: an OrderedCollection({ add: >>>>> #testAsArray} { add: #testAsSet} { add: #...etc... >>>>> >>>>> [] in MessageNode>>sizeCodeForValue: >>>>> Receiver: {#passed -> (Set new add: #testAsArray; >>>>> add: #testAsSet; >>>>> add: #testAsSortedCollectio...etc... >>>>> Arguments and temporary variables: >>>>> <<error during printing> >>>>> Receiver's instance variables: >>>>> comment: nil >>>>> pc: nil >>>>> receiver: {#passed} >>>>> selector: {->} >>>>> precedence: 2 >>>>> special: 0 >>>>> arguments: an Array({Set new add: #testAsArray; >>>>> add: #testAsSet; >>>>> add: #test...etc... >>>>> sizes: #(nil) >>>>> equalNode: nil >>>>> caseErrorNode: nil >>>>> >>>>> Array(SequenceableCollection)>>collect: >>>>> Receiver: an Array({Set new add: #testAsArray; >>>>> add: #testAsSet; >>>>> add: #testAsSortedCollection; >>>>> ...etc... >>>>> Arguments and temporary variables: >>>>> aBlock: [closure] in >>>>> MessageNode>>sizeCodeForValue: >>>>> newCollection: #(nil) >>>>> index: 1 >>>>> indexLimiT: 1 >>>>> Receiver's instance variables: >>>>> an Array({Set new add: #testAsArray; >>>>> add: #testAsSet; >>>>> add: #testAsSortedCollection; >>>>> ...etc... >>>>> >>>>> MessageNode>>sizeCodeForValue: >>>>> Receiver: {#passed -> (Set new add: #testAsArray; >>>>> add: #testAsSet; >>>>> add: #testAsSortedCollectio...etc... >>>>> Arguments and temporary variables: >>>>> <<error during printing> >>>>> Receiver's instance variables: >>>>> comment: nil >>>>> pc: nil >>>>> receiver: {#passed} >>>>> selector: {->} >>>>> precedence: 2 >>>>> special: 0 >>>>> arguments: an Array({Set new add: #testAsArray; >>>>> add: #testAsSet; >>>>> add: #test...etc... >>>>> sizes: #(nil) >>>>> equalNode: nil >>>>> caseErrorNode: nil >>>>> >>>>> [] in MessageNode>>sizeCodeForValue: >>>>> Receiver: { add: #passed -> (Set new add: #testAsArray; >>>>> add: #testAsSet; >>>>> add: #testAsSortedC...etc... >>>>> Arguments and temporary variables: >>>>> <<error during printing> >>>>> Receiver's instance variables: >>>>> comment: nil >>>>> pc: nil >>>>> receiver: nil >>>>> selector: {add:} >>>>> precedence: 3 >>>>> special: 0 >>>>> arguments: an OrderedCollection({#passed -> >>>>> (Set new add: #testAsArray; >>>>> add:...etc... >>>>> sizes: #(nil) >>>>> equalNode: nil >>>>> caseErrorNode: nil >>>>> >>>>> OrderedCollection>>collect: >>>>> Receiver: an OrderedCollection({#passed -> (Set new add: >>>>> #testAsArray; >>>>> add: #testAsSet; >>>>> add: #...etc... >>>>> Arguments and temporary variables: >>>>> aBlock: [closure] in >>>>> MessageNode>>sizeCodeForValue: >>>>> newCollection: an OrderedCollection() >>>>> index: 3 >>>>> Receiver's instance variables: >>>>> array: an Array(nil nil {#passed -> (Set new add: >>>>> #testAsArray; >>>>> add: #testAs...etc... >>>>> firstIndex: 3 >>>>> lastIndex: 3 >>>>> >>>>> MessageNode>>sizeCodeForValue: >>>>> Receiver: { add: #passed -> (Set new add: #testAsArray; >>>>> add: #testAsSet; >>>>> add: #testAsSortedC...etc... >>>>> Arguments and temporary variables: >>>>> <<error during printing> >>>>> Receiver's instance variables: >>>>> comment: nil >>>>> pc: nil >>>>> receiver: nil >>>>> selector: {add:} >>>>> precedence: 3 >>>>> special: 0 >>>>> arguments: an OrderedCollection({#passed -> >>>>> (Set new add: #testAsArray; >>>>> add:...etc... >>>>> sizes: #(nil) >>>>> equalNode: nil >>>>> caseErrorNode: nil >>>>> >>>>> [] in CascadeNode>>sizeCodeForValue: >>>>> Receiver: {Dictionary new add: #passed -> (Set new add: >>>>> #testAsArray; >>>>> add: #testAsSet; >>>>> add: ...etc... >>>>> Arguments and temporary variables: >>>>> encoder: { add: #passed -> (Set new add: >>>>> #testAsArray; >>>>> add: #testAsSet; >>>>> ...etc... >>>>> size: {an EncoderForV3PlusClosures} >>>>> aMessage: #(10) >>>>> Receiver's instance variables: >>>>> comment: nil >>>>> pc: nil >>>>> receiver: {Dictionary new} >>>>> messages: an OrderedCollection({ add: >>>>> #passed - >>>>>> (Set new add: #testAsArray; >>>>> ...etc... >>>>> >>>>> OrderedCollection>>do: >>>>> Receiver: an OrderedCollection({ add: #passed -> (Set new >>>>> add: #testAsArray; >>>>> add: #testAsSet; >>>>> ...etc... >>>>> Arguments and temporary variables: >>>>> aBlock: [closure] in >>>>> CascadeNode>>sizeCodeForValue: >>>>> index: 3 >>>>> Receiver's instance variables: >>>>> array: an Array(nil nil { add: #passed -> (Set new >>>>> add: #testAsArray; >>>>> add: ...etc... >>>>> firstIndex: 3 >>>>> lastIndex: 7 >>>>> >>>>> CascadeNode>>sizeCodeForValue: >>>>> Receiver: {Dictionary new add: #passed -> (Set new add: >>>>> #testAsArray; >>>>> add: #testAsSet; >>>>> add: ...etc... >>>>> Arguments and temporary variables: >>>>> encoder: {an EncoderForV3PlusClosures} >>>>> size: #(10) >>>>> Receiver's instance variables: >>>>> comment: nil >>>>> pc: nil >>>>> receiver: {Dictionary new} >>>>> messages: an OrderedCollection({ add: >>>>> #passed - >>>>>> (Set new add: #testAsArray; >>>>> ...etc... >>>>> >>>>> CascadeNode(ParseNode)>>sizeCodeForReturn: >>>>> Receiver: {Dictionary new add: #passed -> (Set new add: >>>>> #testAsArray; >>>>> add: #testAsSet; >>>>> add: ...etc... >>>>> Arguments and temporary variables: >>>>> encoder: {an EncoderForV3PlusClosures} >>>>> Receiver's instance variables: >>>>> comment: nil >>>>> pc: nil >>>>> receiver: {Dictionary new} >>>>> messages: an OrderedCollection({ add: >>>>> #passed - >>>>>> (Set new add: #testAsArray; >>>>> ...etc... >>>>> >>>>> ReturnNode>>sizeCodeForValue: >>>>> Receiver: {^ Dictionary new add: #passed -> (Set new add: >>>>> #testAsArray; >>>>> add: #testAsSet; >>>>> add...etc... >>>>> Arguments and temporary variables: >>>>> encoder: {an EncoderForV3PlusClosures} >>>>> Receiver's instance variables: >>>>> comment: nil >>>>> pc: nil >>>>> expr: {Dictionary new add: #passed -> (Set new >>>>> add: #testAsArray; >>>>> add: #tes...etc... >>>>> >>>>> ReturnNode(ParseNode)>>sizeCodeForBlockValue: >>>>> Receiver: {^ Dictionary new add: #passed -> (Set new add: >>>>> #testAsArray; >>>>> add: #testAsSet; >>>>> add...etc... >>>>> Arguments and temporary variables: >>>>> encoder: {an EncoderForV3PlusClosures} >>>>> Receiver's instance variables: >>>>> comment: nil >>>>> pc: nil >>>>> expr: {Dictionary new add: #passed -> (Set new >>>>> add: #testAsArray; >>>>> add: #tes...etc... >>>>> >>>>> BlockNode>>sizeCodeForEvaluatedValue: >>>>> Receiver: {[^ Dictionary new add: #passed -> (Set new add: >>>>> #testAsArray; >>>>> add: #testAsSet; >>>>> ...etc... >>>>> Arguments and temporary variables: >>>>> encoder: {an EncoderForV3PlusClosures} >>>>> Receiver's instance variables: >>>>> comment: nil >>>>> pc: nil >>>>> arguments: #() >>>>> statements: an OrderedCollection({^ Dictionary >>>>> new add: #passed -> (Set new add...etc... >>>>> returns: true >>>>> nArgsNode: nil >>>>> size: nil >>>>> remoteCopyNode: nil >>>>> temporaries: an OrderedCollection() >>>>> optimized: false >>>>> actualScopeIfOptimized: nil >>>>> blockExtent: (0 to: 2) >>>>> remoteTempNode: nil >>>>> copiedValues: nil >>>>> closureCreationNode: nil >>>>> startOfLastStatement: 16 >>>>> >>>>> BytecodeAgnosticMethodNode>>generate: >>>>> Receiver: lastStoredRun >>>>> ^ Dictionary new add: #passed -> (Set new add: #testAsArray; >>>>> add: #tes...etc... >>>>> Arguments and temporary variables: >>>>> trailer: #(0 0 0 0) >>>>> primErrNode: nil >>>>> blkSize: nil >>>>> nLits: nil >>>>> literals: nil >>>>> stack: nil >>>>> method: nil >>>>> locals: nil >>>>> lit: nil >>>>> Receiver's instance variables: >>>>> comment: nil >>>>> pc: nil >>>>> selectorOrFalse: #lastStoredRun >>>>> precedence: 1 >>>>> arguments: #() >>>>> block: {[^ Dictionary new add: #passed -> (Set new >>>>> add: #testAsArray; >>>>> add:...etc... >>>>> primitive: 0 >>>>> encoder: {an EncoderForV3PlusClosures} >>>>> temporaries: #() >>>>> properties: an AdditionalMethodState >>>>> sourceText: 'lastStoredRun >>>>> ^ ((Dictionary new) add: (#passed->((Set new) add: ...etc... >>>>> locationCounter: 3 >>>>> localsPool: an IdentitySet() >>>>> >>>>> CompiledMethodWithNode class>>generateMethodFromNode:trailer: >>>>> Receiver: CompiledMethodWithNode >>>>> Arguments and temporary variables: >>>>> aMethodNode: lastStoredRun >>>>> ^ Dictionary new add: #passed -> (Set new add: #tes...etc... >>>>> bytes: #(0 0 0 0) >>>>> Receiver's instance variables: >>>>> superclass: Object >>>>> methodDict: a MethodDictionary(#method->a >>>>> CompiledMethod(650: CompiledMethodWit...etc... >>>>> format: 134 >>>>> instanceVariables: #('node' 'method') >>>>> organization: ('accessing' method node selector) >>>>> ('private' method: node:) >>>>> >>>>> subclasses: nil >>>>> name: #CompiledMethodWithNode >>>>> classPool: nil >>>>> sharedPools: nil >>>>> environment: Smalltalk >>>>> category: #'Compiler-Support' >>>>> traitComposition: nil >>>>> localSelectors: nil >>>>> >>>>> Metaclass(Behavior)>>compile:classified:notifying:trailer:ifFail: >>>>> Receiver: StringTest class >>>>> Arguments and temporary variables: >>>>> code: 'lastStoredRun >>>>> ^ ((Dictionary new) add: (#passed->((Set new) add: >>>>> #testA...etc... >>>>> category: 'history' >>>>> requestor: nil >>>>> bytes: #(0 0 0 0) >>>>> failBlock: [closure] in Metaclass >>>>> (ClassDescription)>>compile:classified:withSta...etc... >>>>> methodNode: lastStoredRun >>>>> ^ Dictionary new add: #passed -> (Set new add: >>>>> #test...etc... >>>>> Receiver's instance variables: >>>>> superclass: CollectionRootTest class >>>>> methodDict: a MethodDictionary() >>>>> format: 158 >>>>> instanceVariables: nil >>>>> organization: ('as yet unclassified') >>>>> >>>>> thisClass: StringTest >>>>> traitComposition: TIncludesTest classTrait + >>>>> TCloneTest classTrait + TCopyTest ...etc... >>>>> localSelectors: nil >>>>> >>>>> Metaclass(ClassDescription) >>>>>>> compile:classified:withStamp:notifying:logSource: >>>>> Receiver: StringTest class >>>>> Arguments and temporary variables: >>>>> text: 'lastStoredRun >>>>> ^ ((Dictionary new) add: (#passed->((Set new) add: >>>>> #testA...etc... >>>>> category: 'history' >>>>> changeStamp: 'CesarRabak 11/30/2009 17:26' >>>>> requestor: nil >>>>> logSource: true >>>>> methodAndNode: nil >>>>> Receiver's instance variables: >>>>> superclass: CollectionRootTest class >>>>> methodDict: a MethodDictionary() >>>>> format: 158 >>>>> instanceVariables: nil >>>>> organization: ('as yet unclassified') >>>>> >>>>> thisClass: StringTest >>>>> traitComposition: TIncludesTest classTrait + >>>>> TCloneTest classTrait + TCopyTest ...etc... >>>>> localSelectors: nil >>>>> >>>>> Metaclass(ClassDescription) >>>>> >>compile:classified:withStamp:notifying: >>>>> Receiver: StringTest class >>>>> Arguments and temporary variables: >>>>> text: 'lastStoredRun >>>>> ^ ((Dictionary new) add: (#passed->((Set new) add: >>>>> #testA...etc... >>>>> category: 'history' >>>>> changeStamp: 'CesarRabak 11/30/2009 17:26' >>>>> requestor: nil >>>>> Receiver's instance variables: >>>>> superclass: CollectionRootTest class >>>>> methodDict: a MethodDictionary() >>>>> format: 158 >>>>> instanceVariables: nil >>>>> organization: ('as yet unclassified') >>>>> >>>>> thisClass: StringTest >>>>> traitComposition: TIncludesTest classTrait + >>>>> TCloneTest classTrait + TCopyTest ...etc... >>>>> localSelectors: nil >>>>> >>>>> Metaclass(ClassDescription)>>compile:classified:notifying: >>>>> Receiver: StringTest class >>>>> Arguments and temporary variables: >>>>> text: 'lastStoredRun >>>>> ^ ((Dictionary new) add: (#passed->((Set new) add: >>>>> #testA...etc... >>>>> category: 'history' >>>>> requestor: nil >>>>> stamp: 'CesarRabak 11/30/2009 17:26' >>>>> Receiver's instance variables: >>>>> superclass: CollectionRootTest class >>>>> methodDict: a MethodDictionary() >>>>> format: 158 >>>>> instanceVariables: nil >>>>> organization: ('as yet unclassified') >>>>> >>>>> thisClass: StringTest >>>>> traitComposition: TIncludesTest classTrait + >>>>> TCloneTest classTrait + TCopyTest ...etc... >>>>> localSelectors: nil >>>>> >>>>> Metaclass(ClassDescription)>>compile:classified: >>>>> Receiver: StringTest class >>>>> Arguments and temporary variables: >>>>> code: 'lastStoredRun >>>>> ^ ((Dictionary new) add: (#passed->((Set new) add: >>>>> #testA...etc... >>>>> heading: 'history' >>>>> Receiver's instance variables: >>>>> superclass: CollectionRootTest class >>>>> methodDict: a MethodDictionary() >>>>> format: 158 >>>>> instanceVariables: nil >>>>> organization: ('as yet unclassified') >>>>> >>>>> thisClass: StringTest >>>>> traitComposition: TIncludesTest classTrait + >>>>> TCloneTest classTrait + TCopyTest ...etc... >>>>> localSelectors: nil >>>>> >>>>> StringTest class(TestCase class)>>generateLastStoredRunMethod >>>>> Receiver: StringTest >>>>> Arguments and temporary variables: >>>>> >>>>> Receiver's instance variables: >>>>> superclass: CollectionRootTest >>>>> methodDict: a MethodDictionary(size 321) >>>>> format: 158 >>>>> instanceVariables: #('string' 'emptyString' >>>>> 'elementInNonEmpty' 'notIn' 'subcol...etc... >>>>> organization: ('initialization' setUp) >>>>> ('requirements' aValue anIndex anotherEl...etc... >>>>> subclasses: nil >>>>> name: #StringTest >>>>> classPool: nil >>>>> sharedPools: nil >>>>> environment: Smalltalk >>>>> category: #'CollectionsTests-Text' >>>>> traitComposition: TIncludesTest + TCloneTest + >>>>> TCopyTest + TSetArithmetic + TIt...etc... >>>>> localSelectors: an IdentitySet(#elementNotIn >>>>> #firstIndex #replacementCollection...etc... >>>>> history: a Dictionary(#errors->a Set() >>>>> #failures->a Set() #passed->a Set(#testA...etc... >>>>> >>>>> [] in TestRunner>>storeResultIntoTestCases >>>>> Receiver: a TestRunner >>>>> Arguments and temporary variables: >>>>> testCaseCls: StringTest >>>>> Receiver's instance variables: >>>>> categories: #(#'AST-Tests' >>>>> #'AutomaticMethodCategorizer-Tests' #'AutomaticMetho...etc... >>>>> categoriesSelected: a Set(#'CollectionsTests- >>>>> Support' #'CollectionsTests-Weak' ...etc... >>>>> classes: {Base64MimeConverterTest. >>>>> ByteArrayTest. CharacterSetTest. Association...etc... >>>>> classIndex: 0 >>>>> classesSelected: a Set(TextAndTextStreamTest >>>>> WideStringTest WriteStreamTest Ide...etc... >>>>> failedList: #() >>>>> failedSelected: nil >>>>> errorList: #() >>>>> errorSelected: nil >>>>> lastUpdate: 3437054762 >>>>> result: 4978 run, 4978 passes, 0 expected >>>>> failures, 0 failures, 0 errors, 0 une...etc... >>>>> previousRun: nil >>>>> >>>>> Set>>do: >>>>> Receiver: a Set(RunArrayTest SmallDictionaryTest StringTest >>>>> WeakKeyToCollectionDictionaryTest ArrayT...etc... >>>>> Arguments and temporary variables: >>>>> aBlock: [closure] in >>>>> TestRunner>>storeResultIntoTestCases >>>>> index: 364 >>>>> each: StringTest >>>>> indexLimiT: 6638 >>>>> Receiver's instance variables: >>>>> tally: 49 >>>>> array: {nil. nil. nil. nil. nil. nil. nil. nil. >>>>> nil. nil. nil. nil. nil. nil. n...etc... >>>>> >>>>> TestRunner>>storeResultIntoTestCases >>>>> Receiver: a TestRunner >>>>> Arguments and temporary variables: >>>>> >>>>> Receiver's instance variables: >>>>> categories: #(#'AST-Tests' >>>>> #'AutomaticMethodCategorizer-Tests' #'AutomaticMetho...etc... >>>>> categoriesSelected: a Set(#'CollectionsTests- >>>>> Support' #'CollectionsTests-Weak' ...etc... >>>>> classes: {Base64MimeConverterTest. >>>>> ByteArrayTest. CharacterSetTest. Association...etc... >>>>> classIndex: 0 >>>>> classesSelected: a Set(TextAndTextStreamTest >>>>> WideStringTest WriteStreamTest Ide...etc... >>>>> failedList: #() >>>>> failedSelected: nil >>>>> errorList: #() >>>>> errorSelected: nil >>>>> lastUpdate: 3437054762 >>>>> result: 4978 run, 4978 passes, 0 expected >>>>> failures, 0 failures, 0 errors, 0 une...etc... >>>>> previousRun: nil >>>>> >>>>> TestRunner>>perform:orSendTo: >>>>> Receiver: a TestRunner >>>>> Arguments and temporary variables: >>>>> selector: #storeResultIntoTestCases >>>>> otherTarget: a PluggableTextMorphPlus(3170) >>>>> Receiver's instance variables: >>>>> categories: #(#'AST-Tests' >>>>> #'AutomaticMethodCategorizer-Tests' #'AutomaticMetho...etc... >>>>> categoriesSelected: a Set(#'CollectionsTests- >>>>> Support' #'CollectionsTests-Weak' ...etc... >>>>> classes: {Base64MimeConverterTest. >>>>> ByteArrayTest. CharacterSetTest. Association...etc... >>>>> classIndex: 0 >>>>> classesSelected: a Set(TextAndTextStreamTest >>>>> WideStringTest WriteStreamTest Ide...etc... >>>>> failedList: #() >>>>> failedSelected: nil >>>>> errorList: #() >>>>> errorSelected: nil >>>>> lastUpdate: 3437054762 >>>>> result: 4978 run, 4978 passes, 0 expected >>>>> failures, 0 failures, 0 errors, 0 une...etc... >>>>> previousRun: nil >>>>> >>>>> [] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: >>>>> Receiver: a ToggleMenuItemMorph(2690)'Store result as >>>>> progress reference' >>>>> Arguments and temporary variables: >>>>> evt: [...@67 mouseUp 21933765 nil] >>>>> selArgCount: #(2) >>>>> Receiver's instance variables: >>>>> bounds: 6...@54 corner: 8...@70 >>>>> owner: a MenuMorph(2400) >>>>> submorphs: #() >>>>> fullBounds: 6...@54 corner: 8...@70 >>>>> color: Color black >>>>> extension: a MorphExtension (2845) [other: >>>>> (layoutProperties -> a LayoutProper...etc... >>>>> font: a LogicalFont >>>>> familyName: DejaVu Sans >>>>> emphasis: nil >>>>> pointSize: 10 >>>>> rea...etc... >>>>> emphasis: 0 >>>>> contents: 'Store result as progress reference' >>>>> hasFocus: false >>>>> isEnabled: true >>>>> subMenu: nil >>>>> isSelected: false >>>>> target: a TestRunner >>>>> selector: #perform:orSendTo: >>>>> arguments: an Array(#storeResultIntoTestCases a >>>>> PluggableTextMorphPlus(3170)) >>>>> icon: nil >>>>> getStateSelector: nil >>>>> enablementSelector: nil >>>>> keyText: nil >>>>> >>>>> BlockClosure>>ensure: >>>>> Receiver: [closure] in ToggleMenuItemMorph(MenuItemMorph) >>>>>>> invokeWithEvent: >>>>> Arguments and temporary variables: >>>>> aBlock: [closure] in CursorWithMask(Cursor) >>>>>>> showWhile: >>>>> returnValue: nil >>>>> b: nil >>>>> Receiver's instance variables: >>>>> outerContext: ToggleMenuItemMorph(MenuItemMorph) >>>>>>> invokeWithEvent: >>>>> startpc: 136 >>>>> numArgs: 0 >>>>> >>>>> CursorWithMask(Cursor)>>showWhile: >>>>> Receiver: ((CursorWithMask >>>>> extent: 1...@16 >>>>> depth: 1 >>>>> fromArray: #( >>>>> 2r0 >>>>> 2r10000000000000000000000...etc... >>>>> Arguments and temporary variables: >>>>> aBlock: [closure] in ToggleMenuItemMorph >>>>> (MenuItemMorph)>>invokeWithEvent: >>>>> oldcursor: ((CursorWithMask >>>>> extent: 1...@16 >>>>> depth: 1 >>>>> fromArray: #( >>>>> 2r0 >>>>> 2r1...etc... >>>>> Receiver's instance variables: >>>>> bits: a Bitmap of length 16 >>>>> width: 16 >>>>> height: 16 >>>>> depth: 1 >>>>> offset: -...@-1 >>>>> maskForm: Form(16x16x1) >>>>> >>>>> >>>>> --- The full stack --- >>>>> UndefinedObject(Object)>>doesNotUnderstand: #< >>>>> EncoderForV3PlusClosures(EncoderForV3)>>genPushLiteral: >>>>> EncoderForV3PlusClosures(BytecodeEncoder) >>>>>>> sizeOpcodeSelector:withArguments: >>>>> EncoderForV3PlusClosures(BytecodeEncoder)>>sizePushLiteral: >>>>> LiteralNode>>sizeCodeForValue: >>>>> [] in MessageNode>>sizeCodeForValue: >>>>> OrderedCollection>>collect: >>>>> MessageNode>>sizeCodeForValue: >>>>> [] in CascadeNode>>sizeCodeForValue: >>>>> OrderedCollection>>do: >>>>> CascadeNode>>sizeCodeForValue: >>>>> [] in MessageNode>>sizeCodeForValue: >>>>> Array(SequenceableCollection)>>collect: >>>>> MessageNode>>sizeCodeForValue: >>>>> [] in MessageNode>>sizeCodeForValue: >>>>> OrderedCollection>>collect: >>>>> MessageNode>>sizeCodeForValue: >>>>> [] in CascadeNode>>sizeCodeForValue: >>>>> OrderedCollection>>do: >>>>> CascadeNode>>sizeCodeForValue: >>>>> CascadeNode(ParseNode)>>sizeCodeForReturn: >>>>> ReturnNode>>sizeCodeForValue: >>>>> ReturnNode(ParseNode)>>sizeCodeForBlockValue: >>>>> BlockNode>>sizeCodeForEvaluatedValue: >>>>> BytecodeAgnosticMethodNode>>generate: >>>>> CompiledMethodWithNode class>>generateMethodFromNode:trailer: >>>>> Metaclass(Behavior)>>compile:classified:notifying:trailer:ifFail: >>>>> Metaclass(ClassDescription) >>>>>>> compile:classified:withStamp:notifying:logSource: >>>>> Metaclass(ClassDescription) >>>>> >>compile:classified:withStamp:notifying: >>>>> Metaclass(ClassDescription)>>compile:classified:notifying: >>>>> Metaclass(ClassDescription)>>compile:classified: >>>>> StringTest class(TestCase class)>>generateLastStoredRunMethod >>>>> [] in TestRunner>>storeResultIntoTestCases >>>>> Set>>do: >>>>> TestRunner>>storeResultIntoTestCases >>>>> TestRunner>>perform:orSendTo: >>>>> [] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: >>>>> BlockClosure>>ensure: >>>>> CursorWithMask(Cursor)>>showWhile: >>>>> - - - - - - - - - - - - - - - >>>>> - - - - - - - - - - - - - - - - - - >>>>> ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: >>>>> ToggleMenuItemMorph(MenuItemMorph)>>mouseUp: >>>>> ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp: >>>>> MouseButtonEvent>>sentTo: >>>>> ToggleMenuItemMorph(Morph)>>handleEvent: >>>>> MorphicEventDispatcher>>dispatchDefault:with: >>>>> MorphicEventDispatcher>>dispatchEvent:with: >>>>> ToggleMenuItemMorph(Morph)>>processEvent:using: >>>>> MorphicEventDispatcher>>dispatchDefault:with: >>>>> MorphicEventDispatcher>>dispatchEvent:with: >>>>> MenuMorph(Morph)>>processEvent:using: >>>>> MenuMorph(Morph)>>processEvent: >>>>> MenuMorph>>handleFocusEvent: >>>>> [] in HandMorph>>sendFocusEvent:to:clear: >>>>> [] in PasteUpMorph>>becomeActiveDuring: >>>>> BlockClosure>>on:do: >>>>> PasteUpMorph>>becomeActiveDuring: >>>>> HandMorph>>sendFocusEvent:to:clear: >>>>> HandMorph>>sendEvent:focus:clear: >>>>> HandMorph>>sendMouseEvent: >>>>> HandMorph>>handleEvent: >>>>> HandMorph>>processEvents >>>>> [] in WorldState>>doOneCycleNowFor: >>>>> Array(SequenceableCollection)>>do: >>>>> WorldState>>handsDo: >>>>> WorldState>>doOneCycleNowFor: >>>>> WorldState>>doOneCycleFor: >>>>> WorldState>>doOneSubCycleFor: >>>>> PasteUpMorph>>doOneSubCycle >>>>> MenuMorph>>invokeModalAt:in:allowKeyboard: >>>>> MenuMorph>>invokeModal: >>>>> MenuMorph>>invokeModal >>>>> PluggableTextMorphPlus(PluggableTextMorph)>>yellowButtonActivity: >>>>> TextMorphForEditView>>mouseDown: >>>>> TextMorphForEditView(Morph)>>handleMouseDown: >>>>> MouseButtonEvent>>sentTo: >>>>> TextMorphForEditView(Morph)>>handleEvent: >>>>> MorphicEventDispatcher>>dispatchMouseDown:with: >>>>> MorphicEventDispatcher>>dispatchEvent:with: >>>>> TextMorphForEditView(Morph)>>processEvent:using: >>>>> MorphicEventDispatcher>>dispatchMouseDown:with: >>>>> MorphicEventDispatcher>>dispatchEvent:with: >>>>> TransformMorph(Morph)>>processEvent:using: >>>>> MorphicEventDispatcher>>dispatchMouseDown:with: >>>>> MorphicEventDispatcher>>dispatchEvent:with: >>>>> PluggableTextMorphPlus(Morph)>>processEvent:using: >>>>> MorphicEventDispatcher>>dispatchMouseDown:with: >>>>> MorphicEventDispatcher>>dispatchEvent:with: >>>>> PluggableStandardWindow(Morph)>>processEvent:using: >>>>> MorphicEventDispatcher>>dispatchMouseDown:with: >>>>> MorphicEventDispatcher>>dispatchEvent:with: >>>>> PasteUpMorph(Morph)>>processEvent:using: >>>>> PasteUpMorph>>processEvent:using: >>>>> PasteUpMorph(Morph)>>processEvent: >>>>> HandMorph>>sendEvent:focus:clear: >>>>> HandMorph>>sendMouseEvent: >>>>> HandMorph>>handleEvent: >>>>> HandMorph>>processEvents >>>>> [] in WorldState>>doOneCycleNowFor: >>>>> Array(SequenceableCollection)>>do: >>>>> WorldState>>handsDo: >>>>> WorldState>>doOneCycleNowFor: >>>>> WorldState>>doOneCycleFor: >>>>> PasteUpMorph>>doOneCycle >>>>> [] in Project class>>spawnNewProcess >>>>> [] in BlockClosure>>newProcess >>>>> >>>>> -- >>>>> Cesar Rabak >>>>> >>>>> _______________________________________________ >>>>> Pharo-project mailing list >>>>> [email protected] >>>>> http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo- >>>>> project >>>> >>>> >>>> _______________________________________________ >>>> Pharo-project mailing list >>>> [email protected] >>>> http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project >>>> >>> >>> _______________________________________________ >>> Pharo-project mailing list >>> [email protected] >>> http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project >> >> -- >> Simon >> >> >> >> >> _______________________________________________ >> Pharo-project mailing list >> [email protected] >> http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project >> > > _______________________________________________ > Pharo-project mailing list > [email protected] > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project -- Simon _______________________________________________ Pharo-project mailing list [email protected] http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
