#!/bin/csh -fx
#
# $Header: inst-lisp,v 1.8 94/03/17 17:34:25 ram Exp $
#
# Utility for installing an alpha core.
#

if ($#argv > 0) then
	set subdir = $argv[1]
else
	set subdir = alpha
endif

if ($#argv > 1) then
	set destver = $argv[2]
else
	set destver = alpha
endif

set src = /afs/cs/project/clisp/build/@sys/$subdir
set dst = /afs/cs/project/clisp-3/${destver}s/@sys

rm -f $dst/lisp
rm -f $dst/lisp.core
rm -f $dst/site-init.*
rm -f $dst/motifd

cp -p $src/lisp/lisp $dst/lisp
cp -p lisp.core $dst/lisp.core
cp -p $src/code/cmu-site.*f $dst
cp -p $src/motif/server/motifd $dst
