<html>
<head>
<meta content="text/html; charset=utf-8" http-equiv="Content-Type">
</head>
<body text="#000000" bgcolor="#FFFFFF">
<p>This case can be further reduced to the following, which does not
require the library:</p>
<p> </p>
<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>
</body>
</html>