guile/guile-core check-guile.in

[Gary Houston]

CVSROOT:        /cvs
Module name:    guile
Changes by:     Gary Houston <address@hidden>   01/03/19 04:38:40

Modified files:
        guile-core     : check-guile.in 

Log message:
        * check-guile.in: rename $parent to $srcdir.  if it's equal to "."
        set it to `pwd`.

CVSWeb URLs:
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-core/check-guile.in.diff?r1=1.2&r2=1.3

Patches:
Index: guile/guile-core/check-guile.in
diff -u guile/guile-core/check-guile.in:1.2 guile/guile-core/check-guile.in:1.3
--- guile/guile-core/check-guile.in:1.2 Sun Mar 18 15:17:32 2001
+++ guile/guile-core/check-guile.in     Mon Mar 19 04:38:40 2001
@@ -11,9 +11,12 @@
 #
 # Dependencies: dirname sed
 
address@hidden@/test-suite
address@hidden@
 build_dir=`pwd`
address@hidden@
+if [ x"$srcdir" = x. ]; then
+    srcdir=$build_dir
+fi
+TEST_SUITE_DIR=$srcdir/test-suite
 
 if [ x"$1" = x-i ] ; then
     guile=$2
@@ -22,14 +25,14 @@
     glp=
 else
     guile=$build_dir/libguile/guile
-    glp=$parent
+    glp=$srcdir
 fi
 
 if [ -f "$guile" -a -x "$guile" ] ; then
     echo Testing $guile ... "$@"
     if [ x"$glp" = x ] ; then
         glp=`$guile -c "(for-each write-line %load-path)"`
-        glp=`echo $glp | sed 's/ /:/g'`:$parent
+        glp=`echo $glp | sed 's/ /:/g'`:$srcdir
     fi
     GUILE_LOAD_PATH=$glp
     export GUILE_LOAD_PATH