Merge remote-tracking branch 'origin/stable-2.0'

diff --cc libguile/guardians.c
index f2651a8,d6cfb2f..86e39ee
--- 1/libguile/guardians.c
--- 2/libguile/guardians.c
+++ b/libguile/guardians.c
@@@ -145,9 -142,9 +144,9 @@@ finalize_guarded (void *ptr, void *fina
          continue;
        }
  
 -      g = GUARDIAN_DATA (SCM_CAR (guardian_list));
 +      g = GUARDIAN_DATA (guardian);
  
-       scm_i_pthread_mutex_lock_block_asyncs (&g->mutex);
+       scm_i_pthread_mutex_lock (&g->mutex);
  
        if (g->live == 0)
        abort ();