Function: vhdl-fix-case-word

vhdl-fix-case-word is an interactive and byte-compiled function defined in vhdl-mode.el.gz.

Signature

(vhdl-fix-case-word &optional ARG)

Documentation

Convert word after cursor to upper case if necessary.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/vhdl-mode.el.gz
(defun vhdl-fix-case-word (&optional arg)
  "Convert word after cursor to upper case if necessary."
  (interactive "p")
  (save-excursion
    (when arg (backward-word 1))
    (vhdl-prepare-search-1
     (when (and vhdl-upper-case-keywords
		(looking-at vhdl-keywords-regexp))
       (upcase-word 1))
     (when (and vhdl-upper-case-types
		(looking-at vhdl-types-regexp))
       (upcase-word 1))
     (when (and vhdl-upper-case-attributes
		(looking-at vhdl-attributes-regexp))
       (upcase-word 1))
     (when (and vhdl-upper-case-enum-values
		(looking-at vhdl-enum-values-regexp))
       (upcase-word 1))
     (when (and vhdl-upper-case-constants
		(looking-at vhdl-constants-regexp))
       (upcase-word 1)))))