Lines Matching +defs:skip +defs:keep
2050 (defun vhdl-keep-region-active ()
2051 "Do whatever is necessary to keep the region active in XEmacs.
4716 (set (make-local-variable 'comment-start-skip) "--+\\s-*")
5176 ((eq position 'eoi) '((end-of-line) (skip-chars-backward " \t")))
5232 ;; error, but don't signal one, keep trying
5283 (vhdl-keep-region-active))
5322 (vhdl-keep-region-active))
5382 negative, skip forward otherwise."
5385 ;; skip backwards
5387 (skip-chars-backward " \t\n")
5390 (skip-chars-backward " \t\n")))
5391 ;; skip forwards
5392 (skip-chars-forward " \t\n")
5395 (skip-chars-forward " \t\n"))))
5459 "Forward skip of syntactic whitespace."
5465 ;; skip preprocessor directives
5476 "Forward skip syntactic whitespace for Win-Emacs."
5480 (skip-chars-forward " \t\n\r\f" lim)
5504 "Backward skip over syntactic whitespace."
5515 "Backward skip syntactic whitespace for Win-Emacs."
5519 (skip-chars-backward " \t\n\r\f" lim)
5523 (skip-chars-backward "^-" lim)
5524 (skip-chars-backward "-" lim)
5528 (skip-chars-backward "^-" lim)
5529 (skip-chars-backward "-" lim)))
5565 (skip-chars-forward " \t\n")
5625 ;; Skip backward over first sexp (needed to skip over a
5711 (vhdl-backward-skip-label lim)
5720 (vhdl-backward-skip-label lim)
5732 (vhdl-backward-skip-label lim)
5741 (vhdl-backward-skip-label lim)
5786 (skip-chars-forward " \t\n")
5857 (skip-chars-forward " \t\n")
5871 (skip-chars-forward " \t\n")
5874 (skip-chars-forward " \t\n"))
5904 (skip-chars-forward " \t\n")
5982 ;; skip whitespace
5983 (skip-chars-forward " \t\n")
6217 ;; It wasn't a real keyword, so keep searching.
6271 ;; It wasn't a real keyword, so keep searching.
6286 (vhdl-keep-region-active)
6311 (looking-at (concat "[ \t]*" comment-start-skip))))
6319 (vhdl-keep-region-active))
6361 ;; If we are looking at a close paren, then skip it
6515 (defun vhdl-skip-case-alternative (&optional lim)
6542 (defun vhdl-backward-skip-label (&optional lim)
6558 (defun vhdl-forward-skip-label (&optional lim)
6622 (skip-chars-forward " \t")
6636 (skip-chars-forward " \t")
6708 (skip-chars-forward " \t")
6713 (skip-chars-backward " \t(")
6731 (vhdl-backward-skip-label (vhdl-point 'boi))
6740 (vhdl-backward-skip-label (vhdl-point 'boi))
6749 (vhdl-backward-skip-label containing-sexp)))))
6771 ;; Make placeholder skip a label, but only if it puts us
6777 (vhdl-forward-skip-label indent-point)
6806 ;; not a paren, so skip over the keyword.
6815 ;; we also want to skip over the body of the
6818 (while (vhdl-skip-case-alternative indent-point))
6845 (vhdl-backward-skip-label (vhdl-point 'boi))
6854 (skip-chars-forward " \t")
6879 (skip-chars-forward " \t" (vhdl-point 'eol)))
6898 (skip-chars-forward " \t")
6915 (skip-chars-forward " \t" (vhdl-point 'eol))
6956 ;; skip over any parenthesized expressions
6969 (skip-chars-forward " \t")
7133 (vhdl-keep-region-active))
7167 (vhdl-keep-region-active))
7241 (skip-chars-forward " \t\n")
10024 (skip-chars-backward " \t")
10380 (skip-chars-backward "^ \t\n")
10382 (skip-chars-forward "^ \t\n")
10535 ;; skip subblock if block end found
10559 ;; skip subblock if block beginning found
11052 (skip-chars-forward " \t")
11829 (skip-chars-forward " \t")
12063 (skip-syntax-backward "w_")) ; crashes in `viper-mode'
12592 `font-lock-match-c-style-declaration-item-and-skip-to-next'."
12729 (skip-syntax-backward " ")
12730 (skip-syntax-backward "w_")
12731 (skip-syntax-backward " ")
12734 (skip-syntax-backward " ")
12735 (skip-syntax-backward "w_")
12736 (skip-syntax-backward " ")))
12737 ; (skip-chars-backward "^-(\n\";")
12745 (skip-syntax-backward " ")
12747 (skip-syntax-backward "w_")
12748 (skip-syntax-backward " ")
15022 ;; skip invisible number info
15530 (skip-chars-backward " \t\n")
15536 (skip-chars-backward " \t\n")
15968 ;; skip common path with previous instance
16984 (vhdl-keep-region-active))