1 files changed, 63 insertions, 0 deletions
diff --git a/common/.sbclrc b/common/.sbclrc
new file mode 100644
index 0000000..7c809b2
--- /dev/null
+++ b/common/.sbclrc
@@ -0,0 +1,63 @@
+;; -*- mode: lisp -*-
+
+(in-package :cl-user)
+
+#-quicklisp
+(let ((quicklisp-init (merge-pathnames "src/lisp/quicklisp/setup.lisp"
+                                       (user-homedir-pathname))))
+  (when (probe-file quicklisp-init)
+    (load quicklisp-init)))
+
+(defparameter cl-user::*cl*-dependencies*
+  '(;; Language extensions
+    :closer-mop
+    :trivial-cltl2
+    :defstar
+    :defclass-std
+    :named-readtables
+    :trivia
+    :anaphora
+    :fn
+
+    ;; Utilites
+    :alexandria
+    :serapeum
+    :uiop
+    :cl-ppcre
+    :split-sequence
+    :trivial-types
+    :parse-number))
+
+(defparameter cl-user::*cl*-used-packages*
+  '(:closer-common-lisp
+    :defstar
+    :fn
+    :defclass-std
+    :named-readtables))
+
+(defparameter cl-user::*cl*-imported-packages*
+  '(:alexandria-2
+    :serapeum
+    :uiop
+    :trivia
+    :anaphora
+    :ppcre
+    :trivial-types
+    :parse-number))
+
+(when (asdf:find-system :clstar nil)
+  (asdf:load-system :clstar))
+
+#+cl*
+(in-package :cl*-user)
+#+cl*
+(toggle-pretty-print-hash-table t)
+#+cl*
+(setf *language-extensions*
+      (dict :april '(:april :april)
+            :apl   '(:april :april)
+            :json '(:shasht nil)
+            :http '((:dexador :quri) nil)
+            :imm '((:modf :fset) nil)
+            :cli '((:clingon :clesh) (:clingon :clesh))
+            :series '(:series :series)))