*** /site/uio/cm-sys/clm-2/all.lisp 2004-07-14 11:53:27.000000000 +0200 --- /site/uio/cm-sys/clm-2/all.lisp~ 2004-06-30 12:03:14.000000000 +0200 *************** *** 153,168 **** ;;; (defvar reconfigure #+reconfigure t #-reconfigure nil) ! (if (not (probe-file (concatenate 'string clm-bin-directory "config.h"))) ! (setf reconfigure t)) (defvar configure) (if reconfigure (progn ! ;;(setf configure "./configure --quiet -with-doubles --with-float-samples") ! (setf configure ! (concatenate 'string clm-directory ! "configure --quiet -with-doubles --with-float-samples")) ! #+alsa (setf configure (concatenate 'string configure " --with-alsa")) #+jack (setf configure (concatenate 'string configure " --with-jack")) --- 153,163 ---- ;;; (defvar reconfigure #+reconfigure t #-reconfigure nil) ! (if (not (probe-file "config.h")) (setf reconfigure t)) (defvar configure) (if reconfigure (progn ! (setf configure "./configure --quiet -with-doubles --with-float-samples") #+alsa (setf configure (concatenate 'string configure " --with-alsa")) #+jack (setf configure (concatenate 'string configure " --with-jack")) *************** *** 729,744 **** #+(and mcl (not (or openmcl no-ffi))) (compile-and-load "menu") #-(or no-ffi clisp) (compile-and-load "clm1") ; added 15-Apr-02 - ;;; move config.h, config.log, config.status to clm-bin-directory - - (if reconfigure - (progn (format t "; moving config.* -> clm-bin-directory~%" configure) - (extensions:run-program "/bin/csh" - (list "-fc" - (format nil "mv config.* ~A" clm-bin-directory)) - :output t))) - - ;;; -------------------------------- ;;; initialize CLM --- 722,727 ----