使用 (eval-when-compile (require 'cl))