hg.stevelosh.com > dotfiles

#-quicklisp
(let ((quicklisp-init (merge-pathnames ".quicklisp/setup.lisp" (user-homedir-pathname))))
  (when (probe-file quicklisp-init)
    (load quicklisp-init)))

(defun :ls (package)
  (do-external-symbols (s package)
    (print s)))

(setf *print-pretty* t
      *print-escape* t
      *print-right-margin* 100
      *print-miser-width* nil
      *print-length* 1000
      *print-level* 250)
author	Steve Losh <steve@stevelosh.com>
date	Wed, 02 Oct 2019 12:18:52 -0400
parents	7d4add588cc3
children	9ab8e17039d6