September 2016 - Pharo-users

limits on number of instance variables and class variables
by Ben Coman Sept. 12, 2016

Sept. 12, 2016

Minor curiosity... I was wondering about the limits on the number of instance variables and class variables (particularly the latter regarding large FFI enumerations), so I produced a script to experiment with. Results: * Class Variables seem to have no practical limit. Although running 6C experiment a second time locks the image for about 3 minutes, but eventually completes. * Instance Variables limit is 255 or 256. This not clear since 256 works, but the error message** for 257 says the limit is 255. ** Error: genStorePopInstVarLong: index index 256 is out of range 0 to 255 cheers -ben Here is the fun script... "================================================" "The experiment has two parameters (select by changing the #at: index): _RANGE - Range of variables assigned. Note variables are declared starting from 0001. _TYPE - (i)instance variable or (C)lass variable" _RANGE := { 1->9. "1. code validation" 201->256. "2. instance variables limit" 201->257. "3. instance variables Error: genStorePopInstVarLong: index index 256 is out of range 0 to 255" 201->299. "4. class variables keep going" 901->999. "5. class variables go extreme" 9901->9999. "6. class variables go ultra extreme" } at: 1. _TYPE := { 'i'. "1. instance variables" 'C' "2. class variables" } at: 1. "Choose experiment parameters above" start := _RANGE key. end := _RANGE value. "DECLARE VARIABLES" vars := ''. 1 to: end do: [:n| vars := vars, _TYPE, (n printPaddedWith: $0 to: 4), ' ' ]. vars. Object subclass: #Test instanceVariableNames: ((_TYPE = 'i') ifTrue: [vars] ifFalse: [ '' ]) classVariableNames: ((_TYPE = 'C') ifTrue: [vars] ifFalse: [ '' ]) poolDictionaries: '' package: 'aaaa'. "First run needs to execute above separately to create the class referred below" "ASSIGN VARIABLES" body := ' '. start to: end do: [ :n| body := body , _TYPE, (n printPaddedWith: $0 to: 4), ':=' , n printString , '. ' ]. body. #Test asClass compile: 'assign ' , body. "INSPECT VARIABLES" body := ' ^{'. start to: end do: [ :n| body := body , _TYPE, (n printPaddedWith: $0 to: 4) , '. ' ]. body. Test compile: 'inspect ' , body , '} inspect'. Test new assign ; inspect.

2 1

Profiling
by Vitor Medina Cruz Sept. 10, 2016

Sept. 10, 2016

