From 61c9ee30f421763a3641f9f2f6ae4edfb21711e0 Mon Sep 17 00:00:00 2001
From: rxi <rxi@users.noreply.github.com>
Date: Sun, 5 Apr 2020 15:35:42 +0100
Subject: [PATCH] Removed redundant check in equal()'s string comparison

---
 src/fe.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/fe.c b/src/fe.c
index ddba796..6c089d7 100644
--- a/src/fe.c
+++ b/src/fe.c
@@ -202,10 +202,10 @@ static int equal(fe_Object *a, fe_Object *b) {
   if (type(a) != type(b)) { return 0; }
   if (type(a) == FE_TNUMBER) { return number(a) == number(b); }
   if (type(a) == FE_TSTRING) {
-    for (; !isnil(a) && !isnil(b); a = cdr(a), b = cdr(b)) {
+    for (; !isnil(a); a = cdr(a), b = cdr(b)) {
       if (car(a) != car(b)) { return 0; }
     }
-    return isnil(a) && isnil(b);
+    return a == b;
   }
   return 0;
 }