From 499e229ab8569eac05ce0f071ecb888e8172de1e Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Wed, 15 Jul 1998 16:35:14 -0700
Subject: [PATCH] tests for new float precision time() operation
Rev: src/testsuite.in:1.117
---
src/testsuite.in | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/src/testsuite.in b/src/testsuite.in
index 9d1edd693a..5dbc7d1000 100644
--- a/src/testsuite.in
+++ b/src/testsuite.in
@@ -1,4 +1,4 @@
-stest_true([["$Id: testsuite.in,v 1.116 1998/06/24 04:56:46 hubbe Exp $"]])
+stest_true([["$Id: testsuite.in,v 1.117 1998/07/15 23:35:14 hubbe Exp $"]])
cond([[all_constants()->_verify_internals]],
[[
test_do(_verify_internals())
@@ -2304,6 +2304,8 @@ test_any([[ master()->set_inhibit_compile_errors(lambda(){});mixed res = catch{c
// - time
test_true(intp(time()))
+test_true(intp(time(1)))
+test_true(floatp(time(2)))
// - trace
test_do(trace(0))
--
GitLab