[squeak-dev] The Trunk: Tests-cmm.290.mcz

Nicolas Cellier nicolas.cellier.aka.nice at gmail.com
Tue Feb 18 22:33:35 UTC 2014


2014-02-18 23:21 GMT+01:00 Frank Shearar <frank.shearar at gmail.com>:

> On 17 February 2014 22:35,  <commits at source.squeak.org> wrote:
> > Chris Muller uploaded a new version of Tests to project The Trunk:
> > http://source.squeak.org/trunk/Tests-cmm.290.mcz
> >
> > ==================== Summary ====================
> >
> > Name: Tests-cmm.290
> > Author: cmm
> > Time: 17 February 2014, 4:35:24.565 pm
> > UUID: f3fccfae-6baf-4093-ba62-e15ef110a687
> > Ancestors: Tests-cwp.289
> >
> > Minor factoring.
> >
> > =============== Diff against Tests-cwp.289 ===============
> >
> > Item was changed:
> >   ----- Method:
> BlockLocalTemporariesRemovalTest>>assert:isChangedDuringParsingTo:withRemovalOfTemporariesNamed:
> (in category 'test helper') -----
> > + assert: someCode isChangedDuringParsingTo: someOtherCode
> withRemovalOfTemporariesNamed: someTempNames
> > - assert: someCode isChangedDuringParsingTo: someOtherCode
> withRemovalOfTemporariesNamed: someTempNames
> > -
> >         | failBlock |
> >         self sourceCode: someCode.
> > +       failBlock := [ self fail ].
> > +       [ self class
> > +               compile: self sourceCode
> > +               notifying: self
> > +               trailer: self class defaultMethodTrailer
> > +               ifFail: failBlock ]
> > -       failBlock := [self fail].
> > -       [self class
> > -                       compile: self sourceCode
> > -                       notifying: self
> > -                       trailer: self class defaultMethodTrailer
> > -                       ifFail: failBlock]
> >                 on: UnusedVariable
> > +               do:
> > +                       [ : aNotification | aNotification openMenuIn:
> > +                               [ : options : emptyCollection : someText
> | aNotification resume:
> > +                                       (someTempNames anySatisfy:
> > +                                               [ : tempName | someText
> beginsWith: tempName ]) ] ].
> > -               do: [:aNotification | aNotification
> > -                               openMenuIn: [:options :emptyCollection
> :someText |
> > -                                       (someTempNames anySatisfy:
> [:tempName | someText startsWith: tempName])
> > -                                               ifTrue: [aNotification
> resume: true]
> > -                                               ifFalse: [aNotification
> resume: false]]].
> >         self assert: self sourceCode = someOtherCode!
>
> Seriously, we need a better differ. If we pretty-printed the before &
> after I'd at least stand a chance of not going blind trying to find
> the change here. How difficult a change is it to SS? Surely a
> one-liner, to someone who knows the codebase (i.e., not me).
>
> frank
>
>
Frank, in this case you have to trust the comment: minot refactoring
(ifTrue: [true] ifFalse: [false]), there must be something simpler indeed...
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20140218/e652b69b/attachment.htm


More information about the Squeak-dev mailing list