Changeset 13966

Timestamp:

06/15/12 14:41:32 (10 years ago)

Author:

Mark Evenson

Message:

examples/misc/dotabclrc: More contemporary examples.

Example for how to possibly dynamically load and install Quicklisp
(q.v.) from an HTTP connection.

Example of the nest of CL:REQUIRE statements needed to bring up the
Maven Aether connector contained in ABCL-ASDF.

File:

• trunk/abcl/examples/misc/dotabclrc (modified) (1 diff)

trunk/abcl/examples/misc/dotabclrc

@@ -1 +1 @@
 ;;; -*- Mode: Lisp -*-
 
-;;; See also:
-;;;   .clinit.cl         (Allegro)
-;;;   .cmucl-init.lisp   (CMUCL)
-;;;   .sbclrc            (SBCL)
-;;;   .clisprc.lisp      (CLISP)
-;;;   .lispworks         (LispWorks)
+;;; Possible codas for inclusion in the Armed Bear startup file #p"~/.abclrc"
+
+#-quicklisp
+(let ((quicklisp-local  #P"~/quicklisp/setup.lisp")
+      (quicklisp-remote #p"http://beta.quicklisp.org/quiclisp.lisp"))
+  (unless (probe-file quicklisp-local)
+    (unless (probe-file quicklisp-remote)     ;;; XXX possibly search for a proxy÷
+      (load quicklisp-remote)))
+  (when (probe-file quicklisp-local)
+    (load quicklisp-local)))
+
+(require :asdf)
+(require :abcl-contrib)
+(require :abcl-asdf)
+(setf abcl-asdf::*maven-http-proxy* "http://localhost:3128/")
 
 ;;; Customize the procedure used by CL:DISASSEMBLE