TITANIC: Remove any unfreed parser nodes at the end of sentence parsing

This fixes cases like bug #10621, which are somehow resulting from not
all parser nodes being properly freed after parsing the first sentence
finishes

1 files changed, 7 insertions, 0 deletions

diff --git a/engines/titanic/true_talk/tt_parser.cpp b/engines/titanic/true_talk/tt_parser.cpp
index 2caeef45dd..6b69c903e4 100644
--- a/engines/titanic/true_talk/tt_parser.cpp
+++ b/engines/titanic/true_talk/tt_parser.cpp
@@ -533,6 +533,13 @@ int TTparser::findFrames(TTsentence *sentence) {
 		status = checkForAction();
 	}
 
+	if (_nodesP) {
+		// This shouldn't ever happen
+		warning("Parser had left-over processing nodes");
+		while (_nodesP)
+			removeNode(_nodesP);
+	}
+
 	delete line;
 	return status;
 }