(defun my-func ()
(if cond1
(return-from my-func (calc-a-return-value)))
(if cond2
(return-from my-func (calc-a-different-one)))
(if cond3
(return-from my-func (foo)))
(bar))
;; same as previous, if returning from a func(setq maxrow 2)
(setq maxcol 4)
(defun get-neighbors-info (entire-graph row column)
(let ((neighbors-exist nil))
(if (> (- row 1) 0)
(cons neighbors-exist T)
(cons neighbors-exist F))
(if (> (+ row 1) maxrow)
(cons neighbors-exist T)
(cons neighbors-exist F))
(if (> (- col 1) 0)
(cons neighbors-exist T)
(cons neighbors-exist F))
(if (> (+ col 1) 0)
(cons neighbors-exist T)
(cons neighbors-exist F))))
(get-neighbors-info graph 0 0)