Text only | Text with Images

newLISP Fan Club

Forum => newLISP in the real world => Topic started by: ale870 on October 26, 2009, 06:27:47 AM

Title: How to translate this Common LISP code in newLisp?
Post by: ale870 on October 26, 2009, 06:27:47 AM
Hello,



I was reading an article on an italian magazine, and I found the following code:


Code Select

(defun foo (n)
   (lambda (i) (incf n i)))


Well, this is an accumulator, and it returns another function that takes another number "i" and return "n" increased by "i".



Can you help me?



Thank you!
Title: Re: How to translate this Common LISP code in newLisp?
Post by: ale870 on October 26, 2009, 06:32:37 AM
Maybe can I use "curry" function? Is this good way to follow?
Title: Re: How to translate this Common LISP code in newLisp?
Post by: Lutz on October 26, 2009, 06:53:25 AM
newLISP uses namespaces instead of closures in Common Lisp


Code Select
> (define (acc:acc i) (inc acc:value i))
(lambda (i) (inc acc:value i))

> (acc 1)
1
> (acc 3)
4
> (acc 6)
10
>


see also: http://www.newlisp.org/downloads/newlisp_manual.html#func_memory
Title: Re: How to translate this Common LISP code in newLisp?
Post by: ale870 on October 26, 2009, 07:02:21 AM
Thank you Lutz, I forgot that article!



I noticed you no more include "if" statement. I think using "if" is more clear, but the example you sent me before is better for standard Lisp comparison (closures).

Maybe you could include it in the official documentation.

I think even a small article in the official PDF document about closures could be useful too...



Thank you!
Title: Re: How to translate this Common LISP code in newLisp?
Post by: Lutz on October 26, 2009, 07:20:01 AM
http://www.newlisp.org/index.cgi?Closures



also referenced from here:



http://www.newlisp.org/index.cgi?page=Differences_to_Other_LISPs
Text only | Text with Images