diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index b4252ec7f79..2e4e1780c14 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -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.
diff --git a/gcc/fortran/module.c b/gcc/fortran/module.c
index 02f57566d6c..71699ade593 100644
--- a/gcc/fortran/module.c
+++ b/gcc/fortran/module.c
@@ -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')