Etypecase
Equivalent to TYPECASE with the otherwise clause signalling an error
(etypecase number
(integer (print 'integer))
(single-float (print 'single-float))
(double-float (print 'double-float)))
Previous slide
Next slide
Back to first slide
View graphic version