summaryrefslogtreecommitdiffstats
path: root/gcc/fortran/trans-decl.c
diff options
context:
space:
mode:
authorburnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4>2009-03-28 12:52:08 +0000
committerburnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4>2009-03-28 12:52:08 +0000
commitad8ed98e019f898714271302b8707255c39a2c23 (patch)
treea09667a5c8ec70fa85fff4377dcf431f1430afdc /gcc/fortran/trans-decl.c
parent09fc9532d0a5692bd958e8d8bdb71d0ce7c6071d (diff)
downloadppe42-gcc-ad8ed98e019f898714271302b8707255c39a2c23.tar.gz
ppe42-gcc-ad8ed98e019f898714271302b8707255c39a2c23.zip
2009-03-28 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
Paul Thomas <pault@gcc.gnu.org> Tobias Burnus <burnus@net-b.de> * gfortran.h (gfc_option_t): Add rtcheck. * lang.opt: New option -fruntime-check. * libgfortran.h: Add GFC_RTCHECK_* constants. * invoke.texi: Document -fruntime-check. * options.c (gfc_handle_runtime_check_option): New function. (gfc_init_options,gfc_post_options,gfc_handle_option): Add -fruntime-check option. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@145183 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/trans-decl.c')
-rw-r--r--gcc/fortran/trans-decl.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/fortran/trans-decl.c b/gcc/fortran/trans-decl.c
index 38381f0631b..d3895d8cef0 100644
--- a/gcc/fortran/trans-decl.c
+++ b/gcc/fortran/trans-decl.c
@@ -3777,7 +3777,8 @@ gfc_generate_function_code (gfc_namespace * ns)
array = tree_cons (NULL_TREE,
build_int_cst (integer_type_node,
- flag_bounds_check), array);
+ (gfc_option.rtcheck
+ & GFC_RTCHECK_BOUNDS)), array);
array = tree_cons (NULL_TREE,
build_int_cst (integer_type_node,
OpenPOWER on IntegriCloud