Hello, While profiling some I/O code that takes ~20 seconds to execute under my local image, the report says that about ~13 seconds is waste on OtherProcesses -> ProcessorScheduler class>>idleProcess. I could not understand what this idleProcess do by looking at the code. First I thought this could be time waiting the I/O operation to terminate, but that don't make much sense because I have the same code on a Digital Ocean Doplet and it takes ~6 seconds to execute. Can someone help me understand what does this time on idleProcess means? The full report is: - 18407 tallies, 18605 msec. **Tree** -------------------------------- Process: (40s) Morphic UI Process: nil -------------------------------- 25.1% {4663ms} UndefinedObject>>DoIt 25.1% {4663ms} TweetsServiceRestConsumer(TweetsService)>>hashesTop:usingLastTweetsUpTo:fromHandler: 25.0% {4656ms} TweetsServiceRestConsumer>>fetchLastTweetsUpTo:fromHandler: 14.3% {2653ms} OAuthProvider>>httpGet: |14.3% {2653ms} ZnOAuth1Service>>httpGet:using: | 14.3% {2653ms} ZnOAuth1Service>>executeRequest:token: | 14.3% {2653ms} ZnOAuth1Service>>executeRequest:token:followRedirects: | 14.2% {2646ms} ZnClient>>execute | 14.2% {2646ms} ZnClient>>withProgressDo: | 14.2% {2646ms} ZnSignalProgress class(DynamicVariable class)>>value:during: | 14.2% {2646ms} ZnSignalProgress(DynamicVariable)>>value:during: | 14.2% {2646ms} BlockClosure>>ensure: | 14.2% {2646ms} ZnSignalProgress(DynamicVariable)>>value:during: | 14.2% {2646ms} ZnClient>>withProgressDo: | 14.2% {2646ms} ZnClient>>execute | 14.2% {2646ms} ZnClient>>executeWithTimeout | 14.2% {2646ms} ZnClient>>withTimeoutDo: | 14.2% {2646ms} ZnConnectionTimeout class(DynamicVariable class)>>value:during: | 14.2% {2646ms} ZnConnectionTimeout(DynamicVariable)>>value:during: | 14.2% {2646ms} BlockClosure>>ensure: | 14.2% {2646ms} ZnConnectionTimeout(DynamicVariable)>>value:during: | 14.2% {2646ms} ZnClient>>withTimeoutDo: | 14.2% {2646ms} ZnClient>>executeWithTimeout | 14.2% {2646ms} BlockClosure>>on:do: | 14.2% {2646ms} ZnClient>>executeWithTimeout | 14.2% {2646ms} ZnClient>>executeWithRetriesRemaining: | 14.2% {2644ms} BlockClosure>>on:do: | 14.2% {2644ms} ZnClient>>executeWithRetriesRemaining: | 14.2% {2644ms} ZnClient>>executeWithRedirectsRemaining: | 14.2% {2641ms} ZnClient>>getConnectionAndExecute | 13.8% {2569ms} BlockClosure>>ensure: | 13.8% {2569ms} ZnClient>>getConnectionAndExecute | 13.8% {2569ms} ZnClient>>executeRequestResponse | 13.8% {2569ms} ZnClient>>readResponse | 13.8% {2569ms} ZnResponse class(ZnMessage class)>>readFrom: | 13.8% {2569ms} ZnResponse(ZnMessage)>>readFrom: | 13.8% {2559ms} ZnResponse>>readEntityFrom: | 13.8% {2559ms} ZnResponse(ZnMessage)>>readEntityFrom: | 13.8% {2559ms} ZnEntityReader>>readEntity | 13.8% {2559ms} ZnEntityReader>>readEntityFromStream | 13.7% {2555ms} ZnEntityReader>>readFrom:usingType:andLength: | 13.7% {2555ms} ZnEntity class>>readFrom:usingType:andLength: | 13.7% {2555ms} ZnStringEntity>>readFrom: | 13.7% {2550ms} BlockClosure>>on:do: | 13.7% {2550ms} ZnStringEntity>>readFrom: | 13.7% {2550ms} ZnUTF8Encoder>>readInto:startingAt:count:fromStream: | 13.7% {2550ms} ZnUTF8Encoder>>optimizedReadInto:startingAt:count:fromStream: | 13.7% {2550ms} ZnLimitedReadStream>>readInto:startingAt:count: | 13.7% {2547ms} ZdcSecureSocketStream(ZdcOptimizedSocketStream)>>readInto:startingAt:count: | 13.7% {2547ms} ZdcSecureSocketStream(ZdcSimpleSocketStream)>>fillReadBuffer | 9.0% {1669ms} ZdcSecureSocketStream(ZdcSimpleSocketStream)>>fillReadBuffer | |5.8% {1076ms} ZdcSecureSocketStream(ZdcSimpleSocketStream)>>fillReadBuffer | | |3.6% {671ms} ZdcSecureSocketStream(ZdcSimpleSocketStream)>>fillReadBuffer | | | |1.8% {337ms} ZdcSecureSocketStream(ZdcSimpleSocketStream)>>fillReadBuffer | | | | |1.2% {225ms} BlockClosure>>on:do: | | | | | 1.2% {225ms} ZdcSecureSocketStream(ZdcSimpleSocketStream)>>fillReadBuffer | | | | | 1.2% {225ms} ZdcSecureSocketStream(ZdcAbstractSocketStream)>>socketWaitForData | | | | | 1.2% {225ms} Socket>>waitForDataFor: | | | | | 1.2% {225ms} Socket>>waitForDataFor:ifClosed:ifTimedOut: | | | | | 1.2% {225ms} Semaphore>>waitTimeoutMSecs: | | | | | 1.2% {225ms} DelayWaitTimeout>>wait | | | | | 1.2% {225ms} BlockClosure>>ensure: | | | | | 1.2% {225ms} DelayWaitTimeout>>wait | | | | | 1.1% {196ms} DelayWaitTimeout(Delay)>>unschedule | | | | | 1.1% {196ms} DelayExperimentalSpinScheduler>>unschedule: | | | |1.8% {335ms} BlockClosure>>on:do: | | | | 1.8% {335ms} ZdcSecureSocketStream(ZdcSimpleSocketStream)>>fillReadBuffer | | | | 1.8% {335ms} ZdcSecureSocketStream(ZdcAbstractSocketStream)>>socketWaitForData | | | | 1.8% {335ms} Socket>>waitForDataFor: | | | | 1.8% {335ms} Socket>>waitForDataFor:ifClosed:ifTimedOut: | | | | 1.8% {335ms} Semaphore>>waitTimeoutMSecs: | | | | 1.8% {335ms} DelayWaitTimeout>>wait | | | | 1.8% {335ms} BlockClosure>>ensure: | | | | 1.8% {335ms} DelayWaitTimeout>>wait | | | | 1.5% {273ms} DelayWaitTimeout(Delay)>>unschedule | | | | 1.5% {273ms} DelayExperimentalSpinScheduler>>unschedule: | | |2.2% {405ms} BlockClosure>>on:do: | | | 2.2% {405ms} ZdcSecureSocketStream(ZdcSimpleSocketStream)>>fillReadBuffer | | | 2.2% {405ms} ZdcSecureSocketStream(ZdcAbstractSocketStream)>>socketWaitForData | | | 2.2% {405ms} Socket>>waitForDataFor: | | | 2.2% {405ms} Socket>>waitForDataFor:ifClosed:ifTimedOut: | | | 2.2% {405ms} Semaphore>>waitTimeoutMSecs: | | | 2.2% {405ms} DelayWaitTimeout>>wait | | | 2.2% {405ms} BlockClosure>>ensure: | | | 2.2% {405ms} DelayWaitTimeout>>wait | | | 1.7% {314ms} DelayWaitTimeout(Delay)>>unschedule | | | 1.7% {314ms} DelayExperimentalSpinScheduler>>unschedule: | |3.2% {592ms} BlockClosure>>on:do: | | 3.2% {592ms} ZdcSecureSocketStream(ZdcSimpleSocketStream)>>fillReadBuffer | | 3.2% {592ms} ZdcSecureSocketStream(ZdcAbstractSocketStream)>>socketWaitForData | | 3.2% {592ms} Socket>>waitForDataFor: | | 3.2% {592ms} Socket>>waitForDataFor:ifClosed:ifTimedOut: | | 3.2% {592ms} Semaphore>>waitTimeoutMSecs: | | 3.2% {592ms} DelayWaitTimeout>>wait | | 3.2% {592ms} BlockClosure>>ensure: | | 3.2% {592ms} DelayWaitTimeout>>wait | | 2.3% {429ms} DelayWaitTimeout(Delay)>>unschedule | | 2.3% {429ms} DelayExperimentalSpinScheduler>>unschedule: | 4.7% {876ms} BlockClosure>>on:do: | 4.7% {876ms} ZdcSecureSocketStream(ZdcSimpleSocketStream)>>fillReadBuffer | 4.7% {876ms} ZdcSecureSocketStream(ZdcAbstractSocketStream)>>socketWaitForData | 4.7% {876ms} Socket>>waitForDataFor: | 4.7% {876ms} Socket>>waitForDataFor:ifClosed:ifTimedOut: | 4.7% {876ms} Semaphore>>waitTimeoutMSecs: | 4.7% {876ms} DelayWaitTimeout>>wait | 4.7% {876ms} BlockClosure>>ensure: | 4.7% {876ms} DelayWaitTimeout>>wait | 2.9% {532ms} DelayWaitTimeout(Delay)>>unschedule | |2.9% {532ms} DelayExperimentalSpinScheduler>>unschedule: | 1.4% {268ms} primitives 10.8% {2002ms} NeoJSONObject class>>fromString: 10.8% {2002ms} NeoJSONReader>>next 10.8% {2002ms} NeoJSONReader>>parseValue 10.8% {2002ms} NeoJSONReader>>parseList 10.8% {2002ms} Array class(SequenceableCollection class)>>streamContents: 10.8% {2002ms} Array class(SequenceableCollection class)>>new:streamContents: 10.8% {2002ms} NeoJSONReader>>parseList 10.8% {2002ms} NeoJSONReader>>parseListElementsDo: 10.8% {2002ms} NeoJSONReader>>parseListDo: 10.8% {2002ms} NeoJSONReader>>parseListElementsDo: 10.8% {2002ms} NeoJSONReader>>parseValue 10.8% {2002ms} NeoJSONReader>>parseMap 10.8% {2002ms} NeoJSONReader>>parseMapKeysAndValuesDo: 10.8% {2002ms} NeoJSONReader>>parseMapKeysDo: 10.8% {2002ms} NeoJSONReader>>parseMapDo: 10.7% {1994ms} NeoJSONReader>>parseMapKeysDo: 9.6% {1785ms} NeoJSONReader>>parseMapKeysAndValuesDo: |9.2% {1717ms} NeoJSONReader>>parseValue | 8.6% {1600ms} NeoJSONReader>>parseMap | 8.6% {1600ms} NeoJSONReader>>parseMapKeysAndValuesDo: | 8.6% {1600ms} NeoJSONReader>>parseMapKeysDo: | 8.6% {1600ms} NeoJSONReader>>parseMapDo: | 8.5% {1577ms} NeoJSONReader>>parseMapKeysDo: | 6.4% {1187ms} NeoJSONReader>>parseMapKeysAndValuesDo: | |5.6% {1041ms} NeoJSONReader>>parseValue | | 3.8% {708ms} NeoJSONReader>>parseList | | 3.8% {706ms} Array class(SequenceableCollection class)>>streamContents: | | 3.8% {706ms} Array class(SequenceableCollection class)>>new:streamContents: | | 3.7% {693ms} NeoJSONReader>>parseList | | 3.7% {693ms} NeoJSONReader>>parseListElementsDo: | | 3.7% {693ms} NeoJSONReader>>parseListDo: | | 3.7% {689ms} NeoJSONReader>>parseListElementsDo: | | 3.7% {689ms} NeoJSONReader>>parseValue | | 3.7% {687ms} NeoJSONReader>>parseMap | | 3.7% {687ms} NeoJSONReader>>parseMapKeysAndValuesDo: | | 3.7% {687ms} NeoJSONReader>>parseMapKeysDo: | | 3.7% {687ms} NeoJSONReader>>parseMapDo: | | 3.6% {672ms} NeoJSONReader>>parseMapKeysDo: | | 3.0% {550ms} NeoJSONReader>>parseMapKeysAndValuesDo: | | 2.6% {486ms} NeoJSONReader>>parseValue | | 1.5% {285ms} NeoJSONReader>>parseMap | | 1.5% {285ms} NeoJSONReader>>parseMapKeysAndValuesDo: | | 1.5% {285ms} NeoJSONReader>>parseMapKeysDo: | | 1.5% {285ms} NeoJSONReader>>parseMapDo: | | 1.5% {285ms} NeoJSONReader>>parseMapKeysDo: | | 1.4% {252ms} NeoJSONReader>>parseMapKeysAndValuesDo: | | 1.3% {236ms} NeoJSONReader>>parseValue | | 1.0% {193ms} NeoJSONReader>>parseMap | | 1.0% {193ms} NeoJSONReader>>parseMapKeysAndValuesDo: | | 1.0% {193ms} NeoJSONReader>>parseMapKeysDo: | | 1.0% {188ms} NeoJSONReader>>parseMapDo: | 1.9% {347ms} NeoJSONReader>>parsePropertyName | 1.1% {196ms} NeoJSONReader>>parseValue | 1.0% {189ms} NeoJSONReader>>parseString 1.0% {189ms} NeoJSONReader>>parsePropertyName -------------------------------- Process: other processes -------------------------------- 73.2% {13628ms} ProcessorScheduler class>>startUp |73.2% {13628ms} ProcessorScheduler class>>idleProcess 1.4% {259ms} WeakArray class>>restartFinalizationProcess 1.4% {259ms} WeakArray class>>finalizationProcess 1.4% {257ms} primitives **Leaves** 73.3% {13631ms} ProcessorScheduler class>>idleProcess 10.0% {1861ms} DelayExperimentalSpinScheduler>>unschedule: 3.1% {581ms} DelayWaitTimeout>>wait 1.4% {257ms} WeakArray class>>finalizationProcess 1.0% {191ms} WeakSet>>scanFor: **Memory** old +16,777,216 bytes young -17,303,480 bytes used -526,264 bytes free +17,303,480 bytes **GCs** full 1 totalling 247ms (1.0% uptime), avg 247.0ms incr 127 totalling 199ms (1.0% uptime), avg 2.0ms tenures 480,033 (avg 0 GCs/tenure) root table 0 overflows Thanks in advance, Vitor

