diff --git a/tools/inst-lisp b/tools/inst-lisp index 028ea6baf3c21518148553654951eddaa0ca3821..ae4f5fe9e203461b53c7dfd60b39ab9a6a5be456 100755 --- a/tools/inst-lisp +++ b/tools/inst-lisp @@ -1,4 +1,9 @@ #!/bin/csh -fx +# +# $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/Attic/inst-lisp,v 1.3 1992/05/27 18:13:12 wlott Exp $ +# +# Utility for installing an alpha core. +# if ($#argv) then set subdir = $argv[1] @@ -7,8 +12,8 @@ else endif set src = /afs/cs/project/clisp/build/@sys/$subdir -set dst = /afs/cs/misc/cmucl/@sys/alpha +set dst = /afs/cs/project/clisp-3/alphas/@sys -rm -f $dst/bin/lisp $dst/lib/lisp.core -cp -p $src/ldb/ldb $dst/bin/lisp -cp -p lisp.core $dst/lib/lisp.core +rm -f $dst/lisp $dst/lisp.core +cp -p $src/ldb/ldb $dst/lisp +cp -p lisp.core $dst/lisp.core