From 0869df1b8f9baef597962a88b45138f988520e96 Mon Sep 17 00:00:00 2001
From: Robby Findler <robby@racket-lang.org>
Date: Wed, 11 May 2005 19:47:13 +0000
Subject: [PATCH] removed call to print-struct

original commit: 7ebbac6ef6286b72851ccfc6d6e4dac30bb33f3a
---
 collects/parser-tools/private-lex/deriv.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/parser-tools/private-lex/deriv.ss b/collects/parser-tools/private-lex/deriv.ss
index 0f025f2..27469d6 100644
--- a/collects/parser-tools/private-lex/deriv.ss
+++ b/collects/parser-tools/private-lex/deriv.ss
@@ -160,7 +160,7 @@
       ((null? res) #f)
       ((re-nullable? (caar res)) (cdar res))
       (else (get-final (cdr res)))))
-  (print-struct #t)
+
   (test-block ((c->i char->integer)
                (c (make-cache))
                (r1 (->re #\a c))