June 2018 - Pharo-users - lists.pharo.org

Re: [Pharo-users] NeoJSON extension - easier list handling with NeoJSONPropertyMapping

by Ben Coman

On 17 June 2018 at 02:47, Sven Van Caekenberghe <sven(a)stfx.eu> wrote: > Hmm, Ben, > > Did you see NeoJSONCustomMapping's mapping method category ? > There you can already find #listOfElementSchema: #listOfType: #listOfType:andElementSchema: as well as #mapWithValueSchema: > Yes. Indeed thats where I copied my selector naming from, although I switched "with" for ''and" NeoJSONPropertyMapping >> listOfType:withElementSchema: However NeoJSONCustomMappings seems only accessible through "reader for: ... customDo: " while instance variable interaction seems only possible using "reader for: ... do:" So it seems NeoJSONCustomMapping lacks #mapAccessor* methods while NeoJSONObjectMapping lacks #listOfType:* methods and "never the twain shall meet". I didn't look closely at #mapWithValueSchema: but its covering tests seem to operate on Dictionaries rather than Arrays. > I am guessing they do what you want, no ? Or am I missing something as > well ? > Yes, but how to mix those list* methods with poking the result into an instance variable to be able to "assign a list of elements to an instance variable" as a one liner? I'd be glad to be shown another way to do this for the given data. I see a few #testLists examples, but none that assign the result to an instance variable. NeoJSONExamplesTests has some "lists of objects" tests, but no "objects with lists" A useful example would be #testPolygonPoints... NeoJSONExamplesTests >> testPolygonPoints | polygon polygonJson result | polygon := Polygon new vertices: { 1@2. 3@4. 5@6 }. polygonJson := '{ "vertices": [ "I'm not clear on how to do the writer side of things" { "x" : 1, "y" : 2 }, { "x" : 3, "y" : 4 }, { "x" : 5, "y" : 6 }] }'. result := (NeoJSONReader on: polygonJson readStream) mapInstVarsFor: Point; for: Polygon do: [ :mapping | (mapping mapInstVar: #vertices) listOfType: Array withElementSchema: Point]; nextAs: Polygon. self assert: result equals: polygon Some equality support is needed for Polygon (PathShape) (my best guess, discussion of this might be worth a separate thread) PathShape >> = aPathShape |otherVertices equal| otherVertices := aPathShape vertices. (self species = aPathShape species) & (vertices size = otherVertices size) ifFalse: [ ^false ]. 1 to: vertices size do: [ :i | (vertices at: i) = (otherVertices at: i) ifFalse: [^false] ]. ^true PathShape >> hash |hash| hash := 0. 1 to: vertices size do: [ :i | hash bitXor: (vertices at: i) ]. ^hash cheers -ben > > Sven > > > On 16 Jun 2018, at 20:27, Ben Coman <btc(a)openinworld.com> wrote: > > > > hi Sven, > > > > With NeoJSON I have found several times in handling lists that > > I need to indirect through #for:customDo: like this...... > > > > reader > > for: ExercismProblems > > do: [ :mapping | > > self halt. > > (mapper mapInstVar: #problems) valueSchema: > #ArrayOfProblems ]. > > reader > > for: #ArrayOfProblems > > customDo: [ :mapping | > > mapper listOfElementSchema: ExercismProblem ]. > > > > > > when I'd really like to be simpler and more concise like this... > > > > reader > > for: ExercismProblems > > do: [ :mapping | > > (mapping mapInstVar: #problems) listOfType: Array > withElementSchema: ExercismProblem ]. > > > > so I'm seeking your feedback on the following hack which facilitates > that. > > (and if I missed something that already makes it simpler) > > > cheers -ben

June 17, 2018

Re: [Pharo-users] Windows installation broken?

by HernÃ¡n Morales Durand

