OSDN Git Service

* lib/old-dejagnu.exp (old-dejagnu): Added the
authorlaw <law@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 9 Feb 1998 01:07:31 +0000 (01:07 +0000)
committerlaw <law@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 9 Feb 1998 01:07:31 +0000 (01:07 +0000)
        "execution test - XFAIL *-*-*" handling in the spirit of
        "excess errors test -". Changed the "execution test fails"
        handling to be like "excess errors test fails".
        * Update various tests accordingly.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@17798 138bc75d-0d04-0410-961f-82ee72b054a4

gcc/testsuite/ChangeLog
gcc/testsuite/g++.old-deja/g++.jason/opeq5.C
gcc/testsuite/g++.old-deja/g++.law/code-gen3.C
gcc/testsuite/g++.old-deja/g++.mike/p6610a.C
gcc/testsuite/g++.old-deja/g++.mike/p7325.C
gcc/testsuite/lib/old-dejagnu.exp

index 48c4d76..6c1c10b 100644 (file)
@@ -1,3 +1,11 @@
+Mon Feb  9 02:08:47 1998  H.J. Lu  (hjl@gnu.org)
+
+        * lib/old-dejagnu.exp (old-dejagnu): Added the
+        "execution test - XFAIL *-*-*" handling in the spirit of
+        "excess errors test -". Changed the "execution test fails"
+        handling to be like "excess errors test fails".
+        * Update various tests accordingly.
+
 Sun Jan 18 01:33:59 1998  Jeffrey A Law  (law@cygnus.com)
 
        * lib/c-torture.exp: Look for .x files instead of .cexp files.
index c591830..51b3e6e 100644 (file)
@@ -1,7 +1,7 @@
 // Testcase for tricky synthesized op= in complex inheritance situation.
 // See discussion in g++int.texi.
 
-// execution test fails - 
+// execution test - XFAIL *-*-*
 
 int count = 0;
 extern "C" int printf (const char *, ...);
index 0635d27..a9de483 100644 (file)
@@ -1,5 +1,5 @@
 // GROUPS passed code-generation
-// execution test fails - 
+// execution test - XFAIL *-*-*
 // code-gen file
 // From: mscha@anne.wifo.uni-mannheim.de (Martin Schader)
 // Date:     Wed, 4 Aug 93 19:14:52 +0200
index 124260b..b9ea4b7 100644 (file)
@@ -1,6 +1,6 @@
 // prms-id: 6610
 // There is a bug in vtable thunks with multiple/virtual inheritance.
-// execution test fails - XFAIL *-*-linux-gnu *-*-linux
+// execution test - XFAIL *-*-linux-gnu *-*-linux
 int fail = 1;
 struct B;
 struct A { virtual int f(const B*) = 0; int g(const B*); };
index 8402a36..9cf4604 100644 (file)
@@ -1,7 +1,7 @@
 // I hate this type of test case.  I'm not sure how to code it better.
 // See the PR for what this tests.
 // prms-id: 7325
-// execution test fails *-*-*
+// execution test - XFAIL *-*-*
 
 int fail = 0;
 
index 02f84a4..32e5e52 100644 (file)
@@ -361,10 +361,16 @@ proc old-dejagnu { compiler prog cflagsx default_cflags libs } {
        set message [concat $message $tmp]
     }
 
-    set tmp [process-option $prog "execution test fails" "an execution failure" EXEC $text]
+    set tmp [process-option $prog "execution test fails" "an execution failure" EXECO $text]
     if ![string match "" $tmp] then {
        set execbug_flag 1
        set message [concat $message $tmp]
+       warning "please use execution test - XFAIL *-*-* in $prog instead"
+    }
+
+    set tmp [process-option $prog "execution test - " "an excess error failure" EXEC $text]
+    if ![string match "" $tmp] then {
+       set message [concat $message $tmp]
     }
 
     set tmp [process-option $prog "excess errors test fails" "an excess error failure" EXCESSO $text]
@@ -472,7 +478,9 @@ proc old-dejagnu { compiler prog cflagsx default_cflags libs } {
            "XBADASM" {
                x$uhoh "$name $pattern (test for bad assembler, line $line)"
            }
-           "XEXEC" { }
+           "XEXEC" {
+               set execbug_flag 1
+           }
            "XEXCESS" {
                set excessbug_flag 1
            }