diff options
author | Tristan Gingold <tgingold@free.fr> | 2020-05-18 18:40:01 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2020-05-18 18:40:01 +0200 |
commit | bf646039f586db4ef199d6ed466c1f173689d1a8 (patch) | |
tree | cc7ca0c25d9fa7533a09d2cb9a518ec908665835 /src/synth/netlists-inference.adb | |
parent | 7c8f4b6b20d42ba69d889f11c3da1f7aca877792 (diff) | |
download | ghdl-bf646039f586db4ef199d6ed466c1f173689d1a8.tar.gz ghdl-bf646039f586db4ef199d6ed466c1f173689d1a8.tar.bz2 ghdl-bf646039f586db4ef199d6ed466c1f173689d1a8.zip |
netlits: Use Remove_Instance instead of Free_Instance.
Diffstat (limited to 'src/synth/netlists-inference.adb')
-rw-r--r-- | src/synth/netlists-inference.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/synth/netlists-inference.adb b/src/synth/netlists-inference.adb index 4e79e7680..574eed408 100644 --- a/src/synth/netlists-inference.adb +++ b/src/synth/netlists-inference.adb @@ -669,7 +669,7 @@ package body Netlists.Inference is -- is read). So redirect the net. Redirect_Inputs (Get_Output (Last_Mux, 0), Res); if Prev_Mux /= No_Instance then - Free_Instance (Prev_Mux); + Remove_Instance (Prev_Mux); end if; return Res; |