Trailing-Edge
-
PDP-10 Archives
-
clisp
-
clisp/upsala/clisp.init
There are no other files named clisp.init in the archive.
;;; -*- Mode:CLISP; Package:USER -*-
;;; Global init file for Common Lisp for Uppsala University
(in-package 'user)
(format t "~&Please mail bugs and suggestions to BUG-CLISP@~a"
(machine-instance))
;;; Print a small message when files are loaded
(setq *load-verbose* t)
;;; Set up *Module-File-Translations*, so we'll find files easier
;;; The JSYS package
(push '("JSYS" "Clisp:JSYS-Load") *module-file-translations*)
(push '("JSYS-TABLE" "CLisp:JSYS-Table") *module-file-translations*)
(push '("OPCODES" "Clisp:KL10-Opcodes") *module-file-translations*)
;;; Extensions to LAP (used by JSYS)
(push '("LAP2" "Clisp:Lap2.Lap") *module-file-translations*)
;;; Flavors!!
(push '("FLAVORS" "Flavors:Load-Flavors") *module-file-translations*)
(when (fboundp 'news)
(format t "~&Use (NEWS) to see what's new in this version."))