SUBTYPEP mishap?
Marco Antoniotti <[email protected]> Sun, 8 Jan 2012 14:55:04 +0100
| Newsgroups | gmane.lisp.mcl.general |
|---|---|
| Message-ID | <[email protected]> |
--===============6551417492201552679==
Content-Type: multipart/alternative; boundary=Apple-Mail-1--168646751
--Apple-Mail-1--168646751
Content-Transfer-Encoding: 7bit
Content-Type: text/plain;
charset=us-ascii
Hi
AM I BEING LOADED?
Welcome to Clozure Common Lisp Version 1.7-store-r15140 (DarwinX8664)!
? (subtypep 'foo t)
T
T
This seems wrong. Note that I want to define
(defun is-type-specifier (x)
(ignore-errors (subtytpep x t)))
Cheers
--
Marco Antoniotti
P.S. The "AM I BEING LOADED?" is cute, but a bit annoying.... :)
--Apple-Mail-1--168646751
Content-Transfer-Encoding: 7bit
Content-Type: text/html;
charset=us-ascii
<html><head></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; ">Hi<div><br></div><div><font class="Apple-style-span" face="'Courier New'">AM I BEING LOADED?<br>Welcome to Clozure Common Lisp Version 1.7-store-r15140 (DarwinX8664)!<br>? (subtypep 'foo t)<br>T<br>T</font><br><br></div><div><br></div><div>This seems wrong. Note that I want to define</div><div><br></div><div><font class="Apple-style-span" face="'Courier New'">(defun is-type-specifier (x)</font></div><div><font class="Apple-style-span" face="'Courier New'"> (ignore-errors (subtytpep x t)))</font></div><div><br></div><div>Cheers</div><div><br><div>--<br>Marco Antoniotti<br><br></div>P.S. The "AM I BEING LOADED?" is cute, but a bit annoying..
.. :)</div><div><br></div></body></html>
--Apple-Mail-1--168646751--
--===============6551417492201552679==
Content-Type: text/plain; charset="us-ascii"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Content-Disposition: inline
_______________________________________________
info-mcl mailing list
[email protected]
http://clozure.com/mailman/listinfo/info-mcl
--===============6551417492201552679==--