- Pharo-dev - lists.pharo.org

Re: [Pharo-project] Excluding classes from Test Coverage

by StÃ©phane Ducasse

no for now we have a website for pharo and a website for pharo geek on code. We want to make sure that a client of a pharo company can be ok to pay a project in pharo and do not get a ugly web site full of dust and unused wiki like crap. Stef On May 15, 2009, at 9:35 PM, Mariano Martinez Peck wrote: > > > On Fri, May 15, 2009 at 6:27 PM, StÃ©phane Ducasse <stephane.ducasse(a)inria.fr > > wrote: > from the wiki on google not the pharo web site which is for the > "marketing" > > but isn't this marketing ? Most "marketing" websites have a FAQ > section. > > > Stef > On May 15, 2009, at 5:19 PM, Mariano Martinez Peck wrote: > > > > > > > On Fri, May 15, 2009 at 2:05 PM, Oscar Nierstrasz > > <oscar(a)iam.unibe.ch> wrote: > > > > Just checked in as http://www.squeaksource.com/PharoInbox/SUnitGUI-onierstrasz.38.mcz > > > > Now you can declare classes to exclude from coverage analysis by > > defining #classNamesNotUnderTest on the class side of your test to > > return an array of names of those classes. > > > > http://scg.unibe.ch/wiki/faq/pharofaq/howToCheckTestCoverage > > > > > > Wow! I didn't know http://scg.unibe.ch/wiki/faq/pharofaq > > > > It is really useful!!! What about putting a link to it in http://www.pharo-project.org/documentation/faq > > > > Best, > > > > Mariano > > > > > > > > - on > > > > > > _______________________________________________ > > Pharo-project mailing list > > Pharo-project(a)lists.gforge.inria.fr > > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project > > > > _______________________________________________ > > Pharo-project mailing list > > Pharo-project(a)lists.gforge.inria.fr > > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project > > > _______________________________________________ > Pharo-project mailing list > Pharo-project(a)lists.gforge.inria.fr > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project > > _______________________________________________ > Pharo-project mailing list > Pharo-project(a)lists.gforge.inria.fr > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project

May 15, 2009

[Pharo-project] UTF-8 strikes back...

by StÃ©phane Ducasse

