© Copyright 1998 Robert Strandh (strandh@labri.u-bordeaux.fr) Conditions de distribution

[ précedent, suivant ]


Différences par rapport à Scheme

Définitions de fonctions

(defun fac (n)
  (cond ((= n 0) 1)
        (t (* n (fac (- n 1))))))
[[ defun cond ]]

Utilisation de lambda-expressions et noms de fonctions

(mapcar #'(lambda (x) (+ x 1)) lst)
[[ mapcar #' lambda ]]
(remove-if #'evenp *list-of-integers*)
[[ remove-if #' evenp ]]

Appele d'une fonction valeur d'une variable

(defun my-mapcar (fun lst)
  (cond ((endp lst) nil)
        (t (cons (funcall fun (car lst))
                 (my-mapcar fun (cdr lst))))))
[[ endp funcall ]]