diff options
| author | Tobias Burnus <burnus@net-b.de> | 2014-03-08 19:53:18 +0100 |
|---|---|---|
| committer | Tobias Burnus <burnus@gcc.gnu.org> | 2014-03-08 19:53:18 +0100 |
| commit | 566916e637118be03f39eaee85ceacf958839c46 (patch) | |
| tree | 12a35497a58dd1f4ddede034404be2f9bcfb8e00 /gcc/fortran/options.c | |
| parent | 80d6e13ece9985fe03e6ebdfd0742a10a71ca6ea (diff) | |
| download | gcc-566916e637118be03f39eaee85ceacf958839c46.zip gcc-566916e637118be03f39eaee85ceacf958839c46.tar.gz gcc-566916e637118be03f39eaee85ceacf958839c46.tar.bz2 | |
re PR fortran/60447 (Empty .s file created when using -E flag)
2014-03-08 Tobias Burnus <burnus@net-b.de>
PR fortran/60447
* f95-lang.c (gfc_init): Return false when only
preprocessing.
* options.c (gfc_post_options): Ditto.
From-SVN: r208431
Diffstat (limited to 'gcc/fortran/options.c')
| -rw-r--r-- | gcc/fortran/options.c | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/gcc/fortran/options.c b/gcc/fortran/options.c index 895a7dc..a2b91ca 100644 --- a/gcc/fortran/options.c +++ b/gcc/fortran/options.c @@ -437,14 +437,7 @@ gfc_post_options (const char **pfilename) gfc_cpp_post_options (); -/* FIXME: return gfc_cpp_preprocess_only (); - - The return value of this function indicates whether the - backend needs to be initialized. On -E, we don't need - the backend. However, if we return 'true' here, an - ICE occurs. Initializing the backend doesn't hurt much, - hence, for now we can live with it as is. */ - return false; + return gfc_cpp_preprocess_only (); } |