#FEATURE by cg
class: TestCase::Should
class definition
added:
#assertSelector
#beInstanceOf:
#equal:
#not
#raise:
changed: #be:
"{ Package: 'stx:goodies/sunit' }"
SimpleTestResourceTestCase subclass:#FailingTestResourceTestCase
instanceVariableNames:''
classVariableNames:''
poolDictionaries:''
category:'SUnit-Tests'
!
!FailingTestResourceTestCase methodsFor:'utility'!
clearOuterResourceStateDuring: aBlock
"Make the resource impossible to make available, then ensure that every test raises a failure but not an error (which its setUp would do if it reached it and the resource were nil)."
^super clearOuterResourceStateDuring:
[SimpleTestResource preventAvailabilityDuring:
[self should: aBlock raise: TestResult failure]]
! !
!FailingTestResourceTestCase class methodsFor:'documentation'!
version_SVN
^ '§Id: FailingTestResourceTestCase.st 214 2011-03-14 12:22:21Z vranyj1 §'
! !