r9948: fix for segv on sbcl