mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-13 15:10:34 +02:00
Code Activity

* readline.c (match_paren): Bugfix: First arg to select is not

Browse source 
number of descriptors but the number of the highest descriptor +
1.

* readline.c (scm_init_readline): Added new arg to scm_init_mutex.
This commit is contained in:
Mikael Djurfeldt 2000-03-12 00:35:00 +00:00
parent dd276c8eb3
commit 053f9faad7
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
guile-readline/readline.c
View file

@ -496,7 +496,7 @@ match_paren (int x, int k)
if (rl_point > -1) if (rl_point > -1)
{ {
rl_redisplay (); rl_redisplay ();
scm_internal_select (1, &readset, NULL, NULL, &timeout); scm_internal_select (fileno + 1, &readset, NULL, NULL, &timeout);
} }
rl_point = tmp; rl_point = tmp;
} }
@ -517,7 +517,7 @@ scm_init_readline ()
rl_readline_name = "Guile"; rl_readline_name = "Guile";
#ifdef USE_THREADS #ifdef USE_THREADS
scm_mutex_init (&reentry_barrier_mutex); scm_mutex_init (&reentry_barrier_mutex, NULL);
#endif #endif
scm_init_opts (scm_readline_options, scm_init_opts (scm_readline_options,
scm_readline_opts, scm_readline_opts,