From: Richard Henderson Date: Wed, 11 Feb 1998 01:01:58 +0000 (-0800) Subject: Comment the subtraction change. X-Git-Tag: prereleases/egcs-1.0.2-prerelease~49 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=4ceeccef8ac519b726982179437d85159c106a8a;p=thirdparty%2Fgcc.git Comment the subtraction change. From-SVN: r17851 --- diff --git a/gcc/f/com.c b/gcc/f/com.c index a63864a1ad5d..04ca03e2d825 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)),