diff options
| author | Tobias Burnus <burnus@net-b.de> | 2009-06-29 23:02:17 +0200 |
|---|---|---|
| committer | Tobias Burnus <burnus@gcc.gnu.org> | 2009-06-29 23:02:17 +0200 |
| commit | 20460eb94863954cf7ebdc7bf2193038ac0b781a (patch) | |
| tree | f4b9667f6f491ec9edcb2471c4bf08b3e532f635 /gcc/fortran/options.c | |
| parent | a61a36ab30b7711b5d5cf002d52e6e9514499739 (diff) | |
| download | gcc-20460eb94863954cf7ebdc7bf2193038ac0b781a.zip gcc-20460eb94863954cf7ebdc7bf2193038ac0b781a.tar.gz gcc-20460eb94863954cf7ebdc7bf2193038ac0b781a.tar.bz2 | |
re PR fortran/40580 (Add -fcheck=pointer with runtime check for using an unallocated argument)
2009-06-29 Tobias Burnus <burnus@net-b.de>
PR fortran/40580
* trans-expr.c (gfc_conv_procedure_call): Add -fcheck=pointer
* check.
* libgfortran.h: Add GFC_RTCHECK_POINTER.
* invoke.texi (-fcheck): Document new pointer option.
* options.c (gfc_handle_runtime_check_option): Handle pointer
* option.
* gfortran.texi (C Binding): Improve wording.
* iso-c-binding.def: Remove obsolete comment.
2009-06-29 Tobias Burnus <burnus@net-b.de>
PR fortran/40580
* pointer_check_1.f90: New test.
* pointer_check_2.f90: New test.
* pointer_check_3.f90: New test.
* pointer_check_4.f90: New test.
* pointer_check_5.f90: New test.
From-SVN: r149063
Diffstat (limited to 'gcc/fortran/options.c')
| -rw-r--r-- | gcc/fortran/options.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/fortran/options.c b/gcc/fortran/options.c index 3654e92..ff0a809 100644 --- a/gcc/fortran/options.c +++ b/gcc/fortran/options.c @@ -471,10 +471,11 @@ gfc_handle_runtime_check_option (const char *arg) { int result, pos = 0, n; static const char * const optname[] = { "all", "bounds", "array-temps", - "recursion", "do", NULL }; + "recursion", "do", "pointer", NULL }; static const int optmask[] = { GFC_RTCHECK_ALL, GFC_RTCHECK_BOUNDS, GFC_RTCHECK_ARRAY_TEMPS, GFC_RTCHECK_RECURSION, GFC_RTCHECK_DO, + GFC_RTCHECK_POINTER, 0 }; while (*arg) |