diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/vhdl/vhdl-parse.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/vhdl-parse.adb b/src/vhdl/vhdl-parse.adb index a2b0ad79d..9bae823b2 100644 --- a/src/vhdl/vhdl-parse.adb +++ b/src/vhdl/vhdl-parse.adb @@ -5763,7 +5763,7 @@ package body Vhdl.Parse is Set_Location (Res, Loc); Chain_Init (First, Last); loop - if Current_Token = Tok_Others then + if Current_Token = Tok_Others and then Expr = Null_Iir then Assoc := Parse_A_Choice (Null_Iir, Loc); Expect (Tok_Double_Arrow); |