[plt-dev] Fix for a test-engine bug

From: John Clements (clements at brinckerhoff.org)
Date: Fri May 22 18:33:30 EDT 2009

In the release candidate, this program:

#lang scheme

(require test-engine/scheme-tests)


... causes this error:

send: no such method: display-untested-summary for class: test-display- 

In fact, it turns out that test-display-textual% does have these  
methods, it's just that they're not public.

Revision 14946 fixes this.  Here's the diff:

pcp063219pcs:~/plt/collects/test-engine clements$ svn diff -r  
14945:14946 test-engine.scm
Index: test-engine.scm
--- test-engine.scm	(revision 14945)
+++ test-engine.scm	(revision 14946)
@@ -87,11 +87,11 @@
                     [else (format "All ~a" count)])
                   (if (= count 1) "" "s"))))

-    (define (display-untested-summary port)
+    (define/public (display-untested-summary port)
        (unless (test-silence)
          (fprintf port "This program should be tested.~n")))

-    (define (display-disabled-summary port)
+    (define/public (display-disabled-summary port)
        (fprintf port "Tests disabled.\n"))

      (define/public (next-line) (printf "~a" "\n\t"))
pcp063219pcs:~/plt/collects/test-engine clements$

I think this should go in the release.


-------------- next part --------------
A non-text attachment was scrubbed...
Name: smime.p7s
Type: application/pkcs7-signature
Size: 2484 bytes
Desc: not available
URL: <http://lists.racket-lang.org/dev/archive/attachments/20090522/a8fde7cf/attachment.p7s>

Posted on the dev mailing list.