* arith.c (bignum): Previously static function now exposed as external.

* arith.h (bignum): Declared.

* configure: Added check for tm_gmtoff and tm_tmzone fields
being present in struct tm.

* eval.c (eval_init): New intrinsic functions: time, time-usec.

* lib.c (num): If the cnum is outside of the fixnum range, then
construct a bignum.
(time_sec, time_sec_usec): New functions.

* lib.h (mut): Slight change to macro to eliminate compiler warning.
(time_sec, time_sec_usec): Declared.

* txr.1: Stub section for time and time-usec.

* txr.vim: Highlighting for time and time-usec.

1 files changed, 3 insertions, 0 deletions

diff --git a/eval.c b/eval.c
index a97aa819..c683a0b3 100644
--- a/eval.c
+++ b/eval.c
@@ -2405,6 +2405,9 @@ void eval_init(void)
   reg_fun(intern(lit("url-encode"), user_package), func_n2o(url_encode, 1));
   reg_fun(intern(lit("url-decode"), user_package), func_n2o(url_decode, 1));
 
+  reg_fun(intern(lit("time"), user_package), func_n0(time_sec));
+  reg_fun(intern(lit("time-usec"), user_package), func_n0(time_sec_usec));
+
   eval_error_s = intern(lit("eval-error"), user_package);
   uw_register_subtype(eval_error_s, error_s);
 }