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

* simpos.c (SYSTNAME): Accept both 'unix' and '__unix' as

Browse source 
indications of Unixness.
* stime.c: Same.
This commit is contained in:
Jim Blandy 1997-02-04 22:00:42 +00:00
parent abda0c5959
commit cda553163a
2 changed files with 3 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/simpos.c
View file

@ -106,7 +106,7 @@ scm_getenv(nam)
#ifdef vms
# define SYSTNAME "VMS"
#endif
#ifdef unix
#if defined (unix) || defined (__unix)
# define SYSTNAME "UNIX"
#endif
#ifdef MWC

3
libguile/stime.c
View file

@ -75,10 +75,11 @@
# endif
# endif
/* This should be figured out by autoconf. */
#ifdef CLK_TCK
# define CLKTCK CLK_TCK
# ifdef CLOCKS_PER_SEC
# ifdef unix
# if defined (unix) || defined (__unix)
# ifndef ARM_ULIB
# include <sys/times.h>
# endif