From 65521ff36ccdc244f40bc6e0ca11c3c956c48992 Mon Sep 17 00:00:00 2001
From: vindarel <vindarel@mailz.org>
Date: Tue, 24 Nov 2020 11:17:48 +0100
Subject: [PATCH] (minor) REPL: rename add-res -> history-add

---
 repl.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/repl.lisp b/repl.lisp
index 6ab6330..ba4709b 100755
--- a/repl.lisp
+++ b/repl.lisp
@@ -91,7 +91,7 @@
   (string/= (string-trim " " str1)
             (string-trim " " str2)))
 
-(defun add-res (txt res)
+(defun history-add (txt res)
   (setq *hist* (cons (list txt res) *hist*)))
 
 (defun format-output (&rest args)
@@ -231,7 +231,7 @@
             (format *error-output* "~a~a~%"
                     (cl-ansi-text:red "Evaluation error: ")
                     condition))))
-  (add-res text *last-result*)
+  (history-add text *last-result*)
   (if *last-result*
       (format t "~a~s~%" *ret* *last-result*)))