branch: externals/phps-mode commit d4832bfb9215f23ee0a08b8d2070f849313cd6cf Author: Christian Johansson <christ...@cvj.se> Commit: Christian Johansson <christ...@cvj.se>
Added flag to control display of profiling information --- phps-mode-lex-analyzer.el | 21 +++++++++++++-------- 1 file changed, 13 insertions(+), 8 deletions(-) diff --git a/phps-mode-lex-analyzer.el b/phps-mode-lex-analyzer.el index 871fd2863e..5ea22fd220 100644 --- a/phps-mode-lex-analyzer.el +++ b/phps-mode-lex-analyzer.el @@ -101,6 +101,9 @@ (defvar-local phps-mode-lex-analyzer--lexer-max-index nil "Max-index of lex-analyzer.") +(defvar phps-mode-lex-analyzer--show-profiling-information nil + "Show profiling information.") + ;; FUNCTIONS @@ -367,10 +370,11 @@ ALLOW-CACHE-READ and ALLOW-CACHE-WRITE." timer-end timer-start))) - (message "Total elapsed time: %S" timer-elapsed) - (message "Lexer elapsed time: %S" timer-elapsed-lexer) - (message "Parser elapsed time: %S" timer-elapsed-parser) - (message "Syntax coloring elapsed time: %S" timer-elapsed-syntax-coloring) + (when phps-mode-lex-analyzer--show-profiling-information + (message "Total elapsed time: %S" timer-elapsed) + (message "Lexer elapsed time: %S" timer-elapsed-lexer) + (message "Parser elapsed time: %S" timer-elapsed-parser) + (message "Syntax coloring elapsed time: %S" timer-elapsed-syntax-coloring)) ) @@ -578,10 +582,11 @@ ALLOW-CACHE-READ and ALLOW-CACHE-WRITE." timer-end timer-start))) - (message "Total elapsed time: %S" timer-elapsed) - (message "Lexer elapsed time: %S" timer-elapsed-lexer) - (message "Parser elapsed time: %S" timer-elapsed-parser) - (message "Syntax coloring elapsed time: %S" timer-elapsed-syntax-coloring) + (when phps-mode-lex-analyzer--show-profiling-information + (message "Total elapsed time: %S" timer-elapsed) + (message "Lexer elapsed time: %S" timer-elapsed-lexer) + (message "Parser elapsed time: %S" timer-elapsed-parser) + (message "Syntax coloring elapsed time: %S" timer-elapsed-syntax-coloring)) )