Changeset 10942 for trunk/source/library


Ignore:
Timestamp:
Oct 2, 2008, 6:43:48 PM (11 years ago)
Author:
gz
Message:

Propagate r10938:r10941 (duplicate definition warnings) to trunk

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/library/lispequ.lisp

    r10731 r10942  
    272272(def-accessors (logical-pathname) %svref
    273273  ()                                    ; 'logical-pathname
    274   %pathname-directory
    275   %pathname-name
    276   %pathname-type 
     274  nil                                   ; %pathname-directory
     275  nil                                   ; %pathname-name
     276  nil                                   ; %pathname-type 
    277277  %logical-pathname-host
    278278  %logical-pathname-version)
     
    14051405  )
    14061406
     1407;;; MacOS toolbox routines were once written mostly in Pascal, so some
     1408;;; code still refers to callbacks from foreign code as "pascal-callable
     1409;;; functions".
     1410
     1411; %Pascal-Functions% Entry
     1412(def-accessor-macros %svref
     1413  pfe.routine-descriptor
     1414  pfe.proc-info
     1415  pfe.lisp-function
     1416  pfe.sym
     1417  pfe.without-interrupts
     1418  pfe.trace-p)
     1419
     1420(defmacro %cons-pfe (routine-descriptor proc-info lisp-function sym without-interrupts)
     1421  `(vector ,routine-descriptor ,proc-info ,lisp-function ,sym ,without-interrupts nil))
     1422
     1423
    14071424(def-accessors %svref
    14081425    ()                                  ; 'xp-structure
Note: See TracChangeset for help on using the changeset viewer.