next up previous contents index
Next: Class `library' part 3 Up: 3rd example of object Previous: Class `library' part 1   Contents   Index

Class `library' part 2


\begin{lstlisting}[language=Scm]{} (define new-book (lambda(abook) ((abook 'c... ...((abook 'change-holder) self) true)) false)))) false)))))) ; \end{lstlisting}

domain access counter Georg P. Loczewski 2004-03-05