src/gdb ChangeLog ada-lang.c testsuite/ChangeL ...

[brobecke at sourceware dot org]

CVSROOT:	/cvs/src
Module name:	src
Changes by:	brobecke@sourceware.org	2012-10-24 18:14:24

Modified files:
	gdb            : ChangeLog ada-lang.c 
	gdb/testsuite  : ChangeLog 
Added files:
	gdb/testsuite/gdb.ada: set_wstr.exp 
	gdb/testsuite/gdb.ada/set_wstr: a.adb pck.adb pck.ads 

Log message:
	[Ada] Allow assignment to wide string.
	
	Given the following variable declaration...
	
	Www : Wide_String := "12345";
	
	... this patch allows the following assignment to work:
	
	(gdb) set variable www := "qwert"
	
	Without this patch, the debugger rejects the assignment because
	the size of the array elements are different:
	
	(gdb) set www := "asdfg"
	Incompatible types in assignment
	
	(on the lhs, we have an array of 2-bytes elements, and on the rhs,
	we have a standard 1-byte string).
	
	gdb/ChangeLog:
	
	* ada-lang.c (ada_same_array_size_p): New function.
	(ada_promote_array_of_integrals): New function.
	(coerce_for_assign): Add handling of arrays where the elements
	are integrals of a smaller size than the size of the target
	array element type.
	
	gdb/testsuite/ChangeLog:
	
	* gdb.ada/set_wstr: New testcase.

Patches:
http://sourceware.org/cgi-bin/cvsweb.cgi/src/gdb/ChangeLog.diff?cvsroot=src&r1=1.14756&r2=1.14757
http://sourceware.org/cgi-bin/cvsweb.cgi/src/gdb/ada-lang.c.diff?cvsroot=src&r1=1.377&r2=1.378
http://sourceware.org/cgi-bin/cvsweb.cgi/src/gdb/testsuite/ChangeLog.diff?cvsroot=src&r1=1.3427&r2=1.3428
http://sourceware.org/cgi-bin/cvsweb.cgi/src/gdb/testsuite/gdb.ada/set_wstr.exp.diff?cvsroot=src&r1=NONE&r2=1.1
http://sourceware.org/cgi-bin/cvsweb.cgi/src/gdb/testsuite/gdb.ada/set_wstr/a.adb.diff?cvsroot=src&r1=NONE&r2=1.1
http://sourceware.org/cgi-bin/cvsweb.cgi/src/gdb/testsuite/gdb.ada/set_wstr/pck.adb.diff?cvsroot=src&r1=NONE&r2=1.1
http://sourceware.org/cgi-bin/cvsweb.cgi/src/gdb/testsuite/gdb.ada/set_wstr/pck.ads.diff?cvsroot=src&r1=NONE&r2=1.1