[Small-cl-src] a Clisp problem