mirrors/gcc
0
0
Fork 0
mirror of https://gcc.gnu.org/git/gcc.git synced 2024-11-27 13:54:19 +08:00
Code Issues Actions Packages Projects Releases Wiki Activity

re PR fortran/30430 (Memory corruption in the module search path code)

Browse Source 
PR fortran/30430
	* scanner.c (gfc_release_include_path): Free gfc_option.module_dir
	only once!

From-SVN: r120667
This commit is contained in:
Francois-Xavier Coudert 2007-01-11 08:55:10 +01:00 committed by François-Xavier Coudert
parent 50ef2c18a9
commit 1bc2338361
2 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/fortran/ChangeLog
View File

@ -1,3 +1,9 @@
2007-01-11 Francois-Xavier Coudert <coudert@clipper.ens.fr>
PR fortran/30430
* scanner.c (gfc_release_include_path): Free gfc_option.module_dir
only once!
2007-01-09 Brooks Moses <brooks.moses@codesourcery.com>
* simplify.c (gfc_simplify_ibclr): Fix POS comparison.

4
gcc/fortran/scanner.c
View File

@ -172,7 +172,6 @@ gfc_release_include_path (void)
{
gfc_directorylist *p;
gfc_free (gfc_option.module_dir);
while (include_dirs != NULL)
{
p = include_dirs;
@ -181,7 +180,6 @@ gfc_release_include_path (void)
gfc_free (p);
}
gfc_free (gfc_option.module_dir);
while (intrinsic_modules_dirs != NULL)
{
p = intrinsic_modules_dirs;
@ -189,6 +187,8 @@ gfc_release_include_path (void)
gfc_free (p->path);
gfc_free (p);
}
gfc_free (gfc_option.module_dir);
}