diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2020-10-07 07:03:04 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2020-10-07 07:03:04 -0700 |
commit | dff49e8198641254308cf77cc953742acd5ad935 (patch) | |
tree | 687762fe9c57d7a0b9cd6f55d0b7416b716f1424 /time.h | |
parent | 7ced689e80d1733a40c6f51b764619c663e69345 (diff) | |
download | txr-dff49e8198641254308cf77cc953742acd5ad935.tar.gz txr-dff49e8198641254308cf77cc953742acd5ad935.tar.bz2 txr-dff49e8198641254308cf77cc953742acd5ad935.zip |
time: move time functions out of lib.c into time.c.
* Makefile (OBJS): Add new time.o.
* eval.c (eval_init): Registration of time functions is
removed from here; it is done in time_init now, in time.c.
* hash.c: Must #include "time.h" now.
* lib.c (time_s, time_local_s, time_utc_s, time_string_s,
time_parse_s, year_s, month_s, day_s, hour_s, min_s, sec_s,
dst_s, gmtoff_s, zone_s): Variable definitions removed.
These are now in time.c. Also declared in time.h.
(time_sec, time_sec_usec, gmtime_r, localtime_r, string_time,
time_string_local, time_string_utc, broken_time_list,
tm_to_time_struct, broken_time_struct, time_fields_local,
time_fields_utc, time_struct_local, time_struct_utc,
time_fields_to_tm, time_struct_to_tm, make_time_impl,
make_time, epoch_tm, strptime_wrap, time_parse, setenv,
unsetenv, timegm_hack, make_time_utc, time_meth,
time_string_meth, time_parse_meth, time_parse_local,
time_parse_utc): Functions removed. These are now in time.c.
(time_init): Removed, and now in time.c as an external
function.
* lib.h (time_sec, time_sec_usec, time_string_local,
time_string_utc, time_fields_local, time_fields_utc,
time_struct_local, time_struct_utc, make_time, make_time_utc,
time_parse, time_parse_local, time_parse_utc): Declarations
removed. Now in time.h.
* rand.c: Must #include "time.h" now.
* time.c: New file.
* time.h: New file.
Diffstat (limited to 'time.h')
-rw-r--r-- | time.h | 51 |
1 files changed, 51 insertions, 0 deletions
@@ -0,0 +1,51 @@ +/* Copyright 2015-2020 + * Kaz Kylheku <kaz@kylheku.com> + * Vancouver, Canada + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions are met: + * + * 1. Redistributions of source code must retain the above copyright notice, this + * list of conditions and the following disclaimer. + * + * 2. Redistributions in binary form must reproduce the above copyright notice, + * this list of conditions and the following disclaimer in the documentation + * and/or other materials provided with the distribution. + * + * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED + * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE + * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR + * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER + * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, + * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE + * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + */ + +extern val time_s, time_local_s, time_utc_s, time_string_s, time_parse_s; +extern val year_s, month_s, day_s, hour_s, min_s, sec_s; +extern val dst_s, gmtoff_s, zone_s; + +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 time_struct_local(val time); +val time_struct_utc(val time); +val make_time(val year, val month, val day, + val hour, val minute, val second, + val isdst); +val make_time_utc(val year, val month, val day, + val hour, val minute, val second, + val isdst); +#if HAVE_STRPTIME +val time_parse(val format, val string); +val time_parse_local(val format, val string); +val time_parse_utc(val format, val string); +void time_init(void); +#endif |