diff options
| author | Joel Brobecker <brobecker@adacore.com> | 2013-11-27 18:47:40 +0400 |
|---|---|---|
| committer | Joel Brobecker <brobecker@adacore.com> | 2013-12-03 16:04:26 +0400 |
| commit | 7fb1b8b13f1fb3a72f0ab3ce72967549ea040e17 (patch) | |
| tree | dcd7b5ffbdb8f6ba160acccf0a64cc3cce69bbaa /gdb/testsuite/ChangeLog | |
| parent | 849f2b52ec2b71bc76188ac8c53f35fb57a5d41c (diff) | |
| download | gdb-7fb1b8b13f1fb3a72f0ab3ce72967549ea040e17.zip gdb-7fb1b8b13f1fb3a72f0ab3ce72967549ea040e17.tar.gz gdb-7fb1b8b13f1fb3a72f0ab3ce72967549ea040e17.tar.bz2 | |
Ada: Reserved word "all" should not need to be spelled in lowercase.
Consider the following code:
type Ptr is access all Integer;
IP : Ptr := new Integer'(123);
IP is the Ada exception of a pointer to an integer. To dereference
the pointer and get its value, the user uses the reserved word "all"
as follow:
(gdb) p ip.all
$1 = 123
Ada being a case-insensitive language, the casing should not matter.
Unfortunately, for the reserved word "all", things don't work. For
instance:
(gdb) p ip.ALL
Type integer is not a structure or union type
This patch fixes the problem.
gdb/ChangeLog:
* ada-lex.l (find_dot_all): Use strncasecmp instead of strncmp.
gdb/testsuite/ChangeLog:
* gdb.ada/dot_all: New testcase.
Diffstat (limited to 'gdb/testsuite/ChangeLog')
| -rw-r--r-- | gdb/testsuite/ChangeLog | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index bc4bcbb..5725b3d 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,5 +1,9 @@ 2013-12-03 Joel Brobecker <brobecker@adacore.com> + * gdb.ada/dot_all: New testcase. + +2013-12-03 Joel Brobecker <brobecker@adacore.com> + * gdb.mi/mi-undefined-cmd.exp: New testcase. 2013-12-03 Joel Brobecker <brobecker@adacore.com> |