add cl-repl config

.replrc

@@ -0,0 +1,22 @@
+;;; vim: ft=commonlisp
+;; Config file for cl-repl (yes, WTF)
+
+(defpackage :repl-user
+  (:use :cl :cl-repl)
+  (:import-from cl-repl *magic-commands*))
+(in-package :repl-user)
+
+(define-magic swank (&rest args)
+  (declare (ignore args))
+  "Start a SWANK server."
+  (ql:quickload :swank)
+  ;; Needs to be an eval since swank package isn't loaded at compile-time 
+  (eval "(swank:create-server :dont-close t)"))
+
+;; Remove bullshit commands
+(delete-if
+ (lambda (cmd)
+   (let ((name (car cmd)))
+     (or (string= name "%python")
+         (string= name "%perl"))))
+ *magic-commands*)

confgen.lua

@@ -5,6 +5,7 @@ cg.addPath ".cargo"
 cg.addPath "etc"
 
 cg.addFile ".Xresources.cgt"
+cg.addFile ".replrc"
 
 -- Recursively merge 2 tables
 local function merge(a, b)