I followed the advices and started to give a try with the latest VM 4.1.1beta2U and 10306 |m d f| m := MethodHistoryDatabase new. MethodHistoryChangeList ignoreNonExsiting: false. m readFile: 'SqueakV1.sources' encodingName: 'mac-roman'. d := FileDirectory default directoryNamed: 'history-updates'. #('PreBeta' 'Sqk20Beta') do: [:v | m readFilesIn: d updateFile: 'updates.list' versionName: v.]. m readFile: 'SqueakV2.sources' encodingName: 'mac-roman'. #('Squeak2.0' 'Squeak2.1' 'Squeak2.2beta' 'Squeak2.2' 'Squeak2.3' 'Squeak2.4' 'Squeak2.5test' 'Squeak2.5' 'Squeak2.6alpha' 'Squeak2.6' 'Squeak2.7alpha' 'Squeak2.7' 'Squeak2.8alpha' 'Squeak2.8' 'Squeak2.9alpha') do: [:v | m readFilesIn: d updateFile: 'updates.list' versionName: v.]. m readFile: 'SqueakV3.sources' encodingName: 'mac-roman'. #('Squeak3.0' 'Squeak3.1alpha' 'Squeak3.1beta' 'Squeak3.2alpha' 'Squeak3.2gamma' 'Squeak3.2' 'Squeak3.2.1' 'Squeak3.4alpha' 'Squeak3.4beta' 'Squeak3.4gamma' 'Squeak3.5alpha' 'Squeak3.5beta' 'Squeak3.5gamma' 'Squeak3.6alpha' 'Squeak3.6beta' 'Squeak3.6gamma' 'Squeak3.6') do: [:v | m readFilesIn: d updateFile: 'updates.list' versionName: v.]. d := FileDirectory default directoryNamed: 'squeak.org-updates'. #('Squeak3.7alpha' 'Squeak3.7beta' 'Squeak3.7gamma' 'Squeak3.7' 'Squeak3.8alpha' 'Squeak3.8beta' 'Squeak3.8gamma') do: [:v | m readFilesIn: d updateFile: 'SqCupdates.list' versionName: v.]. m readFile: 'Squeak3.9b-7053.changes' encodingName: 'utf-8'. m readFile: 'SqueakV39.sources' encodingName: 'utf-8'. m readFile: 'Squeak39g-7056+3102-7179.changes' encodingName: 'utf-8'. b := MethodHistoryBrowser new. b database: m. MethodHistoryBrowser openBrowserView: (b openEditString: nil) label: 'foo'. Authorship initialize. authors := Authorship new. authors database: m. missing := authors missingAuthorsWithMethods. returned := authors returnedAuthorsWithMethods. notAccounted := authors notAccounted. historicalMissing := authors historicalMissingAuthorsWithMethods. historicalNotAccounted := authors historicalNotAccounted. f _ FileStream newFileNamed: 'currentMissing.html'. m writeDictWithVersion: missing toHTMLFileNameOn: f title: 'AgreementMissingPharo' explanationFileName: nil. f close. m writeDict: missing toFileName: 'missingPharo.txt'. missing at: ((m at: #Debugger at: #buildMorphicNotifierLabelled:message:) at: 3) author missing I got From: ghjg To: Pharo-project(a)lists.gforge.inria.fr Subject: [BUG]UTF8TextConverter(Object)>>error: here insert explanation of what you were doing, suspect changes you've made and so forth. 15 May 2009 9:42:37 pm VM: Mac OS - intel - 1056 - Squeak3.8.1 of '28 Aug 2006' [latest update: #6747] Squeak VM 4.1.1b2 Image: Pharo0.1 [Latest update: #10306] SecurityManager state: Restricted: false FileAccess: true SocketAccess: true Working Dir /Data/squeak4.0-relicenseTools/history Trusted Dir /foobar/tooBar/forSqueak/bogus Untrusted Dir /Users/ducasse/Library/Preferences/Squeak/Internet/My Squeak UTF8TextConverter(Object)>>error: Receiver: an UTF8TextConverter Arguments and temporary variables: aString: 'Invalid utf8 input detected' Receiver's instance variables: an UTF8TextConverter UTF8TextConverter>>errorMalformedInput Receiver: an UTF8TextConverter Arguments and temporary variables: Receiver's instance variables: an UTF8TextConverter UTF8TextConverter>>nextFromStream: Receiver: an UTF8TextConverter Arguments and temporary variables: aStream: MultiByteFileStream: '/Data/squeak4.0-relicenseTools/ history/Pharo0.1C...etc... character1: $ value1: 160 character2: Character tab value2: 9 unicode: nil character3: Character tab value3: 9 character4: nil value4: nil Receiver's instance variables: an UTF8TextConverter MultiByteFileStream>>next Receiver: MultiByteFileStream: '/Data/squeak4.0-relicenseTools/ history/Pharo0.1Core-10306clreadytowo...etc... Arguments and temporary variables: char: nil secondChar: nil state: nil Receiver's instance variables: MultiByteFileStream(PositionableStream)>>nextChunk Receiver: MultiByteFileStream: '/Data/squeak4.0-relicenseTools/ history/Pharo0.1Core-10306clreadytowo...etc... Arguments and temporary variables: terminator: $! out: a WriteStream 'doesNotUnderstand: aMessage "Handle the fact that there ...etc... ch: Character cr Receiver's instance variables: MultiByteFileStream(PositionableStream)>>nextChunkText Receiver: MultiByteFileStream: '/Data/squeak4.0-relicenseTools/ history/Pharo0.1Core-10306clreadytowo...etc... Arguments and temporary variables: string: nil runsRaw: nil strm: nil runs: nil peek: nil pos: nil Receiver's instance variables: [] in RemoteString>>text Receiver: a RemoteString Arguments and temporary variables: theFile: MultiByteFileStream: '/Data/squeak4.0-relicenseTools/ history/Pharo0.1C...etc... Receiver's instance variables: sourceFileNumber: 2 filePositionHi: 10007336 BlockClosure>>ensure: Receiver: [closure] in RemoteString>>text Arguments and temporary variables: aBlock: [closure] in RemoteString>>text returnValue: nil b: nil Receiver's instance variables: outerContext: RemoteString>>text startpc: 72 numArgs: 0 RemoteString>>text Receiver: a RemoteString Arguments and temporary variables: theFile: MultiByteFileStream: '/Data/squeak4.0-relicenseTools/ history/Pharo0.1C...etc... Receiver's instance variables: sourceFileNumber: 2 filePositionHi: 10007336 CompiledMethod>>getSourceFromFile Receiver: a CompiledMethod (838) Arguments and temporary variables: position: 10007336 Receiver's instance variables: a CompiledMethod (838) CompiledMethod>>methodNode Receiver: a CompiledMethod (838) Arguments and temporary variables: aClass: Object source: nil Receiver's instance variables: a CompiledMethod (838) [] in DebuggerMethodMap class>>forMethod: Receiver: DebuggerMethodMap Arguments and temporary variables: aMethod: a CompiledMethod (838) Receiver's instance variables: superclass: Object methodDict: a MethodDictionary(#abstractSourceMap->a CompiledMethod (1628) #for...etc... format: 140 instanceVariables: #('timestamp' 'methodReference' 'methodNode' 'abstractSource...etc... organization: ('initialize-release' forMethod:methodNode:) ('accessing' markRec...etc... subclasses: {DebuggerMethodMapForBlueBookMethods . DebuggerMethodMapForClosureC...etc... name: #DebuggerMethodMap classPool: a Dictionary(#MapCache->a WeakIdentityKeyDictionary(a CompiledMethod...etc... sharedPools: nil environment: Smalltalk category: #'Tools-Debugger' traitComposition: nil localSelectors: nil WeakIdentityKeyDictionary(Dictionary)>>at:ifAbsent: Receiver: a WeakIdentityKeyDictionary(a CompiledMethod (1637)->a DebuggerMethodMapForClosureCompiled...etc... Arguments and temporary variables: key: a CompiledMethod (838) aBlock: [closure] in DebuggerMethodMap class>>forMethod: assoc: nil Receiver's instance variables: tally: 16 array: an Array(nil nil a CompiledMethod (2402)->a DebuggerMethodMapForClosureC...etc... DebuggerMethodMap class>>forMethod: Receiver: DebuggerMethodMap Arguments and temporary variables: aMethod: a CompiledMethod (838) Receiver's instance variables: superclass: Object methodDict: a MethodDictionary(#abstractSourceMap->a CompiledMethod (1628) #for...etc... format: 140 instanceVariables: #('timestamp' 'methodReference' 'methodNode' 'abstractSource...etc... organization: ('initialize-release' forMethod:methodNode:) ('accessing' markRec...etc... subclasses: {DebuggerMethodMapForBlueBookMethods . DebuggerMethodMapForClosureC...etc... name: #DebuggerMethodMap classPool: a Dictionary(#MapCache->a WeakIdentityKeyDictionary(a CompiledMethod...etc... sharedPools: nil environment: Smalltalk category: #'Tools-Debugger' traitComposition: nil localSelectors: nil CompiledMethod>>debuggerMap Receiver: a CompiledMethod (838) Arguments and temporary variables: Receiver's instance variables: a CompiledMethod (838) MethodContext(InstructionStream)>>debuggerMap Receiver: ByteString(Object)>>doesNotUnderstand: #missing Arguments and temporary variables: Receiver's instance variables: sender: UndefinedObject>>DoIt pc: 50 stackp: 3 method: a CompiledMethod (838) closureOrNil: nil receiver: 'hg' Debugger>>selectedMessage Receiver: a Debugger Arguments and temporary variables: Receiver's instance variables: dependents: a DependentsArray(a PreDebugWindow(2623) a PluggableListMorph(853))...etc... contents: nil currentCompiledMethod: nil contentsSymbol: nil interruptedProcess: a Process in Debugger class>>openOn:context:label:contents:...etc... interruptedController: nil contextStack: an OrderedCollection(ByteString(Object)>>doesNotUnderstand: #miss...etc... contextStackTop: ByteString(Object)>>doesNotUnderstand: #missing contextStackIndex: 1 contextStackList: an OrderedCollection('ByteString(Object)>>doesNotUnderstand: ...etc... receiverInspector: an Inspector contextVariablesInspector: a ContextVariablesInspector externalInterrupt: false proceedValue: nil selectingPC: true debuggerMap: nil savedCursor: ((CursorWithMask extent: 16@16 depth: 1 fromArray: #( 2r0 2...etc... isolationHead: nil failedProject: nil errorWasInUIProcess: true labelString: nil Debugger>>contextStackIndex:oldContextWas: Receiver: a Debugger Arguments and temporary variables: anInteger: 1 oldContext: nil isNewMethod: true selectedContextSlotName: nil index: nil Receiver's instance variables: dependents: a DependentsArray(a PreDebugWindow(2623) a PluggableListMorph(853))...etc... contents: nil currentCompiledMethod: nil contentsSymbol: nil interruptedProcess: a Process in Debugger class>>openOn:context:label:contents:...etc... interruptedController: nil contextStack: an OrderedCollection(ByteString(Object)>>doesNotUnderstand: #miss...etc... contextStackTop: ByteString(Object)>>doesNotUnderstand: #missing contextStackIndex: 1 contextStackList: an OrderedCollection('ByteString(Object)>>doesNotUnderstand: ...etc... receiverInspector: an Inspector contextVariablesInspector: a ContextVariablesInspector externalInterrupt: false proceedValue: nil selectingPC: true debuggerMap: nil savedCursor: ((CursorWithMask extent: 16@16 depth: 1 fromArray: #( 2r0 2...etc... isolationHead: nil failedProject: nil errorWasInUIProcess: true labelString: nil Debugger>>toggleContextStackIndex: Receiver: a Debugger Arguments and temporary variables: anInteger: 1 Receiver's instance variables: dependents: a DependentsArray(a PreDebugWindow(2623) a PluggableListMorph(853))...etc... contents: nil currentCompiledMethod: nil contentsSymbol: nil interruptedProcess: a Process in Debugger class>>openOn:context:label:contents:...etc... interruptedController: nil contextStack: an OrderedCollection(ByteString(Object)>>doesNotUnderstand: #miss...etc... contextStackTop: ByteString(Object)>>doesNotUnderstand: #missing contextStackIndex: 1 contextStackList: an OrderedCollection('ByteString(Object)>>doesNotUnderstand: ...etc... receiverInspector: an Inspector contextVariablesInspector: a ContextVariablesInspector externalInterrupt: false proceedValue: nil selectingPC: true debuggerMap: nil savedCursor: ((CursorWithMask extent: 16@16 depth: 1 fromArray: #( 2r0 2...etc... isolationHead: nil failedProject: nil errorWasInUIProcess: true labelString: nil Debugger>>debugAt: Receiver: a Debugger Arguments and temporary variables: anInteger: 1 Receiver's instance variables: dependents: a DependentsArray(a PreDebugWindow(2623) a PluggableListMorph(853))...etc... contents: nil currentCompiledMethod: nil contentsSymbol: nil interruptedProcess: a Process in Debugger class>>openOn:context:label:contents:...etc... interruptedController: nil contextStack: an OrderedCollection(ByteString(Object)>>doesNotUnderstand: #miss...etc... contextStackTop: ByteString(Object)>>doesNotUnderstand: #missing contextStackIndex: 1 contextStackList: an OrderedCollection('ByteString(Object)>>doesNotUnderstand: ...etc... receiverInspector: an Inspector contextVariablesInspector: a ContextVariablesInspector externalInterrupt: false proceedValue: nil selectingPC: true debuggerMap: nil savedCursor: ((CursorWithMask extent: 16@16 depth: 1 fromArray: #( 2r0 2...etc... isolationHead: nil failedProject: nil errorWasInUIProcess: true labelString: nil PluggableListMorph>>changeModelSelection: Receiver: a PluggableListMorph(853) Arguments and temporary variables: anInteger: 1 Receiver's instance variables: bounds: 319@384 corner: 759@473 owner: a PreDebugWindow(2623) submorphs: an Array(a ScrollBar(3036) a TransformMorph(1197)) fullBounds: 319@384 corner: 759@473 color: Color white extension: a MorphExtension (2096) [locked] [other: (layoutFrame - > a LayoutF...etc... borderWidth: 1 borderColor: (Color r: 0.667 g: 0.667 b: 0.667) model: a Debugger slotName: nil open: false scrollBar: a ScrollBar(3036) scroller: a TransformMorph(1197) retractableScrollBar: false scrollBarOnLeft: false getMenuSelector: nil getMenuTitleSelector: nil hasFocus: false hScrollBar: a ScrollBar(3648) list: an OrderedCollection('ByteString(Object)>>doesNotUnderstand: #missing' 'U...etc... getListSelector: #contextStackList getListSizeSelector: nil getListElementSelector: nil getIndexSelector: #contextStackIndex setIndexSelector: #debugAt: keystrokeActionSelector: nil autoDeselect: true lastKeystrokeTime: 0 lastKeystrokes: '' doubleClickSelector: nil handlesBasicKeys: nil potentialDropRow: nil listMorph: a LazyListMorph(2276) hScrollRangeCache: nil PluggableListMorph>>mouseUp: Receiver: a PluggableListMorph(853) Arguments and temporary variables: event: [442@390 mouseUp 14061207 nil] row: 1 mdr: 1 Receiver's instance variables: bounds: 319@384 corner: 759@473 owner: a PreDebugWindow(2623) submorphs: an Array(a ScrollBar(3036) a TransformMorph(1197)) fullBounds: 319@384 corner: 759@473 color: Color white extension: a MorphExtension (2096) [locked] [other: (layoutFrame - > a LayoutF...etc... borderWidth: 1 borderColor: (Color r: 0.667 g: 0.667 b: 0.667) model: a Debugger slotName: nil open: false scrollBar: a ScrollBar(3036) scroller: a TransformMorph(1197) retractableScrollBar: false scrollBarOnLeft: false getMenuSelector: nil getMenuTitleSelector: nil hasFocus: false hScrollBar: a ScrollBar(3648) list: an OrderedCollection('ByteString(Object)>>doesNotUnderstand: #missing' 'U...etc... getListSelector: #contextStackList getListSizeSelector: nil getListElementSelector: nil getIndexSelector: #contextStackIndex setIndexSelector: #debugAt: keystrokeActionSelector: nil autoDeselect: true lastKeystrokeTime: 0 lastKeystrokes: '' doubleClickSelector: nil handlesBasicKeys: nil potentialDropRow: nil listMorph: a LazyListMorph(2276) hScrollRangeCache: nil PluggableListMorph(Morph)>>handleMouseUp: Receiver: a PluggableListMorph(853) Arguments and temporary variables: anEvent: [442@390 mouseUp 14061207 nil] Receiver's instance variables: bounds: 319@384 corner: 759@473 owner: a PreDebugWindow(2623) submorphs: an Array(a ScrollBar(3036) a TransformMorph(1197)) fullBounds: 319@384 corner: 759@473 color: Color white extension: a MorphExtension (2096) [locked] [other: (layoutFrame - > a LayoutF...etc... borderWidth: 1 borderColor: (Color r: 0.667 g: 0.667 b: 0.667) model: a Debugger slotName: nil open: false scrollBar: a ScrollBar(3036) scroller: a TransformMorph(1197) retractableScrollBar: false scrollBarOnLeft: false getMenuSelector: nil getMenuTitleSelector: nil hasFocus: false hScrollBar: a ScrollBar(3648) list: an OrderedCollection('ByteString(Object)>>doesNotUnderstand: #missing' 'U...etc... getListSelector: #contextStackList getListSizeSelector: nil getListElementSelector: nil getIndexSelector: #contextStackIndex setIndexSelector: #debugAt: keystrokeActionSelector: nil autoDeselect: true lastKeystrokeTime: 0 lastKeystrokes: '' doubleClickSelector: nil handlesBasicKeys: nil potentialDropRow: nil listMorph: a LazyListMorph(2276) hScrollRangeCache: nil MouseButtonEvent>>sentTo: Receiver: [442@390 mouseUp 14061207 nil] Arguments and temporary variables: anObject: a PluggableListMorph(853) Receiver's instance variables: timeStamp: 14061207 source: a HandMorph(3216) windowIndex: nil type: #mouseUp buttons: 0 position: 442@390 handler: nil wasHandled: true whichButton: 4 PluggableListMorph(Morph)>>handleEvent: Receiver: a PluggableListMorph(853) Arguments and temporary variables: anEvent: [442@390 mouseUp 14061207 nil] Receiver's instance variables: bounds: 319@384 corner: 759@473 owner: a PreDebugWindow(2623) submorphs: an Array(a ScrollBar(3036) a TransformMorph(1197)) fullBounds: 319@384 corner: 759@473 color: Color white extension: a MorphExtension (2096) [locked] [other: (layoutFrame - > a LayoutF...etc... borderWidth: 1 borderColor: (Color r: 0.667 g: 0.667 b: 0.667) model: a Debugger slotName: nil open: false scrollBar: a ScrollBar(3036) scroller: a TransformMorph(1197) retractableScrollBar: false scrollBarOnLeft: false getMenuSelector: nil getMenuTitleSelector: nil hasFocus: false hScrollBar: a ScrollBar(3648) list: an OrderedCollection('ByteString(Object)>>doesNotUnderstand: #missing' 'U...etc... getListSelector: #contextStackList getListSizeSelector: nil getListElementSelector: nil getIndexSelector: #contextStackIndex setIndexSelector: #debugAt: keystrokeActionSelector: nil autoDeselect: true lastKeystrokeTime: 0 lastKeystrokes: '' doubleClickSelector: nil handlesBasicKeys: nil potentialDropRow: nil listMorph: a LazyListMorph(2276) hScrollRangeCache: nil MorphicEventDispatcher>>dispatchDefault:with: Receiver: a MorphicEventDispatcher Arguments and temporary variables: anEvent: [442@390 mouseUp 14061207 nil] aMorph: a PluggableListMorph(853) localEvt: [442@390 mouseUp 14061207 nil] index: 3 child: a TransformMorph(1197) morphs: an Array(a ScrollBar(3036) a TransformMorph(1197)) inside: true Receiver's instance variables: lastType: #mouseUp lastDispatch: #dispatchDefault:with: MorphicEventDispatcher>>dispatchEvent:with: Receiver: a MorphicEventDispatcher Arguments and temporary variables: anEvent: [442@390 mouseUp 14061207 nil] aMorph: a PluggableListMorph(853) Receiver's instance variables: lastType: #mouseUp lastDispatch: #dispatchDefault:with: PluggableListMorph(Morph)>>processEvent:using: Receiver: a PluggableListMorph(853) Arguments and temporary variables: anEvent: [442@390 mouseUp 14061207 nil] defaultDispatcher: a MorphicEventDispatcher Receiver's instance variables: bounds: 319@384 corner: 759@473 owner: a PreDebugWindow(2623) submorphs: an Array(a ScrollBar(3036) a TransformMorph(1197)) fullBounds: 319@384 corner: 759@473 color: Color white extension: a MorphExtension (2096) [locked] [other: (layoutFrame - > a LayoutF...etc... borderWidth: 1 borderColor: (Color r: 0.667 g: 0.667 b: 0.667) model: a Debugger slotName: nil open: false scrollBar: a ScrollBar(3036) scroller: a TransformMorph(1197) retractableScrollBar: false scrollBarOnLeft: false getMenuSelector: nil getMenuTitleSelector: nil hasFocus: false hScrollBar: a ScrollBar(3648) list: an OrderedCollection('ByteString(Object)>>doesNotUnderstand: #missing' 'U...etc... getListSelector: #contextStackList getListSizeSelector: nil getListElementSelector: nil getIndexSelector: #contextStackIndex setIndexSelector: #debugAt: keystrokeActionSelector: nil autoDeselect: true lastKeystrokeTime: 0 lastKeystrokes: '' doubleClickSelector: nil handlesBasicKeys: nil potentialDropRow: nil listMorph: a LazyListMorph(2276) hScrollRangeCache: nil PluggableListMorph(Morph)>>processEvent: Receiver: a PluggableListMorph(853) Arguments and temporary variables: anEvent: [442@390 mouseUp 14061207 nil] Receiver's instance variables: bounds: 319@384 corner: 759@473 owner: a PreDebugWindow(2623) submorphs: an Array(a ScrollBar(3036) a TransformMorph(1197)) fullBounds: 319@384 corner: 759@473 color: Color white extension: a MorphExtension (2096) [locked] [other: (layoutFrame - > a LayoutF...etc... borderWidth: 1 borderColor: (Color r: 0.667 g: 0.667 b: 0.667) model: a Debugger slotName: nil open: false scrollBar: a ScrollBar(3036) scroller: a TransformMorph(1197) retractableScrollBar: false scrollBarOnLeft: false getMenuSelector: nil getMenuTitleSelector: nil hasFocus: false hScrollBar: a ScrollBar(3648) list: an OrderedCollection('ByteString(Object)>>doesNotUnderstand: #missing' 'U...etc... getListSelector: #contextStackList getListSizeSelector: nil getListElementSelector: nil getIndexSelector: #contextStackIndex setIndexSelector: #debugAt: keystrokeActionSelector: nil autoDeselect: true lastKeystrokeTime: 0 lastKeystrokes: '' doubleClickSelector: nil handlesBasicKeys: nil potentialDropRow: nil listMorph: a LazyListMorph(2276) hScrollRangeCache: nil PluggableListMorph>>handleFocusEvent: Receiver: a PluggableListMorph(853) Arguments and temporary variables: anEvent: [442@390 mouseUp 14061207 nil] Receiver's instance variables: bounds: 319@384 corner: 759@473 owner: a PreDebugWindow(2623) submorphs: an Array(a ScrollBar(3036) a TransformMorph(1197)) fullBounds: 319@384 corner: 759@473 color: Color white extension: a MorphExtension (2096) [locked] [other: (layoutFrame - > a LayoutF...etc... borderWidth: 1 borderColor: (Color r: 0.667 g: 0.667 b: 0.667) model: a Debugger slotName: nil open: false scrollBar: a ScrollBar(3036) scroller: a TransformMorph(1197) retractableScrollBar: false scrollBarOnLeft: false getMenuSelector: nil getMenuTitleSelector: nil hasFocus: false hScrollBar: a ScrollBar(3648) list: an OrderedCollection('ByteString(Object)>>doesNotUnderstand: #missing' 'U...etc... getListSelector: #contextStackList getListSizeSelector: nil getListElementSelector: nil getIndexSelector: #contextStackIndex setIndexSelector: #debugAt: keystrokeActionSelector: nil autoDeselect: true lastKeystrokeTime: 0 lastKeystrokes: '' doubleClickSelector: nil handlesBasicKeys: nil potentialDropRow: nil listMorph: a LazyListMorph(2276) hScrollRangeCache: nil [] in HandMorph>>sendFocusEvent:to:clear: Receiver: a HandMorph(3216) Arguments and temporary variables: <<error during printing> Receiver's instance variables: bounds: 754@479 corner: 770@495 owner: a PasteUpMorph(1622) [world] submorphs: #() fullBounds: 754@479 corner: 770@495 color: Color blue extension: a MorphExtension (539) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [754@479 mouseUp 20587660 nil] targetOffset: 27@13 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 20587660 754 479 0 0 0 1) lastKeyScanCode: 5 combinedChar: nil [] in PasteUpMorph>>becomeActiveDuring: Receiver: a PasteUpMorph(1622) [world] Arguments and temporary variables: <<error during printing> Receiver's instance variables: bounds: 0@0 corner: 1217@772 owner: nil submorphs: an Array(a TaskbarMorph(3095) a SystemWindow(1690) a SystemWindow(30...etc... fullBounds: nil color: (Color r: 0.97 g: 0.98 b: 1.0) extension: a MorphExtension (2543) [eventHandler = an EventHandler] [other: (...etc... borderWidth: 0 borderColor: (Color r: 0.03 g: 0.02 b: 0.0) presenter: a Presenter (1246) model: a MorphicModel(1926) cursor: 1 padding: 3 backgroundMorph: nil isPartsBin: nil autoLineLayout: false indicateCursor: nil resizeToFit: nil wantsMouseOverHalos: nil worldState: a WorldState griddingOn: nil BlockClosure>>on:do: Receiver: [closure] in PasteUpMorph>>becomeActiveDuring: Arguments and temporary variables: exception: Error handlerAction: [closure] in PasteUpMorph>>becomeActiveDuring: handlerActive: false Receiver's instance variables: outerContext: PasteUpMorph>>becomeActiveDuring: startpc: 67 numArgs: 0 PasteUpMorph>>becomeActiveDuring: Receiver: a PasteUpMorph(1622) [world] Arguments and temporary variables: aBlock: [closure] in HandMorph>>sendFocusEvent:to:clear: priorWorld: a PasteUpMorph(1622) [world] priorHand: a HandMorph(3216) priorEvent: [442@390 mouseOver nil nil] Receiver's instance variables: bounds: 0@0 corner: 1217@772 owner: nil submorphs: an Array(a TaskbarMorph(3095) a SystemWindow(1690) a SystemWindow(30...etc... fullBounds: nil color: (Color r: 0.97 g: 0.98 b: 1.0) extension: a MorphExtension (2543) [eventHandler = an EventHandler] [other: (...etc... borderWidth: 0 borderColor: (Color r: 0.03 g: 0.02 b: 0.0) presenter: a Presenter (1246) model: a MorphicModel(1926) cursor: 1 padding: 3 backgroundMorph: nil isPartsBin: nil autoLineLayout: false indicateCursor: nil resizeToFit: nil wantsMouseOverHalos: nil worldState: a WorldState griddingOn: nil HandMorph>>sendFocusEvent:to:clear: Receiver: a HandMorph(3216) Arguments and temporary variables: anEvent: [442@390 mouseUp 14061207 nil] focusHolder: a PluggableListMorph(853) aBlock: [closure] in HandMorph>>sendMouseEvent: w: a PasteUpMorph(1622) [world] result: #(nil) Receiver's instance variables: bounds: 754@479 corner: 770@495 owner: a PasteUpMorph(1622) [world] submorphs: #() fullBounds: 754@479 corner: 770@495 color: Color blue extension: a MorphExtension (539) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [754@479 mouseUp 20587660 nil] targetOffset: 27@13 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 20587660 754 479 0 0 0 1) lastKeyScanCode: 5 combinedChar: nil HandMorph>>sendEvent:focus:clear: Receiver: a HandMorph(3216) Arguments and temporary variables: anEvent: [442@390 mouseUp 14061207 nil] focusHolder: a PluggableListMorph(853) aBlock: [closure] in HandMorph>>sendMouseEvent: result: nil Receiver's instance variables: bounds: 754@479 corner: 770@495 owner: a PasteUpMorph(1622) [world] submorphs: #() fullBounds: 754@479 corner: 770@495 color: Color blue extension: a MorphExtension (539) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [754@479 mouseUp 20587660 nil] targetOffset: 27@13 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 20587660 754 479 0 0 0 1) lastKeyScanCode: 5 combinedChar: nil HandMorph>>sendMouseEvent: Receiver: a HandMorph(3216) Arguments and temporary variables: anEvent: [442@390 mouseUp 14061207 nil] Receiver's instance variables: bounds: 754@479 corner: 770@495 owner: a PasteUpMorph(1622) [world] submorphs: #() fullBounds: 754@479 corner: 770@495 color: Color blue extension: a MorphExtension (539) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [754@479 mouseUp 20587660 nil] targetOffset: 27@13 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 20587660 754 479 0 0 0 1) lastKeyScanCode: 5 combinedChar: nil HandMorph>>handleEvent: Receiver: a HandMorph(3216) Arguments and temporary variables: anEvent: [442@390 mouseUp 14061207 nil] evt: [442@390 mouseUp 14061207 nil] ofs: nil Receiver's instance variables: bounds: 754@479 corner: 770@495 owner: a PasteUpMorph(1622) [world] submorphs: #() fullBounds: 754@479 corner: 770@495 color: Color blue extension: a MorphExtension (539) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [754@479 mouseUp 20587660 nil] targetOffset: 27@13 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 20587660 754 479 0 0 0 1) lastKeyScanCode: 5 combinedChar: nil HandMorph>>processEvents Receiver: a HandMorph(3216) Arguments and temporary variables: evt: [442@390 mouseUp 14061207 nil] evtBuf: #(1 14061207 442 390 0 0 0 1) type: 1 hadAny: false Receiver's instance variables: bounds: 754@479 corner: 770@495 owner: a PasteUpMorph(1622) [world] submorphs: #() fullBounds: 754@479 corner: 770@495 color: Color blue extension: a MorphExtension (539) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [754@479 mouseUp 20587660 nil] targetOffset: 27@13 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 20587660 754 479 0 0 0 1) lastKeyScanCode: 5 combinedChar: nil --- The full stack --- UTF8TextConverter(Object)>>error: UTF8TextConverter>>errorMalformedInput UTF8TextConverter>>nextFromStream: MultiByteFileStream>>next MultiByteFileStream(PositionableStream)>>nextChunk MultiByteFileStream(PositionableStream)>>nextChunkText [] in RemoteString>>text BlockClosure>>ensure: RemoteString>>text CompiledMethod>>getSourceFromFile CompiledMethod>>methodNode [] in DebuggerMethodMap class>>forMethod: WeakIdentityKeyDictionary(Dictionary)>>at:ifAbsent: DebuggerMethodMap class>>forMethod: CompiledMethod>>debuggerMap MethodContext(InstructionStream)>>debuggerMap Debugger>>selectedMessage Debugger>>contextStackIndex:oldContextWas: Debugger>>toggleContextStackIndex: Debugger>>debugAt: PluggableListMorph>>changeModelSelection: PluggableListMorph>>mouseUp: PluggableListMorph(Morph)>>handleMouseUp: MouseButtonEvent>>sentTo: PluggableListMorph(Morph)>>handleEvent: MorphicEventDispatcher>>dispatchDefault:with: MorphicEventDispatcher>>dispatchEvent:with: PluggableListMorph(Morph)>>processEvent:using: PluggableListMorph(Morph)>>processEvent: PluggableListMorph>>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: PasteUpMorph>>doOneCycle [] in Project class>>spawnNewProcess [] in BlockClosure>>newProcess >

