aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl/vhdl-parse.adb
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2021-07-29 20:41:00 +0200
committerTristan Gingold <tgingold@free.fr>2021-07-29 20:41:00 +0200
commitfe638b2b62c22bd4b151a0ff00d53bf48a5c7f80 (patch)
tree11d3ca1a348a1913f3cc801c8fe6fcc65cf03eb6 /src/vhdl/vhdl-parse.adb
parentd2952090b1f4fde84fbb954cbe43a9a5f22dd35f (diff)
downloadghdl-fe638b2b62c22bd4b151a0ff00d53bf48a5c7f80.tar.gz
ghdl-fe638b2b62c22bd4b151a0ff00d53bf48a5c7f80.tar.bz2
ghdl-fe638b2b62c22bd4b151a0ff00d53bf48a5c7f80.zip
vhdl-parse: use if_generate_else_clause for elsif clauses. Fix #1824
Diffstat (limited to 'src/vhdl/vhdl-parse.adb')
-rw-r--r--src/vhdl/vhdl-parse.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/vhdl-parse.adb b/src/vhdl/vhdl-parse.adb
index 726e8e1f4..c96aaaad1 100644
--- a/src/vhdl/vhdl-parse.adb
+++ b/src/vhdl/vhdl-parse.adb
@@ -9258,7 +9258,7 @@ package body Vhdl.Parse is
exit when Current_Token /= Tok_Elsif;
-- Create new alternative.
- Clause := Create_Iir (Iir_Kind_If_Generate_Statement);
+ Clause := Create_Iir (Iir_Kind_If_Generate_Else_Clause);
Set_Location (Clause, Loc);
Start_Loc := Get_Token_Location;