#! /bin/sh

if [ $# != 1 ] ; then
	echo Usage: dir to install to 1>&2
	exit 1
fi

set -e

for file in lisp lisp.clcore ; do
	test -f "$file" || { echo $file does not exist; exit 1 ; }
done

for dir in bin lib lib/subsystems ; do
	test -d $1/$dir || mkdir $1/$dir
done

#test -f $1/bin/lisp && mv $1/bin/lisp $1/bin/lisp.old
#test -f $1/lib/lisp.clcore && mv $1/lib/lisp.clcore $1/lib/lisp.clcore.old
#test -f $1/lib/load-foreign.csh && mv $1/lib/load-foreign.csh $1/lib/load-foreign.csh.old

cp -f lisp $1/bin/.
cp -f lisp.clcore $1/lib/.
cp -f ../*/*-library.* $1/lib/subsystems/.
chmod -R a+r $1/.
if [ -f /home/cracauer/preserve/install-cmucl-script ] ; then
	sh /home/cracauer/preserve/install-cmucl-script
fi