Function: hi-lock-regexp-okay

hi-lock-regexp-okay is a byte-compiled function defined in hi-lock.el.gz.

Signature

(hi-lock-regexp-okay REGEXP)

Documentation

Return REGEXP if it appears suitable for a font-lock pattern.

Otherwise signal an error. A pattern that matches the null string is not suitable.

Source Code

;; Defined in /usr/src/emacs/lisp/hi-lock.el.gz
;; Implementation Functions

(defun hi-lock-regexp-okay (regexp)
  "Return REGEXP if it appears suitable for a font-lock pattern.

Otherwise signal an error.  A pattern that matches the null string is
not suitable."
  (cond
   ((null regexp)
    (error "Regexp cannot match nil"))
   ((string-match regexp "")
    (error "Regexp cannot match an empty string"))
   (t regexp)))