HCoop / bpt / guile.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 108e4c5) | patch
Implement `scm_without_guile ()' in terms of `GC_do_blocking ()'.
authorLudovic Courtès <ludo@gnu.org>
Thu, 18 Sep 2008 20:55:16 +0000 (22:55 +0200)
committerLudovic Courtès <ludo@gnu.org>
Thu, 18 Sep 2008 20:55:16 +0000 (22:55 +0200)
commit72e6b60838ee9cfb80b6a5c24531c8b924d703db
tree87e2df17c1b850ce12377d627d898d16aa6df168tree | snapshot (tar.gz zip)
parent108e4c5b6449e89223afe696935c23deb4fc11f1commit | diff
Implement `scm_without_guile ()' in terms of `GC_do_blocking ()'.

* libguile/threads.c (guilify_self_1): Initialize `t->guile_mode'.
  (guilify_self_2): Likewise.
  (struct without_guile_arg): New type.
  (without_guile_trampoline): New function.
  (scm_without_guile): Implement in terms of `GC_do_blocking ()'.

* libguile/threads.h (scm_i_thread)[guile_mode]: New field.
libguile/threads.c diff | blob | blame | history
libguile/threads.h diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.