head     1.1;
access   ;
symbols  ;
locks    ; strict;
comment  @# @;


1.1
date     90.07.16.10.42.06;  author jwh;  state Exp;
branches ;
next     ;


desc
@@



1.1
log
@Initial revision
@
text
@PLANNAME=qaplan.li
i=`ls *.mm 2>/dev/null`
if [ "$i" = "" ]
then
	: no mm files to be wiped out, carry on.
else
	echo "These files shouldn't be here:\n$i\nCan not make test plan."
	exit 1
fi

echo "\nCollecting the test plan files."
for i in `ls RCS/*.mm*`
do
	rcsname=`basename $i ,v`
	co $rcsname
done

echo "\nBuilding the test plan..."
mm qamain.mm > $PLANNAME

echo "\nCleaning up..."
rm -f *.mm
rm -f *.tbl

echo "\nTest plan in: $PLANNAME\n"
@
