From 77e4a3aa29ec6f0b366a632480504bf705bbaa28 Mon Sep 17 00:00:00 2001 From: Mike Sperber Date: Sat, 23 May 2009 12:21:16 +0000 Subject: [PATCH] PR 10257 svn: r14957 --- collects/test-engine/test-info.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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"