Marcel Taeumel uploaded a new version of Tests to project The Trunk: http://source.squeak.org/trunk/Tests-mt.423.mcz
==================== Summary ====================
Name: Tests-mt.423 Author: mt Time: 22 November 2019, 11:30:50.652303 am UUID: 0048a1fb-aa80-ad40-a372-764aee7c7c9b Ancestors: Tests-mt.422
Adds tests for Warning.
=============== Diff against Tests-mt.422 ===============
Item was added: + TestCase subclass: #WarningTests + instanceVariableNames: '' + classVariableNames: '' + poolDictionaries: '' + category: 'Tests-Exceptions'!
Item was added: + ----- Method: WarningTests>>tearDown (in category 'running') ----- + tearDown + + Warning resetAllWarnings. + super tearDown.!
Item was added: + ----- Method: WarningTests>>test01Signal (in category 'tests') ----- + test01Signal + + self should: [Warning signal] raise: Warning.!
Item was added: + ----- Method: WarningTests>>test02Resume (in category 'tests') ----- + test02Resume + + self + assert: 42 + equals: ([Warning signal] on: Warning do: [:w | w resume: 42]).!
Item was added: + ----- Method: WarningTests>>test03MessageText (in category 'tests') ----- + test03MessageText + + self + assert: 'Hello, World!!' + equals: ([Warning signal: 'Hello, World!!'] on: Warning do: [:w | w messageText]).!
Item was added: + ----- Method: WarningTests>>test04SuppressWarnings (in category 'tests') ----- + test04SuppressWarnings + + self should: [Warning signal] raise: Warning. + Warning suppressWarnings. + self shouldnt: [Warning signal] raise: Warning.!
Item was added: + ----- Method: WarningTests>>test05SuppressAndResetOnStartUp (in category 'tests') ----- + test05SuppressAndResetOnStartUp + + self should: [Warning signal] raise: Warning. + Warning suppressAndResetOnStartUp. + self shouldnt: [Warning signal] raise: Warning. + Warning startUp: true. + self should: [Warning signal] raise: Warning.!
Item was added: + ----- Method: WarningTests>>test06SuppressDeprecations (in category 'tests') ----- + test06SuppressDeprecations + + self should: [self deprecated] raise: Deprecation. + Deprecation suppressWarnings. + self shouldnt: [self deprecated] raise: Deprecation.!
packages@lists.squeakfoundation.org