(with-working-directory-pathname "../tms"
  (lambda () (load "load")))

(load "construct")
(load "interface")
(load "cc")
(load "wire")