From 520ad3d18b578dd306d8fb135c3244ab9cb7f985 Mon Sep 17 00:00:00 2001
From: pfdietz <pfdietz@localhost>
Date: Tue, 15 Apr 2003 12:13:50 +0000
Subject: [PATCH] Changed name of compute-class-precedence-list to
 my-compute-class-precedence list, since it was conflicting with an improperly
 exported symbol from the CL package in gcl.

---
 ansi-tests/defclass-aux.lsp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ansi-tests/defclass-aux.lsp b/ansi-tests/defclass-aux.lsp
index 961b7dfe..9fdcab9c 100644
--- a/ansi-tests/defclass-aux.lsp
+++ b/ansi-tests/defclass-aux.lsp
@@ -234,7 +234,7 @@
 			'(,sym))))
 	 nil))))
 
-(defun compute-class-precedence-list (class-name)
+(defun my-compute-class-precedence-list (class-name)
   "Compute the class precdence list for classes defined using
    DEFCLASS-WITH-TESTS."
   (let ((class-names nil)
-- 
GitLab