5 10

Porting TalkFFI / LibClang to Pharo 5 UFFI
by Ben Coman Sept. 10, 2016

Sept. 10, 2016

Looks like I've been reinventing the wheel making an FFI interface to libclang. I just bumped into Ciprian's TalkFFI which provides a NativeBoost interface to libclang (and was used to create libgit2 bindings) * https://rochiamaya.wordpress.com/2013/07/30/create-bindings-with-talkffi/ * http://smalltalkhub.com/#!/~CipT/TalkFFI * http://smalltalkhub.com/#!/~CipT/LibClang But it is NativeBoost based and the Configuration loads AsmJit and NativeBoost packages, which seems to lock up while "Initializing Nativeboost." What is involved in porting TalkFFI to Pharo 5.0 UFFI? For a start, these can be manually load no problem... LibClang-FFI-Types-CiprianTeodorov.2 LibClang-Tests-CiprianTeodorov.5 LibClang-Examples-CiprianTeodorov.2 but loading LibClang-FFI-Binding-CiprianTeodorov.1 reports "This package depends on the following classes: CLLibraryMap CLExternalLibraryWrapper You must resolve these dependencies before you will be able to load these definitions: CXIndexH" which I found these in TalkFFI-Runtime-CiprianTeodorov.7, but loading this reports "This package depends on the following classes: NBExternalLibraryWrapper You must resolve these dependencies before you will be able to load these definitions: CLExternalLibraryWrapper which I see is in Pharo 4.0 and not Pharo 5.0. So what is the replacement for NBExternalLibraryWrapper? What are the other general patterns for porting NativeBoost apps to UFFI? cheers -ben

