mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-09 21:40:33 +02:00
Code Activity

(LIBGUILEREADLINE-VERSION): Use this file from $srcdir.

Browse source
This commit is contained in:
Thien-Thi Nguyen 2002-02-26 07:16:12 +00:00
parent 89d7a92c0a
commit 88a1ce4c0e
1 changed files with 6 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

12
guile-readline/configure.in
View file

@ -26,7 +26,7 @@ fi
AC_SUBST(EXTRA_DEFS) AC_SUBST(EXTRA_DEFS)
for termlib in ncurses curses termcap terminfo termlib ; do for termlib in ncurses curses termcap terminfo termlib ; do
AC_CHECK_LIB(${termlib}, tgoto, AC_CHECK_LIB(${termlib}, tgoto,
[LIBS="-l${termlib} $LIBS"; break]) [LIBS="-l${termlib} $LIBS"; break])
done done
@ -74,20 +74,20 @@ hook ()
sigaction (SIGWINCH, NULL, &action); sigaction (SIGWINCH, NULL, &action);
rl_cleanup_after_signal(); rl_cleanup_after_signal();
/* exit with 0 if readline disabled SA_RESTART */ /* exit with 0 if readline disabled SA_RESTART */
exit (action.sa_flags & SA_RESTART); exit (action.sa_flags & SA_RESTART);
} }
int int
main () main ()
{ {
struct sigaction action; struct sigaction action;
sigaction (SIGWINCH, NULL, &action); sigaction (SIGWINCH, NULL, &action);
action.sa_flags |= SA_RESTART; action.sa_flags |= SA_RESTART;
sigaction (SIGWINCH, &action, NULL); sigaction (SIGWINCH, &action, NULL);
rl_pre_input_hook = hook; rl_pre_input_hook = hook;
readline (""); readline ("");
}], }],
@ -119,7 +119,7 @@ fi
AC_CHECK_FUNCS(strdup) AC_CHECK_FUNCS(strdup)
. ./LIBGUILEREADLINE-VERSION . $srcdir/LIBGUILEREADLINE-VERSION
AC_SUBST(LIBGUILEREADLINE_INTERFACE_CURRENT) AC_SUBST(LIBGUILEREADLINE_INTERFACE_CURRENT)
AC_SUBST(LIBGUILEREADLINE_INTERFACE_REVISION) AC_SUBST(LIBGUILEREADLINE_INTERFACE_REVISION)
AC_SUBST(LIBGUILEREADLINE_INTERFACE_AGE) AC_SUBST(LIBGUILEREADLINE_INTERFACE_AGE)