mkredcsl.sl 691 B

123456789101112131415161718192021222324252627
  1. % Build checkpointed version of REDUCE.
  2. % (setq !*backtrace t) % In case anything goes wrong.
  3. (setq prolog_file 'cslprolo)
  4. (setq rend_file 'cslrend) % CSL specific code.
  5. (load!-module 'compat)
  6. (setq !*comp nil)
  7. (load!-module 'module) % Definition of load_package, etc.
  8. (load!-module 'patches)
  9. (load!-module prolog_file) % CSL specific code.
  10. (setq loaded!-packages!* (list 'compat 'user prolog_file))
  11. (rdf "$reduce/packages/support/mkred2.sl")
  12. (cond ((equal (getenv "MACHINE") "win32")
  13. (setq plotdir!* (concat (getenv "reduce") "\wutil\win32"))))
  14. (checkpoint 'begin (bldmsg "%w, %w ..." version!* date!*))