From a4e36e2bb3a636b33390357d05e8e5ea018c3c42 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Wed, 24 Jul 2019 05:20:19 +0200
Subject: synth: enable handling of pragma translate_on/off.

---
 src/ghdldrv/ghdlsynth.adb | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/ghdldrv/ghdlsynth.adb b/src/ghdldrv/ghdlsynth.adb
index d7f6bb848..1d4624985 100644
--- a/src/ghdldrv/ghdlsynth.adb
+++ b/src/ghdldrv/ghdlsynth.adb
@@ -27,6 +27,7 @@ with Libraries;
 with Flags;
 with Vhdl.Nodes; use Vhdl.Nodes;
 with Vhdl.Errors;
+with Vhdl.Scanner;
 with Vhdl.Std_Package;
 with Vhdl.Canon;
 with Vhdl.Configuration;
@@ -116,6 +117,8 @@ package body Ghdlsynth is
       end loop;
 
       Vhdl.Annotations.Flag_Synthesis := True;
+      Vhdl.Scanner.Flag_Comment_Keyword := True;
+      Vhdl.Scanner.Flag_Pragma_Comment := True;
 
       Common_Compile_Init (False);
       --  Will elaborate.
-- 
cgit v1.2.3