let add_bump_pos state str ~max_pos ~pos c cont = add_bump bump_text_pos state str ~max_pos ~pos c cont