Function: create-glyph
create-glyph is an autoloaded and byte-compiled function defined in
disp-table.el.gz.
Signature
(create-glyph STRING)
Documentation
Allocate a glyph code to display by sending STRING to the terminal.
Source Code
;; Defined in /usr/src/emacs/lisp/disp-table.el.gz
;;;###autoload
(defun create-glyph (string)
"Allocate a glyph code to display by sending STRING to the terminal."
(if (= (length glyph-table) 65536)
(error "No free glyph codes remain"))
;; Don't use slots that correspond to ASCII characters.
(if (= (length glyph-table) 32)
(setq glyph-table (vconcat glyph-table (make-vector 224 nil))))
(setq glyph-table (vconcat glyph-table (list string)))
(1- (length glyph-table)))