diff options
| author | Tristan Gingold <tgingold@free.fr> | 2020-03-02 07:37:31 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2020-03-02 07:37:58 +0100 |
| commit | 3810f371f59de94848570eba9c3059d8cd3396dc (patch) | |
| tree | aa855b852484c245a2175e50d38d66a84e9613d9 | |
| parent | f4cfdde434e6b8a22acaacac9e129c7dbd600c58 (diff) | |
| download | ghdl-3810f371f59de94848570eba9c3059d8cd3396dc.tar.gz ghdl-3810f371f59de94848570eba9c3059d8cd3396dc.tar.bz2 ghdl-3810f371f59de94848570eba9c3059d8cd3396dc.zip | |
vhdl-prints: disable code to display anonymous signal.
| -rw-r--r-- | src/vhdl/vhdl-prints.adb | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/src/vhdl/vhdl-prints.adb b/src/vhdl/vhdl-prints.adb index bd52fc10f..59f25a08d 100644 --- a/src/vhdl/vhdl-prints.adb +++ b/src/vhdl/vhdl-prints.adb @@ -237,9 +237,10 @@ package body Vhdl.Prints is | Iir_Kind_Constant_Declaration | Iir_Kind_Signal_Declaration | Iir_Kind_Guard_Signal_Declaration + | Iir_Kind_Anonymous_Signal_Declaration | Iir_Kind_Variable_Declaration - | Iir_Kind_Type_Declaration | Iir_Kind_File_Declaration + | Iir_Kind_Type_Declaration | Iir_Kind_Subtype_Declaration | Iir_Kind_Element_Declaration | Iir_Kind_Record_Element_Constraint @@ -2393,7 +2394,14 @@ package body Vhdl.Prints is when Iir_Kind_Signal_Attribute_Declaration => null; when Iir_Kind_Anonymous_Signal_Declaration => - null; + if False then + -- Disabled as it is not part of the sources. + Start_Hbox (Ctxt); + Disp_Token (Ctxt, Tok_Signal); + Disp_Ident (Ctxt, Get_Identifier (Decl)); + Disp_Token (Ctxt, Tok_Semi_Colon); + Close_Hbox (Ctxt); + end if; when Iir_Kind_Group_Template_Declaration => Disp_Group_Template_Declaration (Ctxt, Decl); when Iir_Kind_Group_Declaration => |