;;;; $Id$
;;;;
;;;; This file, part of UMLisp, is
-;;;; Copyright (c) 2000-2004 by Kevin M. Rosenberg, M.D.
+;;;; Copyright (c) 2000-2006 by Kevin M. Rosenberg, M.D.
;;;;
;;;; UMLisp users are granted the rights to distribute and use this software
;;;; as governed by the terms of the GNU General Public License.
,@body))
(defmacro with-umls-file ((line ufile) &body body)
- "Opens a UMLS and processes each parsed line with (body) argument"
"Opens a UMLS and processes each parsed line with (body) argument"
`(with-reading-umls-file (,line (umls-pathname ,ufile))
,@body))