OSDN Git Service

2010-06-07 Tobias Burnus <burnus@net-b.de>
authorburnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 7 Jun 2010 19:21:19 +0000 (19:21 +0000)
committerburnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 7 Jun 2010 19:21:19 +0000 (19:21 +0000)
        * options.c (gfc_handle_option): Fix -fno-recursive.

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

gcc/fortran/ChangeLog
gcc/fortran/options.c

index d636ac1..78ee5a9 100644 (file)
@@ -1,5 +1,9 @@
 2010-06-07  Tobias Burnus  <burnus@net-b.de>
 
+       * options.c (gfc_handle_option): Fix -fno-recursive.
+
+2010-06-07  Tobias Burnus  <burnus@net-b.de>
+
        * gfc-internals.texi (copyrights-gfortran): Fix copyright year format.
        * gfortran.texi (copyrights-gfortran): Ditto.
 
index 2e4f5c1..d50c080 100644 (file)
@@ -938,7 +938,7 @@ gfc_handle_option (size_t scode, const char *arg, int value,
       break;
 
     case OPT_frecursive:
-      gfc_option.flag_recursive = 1;
+      gfc_option.flag_recursive = value;
       break;
 
     case OPT_falign_commons: