[Pkg] The Trunk: SUnit-ul.103.mcz
commits at source.squeak.org
commits at source.squeak.org
Fri Aug 14 20:34:08 UTC 2015
Levente Uzonyi uploaded a new version of SUnit to project The Trunk:
http://source.squeak.org/trunk/SUnit-ul.103.mcz
==================== Summary ====================
Name: SUnit-ul.103
Author: ul
Time: 14 August 2015, 7:03:21.454 pm
UUID: 0adc8e0f-b262-4dd1-93fa-ec87ad5a67ed
Ancestors: SUnit-mt.102
#includesSubString: -> #includesSubstring:
=============== Diff against SUnit-mt.102 ===============
Item was changed:
----- Method: SUnitTest>>testAssertIdentical (in category 'testing') -----
testAssertIdentical
| a b |
a := 'foo'.
b := 'bar'.
self should: [self assert: a identical: b] raise: TestFailure.
[self assert: a identical: b] on: TestFailure do: [:e | |error|
error := e messageText.
+ self assert: (error includesSubstring: a) description: 'Error message doesn''t include the expected value'.
+ self assert: (error includesSubstring: b) description: 'Error message doesn''t include the expected value'].!
- self assert: (error includesSubString: a) description: 'Error message doesn''t include the expected value'.
- self assert: (error includesSubString: b) description: 'Error message doesn''t include the expected value'].!
Item was changed:
----- Method: SUnitTest>>testAssertIdenticalDescription (in category 'testing') -----
testAssertIdenticalDescription
| a b |
a := 'foo'.
b := a copy.
self should: [self assert: a identical: b description: 'A desciption'] raise: TestFailure.
[self assert: a identical: b description: 'A desciption'] on: TestFailure do: [:e | |error|
error := e messageText.
+ self assert: (error includesSubstring: 'A desciption') description: 'Error message doesn''t give you the description'].!
- self assert: (error includesSubString: 'A desciption') description: 'Error message doesn''t give you the description'].!
Item was changed:
----- Method: SUnitTest>>testAssertIdenticalWithEqualObjects (in category 'testing') -----
testAssertIdenticalWithEqualObjects
| a b |
a := 'foo'.
b := a copy.
self should: [self assert: a identical: b] raise: TestFailure.
[self assert: a identical: b] on: TestFailure do: [:e | |error|
error := e messageText.
+ self assert: (error includesSubstring: 'not identical') description: 'Error message doesn''t say the two things aren''t identical'].!
- self assert: (error includesSubString: 'not identical') description: 'Error message doesn''t say the two things aren''t identical'].!
Item was changed:
----- Method: SUnitTest>>testWithExceptionDo (in category 'testing') -----
testWithExceptionDo
self
should: [self error: 'foo']
raise: TestResult error
withExceptionDo: [:exception |
+ self assert: (exception description includesSubstring: 'foo')
- self assert: (exception description includesSubString: 'foo')
]
!
Item was changed:
----- Method: TestCase>>executeShould:inScopeOf:withDescriptionContaining: (in category 'private') -----
executeShould: aBlock inScopeOf: anExceptionalEvent withDescriptionContaining: aString
^[aBlock value.
false] on: anExceptionalEvent
+ do: [:ex | ex return: (ex description includesSubstring: aString) ]
- do: [:ex | ex return: (ex description includesSubString: aString) ]
!
Item was changed:
----- Method: TestCase>>executeShould:inScopeOf:withDescriptionNotContaining: (in category 'private') -----
executeShould: aBlock inScopeOf: anExceptionalEvent withDescriptionNotContaining: aString
^[aBlock value.
false] on: anExceptionalEvent
+ do: [:ex | ex return: (ex description includesSubstring: aString) not ]
- do: [:ex | ex return: (ex description includesSubString: aString) not ]
!
More information about the Packages
mailing list