mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-15 10:30:25 -08:00
Merge from origin/emacs-25
16e5e8eFix last change to isearch-update (bug#23406)b755d98Autoload cursor-sensor-inhibit (bug#23406)b52ebd4org-map-entries: Fix org-agenda-prepare-buffers call86aa409Followup for last commit in the user manual7004459Improve doc string of 'set-goal-column'ccdaf04Fix the MSDOS buildffe701cRemove \= from format string (bug#18190)1c58fa1Fix variable-pitch font on MS-Windowsc6077bfRestore follow-scroll-up/down to scrolling by the combined si...b671e21Revert unneeded change which harms syntactic parsing. This f...48b24c9Correct indentation of ids in a C++ enum after a protection k...5c3534f* lisp/window.el (window--process-window-list): No-op if no p...734fb3aPort dumping to NetBSD with PaX0255a70Don't mistake `for' inside a function for a part of array com... # Conflicts: # src/Makefile.in
This commit is contained in:
commit
c3ed7cea0a
43 changed files with 479 additions and 286 deletions
|
|
@ -3440,7 +3440,7 @@ comment at the start of cc-engine.el for more info."
|
|||
(< c-state-old-cpp-beg here))
|
||||
(c-with-all-but-one-cpps-commented-out
|
||||
c-state-old-cpp-beg
|
||||
(min c-state-old-cpp-end here)
|
||||
c-state-old-cpp-end
|
||||
(c-invalidate-state-cache-1 here))
|
||||
(c-with-cpps-commented-out
|
||||
(c-invalidate-state-cache-1 here))))
|
||||
|
|
@ -5835,6 +5835,7 @@ comment at the start of cc-engine.el for more info."
|
|||
;;
|
||||
;; This macro might do hidden buffer changes.
|
||||
`(let (res)
|
||||
(setq c-last-identifier-range nil)
|
||||
(while (if (setq res ,(if (eq type 'type)
|
||||
`(c-forward-type)
|
||||
`(c-forward-name)))
|
||||
|
|
@ -9024,11 +9025,11 @@ comment at the start of cc-engine.el for more info."
|
|||
(not (looking-at "=")))))
|
||||
b-pos)))
|
||||
|
||||
(defun c-backward-colon-prefixed-type ()
|
||||
;; We're at the token after what might be a type prefixed with a colon. Try
|
||||
;; moving backward over this type and the colon. On success, return t and
|
||||
;; leave point before colon; on failure, leave point unchanged. Will clobber
|
||||
;; match data.
|
||||
(defun c-backward-typed-enum-colon ()
|
||||
;; We're at a "{" which might be the opening brace of a enum which is
|
||||
;; strongly typed (by a ":" followed by a type). If this is the case, leave
|
||||
;; point before the colon and return t. Otherwise leave point unchanged and return nil.
|
||||
;; Match data will be clobbered.
|
||||
(let ((here (point))
|
||||
(colon-pos nil))
|
||||
(save-excursion
|
||||
|
|
@ -9037,7 +9038,10 @@ comment at the start of cc-engine.el for more info."
|
|||
(or (not (looking-at "\\s)"))
|
||||
(c-go-up-list-backward))
|
||||
(cond
|
||||
((eql (char-after) ?:)
|
||||
((and (eql (char-after) ?:)
|
||||
(save-excursion
|
||||
(c-backward-syntactic-ws)
|
||||
(c-on-identifier)))
|
||||
(setq colon-pos (point))
|
||||
(forward-char)
|
||||
(c-forward-syntactic-ws)
|
||||
|
|
@ -9061,7 +9065,7 @@ comment at the start of cc-engine.el for more info."
|
|||
(let ((here (point))
|
||||
up-sexp-pos before-identifier)
|
||||
(when c-recognize-post-brace-list-type-p
|
||||
(c-backward-colon-prefixed-type))
|
||||
(c-backward-typed-enum-colon))
|
||||
(while
|
||||
(and
|
||||
(eq (c-backward-token-2) 0)
|
||||
|
|
|
|||
|
|
@ -1743,7 +1743,7 @@ Returns the compilation buffer created."
|
|||
(funcall compilation-process-setup-function))
|
||||
(and outwin (compilation-set-window-height outwin))
|
||||
;; Start the compilation.
|
||||
(if (fboundp 'start-process)
|
||||
(if (fboundp 'make-process)
|
||||
(let ((proc
|
||||
(if (eq mode t)
|
||||
;; comint uses `start-file-process'.
|
||||
|
|
|
|||
|
|
@ -1892,9 +1892,11 @@ In particular, return the buffer position of the first `for' kwd."
|
|||
;; To skip arbitrary expressions we need the parser,
|
||||
;; so we'll just guess at it.
|
||||
(if (and (> end (point)) ; Not empty literal.
|
||||
(re-search-forward "[^,]]* \\(for\\) " end t)
|
||||
(re-search-forward "[^,]]* \\(for\\_>\\)" end t)
|
||||
;; Not inside comment or string literal.
|
||||
(not (nth 8 (parse-partial-sexp bracket (point)))))
|
||||
(let ((status (parse-partial-sexp bracket (point))))
|
||||
(and (= 1 (car status))
|
||||
(not (nth 8 status)))))
|
||||
(match-beginning 1)))))))
|
||||
|
||||
(defun js--array-comp-indentation (bracket for-kwd)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue