Opened 11 years ago

Closed 11 years ago

#607 closed defect (fixed)

nested values places in setf

Reported by: stassats Owned by: gb
Priority: normal Milestone:
Component: Runtime (threads, GC) Version: trunk
Keywords: Cc:


(let ((a t) (b t))

(setf (values (values a b)) (values 1 2)) (list a b))

should return (1 NIL), but returns (1 2).

Looks like this was introduced by modifying original cmucl sources, putting removed parts back does fix it. Attached patch does this.

Attachments (1)

values.diff (738 bytes) - added by stassats 11 years ago.

Download all attachments as: .zip

Change History (2)

Changed 11 years ago by stassats

comment:1 Changed 11 years ago by gb

  • Resolution set to fixed
  • Status changed from new to closed

(In [13103]) Patch from Stas Boukarev (fixes ticket:607).

Note: See TracTickets for help on using tickets.