build: Support Debian build, install.
[mes.git] / build-aux / build-guile.sh
index 75e826ccea3d7b04856b912db46de3c49784fc04..f4e9547df55ec20357b5206933b85e3358c5d528 100755 (executable)
@@ -23,8 +23,10 @@ if [ -n "$BUILD_DEBUG" ]; then
 fi
 
 export GUILE
+export GUILE_AUTO_COMPILE
 GUILE=${GUILE-$(command -v guile)}
 GUILE_TOOLS=${GUILE_TOOLS-$(command -v guile-tools)}
+GUILE_AUTO_COMPILE=0
 
 set -e
 
@@ -45,13 +47,17 @@ guile/mescc/preprocess.scm
 export srcdir=.
 export host=$($GUILE -c "(display %host-type)")
 
+if [ "$GUILE_EFFECTIVE_VERSION" = "2.0" ]; then
+    abs=$PWD/
+fi
+
 #$GUILE --no-auto-compile -L guile -C guile -s build-aux/compile-all.scm $SCM_FILES
 
 for i in $SCM_FILES; do
     go=${i%%.scm}.go
     if [ $i -nt $go ]; then
         echo "  GUILEC $i"
-        $GUILE_TOOLS compile -L guile -L scripts -o $go $i
+        $GUILE_TOOLS compile -L ${abs}guile -L ${abs}scripts -o $go $i
     fi
 done
 
@@ -63,6 +69,6 @@ for i in $SCRIPTS; do
     go=${i%%.scm}.go
     if [ $i -nt $go ]; then
         echo "  GUILEC $i"
-        $GUILE_TOOLS compile -L guile -L scripts -o $go $i
+        $GUILE_TOOLS compile -L ${abs}guile -L ${abs}scripts -o $go $i
     fi
 done