type: function (subr) location: built-in source file: xllist.c Common LISP compatible: yes supported on: all machines
(mapl <function> <list1> [ <list2> ... ] ) <function> - a function definition (like a LAMBDA) or a function name <listN> - a list or list expression
MAPL applies the <function> to the successive CDRs of each of the lists <listN>. Each of the lists supplies one of the arguments to <function>. The MAPL function returns a list that is equivalent to the first list <list1>. It's purpose is to perform operations that have side-effects. If the lists are of different lengths, the shortest list will determine the number of applications of <function>.
(mapl 'print '(a b c)) ; prints (A B C) ; (B C) ; (C) ; returns (A B C) ; (mapl (lambda (x y) (princ x) (princ y) ; apply lambda fun. to list (terpri)) ; '(a b c) '(1 2 3)) ; prints (A B C)(1 2 3) ; (B C)(2 3) ; (C)(3) ; returns (A B C)
NOTE: The use of the <function> will work properly when it is a quoted symbol (which is the name of the function), an unquoted symbol (whose value is a function) or a closure object (like a LAMBDA).