Changeset 13156


Ignore:
Timestamp:
Nov 1, 2009, 4:31:46 PM (10 years ago)
Author:
gz
Message:

Merge r13151 (the/values fix)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/working-0711/ccl/compiler/nx1.lisp

    r13070 r13156  
    3535             (if (typep ctype 'function-ctype)
    3636               'function
    37                (nx-target-type (type-specifier ctype))))))
     37               (if (typep ctype 'values-ctype)
     38                 '*
     39                 (nx-target-type (type-specifier ctype)))))))
    3840    (let* ((typespec (typespec-for-the typespec))
    3941           (*nx-form-type* typespec)
Note: See TracChangeset for help on using the changeset viewer.