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

* dynl-vms.c, debug.c, coop-threads.c, backtrace.c, eval.c: More

Browse source 
SCM_NIMP tests that were redundant are now eliminated.  Patches
from Dirk Hermann applied by hand.
This commit is contained in:
Greg J. Badros 2000-01-03 16:26:28 +00:00
parent d00ae47e13
commit cabe682ce6
5 changed files with 8 additions and 122 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/coop-threads.c
View file

@ -413,7 +413,7 @@ scm_make_mutex (void)
SCM
scm_lock_mutex (SCM m)
{
SCM_ASSERT (SCM_NIMP (m) && SCM_MUTEXP (m), m, SCM_ARG1, s_lock_mutex);
SCM_ASSERT (SCM_MUTEXP (m), m, SCM_ARG1, s_lock_mutex);
coop_mutex_lock (SCM_MUTEX_DATA (m));
return SCM_BOOL_T;
}