CL^K ^B (DB) (DEFUN FOO (L) (MAPCAR #'(LAMBDA (X) (CONS X 'FOO)) L)) (CL FOO) (COMMENT **** (L) Bound variable used as Function name in function FOO) (COMMENT **** (L) Unused LAMBDA variables in function FOO) ; the code produced looks ok though. FOO JONL!!!!!!!