Function: dun-doverb

dun-doverb is a byte-compiled function defined in dunnet.el.gz.

Signature

(dun-doverb IGNORE VERBLIST VERB REST)

Documentation

Take a verb and a list of other words.

Calls proper function associated with the verb, and passes along the other words.

Source Code

;; Defined in /usr/src/emacs/lisp/play/dunnet.el.gz
;;;;
;;;;  This section defines various utility functions used
;;;;  by dunnet.
;;;;


(defun dun-doverb (ignore verblist verb rest)
  "Take a verb and a list of other words.
Calls proper function associated with the verb, and passes along the
other words."
  (when verb
    (if (member (intern verb) ignore)
	(if (not (car rest)) -1
	  (dun-doverb ignore verblist (car rest) (cdr rest)))
      (if (not (cdr (assq (intern verb) verblist))) -1
	(setq dun-numcmds (1+ dun-numcmds))
	(funcall (cdr (assq (intern verb) verblist)) rest)))))