#!/bin/csh -f
#
#  mk-lisp -- script for building full lisp cores.
#
# $Header: mk-lisp,v 1.7 91/10/03 13:55:08 ram Exp $

set features = ($argv)

set wlott = /afs/cs/project/clisp/hackers/wlott
set lisp = $wlott/gengc
set lispdir = $wlott/c-code/PMAX/lisp
set core = $lispdir/kernel.core

echo Building gengc lisp.core.

$lispdir/lisp -core $core << EOF
(setf *features* (list* $features *features*))
(setf (search-list "lisp:") '("$lisp/"))
(setf *gc-verbose* nil)
(in-package "USER")
(load (open "lisp:tools/worldload.lisp"))
GenGC
(quit)
EOF

echo