;;;; Programmer: Kevin M. Rosenberg based on Matthew Danish's code
;;;; Date Started: Nov 2002
;;;;
-;;;; $Id: api.lisp,v 1.2 2003/06/06 21:59:30 kevin Exp $
+;;;; $Id$
;;;;
;;;; This file, part of LML, is Copyright (c) 2002 by Kevin M. Rosenberg
;;;; and Copyright (c) 2002 Matthew Danish
(defmacro with-functions (&rest slots)
`(progn ,@(loop for (fn description . args) in slots collect
- `(with-function-info (,fn ,@(if args args
- '(connection-variable)))
+ `(with-function-info (,fn ,@(if args args
+ '(connection-variable)))
,description))))