bkyk8rc3zvpnsf5inmcqq4n3k98cv6hj-my-site-hyper-literate-git.test.suzanne.soy-0.0.1

commit cb9a9851828ea2dd4d1316bb93d18f8aa30dc1b9
parent 4e0988f3a822ef34e275bd5365f3513e406cb167
Author: Eli Barzilay <eli@racket-lang.org>
Date:   Wed, 17 Sep 2008 14:26:40 +0000

Rename input files so they get compiled too.
(And also see that the resulting .dep files are good re `include')

svn: r11789

original commit: 064eb9a1473c7576838eedde8b9f578c3de2a9f2

Diffstat:
M
collects/tests/scribble/main.ss
 | 
4
++--

1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/collects/tests/scribble/main.ss b/collects/tests/scribble/main.ss
@@ -82,8 +82,8 @@
  (parameterize ([current-directory text-dir])
    (for ([ifile (map path->string (directory-list))]
          #:when (and (file-exists? ifile)
-                     (regexp-match? #rx"^i[0-9]+$" ifile)))
-     (define ofile (regexp-replace #rx"^i" ifile "o"))
+                     (regexp-match? #rx"^i[0-9]+\\.ss$" ifile)))
+     (define ofile (regexp-replace #rx"^i([0-9]+)\\..*$" ifile "o\\1.txt"))
      (define expected (call-with-input-file ofile
                         (lambda (i) (read-bytes (file-size ofile) i))))
      (define o (open-output-bytes))