Add test constraint, so 6.2 and 6.3 don't fail when the machine does not have support for ip6

Follow-up to checkin from 2011-05-11 by rmax

2 files changed, 8 insertions, 2 deletions

diff --git a/ChangeLog b/ChangeLog
index b8f05ae..b645eb0 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2011-06-06  Jan Nijtmans  <nijtmans@users.sf.net>
+
+	* tests/socket.test: Add test constraint, so 6.2 and
+	  6.3 don't fail when the machine does not have support
+	  for ip6. Follow-up to checkin from 2011-05-11 by rmax.
+
 2011-06-02  Don Porter  <dgp@users.sourceforge.net>
 
 	* generic/tclBasic.c:	Removed TclCleanupLiteralTable(), and old
diff --git a/tests/socket.test b/tests/socket.test
index 83bad09..4a9bcb9 100644
--- a/tests/socket.test
+++ b/tests/socket.test
@@ -804,7 +804,7 @@ test socket_$af-6.2 {
     readable fileevent on server socket
 } -setup {
     set sock [socket -server dummy 0]
-} -body {
+} -constraints [list socket supported_$af] -body {
     fileevent $sock readable dummy
 } -cleanup {
     close $sock
@@ -812,7 +812,7 @@ test socket_$af-6.2 {
 
 test socket_$af-6.3 {writable fileevent on server socket} -setup {
     set sock [socket -server dummy 0]
-} -body {
+} -constraints [list socket supported_$af] -body {
     fileevent $sock writable dummy
 } -cleanup {
     close $sock