From e98a7506259650ada51fd07a7634794c4c34850b Mon Sep 17 00:00:00 2001
From: Ajitem Joshi <25638226+ExplosionArt@users.noreply.github.com>
Date: Thu, 22 Apr 2021 16:56:43 +0530
Subject: [PATCH] Updated retract to retractall in retract_code_Tartarus_IITG/2

---
 Windows/tartarus_2020v2-2_win.pl | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/Windows/tartarus_2020v2-2_win.pl b/Windows/tartarus_2020v2-2_win.pl
index e56da05..9dc7555 100644
--- a/Windows/tartarus_2020v2-2_win.pl
+++ b/Windows/tartarus_2020v2-2_win.pl
@@ -1967,7 +1967,8 @@
 retract_code_Tartarus_IITG([Code|CodeList]):-
         %writeln(Code),writeln('-----------'),
         (
-        retract(Code)->
+        % retractall inserted in place of retract by Ajitem
+        retractall(Code)->
                 true;
                 (write('Could not retract: '),writeln(Code),true)
         ),
@@ -2668,7 +2669,7 @@
 
 /*************** DIALOGS **************/
 
-:- use_module(library(pce)).
+%:- use_module(library(pce)).
 /*USAGE::
 create_dlg/3
 create_dlg(DialogID, DialogTitle, ComponentList)