diff options
| author | Tristan Gingold <tgingold@free.fr> | 2016-10-13 05:18:57 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2016-10-13 05:18:57 +0200 |
| commit | 2f3707ceb2c6ab25a24a280791339c7294ab732c (patch) | |
| tree | b2918d3df0f5c56877895df42c705ee6f3d1ff99 | |
| parent | 1336edad197f352ee9edc1ce8f6378fe7240df2c (diff) | |
| download | ghdl-2f3707ceb2c6ab25a24a280791339c7294ab732c.tar.gz ghdl-2f3707ceb2c6ab25a24a280791339c7294ab732c.tar.bz2 ghdl-2f3707ceb2c6ab25a24a280791339c7294ab732c.zip | |
nodes_gc: a leak is an error.
| -rw-r--r-- | src/vhdl/nodes_gc.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/nodes_gc.adb b/src/vhdl/nodes_gc.adb index 3ff1002a2..9b1c34cf7 100644 --- a/src/vhdl/nodes_gc.adb +++ b/src/vhdl/nodes_gc.adb @@ -123,7 +123,7 @@ package body Nodes_GC is procedure Report_Unreferenced_Node (N : Iir) is begin Disp_Tree.Disp_Tree (N, True); - -- Has_Error := True; + Has_Error := True; end Report_Unreferenced_Node; procedure Mark_Iir_Ref_Field (N : Iir; F : Fields_Enum) is |