OSDN Git Service

* lang.opt: Remove -fno-backend option.
authorbrooks <brooks@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 15 Nov 2006 03:49:21 +0000 (03:49 +0000)
committerbrooks <brooks@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 15 Nov 2006 03:49:21 +0000 (03:49 +0000)
* 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.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@118841 138bc75d-0d04-0410-961f-82ee72b054a4

gcc/fortran/ChangeLog
gcc/fortran/gfortran.h
gcc/fortran/lang.opt
gcc/fortran/options.c
gcc/fortran/parse.c

index 88bc865..9e1433c 100644 (file)
@@ -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
index f78f923..a369d32 100644 (file)
@@ -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;
index 3409841..fc2127c 100644 (file)
@@ -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
index 5d708e2..3d870b8 100644 (file)
@@ -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;
index aedf292..5aabbb4 100644 (file)
@@ -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);
     }