May 15, 2009

Re: [Pharo-project] Pharo splash

by StÃ©phane Ducasse

Yeap we feel the pressure :) On May 15, 2009, at 3:12 PM, Damien Cassou wrote: > Thank you, I think that will be useful for the Pharo release. > > 2009/5/15 Torsten Bergmann <astares(a)gmx.de>: >> Sorry for bloating your mailbox but in case >> someone is in the need for a splash screen >> for presenting Pharo you will find one attached. >> >> Otherwise delete this mail. This is also in >> preparation of a Win32 setup bundle. >> >> On Win32 you can enable the splash using the >> Squeak/Pharo.ini file (see [1]) >> >> Thx >> T. >> >> [1] http://www.squeakvm.org/win32/settings.html >> >> -- >> Neu: GMX FreeDSL Komplettanschluss mit DSL 6.000 Flatrate + >> Telefonanschluss fÃ¼r nur 17,95 Euro/mtl.!* http://dslspecial.gmx.de/freedsl-surfflat/?ac=OM.AD.PD003K11308T4569a >> >> _______________________________________________ >> Pharo-project mailing list >> Pharo-project(a)lists.gforge.inria.fr >> http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project >> > > > > -- > Damien Cassou > http://damiencassou.seasidehosting.st > > "Lambdas are relegated to relative obscurity until Java makes them > popular by not having them." James Iry > > _______________________________________________ > Pharo-project mailing list > Pharo-project(a)lists.gforge.inria.fr > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project >