1 1

[ANN] Dr. Geo release 16.10a
by Hilaire Sept. 10, 2016

Sept. 10, 2016

Dear Pharo fellows, I am proud to announce release 16.10a of Dr. Geo. It comes with the usual bug fixes and a new French programming API for French speaking kids: programmed sketch can be written in French Smalltalk! Read more at http://www.drgeo.eu/news/drgeo1610release Hilaire -- Dr. Geo http://drgeo.eu

1 0

Adopting someone else's image
by Siemen Baader Sept. 10, 2016

Sept. 10, 2016

Hi, I am having a problem using an image that was saved by a different user on a different machine. I'm trying to get started with PharoJS and have downloaded the Pharo 4.0 image from https://pharojs.github.io/faq.html#demoEsug2016. When I load the image Spotter raises errors becasue it holds on to a FileSystem object that holds a path within the previous user's local home directory. When I use Montichello browser to export the packages I need to disk or online repository, I get Error: RemoteString past end of file errors - I think this is because Montichello tries to read the changes file and cannot. What can I do? Is there a proper way to re-initialize the host dependent state when taking over someone else's image? I know the preferred way to share code without state is to use Montichello... thanks -- View this message in context: http://forum.world.st/Adopting-someone-else-s-image-tp4914933.html Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.

2 2

