Return-from is a lot like GOTO

• Return-from requires a block tag argument.

(defun try1 (item)

(let ((result nil))

(block search

(dolist (object *objects*)

(when (matchp item object)

(setq result object)

(return-from search nil))))

(print result)))

• Block gives you a named place to go to.

Previous slide

Next slide

Back to first slide

View graphic version