May 15, 2009

Re: [Pharo-project] style preserving for code file out ?

by StÃ©phane Ducasse

Plain text. if in the future people want to story hyperlink (which would be cool) it should be redone. Stef On May 15, 2009, at 4:48 PM, Alain Plantec wrote: > Hi all, > What is the usefulness of preserving code style for method logging ? > I personally always answer no when, while accepting some code, > I've to answer to "This method contains style for the first time (e.g. > bold or colored text). > Do you really want to save the style info?". > > Regarding the preferences to settings refactoring, > another way of asking this question would be "can I remove this > feature ?" > > Thanks > Alain > > > _______________________________________________ > Pharo-project mailing list > Pharo-project(a)lists.gforge.inria.fr > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project >

May 15, 2009

Re: [Pharo-project] Helping getting pharo license-clean

by StÃ©phane Ducasse

> Perhaps^^; :) > Does Pharo have ScaledDecimal and it is used? it ha but I do not know if this is used. > If so, that would be > the biggest piece that would be removed. There wouldn't be any > serious bugs that would cause major trouble otherwise. > >>> >>> I can help you after school gets out in a week. I need to >> do a quick count of how many lines of code need to be fixed in >> squeak for submission to SFLC. I can do the same for Pharo. I >> don't know how strenuous you want to be in your license >> conversion. > > What is the reason for Pharo to go with SFLC? I do not know. >> You should chat with Randal Schwartz about what you need to >> decide before you can start relicensing, and what you need to >> document in case your relicense needs to be reviewed in the >> future. Yoshiki and Juan did not do this and thus we have no >> evidence yet that Yoshiki's relicense is strong enough. > > There will be no such evidence. There will be no evidence for a > statement like "there is no white crow". Indeed I think that we should stop somewhere.

