<html>
<head>
<meta http-equiv="Content-Type" content="text/html;
charset=windows-1252">
</head>
<body text="#000000" bgcolor="#FFFFFF">
<p>I could reproduce it on Linuxx8632 (CCL 1.11)<br>
</p>
<br>
<div class="moz-cite-prefix">On 12/04/17 17:48, Ron Garret wrote:<br>
</div>
<blockquote type="cite"
cite="mid:3764E8B5-356C-4C89-A7BD-1E6AC8F6FDB8@flownet.com">
<meta http-equiv="Content-Type" content="text/html;
charset=windows-1252">
Seems to be Windows-specific. I can’t reproduce this on my mac.
<div><br>
<div>
<div>On Apr 12, 2017, at 2:30 AM, Nicolas Hafner <<a
href="mailto:shinmera@tymoon.eu" moz-do-not-send="true">shinmera@tymoon.eu</a>>
wrote:</div>
<br class="Apple-interchange-newline">
<blockquote type="cite">
<meta content="text/html; charset=windows-1252"
http-equiv="Content-Type">
<div text="#000000" bgcolor="#FFFFFF">
<p>This case can be further reduced to the following,
which does not require the library:</p>
<div> <br class="webkit-block-placeholder">
</div>
<tt>(defstruct vec<br>
(x 0.0 :type single-float)<br>
(y 0.0 :type single-float))<br>
<br>
(let ((vec (make-vec)))<br>
(psetf (vec-x vec) 5.0<br>
(vec-y vec) 5.0))</tt><br>
<br>
The specific trigger combination seems to be psetf with
typed structure slots.<br>
<br>
<div class="moz-cite-prefix">On 12/04/17 11:20, gzip4
wrote:<br>
</div>
<blockquote
cite="mid:CAK0Se9nK29nYwW2Q3izJ2o=tfNoh3nye3eu_QiWwCcR7zmmjkw@mail.gmail.com"
type="cite">
<div dir="ltr">
<div><span
style="font-family:arial,helvetica,sans-serif">Hello,
All!<br>
<br>
</span></div>
<div><span
style="font-family:arial,helvetica,sans-serif">To
reproduce the issue:<br>
</span></div>
<div><span
style="font-family:arial,helvetica,sans-serif"><br>
<br>
</span><span style="font-family:monospace,monospace">(lisp-implementation-version)<br>
"Version 1.11-r16635 (WindowsX8632)"<br>
<br>
(ql:quickload '3d-vectors)<br>
<br>
(let ((vec (3d-vectors::vec 5 0 0)))<br>
(psetf (3d-vectors::%vx3 vec) 5.0<br>
(3d-vectors::%vy3 vec) 5.0))</span>
<div><br>
</div>
<div>Signal error:<br>
The value 5.0 is not of the expected type
STRUCTURE.<br>
[Condition of type TYPE-ERROR]<br>
<br>
</div>
<div>The problem seems to be related to <code>psetf</code>.
If you remove one of the set pairs, it works fine.
If you use <code>setf</code>, it also works fine.<br>
<br>
</div>
<div>64 bit versions do not have such an issue,
LinuxARM32 also passes.<br>
</div>
<div><br>
-- <br>
<div class="gmail_signature">gzip4</div>
</div>
</div>
</div>
</blockquote>
<br>
</div>
_______________________________________________<br>
Openmcl-devel mailing list<br>
<a href="mailto:Openmcl-devel@clozure.com"
moz-do-not-send="true">Openmcl-devel@clozure.com</a><br>
<a class="moz-txt-link-freetext" href="https://lists.clozure.com/mailman/listinfo/openmcl-devel">https://lists.clozure.com/mailman/listinfo/openmcl-devel</a><br>
</blockquote>
</div>
<br>
</div>
</blockquote>
<br>
</body>
</html>