X-Git-Url: https://git.hcoop.net/bpt/guile.git/blobdiff_plain/0f2d19dd46f83f41177f61d585732b32a866d613..47ac1e47b9a539216e957c440f9f7ac10040a93d:/libguile/stime.h diff --git a/libguile/stime.h b/libguile/stime.h index c492d40fe..db40e74c6 100644 --- a/libguile/stime.h +++ b/libguile/stime.h @@ -1,22 +1,24 @@ /* classes: h_files */ -#ifndef TIMEH -#define TIMEH -/* Copyright (C) 1995,1996 Free Software Foundation, Inc. - * +#ifndef SCM_STIME_H +#define SCM_STIME_H + +/* Copyright (C) 1995,1996,1997,1998,2000 Free Software Foundation, Inc. + * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2, or (at your option) * any later version. - * + * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. - * + * * You should have received a copy of the GNU General Public License * along with this software; see the file COPYING. If not, write to - * the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA * * As a special exception, the Free Software Foundation gives permission * for additional uses of the text contained in its release of GUILE. @@ -40,36 +42,31 @@ * * If you write modifications of your own for GUILE, it is your choice * whether to permit this exception to apply to your modifications. - * If you do not wish that, delete this exception notice. - */ - - -#include "__scm.h" + * If you do not wish that, delete this exception notice. */ -#ifdef __STDC__ -extern SCM scm_get_internal_real_time(void); -extern SCM scm_get_internal_real_time(void); -extern SCM scm_get_internal_real_time(void); -extern SCM scm_get_internal_run_time(void); -extern SCM scm_current_time(void); -extern long scm_time_in_msec(long x); -extern void scm_init_stime(void); - -#else /* STDC */ -extern SCM scm_get_internal_real_time(); -extern SCM scm_get_internal_real_time(); -extern SCM scm_get_internal_real_time(); -extern SCM scm_get_internal_run_time(); -extern SCM scm_current_time(); -extern long scm_time_in_msec(); -extern void scm_init_stime(); - -#endif /* STDC */ - - +#include "libguile/__scm.h" + +SCM_API long scm_c_get_internal_run_time (void); +SCM_API SCM scm_get_internal_real_time (void); +SCM_API SCM scm_get_internal_run_time (void); +SCM_API SCM scm_current_time (void); +SCM_API SCM scm_gettimeofday (void); +SCM_API SCM scm_localtime (SCM time, SCM zone); +SCM_API SCM scm_gmtime (SCM time); +SCM_API SCM scm_mktime (SCM sbd_time, SCM zone); +SCM_API SCM scm_tzset (void); +SCM_API SCM scm_times (void); +SCM_API SCM scm_strftime (SCM format, SCM stime); +SCM_API SCM scm_strptime (SCM format, SCM string); +SCM_API void scm_init_stime (void); +#endif /* SCM_STIME_H */ -#endif /* TIMEH */ +/* + Local Variables: + c-file-style: "gnu" + End: +*/