A Lisp applet fragment

(defun start-applet (panel cons call)

;; called from Java start method.

(format t

“~&;; start-applet ~A.~A.~A called.~%”

(jclass-of panel) cons call)

(setf *run* t *panel* panel))

Previous slide

Next slide

Back to first slide

View graphic version