let print_backtrace_analyze f bt = ignore (analyze f bt)