From 51eb91c27c2b04515fb4cc8632209fb51be10621 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 23 Jun 1997 19:12:42 +0000 Subject: [PATCH] (profile-million): Variable moved. --- lisp/emacs-lisp/profile.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/emacs-lisp/profile.el b/lisp/emacs-lisp/profile.el index a7e137332e7..1f17a66310c 100644 --- a/lisp/emacs-lisp/profile.el +++ b/lisp/emacs-lisp/profile.el @@ -92,6 +92,8 @@ Both how many times invoked and real time of start.") (defvar profile-time (cons 0 0) "Used to return result from a filter.") (defvar profile-buffer "*profile*" "Name of profile buffer.") +(defconst profile-million 1000000) + ;;; ;;; F U N C T I O N S ;;; @@ -188,8 +190,6 @@ With argument FLIST, use the list FLIST instead." (setcar init-time (car profile-time)) (setcdr init-time (cdr profile-time))) )) - -(defconst profile-million 1000000) (defun profile-update-function (fun) "When the call to the function FUN is finished, add its run time." -- 2.39.5