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