[patch, fortran] Fix 126386, fix size calculation for reallocation for matmul of rank 2 a and rank 1 b.

This is a multi-part message in MIME format.
--------------x9XfteCTQUeG7QLM00tdqxvz
Content-Type: text/plain; charset=UTF-8; format=flowed
Content-Transfer-Encoding: 7bit

Hello world,

What it says in the ChangeLog.

Regression-tested. OK for trunk and backport? (This should be one of the
safest backports ever :-)

Bets regards

	Thomas

Fix size calculation for reallocation for matmul of rank 2 a and rank 1 b.

This is a rather simple one-character (well, two-bit) fix for th
calculation of the size of the reallocation of the LHS if that
is allocatable.

gcc/fortran/ChangeLog:

	PR fortran/126386
	* frontend-passes.cc (matmul_lhs_realloc):

gcc/testsuite/ChangeLog:

	PR fortran/126386
	* gfortran.dg/inline_matmul_28.f90: New test.

--------------x9XfteCTQUeG7QLM00tdqxvz
Content-Type: text/x-patch; charset=UTF-8; name="p1.diff"
Content-Disposition: attachment; filename="p1.diff"
Content-Transfer-Encoding: base64

ZGlmZiAtLWdpdCBhL2djYy9mb3J0cmFuL2Zyb250ZW5kLXBhc3Nlcy5jYyBiL2djYy9mb3J0
cmFuL2Zyb250ZW5kLXBhc3Nlcy5jYwppbmRleCA5MjY3ODMxMGZmZC4uNzBlOGVjOWUxNjEg
MTAwNjQ0Ci0tLSBhL2djYy9mb3J0cmFuL2Zyb250ZW5kLXBhc3Nlcy5jYworKysgYi9nY2Mv
Zm9ydHJhbi9mcm9udGVuZC1wYXNzZXMuY2MKQEAgLTM1NjUsOSArMzU2NSw5IEBAIG1hdG11
bF9saHNfcmVhbGxvYyAoZ2ZjX2V4cHIgKmMsIGdmY19leHByICphLCBnZmNfZXhwciAqYiwK
ICAgICBjYXNlIEEyQjE6CiAgICAgICBhci0+c3RhcnRbMF0gPSBnZXRfYXJyYXlfaW5xX2Z1
bmN0aW9uIChHRkNfSVNZTV9TSVpFLCBhLCAxKTsKICAgICAgIGNvbmQgPSBidWlsZF9sb2dp
Y2FsX2V4cHIgKElOVFJJTlNJQ19ORSwKIAkJCQkgZ2V0X2FycmF5X2lucV9mdW5jdGlvbiAo
R0ZDX0lTWU1fU0laRSwgYywgMSksCi0JCQkJIGdldF9hcnJheV9pbnFfZnVuY3Rpb24gKEdG
Q19JU1lNX1NJWkUsIGEsIDIpKTsKKwkJCQkgZ2V0X2FycmF5X2lucV9mdW5jdGlvbiAoR0ZD
X0lTWU1fU0laRSwgYSwgMSkpOwogICAgICAgYnJlYWs7CiAKICAgICBjYXNlIEExQjI6CiAg
ICAgICBhci0+c3RhcnRbMF0gPSBnZXRfYXJyYXlfaW5xX2Z1bmN0aW9uIChHRkNfSVNZTV9T
SVpFLCBiLCAyKTsKZGlmZiAtLWdpdCBhL2djYy90ZXN0c3VpdGUvZ2ZvcnRyYW4uZGcvaW5s
aW5lX21hdG11bF8yOC5mOTAgYi9nY2MvdGVzdHN1aXRlL2dmb3J0cmFuLmRnL2lubGluZV9t
YXRtdWxfMjguZjkwCm5ldyBmaWxlIG1vZGUgMTAwNjQ0CmluZGV4IDAwMDAwMDAwMDAwLi41
NjljMjljNDFjOAotLS0gL2Rldi9udWxsCisrKyBiL2djYy90ZXN0c3VpdGUvZ2ZvcnRyYW4u
ZGcvaW5saW5lX21hdG11bF8yOC5mOTAKQEAgLTAsMCArMSwyMSBAQAorISB7IGRnLWRvIHJ1
biB9CishIHsgZGctb3B0aW9ucyAiLWZmcm9udGVuZC1vcHRpbWl6ZSIgfQorISBQUiAxMjYz
ODYgLSBzaXplIGNhbGN1bGF0aW9uIGZvciBhbGxvY2F0aW9uIG9mIHRoZSBsaHMgZm9yIG1h
dG1tdWwKKyEgd2FzIHdyb25nLiAgT3JpZ2luYWwgdGVzdCBjYXNlIGJ5IENocmlzdG9waCBI
b2Zlci4KKworUFJPR1JBTSByZWFsbG9jYXRpb25fYnVnCisgICAgUkVBTCg4KSwgRElNRU5T
SU9OKDopLCBBTExPQ0FUQUJMRSA6OiB5CisgICAgUkVBTCg4KSwgRElNRU5TSU9OKDMsMikg
OjogQQorICAgIHJlYWwoOCksIGRpbWVuc2lvbigzKSA6OiB4CisgICAgCisgICAgQSg6LDEp
ID0gWzEsLTIsM10KKyAgICBBKDosMikgPSBbLTQsNSw2XQorICAgIAorICAgIHggPSAgWzcs
LTgsOV0KKworICAgIEFMTE9DQVRFKHkoMykpCisgICAgeSA9IG1hdG11bCh0cmFuc3Bvc2Uo
MiphKSx4KQorICAgIGlmIChzaXplKHksMSkgLz0gMikgc3RvcCAxCisgICAgaWYgKGFueSh5
IC89IFsxMDAsIC0yOF0pKSBzdG9wIDIKKyAgICAKK0VORCBQUk9HUkFNIHJlYWxsb2NhdGlv
bl9idWcK

--------------x9XfteCTQUeG7QLM00tdqxvz--