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

(get_thread_stack_base): Restrict HAVE_PTHREAD_GETATTR_NP

Browse source 
on pthreads version, since pthread_getattr_np not available on solaris
and macos.  Reported by Claes Wallin.
This commit is contained in:
Kevin Ryde 2006-07-25 00:09:30 +00:00
parent 658b7fa124
commit 3d9ff38eac
1 changed files with 3 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
libguile/threads.c
View file

@ -571,7 +571,8 @@ scm_i_init_thread_for_guile (SCM_STACKITEM *base, SCM parent)
} }
#if SCM_USE_PTHREAD_THREADS #if SCM_USE_PTHREAD_THREADS
#ifdef HAVE_PTHREAD_ATTR_GETSTACK /* pthread_getattr_np not available on MacOS X and Solaris 10. */
#if HAVE_PTHREAD_ATTR_GETSTACK && HAVE_PTHREAD_GETATTR_NP
#define HAVE_GET_THREAD_STACK_BASE #define HAVE_GET_THREAD_STACK_BASE
@ -605,7 +606,7 @@ get_thread_stack_base ()
} }
} }
#endif /* HAVE_PTHREAD_ATTR_GETSTACK */ #endif /* HAVE_PTHREAD_ATTR_GETSTACK && HAVE_PTHREAD_GETATTR_NP */
#else /* !SCM_USE_PTHREAD_THREADS */ #else /* !SCM_USE_PTHREAD_THREADS */