Function: idlwave-sintern-set

idlwave-sintern-set is a byte-compiled function defined in idlwave.el.gz.

Signature

(idlwave-sintern-set NAME TYPE TABLES SET)

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/idlwave.el.gz
(defun idlwave-sintern-set (name type tables set)
  (let* ((func (or (cdr (assq type idlwave-completion-case))
		   'identity))
	 (iname (funcall (if (eq func 'preserve) 'identity func) name))
	 (table (if (eq set 'sys) (cdr tables) (car tables))))
    (puthash (downcase name) iname table)
    iname))