"{ Package: 'stx:goodies/sunit' }"
!

!Exception methodsFor:'Camp Smalltalk'!

sunitExitWith:aValue
	^ self return:aValue

    "Created: / 20.6.2000 / 18:22:33 / Sames"
! !

!Symbol methodsFor:'Camp Smalltalk'!

sunitAsClass
	^SUnitNameResolver classNamed: self

    "Created: / 20.6.2000 / 18:22:33 / Sames"
! !