diff options
author | Steven G. Kargl <kargl@gcc.gnu.org> | 2015-08-10 17:42:00 +0000 |
---|---|---|
committer | Steven G. Kargl <kargl@gcc.gnu.org> | 2015-08-10 17:42:00 +0000 |
commit | 0238e1e98acdae2b16fcda3d54c3e95a21c0750f (patch) | |
tree | 5fc8d05c82cb44477b30d242c1ac4d7d7569ca3d /gcc | |
parent | b97e78b712b21e558a112b7bc683bf05ca7cdcc9 (diff) | |
download | gcc-0238e1e98acdae2b16fcda3d54c3e95a21c0750f.zip gcc-0238e1e98acdae2b16fcda3d54c3e95a21c0750f.tar.gz gcc-0238e1e98acdae2b16fcda3d54c3e95a21c0750f.tar.bz2 |
[multiple changes]
2015-08-10 Steven G. Kargl <kargl@gcc.gnu.org>
PR libfortran/67140
* gfortran.map: Add _gfortran_mvbits_i16.
* intrinsics/mvbits.c: Generate mvbits for c_int128_t.
2015-08-10 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
PR libfortran/67140
* gfortran.dg/pr67140.f90: New test.
From-SVN: r226764
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
-rw-r--r-- | gcc/testsuite/gfortran.dg/pr67140.f90 | 12 |
2 files changed, 17 insertions, 0 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index bf858e2..146a730 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2015-08-10 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> + + PR libfortran/67140 + * gfortran.dg/pr67140.f90: New test. + 2015-08-10 Thomas Schwinge <thomas@codesourcery.com> PR libgomp/65742 diff --git a/gcc/testsuite/gfortran.dg/pr67140.f90 b/gcc/testsuite/gfortran.dg/pr67140.f90 new file mode 100644 index 0000000..0a6782c --- /dev/null +++ b/gcc/testsuite/gfortran.dg/pr67140.f90 @@ -0,0 +1,12 @@ +! { dg-do run } +! +! Check that MVBITS is available for the largest integer kind (PR 67140) +! +program test + use iso_fortran_env + integer, parameter :: k = integer_kinds(size(integer_kinds)) + + integer(kind=k) :: i = 6 + call mvbits(7_k,2,2,i,0) + if (i /= 5) call abort +end |