[PPL-devel] [GIT] ppl/ppl(master): Remove the drive indication SWI-Prolog prepends to the PLBASE path under Windows .

Roberto Bagnara bagnara at cs.unipr.it
Sun Mar 25 12:01:23 CEST 2012


Module: ppl/ppl
Branch: master
Commit: 4580fa8886eae9074274fe1fbc0636757288b152
URL:    http://www.cs.unipr.it/git/gitweb.cgi?p=ppl/ppl.git;a=commit;h=4580fa8886eae9074274fe1fbc0636757288b152

Author: Roberto Bagnara <bagnara at cs.unipr.it>
Date:   Sun Mar 25 11:59:44 2012 +0200

Remove the drive indication SWI-Prolog prepends to the PLBASE path under Windows.

---

 m4/ac_check_swi_prolog.m4 |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/m4/ac_check_swi_prolog.m4 b/m4/ac_check_swi_prolog.m4
index f36683e..0b0ed5b 100644
--- a/m4/ac_check_swi_prolog.m4
+++ b/m4/ac_check_swi_prolog.m4
@@ -45,7 +45,7 @@ then
 fi
 if test x$swi_prolog != x
 then
-  swi_prolog_base=`$swi_prolog -dump-runtime-variables | grep PLBASE= | sed 's/PLBASE="\(.*\)";/\1/'`
+  swi_prolog_base=`$swi_prolog -dump-runtime-variables | grep PLBASE= | sed 's/PLBASE="\([[a-z]]:\)\{0,1\}\(.*\)";/\2/'`
   swi_prolog_version=`$swi_prolog -dump-runtime-variables | grep PLVERSION= | sed 's/PLVERSION="\(.*\)";/\1/'`
   swi_prolog_arch=`$swi_prolog -dump-runtime-variables | grep PLARCH= | sed 's/PLARCH="\(.*\)";/\1/'`
   swi_prolog_libs=`$swi_prolog -dump-runtime-variables | grep PLLIBS= | sed 's/PLLIBS="\(.*\)";/\1/'`




More information about the PPL-devel mailing list