3 lines
74 B
Common Lisp
3 lines
74 B
Common Lisp
|
|
(defun compose (f g)
|
||
|
|
(eval `(lambda (x) (funcall ',f (funcall ',g x))))
|