2010-10-06 Mikael Morin <mikael@gcc.gnu.org>
authormikael <mikael@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 6 Oct 2010 14:23:30 +0000 (14:23 +0000)
committermikael <mikael@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 6 Oct 2010 14:23:30 +0000 (14:23 +0000)
* module.c (gfc_use_module): Free atom_string when done with it.

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

gcc/fortran/ChangeLog
gcc/fortran/module.c

index b4252ec..2e4e178 100644 (file)
@@ -1,3 +1,7 @@
+2010-10-06  Mikael Morin  <mikael@gcc.gnu.org>
+
+       * module.c (gfc_use_module): Free atom_string when done with it.
+
 2010-10-06  Mikael Morin  <mikael@gcc.gnu.org>
 
        * module.c (read_module): Remove useless string duplication.
index 02f5756..71699ad 100644 (file)
@@ -5687,6 +5687,8 @@ gfc_use_module (void)
                               "for file '%s' opened at %C", atom_string,
                               MOD_VERSION, filename);
            }
+
+         gfc_free (atom_string);
        }
 
       if (c == '\n')