Common Lisp pushback stream implementation