Move fail within if form, as in regexp-parse.