aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl/vhdl-scanner.adb
diff options
context:
space:
mode:
authorBrian Padalino <bpadalino@gmail.com>2021-09-23 01:44:59 -0400
committertgingold <tgingold@users.noreply.github.com>2021-09-24 07:29:46 +0200
commitdfd094273e636fb275a7416a1c470d0b136e9362 (patch)
treec3381b2f291dd0edb6da5f2b77c049b265257241 /src/vhdl/vhdl-scanner.adb
parenta076bcb8121ea03b626447f5dace625415697600 (diff)
downloadghdl-dfd094273e636fb275a7416a1c470d0b136e9362.tar.gz
ghdl-dfd094273e636fb275a7416a1c470d0b136e9362.tar.bz2
ghdl-dfd094273e636fb275a7416a1c470d0b136e9362.zip
Add parsing of case? statement and simple test.
Also add the Matching flag to the Iir_Kind_Case_Statement.
Diffstat (limited to 'src/vhdl/vhdl-scanner.adb')
-rw-r--r--src/vhdl/vhdl-scanner.adb3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/vhdl/vhdl-scanner.adb b/src/vhdl/vhdl-scanner.adb
index 76e6fe5fd..10181cd6c 100644
--- a/src/vhdl/vhdl-scanner.adb
+++ b/src/vhdl/vhdl-scanner.adb
@@ -2559,9 +2559,8 @@ package body Vhdl.Scanner is
Current_Token := Tok_Match_Not_Equal;
Pos := Pos + 3;
else
- Error_Msg_Scan ("unknown matching operator");
+ Current_Token := Tok_Question_Mark;
Pos := Pos + 1;
- goto Again;
end if;
end if;
return;