#!/bin/sh -e
unset IFS
if test -n "$1"; then
	cd "$1"
fi
find `pwd`/ -name \*.asd | \
	while read f; do
		name=`basename "$f"`
		target=`readlink -f "$f"`
		ln -sf "$f" /opt/steeldump/lib/sbcl/site-systems/
		echo "$name -> $f"
	done