diff --git a/collects/test-engine/test-info.scm b/collects/test-engine/test-info.scm
index f2c2a694d6..419b5b7aba 100644
--- a/collects/test-engine/test-info.scm
+++ b/collects/test-engine/test-info.scm
@@ -98,9 +98,9 @@
 	     (formatter (unequal-test fail))
 	     (formatter (unequal-actual fail)))]
      [(outofrange? fail)
-      (print "Actual value ~F is not within ~v of expected value ~F."
+      (print "Actual value ~F is not within ~a of expected value ~F."
 	     (formatter (outofrange-test fail))
-	     (format  (outofrange-range fail))
+	     (formatter  (outofrange-range fail))
 	     (formatter (outofrange-actual fail)))]
      [(incorrect-error? fail)
       (print "check-error encountered the following error instead of the expected ~a~n   :: ~a"