It is broken. I always use the ZeroConf CLI through wget or curl. Cheers, Hernan El dom., 17 jun. 2018 a las 0:40, horrido (<horrido.hobbies(a)gmail.com>) escribiÃ³: > > Someone told me that they had difficulties installing Pharo under Windows. So > I had to see for myself. > > I booted my Mac mini into Windows 7 Ultimate (using Boot Camp), downloaded > and installed Pharo Launcher. > > That person was indeed correct. The Windows version of Pharo is badly > broken. I created images for Pharo 5.0, 6.1, and 7.0, and all three refused > to open (presumably, they just crash). > > Am I missing something? What am I doing wrong? > > > > -- > Sent from: http://forum.world.st/Pharo-Smalltalk-Users-f1310670.html >

June 17, 2018

Re: [Pharo-users] Windows installation broken?

by Travis Ayres

The launcher is broken for me as well. On Sat, Jun 16, 2018 at 8:40 PM, horrido <horrido.hobbies(a)gmail.com> wrote: > Someone told me that they had difficulties installing Pharo under Windows. > So > I had to see for myself. > > I booted my Mac mini into Windows 7 Ultimate (using Boot Camp), downloaded > and installed Pharo Launcher. > > That person was indeed correct. The Windows version of Pharo is badly > broken. I created images for Pharo 5.0, 6.1, and 7.0, and all three refused > to open (presumably, they just crash). > > Am I missing something? What am I doing wrong? > > > > -- > Sent from: http://forum.world.st/Pharo-Smalltalk-Users-f1310670.html > >

June 17, 2018

Windows installation broken?

by horrido

Someone told me that they had difficulties installing Pharo under Windows. So I had to see for myself. I booted my Mac mini into Windows 7 Ultimate (using Boot Camp), downloaded and installed Pharo Launcher. That person was indeed correct. The Windows version of Pharo is badly broken. I created images for Pharo 5.0, 6.1, and 7.0, and all three refused to open (presumably, they just crash). Am I missing something? What am I doing wrong? -- Sent from: http://forum.world.st/Pharo-Smalltalk-Users-f1310670.html

June 17, 2018

Re: [Pharo-users] Smalltalk Programming Competition

by Tim Mackinnon

I donât think it would make Cincom and instantiations unhappy - they recognise how Pharo and Oss feed an interesting pipeline - if you need more support or just commercial backing, they can offer that (not that Pharo canât - but itâs a handy symbiotic relationship that seems to work well) Tim Sent from my iPhone > On 17 Jun 2018, at 00:12, horrido <horrido.hobbies(a)gmail.com> wrote: > > FYI, I am trying to jumpstart a Smalltalk programming competition. Read all > about it here. > <https://medium.com/@richardeng/smalltalk-programming-competition-2be77cab0e…> > > My plan is to use Pharo for this competition, even if it makes companies > like Cincom and Instantiations unhappy. > > Any support this competition can receive would be greatly appreciated. > > > > -- > Sent from: http://forum.world.st/Pharo-Smalltalk-Users-f1310670.html >

June 17, 2018

Re: [Pharo-users] Tonel Fileout

by Tim Mackinnon

