最简单的方法是使用建议函数。建议是在函数开头、结尾(或两者都有)添加内容的一种方式。 现在,我不知道哪个函数负责r-mode中的编译,但假设它是foo。 (defadvice foo (after foo-advice () activate) (other-window 1)) 你只需要添加一个if表达式来检查编译是否无误。