Ignore:
Timestamp:
10/26/09 22:41:29 (12 years ago)
Author:
ehuelsmann
Message:

More efficient startup: only autoload pprint[.lisp] if necessary.

Location:
trunk/abcl/src/org/armedbear/lisp
Files:
3 edited

Legend:

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

    r12229 r12230  
    403403(export '(precompile-form precompile))
    404404(autoload '(precompile-form) "precompiler")
     405
     406
     407;; items in the XP package (pprint.lisp)
     408
     409(in-package "XP")
     410
     411(sys::autoload '(xp-structure-p write-string++ output-pretty-object
     412                 pprint-logical-block+ maybe-initiate-xp-printing
     413                 check-block-abbreviation start-block end-block
     414                 pprint-pop-check+) "pprint")
     415
     416(sys::autoload-macro '(pprint-logical-block+ pprint-pop+) "pprint")
     417
     418(in-package "COMMON-LISP")
     419
     420(sys::autoload '(write print prin1 princ pprint write-to-string
     421            prin1-to-string princ-to-string write-char
     422            write-string write-line terpri finish-output
     423            fresh-line force-output clear-output
     424            pprint-newline pprint-indent pprint-tab pprint-linear
     425            pprint-fill pprint-tabular) "pprint")
     426
     427(sys::autoload-macro '(pprint-logical-block) "pprint")
     428
  • trunk/abcl/src/org/armedbear/lisp/boot.lisp

    r12229 r12230  
    177177(load-system-file "print")
    178178(load-system-file "pprint-dispatch")
    179 (load-system-file "pprint")
    180179(load-system-file "defsetf")
    181180(load-system-file "package")
  • trunk/abcl/src/org/armedbear/lisp/pprint.lisp

    r12013 r12230  
    13611361         (sys:output-object object stream))))
    13621362
    1363 (provide 'pprint)
     1363(provide "PPRINT")
    13641364
    13651365;------------------------------------------------------------------------
Note: See TracChangeset for help on using the changeset viewer.