mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-18 17:50:29 +02:00
Code Activity

* eq.c (scm_equal_p): use "SCM_TYP7SD", not "SCM (TYP7SD".

Browse source 
* stime.c: include both <sys/times.h> and <sys/timeb.h> if the
system has them.  Hope this is safe.  Previously
sys/timeb.h was included if HAVE_FTIME was defined or if
HAVE_SYS_TIMEB_H was defined but HAVE_SYS_TIMES_H was not,
but IRIX iris 5.3 apparently has ftime but not sys/timeb.h.
This commit is contained in:
Gary Houston 1997-04-21 08:14:48 +00:00
parent 4fa5885b5c
commit b1978258f0
3 changed files with 16 additions and 14 deletions
Download patch file Download diff file Expand all files Collapse all files

20
libguile/stime.c
View file

@ -69,13 +69,13 @@
# endif
# endif
# ifdef HAVE_SYS_TIMES_H
# include <sys/times.h>
# else
# ifdef HAVE_SYS_TIMEB_H
# include <sys/timeb.h>
# endif
# endif
#ifdef HAVE_SYS_TIMES_H
# include <sys/times.h>
#endif
#ifdef HAVE_SYS_TIMEB_H
# include <sys/timeb.h>
#endif
#ifndef tzname /* For SGI. */
extern char *tzname[]; /* RS6000 and others reject char **tzname. */
@ -105,12 +105,6 @@ char *strptime ();
# endif
#endif
# ifdef HAVE_FTIME
# include <sys/timeb.h>
# endif
#ifdef __STDC__
# define timet time_t
#else