arc> (= a '(1 2)) (1 2) arc> (do (= (cddr a) a) t) t arc> (pop a) 1 arc> (pop a) 2 arc> (pop a) 1 arc> (pop a) 2