(plain_type_1, case ARRAY_TYPE): Subtract lower bound when writing

dimension.

From-SVN: r10906
This commit is contained in:
Richard Kenner 1995-12-30 07:57:04 -05:00
parent 638141a689
commit 973d79edc1
1 changed files with 2 additions and 1 deletions

View File

@ -538,7 +538,8 @@ plain_type_1 (type, level)
if (sdb_n_dims < SDB_MAX_DIM)
sdb_dims[sdb_n_dims++]
= (TYPE_DOMAIN (type)
? TREE_INT_CST_LOW (TYPE_MAX_VALUE (TYPE_DOMAIN (type))) + 1
? (TREE_INT_CST_LOW (TYPE_MAX_VALUE (TYPE_DOMAIN (type)))
- TREE_INT_CST_LOW (TYPE_MIN_VALUE (TYPE_DOMAIN (type))) + 1)
: 0);
return PUSH_DERIVED_LEVEL (DT_ARY, m);
}