RosettaCodeData/Task/Runtime-evaluation/Common-Lisp/runtime-evaluation-3.lisp

3 lines
90 B
Common Lisp
Raw Permalink Normal View History

2013-04-10 23:57:08 -07:00
(defun add-four-by-function (a-number)
(funcall (eval '(lambda (n) (+ 4 n)))) a-number)