(define JAM-DIR "/home/comp210/Projects/Jam/")

(define get
  (lambda (filename)
    (load (string-append JAM-DIR filename))))

(get "jam-global.ss")
(get "jam-mem.ss")
(get "jam-reg.ss")
(get "jam-pc.ss")
(get "jam-cpu.ss")
(get "jam-sp-ins.ss")
(get "jam-reg-aux.ss")
(get "jam-reg-ins.ss")
(get "jam-im-ins.ss")
(get "jam-bios.ss")
(get "jam-bios2.ss")
(get "jam-aux.ss")

(walk)