next up previous contents index
Next: Initializing the A++ Interpreter Up: Initializing the A++ Interpreter Previous: Initializing the A++ Interpreter   Contents   Index

Initializing the A++ Interpreter part 5


\begin{lstlisting}[language=Scm]{}
(define addelt (lambda(x s)
(if (memberp x s...
... false
(if (equaln x (car s))
true
(memberp x (cdr s))))))
;
\end{lstlisting}


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