https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67140
--- Comment #8 from Steve Kargl <sgk at troutmask dot apl.washington.edu> --- On Mon, Aug 10, 2015 at 09:24:53PM +0000, hjl.tools at gmail dot com wrote: > https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67140 > > --- Comment #7 from H.J. Lu <hjl.tools at gmail dot com> --- > (In reply to kargl from comment #6) > > Fixed on trunk. > > > > The GFORTRAN_1.6 section of the symbol map where I've inserted > > the _gfortan_mvbits_i16 symbol does not exist in 5-branch. If > > the other functions in this section are backported, then this > > function can also be backported. > > On Linux/x86, I got > > ../../../src-trunk/libgfortran/intrinsics/mvbits.c:87:16: error: unknown type > name ???GFC_INTEGER_16??? > # define TYPE GFC_INTEGER_16 > ^ > ../../../src-trunk/libgfortran/intrinsics/mvbits.c:36:29: note: in expansion > of > macro ???TYPE??? > extern void SUB_NAME (const TYPE *, const int *, const int *, TYPE *, > Sorry about that. Can you tst this diff? Index: intrinsics/mvbits.c =================================================================== --- intrinsics/mvbits.c (revision 226764) +++ intrinsics/mvbits.c (working copy) @@ -84,6 +84,7 @@ SUB_NAME (const TYPE *from, const int *f # undef TYPE # undef UTYPE +#if defined (HAVE_GFC_INTEGER_16) # define TYPE GFC_INTEGER_16 # define UTYPE GFC_UINTEGER_16 # define SUB_NAME mvbits_i16 @@ -92,3 +93,4 @@ SUB_NAME (const TYPE *from, const int *f # undef TYPE # undef UTYPE #endif +#endif
