[MzScheme] Update dynext discovery code for MzScheme 205.
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@5369 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
parent
734e61b869
commit
173fdb31bd
1 changed files with 1 additions and 1 deletions
|
|
@ -911,7 +911,7 @@ AC_PATH_PROG(MZSCHEME, mzscheme)
|
|||
|
||||
if test -n "$MZSCHEME"; then
|
||||
AC_MSG_CHECKING(for MzScheme dynext object)
|
||||
MZDYNOBJ=`$MZSCHEME --mute-banner --version --eval '(begin (require (lib "link.ss" "dynext"))(for-each (lambda (x) (display x) (display " ")) ((current-make-standard-link-libraries))))'`
|
||||
MZDYNOBJ=`$MZSCHEME --mute-banner --version --eval '(begin (require (lib "link.ss" "dynext")) (with-handlers (((lambda args #t) (lambda args #f))) (for-each (lambda (x) (display x) (display " ")) ((current-make-standard-link-libraries)))) (with-handlers (((lambda args #t) (lambda args #f))) (for-each (lambda (x) (display x) (display " ")) (expand-for-link-variant (current-standard-link-libraries)))))'`
|
||||
AC_MSG_RESULT($MZDYNOBJ)
|
||||
fi
|
||||
AC_SUBST(MZDYNOBJ)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue