Changeset 16171


Ignore:
Timestamp:
Aug 27, 2014, 5:38:17 PM (5 years ago)
Author:
gb
Message:

Canonicalize the type specifier when calling COERCE-TO-COMPLEX.
Fixes ticket:1218 in the trunk.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/lib/sequences.lisp

    r16085 r16171  
    896896                   (float object 1.0s0))                               
    897897                  ((csubtypep type (specifier-type 'complex))
    898                    (coerce-to-complex object  output-type-spec)))))
     898                   (coerce-to-complex object  (type-specifier type))))))
    899899           (unless res                  ;(and res (%typep res type))
    900900             (error "~S can't be coerced to type ~S." object output-type-spec))
Note: See TracChangeset for help on using the changeset viewer.