The Trunk: KernelTests-nice.102.mcz

Nicolas Cellier uploaded a new version of KernelTests to project The Trunk:
http://source.squeak.org/trunk/KernelTests-nice.102.mcz

==================== Summary ====================

Name: KernelTests-nice.102
Author: nice
Time: 14 October 2009, 11:09:03 am
UUID: be87c1c0-769a-482e-9479-051d761424a6
Ancestors: KernelTests-nice.101

hem... the test should have failed...
Provide a better test

=============== Diff against KernelTests-nice.101 ===============

Item was changed:
  ----- Method: FalseTest>>testXor (in category 'tests') -----
  testXor
  self assert: (false xor: true) = true.
  self assert: (false xor: false) = false.
+
-
  self
+ should: [(false xor: [false])
+ ifTrue: ["This should never be true, do not signal an Error and let the test fail"]
+ ifFalse: [self error: 'OK, this should be false, raise an Error']]
- should: [(false xor: [false]) ifTrue: [self error: 'this is false']]
  raise: Error
  description: 'a Block argument is not allowed. If it were, answer would be false'.!

Item was changed:
  ----- Method: TrueTest>>testXor (in category 'testing') -----
  testXor
  self assert: (true xor: true) = false.
  self assert: (true xor: false) = true.
 
  self
+ should: [(true xor: [true])
+ ifTrue: ["This should never be true, do not signal an Error and let the test fail"]
+ ifFalse: [self error: 'OK, this should be false, raise an Error']]
- should: [(true xor: [true]) ifTrue: [self error: 'this is not true']]
  raise: Error
  description: 'a Block argument is not allowed. If it were, answer would be false'.!