diff options
author | Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2015-08-31 10:54:36 +0000 |
---|---|---|
committer | François-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2015-08-31 10:54:36 +0000 |
commit | cd55d18e5da549f75cc2ae0bbfb69aa232753c19 (patch) | |
tree | d04fceb6086a4283f6c960bd6b0a4aa424dd31d5 /gcc/fortran/trans.h | |
parent | e78549932d92690dd277938fac358c039a5d210d (diff) | |
download | gcc-cd55d18e5da549f75cc2ae0bbfb69aa232753c19.zip gcc-cd55d18e5da549f75cc2ae0bbfb69aa232753c19.tar.gz gcc-cd55d18e5da549f75cc2ae0bbfb69aa232753c19.tar.bz2 |
re PR fortran/54833 (Don't wrap __builtin_free(a) in if (a != NULL))
PR fortran/54833
* trans.c (gfc_call_free): Don't check if pointer is NULL.
* trans.h (gfc_call_free): Adjust comment.
From-SVN: r227336
Diffstat (limited to 'gcc/fortran/trans.h')
-rw-r--r-- | gcc/fortran/trans.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/trans.h b/gcc/fortran/trans.h index 541640d..2501403 100644 --- a/gcc/fortran/trans.h +++ b/gcc/fortran/trans.h @@ -642,7 +642,7 @@ void gfc_trans_runtime_check (bool, bool, tree, stmtblock_t *, locus *, void gfc_trans_same_strlen_check (const char*, locus*, tree, tree, stmtblock_t*); -/* Generate a call to free() after checking that its arg is non-NULL. */ +/* Generate a call to free(). */ tree gfc_call_free (tree); /* Allocate memory after performing a few checks. */ |