diff options
author | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-09-06 05:55:10 +0000 |
---|---|---|
committer | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-09-06 05:55:10 +0000 |
commit | 9028d57d0909ff8705828c5d0036a298f1249d9b (patch) | |
tree | b60ae679f939f761998c881713e1adbe57c96041 /libgfortran/gfortran.map | |
parent | 948e1ebc502a0517e6becc3dde642251d55456f4 (diff) | |
download | gcc-9028d57d0909ff8705828c5d0036a298f1249d9b.tar.gz |
2010-09-06 Tobias Burnus <burnus@net-b.de>
PR fortran/38282
* intrinsic.c (add_functions): Support IALL, IANY, IPARITY.
(check_specific): Special case for those intrinsics.
* gfortran.h (gfc_isym_id): Add new intrinsics
* intrinsic.h (gfc_check_transf_bit_intrins,
gfc_simplify_iall, gfc_simplify_iany, gfc_simplify_iparity,
gfc_resolve_iall, gfc_resolve_iany, gfc_resolve_iparity):
New prototypes.
* iresolve.c (gfc_resolve_iall, gfc_resolve_iany,
gfc_resolve_iparity, resolve_transformational): New functions.
(gfc_resolve_product, gfc_resolve_sum,
gfc_resolve_parity): Use resolve_transformational.
* check.c (gfc_check_transf_bit_intrins): New function.
* simplify.c (gfc_simplify_iall, gfc_simplify_iany,
gfc_simplify_iparity, do_bit_any, do_bit_ior,
do_bit_xor, simplify_transformation): New functions.
(gfc_simplify_all, gfc_simplify_any, gfc_simplify_parity,
gfc_simplify_sum, gfc_simplify_product): Use simplify_transformation.
* trans-intrinsic.c (gfc_conv_intrinsic_arith,
gfc_conv_intrinsic_function, gfc_is_intrinsic_libcall):
Handle IALL, IANY and IPARITY intrinsics.
* intrinsic.texi (IMAGE_INDEX): Move up to fix alphabetic
order.
(IALL, IANY, IPARITY): Document new intrinsics.
2010-09-06 Tobias Burnus <burnus@net-b.de>
PR fortran/38282
* gfortran.dg/iall_iany_iparity_1.f90: New.
* gfortran.dg/iall_iany_iparity_2.f90: New.
2010-09-06 Tobias Burnus <burnus@net-b.de>
PR fortran/38282
* gfortran.map: Add new iany, iall and iparity intrinsics.
* Makefile.am: Ditto.
* m4/iany.m4: New.
* m4/iall.m4: New.
* m4/iparity.m4: New.
* Makefile.in: Regenerate.
* generated/iall_i1.c: Generate.
* generated/iall_i2.c: Generate.
* generated/iall_i4.c: Generate.
* generated/iall_i8.c: Generate.
* generated/iall_i16.c: Generate.
* generated/iany_i1.c: Generate.
* generated/iany_i2.c: Generate.
* generated/iany_i4.c: Generate.
* generated/iany_i8.c: Generate.
* generated/iany_i16.c: Generate.
* generated/iparity_i1.c: Generate.
* generated/iparity_i2.c: Generate.
* generated/iparity_i4.c: Generate.
* generated/iparity_i8.c: Generate.
* generated/iparity_i16.c: Generate.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@163898 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran/gfortran.map')
-rw-r--r-- | libgfortran/gfortran.map | 19 |
1 files changed, 17 insertions, 2 deletions
diff --git a/libgfortran/gfortran.map b/libgfortran/gfortran.map index 72dafa6d14b..ea6ebfa12eb 100644 --- a/libgfortran/gfortran.map +++ b/libgfortran/gfortran.map @@ -1107,8 +1107,6 @@ GFORTRAN_1.3 { GFORTRAN_1.4 { global: - _gfortran_error_stop_numeric; - _gfortran_selected_real_kind2008; _gfortran_bessel_jn_r4; _gfortran_bessel_jn_r8; _gfortran_bessel_jn_r10; @@ -1117,6 +1115,22 @@ GFORTRAN_1.4 { _gfortran_bessel_yn_r8; _gfortran_bessel_yn_r10; _gfortran_bessel_yn_r16; + _gfortran_error_stop_numeric; + _gfortran_iall_i1; + _gfortran_iall_i2; + _gfortran_iall_i4; + _gfortran_iall_i8; + _gfortran_iall_i16; + _gfortran_iany_i1; + _gfortran_iany_i2; + _gfortran_iany_i4; + _gfortran_iany_i8; + _gfortran_iany_i16; + _gfortran_iparity_i1; + _gfortran_iparity_i2; + _gfortran_iparity_i4; + _gfortran_iparity_i8; + _gfortran_iparity_i16; _gfortran_norm2_r4; _gfortran_norm2_r8; _gfortran_norm2_r10; @@ -1126,6 +1140,7 @@ GFORTRAN_1.4 { _gfortran_parity_l4; _gfortran_parity_l8; _gfortran_parity_l16; + _gfortran_selected_real_kind2008; } GFORTRAN_1.3; F2C_1.0 { |