let parse_expr loc str = Gram.parse_string antiquot_expr loc str