summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat (limited to 'dev-lisp/sbcl/files/0.9.4/install-clc.lisp')
-rw-r--r--dev-lisp/sbcl/files/0.9.4/install-clc.lisp34
1 files changed, 0 insertions, 34 deletions
diff --git a/dev-lisp/sbcl/files/0.9.4/install-clc.lisp b/dev-lisp/sbcl/files/0.9.4/install-clc.lisp
deleted file mode 100644
index c8e0a93a729f..000000000000
--- a/dev-lisp/sbcl/files/0.9.4/install-clc.lisp
+++ /dev/null
@@ -1,34 +0,0 @@
-;;; -*- Mode: LISP; Package: CL-USER -*-
-;;;
-;;; Copyright (C) Peter Van Eynde 2001 and Kevin Rosenberg 2002-2003
-;;;
-;;; License: LGPL v2
-;;;
-(in-package "COMMON-LISP-USER")
-
-(handler-case
- (load "/usr/share/common-lisp/source/common-lisp-controller/common-lisp-controller.lisp")
- (error (e)
- (format t "~%Error during load of common-lisp-controller.lisp: ~A~%" e)
- (sb-unix:unix-exit 1)))
-
-(handler-case
- (common-lisp-controller:init-common-lisp-controller-v4 "sbcl")
- (error (e)
- (format t "~%Error running init-common-lisp-controller-v4: ~A~%" e)
- (sb-unix:unix-exit 1)))
-
-(when (probe-file #p"/etc/lisp.config")
- (load #p"/etc/lisp.config"))
-
-(setf (logical-pathname-translations "SYS")
- '(("SYS:SRC;**;*.*.*"
- #P"/usr/share/sbcl/src/**/*.*")
- ("SYS:CONTRIB;**;*.*.*"
- #P"/usr/share/sbcl/**/*.*")))
-
-(ignore-errors
- (format t "~%Saving to sbcl-new.core...")
- (sb-ext:gc :full t)
- (sb-ext:save-lisp-and-die "sbcl-new.core"
- :purify t))