yatex
diff yatexlib.el @ 262:15ec86ff549c
Call always bibtex after first typesetting when document needs bibtex.
Display total ellapsed time of all processing for impatients :).
Use value of `%BIBTEX ...' line, if any, to automatic (re)run of bibtex.
author | HIROSE Yuuji <yuuji@gentei.org> |
---|---|
date | Fri, 17 Feb 2012 17:42:27 +0900 |
parents | 3e3ccba06ca1 |
children | 9d022a531549 |
line diff
1.1 --- a/yatexlib.el Fri Feb 10 12:31:58 2012 +0900 1.2 +++ b/yatexlib.el Fri Feb 17 17:42:27 2012 +0900 1.3 @@ -2,7 +2,7 @@ 1.4 ;;; YaTeX and yahtml common libraries, general functions and definitions 1.5 ;;; yatexlib.el 1.6 ;;; (c)1994-2012 by HIROSE Yuuji.[yuuji@yatex.org] 1.7 -;;; Last modified Fri Feb 10 12:30:49 2012 on firestorm 1.8 +;;; Last modified Fri Feb 17 17:15:37 2012 on firestorm 1.9 ;;; $Id$ 1.10 1.11 ;; General variables 1.12 @@ -1534,6 +1534,15 @@ 1.13 (kill-new string) 1.14 (message (concat "`%s'" msg) string key)))) 1.15 1.16 +(defun YaTeX-elapsed-time (before after) 1.17 + "Get elapsed time from BEFORE and AFTER, which are given from currente-time." 1.18 + (if (fboundp 'float) ;Then, current-time function should be. 1.19 + (let ((mil (float 1000000))) ;To protect parse error before 19 1.20 + (+ (* (- (nth 0 after) (nth 0 before)) 65536) 1.21 + (- (nth 1 after) (nth 1 before)) 1.22 + (- (/ (nth 2 after) mil) 1.23 + (/ (nth 2 before) mil)))))) 1.24 + 1.25 ;;; 1.26 ;; Functions for the Installation time 1.27 ;;;