(use files posix)

(define (load&time ext)
  (let ((file (make-pathname (repository-path) ext "so")))
    (print file ": " (file-size file))
    (time (load file))))

(load&time "bind")