Changeset 10108


Ignore:
Timestamp:
Jul 18, 2008, 8:59:28 PM (11 years ago)
Author:
gb
Message:

Foreign-type-ordinal stuff for Solaris %GET-IP-INTERFACES.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/lib/foreign-types.lisp

    r10054 r10108  
    17181718      (canonicalize-foreign-type-ordinal '(:array :int 2))
    17191719      (canonicalize-foreign-type-ordinal '(:array (:struct :pollfd) 1))
    1720       (canonicalize-foreign-type-ordinal '(:struct :dirent)))))
     1720      (canonicalize-foreign-type-ordinal '(:struct :dirent))
     1721      (canonicalize-foreign-type-ordinal #+solaris-target '(:struct :flock) #-solaris-target nil)
     1722      (canonicalize-foreign-type-ordinal #+solaris-target '(:struct :lifnum) #-solaris-target nil)
     1723      (canonicalize-foreign-type-ordinal #+solaris-target '(:struct :lifconf) #-solaris-target nil)
     1724      )))
    17211725
    17221726(defun install-standard-foreign-types (ftd)
Note: See TracChangeset for help on using the changeset viewer.