diff options
| author | Richard Henderson <rth@gcc.gnu.org> | 1998-02-10 17:01:58 -0800 |
|---|---|---|
| committer | Richard Henderson <rth@gcc.gnu.org> | 1998-02-10 17:01:58 -0800 |
| commit | 4ceeccef8ac519b726982179437d85159c106a8a (patch) | |
| tree | 49c9b4afedad5416acd792142ed0b69e942eb14d | |
| parent | d4f37c41082765e46f559511f4abfb3adb7efb20 (diff) | |
| download | gcc-4ceeccef8ac519b726982179437d85159c106a8a.tar.gz | |
Comment the subtraction change.
From-SVN: r17851
| -rw-r--r-- | gcc/f/com.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gcc/f/com.c b/gcc/f/com.c index a63864a1ad5..04ca03e2d82 100644 --- a/gcc/f/com.c +++ b/gcc/f/com.c @@ -13030,6 +13030,8 @@ ffecom_ptr_to_expr (ffebld expr) i >= 0; --i, array = TYPE_MAIN_VARIANT (TREE_TYPE (array))) { + /* The initial subtraction should happen in the original type so + that (possible) negative values are handled appropriately. */ item = ffecom_2 (PLUS_EXPR, build_pointer_type (TREE_TYPE (array)), |