Index: trunk/dso-parse.asd
===================================================================
--- trunk/dso-parse.asd	(revision trunk,21)
+++ trunk/dso-parse.asd	(revision trunk,28)
@@ -20,5 +20,5 @@
 
 (asdf:defsystem #:dso-parse
-  :depends-on (#:cl-ppcre)
+  :depends-on (#:cl-ppcre #:dso-util)
   :components ((:file "package")
 	       (:file "util")
Index: trunk/package.lisp
===================================================================
--- trunk/package.lisp	(revision trunk,25)
+++ trunk/package.lisp	(revision trunk,28)
@@ -24,5 +24,5 @@
 (see the IF-MATCHES-* macros, but especially IF-MATCHES), and for
 defining parsers (DEFPARSER) and grammars (DEFGRAMMAR).")
-  (:use #:cl #:cl-ppcre)
+  (:use #:cl #:cl-ppcre #:dso-util)
   (:export #:if-matches-parser
 	   #:if-matches-char
Index: trunk/util.lisp
===================================================================
--- trunk/util.lisp	(revision trunk,24)
+++ trunk/util.lisp	(revision trunk,28)
@@ -22,8 +22,4 @@
 
 
-
-(defmacro with-gensyms (syms &body body)
-  `(let (,@(mapcar (lambda (sym) `(,sym (gensym ,(symbol-name sym)))) syms))
-    ,@body))
 
 (defun substring (string &key (start 0) end length)