Lines Matching defs:keywords
45 ;; 1) Upcasing or capitalizing of all keywords.
47 ;; Automatic upcase or downcase of keywords is controlled by the variable
101 ;; f90-font-lock-keywords f90-font-lock-keywords-2
106 ;; (if f90-auto-keyword-case ; change case of all keywords on startup
107 ;; (f90-change-keywords f90-auto-keyword-case))
111 ;; f90-font-lock-keywords, etc.
141 ;; f90-upcase-keywords f90-upcase-region-keywords
142 ;; f90-downcase-keywords f90-downcase-region-keywords
143 ;; f90-capitalize-keywords f90-capitalize-region-keywords
161 (defvar font-lock-keywords)
245 "*Automatic case conversion of keywords.
264 (defconst f90-keywords-re
278 ;; F95 keywords.
280 "Regexp used by the function `f90-change-keywords'.")
282 (defconst f90-keywords-level-3-re
290 ;; F95 keywords.
329 (defconst f90-hpf-keywords-re
350 "Regexp for all HPF keywords, procedures and directives.")
354 (defvar f90-font-lock-keywords-1
368 (defvar f90-font-lock-keywords-2
370 f90-font-lock-keywords-1
402 (defvar f90-font-lock-keywords-3
403 (append f90-font-lock-keywords-2
405 f90-keywords-level-3-re
410 "Highlights all F90 keywords and intrinsic procedures.")
412 (defvar f90-font-lock-keywords-4
413 (append f90-font-lock-keywords-3
414 (list f90-hpf-keywords-re))
415 "Highlights all F90 and HPF keywords.")
417 (defvar f90-font-lock-keywords
418 f90-font-lock-keywords-2
506 ["Upcase Keywords (buffer)" f90-upcase-keywords t]
507 ["Capitalize Keywords (buffer)" f90-capitalize-keywords t]
508 ["Downcase Keywords (buffer)" f90-downcase-keywords t]
510 ["Upcase Keywords (region)" f90-upcase-region-keywords
512 ["Capitalize Keywords (region)" f90-capitalize-region-keywords
514 ["Downcase Keywords (region)" f90-downcase-region-keywords
530 "Set `font-lock-keywords' to `f90-font-lock-keywords-1'."
533 (setq font-lock-keywords f90-font-lock-keywords-1)
537 "Set `font-lock-keywords' to `f90-font-lock-keywords-2'."
540 (setq font-lock-keywords f90-font-lock-keywords-2)
544 "Set `font-lock-keywords' to `f90-font-lock-keywords-3'."
547 (setq font-lock-keywords f90-font-lock-keywords-3)
551 "Set `font-lock-keywords' to `f90-font-lock-keywords-4'."
554 (setq font-lock-keywords f90-font-lock-keywords-4)
765 abbrevs for F90 keywords.
805 Automatic change of case of keywords (default nil).
829 '((f90-font-lock-keywords f90-font-lock-keywords-1
830 f90-font-lock-keywords-2
831 f90-font-lock-keywords-3
832 f90-font-lock-keywords-4)
1066 (f90-change-keywords f90-auto-keyword-case
1799 ;; Abbrevs and keywords.
1836 (defun f90-upcase-keywords ()
1837 "Upcase all F90 keywords in the buffer."
1839 (f90-change-keywords 'upcase-word))
1841 (defun f90-capitalize-keywords ()
1842 "Capitalize all F90 keywords in the buffer."
1844 (f90-change-keywords 'capitalize-word))
1846 (defun f90-downcase-keywords ()
1847 "Downcase all F90 keywords in the buffer."
1849 (f90-change-keywords 'downcase-word))
1851 (defun f90-upcase-region-keywords (beg end)
1852 "Upcase all F90 keywords in the region."
1854 (f90-change-keywords 'upcase-word beg end))
1856 (defun f90-capitalize-region-keywords (beg end)
1857 "Capitalize all F90 keywords in the region."
1859 (f90-change-keywords 'capitalize-word beg end))
1861 (defun f90-downcase-region-keywords (beg end)
1862 "Downcase all F90 keywords in the region."
1864 (f90-change-keywords 'downcase-word beg end))
1866 ;; Change the keywords according to argument.
1867 (defun f90-change-keywords (change-word &optional beg end)
1868 "Change the case of F90 keywords in the region (if specified) or buffer.
1875 f90-keywords-re "\\|" f90-procedures-re "\\|"
1876 f90-hpf-keywords-re "\\|" f90-operators-re "\\)"))