From 5d470145541cbad6446065aacdc89b69819b8b6c Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Tue, 6 Jul 2010 07:15:19 -0600
Subject: [PATCH 1/2] fix empty-matching lexers

original commit: a6723283b8fc9647467b8daea20f17d134bc1b29
---
 collects/parser-tools/yacc-to-scheme.rkt | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/collects/parser-tools/yacc-to-scheme.rkt b/collects/parser-tools/yacc-to-scheme.rkt
index e854fca..4fb9620 100644
--- a/collects/parser-tools/yacc-to-scheme.rkt
+++ b/collects/parser-tools/yacc-to-scheme.rkt
@@ -8,14 +8,14 @@
   
   (define match-double-string
     (lexer
-     ((:* (:~ #\" #\\)) (append (string->list lexeme)
+     ((:+ (:~ #\" #\\)) (append (string->list lexeme)
                                 (match-double-string input-port)))
      ((:: #\\ any-char) (cons (string-ref lexeme 1) (match-double-string input-port)))
      (#\" null)))
 
    (define match-single-string
     (lexer
-     ((:* (:~ #\' #\\)) (append (string->list lexeme)
+     ((:+ (:~ #\' #\\)) (append (string->list lexeme)
                                 (match-single-string input-port)))
      ((:: #\\ any-char) (cons (string-ref lexeme 1) (match-single-string input-port)))
      (#\' null)))

From a2dba0a992a8d5fc82b7851feb1ba4285f481400 Mon Sep 17 00:00:00 2001
From: Eli Barzilay <eli@barzilay.org>
Date: Sat, 18 Sep 2010 03:55:30 -0400
Subject: [PATCH 2/2] Some repeated "and and"s and "the the"s, and two more
 typos. Closes PR 11229.

original commit: ee138cf2cba3ee32cd755a7b242ec10051180adf
---
 collects/parser-tools/parser-tools.scrbl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/parser-tools/parser-tools.scrbl b/collects/parser-tools/parser-tools.scrbl
index 2954ae2..90debe4 100644
--- a/collects/parser-tools/parser-tools.scrbl
+++ b/collects/parser-tools/parser-tools.scrbl
@@ -140,7 +140,7 @@ are a few examples, using @scheme[:] prefixed SRE syntax:
 
 @item{@schemeblock0[(:: "/*" (:* (complement "*/")) "*/")]
 
- Matches any string that starts with @scheme["/*"] and and ends with
+ Matches any string that starts with @scheme["/*"] and ends with
  @scheme["*/"], including @scheme["/* */ */ */"].
  @scheme[(complement "*/")] matches any string except @scheme["*/"].
  This includes @scheme["*"] and @scheme["/"] separately.  Thus