[Patch, fortran] LBOUND/UBOUND/SHAPE assumed rank support
Mikael Morin
mikael.morin@sfr.fr
Thu Aug 2 14:19:00 GMT 2012
Hello,
as promised, I submit the patch (split to 5 pieces) adding support for
assumed rank actual arguments to the LBOUND/UBOUND/SHAPE intrinsics in
the non-scalar case (without the DIM argument).
Patch 1: Disable shape setting and simplification for assumed rank.
Patch 2: Move and rename get_rank_from_desc to gfc_conv_descriptor_rank.
Patch 3: Fix set_loop_bounds #1 (optional).
Patch 4: Fix set_loop_bounds #2.
Patch 5: Properly setup the scalarizer in the {l,u}bound(assumed_rank)
cases.
More details in the patch files.
Regression tested on x86_64-unknown-linux-gnu. OK for trunk?
Mikael
-------------- next part --------------
A non-text attachment was scrubbed...
Name: assumed_rank_bounds_v2-1.diff
Type: text/x-patch
Size: 1907 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20120802/879012e4/attachment.bin>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: assumed_rank_bounds_v2-2.diff
Type: text/x-patch
Size: 3509 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20120802/879012e4/attachment-0001.bin>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: assumed_rank_bounds_v2-3.diff
Type: text/x-patch
Size: 2149 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20120802/879012e4/attachment-0002.bin>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: assumed_rank_bounds_v2-4.diff
Type: text/x-patch
Size: 1893 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20120802/879012e4/attachment-0003.bin>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: assumed_rank_bounds_v2-5.diff
Type: text/x-patch
Size: 2659 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20120802/879012e4/attachment-0004.bin>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: assumed_rank_bounds_1.f90
Type: text/x-fortran
Size: 5032 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20120802/879012e4/attachment-0005.bin>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: assumed_rank_bounds_2.f90
Type: text/x-fortran
Size: 3119 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20120802/879012e4/attachment-0006.bin>
More information about the Fortran
mailing list