May 15, 2009

Re: [Pharo-project] Excluding classes from Test Coverage

by Mariano Martinez Peck

On Fri, May 15, 2009 at 6:27 PM, StÃ©phane Ducasse <stephane.ducasse(a)inria.fr > wrote: > from the wiki on google not the pharo web site which is for the > "marketing" > but isn't this marketing ? Most "marketing" websites have a FAQ section. > > Stef > On May 15, 2009, at 5:19 PM, Mariano Martinez Peck wrote: > > > > > > > On Fri, May 15, 2009 at 2:05 PM, Oscar Nierstrasz > > <oscar(a)iam.unibe.ch> wrote: > > > > Just checked in as > http://www.squeaksource.com/PharoInbox/SUnitGUI-onierstrasz.38.mcz > > > > Now you can declare classes to exclude from coverage analysis by > > defining #classNamesNotUnderTest on the class side of your test to > > return an array of names of those classes. > > > > http://scg.unibe.ch/wiki/faq/pharofaq/howToCheckTestCoverage > > > > > > Wow! I didn't know http://scg.unibe.ch/wiki/faq/pharofaq > > > > It is really useful!!! What about putting a link to it in > http://www.pharo-project.org/documentation/faq > > > > Best, > > > > Mariano > > > > > > > > - on > > > > > > _______________________________________________ > > Pharo-project mailing list > > Pharo-project(a)lists.gforge.inria.fr > > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project > > > > _______________________________________________ > > Pharo-project mailing list > > Pharo-project(a)lists.gforge.inria.fr > > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project > > > _______________________________________________ > Pharo-project mailing list > Pharo-project(a)lists.gforge.inria.fr > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project >

