File arc.scm of Package arc

; Load arc libraries and then return to our old working directory.
(define (gogogo)
  (let ((old-cwd (current-directory)))
    (current-directory "/usr/share/arc")
    (load "as.scm")
    (current-directory old-cwd)))

(gogogo)
(tl)