#!/bin/csh -f

echo "(setq load-path" > loadpath
echo "      (nconc '("'"."' >> loadpath
echo '               "'`pwd`'"' >> loadpath
echo '               "'`(cd ../tl; pwd)`'"' >> loadpath
echo '               "'`(cd ../mel; pwd)`'"' >> loadpath
foreach i ($argv)
echo '               "'$i'"' >> loadpath
end
echo '               ) load-path))' >> loadpath