#! /bin/sh
# PCP QA Test No. 330
# Interp mode (similar to qa/091, but with purify) (see also 391)
#
# Copyright (c) 1995-2002 Silicon Graphics, Inc.  All Rights Reserved.
#

seq=`basename $0`
echo "QA output created by $seq"

# get standard filters
. ./common.product
. ./common.filter
. ./common.check

_filter()
{
    $PCP_AWK_PROG '
BEGIN			{ skip = 1 }
/ Purify /		{ skip = 0 }
/^FIU/			{ skip = 2; next }
/^[^ 	]/ && skip == 2	{ skip = 0 }
skip == 0		{ print }'
}

_check_purify src/interp1

status=1	# failure is the default!
trap "cd $here; rm -rf $tmp; exit \$status" 0 1 2 3 15

# real QA test starts here
_setup_purify src/interp1

for arch in tmparch/foo tmparch/mv-foo tmparch/noti-foo
do
    echo
    echo "=== archive $arch ==="
    echo
    echo "metric: sample.seconds"
    _run_purify -s 6 -a $here/$arch sample.seconds | _filter

    echo
    echo "metric: sample.bin"
    _run_purify -s 6 -a $here/$arch sample.bin | _filter

    echo
    echo "metric: sample.colour"
    _run_purify -s 6 -a $here/$arch sample.colour | _filter

    echo
    echo "metric: sample.drift"
    _run_purify -s 6 -a $here/$arch sample.drift | _filter

    echo
    echo "metric: sample.lights"
    _run_purify -s 6 -a $here/$arch sample.lights | _filter
done

# all done
status=0
exit

