]> code.delx.au - gnu-emacs/blobdiff - lisp/emacs-lisp/benchmark.el
* lisp.h: Include <intprops.h>, as it'll useful in later changes.
[gnu-emacs] / lisp / emacs-lisp / benchmark.el
index 62b1f058d8899775e64bf600f701098bf1de1361..86063c512c68d0a5118bd3e1f79e82d2f9766ac5 100644 (file)
@@ -1,7 +1,6 @@
 ;;; benchmark.el --- support for benchmarking code
 
-;; Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008
-;;   Free Software Foundation, Inc.
+;; Copyright (C) 2003-2011  Free Software Foundation, Inc.
 
 ;; Author: Dave Love  <fx@gnu.org>
 ;; Keywords: lisp, extensions
@@ -104,8 +103,8 @@ result.  The overhead of the `lambda's is accounted for."
 ;;;###autoload
 (defun benchmark (repetitions form)
   "Print the time taken for REPETITIONS executions of FORM.
-Interactively, REPETITIONS is taken from the prefix arg.  For
-non-interactive use see also `benchmark-run' and
+Interactively, REPETITIONS is taken from the prefix arg.
+For non-interactive use see also `benchmark-run' and
 `benchmark-run-compiled'."
   (interactive "p\nxForm: ")
   (let ((result (eval `(benchmark-run ,repetitions ,form))))
@@ -116,5 +115,4 @@ non-interactive use see also `benchmark-run' and
 
 (provide 'benchmark)
 
-;; arch-tag: be570e24-4b51-4784-adf3-fa2b56c31946
 ;;; benchmark.el ends here