<div dir="ltr"><br><div class="gmail_extra"><br><div class="gmail_quote">On Thu, Apr 30, 2015 at 4:45 PM, Gary Byers <span dir="ltr"><<a href="mailto:gb@clozure.com" target="_blank">gb@clozure.com</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">I haven't looked at this yet, but am curious and will try to look at it soon.<br>
iirc, the spec says that the results of this case are undefined. I'm not even<br>
sure whether CCL gleefully inlines what looks like a call to CL+ in this case,<br>
or if respects and uses the local definition, and if I do RC, both behaviors are<br>
allowed.<br></blockquote><div><br></div><div>I'm pretty sure CCL respects the local definitions, because i do the sort of thing Ron describes (i.e. wrap local bindings for some standard functions around a form) on occasion as a debugging tool, and it's always worked fine.</div><div><br></div><div><br></div><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
a few years ago, we had a customer who expected a warning or possibly an<br>
error in this case (possibly because they were used to another CL implementation's<br>
behavior, or possibly because they didn't understand the phrase "the results are undefined".<br>
that's not important now.  What -is- important is that their employer waved money in our<br>
faces and asked us to change this, and we did.<br>
<br>
Sometimes, the principle of the thing is more important than money is.  This was not one<br>
of those times.<div class="HOEnZb"><div class="h5"><br>
<br>
<br>
On 04/30/2015 02:25 PM, Karsten Poeck wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
On 30.04.15 21:36, Karsten Poeck wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
On 30.04.15 20:08, Ron Garret wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
(flet ((+ () t)) t)<br>
</blockquote>
Not sure whether you consider this a solution, but did you try shadowing +?<br>
</blockquote>
I am aware that you wrote "The Complete Idiot’s Guide to Common Lisp Packages", just wonder why you didn't use packages here.<br>
<br>
Karsten<br>
<br>
_______________________________________________<br>
Openmcl-devel mailing list<br>
<a href="mailto:Openmcl-devel@clozure.com" target="_blank">Openmcl-devel@clozure.com</a><br>
<a href="https://lists.clozure.com/mailman/listinfo/openmcl-devel" target="_blank">https://lists.clozure.com/mailman/listinfo/openmcl-devel</a><br>
</blockquote>
<br>
_______________________________________________<br>
Openmcl-devel mailing list<br>
<a href="mailto:Openmcl-devel@clozure.com" target="_blank">Openmcl-devel@clozure.com</a><br>
<a href="https://lists.clozure.com/mailman/listinfo/openmcl-devel" target="_blank">https://lists.clozure.com/mailman/listinfo/openmcl-devel</a><br>
</div></div></blockquote></div><br></div></div>