Closures/Value capture: Difference between revisions

Content added Content deleted
(→‎{{header|TXR}}: Don't print last.)
Line 1,369: Line 1,369:


<lang txrlisp>(let ((funs (mapcar (ret (op * @@1 @@1)) (range 1 10))))
<lang txrlisp>(let ((funs (mapcar (ret (op * @@1 @@1)) (range 1 10))))
[mapcar call funs])</lang>
[mapcar call [funs 0..-1]])</lang>


{{out}}
{{out}}


<lang txrlisp>(1 4 9 16 25 36 49 64 81 100)</lang>
<lang txrlisp>(1 4 9 16 25 36 49 64 81)</lang>


=={{header|zkl}}==
=={{header|zkl}}==