[llvm-commits] CVS: llvm/test/lib/llvm-dg.exp

[Tanya Brethour]

Changes in directory llvm/test/lib:

llvm-dg.exp updated: 1.12 -> 1.13
---
Log message:

Added the ability to xfail based on llvmgcc version


---
Diffs of the changes:  (+6 -2)

 llvm-dg.exp |    8 ++++++--
 1 files changed, 6 insertions(+), 2 deletions(-)


Index: llvm/test/lib/llvm-dg.exp
diff -u llvm/test/lib/llvm-dg.exp:1.12 llvm/test/lib/llvm-dg.exp:1.13
--- llvm/test/lib/llvm-dg.exp:1.12	Wed Mar  8 16:32:20 2006
+++ llvm/test/lib/llvm-dg.exp	Wed Apr 12 16:57:40 2006
@@ -1,4 +1,5 @@
-proc llvm-runtest { programs objdir srcdir subdir target_triplet llvmgcc llvmgxx prcontext} {
+proc llvm-runtest { programs objdir srcdir subdir target_triplet llvmgcc llvmgxx prcontext llvmgcc_version} {
+
 
     set timeout 60
 
@@ -65,7 +66,6 @@
 		puts $scriptFileId $new_runline
 	    } elseif {[regexp {XFAIL:[ *](.+)} $line match targets]} {
 		set targets
-		
 
 		#split up target if more then 1 specified
 		foreach target [split $targets ,] {
@@ -73,6 +73,10 @@
 			set outcome XFAIL
 		    } elseif { [regexp $target $target_triplet match] } {
 			set outcome XFAIL
+		    } elseif { [regexp {llvmgcc(([0-9]+)|([0-9]+[.][0-9]+))} $target match submatch submatch2]  } {
+		if { [regexp ^($submatch)$|^(($submatch)(\.)) $llvmgcc_version match] } {
+			  set outcome XFAIL
+		    	}
 		    }
 		    
 		}