[Ada] Missing length check on private type with unknown discriminants

[Pierre-Marie de Rodat]

Compiler fails to emit a length check on the right-hand side of an
assignment when the type involved is a private type with unknown
discriminants whose full view is an unconstrained array type.

Tested on x86_64-pc-linux-gnu, committed on trunk

2019-12-12  Ed Schonberg  <schonberg@adacore.com>

gcc/ada/

	* exp_ch5.adb (Expand_N_Assognment_Statement): Extend the
	processing involving private types with unknown discriminants to
	handle the case where the full view of the type is an
	unconstrained array type.
-------------- next part --------------
A non-text attachment was scrubbed...
Name: patch.diff
Type: text/x-diff
Size: 1624 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/gcc-patches/attachments/20191212/68323af8/attachment.bin>