aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--src/vhdl/vhdl-scanner.adb6
1 files changed, 6 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-scanner.adb b/src/vhdl/vhdl-scanner.adb
index 55a98e03f..eac8cfc92 100644
--- a/src/vhdl/vhdl-scanner.adb
+++ b/src/vhdl/vhdl-scanner.adb
@@ -2274,6 +2274,12 @@ package body Vhdl.Scanner is
Name_Table.Get_Identifier (Source (Pos + 1));
Pos := Pos + 3;
return;
+ elsif Source (Pos + 1) = ''' then
+ Error_Msg_Scan ("empty quote is not allowed in vhdl");
+ Current_Token := Tok_Character;
+ Current_Context.Identifier := Name_Table.Get_Identifier (' ');
+ Pos := Pos + 2;
+ return;
else
Current_Token := Tok_Tick;
Pos := Pos + 1;