commit - 807251c0e5fa20065b3e2f4729cd2f15fbcc38cd
commit + 4d0de19cff257a0d4f7cf8c5e71afd94b18505e1
blob - 39bb1df9fe297f8080d796da995c38f5ed1807db
blob + 1f6891c5552a498382b5c1f17092072761eb3ada
--- exercise
+++ exercise
@@ -389,9 +389,9 @@ proc main {argc argv} {
     set counters {run 0  ok 0  fail 0  error 0}
 
     # handle command line options
-    set u {[-q] [-C dir] [-p k=pattern] [path ...]}
+    set u {[-q] [-B dir] [-C dir] [-D dir] [-p k=pattern] [path ...]}
     set prog [file tail $::argv0]
-    while {[getopt argv {B:C:D:d:p:qs:} opt arg]} {
+    while {[getopt argv {B:C:D:p:q} opt arg]} {
         if {$opt eq "?"} {
             puts stderr "usage: $prog $u"
             exit 1
blob - 77e4d960e4f9e2393e2bfeae09d9d74ba7ff3a71
blob + 5f9c84c36621aa23b20ff31d7d8950b6b8da3c4a
--- exercise.1
+++ exercise.1
@@ -11,6 +11,7 @@
 .Op Fl q
 .Op Fl B Ar dir
 .Op Fl C Ar dir
+.Op Fl D Ar dir
 .Op Fl p Ar k Ns Sy = Ns Ar pattern
 .Op Ar path ...
 .
@@ -32,18 +33,23 @@ To be run as test suites (see below), files must match
 .Pp
 The options are as follows:
 .Bl -tag -width Ds
+.It Fl B Ar dir
+Find test files relative to the given base directory.
+If
+.Ar dir
+is a relative path,
+it refers to the working directory in effect after any
+.Fl C
+option.
 .It Fl C Ar dir
 Change the working directory to
 .Ar dir
 before doing anything else.
 .It Fl D Ar dir
-Change the working directory to
+Execute tests from the given working directory.
+This is useful, for example, when
 .Ar dir
-before running tests.
-This is useful where
-.Ar dir
-contains common helper files
-that tests can then easily find.
+contains common helper or data files for the tests to find.
 .It Fl p Sy d= Ns Ar pattern
 When searching for tests,
 only descend into directories that match the given pattern.