May 15, 2009

Re: [Pharo-project] vw inspired gui tool

by StÃ©phane Ducasse

Hi steve what is the difference with the explorer. If you want to have flash just send us a new menu for explorer? Stef On May 15, 2009, at 8:46 PM, Steve Wirts wrote: > Folks, > > Attached is a very simple gui tool inspired from a tool that used to > exist in VW smalltalk years ago. > I suspect it could be rewritten as a single function. Please > incorporate into Pharo if you think > it's useful. > > Steve > <ViewExplorer.st>_______________________________________________ > Pharo-project mailing list > Pharo-project(a)lists.gforge.inria.fr > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project

May 15, 2009

Re: [Pharo-project] Excluding classes from Test Coverage

by StÃ©phane Ducasse

from the wiki on google not the pharo web site which is for the "marketing" Stef On May 15, 2009, at 5:19 PM, Mariano Martinez Peck wrote: > > > On Fri, May 15, 2009 at 2:05 PM, Oscar Nierstrasz > <oscar(a)iam.unibe.ch> wrote: > > Just checked in as http://www.squeaksource.com/PharoInbox/SUnitGUI-onierstrasz.38.mcz > > Now you can declare classes to exclude from coverage analysis by > defining #classNamesNotUnderTest on the class side of your test to > return an array of names of those classes. > > http://scg.unibe.ch/wiki/faq/pharofaq/howToCheckTestCoverage > > > Wow! I didn't know http://scg.unibe.ch/wiki/faq/pharofaq > > It is really useful!!! What about putting a link to it in http://www.pharo-project.org/documentation/faq > > Best, > > Mariano > > > > - on > > > _______________________________________________ > Pharo-project mailing list > Pharo-project(a)lists.gforge.inria.fr > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project > > _______________________________________________ > Pharo-project mailing list > Pharo-project(a)lists.gforge.inria.fr > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project

