Eliot Miranda uploaded a new version of Tests to project The Trunk:
http://source.squeak.org/trunk/Tests-eem.94.mcz==================== Summary ====================
Name: Tests-eem.94
Author: eem
Time: 25 September 2010, 7:50:24.958 pm
UUID: ec24ec50-77af-42b0-881c-20e085aab9f7
Ancestors: Tests-nice.93
Revert the TestObjectsAsMethods tests now that VMMaker-oscog.33/r2313 adds the necessary support.
=============== Diff against Tests-nice.93 ===============
Item was removed:
- ----- Method: TestObjectsAsMethods>>expectedFailures (in category 'as yet unclassified') -----
- expectedFailures
- "Does crash VM with Cog"
-
- ^Smalltalk isRunningCogit
- ifTrue:[#(testAddNumbers testDNU testAnswer42)]
- ifFalse:[#()]!
Item was changed:
----- Method: TestObjectsAsMethods>>testAddNumbers (in category 'as yet unclassified') -----
testAddNumbers
"self debug: #testAddNumbers"
- "Does crash VM with Cog"
- Smalltalk isRunningCogit ifTrue:[^self assert: false].
-
"md: I had to comment out the error... did strange things"
self class addSelector: #add:with: withMethod: ObjectsAsMethodsExample new.
self assert: (self add: 3 with: 4) = 7.
"self assert: (self perform: #add:with: withArguments: #(3 4)) = 7. "
self class basicRemoveSelector: #add:with:.!
Item was changed:
----- Method: TestObjectsAsMethods>>testAnswer42 (in category 'as yet unclassified') -----
testAnswer42
- "Does crash VM with Cog"
- Smalltalk isRunningCogit ifTrue:[^self assert: false].
-
self class addSelector: #answer42 withMethod: ObjectsAsMethodsExample new.
self assert: self answer42 = 42.
self class basicRemoveSelector: #answer42.!
Item was changed:
----- Method: TestObjectsAsMethods>>testDNU (in category 'as yet unclassified') -----
testDNU
- "Does crash VM with Cog"
- Smalltalk isRunningCogit ifTrue:[^self assert: false].
-
self class addSelector: #answer42 withMethod: AbstractObjectsAsMethod new.
self should: [self answer42] raise: MessageNotUnderstood.
self class basicRemoveSelector: #answer42.!
Locked
