* lib.c (broken_down_time_list): New static function.

(time_fields_local, time_fields_utc): New functions.

* lib.h (time_fields_local, time_fields_utc): Declared.

* eval.c (eval_init): Intern time_fields_local and time_fields_utc
as intrinsic functions.

* txr.1: Documented.

1 files changed, 2 insertions, 0 deletions

diff --git a/lib.h b/lib.h
index d5158b64..80d1874c 100644
--- a/lib.h
+++ b/lib.h
@@ -687,6 +687,8 @@ val time_sec(void);
 val time_sec_usec(void);
 val time_string_local(val time, val format);
 val time_string_utc(val time, val format);
+val time_fields_local(val time);
+val time_fields_utc(val time);
 val make_time(val year, val month, val day,
               val hour, val minute, val second,
               val isdst);