Function: byte-run--unescaped-character-literals-warning

byte-run--unescaped-character-literals-warning is a byte-compiled function defined in byte-run.el.gz.

Signature

(byte-run--unescaped-character-literals-warning)

Documentation

Return a warning about unescaped character literals.

If there were any unescaped character literals in the last form read, return an appropriate warning message as a string. Otherwise, return nil. For internal use only.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/byte-run.el.gz
(defun byte-run--unescaped-character-literals-warning ()
  "Return a warning about unescaped character literals.
If there were any unescaped character literals in the last form
read, return an appropriate warning message as a string.
Otherwise, return nil.  For internal use only."
  ;; This is called from lread.c and therefore needs to be preloaded.
  (if lread--unescaped-character-literals
      (let ((sorted (sort lread--unescaped-character-literals #'<)))
        (format-message "unescaped character literals %s detected, %s expected!"
                        (mapconcat (lambda (char) (format "`?%c'" char))
                                   sorted ", ")
                        (mapconcat (lambda (char) (format "`?\\%c'" char))
                                   sorted ", ")))))