Function: srecode-read-variable-name

srecode-read-variable-name is a byte-compiled function defined in srt.el.gz.

Signature

(srecode-read-variable-name PROMPT &optional INITIAL HIST DEFAULT)

Documentation

Read in the name of a declared variable in the current SRT file.

PROMPT is the prompt to use. INITIAL is the initial string. HIST is the history value, otherwise srecode-read-variable-name-history
     is used.
DEFAULT is the default if RET is hit.

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/srecode/srt.el.gz
(defun srecode-read-variable-name (prompt &optional initial hist default)
  "Read in the name of a declared variable in the current SRT file.
PROMPT is the prompt to use.
INITIAL is the initial string.
HIST is the history value, otherwise `srecode-read-variable-name-history'
     is used.
DEFAULT is the default if RET is hit."
  (let* ((newdict (srecode-create-dictionary))
	 (currfcn (semantic-current-tag))
	 )
    (srecode-resolve-argument-list
     (mapcar #'read
	     (semantic-tag-get-attribute currfcn :arguments))
     newdict)

    (with-slots (namehash) newdict
      (completing-read prompt namehash nil nil initial
		       (or hist 'srecode-read-variable-name-history)
		       default))
    ))