Function: vhdl-in-literal
vhdl-in-literal is a byte-compiled function defined in
vhdl-mode.el.gz.
Signature
(vhdl-in-literal)
Documentation
Determine if point is in a VHDL literal.
Source Code
;; Defined in /usr/src/emacs/lisp/progmodes/vhdl-mode.el.gz
(defun vhdl-in-literal ()
"Determine if point is in a VHDL literal."
(save-excursion
(let ((state (parse-partial-sexp (vhdl-point 'bol) (point))))
(cond
((nth 3 state) 'string)
((nth 4 state) 'comment)
((vhdl-beginning-of-macro) 'pound)
((vhdl-beginning-of-directive) 'directive)
;; for multi-line comments
((and (vhdl-standard-p '08) (vhdl-in-comment-p)) 'comment)
(t nil)))))