From cd2628004480960ab30a03f2335ad7e62bf50a50 Mon Sep 17 00:00:00 2001
From: jenn <jenn>
Date: Tue, 31 Aug 1999 21:43:44 +0000
Subject: * library/tcltest1.0/tcltest.tcl: * doc/tcltest.n: * tests/README:
 Modified testConstraints variable so that it isn't unset every time
 ::tcltest::initConstraints is called and cleaned up documentation in the
 README file and the man page.

---
 ChangeLog                      |  8 ++++++
 library/tcltest/tcltest.tcl    |  4 +--
 library/tcltest1.0/tcltest.tcl |  4 +--
 tests/README                   | 56 +++++++++++++++++++++++++++++++++---------
 4 files changed, 54 insertions(+), 18 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 32a5001..70d48ed 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,11 @@
+1999-08-31  Jennifer Hom  <jenn@scriptics.com>
+
+	* library/tcltest1.0/tcltest.tcl:
+	* doc/tcltest.n:
+	* tests/README: Modified testConstraints variable so that it isn't
+	unset every time ::tcltest::initConstraints is called and cleaned up
+	documentation in the README file and the man page.
+
 1999-08-27  Jennifer Hom  <jenn@scriptics.com>
 
 	* library/tcltest1.0/tcltest.tcl:  Modified tcltest so that
diff --git a/library/tcltest/tcltest.tcl b/library/tcltest/tcltest.tcl
index daec879..50dbe6f 100644
--- a/library/tcltest/tcltest.tcl
+++ b/library/tcltest/tcltest.tcl
@@ -12,7 +12,7 @@
 # Copyright (c) 1998-1999 by Scriptics Corporation.
 # All rights reserved.
 # 
-# RCS: @(#) $Id: tcltest.tcl,v 1.11 1999/08/27 18:12:26 jenn Exp $
+# RCS: @(#) $Id: tcltest.tcl,v 1.12 1999/08/31 21:43:46 jenn Exp $
 
 package provide tcltest 1.0
 
@@ -354,8 +354,6 @@ proc ::tcltest::initConstraintsHook {} {}
 proc ::tcltest::initConstraints {} {
     global tcl_platform tcl_interactive tk_version
 
-    catch {unset ::tcltest::testConstraints}
-
     # The following trace procedure makes it so that we can safely refer to
     # non-existent members of the ::tcltest::testConstraints array without
     # causing an error.  Instead, reading a non-existent member will return 0.
diff --git a/library/tcltest1.0/tcltest.tcl b/library/tcltest1.0/tcltest.tcl
index daec879..50dbe6f 100644
--- a/library/tcltest1.0/tcltest.tcl
+++ b/library/tcltest1.0/tcltest.tcl
@@ -12,7 +12,7 @@
 # Copyright (c) 1998-1999 by Scriptics Corporation.
 # All rights reserved.
 # 
-# RCS: @(#) $Id: tcltest.tcl,v 1.11 1999/08/27 18:12:26 jenn Exp $
+# RCS: @(#) $Id: tcltest.tcl,v 1.12 1999/08/31 21:43:46 jenn Exp $
 
 package provide tcltest 1.0
 
@@ -354,8 +354,6 @@ proc ::tcltest::initConstraintsHook {} {}
 proc ::tcltest::initConstraints {} {
     global tcl_platform tcl_interactive tk_version
 
-    catch {unset ::tcltest::testConstraints}
-
     # The following trace procedure makes it so that we can safely refer to
     # non-existent members of the ::tcltest::testConstraints array without
     # causing an error.  Instead, reading a non-existent member will return 0.
diff --git a/tests/README b/tests/README
index 0c3b3cf..c0e8ef4 100644
--- a/tests/README
+++ b/tests/README
@@ -1,6 +1,6 @@
 README -- Tcl test suite design document.
 
-RCS: @(#) $Id: README,v 1.6 1999/06/26 03:54:09 jenn Exp $
+RCS: @(#) $Id: README,v 1.7 1999/08/31 21:43:48 jenn Exp $
 
 Contents:
 ---------
@@ -25,9 +25,12 @@ You can run the tests in three ways:
     (b) type "tcltest <testFile> ?<option> <value>?
 	Command line options include:
 
+	-help                display usage information
+
 	-verbose <level>     set the level of verbosity to a substring
 			     of "bps".  See the "Test output" section
-			     for an explanation of this option.
+			     of the tcltest man page for an
+			     explanation of this option. 
 
 	-match <matchList>   only run tests that match one or more of
 			     the glob patterns in <matchList>
@@ -35,22 +38,55 @@ You can run the tests in three ways:
 	-skip <skipList>     do not run tests that match one or more
 			     of the glob patterns in <skipList>
 
-	-file <globPattern>  only source test files that match
-			     <globPattern> (relative to the "tests"
-			     directory).  This option only applies
-			     when you run the test suite with the
-			     "all.tcl" file.
+	-file <globPatternList>  
+		             only source test files that match one or
+		             more of the glob patterns in
+		             <globPatternList> (relative to the
+		             "tests" directory).  This option only
+		             applies when you run the test suite with
+		             the "all.tcl" file.
+
+	-notfile <globPatternList>  
+	                     do not source test files that match one
+	                     or more of the patterns in
+	                     <globPatternList> (relative to the
+	                     "tests" directory).  This option only
+	                     applies when you run the test suite with
+	                     the "all.tcl" file.
 
 	-constraints <list>  tests with any constraints in <list> will
 			     not be skipped.  Not that elements of
 			     <list> must exactly match the existing
 			     constraints.
 
+        -limitconstraints <bool>
+                             If 1, limit test runs to those tests that
+                             match the constraints listed using the
+                             -constraints flag.  Use of this flag
+                             requires use of the -constraints flag.
+                             The default value is 0.
+
+        -tmpdir <dirname>    put temporary files created by
+                             ::tcltest::makeFile and
+                             ::tcltest::makeDirectory in the named
+                             directory.  The default location is
+                             ::tcltest::workingDirectory.
+
+        -preservecore <level>
+                             check for core files.  If level is 0,
+                             check for core files only when
+                             cleanupTests is called from an all.tcl
+                             file.  If 1, also check at the end of
+                             every test command.  If 2, also save core
+                             files in ::tcltest::temporaryDirectory.
+                             The default level is 0.
+ 
     (c) start up tcltest in this directory, then "source" the test
         file (for example, type "source parse.test").  To run all
 	of the tests, type "source all.tcl".  To use the options in
 	interactive mode, you can set their corresponding tcltest
-	namespace variables after sourcing the defs.tcl file.
+	namespace variables after loading the tcltest package.
+	For example, some of the tcltest variables are:
 		  ::tcltest::match
 		  ::tcltest::skip
 		  ::tcltest::testConfig(nonPortable)
@@ -90,10 +126,6 @@ the constraints mechanism to skip those tests.
    TESTS      ::tcltest::match
    testConfig ::tcltest::testConfig
 
-   The introduction of the "tcltest" namespace is a precursor to using
-   a "tcltest" package.  This next step will be part of a future Tcl
-   version.
-
 2) VERBOSE values are no longer numeric.  Please see the section above
    on "Test output" for the new usage of the ::tcltest::verbose variable.
 
-- 
cgit v0.12