fixed for simplisp, but testing