@@ -13,11 +13,11 @@ ;; GNU General Public License for more details. ;; ;; You should have received a copy of the GNU General Public License ;; along with Megatest. If not, see . ;; -(use srfi-69) +(import srfi-69) (define (runs:queue-next-hed tal reg n regful) (if regful (car reg) (car tal))) @@ -36,11 +36,11 @@ (cdr reg) (if (eq? (length tal) 1) '() reg))) -(use trace) +(import trace) (trace runs:queue-next-hed runs:queue-next-tal runs:queue-next-reg)