Function: idlwave-sintern-class-info

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

Signature

(idlwave-sintern-class-info ENTRY)

Documentation

Sintern the class names in a class-info entry.

Source Code

;; Defined in /usr/src/emacs/lisp/obsolete/idlwave.el.gz
(defun idlwave-sintern-class-info (entry)
  "Sintern the class names in a class-info entry."
  (let ((inherits (assq 'inherits entry)))
    (setcar entry (idlwave-sintern-class (car entry) 'set))
    (if inherits
	(setcdr inherits (mapcar (lambda (x) (idlwave-sintern-class x 'set))
				 (cdr inherits))))))