diff options
| author | Craig Burley <craig@jcb-sc.com> | 1999-03-05 23:40:12 +0000 |
|---|---|---|
| committer | Craig Burley <burley@gcc.gnu.org> | 1999-03-05 18:40:12 -0500 |
| commit | 411d4e28f8dc0deb8d175e6e9ddf93e528b2e532 (patch) | |
| tree | 7fc5b956543a0ff46d7d10cd0432a5c539ced393 /gcc/f/intdoc.c | |
| parent | 40ae436b588ba796cdcdd682a2435fd4223687ba (diff) | |
| download | gcc-411d4e28f8dc0deb8d175e6e9ddf93e528b2e532.zip gcc-411d4e28f8dc0deb8d175e6e9ddf93e528b2e532.tar.gz gcc-411d4e28f8dc0deb8d175e6e9ddf93e528b2e532.tar.bz2 | |
Warn about invoking non-Y2K-compliant intrinsics
From-SVN: r25609
Diffstat (limited to 'gcc/f/intdoc.c')
| -rw-r--r-- | gcc/f/intdoc.c | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/gcc/f/intdoc.c b/gcc/f/intdoc.c index e4f45ca..917fc2e 100644 --- a/gcc/f/intdoc.c +++ b/gcc/f/intdoc.c @@ -124,11 +124,13 @@ static struct _ffeintrin_name_ names[] = { #define DEFGEN(CODE,NAME,SPEC1,SPEC2) #define DEFSPEC(CODE,NAME,CALLABLE,FAMILY,IMP) #define DEFIMP(CODE,NAME,GFRTDIRECT,GFRTF2C,GFRTGNU,CONTROL) +#define DEFIMPY(CODE,NAME,GFRTDIRECT,GFRTF2C,GFRTGNU,CONTROL,Y2KBAD) #include "intrin.def" #undef DEFNAME #undef DEFGEN #undef DEFSPEC #undef DEFIMP +#undef DEFIMPY }; static struct _ffeintrin_gen_ gens[] = { @@ -137,11 +139,13 @@ static struct _ffeintrin_gen_ gens[] = { { NAME, { SPEC1, SPEC2, }, }, #define DEFSPEC(CODE,NAME,CALLABLE,FAMILY,IMP) #define DEFIMP(CODE,NAME,GFRTDIRECT,GFRTF2C,GFRTGNU,CONTROL) +#define DEFIMPY(CODE,NAME,GFRTDIRECT,GFRTF2C,GFRTGNU,CONTROL,Y2KBAD) #include "intrin.def" #undef DEFNAME #undef DEFGEN #undef DEFSPEC #undef DEFIMP +#undef DEFIMPY }; static struct _ffeintrin_imp_ imps[] = { @@ -151,9 +155,13 @@ static struct _ffeintrin_imp_ imps[] = { #if 0 /* FFECOM_targetCURRENT == FFECOM_targetGCC */ #define DEFIMP(CODE,NAME,GFRTDIRECT,GFRTF2C,GFRTGNU,CONTROL) \ { NAME, FFECOM_gfrt ## GFRT, CONTROL }, +#define DEFIMPY(CODE,NAME,GFRTDIRECT,GFRTF2C,GFRTGNU,CONTROL,Y2KBAD) \ + { NAME, FFECOM_gfrt ## GFRT, CONTROL }, #elif 1 /* FFECOM_targetCURRENT == FFECOM_targetFFE */ #define DEFIMP(CODE,NAME,GFRTDIRECT,GFRTF2C,GFRTGNU,CONTROL) \ { NAME, CONTROL }, +#define DEFIMPY(CODE,NAME,GFRTDIRECT,GFRTF2C,GFRTGNU,CONTROL,Y2KBAD) \ + { NAME, CONTROL }, #else #error #endif @@ -162,6 +170,7 @@ static struct _ffeintrin_imp_ imps[] = { #undef DEFGEN #undef DEFSPEC #undef DEFIMP +#undef DEFIMPY }; static struct _ffeintrin_spec_ specs[] = { @@ -170,10 +179,12 @@ static struct _ffeintrin_spec_ specs[] = { #define DEFSPEC(CODE,NAME,CALLABLE,FAMILY,IMP) \ { NAME, CALLABLE, FAMILY, IMP, }, #define DEFIMP(CODE,NAME,GFRTDIRECT,GFRTF2C,GFRTGNU,CONTROL) +#define DEFIMPY(CODE,NAME,GFRTDIRECT,GFRTF2C,GFRTGNU,CONTROL,Y2KBAD) #include "intrin.def" #undef DEFGEN #undef DEFSPEC #undef DEFIMP +#undef DEFIMPY }; struct cc_pair { ffeintrinImp imp; char *text; }; |