diff options
| author | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-02-20 08:31:25 +0000 |
|---|---|---|
| committer | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-02-20 08:31:25 +0000 |
| commit | 3a60b071609ae5cda7e85eccf206659d3e75c00d (patch) | |
| tree | 394c4ce0617433ffcc3399c7facb3e046d446672 /gcc/fortran/options.c | |
| parent | 2448493c643282a99f4645eba39ec54562650cca (diff) | |
2010-02-20 Tobias Burnus <burnus@net-b.de>
PR fortran/42958
* libgfortran.h: Add GFC_RTCHECK_MEM.
* invoke.texi (-fcheck=): Document -fcheck=mem.
* tranc.c (gfc_call_malloc): Remove negative-size run-time error
and enable malloc-success check only with -fcheck=mem.
* option.c (gfc_handle_runtime_check_option): Add -fcheck=mem.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@156923 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/options.c')
| -rw-r--r-- | gcc/fortran/options.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/gcc/fortran/options.c b/gcc/fortran/options.c index 9296a0be6676..a9ce56015ae1 100644 --- a/gcc/fortran/options.c +++ b/gcc/fortran/options.c @@ -482,11 +482,12 @@ gfc_handle_runtime_check_option (const char *arg) { int result, pos = 0, n; static const char * const optname[] = { "all", "bounds", "array-temps", - "recursion", "do", "pointer", NULL }; + "recursion", "do", "pointer", + "mem", NULL }; static const int optmask[] = { GFC_RTCHECK_ALL, GFC_RTCHECK_BOUNDS, GFC_RTCHECK_ARRAY_TEMPS, GFC_RTCHECK_RECURSION, GFC_RTCHECK_DO, - GFC_RTCHECK_POINTER, + GFC_RTCHECK_POINTER, GFC_RTCHECK_MEM, 0 }; while (*arg) |