PDP-10 Archive: clisp/flavors/upsala/hallon.clisp from clisp

Google Enter your search terms Submit search form

Web pdp-10.trailing-edge.com

---

Trailing-Edge - PDP-10 Archives - clisp - clisp/flavors/upsala/hallon.clisp

---

There are no other files named hallon.clisp in the archive.

---

(in-package 'flavors)
(defflavor hallon
 (foo bar)
 ()
 :initable-instance-variables
 :settable-instance-variables)
(defmethod (hallon :list) ()
 (list foo bar))
(defmethod (hallon :foo-set) (new-foo)
 (setq foo new-foo))
(defmethod (hallon :bar-set) (new-bar)
 (setq bar new-bar))
(defmethod (hallon :foo?) ()
 foo)
(defmethod (hallon :bar?) ()
 bar)