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

Provide ‘scm_i_is_finalizer_thread’ when building ‘--without-threads’.

Browse source 
Fixes a regression in ‘--without-threads’ builds introduced in
b8031fc965.

* libguile/finalizers.c (scm_i_is_finalizer_thread) [!SCM_USE_PTHREAD_THREADS]:
New function.
This commit is contained in:
Ludovic Courtès 2025-03-21 18:10:07 +01:00
parent 7dde220750
commit 462d3c85ed
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 9 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

10
libguile/finalizers.c
View file

@ -327,7 +327,15 @@ spawn_finalizer_thread (void)
start_finalization_thread (); start_finalization_thread ();
} }
#endif /* SCM_USE_PTHREAD_THREADS */ #else /* !SCM_USE_PTHREAD_THREADS */
int
scm_i_is_finalizer_thread (struct scm_thread *t)
{
return 0;
}
#endif /* !SCM_USE_PTHREAD_THREADS */