1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 03:40:34 +02:00

more -Wundef on darwin fixes

* libguile/threads.c:
* libguile/posix.c: Change a couple #if HAVE_FOO to #ifdef HAVE_FOO to
  pacify -Wundef. Some vars are defined or not, whereas some are always
  defined to 0 or 1. The inconsistency is unfortunate.
This commit is contained in:
Andy Wingo 2010-10-18 13:35:46 +02:00
parent c1a0ba1cef
commit 534bbcc168
2 changed files with 4 additions and 4 deletions

View file

@ -121,7 +121,7 @@ extern char *ttyname();
# include <xlocale.h> # include <xlocale.h>
#endif #endif
#if HAVE_CRYPT_H #ifdef HAVE_CRYPT_H
# include <crypt.h> # include <crypt.h>
#endif #endif
@ -1755,7 +1755,7 @@ SCM_DEFINE (scm_sync, "sync", 0, 0, 0,
multiple cpus. So for now we don't bother with anything fancy, just multiple cpus. So for now we don't bother with anything fancy, just
ensure it works. */ ensure it works. */
#if HAVE_CRYPT #ifdef HAVE_CRYPT
SCM_DEFINE (scm_crypt, "crypt", 2, 0, 0, SCM_DEFINE (scm_crypt, "crypt", 2, 0, 0,
(SCM key, SCM salt), (SCM key, SCM salt),
"Encrypt @var{key} using @var{salt} as the salt value to the\n" "Encrypt @var{key} using @var{salt} as the salt value to the\n"
@ -1841,7 +1841,7 @@ SCM_DEFINE (scm_getlogin, "getlogin", 0, 0, 0,
#undef FUNC_NAME #undef FUNC_NAME
#endif /* HAVE_GETLOGIN */ #endif /* HAVE_GETLOGIN */
#if HAVE_CUSERID #ifdef HAVE_CUSERID
# if !HAVE_DECL_CUSERID # if !HAVE_DECL_CUSERID
extern char *cuserid (char *); extern char *cuserid (char *);

View file

@ -630,7 +630,7 @@ scm_i_init_thread_for_guile (SCM_STACKITEM *base, SCM parent)
#if SCM_USE_PTHREAD_THREADS #if SCM_USE_PTHREAD_THREADS
#if HAVE_PTHREAD_ATTR_GETSTACK && HAVE_PTHREAD_GETATTR_NP #if defined HAVE_PTHREAD_ATTR_GETSTACK && defined HAVE_PTHREAD_GETATTR_NP
/* This method for GNU/Linux and perhaps some other systems. /* This method for GNU/Linux and perhaps some other systems.
It's not for MacOS X or Solaris 10, since pthread_getattr_np is not It's not for MacOS X or Solaris 10, since pthread_getattr_np is not
available on them. */ available on them. */