1 files changed, 1 insertions, 1 deletions
diff --git a/tit4tat.pl b/tit4tat.pl
index 4614314..528d915 100644
--- a/tit4tat.pl
+++ b/tit4tat.pl
@@ -54,4 +54,4 @@ loop(Hist, PayedA, PayedB) :-
 	write('Type c,d or e to end: '), read(Choice),
 	do(Choice, Hist, PayedA, PayedB).
 
-start :- loop([], [], []).
+start :- loop([], [], []),halt.