Index: 1.4.x/win-tests.py
===================================================================
--- 1.4.x/win-tests.py	(revision 24830)
+++ 1.4.x/win-tests.py	(working copy)
@@ -47,7 +47,7 @@
 opts, args = my_getopt(sys.argv[1:], 'rdvcu:f:',
                        ['release', 'debug', 'verbose', 'cleanup', 'url=',
                         'svnserve-args=', 'fs-type=', 'asp.net-hack',
-                        'httpd-dir=', 'httpd-port='])
+                        'httpd-dir=', 'httpd-port=', 'list'])
 if len(args) > 1:
   print 'Warning: non-option arguments after the first one will be ignored'
 
@@ -60,6 +60,7 @@
 svnserve_args = None
 run_httpd = None
 httpd_port = None
+list_tests = None
 
 for opt, val in opts:
   if opt in ('-u', '--url'):
@@ -84,6 +85,8 @@
     run_httpd = 1
   elif opt == '--httpd-port':
     httpd_port = int(val)
+  elif opt == '--list':
+    list_tests = 1
 
 # Calculate the source and test directory names
 abs_srcdir = os.path.abspath("")
@@ -411,7 +414,8 @@
 import run_tests
 th = run_tests.TestHarness(abs_srcdir, abs_builddir,
                            os.path.join(abs_builddir, log),
-                           base_url, fs_type, 1, cleanup)
+                           base_url, fs_type, 1, cleanup, 
+                           list_tests = list_tests)
 old_cwd = os.getcwd()
 try:
   os.chdir(abs_builddir)

Index: 1.4.x/build/run_tests.py
===================================================================
--- 1.4.x/build/run_tests.py	(revision 24830)
+++ 1.4.x/build/run_tests.py	(working copy)
@@ -1,3 +1,4 @@
+
 #
 # run_tests.py - run the tests in the regression test suite.
 #
@@ -25,7 +26,8 @@
   '''
 
   def __init__(self, abs_srcdir, abs_builddir, logfile,
-               base_url=None, fs_type=None, verbose=None, cleanup=None):
+               base_url=None, fs_type=None, verbose=None, cleanup=None,
+               list_tests=None):
     '''Construct a TestHarness instance.
 
     ABS_SRCDIR and ABS_BUILDDIR are the source and build directories.
@@ -40,6 +42,7 @@
     self.fs_type = fs_type
     self.verbose = verbose
     self.cleanup = cleanup
+    self.list_tests = list_tests
     self.log = None
 
   def run(self, list):
@@ -108,10 +111,10 @@
         cmdline.append('--cleanup')
       if self.fs_type is not None:
         cmdline.append(quote('--fs-type=' + self.fs_type))
-    else:
-      print 'Don\'t know what to do about ' + progbase
-      sys.exit(1)
 
+    if self.list_tests is not None:
+      cmdline.append('--list')
+
     old_cwd = os.getcwd()
     try:
       os.chdir(progdir)