Opened 11 years ago

Closed 11 years ago

#369 closed defect (fixed)

SETF THE loses type info

Reported by: gz Owned by: gb
Priority: normal Milestone:
Component: Performance Version:
Keywords: Cc:

Description

? (pprint (macroexpand '(setf (the double-float (aref a i)) val)))

(LET* ((#:G443 A) (#:G444 I))

(DECLARE (IGNORABLE #:G443 #:G444)) (MULTIPLE-VALUE-BIND (#:G445)

VAL

(LET ((#:G442 #:G445)) (ASET #:G443 #:G444 #:G442))))

Change History (1)

comment:1 Changed 11 years ago by rme

  • Resolution set to fixed
  • Status changed from new to closed
Note: See TracTickets for help on using tickets.