archive/src/minsys.lisp

   1 (require "SLOOP")
   2 (or (find-package "MAKE") (make-package "MAKE" :use '(lisp "SLOOP")))
   3 (require "MAKE")
   4 (use-package "MAKE")
   5
   6 (or (member :cl *features*) (setq *features* (cons :cl *features*)))
   7
   8 (setf (get :minima :source-path) "foo.lisp")
   9 (setf (get :maxima :object-path)
  10     (setf (get :minima :object-path) "foo.o"))
  11 (require "MAXIMA" "maxima-package.lisp")
  12
  13
  14
  15 (setf (get :minima :files)
  16       '(clmacs
  17         commac
  18
  19         compat
  20         maxmac
  21         displa
  22         mlisp
  23         simp
  24         serror
  25         mformt
  26         trigi  ;;for various consts and props.
  27         nforma
  28         runtim
  29         utils
  30         merror
  31         macsys
  32         suprv1
  33         displa
  34         nparse
  35         (:lisp  vals)
  36         inmis
  37         opers
  38
  39         comm
  40
  41         mutils
  42         db
  43
  44         compar
  45         ))
  46
  47 (require "autol" "autol.lisp")