A Lisp applet fragment

(defun destroy-applet (panel cons call)

;; called from Java destroy method.

(format t

"~&;; destroy-applet~A.~A.~A called.~%”

(jclass-of panel) cons call)

(setf *run* :end))

Previous slide

Next slide

Back to first slide

View graphic version