From 45de8524223e78a5c086043e9a22cc70a91c455b Mon Sep 17 00:00:00 2001
From: ram <ram>
Date: Mon, 23 Apr 1990 09:39:24 +0000
Subject: [PATCH] Moved CONDITION defstruct to struct.

---
 code/error.lisp | 5 -----
 1 file changed, 5 deletions(-)

diff --git a/code/error.lisp b/code/error.lisp
index 45c0181c4..910578246 100644
--- a/code/error.lisp
+++ b/code/error.lisp
@@ -312,11 +312,6 @@ The previous version is uglier, but it sets up unique run-time tags.
 
 ;;;; Conditions.
 
-(defstruct (condition (:constructor |constructor for condition|)
-                      (:predicate nil)
-                      (:print-function condition-print))
-  )
-
 (defun condition-print (condition stream depth)
   (declare (ignore depth))
   (if *print-escape*
-- 
GitLab