fix older versions of mzscheme detection
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@11116 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
parent
de17a4bcca
commit
3b27d574e2
1 changed files with 2 additions and 2 deletions
|
|
@ -1214,8 +1214,8 @@ else
|
||||||
if test -f "$MZDYNOBJ"; then
|
if test -f "$MZDYNOBJ"; then
|
||||||
MZDYNOBJ="$MZDYNOBJ"
|
MZDYNOBJ="$MZDYNOBJ"
|
||||||
else
|
else
|
||||||
# older versions
|
# older versions (3.72 approx and earlier)
|
||||||
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)))))' 2>/dev/null`
|
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)) (expand-for-link-variant (current-standard-link-libraries)))))' 2>/dev/null`
|
||||||
fi
|
fi
|
||||||
if test -f "$MZDYNOBJ"; then
|
if test -f "$MZDYNOBJ"; then
|
||||||
AC_MSG_RESULT($MZDYNOBJ)
|
AC_MSG_RESULT($MZDYNOBJ)
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue