diff options
| author | Tom Tromey <tom@tromey.com> | 2021-06-05 09:24:52 -0600 |
|---|---|---|
| committer | Tom Tromey <tom@tromey.com> | 2022-04-12 09:31:15 -0600 |
| commit | 5c94f93871a094ab4bce2f3c49ccdc8ae322e277 (patch) | |
| tree | 56d47c70b41a7fbe091aacd3a6c2a3b36d6f0fe7 /gdb/ada-lang.c | |
| parent | 6ee823fc4eae5024d85759bc1cc845058f1265a4 (diff) | |
| download | gdb-5c94f93871a094ab4bce2f3c49ccdc8ae322e277.zip gdb-5c94f93871a094ab4bce2f3c49ccdc8ae322e277.tar.gz gdb-5c94f93871a094ab4bce2f3c49ccdc8ae322e277.tar.bz2 | |
Allow ada_decode not to decode operators
The new DWARF scanner records names as they appear in DWARF. However,
because Ada is unusual, it also decodes the Ada names to synthesize
package components for them. In order for this to work out properly,
gdb also needs a mode where ada_decode can be instructed not to decode
Ada operator names. That is what this patch implements.
Diffstat (limited to 'gdb/ada-lang.c')
| -rw-r--r-- | gdb/ada-lang.c | 13 |
1 files changed, 8 insertions, 5 deletions
diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c index ffe3550..7623d0e 100644 --- a/gdb/ada-lang.c +++ b/gdb/ada-lang.c @@ -1304,7 +1304,7 @@ convert_from_hex_encoded (std::string &out, const char *str, int n) /* See ada-lang.h. */ std::string -ada_decode (const char *encoded, bool wrap) +ada_decode (const char *encoded, bool wrap, bool operators) { int i; int len0; @@ -1399,7 +1399,7 @@ ada_decode (const char *encoded, bool wrap) while (i < len0) { /* Is this a symbol function? */ - if (at_start_name && encoded[i] == 'O') + if (operators && at_start_name && encoded[i] == 'O') { int k; @@ -1558,9 +1558,12 @@ ada_decode (const char *encoded, bool wrap) /* Decoded names should never contain any uppercase character. Double-check this, and abort the decoding if we find one. */ - for (i = 0; i < decoded.length(); ++i) - if (isupper (decoded[i]) || decoded[i] == ' ') - goto Suppress; + if (operators) + { + for (i = 0; i < decoded.length(); ++i) + if (isupper (decoded[i]) || decoded[i] == ' ') + goto Suppress; + } /* If the compiler added a suffix, append it now. */ if (suffix >= 0) |