mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-23 04:50:28 +02:00
Code Activity

fix scm_adjust_port_revealed_x FUNC_NAME

Browse source 
* libguile/ports.c (scm_adjust_port_revealed_x): Fix FUNC_NAME.
This commit is contained in:
Andy Wingo 2011-12-06 19:05:52 +01:00
parent c9caa6c88d
commit f5b870d816
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/ports.c
View file

@ -1188,7 +1188,7 @@ SCM_DEFINE (scm_adjust_port_revealed_x, "adjust-port-revealed!", 2, 0, 0,
(SCM port, SCM addend), (SCM port, SCM addend),
"Add @var{addend} to the revealed count of @var{port}.\n" "Add @var{addend} to the revealed count of @var{port}.\n"
"The return value is unspecified.") "The return value is unspecified.")
#define FUNC_NAME s_scm_set_port_revealed_x #define FUNC_NAME s_scm_adjust_port_revealed_x
{ {
scm_i_pthread_mutex_t *lock; scm_i_pthread_mutex_t *lock;
int a; int a;