Mercurial > hg > CbC > CbC_gcc
diff gcc/input.h @ 111:04ced10e8804
gcc 7
author | kono |
---|---|
date | Fri, 27 Oct 2017 22:46:09 +0900 |
parents | f6334be47118 |
children | 84e7813d76e9 |
line wrap: on
line diff
--- a/gcc/input.h Sun Aug 21 07:07:55 2011 +0900 +++ b/gcc/input.h Fri Oct 27 22:46:09 2017 +0900 @@ -1,7 +1,6 @@ /* Declarations for variables relating to reading the source file. Used by parsers, lexical analyzers, and error message routines. - Copyright (C) 1993, 1997, 1998, 2000, 2003, 2004, 2007, 2008, 2009, 2010 - Free Software Foundation, Inc. + Copyright (C) 1993-2017 Free Software Foundation, Inc. This file is part of GCC. @@ -25,6 +24,7 @@ #include "line-map.h" extern GTY(()) struct line_maps *line_table; +extern GTY(()) struct line_maps *saved_line_table; /* A value which will never be used to represent a real location. */ #define UNKNOWN_LOCATION ((source_location) 0) @@ -37,21 +37,14 @@ extern char builtins_location_check[(BUILTINS_LOCATION < RESERVED_LOCATION_COUNT) ? 1 : -1]; -typedef struct -{ - /* The name of the source file involved. */ - const char *file; - - /* The line-location in the source file. */ - int line; - - int column; - - /* In a system header?. */ - bool sysp; -} expanded_location; - +extern bool is_location_from_builtin_token (source_location); extern expanded_location expand_location (source_location); +extern const char *location_get_source_line (const char *file_path, int line, + int *line_size); +extern bool location_missing_trailing_newline (const char *file_path); +extern expanded_location expand_location_to_spelling_point (source_location); +extern source_location expansion_point_location_if_in_system_header (source_location); +extern source_location expansion_point_location (source_location); /* Historically GCC used location_t, while cpp used source_location. This could be removed but it hardly seems worth the effort. */ @@ -61,10 +54,104 @@ #define LOCATION_FILE(LOC) ((expand_location (LOC)).file) #define LOCATION_LINE(LOC) ((expand_location (LOC)).line) +#define LOCATION_COLUMN(LOC)((expand_location (LOC)).column) +#define LOCATION_LOCUS(LOC) \ + ((IS_ADHOC_LOC (LOC)) ? get_location_from_adhoc_loc (line_table, LOC) \ + : (LOC)) +#define LOCATION_BLOCK(LOC) \ + ((tree) ((IS_ADHOC_LOC (LOC)) ? get_data_from_adhoc_loc (line_table, (LOC)) \ + : NULL)) +#define RESERVED_LOCATION_P(LOC) \ + (LOCATION_LOCUS (LOC) < RESERVED_LOCATION_COUNT) -#define input_line LOCATION_LINE (input_location) -#define input_filename LOCATION_FILE (input_location) -#define in_system_header_at(LOC) ((expand_location (LOC)).sysp != 0) -#define in_system_header (in_system_header_at (input_location)) +/* Return a positive value if LOCATION is the locus of a token that is + located in a system header, O otherwise. It returns 1 if LOCATION + is the locus of a token that is located in a system header, and 2 + if LOCATION is the locus of a token located in a C system header + that therefore needs to be extern "C" protected in C++. + + Note that this function returns 1 if LOCATION belongs to a token + that is part of a macro replacement-list defined in a system + header, but expanded in a non-system file. */ +#define in_system_header_at(LOC) \ + (linemap_location_in_system_header_p (line_table, LOC)) +/* Return a positive value if LOCATION is the locus of a token that + comes from a macro expansion, O otherwise. */ +#define from_macro_expansion_at(LOC) \ + ((linemap_location_from_macro_expansion_p (line_table, LOC))) +/* Return a positive value if LOCATION is the locus of a token that comes from + a macro definition, O otherwise. This differs from from_macro_expansion_at + in its treatment of macro arguments, for which this returns false. */ +#define from_macro_definition_at(LOC) \ + ((linemap_location_from_macro_definition_p (line_table, LOC))) + +static inline location_t +get_pure_location (location_t loc) +{ + return get_pure_location (line_table, loc); +} + +/* Get the start of any range encoded within location LOC. */ + +static inline location_t +get_start (location_t loc) +{ + return get_range_from_loc (line_table, loc).m_start; +} + +/* Get the endpoint of any range encoded within location LOC. */ + +static inline location_t +get_finish (location_t loc) +{ + return get_range_from_loc (line_table, loc).m_finish; +} + +extern location_t make_location (location_t caret, + location_t start, location_t finish); +extern location_t make_location (location_t caret, source_range src_range); + +void dump_line_table_statistics (void); + +void dump_location_info (FILE *stream); + +void diagnostics_file_cache_fini (void); + +void diagnostics_file_cache_forcibly_evict_file (const char *file_path); + +struct GTY(()) string_concat +{ + string_concat (int num, location_t *locs); + + int m_num; + location_t * GTY ((atomic)) m_locs; +}; + +struct location_hash : int_hash <location_t, UNKNOWN_LOCATION> { }; + +class GTY(()) string_concat_db +{ + public: + string_concat_db (); + void record_string_concatenation (int num, location_t *locs); + + bool get_string_concatenation (location_t loc, + int *out_num, + location_t **out_locs); + + private: + static location_t get_key_loc (location_t loc); + + /* For the fields to be private, we must grant access to the + generated code in gtype-desc.c. */ + + friend void ::gt_ggc_mx_string_concat_db (void *x_p); + friend void ::gt_pch_nx_string_concat_db (void *x_p); + friend void ::gt_pch_p_16string_concat_db (void *this_obj, void *x_p, + gt_pointer_operator op, + void *cookie); + + hash_map <location_hash, string_concat *> *m_table; +}; #endif