diff options
| -rw-r--r-- | src/vhdl/canon.adb | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/src/vhdl/canon.adb b/src/vhdl/canon.adb index c414740..f6d1061 100644 --- a/src/vhdl/canon.adb +++ b/src/vhdl/canon.adb @@ -1511,7 +1511,6 @@ package body Canon is (El, Proc, Sub_Chain); Replace_Stmt (Proc); - Free_Iir (El); El := Proc; when Iir_Kind_Concurrent_Selected_Signal_Assignment => @@ -1521,7 +1520,6 @@ package body Canon is (El, Proc, Sub_Chain); Replace_Stmt (Proc); - Free_Iir (El); El := Proc; when Iir_Kind_Concurrent_Assertion_Statement => |