+ (summary (run (named-test 'test-method
+ (get-suite was-run))))))
+
+(def-test-method (test-eql self test-case-test :run nil)
+ (assert-equal "1 run, 0 erred, 0 failed"
+ (summary (run (named-test 'test-eql (get-suite was-run))))))
+
+(def-test-method (test-not-eql self test-case-test :run nil)
+ (assert-equal "1 run, 0 erred, 0 failed"
+ (summary (run (named-test 'test-not-eql
+ (get-suite was-run))))))