[llvm-commits] [hlvm] r38304 - in /hlvm/trunk/test: SConscript error/ invalid/ invalid/dg.exp lib/error.exp lib/invalid.exp

[Reid Spencer]

Author: reid
Date: Sat Jul  7 19:02:09 2007
New Revision: 38304

URL: http://llvm.org/viewvc/llvm-project?rev=38304&view=rev
Log:
Rename "error" to "invalid" so as to more precisely label its function, that of
testing invalid input to the compiler.

Added:
    hlvm/trunk/test/invalid/
      - copied from r38302, hlvm/trunk/test/error/
    hlvm/trunk/test/lib/invalid.exp
      - copied, changed from r38302, hlvm/trunk/test/lib/error.exp
Removed:
    hlvm/trunk/test/error/
    hlvm/trunk/test/lib/error.exp
Modified:
    hlvm/trunk/test/SConscript
    hlvm/trunk/test/invalid/dg.exp

Modified: hlvm/trunk/test/SConscript
URL: http://llvm.org/viewvc/llvm-project/hlvm/trunk/test/SConscript?rev=38304&r1=38303&r2=38304&view=diff

==============================================================================
--- hlvm/trunk/test/SConscript (original)
+++ hlvm/trunk/test/SConscript Sat Jul  7 19:02:09 2007
@@ -24,4 +24,4 @@
 Import('env')
 if 'check' in COMMAND_LINE_TARGETS:
   from build import check
-  check.Check(env,['xml2xml','error','return0'])
+  check.Check(env,['xml2xml','invalid','return0'])

Modified: hlvm/trunk/test/invalid/dg.exp
URL: http://llvm.org/viewvc/llvm-project/hlvm/trunk/test/invalid/dg.exp?rev=38304&r1=38302&r2=38304&view=diff

==============================================================================
--- hlvm/trunk/test/invalid/dg.exp (original)
+++ hlvm/trunk/test/invalid/dg.exp Sat Jul  7 19:02:09 2007
@@ -1,3 +1,3 @@
-load_lib error.exp
+load_lib invalid.exp
 
-hlvm-error-tests hlvm-xml2xml "*.hlx"
+hlvm-invalid-tests hlvm-xml2xml "*.hlx"

Removed: hlvm/trunk/test/lib/error.exp
URL: http://llvm.org/viewvc/llvm-project/hlvm/trunk/test/lib/error.exp?rev=38303&view=auto

==============================================================================
--- hlvm/trunk/test/lib/error.exp (original)
+++ hlvm/trunk/test/lib/error.exp (removed)
@@ -1,55 +0,0 @@
-#===-test/lib/error.exp - Script for error check tests ---------------------===#
-#
-#                      High Level Virtual Machine (HLVM)
-# 
-#  Copyright (C) 2006 Reid Spencer. All Rights Reserved.
-# 
-#  This software is free software; you can redistribute it and/or modify it 
-#  under the terms of the GNU Lesser General Public License as published by 
-#  the Free Software Foundation; either version 2.1 of the License, or (at 
-#  your option) any later version.
-# 
-#  This software is distributed in the hope that it will be useful, but WITHOUT
-#  ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
-#  FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public License for 
-#  more details.
-# 
-#  You should have received a copy of the GNU Lesser General Public License 
-#  along with this library in the file named LICENSE.txt; if not, write to the 
-#  Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, 
-#  MA 02110-1301 USA
-# 
-#===------------------------------------------------------------------------===#
-proc hlvm-error-tests { prog pat } {
-  global srcdir subdir objdir tmpdir objrootdir
-  set outdir [file join $objdir $subdir]
-  set tool [file join $objrootdir tools $prog $prog ]
-  set source [file join $srcdir $subdir ]
-  set files [lsort [
-    glob -nocomplain -tails -types {f r} -directory $source $pat]]
-  set dirs [lsort [
-    glob -nocomplain -tails -types {d r} -directory $source *]]
-
-  if { [file isdirectory $outdir] } {
-    cd $outdir
-  } else {
-    if { [file exists $outdir] } {
-      fail "identity: $outdir exists and is not a directory. Remove it"
-      exit(2)
-    } else {
-      file mkdir $outdir
-    }
-  }
-  
-  foreach test $files {
-    set output [file join $outdir ${test}.out]
-    set testsrc [file join $source $test]
-    set execout ""
-    set retval [ catch { exec -keepnewline $tool $testsrc -o $output } msg ]
-    if { $retval != 0 } {
-      pass "$test"
-    } else {
-      fail "$test: $tool return $retval\n$msg"
-    }
-  }
-}

Copied: hlvm/trunk/test/lib/invalid.exp (from r38302, hlvm/trunk/test/lib/error.exp)
URL: http://llvm.org/viewvc/llvm-project/hlvm/trunk/test/lib/invalid.exp?p2=hlvm/trunk/test/lib/invalid.exp&p1=hlvm/trunk/test/lib/error.exp&r1=38302&r2=38304&rev=38304&view=diff

==============================================================================
--- hlvm/trunk/test/lib/error.exp (original)
+++ hlvm/trunk/test/lib/invalid.exp Sat Jul  7 19:02:09 2007
@@ -1,4 +1,4 @@
-#===-test/lib/error.exp - Script for error check tests ---------------------===#
+#===-test/lib/invalid.exp - Script for invalid input tests -----------------===#
 #
 #                      High Level Virtual Machine (HLVM)
 # 
@@ -20,7 +20,7 @@
 #  MA 02110-1301 USA
 # 
 #===------------------------------------------------------------------------===#
-proc hlvm-error-tests { prog pat } {
+proc hlvm-invalid-tests { prog pat } {
   global srcdir subdir objdir tmpdir objrootdir
   set outdir [file join $objdir $subdir]
   set tool [file join $objrootdir tools $prog $prog ]