diff options
author | Jakub Jelinek <jakub@redhat.com> | 2006-01-27 21:01:55 +0100 |
---|---|---|
committer | Jakub Jelinek <jakub@gcc.gnu.org> | 2006-01-27 21:01:55 +0100 |
commit | 2d7c7df665fd79a85731ca2a5d9d31775d2bc81e (patch) | |
tree | b37f5669c2cae6d982523e270287247aebe416d2 /gcc/df-problems.c | |
parent | 602ea4d30716a6c72c6ee7fc8207a87e58a40d80 (diff) | |
download | gcc-2d7c7df665fd79a85731ca2a5d9d31775d2bc81e.zip gcc-2d7c7df665fd79a85731ca2a5d9d31775d2bc81e.tar.gz gcc-2d7c7df665fd79a85731ca2a5d9d31775d2bc81e.tar.bz2 |
re PR fortran/25324 (Wrong DW_TAG_compile_unit generated when compiling preprocessed fortran code)
PR fortran/25324
* Make-lang.in (fortran/scanner.o): Depend on toplev.h.
* lang.opt (fpreprocessed): New option.
* scanner.c: Include toplev.h.
(gfc_src_file, gfc_src_preprocessor_lines): New variables.
(preprocessor_line): Unescape filename if there were any
backslashes.
(load_file): If initial and gfc_src_file is not NULL,
use it rather than opening the file. If gfc_src_preprocessor_lines
has non-NULL elements, pass it to preprocessor_line.
(unescape_filename, gfc_read_orig_filename): New functions.
* gfortran.h (gfc_option_t): Add flag_preprocessed.
(gfc_read_orig_filename): New prototype.
* options.c (gfc_init_options): Clear flag_preprocessed.
(gfc_post_options): If flag_preprocessed, call
gfc_read_orig_filename.
(gfc_handle_option): Handle OPT_fpreprocessed.
* lang-specs.h: Pass -fpreprocessed to f951 if preprocessing
sources.
From-SVN: r110304
Diffstat (limited to 'gcc/df-problems.c')
0 files changed, 0 insertions, 0 deletions