[elpa] externals/phps-mode d6e6cbc 358/405: Another optimization of line-number-at-pos inside loop

[Stefan Monnier]

branch: externals/phps-mode
commit d6e6cbce29f59ee0fcdee310c8cfa6c6e9a3c08e
Author: Christian Johansson <address@hidden>
Commit: Christian Johansson <address@hidden>

    Another optimization of line-number-at-pos inside loop
---
 phps-mode-functions.el | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/phps-mode-functions.el b/phps-mode-functions.el
index c50646e..d0a84ca 100644
--- a/phps-mode-functions.el
+++ b/phps-mode-functions.el
@@ -47,8 +47,6 @@
 ;; NOTE Also format white-space inside the line, i.e. after function 
declarations?
 
 
-;; TODO Optimize line-number-at-pos
-
 (defun phps-mode-functions-get-buffer-changes-start ()
   "Get buffer change start."
   phps-mode-functions-buffer-changes-start)
@@ -894,7 +892,7 @@
 
           (when (< current-line-number end-line-number)
             (line-move 1))
-          (setq current-line-number (line-number-at-pos)))))))
+          (setq current-line-number (1+ current-line-number)))))))
 
 (defun phps-mode-functions-uncomment-region (beg end &optional _arg)
   "Comment region from BEG to END with optional ARG."
@@ -944,7 +942,7 @@
 
           (when (< current-line-number end-line-number)
             (line-move 1))
-          (setq current-line-number (line-number-at-pos)))))))
+          (setq current-line-number (1+ current-line-number)))))))
 
 (defun phps-mode-functions-init ()
   "PHP specific init-cleanup routines."