author | Camm Maguire <camm@debian.org> | 2014年09月28日 20:36:25 -0400 |
---|---|---|
committer | Camm Maguire <camm@debian.org> | 2014年09月28日 20:36:25 -0400 |
commit | 28e7e33d45ee120b456239901c0eb7481217f16d (patch) | |
tree | 52b55d80f2c52746493e4e6a0d884f783c91ef93 | |
parent | c06378c75d976ead396fcba360682dbbb3a20641 (diff) | |
download | gcl-28e7e33d45ee120b456239901c0eb7481217f16d.tar.gz |
-rwxr-xr-x | gcl/cmpnew/gcl_cmptype.lsp | 2 |
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))) ))))) |