From 71ff56302baff001ea7d491a486143f0229a289b Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Sat, 11 Apr 2020 11:34:19 +0200
Subject: vhdl: handle pragma synthesis_on/synthesis_off.

---
 src/vhdl/vhdl-scanner.adb | 16 +++++++++-------
 1 file changed, 9 insertions(+), 7 deletions(-)

(limited to 'src/vhdl')

diff --git a/src/vhdl/vhdl-scanner.adb b/src/vhdl/vhdl-scanner.adb
index 214edc280..dc3cc2be0 100644
--- a/src/vhdl/vhdl-scanner.adb
+++ b/src/vhdl/vhdl-scanner.adb
@@ -1847,16 +1847,18 @@ package body Vhdl.Scanner is
                     (Warnid_Pragma,
                      "pragma translate must be followed by 'on' or 'off'");
             end case;
-         when Name_Translate_Off =>
+         when Name_Translate_Off
+           |  Name_Synthesis_Off =>
             Scan_Translate_Off;
-         when Name_Translate_On =>
+         when Name_Translate_On
+           |  Name_Synthesis_On =>
             Scan_Translate_On;
          when Name_Label
-           | Name_Label_Applies_To
-           | Name_Return_Port_Name
-           | Name_Map_To_Operator
-           | Name_Type_Function
-           | Name_Built_In =>
+           |  Name_Label_Applies_To
+           |  Name_Return_Port_Name
+           |  Name_Map_To_Operator
+           |  Name_Type_Function
+           |  Name_Built_In =>
             --  Used by synopsys, discarded.
             Skip_Until_EOL;
          when others =>
-- 
cgit v1.2.3