aboutsummaryrefslogtreecommitdiff
path: root/libgfortran/intrinsics/mvbits.c
diff options
context:
space:
mode:
authorSteven G. Kargl <kargl@gcc.gnu.org>2015-08-10 17:42:00 +0000
committerSteven G. Kargl <kargl@gcc.gnu.org>2015-08-10 17:42:00 +0000
commit0238e1e98acdae2b16fcda3d54c3e95a21c0750f (patch)
tree5fc8d05c82cb44477b30d242c1ac4d7d7569ca3d /libgfortran/intrinsics/mvbits.c
parentb97e78b712b21e558a112b7bc683bf05ca7cdcc9 (diff)
downloadgcc-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 'libgfortran/intrinsics/mvbits.c')
-rw-r--r--libgfortran/intrinsics/mvbits.c8
1 files changed, 8 insertions, 0 deletions
diff --git a/libgfortran/intrinsics/mvbits.c b/libgfortran/intrinsics/mvbits.c
index 19b8fc9..cb9dd6c 100644
--- a/libgfortran/intrinsics/mvbits.c
+++ b/libgfortran/intrinsics/mvbits.c
@@ -83,4 +83,12 @@ SUB_NAME (const TYPE *from, const int *frompos, const int *len, TYPE *to,
# undef SUB_NAME
# undef TYPE
# undef UTYPE
+
+# define TYPE GFC_INTEGER_16
+# define UTYPE GFC_UINTEGER_16
+# define SUB_NAME mvbits_i16
+# include "mvbits.c"
+# undef SUB_NAME
+# undef TYPE
+# undef UTYPE
#endif