X-Git-Url: https://git.jankratochvil.net/?a=blobdiff_plain;f=bin%2Fdiffgdb;h=12c292aa5a6bad5c062ad3c369728ce8b6e92ee4;hb=ba8d31e58a81372ad7637eed007af5dbafce701a;hp=6ad817ab5d437009c6beeda54377f5ac78bc6e98;hpb=947dd42ddec635940c676f403e6a68cf5c6bf5cb;p=nethome.git

diff --git a/bin/diffgdb b/bin/diffgdb
index 6ad817a..12c292a 100755
--- a/bin/diffgdb
+++ b/bin/diffgdb
@@ -3,7 +3,13 @@ use strict;
 use warnings;
 
 my @ignore=(
+qr{^.PASS: }o,
+qr{^.KPASS: }o,
+qr{^-FAIL: }o,
+qr{^-KFAIL: }o,
+qr{^-XFAIL: }o,
 qr{^.Test Run By }o,
+qr{^.Running }o,
 qr{^.gnatbind }o,
 qr{^.gnatlink }o,
 qr{^.gnatlink: }o,
@@ -32,6 +38,12 @@ qr{^.PASS: gdb.mi/mi-nsmoribund.exp: resume all, program exited normally\n$}o,
 qr{^.gdb compile failed, }o,
 qr{^.gdb compile failed, /usr/bin/ld: /tmp/[a-zA-Z0-9]*.o: relocation R_X86_64_32S against `a local symbol. can not be used when making a shared object; recompile with -fPIC\n$}o,
 qr{^./tmp/[a-zA-Z0-9]*.o: could not read symbols: Bad value\n$}o,
+qr{^./tmp/[a-zA-Z0-9]*.s:\d+: Error: unrecognized symbol type "gnu_indirect_function"\n$}o,
+qr{^./tmp/[a-zA-Z0-9]*.o: In function `\S+':\n$}o,
+qr{^./tmp/[a-zA-Z0-9]*.o:.*: undefined reference to `.*'\n$}o,
+qr{^./tmp/[a-zA-Z0-9]*.s:\d+: Error: syntax error; found `.' but expected `,'\n$}o,
+qr{^./tmp/[a-zA-Z0-9]*.s:\d+: Error: junk at end of line: `.(?:plt|local)'\n$}o,
+qr{^./usr/bin/ld: /tmp/[a-zA-Z0-9]*.o\(\.text\+0x[0-9a-f]+\): unresolvable R_PPC64_REL24 relocation against symbol `\S+'\n$}o,
 qr{^.# of }o,
 qr{^./home/}o,
 qr{^.PASS: gdb.arch/i386-biarch-core.exp: core-file /home/.*/i386-biarch-core.core\n$}o,
@@ -58,7 +70,7 @@ qr{^.(?:PASS|FAIL): gdb.mi/mi-simplerun.exp: continue to end(?: \(unknown output
 qr{^.(?:PASS|FAIL): gdb.server/file-transfer.exp: verified deleted binary file\n$}o,
 qr{^.(?:PASS|FAIL): gdb.server/file-transfer.exp: deleted binary file\n$}o,
 qr{^.(?:PASS|FAIL): gdb.threads/attachstop-mt.exp: attach1, post-gdb sanity check of the sleeping state - Red Hat BZ 197584\n$}o,
-qr{^."uplevel #0 source .*gdb/testsuite/gdb.threads/watchthreads-thr.*\.\.\."\n$}o,
+qr{^."uplevel #0 source .*gdb/testsuite/gdb.threads/watchthreads-thr(?:eaded\.exp|.*\.\.\.)"\n$}o,
 );
 my $ignore=shift @ignore;
 $ignore=qr/$ignore|$_/ for @ignore;
@@ -111,13 +123,6 @@ while (<DIFF>) {
   $this->{"buffer"}.=$_;
   next if /^ /;
   next if /^[+]Running / && $thisname && !$opt_new;
-  next if /^[+]PASS: /;
-  next if /^[+]KPASS: /;
-  next if /^-PASS: /;
-  next if /^-KPASS: /;
-  next if /^-FAIL: /;
-  next if /^-KFAIL: /;
-  next if /^-XFAIL: /;
   next if $ignore && /$ignore/o;
   next if /^[+]FAIL: / && $this->{"+Running"};
   next if /^[+]KFAIL: / && $this->{"+Running"};