diff options
author | Tristan Gingold <tgingold@free.fr> | 2023-03-23 07:55:49 +0100 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2023-03-23 07:55:49 +0100 |
commit | 13a202b6ee9b1b9972a2671a5f1f901f3143df1d (patch) | |
tree | ac357de8c2884f07c1e92798f966314efe40c49d /src/ghdldrv/ghdlcomp.adb | |
parent | 01287e2aa2b456e161486c336c7c2e8d98fa5cd1 (diff) | |
download | ghdl-13a202b6ee9b1b9972a2671a5f1f901f3143df1d.tar.gz ghdl-13a202b6ee9b1b9972a2671a5f1f901f3143df1d.tar.bz2 ghdl-13a202b6ee9b1b9972a2671a5f1f901f3143df1d.zip |
ghdlcomp: free unused node
Diffstat (limited to 'src/ghdldrv/ghdlcomp.adb')
-rw-r--r-- | src/ghdldrv/ghdlcomp.adb | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/ghdldrv/ghdlcomp.adb b/src/ghdldrv/ghdlcomp.adb index cf7b8148c..d5d77360e 100644 --- a/src/ghdldrv/ghdlcomp.adb +++ b/src/ghdldrv/ghdlcomp.adb @@ -234,6 +234,7 @@ package body Ghdlcomp is Libraries.Add_Design_Unit_Into_Library (Design); Design := Next_Design; end loop; + Free_Iir (Res); end Compile_Load_Vhdl_File; function Compile_Analyze_File (File : String) return Iir |