From 396d6a0e56d6671e98cfefea461bef490f86270f Mon Sep 17 00:00:00 2001
From: dgp <dgp@users.sourceforge.net>
Date: Wed, 7 Mar 2007 19:16:05 +0000
Subject: Add missing constraints

---
 tests/compile.test | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/tests/compile.test b/tests/compile.test
index b18ee9f..18d3b16 100644
--- a/tests/compile.test
+++ b/tests/compile.test
@@ -11,7 +11,7 @@
 # See the file "license.terms" for information on usage and redistribution
 # of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 #
-# RCS: @(#) $Id: compile.test,v 1.45 2007/01/18 11:05:26 dkf Exp $
+# RCS: @(#) $Id: compile.test,v 1.46 2007/03/07 19:16:05 dgp Exp $
 
 package require tcltest 2
 namespace import -force ::tcltest::*
@@ -565,7 +565,7 @@ test compile-16.23.$noComp {
 } -returnCodes ok -result {syntax {}{}}
 test compile-16.24.$noComp {
     Bug 1638414: bad list constant as first expanded term
-} -body {
+} -constraints $constraints -body {
     run "{*}\"\{foo bar\""
 } -returnCodes error -result {unmatched open brace in list}
 }	;# End of noComp loop
-- 
cgit v0.12