src/interp/br-con.lisp remove unused function