From: Brooks Moses <brooks.moses@codesourcery.com>
Date: Wed, 15 Nov 2006 03:49:21 +0000 (+0000)
Subject: lang.opt: Remove -fno-backend option.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=4887aa7174404d3fa35104ffba53ad4dc613b474;p=gcc.git

lang.opt: Remove -fno-backend option.

* lang.opt: Remove -fno-backend option.
* gfortran.h (gfc_option_t): Remove flag_no_backend.
* options.c (gfc_init_options): Remove flag_no_backend.
(gfc_handle_option): Remove -fno-backend option handler.
* parse.c (gfc_parse_file): Remove references to
gfc_option.flag_no_backend.

From-SVN: r118841
---

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 88bc865b7b7..9e1433cd9aa 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,12 @@
+2006-11-14  Brooks Moses  <brooks.moses@codesourcery.com>
+ 
+ 	* lang.opt: Remove -fno-backend option.
+ 	* gfortran.h (gfc_option_t): Remove flag_no_backend.
+ 	* options.c (gfc_init_options): Remove flag_no_backend.
+ 	(gfc_handle_option): Remove -fno-backend option handler.
+ 	* parse.c (gfc_parse_file): Remove references to
+ 	gfc_option.flag_no_backend.
+
 2006-11-14  Tobias Burnus  <burnus@net-b.de>
 
 	* match.c (gfc_match_namelist): Add missing space to
diff --git a/gcc/fortran/gfortran.h b/gcc/fortran/gfortran.h
index f78f923d681..a369d328505 100644
--- a/gcc/fortran/gfortran.h
+++ b/gcc/fortran/gfortran.h
@@ -1640,7 +1640,6 @@ typedef struct
   int flag_second_underscore;
   int flag_implicit_none;
   int flag_max_stack_var_size;
-  int flag_no_backend;
   int flag_range_check;
   int flag_pack_derived;
   int flag_repack_arrays;
diff --git a/gcc/fortran/lang.opt b/gcc/fortran/lang.opt
index 3409841c907..fc2127c5fa7 100644
--- a/gcc/fortran/lang.opt
+++ b/gcc/fortran/lang.opt
@@ -181,10 +181,6 @@ fmax-stack-var-size=
 Fortran RejectNegative Joined UInteger
 -fmax-stack-var-size=<n>	Size in bytes of the largest array that will be put on the stack
 
-fno-backend
-Fortran RejectNegative
-Don't generate code, just do syntax and semantics checking
-
 frange-check
 Fortran
 Enable range checking during compilation
diff --git a/gcc/fortran/options.c b/gcc/fortran/options.c
index 5d708e23d51..3d870b85877 100644
--- a/gcc/fortran/options.c
+++ b/gcc/fortran/options.c
@@ -73,7 +73,6 @@ gfc_init_options (unsigned int argc ATTRIBUTE_UNUSED,
   gfc_option.flag_second_underscore = -1;
   gfc_option.flag_implicit_none = 0;
   gfc_option.flag_max_stack_var_size = 32768;
-  gfc_option.flag_no_backend = 0;
   gfc_option.flag_range_check = 1;
   gfc_option.flag_pack_derived = 0;
   gfc_option.flag_repack_arrays = 0;
@@ -520,10 +519,6 @@ gfc_handle_option (size_t scode, const char *arg, int value)
       gfc_option.flag_max_stack_var_size = value;
       break;
 
-    case OPT_fno_backend:
-      gfc_option.flag_no_backend = value;
-      break;
-
     case OPT_frange_check:
       gfc_option.flag_range_check = value;
       break;
diff --git a/gcc/fortran/parse.c b/gcc/fortran/parse.c
index aedf292acd6..5aabbb48c87 100644
--- a/gcc/fortran/parse.c
+++ b/gcc/fortran/parse.c
@@ -3223,12 +3223,12 @@ loop:
   if (s.state == COMP_MODULE)
     {
       gfc_dump_module (s.sym->name, errors_before == errors);
-      if (errors == 0 && ! gfc_option.flag_no_backend)
+      if (errors == 0)
 	gfc_generate_module_code (gfc_current_ns);
     }
   else
     {
-      if (errors == 0 && ! gfc_option.flag_no_backend)
+      if (errors == 0)
 	gfc_generate_code (gfc_current_ns);
     }