diff options
author | Jakub Jelinek <jakub@redhat.com> | 2001-07-19 21:44:12 +0200 |
---|---|---|
committer | Jakub Jelinek <jakub@gcc.gnu.org> | 2001-07-19 21:44:12 +0200 |
commit | 8d3216f82da82f921fd4f684661b5597fde436c6 (patch) | |
tree | 6034a8d3b208f7b3ac6eb192c25dc19b08aff1a1 /gcc/f/top.c | |
parent | d54ef62c4726edbe17d327535db1fd679f014200 (diff) | |
download | gcc-8d3216f82da82f921fd4f684661b5597fde436c6.zip gcc-8d3216f82da82f921fd4f684661b5597fde436c6.tar.gz gcc-8d3216f82da82f921fd4f684661b5597fde436c6.tar.bz2 |
top.c (ffe_decode_option): Disallow lang-independent processing for -ffixed-form.
* top.c (ffe_decode_option): Disallow lang-independent processing
for -ffixed-form.
From-SVN: r44159
Diffstat (limited to 'gcc/f/top.c')
-rw-r--r-- | gcc/f/top.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/gcc/f/top.c b/gcc/f/top.c index 9675989..f446768 100644 --- a/gcc/f/top.c +++ b/gcc/f/top.c @@ -225,7 +225,10 @@ ffe_decode_option (argc, argv) else if (strcmp (&opt[2], "no-free-form") == 0) ffe_set_is_free_form (FALSE); else if (strcmp (&opt[2], "fixed-form") == 0) - ffe_set_is_free_form (FALSE); + { + ffe_set_is_free_form (FALSE); + return -1; + } else if (strcmp (&opt[2], "no-fixed-form") == 0) ffe_set_is_free_form (TRUE); else if (strcmp (&opt[2], "pedantic") == 0) |