diff options
author | Marius Vollmer <mvo@zagadka.de> | 2004-01-07 18:03:18 +0000 |
---|---|---|
committer | Marius Vollmer <mvo@zagadka.de> | 2004-01-07 18:03:18 +0000 |
commit | dfe610a0856686bde529ec4d3b635ddf6d93f2cd (patch) | |
tree | 598761a68d07dc5720e372686bfd10c62a82a9f9 | |
parent | ba40113e70354f72b46001440963662e7985cf14 (diff) | |
download | guile-dfe610a0856686bde529ec4d3b635ddf6d93f2cd.tar.gz |
Did the follwing renamings: scm_with_blocked_asyncs ->
scm_frame_block_asyncs, scm_with_unblocked_asyncs ->
scm_frame_unblock_asyncs. Changed all uses.
-rw-r--r-- | libguile/async.c | 12 | ||||
-rw-r--r-- | libguile/async.h | 4 |
2 files changed, 8 insertions, 8 deletions
diff --git a/libguile/async.c b/libguile/async.c index 276292ac1..b4b8eb4e6 100644 --- a/libguile/async.c +++ b/libguile/async.c @@ -365,20 +365,20 @@ scm_c_call_with_unblocked_asyncs (void *(*proc) (void *data), void *data) } void -scm_with_blocked_asyncs () +scm_frame_block_asyncs () { - scm_on_rewind (increase_block, NULL, SCM_F_WIND_EXPLICITLY); - scm_on_unwind (decrease_block, NULL, SCM_F_WIND_EXPLICITLY); + scm_frame_rewind (increase_block, NULL, SCM_F_WIND_EXPLICITLY); + scm_frame_unwind (decrease_block, NULL, SCM_F_WIND_EXPLICITLY); } void -scm_with_unblocked_asyncs () +scm_frame_unblock_asyncs () { if (scm_root->block_asyncs == 0) scm_misc_error ("scm_with_unblocked_asyncs", "asyncs already unblocked", SCM_EOL); - scm_on_rewind (decrease_block, NULL, SCM_F_WIND_EXPLICITLY); - scm_on_unwind (increase_block, NULL, SCM_F_WIND_EXPLICITLY); + scm_frame_rewind (decrease_block, NULL, SCM_F_WIND_EXPLICITLY); + scm_frame_unwind (increase_block, NULL, SCM_F_WIND_EXPLICITLY); } diff --git a/libguile/async.h b/libguile/async.h index 3174c7a48..8bb1ef3e6 100644 --- a/libguile/async.h +++ b/libguile/async.h @@ -44,8 +44,8 @@ SCM_API SCM scm_call_with_blocked_asyncs (SCM proc); SCM_API SCM scm_call_with_unblocked_asyncs (SCM proc); void *scm_c_call_with_blocked_asyncs (void *(*p) (void *d), void *d); void *scm_c_call_with_unblocked_asyncs (void *(*p) (void *d), void *d); -void scm_with_blocked_asyncs (void); -void scm_with_unblocked_asyncs (void); +void scm_frame_block_asyncs (void); +void scm_frame_unblock_asyncs (void); SCM_API void scm_init_async (void); #if (SCM_ENABLE_DEPRECATED == 1) |