[squeak-dev] The Trunk: ToolsTests-fbs.59.mcz

Frank Shearar frank.shearar at gmail.com
Thu Jan 3 22:53:35 UTC 2013


On 3 January 2013 22:51,  <commits at source.squeak.org> wrote:
> Frank Shearar uploaded a new version of ToolsTests to project The Trunk:
> http://source.squeak.org/trunk/ToolsTests-fbs.59.mcz
>
> ==================== Summary ====================
>
> Name: ToolsTests-fbs.59
> Author: fbs
> Time: 3 January 2013, 10:50:59.624 pm
> UUID: 32567995-41b6-47f6-ae87-100fe404b758
> Ancestors: ToolsTests-fbs.58
>
> More characterisation tests. Note that #testClassCommentAnnotation is 'forward looking', in that it defines the soon-to-be behaviour of Browser >> #annotationForClassCommentFor:.
>
> =============== Diff against ToolsTests-fbs.58 ===============
>
> Item was added:
> + ----- Method: BrowserTest>>testClassCommentAnnotation (in category 'as yet unclassified') -----
> + testClassCommentAnnotation
> +       browser selectSystemCategory: browser class category.
> +       browser selectClass: browser class.
> +       self assert: 'class comment for Browser - cwp 12/27/2012 11:09' equals: (browser annotationForClassCommentFor: browser class).
> +       "And the method ignores the parameter:"
> +       self assert: 'class comment for Browser - cwp 12/27/2012 11:09' equals: (browser annotationForClassCommentFor: browser class superclass).!

Oh sigh. I had meant to make that test rather less obviously fragile.

frank

> Item was added:
> + ----- Method: BrowserTest>>testClassDefinitionAnnotation (in category 'as yet unclassified') -----
> + testClassDefinitionAnnotation
> +       browser selectSystemCategory: browser class category.
> +       browser selectClass: browser class.
> +       self assert: browser class comment equals: (browser annotationForClassDefinitionFor: browser class).
> +       "And the method ignores the parameter:"
> +       self assert: browser class comment equals: (browser annotationForClassDefinitionFor: browser class superclass).!
>
>


More information about the Squeak-dev mailing list