diff options
author | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-08-28 14:49:55 +0000 |
---|---|---|
committer | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-08-28 14:49:55 +0000 |
commit | a9b0176aa4f2c3a53f73c6530951bfcc12d683a0 (patch) | |
tree | 4de72541237446e1fb3f8e79f3eaf90ab1c523e5 /gcc/fortran/error.c | |
parent | 021ff494c8f8e5665f019bf2bbb28ad4a3babdde (diff) |
2012-08-28 Tobias Burnus <burnus@net-b.de>
PR fortran/54382
* error.c (show_locus): Avoid out of bound access.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@190752 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/error.c')
-rw-r--r-- | gcc/fortran/error.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/fortran/error.c b/gcc/fortran/error.c index dde6a0fb5274..64b9357a2155 100644 --- a/gcc/fortran/error.c +++ b/gcc/fortran/error.c @@ -384,6 +384,7 @@ show_locus (locus *loc, int c1, int c2) c1 -= offset; c2 -= offset; + cmax -= offset; p = &(lb->line[offset]); for (i = 0; i <= cmax; i++) |