Add function RUN-TESTS-IN-HOST to run tests in the host implementation

[jscl.git] / tests-report.lisp

diff --git a/tests-report.lisp b/tests-report.lisp
index 529f1ad..d4a5275 100644 (file)
--- a/tests-report.lisp
+++ b/tests-report.lisp
@@ -1,6 +1,6 @@
 (write-line "")
 (write-string "Finished. The execution took ")
-(write-string (prin1-to-string (/ (- (get-internal-real-time) *timestamp*) internal-time-units-per-second)))
+(write-string (prin1-to-string (/ (- (get-internal-real-time) *timestamp*) internal-time-units-per-second 1.0)))
 (write-line " seconds.")
 
 (cond