revert type-filter change, unknown types return t for now - gcl.git - GNU Common Lisp

index : gcl.git
GNU Common Lisp
summary refs log tree commit diff
diff options
context:
space:
mode:
authorCamm Maguire <camm@debian.org>2014年09月28日 20:36:25 -0400
committerCamm Maguire <camm@debian.org>2014年09月28日 20:36:25 -0400
commit28e7e33d45ee120b456239901c0eb7481217f16d (patch)
tree52b55d80f2c52746493e4e6a0d884f783c91ef93
parentc06378c75d976ead396fcba360682dbbb3a20641 (diff)
downloadgcl-28e7e33d45ee120b456239901c0eb7481217f16d.tar.gz
revert type-filter change, unknown types return t for now
Diffstat
-rwxr-xr-xgcl/cmpnew/gcl_cmptype.lsp 2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcl/cmpnew/gcl_cmptype.lsp b/gcl/cmpnew/gcl_cmptype.lsp
index 3f85fa2f8..ef4216147 100755
--- a/gcl/cmpnew/gcl_cmptype.lsp
+++ b/gcl/cmpnew/gcl_cmptype.lsp
@@ -124,7 +124,7 @@
((and (eq (car type) 'satisfies)
(symbolp (second type))
(get (second type) 'type-filter)))
- (t '*)))
+ (t t)))
)))))
generated by cgit v1.2.3 (git 2.39.1) at 2025年09月04日 14:57:21 +0000

AltStyle によって変換されたページ (->オリジナル) /