arrays with FFI structs
by Ben Coman Sept. 10, 2016

Sept. 10, 2016

Are arrays within structs handled? I have a C type declaration... typedef struct { enum CXCursorKind kind; int xdata; const void *data[3]; } CXCursor; which for the moment I've simplified the enum and defined... FFIExternalStructure subclass: #CXCursor instanceVariableNames: '' classVariableNames: '' package: 'Libclang' CXCursor class >> fieldsDesc "self rebuildFieldAccessors" ^ #( int kind; int xdata; void *data[3]; ) an evaluated... CXCursor rebuildFieldAccessors but it produces... Error: Unable to resolve external type: [ So it seems arrays inside structs are currently not handled ? Now I read the typedef as "data is an array of three pointers to void", so how likely is it for something like this to work... CXCursor class >> fieldsDesc "self rebuildFieldAccessors" ^ #( int kind; int xdata; void *data1; void *data2; void *data3; ) I'll experiment some more in the meantime. cheers -ben

3 5

[SCREENCAST] Creating GUIs with Pharo
by Dimitris Chloupis Sept. 9, 2016

Sept. 9, 2016

So as I promised tonight I will share a live screencast about creating GUIs with Pharo, that includes UIManager , Morphic and a bit of Spec. The focus will be mainly Morphic that I am more familiar with. The place is my twitch channel https://www.twitch.tv/kilonalios You dont need an account to watch but if you want to chat with me live during the screencast you do. I will be checking Discord chat as well. The time is 22:00 local time (Athens, Greece) which is 20:00 GMT (including +1 hour summer time) which is 19:00 UTC (no +1 hour summer time) there is also a countdown here https://www.timeanddate.com/countdown/launch?iso=20160909T22&p0=26&msg=%5BS… After the screencast I will be in the Discord channel for questions and ideas , you can get an invite here https://discord.gg/F6nAd If you are unable to attend , Twitch makes screencasts available online to watch any time its convenient for you See you then, have fun :)

