Changeset 10760


Ignore:
Timestamp:
Sep 15, 2008, 11:23:16 PM (11 years ago)
Author:
gb
Message:

Pass the ftd to DO-INTERFACE-DIRS in LOAD-RECORD.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/lib/db-io.lisp

    r10639 r10760  
    18661866                      (info-foreign-type-union name ftd)))
    18671867         (name (unescape-foreign-name name)))
    1868     (do-interface-dirs (d)
     1868    (do-interface-dirs (d ftd)
    18691869      (let* ((r (%load-foreign-record (db-records d) name ftd already)))
    18701870        (when r (return r))))))
Note: See TracChangeset for help on using the changeset viewer.