scheme2lisp::define function and pass it as parameter
- by Stas
Hi!
Im need translate some code from scheme to common lisp. Now I have something like this
(defun sum (term a next b)
(if (> a b)
0
(+ (term a) (sum term (next a) b))))
(defun sum-int (a b)
(defun (ident x) x )
(sum ident a 1+ b))
But it doesn't interprete with out errors.
* - DEFUN: the name of a function must be a symbol, not (IDENT X)
Help me plese.
Thanks