diff options
| author | Mark H Weaver <mhw@netris.org> | 2014-06-01 19:08:25 -0400 |
|---|---|---|
| committer | Mark H Weaver <mhw@netris.org> | 2014-06-01 19:12:25 -0400 |
| commit | 12c6a47773041ff5d0a3553421d2f358d9e479a9 (patch) | |
| tree | bfeeb6ccc9c687bae75a8a678532867a1c79383a | |
| parent | a43fa1b70688b09a9eecac3c2ce8e9adea63bab6 (diff) | |
| download | guile-12c6a47773041ff5d0a3553421d2f358d9e479a9.tar.gz | |
Mark system async functions as SCM_API.
Fixes <http://bugs.gnu.org/17661>.
Reported and fixed by Chris Vine <chris@cvine.freeserve.co.uk>.
* libguile/async.h (scm_c_call_with_blocked_asyncs)
(scm_c_call_with_unblocked_asyncs, scm_dynwind_block_asyncs)
(scm_dynwind_unblock_asyncs): Mark as SCM_API.
* THANKS: Add Chris Vine to fixes section.
| -rw-r--r-- | THANKS | 1 | ||||
| -rw-r--r-- | libguile/async.h | 11 |
2 files changed, 7 insertions, 5 deletions
@@ -182,6 +182,7 @@ For fixes or providing information which led to a fix: Aaron VanDevender Sjoerd Van Leent Andreas Vögele + Chris Vine Michael Talbot-Wilson Michael Tuexen Xin Wang diff --git a/libguile/async.h b/libguile/async.h index b3503de9a..3da808e10 100644 --- a/libguile/async.h +++ b/libguile/async.h @@ -3,7 +3,8 @@ #ifndef SCM_ASYNC_H #define SCM_ASYNC_H -/* Copyright (C) 1995,1996,1997,1998,2000,2001, 2002, 2004, 2005, 2006, 2008, 2009 Free Software Foundation, Inc. +/* Copyright (C) 1995-1998, 2000-2002, 2004-2006, 2008, 2009, + * 2014 Free Software Foundation, Inc. * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public License @@ -44,10 +45,10 @@ SCM_API SCM scm_run_asyncs (SCM list_of_a); SCM_API SCM scm_noop (SCM args); 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_dynwind_block_asyncs (void); -void scm_dynwind_unblock_asyncs (void); +SCM_API void *scm_c_call_with_blocked_asyncs (void *(*p) (void *d), void *d); +SCM_API void *scm_c_call_with_unblocked_asyncs (void *(*p) (void *d), void *d); +SCM_API void scm_dynwind_block_asyncs (void); +SCM_API void scm_dynwind_unblock_asyncs (void); /* Critical sections */ |