summaryrefslogtreecommitdiff
path: root/gdb/ada-lex.l
diff options
context:
space:
mode:
authorTom Tromey <tromey@adacore.com>2022-02-23 08:48:40 -0700
committerTom Tromey <tromey@adacore.com>2022-04-04 12:46:09 -0600
commit484e7c5ff5fd24cfb2946fadd76b6b67bbeb4169 (patch)
tree2215d4b74bb6b3848339376f90ae69ca648fd58e /gdb/ada-lex.l
parent02a8d05fc67915ada76b45f9f10b11baf57d5278 (diff)
downloadbinutils-gdb-484e7c5ff5fd24cfb2946fadd76b6b67bbeb4169.tar.gz
Consolidate single-char tokens in ada-lex.l
There are two rules in ada-lex.l that match single-character tokens. This merges them. Also, this removes '.' from the list of such tokens. '.' is not used in any production in ada-exp.y, and removing it here helps the subsequent completion patches.
Diffstat (limited to 'gdb/ada-lex.l')
-rw-r--r--gdb/ada-lex.l4
1 files changed, 1 insertions, 3 deletions
diff --git a/gdb/ada-lex.l b/gdb/ada-lex.l
index 9e35776d7c2..ea35c7a53af 100644
--- a/gdb/ada-lex.l
+++ b/gdb/ada-lex.l
@@ -265,7 +265,7 @@ false { return FALSEKEYWORD; }
<BEFORE_QUAL_QUOTE>"'"/{NOT_COMPLETE} { BEGIN INITIAL; return '\''; }
-[-&*+./:<>=|;\[\]] { return yytext[0]; }
+[-&*+{}@/:<>=|;\[\]] { return yytext[0]; }
"," { if (paren_depth == 0 && pstate->comma_terminates)
{
@@ -319,8 +319,6 @@ false { return FALSEKEYWORD; }
"::" { return COLONCOLON; }
-[{}@] { return yytext[0]; }
-
/* REGISTERS AND GDB CONVENIENCE VARIABLES */
"$"({LETTER}|{DIG}|"$")* {