PlotMorph on Pharo 6.1

> I think that block arguments are like method arguments and are read only.
> Now I do not remember.
>
> On Wed, Sep 13, 2017 at 8:39 PM, Stephan Eggermont <[hidden email]> wrote:
>> On 13/09/17 19:22, Mark Bestley wrote:
>>
>>> Unfortunatley not. That error has gone but I now get
>>
>>>
>>>
>>>              x := x rounded.
>>
>>
>> Yes, that is the question I posed.
>> Assignment to block variables is prohibited now?
>>
>> Stephan
>>
>>
>>
>>

> --001a113fc0fc9da22e05592a9f54
> Content-Type: text/plain; charset="UTF-8"
>
> Hi mark
>
> live is chaotic here with two or three meetings in parallel, visitors,
> and a lecture to finish
> Now I tested. I took a Pharo 6.1 32 bits and loaded PlotMorph from the catalog
> It load Stefaneggermont.8
>
> Can you tell us how to reproduce your problem?
>

> >
> > Fetched -> ConfigurationOfPlotMorph-StephanEggermont.5 ---
> > http://smalltalkhub.com/mc/Pharo/MetaRepoForPharo60/main/ ---
> > http://smalltalkhub.com/mc/Pharo/MetaRepoForPharo60/main/
> > Loaded -> ConfigurationOfPlotMorph-StephanEggermont.5 ---
> > http://smalltalkhub.com/mc/Pharo/MetaRepoForPharo60/main/ ---
> > http://smalltalkhub.com/mc/Pharo/MetaRepoForPharo60/main/
> > Loading 1.1 of ConfigurationOfPlotMorph...
> > Fetched -> PlotMorph-StephanEggermont.8 ---
> > http://smalltalkhub.com/mc/PharoExtras/PlotMorph/main/ ---
> > http://smalltalkhub.com/mc/PharoExtras/PlotMorph/main/
> > OCStoreIntoReadOnlyVariableError: Cannot store into
> > PlotMorphGrid
> > drawGridOn: aCanvas
> >     | gridColor lighter darker baseColor bounds |
> >     baseColor := plot baseColor alpha: 1.
> >     lighter := baseColor twiceLighter.
> >     darker := baseColor twiceDarker.
> >     gridColor := (lighter diff: baseColor) > (darker diff: baseColor)
> >         ifTrue: [ lighter ]
> >         ifFalse: [ darker ].
> >     bounds := plot drawBounds.
> >     (bounds left to: bounds right by: (self bestStep: bounds width))
> >         do: [ :x |
> >             x := x rounded.
> >             aCanvas line: x @ bounds top to: x @ bounds bottom color:
> > gridColor ].
> >     (bounds top to: bounds bottom by: (self bestStep: bounds height))
> >         do: [ :y |
> >             y := y rounded.
> >             aCanvas line: bounds left @ y to: bounds right @ y color:
> > gridColor ]
> > OCStoreIntoReadOnlyVariableError: Cannot store into
> > PlotMorphGrid
> > drawGridOn: aCanvas
> >     | gridColor lighter darker baseColor bounds |
> >     baseColor := plot baseColor alpha: 1.
> >     lighter := baseColor twiceLighter.
> >     darker := baseColor twiceDarker.
> >     gridColor := (lighter diff: baseColor) > (darker diff: baseColor)
> >         ifTrue: [ lighter ]
> >         ifFalse: [ darker ].
> >     bounds := plot drawBounds.
> >     (bounds left to: bounds right by: (self bestStep: bounds width))
> >         do: [ :x |
> >             x := x rounded.
> >             aCanvas line: x @ bounds top to: x @ bounds bottom color:
> > gridColor ].
> >     (bounds top to: bounds bottom by: (self bestStep: bounds height))
> >         do: [ :y |
> >             y := y rounded.
> >             aCanvas line: bounds left @ y to: bounds right @ y color:
> > gridColor ]
> > OCStoreIntoReadOnlyVariableError: Cannot store into
> > AxesMorph
> > drawGridOn: aCanvas
> >     | gridColor right bottom width height lighter darker baseColor |
> >     baseColor := self baseColor.
> >     lighter := baseColor twiceLighter.
> >     darker := baseColor twiceDarker.
> >     gridColor := (lighter diff: baseColor) > (darker diff: baseColor)
> >         ifTrue: [ lighter ]
> >         ifFalse: [ darker ].
> >     right := self bounds width - margin.
> >     width := self bounds width - (margin * 2).
> >     bottom := self bounds height - margin.
> >     height := self bounds height - (margin * 2).
> >     (margin to: right by: width / 10)
> >         do: [ :x |
> >             x := x rounded.
> >             aCanvas line: x @ margin to: x @ bottom color: gridColor ].
> >     (margin to: bottom by: height / 10)
> >         do: [ :y |
> >             y := y rounded.
> >             aCanvas line: margin @ y to: right @ y color: gridColor ]
> > OCStoreIntoReadOnlyVariableError: Cannot store into
> > AxesMorph
> > drawGridOn: aCanvas
> >     | gridColor right bottom width height lighter darker baseColor |
> >     baseColor := self baseColor.
> >     lighter := baseColor twiceLighter.
> >     darker := baseColor twiceDarker.
> >     gridColor := (lighter diff: baseColor) > (darker diff: baseColor)
> >         ifTrue: [ lighter ]
> >         ifFalse: [ darker ].
> >     right := self bounds width - margin.
> >     width := self bounds width - (margin * 2).
> >     bottom := self bounds height - margin.
> >     height := self bounds height - (margin * 2).
> >     (margin to: right by: width / 10)
> >         do: [ :x |
> >             x := x rounded.
> >             aCanvas line: x @ margin to: x @ bottom color: gridColor ].
> >     (margin to: bottom by: height / 10)
> >         do: [ :y |
> >             y := y rounded.
> >             aCanvas line: margin @ y to: right @ y color: gridColor ]
> > Loaded -> PlotMorph-StephanEggermont.8 ---
> > http://smalltalkhub.com/mc/PharoExtras/PlotMorph/main/ --- cache
> > ...finished 1.1

