Changeset 609


Ignore:
Timestamp:
Mar 3, 2004, 9:53:50 PM (15 years ago)
Author:
gb
Message:

fix %MAKE-DISPLACED-ARRAY call

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/ccl/compiler/optimizers.lisp

    r590 r609  
    628628
    629629    `(let ,let-list
    630        (%make-displaced-array ,dims-var ,@call-list) t)))
     630       (%make-displaced-array ,dims-var ,@call-list t))))
    631631
    632632(defun comp-make-uarray (dims keys subtype)
Note: See TracChangeset for help on using the changeset viewer.