[gfortran] Implement CSHIFT

Paul Brook paul@nowt.org
Sun Oct 12 22:01:00 GMT 2003


The attached patch implements the CSHIFT intrinsic.

Applied to tree-ssa branch.

Paul

2003-10-12  Feng Wang  <wf_cs@yahoo.com>

	* iresolve.c (gfc_resolve_cshift): Change to match implementation.
	* trans-intrinsic.c (gfc_conv_intrinsic_function): Remove CSHIFT.
	(gfc_is_intrinsic_libcall): Add CSHIFT.
libgfortran
	* intrinsics/cshift0.c: New file.
	* m4/cshift1.m4: New file
	* generated/cshift*.c: New files.
	* Makefile.am: Add them.
	* Makefile.in: Regenerate.
testsuite
	* gfortran.fortran-torture/execute/intrinsic_cshift.f90: New test.
-------------- next part --------------
A non-text attachment was scrubbed...
Name: patch
Type: text/x-diff
Size: 3990 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20031012/585f1813/attachment.bin>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: cshift0.c
Type: text/x-csrc
Size: 4621 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20031012/585f1813/attachment-0001.bin>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: cshift1.m4
Type: text/x-csrc
Size: 4815 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20031012/585f1813/attachment-0002.bin>


More information about the Fortran mailing list