Not quite the same usecase . But on github itâs a brilliant format for a side project - I can hack code on the tube on my phone with a build ci server to report the results when I surface (very lazy programming, but with a family and limited time - needs must) . Tim Sent from my iPhone > On 16 Jun 2018, at 22:10, Esteban Lorenzano <estebanlm(a)gmail.com> wrote: > > > >> On 16 Jun 2018, at 16:38, Ben Coman <btc(a)openinworld.com> wrote: >> >> Le 16/06/2018 Ã 10:43, Ben Coman a Ã©crit : >>> How can a fileout/filein be done using Tonel format? >>> In the first case as a script? >>> and secondly as a possible menu option for Pharo? >>> >>> This is to facilitate transfer of student coding exercises for Exercism. >>> http://exercism.io/languages/pharo/launch >>> >>> Could Tonel handle a full package export in one file? >> >>> On 16 June 2018 at 17:13, Hilaire <hilaire(a)drgeo.eu> wrote: >>> Hi Ben, >>> >>> I am not sure, but the purpose of Tonel is to propose a file representation of "one class=one file". >> >> Sure thats how Tonel came about, and its how we mostly use it, but is this an inherent limitation? > > no. > in fact, Martin McClure is working to make tonel available to work on file-per-package and even file-per-method again. In general, we do not want one or the other, but there are certain contexts where those can be useful. > >> Each method is prefixed with its class, so from my 100ft viewpoint it seems feasible to transport a whole package in one Tonel file. >> >> >>> Why not using Fileout st files to transfer the code? >> >> The same question might be asked why Iceberg didn't just use a Fileout at class level > > well, while file-out is good, we want to use Tonel format also to file-out and file-in. Not a replacement but an addition. Because the format is more readable, is sometimes more suitable for exchange too. > > cheers, > Esteban > >> . >> The Tonel format is more readable, especially minus the scattering of exclamation marks. >> >> I also meant to ask, what methods are used to file-in a Tonel file ? >> Or more the point, what method process a string in Tonel format that has been downloaded from a website? >> >> Actually, hunting around a bit I found.... >> >> TonelParserTest >> testMethodDefList >> shows that... ((TonelParser on: tonelString readStream) perform: #methodDefList) >> returns an array of MCMethodDefinitions that respond to #load >> with... >> MCMethodDefinition >> load >> self actualClass >> compile: source >> classified: category >> withStamp: timeStamp >> notifying: nil >> >> And... >> TonelParserTest >> testTypeDef >> shows that ((TonelParser on: tonelString readStream) perform: #typeDef) >> returns a MCClassDefinition that also responds to #load >> with... >> MCClassDefinition >> load >> self createClass >> >> >> So as an experiment I deleted MCMockClassD, >> then in playground evaluated... >> tonelString := (ZnEasy get: 'https://raw.githubusercontent.com/pharo-project/pharo/development/src/Monti…') contents. >> parser := (TonelParser on: tonelString readStream). >> classDef := parser perform: #typeDef. >> methodDefs := parser perform: #methodDefList. >> classDef load. >> methodDefs do: [ :md | md load ]. >> >> and super cool... MCMockClassD>>one was restored. >> So is that the correct way to use it? >> >> cheers -ben >

June 17, 2018

Smalltalk Programming Competition

by horrido

FYI, I am trying to jumpstart a Smalltalk programming competition. Read all about it here. <https://medium.com/@richardeng/smalltalk-programming-competition-2be77cab0e…> My plan is to use Pharo for this competition, even if it makes companies like Cincom and Instantiations unhappy. Any support this competition can receive would be greatly appreciated. -- Sent from: http://forum.world.st/Pharo-Smalltalk-Users-f1310670.html

June 16, 2018

Re: [Pharo-users] Tonel Fileout

by Esteban Lorenzano

> On 16 Jun 2018, at 16:38, Ben Coman <btc(a)openinworld.com> wrote: > > Le 16/06/2018 Ã 10:43, Ben Coman a Ã©crit : > How can a fileout/filein be done using Tonel format? > In the first case as a script? > and secondly as a possible menu option for Pharo? > > This is to facilitate transfer of student coding exercises for Exercism. > http://exercism.io/languages/pharo/launch <http://exercism.io/languages/pharo/launch> > > Could Tonel handle a full package export in one file? > > On 16 June 2018 at 17:13, Hilaire <hilaire(a)drgeo.eu <mailto:hilaire@drgeo.eu>> wrote: > Hi Ben, > > I am not sure, but the purpose of Tonel is to propose a file representation of "one class=one file". > > Sure thats how Tonel came about, and its how we mostly use it, but is this an inherent limitation? no. in fact, Martin McClure is working to make tonel available to work on file-per-package and even file-per-method again. In general, we do not want one or the other, but there are certain contexts where those can be useful. > Each method is prefixed with its class, so from my 100ft viewpoint it seems feasible to transport a whole package in one Tonel file. > > > Why not using Fileout st files to transfer the code? > > The same question might be asked why Iceberg didn't just use a Fileout at class level well, while file-out is good, we want to use Tonel format also to file-out and file-in. Not a replacement but an addition. Because the format is more readable, is sometimes more suitable for exchange too. cheers, Esteban > . > The Tonel format is more readable, especially minus the scattering of exclamation marks. > > I also meant to ask, what methods are used to file-in a Tonel file ? > Or more the point, what method process a string in Tonel format that has been downloaded from a website? > > Actually, hunting around a bit I found.... > > TonelParserTest >> testMethodDefList > shows that... ((TonelParser on: tonelString readStream) perform: #methodDefList) > returns an array of MCMethodDefinitions that respond to #load > with... > MCMethodDefinition >> load > self actualClass > compile: source > classified: category > withStamp: timeStamp > notifying: nil > > And... > TonelParserTest >> testTypeDef > shows that ((TonelParser on: tonelString readStream) perform: #typeDef) > returns a MCClassDefinition that also responds to #load > with... > MCClassDefinition >> load > self createClass > > > So as an experiment I deleted MCMockClassD, > then in playground evaluated... > tonelString := (ZnEasy get: 'https://raw.githubusercontent.com/pharo-project/pharo/development/src/Monti… <https://raw.githubusercontent.com/pharo-project/pharo/development/src/Monti…>') contents. > parser := (TonelParser on: tonelString readStream). > classDef := parser perform: #typeDef. > methodDefs := parser perform: #methodDefList. > classDef load. > methodDefs do: [ :md | md load ]. > > and super cool... MCMockClassD>>one was restored. > So is that the correct way to use it? > > cheers -ben

