This is what I'm currently doing: (define (gogogo)
(let ((old-cwd (current-directory)))
(current-directory "/usr/share/arc")
(load "as.scm")
(current-directory old-cwd))) (gogogo)
(tl) All of that goes into /usr/share/arc/arc.scm. The rest of the contents (sans the copyright file) are also going into /usr/share/arc too. /usr/bin/arc is a shell script that just runs
mzscheme -f /usr/share/arc/arc.scm And, yes, I'm installing stuff to /usr with proper package management. |