David T. Lewis uploaded a new version of Tests to project The Trunk: http://source.squeak.org/trunk/Tests-dtl.170.mcz
==================== Summary ====================
Name: Tests-dtl.170 Author: dtl Time: 23 September 2012, 9:50:16.094 am UUID: 68580c67-c932-4d59-a9cb-77ae53dc71ad Ancestors: Tests-ul.169
All versions of Cog provide mirror primitive support. For the interpreter VM, support was added in version 4.7.19. Identify expected mirror primitive failures for older versions of the interpreter VM.
=============== Diff against Tests-ul.169 ===============
Item was changed: ----- Method: MirrorPrimitiveTests>>expectedFailures (in category 'testing') ----- expectedFailures + "All versions of Cog provide mirror primitive support. For the interpreter VM, + support was added in version 4.7.19. Identify expected failures for older versions + of the interpreter VM."
^Smalltalk isRunningCog ifTrue: [#()] + ifFalse: [ | ver | + [ver := VersionNumber fromString: Smalltalk vm interpreterSourceVersion. + ((ver numbers first * 1000) + ver numbers second) >= 4008 + ifTrue: [^#() "version 4.7.19 or greater with mirror primitive support"]] + on: Warning + do: ["primitiveInterpreterSourceVersion not available"]. + ^#(testMirrorEqEq testMirrorPerform testMirrorSize) "older interpreter VMs"] + ! - ifFalse: [#(testMirrorEqEq testMirrorPerform testMirrorSize)]!