Returns a string containing the name of a symbol
(vl-symbol-name symbol)
A string containing the name of the supplied symbol argument, in uppercase.
_$ (vl-symbol-name 'S::STARTUP)
"S::STARTUP"
_$ (progn (setq sym 'my-var) (vl-symbol-name sym))
"MY-VAR"
_$ (vl-symbol-name 1)
; *** ERROR: bad argument type: symbolp 1