make NULL-BLOCK-P more lispy