Changeset 408


Ignore:
Timestamp:
Jan 26, 2004, 4:04:58 AM (21 years ago)
Author:
Gary Byers
Message:

Initialize ordinal->type vector elements to NIL.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/ccl/lib/foreign-types.lisp

    r403 r408  
    5858  (attributes #+darwinppc-target '(:signed-char :struct-by-value :prepend-underscores)
    5959              #+linuxppc-target ())
    60   (ordinal->type (make-array 100 :fill-pointer 1)))
     60  (ordinal->type (make-array 100 :fill-pointer 1 :initial-element nil)))
    6161
    6262(defvar *host-ftd* (make-ftd))
Note: See TracChangeset for help on using the changeset viewer.