May 15, 2009

Re: [Pharo-project] [ANN] 10305 and 10306

by StÃ©phane Ducasse

Oscar the update is a stream of cs the update list is then a list such as 10001... 10002.... 10010 each of these can be a simple cs (as in Squeak3.8) in 3.9 or pharo here is a typical CS "Postscript: Leave the line above, and replace the rest of this comment by a useful one. Executable statements should follow this comment, and should be separated by periods, with no exclamation points (!!). Be sure to put any further comments in double-quotes, like this one." |repository| repository := MCHttpRepository location: 'http://www.squeaksource.com/Pharo/' user: '' password: ''. (repository loadVersionFromFileNamed:'ScriptLoader-stephane_ducasse. 862.mcz') load. ScriptLoader new update10306. ! what you see is the that 10306 will invoke the method of scriptLoader that launches the loading of the corresponding MC package. Now you can see the changes by browsing the methods update10..... in the class ScriptLoader Stef

May 15, 2009

Re: [Pharo-project] Missing info in the change log

by StÃ©phane Ducasse

> > Hi, > > we realized (after pharo crash) that there are some code changes > > that are not save to the changes file. Most of the are related to > > dynamically defining the "change". > > Yes some are missing and the class definition in cs would be really > welcomed because doit for classdef is annoying. > > I agree, but it has one downsize. Juan Manuel did that on Cuis, but > then you can not port code from it to Pharo/Squeak. > Of course the answer could be "who cares", but just raising an > issue. Maybe having an option to turn on/off would be better until > all use the same format.. I know I checked Cuis. I think that this is should be done so that we can load code from pharo in other smalltalk. In general we should clean or rewrite the fileout code. > jeje, I'll see if I can help. I would suggest to think in terms of a complete new project to fileout code because when I see that code I often waht to run away.

May 15, 2009