mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-24 13:30:21 +02:00
Code Activity

(scm_crypt): Use new HAVE_CRYPT.

Browse source 
(<crypt.h>): Remove HAVE_LIBCRYPT condition.
Reported by Andreas Voegele.
This commit is contained in:
Kevin Ryde 2004-02-21 21:23:11 +00:00
parent dce50cd6c9
commit 0dcddc2da9
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
libguile/posix.c
View file

@ -147,7 +147,7 @@ extern char ** environ;
#include <locale.h>
#endif
#if HAVE_LIBCRYPT && HAVE_CRYPT_H
#if HAVE_CRYPT_H
# include <crypt.h>
#endif
@ -1343,7 +1343,7 @@ SCM_DEFINE (scm_sync, "sync", 0, 0, 0,
#undef FUNC_NAME
#endif /* HAVE_SYNC */
#if HAVE_LIBCRYPT && HAVE_CRYPT_H
#if HAVE_CRYPT
SCM_DEFINE (scm_crypt, "crypt", 2, 0, 0,
(SCM key, SCM salt),
"Encrypt @var{key} using @var{salt} as the salt value to the\n"
@ -1361,7 +1361,7 @@ SCM_DEFINE (scm_crypt, "crypt", 2, 0, 0,
return scm_makfrom0str (p);
}
#undef FUNC_NAME
#endif /* HAVE_LIBCRYPT && HAVE_CRYPT_H */
#endif /* HAVE_CRYPT */
#if HAVE_CHROOT
SCM_DEFINE (scm_chroot, "chroot", 1, 0, 0,