8 lines
149 B
Common Lisp
8 lines
149 B
Common Lisp
|
(defun bar (n)
|
||
|
|
"Add 3 to the argument."
|
||
|
|
(+ n 3))
|
||
|
|
|
||
|
|
(defclass button (widget)
|
||
|
|
(label action)
|
||
|
|
(:documentation "This is a push-button widget."))
|