Basic idea works for SBCL