- Pharo-dev - lists.pharo.org

IdentitySet>>collect:
by Eliot Miranda Nov. 29, 2014

Nov. 29, 2014

Hi All, IdentitySet>>collect: answers a Set, not an IdentitySet. Anyone else agree this is a serious bug? Anyone else disagree? WTF?? (IdentitySet withAll: #(1 2 3 1.0 2.0 3.0)) collect: [:e| e] a Set(1.0 2 3) -- best, Eliot

5 7

Fix wikipedia article
by Sebastian Sastre Nov. 28, 2014

Nov. 28, 2014

Hi guys, Just a heads upâ¦ This is asking for a fix: http://en.wikipedia.org/wiki/Pure_(programming_language) <http://en.wikipedia.org/wiki/Pure_(programming_language)> LISP and Self and Smalltalk people should add their voice there Unleash your nerd :)

2 2

[pharo-project/pharo-core]
by GitHub Nov. 28, 2014

Nov. 28, 2014

Branch: refs/tags/40390 Home: https://github.com/pharo-project/pharo-core

1 0

[pharo-project/pharo-core] b0326f: 40390
by GitHub Nov. 28, 2014

Nov. 28, 2014

Branch: refs/heads/4.0 Home: https://github.com/pharo-project/pharo-core Commit: b0326f5e79a6040644317b02654b5d1a5991261e https://github.com/pharo-project/pharo-core/commit/b0326f5e79a6040644317b02… Author: Jenkins Build Server <board(a)pharo-project.org> Date: 2014-11-28 (Fri, 28 Nov 2014) Changed paths: M Growl.package/GrowlMorph.class/class/settings/growlSettingsOn_.st R NautilusRefactoring.package/CodeCriticBrowser.class/README.md R NautilusRefactoring.package/CodeCriticBrowser.class/class/specs/defaultSpec.st R NautilusRefactoring.package/CodeCriticBrowser.class/class/specs/title.st R NautilusRefactoring.package/CodeCriticBrowser.class/class/specs/topSpec.st R NautilusRefactoring.package/CodeCriticBrowser.class/definition.st R NautilusRefactoring.package/CodeCriticBrowser.class/instance/accessing/environment.st R NautilusRefactoring.package/CodeCriticBrowser.class/instance/accessing/environment_.st R NautilusRefactoring.package/CodeCriticBrowser.class/instance/accessing/listModel1.st R NautilusRefactoring.package/CodeCriticBrowser.class/instance/accessing/listModel1_.st R NautilusRefactoring.package/CodeCriticBrowser.class/instance/accessing/listModel2.st R NautilusRefactoring.package/CodeCriticBrowser.class/instance/accessing/listModel2_.st R NautilusRefactoring.package/CodeCriticBrowser.class/instance/accessing/listModel3.st R NautilusRefactoring.package/CodeCriticBrowser.class/instance/accessing/listModel3_.st R NautilusRefactoring.package/CodeCriticBrowser.class/instance/accessing/process.st R NautilusRefactoring.package/CodeCriticBrowser.class/instance/accessing/process_.st R NautilusRefactoring.package/CodeCriticBrowser.class/instance/accessing/status.st R NautilusRefactoring.package/CodeCriticBrowser.class/instance/accessing/status_.st R NautilusRefactoring.package/CodeCriticBrowser.class/instance/accessing/textModel.st R NautilusRefactoring.package/CodeCriticBrowser.class/instance/accessing/textModel_.st R NautilusRefactoring.package/CodeCriticBrowser.class/instance/initialization/initializePresenter.st R NautilusRefactoring.package/CodeCriticBrowser.class/instance/initialization/initializeWidgets.st R NautilusRefactoring.package/CodeCriticBrowser.class/instance/processing/basicSearch_.st R NautilusRefactoring.package/CodeCriticBrowser.class/instance/protocol/rules_.st M NautilusRefactoring.package/NautilusRefactoring.class/instance/class/removeClasses_.st M NautilusRefactoring.package/NautilusRefactoring.class/instance/option/selectVariableToMoveMethodTo_class_.st M NautilusRefactoring.package/NautilusRefactoring.class/instance/private-method/privateDeprecateMethodFor_.st R NautilusRefactoring.package/extension/TClassDescription/instance/renameMethodAllItem_.st A ScriptLoader40.package/ScriptLoader.class/instance/pharo - scripts/script390.st A ScriptLoader40.package/ScriptLoader.class/instance/pharo - updates/update40390.st M ScriptLoader40.package/ScriptLoader.class/instance/public/commentForCurrentUpdate.st A Traits.package/TClassDescription.class/instance/as yet unclassified/renameMethodAllItem_.st Log Message: ----------- 40390 14544 tiny code critique cleanup of NautilusRefactoring https://pharo.fogbugz.com/f/cases/14544 14543 Pharo4.0 settings do have Appearance and appearance (twice the entries that is) https://pharo.fogbugz.com/f/cases/14543 http://files.pharo.org/image/40/40390.zip

1 0

7350 window drag ghosting while progress bar is moving
by Ben Coman Nov. 28, 2014

Nov. 28, 2014

A while ago I logged an issue "window drag ghosting while progress bar is moving" [1] - but I haven't noticed this for a long time. Before I close it, has anyone had any similar problems with Pharo 4 ? [1] https://pharo.fogbugz.com/default.asp?7350 cheers -ben

2 1

Problem with input of localized characters by Michal
by lb Nov. 28, 2014

Nov. 28, 2014

Hiï¼Michal I used Pharo 3 or 4 and happened to the similar problem, l found: (Pls notice the Bold Part) HandMorph>>generateKeyboardEvent: evtBuf "Generate the appropriate mouse event for the given raw event buffer" | buttons modifiers type pressType stamp charCode keyValue keyEvent | stamp := evtBuf second. stamp = 0 ifTrue: [stamp := Time millisecondClockValue]. pressType := evtBuf fourth. pressType = EventKeyDown ifTrue: [ type := #keyDown. lastKeyScanCode := evtBuf third]. pressType = EventKeyUp ifTrue: [type := #keyUp]. pressType = EventKeyChar ifTrue: [ type := #keystroke]. modifiers := evtBuf fifth. buttons := modifiers bitShift: 3. keyValue := evtBuf third. charCode := evtBuf sixth. "Adjustments to provide consistent key value data for different VM's : - charCode always contains unicode code point. - keyValue contains 0 if input is outside legacy range " "If there is no unicode data in the event, assume keyValue contains a correct (<256) Unicode codepoint, and use that" (charCode isNil or: [charCode = 0]) ifTrue: [charCode := keyValue]. "If charCode is not single-byte, we definately have Unicode input. Nil keyValue to avoid garbage values from some VMs." charCode > 255 ifTrue: [keyValue := 0]. type = #keystroke ifTrue: [combinedChar ifNil: [ | peekedEvent | peekedEvent := Sensor peekEvent. (peekedEvent notNil and: [peekedEvent fourth = EventKeyDown]) ifTrue: [ (CombinedChar isCompositionCharacter: charCode) ifTrue: [ combinedChar := CombinedChar new. combinedChar simpleAdd: charCode asCharacter. (combinedChar combinesWith: peekedEvent third asCharacter) ifTrue: [^nil]. ]]] ifNotNil: [ (combinedChar simpleAdd: charCode asCharacter) ifTrue: [charCode := combinedChar combined charCode]. combinedChar := nil]]. self flag: #fixme. "This piece of code handles the creation of scrolling events. When a scroll is done by the user, the VM forwards a keystroke event with the up/down key. So we reconvert it to a MouseWheelEvent in that case." (type = #keystroke and: [(buttons anyMask: 16) and: [charCode = 30 or: [charCode = 31]]]) ifTrue: [^MouseWheelEvent new setType: #mouseWheel position: lastMouseEvent cursorPoint direction: (charCode = 30 ifTrue: [#up] ifFalse: [#down]) buttons: buttons hand: self stamp: stamp]. keyEvent := KeyboardEvent new setType: type buttons: buttons position: self position keyValue: keyValue charCode: charCode hand: self stamp: stamp. keyEvent scanCode: lastKeyScanCode. ^keyEvent MayBe it works. Have a fun! BingLiang

2 1

editing the default window size of glamour inspector
by ClÃ©ment Bera Nov. 28, 2014

Nov. 28, 2014

Hello, I would like for specific objects to change the default window size of the glamour inspector (Basically a bigger window will be opened by default for these objects). This is because I extended my inspectors to provide roassal visualization that are quite large. How can I do it ? For example I would like something like that: MyObject>>#gtInitialWindowExtent < gtInitialWindowExtent > ^ 800@1000 Clement

5 9

Re: [Pharo-dev] Problem with input of localized characters by Michal
by lb Nov. 28, 2014

Nov. 28, 2014

Hiï¼Michal I used Pharo 3 or 4 in Windows and happened to the similar problem, l found: (Notice the Bold Part) HandMorph>>generateKeyboardEvent: evtBuf "Generate the appropriate mouse event for the given raw event buffer" | buttons modifiers type pressType stamp charCode keyValue keyEvent | stamp := evtBuf second. stamp = 0 ifTrue: [stamp := Time millisecondClockValue]. pressType := evtBuf fourth. pressType = EventKeyDown ifTrue: [ type := #keyDown. lastKeyScanCode := evtBuf third]. pressType = EventKeyUp ifTrue: [type := #keyUp]. pressType = EventKeyChar ifTrue: [ type := #keystroke]. modifiers := evtBuf fifth. buttons := modifiers bitShift: 3. keyValue := evtBuf third. charCode := evtBuf sixth. "Adjustments to provide consistent key value data for different VM's : - charCode always contains unicode code point. - keyValue contains 0 if input is outside legacy range " "If there is no unicode data in the event, assume keyValue contains a correct (<256) Unicode codepoint, and use that" (charCode isNil or: [charCode = 0]) ifTrue: [charCode := keyValue]. "If charCode is not single-byte, we definately have Unicode input. Nil keyValue to avoid garbage values from some VMs." charCode > 255 ifTrue: [keyValue := 0]. type = #keystroke ifTrue: [combinedChar ifNil: [ | peekedEvent | peekedEvent := Sensor peekEvent. (peekedEvent notNil and: [peekedEvent fourth = EventKeyDown]) ifTrue: [ (CombinedChar isCompositionCharacter: charCode) ifTrue: [ combinedChar := CombinedChar new. combinedChar simpleAdd: charCode asCharacter. (combinedChar combinesWith: peekedEvent third asCharacter) ifTrue: [^nil]. ]]] ifNotNil: [ (combinedChar simpleAdd: charCode asCharacter) ifTrue: [charCode := combinedChar combined charCode]. combinedChar := nil]]. self flag: #fixme. "This piece of code handles the creation of scrolling events. When a scroll is done by the user, the VM forwards a keystroke event with the up/down key. So we reconvert it to a MouseWheelEvent in that case." (type = #keystroke and: [(buttons anyMask: 16) and: [charCode = 30 or: [charCode = 31]]]) ifTrue: [^MouseWheelEvent new setType: #mouseWheel position: lastMouseEvent cursorPoint direction: (charCode = 30 ifTrue: [#up] ifFalse: [#down]) buttons: buttons hand: self stamp: stamp]. keyEvent := KeyboardEvent new setType: type buttons: buttons position: self position keyValue: keyValue charCode: charCode hand: self stamp: stamp. keyEvent scanCode: lastKeyScanCode. ^keyEvent MayBe it works. Have a fun! BingLiang

1 0

Reï¼Problem with input of localized characters
by lb Nov. 28, 2014

Nov. 28, 2014

Hiï¼Michal I used Pharo 3 or 4 and happened to simmilar problem, l found: (Pls notice the Bold Part) HandMorph>>generateKeyboardEvent: evtBuf "Generate the appropriate mouse event for the given raw event buffer" | buttons modifiers type pressType stamp charCode keyValue keyEvent | stamp := evtBuf second. stamp = 0 ifTrue: [stamp := Time millisecondClockValue]. pressType := evtBuf fourth. pressType = EventKeyDown ifTrue: [ type := #keyDown. lastKeyScanCode := evtBuf third]. pressType = EventKeyUp ifTrue: [type := #keyUp]. pressType = EventKeyChar ifTrue: [ type := #keystroke]. modifiers := evtBuf fifth. buttons := modifiers bitShift: 3. keyValue := evtBuf third. charCode := evtBuf sixth. "Adjustments to provide consistent key value data for different VM's : - charCode always contains unicode code point. - keyValue contains 0 if input is outside legacy range " "If there is no unicode data in the event, assume keyValue contains a correct (<256) Unicode codepoint, and use that" (charCode isNil or: [charCode = 0]) ifTrue: [charCode := keyValue]. "If charCode is not single-byte, we definately have Unicode input. Nil keyValue to avoid garbage values from some VMs." charCode > 255 ifTrue: [keyValue := 0]. type = #keystroke ifTrue: [combinedChar ifNil: [ | peekedEvent | peekedEvent := Sensor peekEvent. (peekedEvent notNil and: [peekedEvent fourth = EventKeyDown]) ifTrue: [ (CombinedChar isCompositionCharacter: charCode) ifTrue: [ combinedChar := CombinedChar new. combinedChar simpleAdd: charCode asCharacter. (combinedChar combinesWith: peekedEvent third asCharacter) ifTrue: [^nil]. ]]] ifNotNil: [ (combinedChar simpleAdd: charCode asCharacter) ifTrue: [charCode := combinedChar combined charCode]. combinedChar := nil]]. self flag: #fixme. "This piece of code handles the creation of scrolling events. When a scroll is done by the user, the VM forwards a keystroke event with the up/down key. So we reconvert it to a MouseWheelEvent in that case." (type = #keystroke and: [(buttons anyMask: 16) and: [charCode = 30 or: [charCode = 31]]]) ifTrue: [^MouseWheelEvent new setType: #mouseWheel position: lastMouseEvent cursorPoint direction: (charCode = 30 ifTrue: [#up] ifFalse: [#down]) buttons: buttons hand: self stamp: stamp]. keyEvent := KeyboardEvent new setType: type buttons: buttons position: self position keyValue: keyValue charCode: charCode hand: self stamp: stamp. keyEvent scanCode: lastKeyScanCode. ^keyEvent MayBe it woks. Have a fun! BingLiang

1 0

OSX 10.9 PharoVM build failure workarounds
by Ben Coman Nov. 28, 2014

Nov. 28, 2014

I followed the instructions at https://github.com/pharo-project/pharo-vm to build the Pharo VM. In generator.image I evaluated... PharoVMBuilder buildMacOSX32. then cd ../build bash build.sh After cmake finished its checks, it tried to compile freetype (2.4.9) but gets errors... *Generating /Users/ben/Repos/pharo-vm/results/Pharo.app/Contents/MacOS/Plugins/libfreetype.6.dylib* clang: warning: no such sysroot directory: '/Applications/Xcode.app/Contents/Developer/Platforms/MacOSX.platform/Developer/SDKs/MacOSX10.6.sdk' **fatal error: **'math.h' file not found* And indeed, I don't have ../MacOSX.platform/Developer/SDKs/MacOSX10.6.sdk I have ../MacOSX.platform/Developer/SDKs/MacOSX10.9.sdk So updating CMakeLists.txt as follows... + set(CMAKE_OSX_DEPLOYMENT_TARGET 10.9) + set(CMAKE_OSX_SYSROOT /Applications/Xcode.app/Contents/Developer/Platforms/MacOSX.platform/Developer/SDKs/MacOSX10.9.sdk) - set(CMAKE_OSX_DEPLOYMENT_TARGET 10.5) - set(CMAKE_OSX_SYSROOT /Applications/Xcode.app/Contents/Developer/Platforms/MacOSX.platform/Developer/SDKs/MacOSX10.6.sdk) allowed the build to progress further. ========= Then the build failed getting "too many errors" that looked somewhat like this... /Users/ben/Repos/pharo-vm/platforms/iOS/vm/OSX/sqSqueakOSXOpenGLView.m:208:18: error: use of undeclared identifier 'GL_TEXTURE_RECTANGLE_ARB' glTexParameteri(GL_TEXTURE_RECTANGLE_ARB, GL_TEXTURE_MIN_FILTER, GL_NEAREST); Tracked down a likely suspect here... https://codereview.chromium.org/587193005/diff/1/content/browser/compositor… And indeed editing... platforms/iOS/vm/OSX/sqSqueakOSXOpenGLView.m to add... #import <OpenGL/gl.h> gave me a working VM. ========= Should I log these somewhere ? cheers -ben

4 11