summaryrefslogtreecommitdiffstats
path: root/eval.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2016-08-22 20:32:21 -0700
committerKaz Kylheku <kaz@kylheku.com>2016-08-22 20:32:21 -0700
commit2ac1a60fa62041345bc461edb3e7d0d74a0055cd (patch)
treeba7f09cbec594b076d7541229032b606d26a76fd /eval.c
parent2037ff7663e563e9f2497861b6151a6d5173c67b (diff)
downloadtxr-2ac1a60fa62041345bc461edb3e7d0d74a0055cd.tar.gz
txr-2ac1a60fa62041345bc461edb3e7d0d74a0055cd.tar.bz2
txr-2ac1a60fa62041345bc461edb3e7d0d74a0055cd.zip
Adding time-parse function: wrapper for strptime.
* configure: Test for strptime. * eval.c (eval_init): register time-parse intrinsic. * lib.c (time_parse): New function. * lib.h (time_parse): Declared. * txr.1: Documented.
Diffstat (limited to 'eval.c')
-rw-r--r--eval.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/eval.c b/eval.c
index 39ee9652..78cc5a34 100644
--- a/eval.c
+++ b/eval.c
@@ -5337,6 +5337,7 @@ void eval_init(void)
reg_fun(intern(lit("time-struct-utc"), user_package), func_n1(time_struct_utc));
reg_fun(intern(lit("make-time"), user_package), func_n7(make_time));
reg_fun(intern(lit("make-time-utc"), user_package), func_n7(make_time_utc));
+ reg_fun(intern(lit("time-parse"), user_package), func_n2(time_parse));
reg_fun(intern(lit("source-loc"), user_package), func_n1(source_loc));
reg_fun(intern(lit("source-loc-str"), user_package), func_n2o(source_loc_str, 1));