1 ;;; .sbclrc --- sbcl init file -*- mode: common-lisp; -*- 2 (in-package :cl-user) 3 (setq *debug-beginner-help-p* nil 4 *print-case* :downcase 5 *print-level* 50 6 *print-length* 200) 7 8 #-quicklisp 9 (let ((quicklisp-init (merge-pathnames "quicklisp/setup.lisp" (user-homedir-pathname)))) 10 (when (probe-file quicklisp-init) 11 (load quicklisp-init))) 12 13 (require :sb-aclrepl)