Function: cl-gensym

cl-gensym is an autoloaded and byte-compiled function defined in cl-macs.el.gz.

This function is obsolete since 31.1; use gensym instead.

Signature

(cl-gensym &optional PREFIX)

Documentation

Generate a new uninterned symbol.

The name is made by appending a number to PREFIX, default "G".

Probably introduced at or before Emacs version 31.1.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/cl-macs.el.gz
;;;###autoload
(defun cl-gensym (&optional prefix)
  "Generate a new uninterned symbol.
The name is made by appending a number to PREFIX, default \"G\"."
  (declare (obsolete gensym "31.1"))
  (let ((pfix (if (stringp prefix) prefix "G"))
	(num (if (integerp prefix) prefix
	       (prog1 cl--gensym-counter
		 (setq cl--gensym-counter (1+ cl--gensym-counter))))))
    (make-symbol (format "%s%d" pfix num))))