> Stephane Ducasse <[hidden email]>
> wrote:
>
>> --001a113fc0fc9da22e05592a9f54
>> Content-Type: text/plain; charset="UTF-8"
>>
>> Hi mark
>>
>> live is chaotic here with two or three meetings in parallel, visitors,
>> and a lecture to finish
>> Now I tested. I took a Pharo 6.1 32 bits and loaded PlotMorph from the catalog
>> It load Stefaneggermont.8
>>
>> Can you tell us how to reproduce your problem?
>>
>
> I get this on both 32 and 64 bit Pharo on OSX 10.12.6
>
> Loaded a new Pharo from https://pharo.org/web/download and removed
> previous Preferences
>
> Then from Calalog Browser
> Install Stable Version
>
> Then get
>
>> >
>> > Fetched -> ConfigurationOfPlotMorph-StephanEggermont.5 ---
>> > http://smalltalkhub.com/mc/Pharo/MetaRepoForPharo60/main/ ---
>> > http://smalltalkhub.com/mc/Pharo/MetaRepoForPharo60/main/
>> > Loaded -> ConfigurationOfPlotMorph-StephanEggermont.5 ---
>> > http://smalltalkhub.com/mc/Pharo/MetaRepoForPharo60/main/ ---
>> > http://smalltalkhub.com/mc/Pharo/MetaRepoForPharo60/main/
>> > Loading 1.1 of ConfigurationOfPlotMorph...
>> > Fetched -> PlotMorph-StephanEggermont.8 ---
>> > http://smalltalkhub.com/mc/PharoExtras/PlotMorph/main/ ---
>> > http://smalltalkhub.com/mc/PharoExtras/PlotMorph/main/
>> > OCStoreIntoReadOnlyVariableError: Cannot store into
>> > PlotMorphGrid
>> > drawGridOn: aCanvas
>> >     | gridColor lighter darker baseColor bounds |
>> >     baseColor := plot baseColor alpha: 1.
>> >     lighter := baseColor twiceLighter.
>> >     darker := baseColor twiceDarker.
>> >     gridColor := (lighter diff: baseColor) > (darker diff: baseColor)
>> >         ifTrue: [ lighter ]
>> >         ifFalse: [ darker ].
>> >     bounds := plot drawBounds.
>> >     (bounds left to: bounds right by: (self bestStep: bounds width))
>> >         do: [ :x |
>> >             x := x rounded.
>> >             aCanvas line: x @ bounds top to: x @ bounds bottom color:
>> > gridColor ].
>> >     (bounds top to: bounds bottom by: (self bestStep: bounds height))
>> >         do: [ :y |
>> >             y := y rounded.
>> >             aCanvas line: bounds left @ y to: bounds right @ y color:
>> > gridColor ]
>> > OCStoreIntoReadOnlyVariableError: Cannot store into
>> > PlotMorphGrid
>> > drawGridOn: aCanvas
>> >     | gridColor lighter darker baseColor bounds |
>> >     baseColor := plot baseColor alpha: 1.
>> >     lighter := baseColor twiceLighter.
>> >     darker := baseColor twiceDarker.
>> >     gridColor := (lighter diff: baseColor) > (darker diff: baseColor)
>> >         ifTrue: [ lighter ]
>> >         ifFalse: [ darker ].
>> >     bounds := plot drawBounds.
>> >     (bounds left to: bounds right by: (self bestStep: bounds width))
>> >         do: [ :x |
>> >             x := x rounded.
>> >             aCanvas line: x @ bounds top to: x @ bounds bottom color:
>> > gridColor ].
>> >     (bounds top to: bounds bottom by: (self bestStep: bounds height))
>> >         do: [ :y |
>> >             y := y rounded.
>> >             aCanvas line: bounds left @ y to: bounds right @ y color:
>> > gridColor ]
>> > OCStoreIntoReadOnlyVariableError: Cannot store into
>> > AxesMorph
>> > drawGridOn: aCanvas
>> >     | gridColor right bottom width height lighter darker baseColor |
>> >     baseColor := self baseColor.
>> >     lighter := baseColor twiceLighter.
>> >     darker := baseColor twiceDarker.
>> >     gridColor := (lighter diff: baseColor) > (darker diff: baseColor)
>> >         ifTrue: [ lighter ]
>> >         ifFalse: [ darker ].
>> >     right := self bounds width - margin.
>> >     width := self bounds width - (margin * 2).
>> >     bottom := self bounds height - margin.
>> >     height := self bounds height - (margin * 2).
>> >     (margin to: right by: width / 10)
>> >         do: [ :x |
>> >             x := x rounded.
>> >             aCanvas line: x @ margin to: x @ bottom color: gridColor ].
>> >     (margin to: bottom by: height / 10)
>> >         do: [ :y |
>> >             y := y rounded.
>> >             aCanvas line: margin @ y to: right @ y color: gridColor ]
>> > OCStoreIntoReadOnlyVariableError: Cannot store into
>> > AxesMorph
>> > drawGridOn: aCanvas
>> >     | gridColor right bottom width height lighter darker baseColor |
>> >     baseColor := self baseColor.
>> >     lighter := baseColor twiceLighter.
>> >     darker := baseColor twiceDarker.
>> >     gridColor := (lighter diff: baseColor) > (darker diff: baseColor)
>> >         ifTrue: [ lighter ]
>> >         ifFalse: [ darker ].
>> >     right := self bounds width - margin.
>> >     width := self bounds width - (margin * 2).
>> >     bottom := self bounds height - margin.
>> >     height := self bounds height - (margin * 2).
>> >     (margin to: right by: width / 10)
>> >         do: [ :x |
>> >             x := x rounded.
>> >             aCanvas line: x @ margin to: x @ bottom color: gridColor ].
>> >     (margin to: bottom by: height / 10)
>> >         do: [ :y |
>> >             y := y rounded.
>> >             aCanvas line: margin @ y to: right @ y color: gridColor ]
>> > Loaded -> PlotMorph-StephanEggermont.8 ---
>> > http://smalltalkhub.com/mc/PharoExtras/PlotMorph/main/ --- cache
>> > ...finished 1.1
>
>
> --
> Mark
>
>

