Work at SourceForge, help us to make it a better place! We have an immediate need for a Support Technician in our San Francisco or Denver office.

Close

[0dd6e5]: src / clos / load.lsp.in Maximize Restore History

Download this file

load.lsp.in    44 lines (40 with data), 1.1 kB

;;; @configure_input@

(defvar +clos-module-files+
'("src:clos;package.lsp"
  "src:clos;cpl.lsp"
  "src:clos;std-slot-value.lsp"
  "src:clos;slot.lsp"
  "src:clos;boot.lsp"
  "src:clos;kernel.lsp"
  "src:clos;method.lsp"
  "src:clos;combin.lsp"
  "src:clos;std-accessors.lsp"
  "src:clos;defclass.lsp"
  "src:clos;slotvalue.lsp"
  "src:clos;standard.lsp"
  "src:clos;builtin.lsp"
  "src:clos;change.lsp"
  "src:clos;stdmethod.lsp"
  "src:clos;generic.lsp"
  "src:clos;fixup.lsp"
  "src:clos;conditions.lsp"
  "src:clos;print.lsp"
  #+clos-streams
  "src:clos;streams.lsp"
  #+cmu-format
  "src:lsp;pprint.lsp"
  "src:lsp;describe.lsp" ; Depends on conditions.lsp
  "src:clos;inspect.lsp" ; Depends on describe.lsp
  "src:lsp;top.lsp" ; Depends on conditions.lsp
  "src:lsp;process.lsp" ; Depends on defclass
  #+unicode
  "src:lsp;unicode.lsp" ; Depends on conditions.lsp
  "ext:bytecmp;bytecmp.lsp"
  ))

(mapc #'(lambda (x)
         (terpri)
         (princ ";;; Loading ")
         (princ x)
         (load x :verbose nil))
 +clos-module-files+)

(setf +clos-module-files+ (remove "src:clos;macros.lsp" +clos-module-files+ :test #'equalp))