projects / platform / upstream / linaro-gcc.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 77a6cc7) | patch
PR fortran/30611
authorfxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4>
Sun, 4 Feb 2007 21:33:10 +0000 (21:33 +0000)
committerfxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4>
Sun, 4 Feb 2007 21:33:10 +0000 (21:33 +0000)
commitbfe7d4b13a2ddf4f562c4e0a3d1ff1a2b7118910
treefd54893bee97669ebd4effe1e61628b8994d390ctree | snapshot
parent77a6cc7ecc17f3162d10c1937a6f7bc4f15a55ffcommit | diff
PR fortran/30611

* trans-intrinsic.c (gfc_conv_intrinsic_repeat): Evaluate
arguments only once. Generate check that NCOPIES argument is not
negative.

* intrinsics/string_intrinsics.c (string_repeat): Don't check
if ncopies is negative.

* gcc/testsuite/gfortran.dg/repeat_1.f90: New test.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@121581 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog diff | blob | history
gcc/fortran/trans-intrinsic.c diff | blob | history
gcc/testsuite/ChangeLog diff | blob | history
gcc/testsuite/gfortran.dg/repeat_1.f90 [new file with mode: 0644] blob
libgfortran/ChangeLog diff | blob | history
libgfortran/intrinsics/string_intrinsics.c diff | blob | history
Domain: System / Toolchain;