13 lines
329 B
Common Lisp
13 lines
329 B
Common Lisp
(in-package :common-lisp)
|
|
|
|
(defparameter *src-root* "/home/dan/src/my/gobot/")
|
|
|
|
(defparameter *src-files* '("packages" "macro-utils" "netpipe" "board" "liberty" "shape" "liberty-shape" "gobot" "gtp"))
|
|
|
|
(defun load-files ()
|
|
(loop for file in *src-files* do (load (concatenate 'string *src-root* file ".fasl"))))
|
|
|
|
|
|
(load-files)
|
|
|