Update function call stuff

2026-07-19 00:14:16 -07:00
parent bd7ca2fa25
commit 67b68f8c61
10 changed files with 177 additions and 115 deletions
@@ -1,14 +1,3 @@
 ;; -*- mode: lisp-data -*-

-(put 'x 'condition-class t)
-(put 'y 'condition-class 'x)
-
-(print (condition-class-p 'x))
-(print (condition-class-p 'y))
-(print (condition-class-p 'z))
-(print (condition-subclass-p 'y 'x))
-(print (condition-subclass-p 'y t))
-(print (condition-subclass-p 'x t))
-(print (condition-subclass-p t t))
-(print (condition-subclass-p 'z 'x))
-(print (condition-subclass-p 'x 'y))
+(test a)