Changeset 14072


Ignore:
Timestamp:
08/12/12 13:25:58 (8 years ago)
Author:
ehuelsmann
Message:

Make sure the PRINT-OBJECT generic function is loaded
when defining methods for it.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/abcl/src/org/armedbear/lisp/defstruct.lisp

    r14014 r14072  
    670670       ,@(define-access-functions)
    671671       ,@(define-copier)
     672       ,@(when (or *dd-print-function* *dd-print-object*)
     673               `((require "PRINT-OBJECT")))
    672674       ,@(define-print-function)
    673675       ',*dd-name*)))
Note: See TracChangeset for help on using the changeset viewer.