[armedbear-ticket] [armedbear] #107: (setf (values (struct-slot struct)) (values 42)) fails

[armedbear]

#107: (setf (values (struct-slot struct)) (values 42)) fails
-------------------------+--------------------------------------------------
  Reporter:  mmohamed    |       Owner:  somebody               
      Type:  defect      |      Status:  closed                 
  Priority:  minor       |   Milestone:                         
 Component:  other       |     Version:                         
Resolution:  worksforme  |    Keywords:  SETF VALUES STRUCT-SLOT
-------------------------+--------------------------------------------------
Changes (by mmohamed):

  * priority:  major => minor
  * resolution:  => worksforme
  * status:  new => closed
  * component:  CLOS => other


Comment:

 I am unable to confirm this. FWIW, I am running trunk ABCL with the patch
 for the long form of define-method-combination (#66)

 CL-USER> (in-package #:abcl-bug)
 #<PACKAGE "ABCL-BUG">
 ABCL-BUG> (trigger)
 #S(MYSTRUCT :SLOT 42)
 ABCL-BUG> (lisp-implementation-type)
 "Armed Bear Common Lisp"
 ABCL-BUG> (lisp-implementation-version)
 "0.22.0-dev"
 ABCL-BUG>

-- 
Ticket URL: <http://trac.common-lisp.net/armedbear/ticket/107#comment:1>
armedbear <http://common-lisp.net/project/armedbear>
armedbear