#! /bin/csh -fx
###############################################################################
#
# File:           PDIST:MAKE-psl_pvm
# Description:    This file constructs a new fullpsl_pvm
# Author:         Harold Carr and Leigh Stoller
# Created:        
# Modified:       
# Mode:           C Shell
# Package:        Tools
#
# (c) Copyright 1986, University of Utah, all rights reserved.
#
###############################################################################
#
# Revisions:
#
# 17-Mar-87 (Harold Carr & Leigh Stoller)
#  General cleaning in preparation for 3.4 release. Nothing interesting.
#
###############################################################################

pushd $psys
if ( -e $psys/.imago) then
    mv -f $psys/psl_pvm.img $psys/old-psl_pvm.img
  else
    mv -f $psys/psl_pvm $psys/old-psl_pvm
endif


setenv Savingpsl_pvm yes		# skip user startup before savesystem

$psys/bare-psl_pvm << EOF
(setq loaddirectories* '("" "$pl/" "$pll/"))
(on verboseload)
(load init-file)
(load debug useful common)
(load numeric-ops)
(off verboseload)
(savesystem "psl 3.4 with pvm 1.3" "\$psys/psl_pvm" '((read-init-file "psl_pvm")))
(exitlisp)
EOF

@ pslcompstatus = $status
popd

if ( -e $psys/.imago) then
    $psys/sparsify $psys/psl_pvm.img
  else
    $psys/sparsify $psys/psl_pvm
endif

@ status = $pslcompstatus

# End of file.
