This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
Re: [gfortran] Adding quite a few intrinsics
- From: Steve Kargl <sgk at troutmask dot apl dot washington dot edu>
- To: FX Coudert <fxcoudert at gmail dot com>
- Cc: fortran at gcc dot gnu dot org, gcc-patches at gcc dot gnu dot org
- Date: Fri, 11 Nov 2005 08:51:01 -0800
- Subject: Re: [gfortran] Adding quite a few intrinsics
- References: <a84d7352434a71b6d1c5ddae754be113@gmail.com>
On Wed, Nov 09, 2005 at 03:38:51PM +0100, FX Coudert wrote:
>
> Built and tested this on ppc-darwin (I compared the behaviour with g77
> behaviour to be sure). I apologize for not being able to make a proper
> regtesting (i only do have a laptop, not much horsepower and few
> occasions to charge the battery).
>
I haven't regression tested this, yet. A few small fixes
and from my reading of the patch it appears OK.
+ add_sym_2 ("xor", 1, 0, BT_UNKNOWN, 0, GFC_STD_F95,
GFC_STD_GNU instead of GFC_STD_F95.
+ gfc_check_and, gfc_simplify_xor, gfc_resolve_xor,
+ i, BT_UNKNOWN, 0, REQUIRED, j, BT_UNKNOWN, 0, REQUIRED);
+
+ make_generic ("xor", GFC_ISYM_XOR, GFC_STD_GNU);
+ add_sym_2 ("or", 1, 0, BT_UNKNOWN, 0, GFC_STD_F95,
GFC_STD_GNU instead of GFC_STD_F95.
+ gfc_check_and, gfc_simplify_or, gfc_resolve_or,
+ i, BT_UNKNOWN, 0, REQUIRED, j, BT_UNKNOWN, 0, REQUIRED);
+
+ make_generic ("or", GFC_ISYM_OR, GFC_STD_GNU);
+gfc_simplify_and (gfc_expr * x, gfc_expr * y)
+{
+
+ return range_check (result, "IAND");
AND instead of IAND
At some point, we'll need to move g77.texi documentation into
gfortran.texi. I won't require this prior to committing the
patch, but if you have nothing better to do ... :-)
--
Steve