rework sbcl eval, a bit.