<html><head><meta http-equiv="Content-Type" content="text/html charset=windows-1252"></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;">It’s you. :-)<div><br></div><div><div>? (eql '(0) '(0))</div><div>NIL</div></div><div><br></div><div>You want an EQUAL hash table, not an EQL hash table.</div><div><br></div><div>rg</div><div><br><div><div>On Jul 7, 2016, at 6:24 AM, Pierre Bessière <<a href="mailto:Pierre.Bessiere@imag.fr">Pierre.Bessiere@imag.fr</a>> wrote:</div><br class="Apple-interchange-newline"><blockquote type="cite"><meta http-equiv="Content-Type" content="text/html charset=utf-8"><div style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;" class="">Hi all :-)<div class=""><br class=""></div><div class="">Is it a bug ? or something I make wrong ?</div><div class=""><br class=""></div><div class=""><div class="">? (setf foo (make-hash-table))</div><div class="">#<HASH-TABLE :TEST EQL size 0/60 #x3020010FE25D></div><div class="">? (setf (gethash '(0) foo) 42)</div><div class="">42</div><div class="">? (gethash '(0) foo)</div><div class="">NIL</div><div class="">NIL</div><div class=""><br class=""></div><div class="">Thanks in advance.</div><div class=""><br class=""></div><div class="">
<div style="letter-spacing: normal; orphans: auto; text-align: start; text-indent: 0px; text-transform: none; white-space: normal; widows: auto; word-spacing: 0px; -webkit-text-stroke-width: 0px; word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;" class="">_________________________________<br class="">Pr. Pierre Bessière - CNRS<div class="">**********************<br class="">SORBONNE Universités - UPMC - ISIR</div><div class=""><br class=""><a href="http://bayesian-programming.org/" class="">http://bayesian-programming.org</a></div><div class="">Tel: +33 1 44 27 51 54</div><div class="">Skype: Pierre.Bessiere</div><div class=""><br class=""></div><div class="">Pyramide - T55/65<br class="">CC 173 - 4 Place Jussieu<br class="">75005 Paris<br class="">FRANCE<br class="">_________________________________<br class=""><br class=""></div></div>
</div>
<br class=""></div></div>_______________________________________________<br>Openmcl-devel mailing list<br><a href="mailto:Openmcl-devel@clozure.com">Openmcl-devel@clozure.com</a><br>https://lists.clozure.com/mailman/listinfo/openmcl-devel<br></blockquote></div><br></div></body></html>