From 97ca04e39cab03724a18d4feca593bfa8cff2353 Mon Sep 17 00:00:00 2001
From: ram <ram>
Date: Mon, 19 Feb 1990 11:29:44 +0000
Subject: [PATCH] The the macrolet for defining string/=*, string=* transforms,
 comma in the name instead of always defining a transform for string/=*.

---
 compiler/seqtran.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/seqtran.lisp b/compiler/seqtran.lisp
index 072cd6b89..85e2be883 100644
--- a/compiler/seqtran.lisp
+++ b/compiler/seqtran.lisp
@@ -521,7 +521,7 @@ member map concatenate position find
 
 
 (macrolet ((frob (name result-fun)
-	     `(deftransform string/=*
+	     `(deftransform ,name
 			    ((string1 string2 start1 end1 start2 end2)
 			     (simple-string simple-string t t t t))
 		'(,result-fun
-- 
GitLab