libiberty/testsuite/regress-demangle

   1 #! /bin/sh
   2
   3 # Run a regression test for the demangler.
   4 # Usage: regress-demangle TEST-FILE
   5
   6 failures=0
   7 count=0
   8 sed -e '/^#/ d' "$1" | (
   9   while read type; do
  10      read mangled
  11      read demangled
  12
  13      x="`echo $mangled | ./test-filter $type`"
  14      count=`expr $count + 1`
  15      if test "x$x" != "x$demangled"; then
  16         failures=`expr $failures + 1`
  17         echo "FAIL: $type $mangled"
  18      fi
  19   done
  20
  21   if test $failures -eq 0; then
  22      echo "All $count tests passed"
  23   else
  24      echo "$failures of $count tests failed"
  25   fi
  26
  27   test $failures -eq 0
  28 )