| 318 |
num=`grep -c "^$key" ./plist` |
num=`grep -c "^$key" ./plist` |
| 319 |
fi |
fi |
| 320 |
#- discard unsafe test: |
#- discard unsafe test: |
| 321 |
dd=`echo $optf | grep -c 'gfortran.*+mth'` |
dd=`echo $optf | grep -c 'gfortran+mth'` |
| 322 |
#if test $mname = 'lagoon' -a $dd = 1 ; then num=-1 ; fi |
#if test $mname = 'lagoon' -a $dd = 1 ; then num=-1 ; fi |
| 323 |
#if test $mname = 'harbor' -a $dd = 1 ; then num=-1 ; fi |
#if test $mname = 'harbor' -a $dd = 1 ; then num=-1 ; fi |
| 324 |
#if test $mname = 'aces' -a $optf = 'linux_ia32_open64' ; then num=-1 ; fi |
#if test $mname = 'aces' -a $optf = 'linux_ia32_open64' ; then num=-1 ; fi |
| 325 |
#if test $mname = 'aces' -a $optf = 'linux_ia32_g95' ; then num=-1 ; fi |
#if test $mname = 'aces' -a $optf = 'linux_ia32_g95' ; then num=-1 ; fi |
| 326 |
if test $num -gt 0 ; then |
dd=`echo $optf | grep -c 'bigred.*+mth'` |
| 327 |
|
#if test $mname = 'bigred' -a $dd = 1 ; then num=-1 ; fi |
| 328 |
|
if test $num -lt 0 ; then |
| 329 |
|
echo " discard $sdir : $type , of='$optf'" | tee -a $OUTPFIL |
| 330 |
|
cmis=`expr $cmis + 1` |
| 331 |
|
elif test $num = '0' ; then |
| 332 |
|
echo "no previous test for:" $key | tee -a $OUTPFIL |
| 333 |
|
cmis=`expr $cmis + 1` |
| 334 |
|
else |
| 335 |
pline=`grep "^$key " ./plist | head -1` |
pline=`grep "^$key " ./plist | head -1` |
| 336 |
if test $dBug = 't' ; then |
if test $dBug = 't' ; then |
| 337 |
echo "s='$sline'" | tee -a $OUTPFIL |
echo "s='$sline'" | tee -a $OUTPFIL |
| 347 |
| sed 's/ OPTFILE=.*\// OPTFILE=/g' \ |
| sed 's/ OPTFILE=.*\// OPTFILE=/g' \ |
| 348 |
| grep -v '^[A-S][a-t]* time: ' > tmpfp |
| grep -v '^[A-S][a-t]* time: ' > tmpfp |
| 349 |
#-- re-order list of exp (according to local "sort" order) |
#-- re-order list of exp (according to local "sort" order) |
| 350 |
listD=`grep '^[YN] [YN] [YN] [YN]' tmpfs \ |
listD=`grep '^[YN] [YN] [YN] [YN]' tmpfs | awk '{print $NF}' | sort` |
|
| sed 's/^[YN] .*pass //' | sed 's/^[YN] .*FAIL //' \ |
|
|
| sed 's/^[YN] .*N\/O //' | sort` |
|
| 351 |
for xx in $listD |
for xx in $listD |
| 352 |
do |
do |
| 353 |
sed "/ $xx\$/d" tmpfs > tmpfn |
sed "/ $xx\$/d" tmpfs > tmpfn |
| 354 |
sed -n "/ $xx\$/p" tmpfs >> tmpfn |
sed -n "/ $xx\$/p" tmpfs >> tmpfn |
| 355 |
mv tmpfn tmpfs |
mv tmpfn tmpfs |
| 356 |
done |
done |
| 357 |
listD=`grep '^[YN] [YN] [YN] [YN]' tmpfp \ |
listD=`grep '^[YN] [YN] [YN] [YN]' tmpfp | awk '{print $NF}' | sort` |
|
| sed 's/^[YN] .*pass //' | sed 's/^[YN] .*FAIL //' \ |
|
|
| sed 's/^[YN] .*N\/O //' | sort` |
|
| 358 |
for xx in $listD |
for xx in $listD |
| 359 |
do |
do |
| 360 |
sed "/ $xx\$/d" tmpfp > tmpfn |
sed "/ $xx\$/d" tmpfp > tmpfn |
| 399 |
cdif=`expr $cdif + 1` |
cdif=`expr $cdif + 1` |
| 400 |
echo '----------------------------------------' | tee -a $OUTPFIL |
echo '----------------------------------------' | tee -a $OUTPFIL |
| 401 |
else |
else |
| 402 |
echo "" | tee -a $OUTPFIL |
echo " $type , of='$optf'" | tee -a $OUTPFIL |
| 403 |
fi |
fi |
| 404 |
rm -f tmpfs tmpfp tmpdf |
rm -f tmpfs tmpfp tmpdf |
|
elif test $num = '0' ; then |
|
|
echo "no previous test for:" $key | tee -a $OUTPFIL |
|
|
cmis=`expr $cmis + 1` |
|
|
else |
|
|
cmis=`expr $cmis + 1` |
|
| 405 |
fi |
fi |
| 406 |
done |
done |
| 407 |
if [ $cmis -gt 0 ] ; then tmis='(-'$cmis')' ; else tmis='(--)' ; fi |
if [ $cmis -gt 0 ] ; then tmis='(-'$cmis')' ; else tmis='(--)' ; fi |