diff options
author | Tristan Gingold <tgingold@free.fr> | 2019-07-25 06:01:32 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2019-07-25 06:01:32 +0200 |
commit | 8d8e3fd40444b7f8c11e6ff510d1fbf70b7954af (patch) | |
tree | 41231b86cd8f5e2ed8c3efcb620c0352f2ed70dc /src/vhdl/vhdl-scanner.adb | |
parent | dbdc6a93ab37ad44537d250ec216d682c090b5f0 (diff) | |
download | ghdl-8d8e3fd40444b7f8c11e6ff510d1fbf70b7954af.tar.gz ghdl-8d8e3fd40444b7f8c11e6ff510d1fbf70b7954af.tar.bz2 ghdl-8d8e3fd40444b7f8c11e6ff510d1fbf70b7954af.zip |
vhdl: handle (discard) more pragmas.
Diffstat (limited to 'src/vhdl/vhdl-scanner.adb')
-rw-r--r-- | src/vhdl/vhdl-scanner.adb | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-scanner.adb b/src/vhdl/vhdl-scanner.adb index 8d51e58bb..740617ba4 100644 --- a/src/vhdl/vhdl-scanner.adb +++ b/src/vhdl/vhdl-scanner.adb @@ -1782,6 +1782,14 @@ package body Vhdl.Scanner is (Warnid_Pragma, "'translate_on' without " & "coresponding 'translate_off'"); end if; + when Name_Label + | 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 => Warning_Msg_Scan (Warnid_Pragma, "unknown pragma %i ignored", +Id); |