有没有简单的方法来在elisp中调用函数？

Question

是的，我知道emacs分析器功能。我正在寻找像在bash类似time关键字的东西，东西：

(time (myfunc)) 

这将返回或打印由myfunc调用所花费的时间。有这样的事吗？

Answer 1

快速搜索显示benchmark.el，它提供benchmark-run和benchmark-run-compiled函数以及benchmark版本以交互方式运行。链接的例子：

C-u 512 M-x benchmark (sort (number-sequence 1 512) '<) 
Elapsed time: 0.260000s (0.046000s in 6 GCs)

所有这些功能使用的定时器是benchmark-elapse宏，它如果需要的话，你也可以直接使用：

ELISP> (require 'benchmark) 
ELISP> (benchmark-elapse 
     (sit-for 2)) 
2.00707889 

Answer 2

我发现正是我一直在http://nullprogram.com/blog/2009/05/28/

寻找

(defmacro measure-time (&rest body) "Measure and return the running time of the code block." (declare (indent defun)) (let ((start (make-symbol "start"))) `(let ((,start (float-time))) ,@body (- (float-time) ,start))))