From af16d43af82ad0d05710c42232332a400614d3ea Mon Sep 17 00:00:00 2001
From: Robin Haberkorn <robin.haberkorn@googlemail.com>
Date: Mon, 11 Oct 2021 09:23:39 +0300
Subject: fixed crashes when the Q-Reg stack is non-empty at exit

* Test case: sciteco -e '[a'
  [aEX$$ in interactive mode would also crash.
* No longer use a destructor - it was executed after the Q-Reg view was
  destroyed.
* Instead, we now explicitly call teco_qreg_stack_clear() in main().
* Added a regression test case.
---
 src/main.c | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src/main.c')

diff --git a/src/main.c b/src/main.c
index 38b1197..797ef73 100644
--- a/src/main.c
+++ b/src/main.c
@@ -457,6 +457,7 @@ cleanup:
 	teco_ring_cleanup();
 	teco_qreg_table_clear(&local_qregs);
 	teco_qreg_table_clear(&teco_qreg_table_globals);
+	teco_qreg_stack_clear();
 	teco_view_free(teco_qreg_view);
 #endif
 	teco_interface_cleanup();
-- 
cgit v1.2.3