Changeset 10443


Ignore:
Timestamp:
Aug 11, 2008, 9:49:38 PM (11 years ago)
Author:
rme
Message:

PRINT-OBJECT method for EXTERNAL-ENTRY-POINT: x8632
conditionalization.

File:
1 edited

Legend:

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

    r10427 r10443  
    14291429                                        (logand #xffffffffffffffff (ash addr 2))
    14301430                                        (%ptr-to-int addr))))
     1431        #+x8632-target
     1432        (format out " (#x~8,'0x) " addr)
    14311433        #+x8664-target
    14321434        (format out " (#x~16,'0x) " addr)
Note: See TracChangeset for help on using the changeset viewer.