#this file should be sourced while cd = src/../
if !(-d src) then
echo 'directory src/ not present'; exit
endif
mkdir lisp
cd lisp
ln -s ../src/ChangeLog ChangeLog
ln -s ../src/scl.lisp scl.lisp
ln -s ../src/std.grm std.grm
ln -s ../src/compilem.lisp compilem.lisp

ln -s ../src/vect vect.lisp
ln -s ../src/parse parse.lisp
ln -s ../src/ext ext.lisp
ln -s ../src/norm norm.lisp
ln -s ../src/math math.lisp
ln -s ../src/builtin builtin.lisp
ln -s ../src/poly poly.lisp
ln -s ../src/sexp sexp.lisp
ln -s ../src/types types.lisp
etags *.lisp
cd ../
mkdir cl
cd cl
ln -s ../src/ChangeLog ChangeLog
ln -s ../src/scl.lisp scl.cl
ln -s ../src/std.grm std.grm
ln -s ../src/compilem.lisp compilem.cl

ln -s ../src/vect vect.cl
ln -s ../src/parse parse.cl
ln -s ../src/ext ext.cl
ln -s ../src/norm norm.cl
ln -s ../src/math math.cl
ln -s ../src/builtin builtin.cl
ln -s ../src/poly poly.cl
ln -s ../src/sexp sexp.cl
ln -s ../src/types types.cl
etags *.cl
cd ../
mkdir l
cd l
ln -s ../src/ChangeLog ChangeLog
ln -s ../src/scl.lisp scl.l
ln -s ../src/std.grm std.grm
ln -s ../src/compilem.lisp compilem.l

ln -s ../src/vect vect.l
ln -s ../src/parse parse.l
ln -s ../src/ext ext.l
ln -s ../src/norm norm.l
ln -s ../src/math math.l
ln -s ../src/builtin builtin.l
ln -s ../src/poly poly.l
ln -s ../src/sexp sexp.l
ln -s ../src/types types.l
etags *.l
cd ../
mkdir scm
cd scm
ln -s ../src/ChangeLog ChangeLog
ln -s ../src/scl.scm scl.scm
ln -s ../src/std.grm std.grm

ln -s ../src/vect vect.scm
ln -s ../src/parse parse.scm
ln -s ../src/ext ext.scm
ln -s ../src/norm norm.scm
ln -s ../src/math math.scm
ln -s ../src/builtin builtin.scm
ln -s ../src/poly poly.scm
ln -s ../src/sexp sexp.scm
ln -s ../src/types types.scm
etags *.scm
cd ../
