Generic Function Call
Suppose one represented objects using sequences, with symbols for type codes
(defun seize (list-lock)
(if (listp list-lock)
(ecase (car list-lock)
(simple-lock . . .)
(null-lock . . .))
(error . . .)))
Slower than either typecase or GF dispatch
Previous slide
Next slide
Back to first slide
View graphic version