chiark / gitweb /
Work in progress.
[jlisp] / run.lisp
1 ;;; -*-lisp-*-
2
3 ;;; Driver for the system.
4
5 (dolist (file '("jj" "swing" "queue" "weak" "dep" "dep-ui"))
6   (sys:load-system-file file))
7
8 (use-package '(#:dep #:dep-ui))
9
10 (add-reason)
11 (dolist (arg *command-line-args*)
12   (load arg))
13 (drop-reason)