3 5

Re: [Pharo-users] SpecBooklet: Strange behavior of ProtocolBrowser
by Johan Fabry Sept. 9, 2016

Sept. 9, 2016

Hello Matteo, are you using the ProtocolBrowser class that comes default with Pharo 5? (In the Spec-Examples package). This is different from what is in the booklet, the code in Pharo 5 is not up to date. For now, you should define a new protocol browser class (MyProtocolBrowser for example) and the other classes that are in that section. Sorry for that... -- Does this mail seem too brief? Sorry for that, I donât mean to be rude! Please see http://emailcharter.org <http://emailcharter.org/> . Johan Fabry - http://pleiad.cl/~jfabry PLEIAD and RyCh labs - Computer Science Department (DCC) - University of Chile > On Sep 7, 2016, at 18:57, Matteo via Pharo-users <pharo-users(a)lists.pharo.org> wrote: > > > From: Matteo <matteob8(a)yahoo.it> > Subject: SpecBooklet: Strange behavior of ProtocolBrowser > Date: September 7, 2016 at 18:56:08 GMT-3 > To: pharo-users(a)lists.pharo.org > > > Hi, > I'm playing with the ProtocolBrowser class, as coded in the > "SpecBooklet.pdf" document (release of the 3rd August 2016). > I'm using Pharo 5. > > I'm experiencing a strange behavior of the ProtocolBrowser instance: > -if I open a ProtocolBrowser instance, and I click on a "api" item, I > do not get any code in the text pane. > -If I open another ProtocolBrowser instance then I do not see any code, > even in the "api" protocol than the "api-events" one. > -If I open a further instance then the widget works correctly, showing > the "api" or "api-events" code in the text pane. > > Please note that the ProtocolBrowser is instantiated as follow: > (ProtocolBrowser new) openWithSpec > > Could my Pharo image be faulty? > Is there some problem with ProtocolBrowser>>initializePresenter? > > Thanks, > Matteo Bellotto > > > > >

3 9

Performance vs Ruby performance
by Vitor Medina Cruz Sept. 9, 2016

Sept. 9, 2016

Hello, How is Pharo compared with Ruby in terms of performance? Has someone done some comparison benchmark? If yes, that was done with other platforms? Regards, VItor

3 3

Spec Text Emphasis
by Sean P. DeNigris Sept. 9, 2016

Sept. 9, 2016

Is there a way to change the emphasis of Spec text (TextModel/TextInputModel, or even LabelModel - I would trade edit-ability for styling)? The following successfully added the attribute to the text, but it didn't display in Spec: checkbox whenActivatedDo: [ self textModel text: (self textModel text addAttribute: TextEmphasis struckOut) ]. Thanks! ----- Cheers, Sean -- View this message in context: http://forum.world.st/Spec-Text-Emphasis-tp4913688.html Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.

3 8