June 16, 2018

Re: [Pharo-users] NeoJSON extension - easier list handling with NeoJSONPropertyMapping

by Sven Van Caekenberghe

Hmm, Ben, Did you see NeoJSONCustomMapping's mapping method category ? There you can already find #listOfElementSchema: #listOfType: #listOfType:andElementSchema: as well as #mapWithValueSchema: I am guessing they do what you want, no ? Or am I missing something as well ? Sven > On 16 Jun 2018, at 20:27, Ben Coman <btc(a)openinworld.com> wrote: > > hi Sven, > > With NeoJSON I have found several times in handling lists that > I need to indirect through #for:customDo: like this...... > > reader > for: ExercismProblems > do: [ :mapping | > self halt. > (mapper mapInstVar: #problems) valueSchema: #ArrayOfProblems ]. > reader > for: #ArrayOfProblems > customDo: [ :mapping | > mapper listOfElementSchema: ExercismProblem ]. > > > when I'd really like to be simpler and more concise like this... > > reader > for: ExercismProblems > do: [ :mapping | > (mapping mapInstVar: #problems) listOfType: Array withElementSchema: ExercismProblem ]. > > so I'm seeking your feedback on the following hack which facilitates that. > (and if I missed something that already makes it simpler) > > ---------------------------- > Object subclass: #NeoJSONPropertyMapping > instanceVariableNames: 'propertyName valueSchema getter setter collectionClass' "Added collectionClass" > > > NeoJSONPropertyMapping >> listOfType: aCollectionClass withElementSchema: elementSchema > collectionClass := aCollectionClass. > valueSchema := elementSchema > > > NeoJSONPropertyMapping >> readObject: anObject from: jsonReader > | value | > value := collectionClass > ifNil: [jsonReader nextAs: valueSchema] "nil by default retains the original behaviour" > ifNotNil: [jsonReader nextList: collectionClass of: valueSchema ]. > setter value: anObject value: value > > > NeoJSONReader >> nextList: nextListClass of: schema "copied from #nextAs" > "Secondary interface to parse JSON. > Return a list of objects, each element according to schema." > > ^ nextListClass streamContents: [ :stream | > self parseListDo: [ > stream nextPut: (self nextAs: schema) ] ] > ---------------------------- > > Sample data is shown at: https://github.com/bencoman/pharogui-exercism/blob/master/README.md > with the following code to access it. > > Object subclass: #ExercismAPI > instanceVariableNames: 'client rawResponse jsonResponse success message result' > classVariableNames: 'ApiKey' > package: 'Exercism' > > > ExercismAPI class >> configureApiKey: key > ApiKey := key. > > > ExercismAPI >> track: trackIdString > self path: 'v2/exercises/' , trackIdString. > > > ExercismAPI >> fetchTrack: trackIdString > |znclient response| > ApiKey ifNil: [ self error: 'ApiKey not configured. See class-side ExcercismAPI' ]. > znclient := ZnClient new > https; > enforceHttpSuccess: true; > accept: ZnMimeType applicationJson; > host: 'x.exercism.io' . > znclient path: 'v2/exercises/' , trackIdString. > znclient queryAt: 'key' put: ApiKey. > ^ [ response := znclient get ] > on: ZnHttpUnsuccessful > do: [ :exception | Transcript crShow: exception ] > > > fetchJsonTrack: trackIdString > | reader | > reader := NeoJSONReader on: (self fetchTrack: trackIdString) readStream. > reader > for: ExercismProblems > do: [ :mapper | > (mapper mapInstVar: #problems) listOfType: Array andElementSchema: ExercismProblem ]. > ^ reader nextAs: ExercismProblems > > > In Playground... > > ExercismAPI configureApiKey: 'ec60c50cb50d4ffaa97903d5ebb3d5ff'. > > (ExercismAPI new fetchJsonTrack: 'go') inspect > > > I'll reset the apikey shortly. You can get a new one from http://exercism.io/account/key. > > cheers -ben

June 16, 2018

NeoJSON extension - easier list handling with NeoJSONPropertyMapping

by Ben Coman

hi Sven, With NeoJSON I have found several times in handling lists that I need to indirect through #for:customDo: like this...... reader for: ExercismProblems do: [ :mapping | self halt. (mapper mapInstVar: #problems) valueSchema: #ArrayOfProblems ]. reader for: #ArrayOfProblems customDo: [ :mapping | mapper listOfElementSchema: ExercismProblem ]. when I'd really like to be simpler and more concise like this... reader for: ExercismProblems do: [ :mapping | (mapping mapInstVar: #problems) listOfType: Array withElementSchema: ExercismProblem ]. so I'm seeking your feedback on the following hack which facilitates that. (and if I missed something that already makes it simpler) ---------------------------- Object subclass: #NeoJSONPropertyMapping instanceVariableNames: 'propertyName valueSchema getter setter collectionClass' "Added collectionClass" NeoJSONPropertyMapping >> listOfType: aCollectionClass withElementSchema: elementSchema collectionClass := aCollectionClass. valueSchema := elementSchema NeoJSONPropertyMapping >> readObject: anObject from: jsonReader | value | value := collectionClass ifNil: [jsonReader nextAs: valueSchema] "nil by default retains the original behaviour" ifNotNil: [jsonReader nextList: collectionClass of: valueSchema ]. setter value: anObject value: value NeoJSONReader >> nextList: nextListClass of: schema "copied from #nextAs" "Secondary interface to parse JSON. Return a list of objects, each element according to schema." ^ nextListClass streamContents: [ :stream | self parseListDo: [ stream nextPut: (self nextAs: schema) ] ] ---------------------------- Sample data is shown at: https://github.com/bencoman/pharogui-exercism/blob/master/README.md with the following code to access it. Object subclass: #ExercismAPI instanceVariableNames: 'client rawResponse jsonResponse success message result' classVariableNames: 'ApiKey' package: 'Exercism' ExercismAPI class >> configureApiKey: key ApiKey := key. ExercismAPI >> track: trackIdString self path: 'v2/exercises/' , trackIdString. ExercismAPI >> fetchTrack: trackIdString |znclient response| ApiKey ifNil: [ self error: 'ApiKey not configured. See class-side ExcercismAPI' ]. znclient := ZnClient new https; enforceHttpSuccess: true; accept: ZnMimeType applicationJson; host: 'x.exercism.io' . znclient path: 'v2/exercises/' , trackIdString. znclient queryAt: 'key' put: ApiKey. ^ [ response := znclient get ] on: ZnHttpUnsuccessful do: [ :exception | Transcript crShow: exception ] fetchJsonTrack: trackIdString | reader | reader := NeoJSONReader on: (self fetchTrack: trackIdString) readStream. reader for: ExercismProblems do: [ :mapper | (mapper mapInstVar: #problems) listOfType: Array andElementSchema: ExercismProblem ]. ^ reader nextAs: ExercismProblems In Playground... ExercismAPI configureApiKey: 'ec60c50cb50d4ffaa97903d5ebb3d5ff'. (ExercismAPI new fetchJsonTrack: 'go') inspect I'll reset the apikey shortly. You can get a new one from http://exercism.io/account/key. cheers -ben

June 16, 2018