module.c (gfc_use_module): Free atom_string when done with it.

2010-10-06  Mikael Morin  <mikael@gcc.gnu.org>

	* module.c (gfc_use_module): Free atom_string when done with it.

From-SVN: r165029
This commit is contained in:
Mikael Morin 2010-10-06 14:23:30 +00:00
parent 3e212b5d2b
commit 5919751c15
2 changed files with 6 additions and 0 deletions

View 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.

View 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')