aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorJuanma Barranquero2007-10-31 12:09:33 +0000
committerJuanma Barranquero2007-10-31 12:09:33 +0000
commit1cc5b8f8b42d62bd7fbc80077ee8a68bee2fb39c (patch)
tree84b60b74b00eb88fd9df984c2af8d594d130ba58 /lisp
parent7837948ffc1fd83f8d285e27f14e2acfaa9a01b3 (diff)
downloademacs-1cc5b8f8b42d62bd7fbc80077ee8a68bee2fb39c.tar.gz
emacs-1cc5b8f8b42d62bd7fbc80077ee8a68bee2fb39c.zip
(elp-report-limit, elp-restore-all, elp-unset-master, elp-results): Fix typos.
(elp-sort-by-function, elp-use-standard-output, elp-recycle-buffers-p): Doc fixes.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/emacs-lisp/elp.el20
1 files changed, 10 insertions, 10 deletions
diff --git a/lisp/emacs-lisp/elp.el b/lisp/emacs-lisp/elp.el
index ed09599f4dd..eeeb72a3c3d 100644
--- a/lisp/emacs-lisp/elp.el
+++ b/lisp/emacs-lisp/elp.el
@@ -147,16 +147,16 @@ Results are displayed with the `elp-results' command."
147 :group 'elp) 147 :group 'elp)
148 148
149(defcustom elp-sort-by-function 'elp-sort-by-total-time 149(defcustom elp-sort-by-function 'elp-sort-by-total-time
150 "*Non-nil specifies elp results sorting function. 150 "*Non-nil specifies ELP results sorting function.
151These functions are currently available: 151These functions are currently available:
152 152
153 elp-sort-by-call-count -- sort by the highest call count 153 elp-sort-by-call-count -- sort by the highest call count
154 elp-sort-by-total-time -- sort by the highest total time 154 elp-sort-by-total-time -- sort by the highest total time
155 elp-sort-by-average-time -- sort by the highest average times 155 elp-sort-by-average-time -- sort by the highest average times
156 156
157You can write you're own sort function. It should adhere to the 157You can write your own sort function. It should adhere to the
158interface specified by the PRED argument for the `sort' defun. Each 158interface specified by the PREDICATE argument for `sort'.
159\"element of LIST\" is really a 4 element vector where element 0 is 159Each \"element of LIST\" is really a 4 element vector where element 0 is
160the call count, element 1 is the total time spent in the function, 160the call count, element 1 is the total time spent in the function,
161element 2 is the average time spent in the function, and element 3 is 161element 2 is the average time spent in the function, and element 3 is
162the symbol's name string." 162the symbol's name string."
@@ -164,7 +164,7 @@ the symbol's name string."
164 :group 'elp) 164 :group 'elp)
165 165
166(defcustom elp-report-limit 1 166(defcustom elp-report-limit 1
167 "*Prevents some functions from being displayed in the results buffer. 167 "*Prevent some functions from being displayed in the results buffer.
168If a number, no function that has been called fewer than that number 168If a number, no function that has been called fewer than that number
169of times will be displayed in the output buffer. If nil, all 169of times will be displayed in the output buffer. If nil, all
170functions will be displayed." 170functions will be displayed."
@@ -173,12 +173,12 @@ functions will be displayed."
173 :group 'elp) 173 :group 'elp)
174 174
175(defcustom elp-use-standard-output nil 175(defcustom elp-use-standard-output nil
176 "*Non-nil says to output to `standard-output' instead of a buffer." 176 "*If non-nil, output to `standard-output' instead of a buffer."
177 :type 'boolean 177 :type 'boolean
178 :group 'elp) 178 :group 'elp)
179 179
180(defcustom elp-recycle-buffers-p t 180(defcustom elp-recycle-buffers-p t
181 "*nil says to not recycle the `elp-results-buffer'. 181 "*If nil, don't recycle the `elp-results-buffer'.
182In other words, a new unique buffer is create every time you run 182In other words, a new unique buffer is create every time you run
183\\[elp-results]." 183\\[elp-results]."
184 :type 'boolean 184 :type 'boolean
@@ -372,7 +372,7 @@ Use optional LIST if provided instead."
372 (mapcar 'elp-restore-function list))) 372 (mapcar 'elp-restore-function list)))
373 373
374(defun elp-restore-all () 374(defun elp-restore-all ()
375 "Restores the original definitions of all functions being profiled." 375 "Restore the original definitions of all functions being profiled."
376 (interactive) 376 (interactive)
377 (elp-restore-list elp-all-instrumented-list)) 377 (elp-restore-list elp-all-instrumented-list))
378 378
@@ -412,7 +412,7 @@ Use optional LIST if provided instead."
412 (elp-instrument-function funsym))) 412 (elp-instrument-function funsym)))
413 413
414(defun elp-unset-master () 414(defun elp-unset-master ()
415 "Unsets the master function." 415 "Unset the master function."
416 (interactive) 416 (interactive)
417 ;; when there's no master function, recording is turned on by default. 417 ;; when there's no master function, recording is turned on by default.
418 (setq elp-master nil 418 (setq elp-master nil
@@ -558,7 +558,7 @@ original definition, use \\[elp-restore-function] or \\[elp-restore-all]."
558(defun elp-results () 558(defun elp-results ()
559 "Display current profiling results. 559 "Display current profiling results.
560If `elp-reset-after-results' is non-nil, then current profiling 560If `elp-reset-after-results' is non-nil, then current profiling
561information for all instrumented functions are reset after results are 561information for all instrumented functions is reset after results are
562displayed." 562displayed."
563 (interactive) 563 (interactive)
564 (let ((curbuf (current-buffer)) 564 (let ((curbuf (current-buffer))