diff options
| -rw-r--r-- | init.lisp | 47 |
1 files changed, 24 insertions, 23 deletions
@@ -19,37 +19,38 @@ (in-package #:common-lisp) (%fset 'test (compile '(sys::%lambda args))) -(ns-log (test)) +(ns-log (test 'a 'b 'c)) (%fset 'test (compile '(sys::%lambda args args))) +(ns-log (test 1 2 3)) -(load "util.lisp") -(load "defun-0.lisp") -(load "list-functions.lisp") -(load "destructuring-bind.lisp") -(load "defun-1.lisp") -(load "list-functions.lisp") -(load "reader.lisp") -(load "sharpsign.lisp") -(load "control-flow.lisp") -(load "types.lisp") -(load "numbers.lisp") -(load "list-functions-2.lisp") -(load "ffi.lisp") +;; (load "util.lisp") +;; (load "defun-0.lisp") +;; (load "list-functions.lisp") +;; (load "destructuring-bind.lisp") +;; (load "defun-1.lisp") +;; (load "list-functions.lisp") +;; (load "reader.lisp") +;; (load "sharpsign.lisp") +;; (load "control-flow.lisp") +;; (load "types.lisp") +;; (load "numbers.lisp") +;; (load "list-functions-2.lisp") +;; (load "ffi.lisp") -(load "Sacla/share.lisp") -(load "Sacla/do.lisp") +;; (load "Sacla/share.lisp") +;; (load "Sacla/do.lisp") -(load "evaluation.lisp") +;; (load "evaluation.lisp") -(load "Sacla/share-2.lisp") +;; (load "Sacla/share-2.lisp") -(load "Sacla/data-and-control.lisp") +;; (load "Sacla/data-and-control.lisp") -(load "array.lisp") -(load "Sacla/array.lisp") +;; (load "array.lisp") +;; (load "Sacla/array.lisp") -(load "string.lisp") -(load "package.lisp") +;; (load "string.lisp") +;; (load "package.lisp") (setq *system-initialised-p* t) |