b250514336
2014-07-25 Richard Biener <rguenther@suse.de> PR middle-end/61762 PR middle-end/61894 * fold-const.c (native_encode_int): Add and handle offset parameter to do partial encodings of expr. (native_encode_fixed): Likewise. (native_encode_real): Likewise. (native_encode_complex): Likewise. (native_encode_vector): Likewise. (native_encode_string): Likewise. (native_encode_expr): Likewise. * fold-const.c (native_encode_expr): Add offset parameter defaulting to -1. * gimple-fold.c (fold_string_cst_ctor_reference): Remove. (fold_ctor_reference): Handle all reads from tcc_constant ctors. * gcc.dg/pr61762.c: New testcase. * gcc.dg/fold-cstring.c: Likewise. * gcc.dg/fold-cvect.c: Likewise. From-SVN: r213045
172 lines
8.4 KiB
C
172 lines
8.4 KiB
C
/* Fold a constant sub-tree into a single node for C-compiler
|
|
Copyright (C) 1987-2014 Free Software Foundation, Inc.
|
|
|
|
This file is part of GCC.
|
|
|
|
GCC is free software; you can redistribute it and/or modify it under
|
|
the terms of the GNU General Public License as published by the Free
|
|
Software Foundation; either version 3, or (at your option) any later
|
|
version.
|
|
|
|
GCC is distributed in the hope that it will be useful, but WITHOUT ANY
|
|
WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
|
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
|
for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with GCC; see the file COPYING3. If not see
|
|
<http://www.gnu.org/licenses/>. */
|
|
|
|
#ifndef GCC_FOLD_CONST_H
|
|
#define GCC_FOLD_CONST_H
|
|
|
|
/* Non-zero if we are folding constants inside an initializer; zero
|
|
otherwise. */
|
|
extern int folding_initializer;
|
|
|
|
/* Convert between trees and native memory representation. */
|
|
extern int native_encode_expr (const_tree, unsigned char *, int, int off = -1);
|
|
extern tree native_interpret_expr (tree, const unsigned char *, int);
|
|
|
|
/* Fold constants as much as possible in an expression.
|
|
Returns the simplified expression.
|
|
Acts only on the top level of the expression;
|
|
if the argument itself cannot be simplified, its
|
|
subexpressions are not changed. */
|
|
|
|
extern tree fold (tree);
|
|
#define fold_unary(CODE,T1,T2)\
|
|
fold_unary_loc (UNKNOWN_LOCATION, CODE, T1, T2)
|
|
extern tree fold_unary_loc (location_t, enum tree_code, tree, tree);
|
|
#define fold_unary_ignore_overflow(CODE,T1,T2)\
|
|
fold_unary_ignore_overflow_loc (UNKNOWN_LOCATION, CODE, T1, T2)
|
|
extern tree fold_unary_ignore_overflow_loc (location_t, enum tree_code, tree, tree);
|
|
#define fold_binary(CODE,T1,T2,T3)\
|
|
fold_binary_loc (UNKNOWN_LOCATION, CODE, T1, T2, T3)
|
|
extern tree fold_binary_loc (location_t, enum tree_code, tree, tree, tree);
|
|
#define fold_ternary(CODE,T1,T2,T3,T4)\
|
|
fold_ternary_loc (UNKNOWN_LOCATION, CODE, T1, T2, T3, T4)
|
|
extern tree fold_ternary_loc (location_t, enum tree_code, tree, tree, tree, tree);
|
|
#define fold_build1(c,t1,t2)\
|
|
fold_build1_stat_loc (UNKNOWN_LOCATION, c, t1, t2 MEM_STAT_INFO)
|
|
#define fold_build1_loc(l,c,t1,t2)\
|
|
fold_build1_stat_loc (l, c, t1, t2 MEM_STAT_INFO)
|
|
extern tree fold_build1_stat_loc (location_t, enum tree_code, tree,
|
|
tree MEM_STAT_DECL);
|
|
#define fold_build2(c,t1,t2,t3)\
|
|
fold_build2_stat_loc (UNKNOWN_LOCATION, c, t1, t2, t3 MEM_STAT_INFO)
|
|
#define fold_build2_loc(l,c,t1,t2,t3)\
|
|
fold_build2_stat_loc (l, c, t1, t2, t3 MEM_STAT_INFO)
|
|
extern tree fold_build2_stat_loc (location_t, enum tree_code, tree, tree,
|
|
tree MEM_STAT_DECL);
|
|
#define fold_build3(c,t1,t2,t3,t4)\
|
|
fold_build3_stat_loc (UNKNOWN_LOCATION, c, t1, t2, t3, t4 MEM_STAT_INFO)
|
|
#define fold_build3_loc(l,c,t1,t2,t3,t4)\
|
|
fold_build3_stat_loc (l, c, t1, t2, t3, t4 MEM_STAT_INFO)
|
|
extern tree fold_build3_stat_loc (location_t, enum tree_code, tree, tree, tree,
|
|
tree MEM_STAT_DECL);
|
|
extern tree fold_build1_initializer_loc (location_t, enum tree_code, tree, tree);
|
|
extern tree fold_build2_initializer_loc (location_t, enum tree_code, tree, tree, tree);
|
|
#define fold_build_call_array(T1,T2,N,T4)\
|
|
fold_build_call_array_loc (UNKNOWN_LOCATION, T1, T2, N, T4)
|
|
extern tree fold_build_call_array_loc (location_t, tree, tree, int, tree *);
|
|
#define fold_build_call_array_initializer(T1,T2,N,T4)\
|
|
fold_build_call_array_initializer_loc (UNKNOWN_LOCATION, T1, T2, N, T4)
|
|
extern tree fold_build_call_array_initializer_loc (location_t, tree, tree, int, tree *);
|
|
extern bool fold_convertible_p (const_tree, const_tree);
|
|
#define fold_convert(T1,T2)\
|
|
fold_convert_loc (UNKNOWN_LOCATION, T1, T2)
|
|
extern tree fold_convert_loc (location_t, tree, tree);
|
|
extern tree fold_single_bit_test (location_t, enum tree_code, tree, tree, tree);
|
|
extern tree fold_ignored_result (tree);
|
|
extern tree fold_abs_const (tree, tree);
|
|
extern tree fold_indirect_ref_1 (location_t, tree, tree);
|
|
extern void fold_defer_overflow_warnings (void);
|
|
extern void fold_undefer_overflow_warnings (bool, const_gimple, int);
|
|
extern void fold_undefer_and_ignore_overflow_warnings (void);
|
|
extern bool fold_deferring_overflow_warnings_p (void);
|
|
extern int operand_equal_p (const_tree, const_tree, unsigned int);
|
|
extern int multiple_of_p (tree, const_tree, const_tree);
|
|
#define omit_one_operand(T1,T2,T3)\
|
|
omit_one_operand_loc (UNKNOWN_LOCATION, T1, T2, T3)
|
|
extern tree omit_one_operand_loc (location_t, tree, tree, tree);
|
|
#define omit_two_operands(T1,T2,T3,T4)\
|
|
omit_two_operands_loc (UNKNOWN_LOCATION, T1, T2, T3, T4)
|
|
extern tree omit_two_operands_loc (location_t, tree, tree, tree, tree);
|
|
#define invert_truthvalue(T)\
|
|
invert_truthvalue_loc (UNKNOWN_LOCATION, T)
|
|
extern tree invert_truthvalue_loc (location_t, tree);
|
|
extern tree fold_unary_to_constant (enum tree_code, tree, tree);
|
|
extern tree fold_binary_to_constant (enum tree_code, tree, tree, tree);
|
|
extern tree fold_read_from_constant_string (tree);
|
|
extern tree int_const_binop (enum tree_code, const_tree, const_tree);
|
|
#define build_fold_addr_expr(T)\
|
|
build_fold_addr_expr_loc (UNKNOWN_LOCATION, (T))
|
|
extern tree build_fold_addr_expr_loc (location_t, tree);
|
|
#define build_fold_addr_expr_with_type(T,TYPE)\
|
|
build_fold_addr_expr_with_type_loc (UNKNOWN_LOCATION, (T), TYPE)
|
|
extern tree build_fold_addr_expr_with_type_loc (location_t, tree, tree);
|
|
extern tree fold_build_cleanup_point_expr (tree type, tree expr);
|
|
extern tree fold_strip_sign_ops (tree);
|
|
#define build_fold_indirect_ref(T)\
|
|
build_fold_indirect_ref_loc (UNKNOWN_LOCATION, T)
|
|
extern tree build_fold_indirect_ref_loc (location_t, tree);
|
|
#define fold_indirect_ref(T)\
|
|
fold_indirect_ref_loc (UNKNOWN_LOCATION, T)
|
|
extern tree fold_indirect_ref_loc (location_t, tree);
|
|
extern tree build_simple_mem_ref_loc (location_t, tree);
|
|
#define build_simple_mem_ref(T)\
|
|
build_simple_mem_ref_loc (UNKNOWN_LOCATION, T)
|
|
extern offset_int mem_ref_offset (const_tree);
|
|
extern tree build_invariant_address (tree, tree, HOST_WIDE_INT);
|
|
extern tree constant_boolean_node (bool, tree);
|
|
extern tree div_if_zero_remainder (const_tree, const_tree);
|
|
|
|
extern bool tree_swap_operands_p (const_tree, const_tree, bool);
|
|
extern enum tree_code swap_tree_comparison (enum tree_code);
|
|
|
|
extern bool ptr_difference_const (tree, tree, HOST_WIDE_INT *);
|
|
extern enum tree_code invert_tree_comparison (enum tree_code, bool);
|
|
|
|
extern bool tree_unary_nonzero_warnv_p (enum tree_code, tree, tree, bool *);
|
|
extern bool tree_binary_nonzero_warnv_p (enum tree_code, tree, tree, tree op1,
|
|
bool *);
|
|
extern bool tree_single_nonzero_warnv_p (tree, bool *);
|
|
extern bool tree_unary_nonnegative_warnv_p (enum tree_code, tree, tree, bool *);
|
|
extern bool tree_binary_nonnegative_warnv_p (enum tree_code, tree, tree, tree,
|
|
bool *);
|
|
extern bool tree_single_nonnegative_warnv_p (tree t, bool *strict_overflow_p);
|
|
extern bool tree_call_nonnegative_warnv_p (tree, tree, tree, tree, bool *);
|
|
|
|
extern bool fold_real_zero_addition_p (const_tree, const_tree, int);
|
|
extern tree combine_comparisons (location_t, enum tree_code, enum tree_code,
|
|
enum tree_code, tree, tree, tree);
|
|
extern void debug_fold_checksum (const_tree);
|
|
extern bool may_negate_without_overflow_p (const_tree);
|
|
#define round_up(T,N) round_up_loc (UNKNOWN_LOCATION, T, N)
|
|
extern tree round_up_loc (location_t, tree, unsigned int);
|
|
#define round_down(T,N) round_down_loc (UNKNOWN_LOCATION, T, N)
|
|
extern tree round_down_loc (location_t, tree, int);
|
|
extern tree size_int_kind (HOST_WIDE_INT, enum size_type_kind);
|
|
#define size_binop(CODE,T1,T2)\
|
|
size_binop_loc (UNKNOWN_LOCATION, CODE, T1, T2)
|
|
extern tree size_binop_loc (location_t, enum tree_code, tree, tree);
|
|
#define size_diffop(T1,T2)\
|
|
size_diffop_loc (UNKNOWN_LOCATION, T1, T2)
|
|
extern tree size_diffop_loc (location_t, tree, tree);
|
|
|
|
/* Return an expr equal to X but certainly not valid as an lvalue. */
|
|
#define non_lvalue(T) non_lvalue_loc (UNKNOWN_LOCATION, T)
|
|
extern tree non_lvalue_loc (location_t, tree);
|
|
|
|
extern bool tree_expr_nonnegative_p (tree);
|
|
extern bool tree_expr_nonnegative_warnv_p (tree, bool *);
|
|
extern tree make_range (tree, int *, tree *, tree *, bool *);
|
|
extern tree make_range_step (location_t, enum tree_code, tree, tree, tree,
|
|
tree *, tree *, int *, bool *);
|
|
extern tree build_range_check (location_t, tree, tree, int, tree, tree);
|
|
extern bool merge_ranges (int *, tree *, tree *, int, tree, tree, int,
|
|
tree, tree);
|
|
|
|
#endif // GCC_FOLD_CONST_H
|