New test
[official-gcc.git] / libiberty / testsuite / regress-demangle
blob1086762dbb261f860a6309342f58e5bc1ec4eb6a
1 #! /bin/sh
3 # Run a regression test for the demangler.
4 # Usage: regress-demangle TEST-FILE
6 failures=0
7 count=0
8 sed -e '/^#/ d' "$1" | (
9 while read type; do
10 read mangled
11 read demangled
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 echo " result: $x"
19 echo " expected: $demangled"
21 done
23 if test $failures -eq 0; then
24 echo "All $count tests passed"
25 else
26 echo "$failures of $count tests failed"
29 test $failures -eq 0