Update of /project/cells/cvsroot/cell-cultures/asdf-registry
In directory common-lisp.net:/tmp/cvs-serv5046/asdf-registry
Modified Files:
create-symlinks.sh
Log Message:
Re-port to Lispworks/win32
Date: Sat Nov 13 00:26:54 2004
Author: ktilton
Index: cell-cultures/asdf-registry/create-symlinks.sh
diff -u cell-cultures/asdf-registry/create-symlinks.sh:1.2 cell-cultures/asdf-registry/create-symlinks.sh:1.3
--- cell-cultures/asdf-registry/create-symlinks.sh:1.2 Mon Jul 5 21:26:44 2004
+++ cell-cultures/asdf-registry/create-symlinks.sh Sat Nov 13 00:26:54 2004
@@ -1,65 +1,32 @@
-rm -f asdf-aclproj.asd;
-if [ -d ../asdf-aclproj ]; then
- echo Adding asdf-aclproj.asd;
- ln -s ../asdf-aclproj/asdf-aclproj.asd asdf-aclproj.asd;
-fi
-
-rm -f cello.asd cellocore.asd;
-if [ -d ../cello ]; then
- echo Adding cello.asd;
- ln -s ../cello/cello.asd cello.asd;
-
- echo Adding cellocore.asd;
- ln -s ../cello/cellocore.asd cellocore.asd;
-fi
-
-rm -f cellodemo.asd;
-if [ -d ../cellodemo ]; then
- echo Adding cellodemo.asd;
- ln -s ../cellodemo/cellodemo.asd cellodemo.asd;
-fi
-
-rm -f cells.asd cells-test.asd;
-if [ -d ../cells ]; then
- echo Adding cells.asd;
- ln -s ../cells/cells.asd cells.asd;
-
- echo Adding cells-test.asd;
- ln -s ../cells/cells-test/cells-test.asd cells-test.asd;
-fi
-
-rm -f celtic.asd;
-if [ -d ../celtic ]; then
- echo Adding celtic.asd;
- ln -s ../celtic/celtic.asd celtic.asd;
-fi
-
-rm -f clyde.asd;
-if [ -d ../clyde ]; then
- echo Adding clyde.asd;
- ln -s ../clyde/clyde.asd clyde.asd;
-fi
-
-rm -f cl-magick.asd;
-if [ -d ../cl-magick ]; then
- echo Adding cl-magick.asd;
- ln -s ../cl-magick/cl-magick.asd cl-magick.asd;
-fi
-
-rm -f cl-openal.asd;
-if [ -d ../cl-openal ]; then
- echo Adding cl-openal.asd;
- ln -s ../cl-openal/cl-openal.asd cl-openal.asd;
-fi
-
-rm -f cl-opengl.asd;
-if [ -d ../cl-opengl ]; then
- echo Adding cl-opengl.asd;
- ln -s ../cl-opengl/cl-opengl.asd cl-opengl.asd;
-fi
-
-rm -f ffi-extender.asd;
-if [ -d ../ffi-extender ]; then
- echo Adding ffi-extender.asd;
- ln -s ../ffi-extender/ffi-extender.asd ffi-extender.asd;
-fi
+# Bash doesn't do macros, but how about a function or two?
+setlink() {
+ if [ -f $1 ]; then
+ ln -s $1 .
+ else
+ echo ASDF definition file $1 appears to be missing
+ fi
+}
+
+add() {
+ if [ -d ../$1 ]; then
+ echo Adding $1
+ setlink ../$1/$1.asd
+ else
+ echo Subproject $1 appears to be missing
+ fi
+}
+
+
+# Projects that follow the general pattern...
+PROJECTS="utils-kt asdf-aclproj cello cellodemo cells celtic clyde cl-magick cl-openal cl-opengl ffi-extender"
+# ..and projects that don't.
+FILES="../cello/cellocore.asd ../cells/cells-test/cells-test.asd"
+
+
+for project in $PROJECTS; do
+ add $project
+done
+
+for file in $FILES; do
+ setlink $file
+done