> On 16-09-17 09:29, Stephane Ducasse wrote:
>>
>> I'm on 10.12.6. too
>> I downloaded Pharo 32 using the link.
>> And I loaded from Catalog and I cannot get the problem.
>> May be there is a problem with a setting in the compiler.
>> I will talk to the guys monday.
>
>
> Meta6, 7 and PlotMorph repos
>
> Name: ConfigurationOfPlotMorph-StephanEggermont.6
> Author: StephanEggermont
> Time: 16 September 2017, 3:39:18.049684 pm
> UUID: 246e825f-b015-0d00-a8c8-7793003b8086
> Ancestors: ConfigurationOfPlotMorph-StephanEggermont.5
>
> No longer assign to block parameters in Pharo 6 and 7
>
> Name: PlotMorph-StephanEggermont.9
> Author: StephanEggermont
> Time: 16 September 2017, 3:26:48.762733 pm
> UUID: e138d932-b015-0d00-a8c9-885a003b8086
> Ancestors: PlotMorph-StephanEggermont.8
>
> No longer assign to block parameters
>
>

> On 16-09-17 09:29, Stephane Ducasse wrote:
> > I'm on 10.12.6. too
> > I downloaded Pharo 32 using the link.
> > And I loaded from Catalog and I cannot get the problem.
> > May be there is a problem with a setting in the compiler.
> > I will talk to the guys monday.
>
> Meta6, 7 and PlotMorph repos
>
> Name: ConfigurationOfPlotMorph-StephanEggermont.6
> Author: StephanEggermont
> Time: 16 September 2017, 3:39:18.049684 pm
> UUID: 246e825f-b015-0d00-a8c8-7793003b8086
> Ancestors: ConfigurationOfPlotMorph-StephanEggermont.5
>
> No longer assign to block parameters in Pharo 6 and 7
>
> Name: PlotMorph-StephanEggermont.9
> Author: StephanEggermont
> Time: 16 September 2017, 3:26:48.762733 pm
> UUID: e138d932-b015-0d00-a8c9-885a003b8086
> Ancestors: PlotMorph-StephanEggermont.8
>
> No longer assign to block parameters