diff options
Diffstat (limited to 'gcc/java/expr.c')
-rw-r--r-- | gcc/java/expr.c | 81 |
1 files changed, 0 insertions, 81 deletions
diff --git a/gcc/java/expr.c b/gcc/java/expr.c index 85d732c..c51b5cd 100644 --- a/gcc/java/expr.c +++ b/gcc/java/expr.c @@ -3757,87 +3757,6 @@ force_evaluation_order (tree node) return node; } -/* EXPR_WITH_FILE_LOCATION are used to keep track of the exact - location where an expression or an identifier were encountered. It - is necessary for languages where the frontend parser will handle - recursively more than one file (Java is one of them). */ - -tree -build_expr_wfl (tree node, -#ifdef USE_MAPPED_LOCATION - source_location location -#else - const char *file, int line, int col -#endif -) -{ - tree wfl; - -#ifdef USE_MAPPED_LOCATION - wfl = make_node (EXPR_WITH_FILE_LOCATION); - SET_EXPR_LOCATION (wfl, location); -#else - static const char *last_file = 0; - static tree last_filenode = NULL_TREE; - - wfl = make_node (EXPR_WITH_FILE_LOCATION); - - EXPR_WFL_SET_LINECOL (wfl, line, col); - if (file != last_file) - { - last_file = file; - last_filenode = file ? get_identifier (file) : NULL_TREE; - } - EXPR_WFL_FILENAME_NODE (wfl) = last_filenode; -#endif - EXPR_WFL_NODE (wfl) = node; - if (node) - { - if (!TYPE_P (node)) - TREE_SIDE_EFFECTS (wfl) = TREE_SIDE_EFFECTS (node); - TREE_TYPE (wfl) = TREE_TYPE (node); - } - - return wfl; -} - -#ifdef USE_MAPPED_LOCATION -tree -expr_add_location (tree node, source_location location, bool statement) -{ - tree wfl; -#if 0 - /* FIXME. This optimization causes failures in code that expects an - EXPR_WITH_FILE_LOCATION. E.g. in resolve_qualified_expression_name. */ - if (node && ! (statement && flag_emit_class_files)) - { - source_location node_loc = EXPR_LOCATION (node); - if (node_loc == location || location == UNKNOWN_LOCATION) - return node; - if (node_loc == UNKNOWN_LOCATION - && IS_EXPR_CODE_CLASS (TREE_CODE_CLASS (TREE_CODE (node)))) - { - SET_EXPR_LOCATION (node, location); - return node; - } - } -#endif - wfl = make_node (EXPR_WITH_FILE_LOCATION); - SET_EXPR_LOCATION (wfl, location); - EXPR_WFL_NODE (wfl) = node; - if (statement && debug_info_level != DINFO_LEVEL_NONE) - EXPR_WFL_EMIT_LINE_NOTE (wfl) = 1; - if (node) - { - if (!TYPE_P (node)) - TREE_SIDE_EFFECTS (wfl) = TREE_SIDE_EFFECTS (node); - TREE_TYPE (wfl) = TREE_TYPE (node); - } - - return wfl; -} -#endif - /* Build a node to represent empty statements and blocks. */ tree |