Remove an unused variable.
BODY-DECLS&FORMS: Use REDUCE + MAPCAR instead of MAPCAN.