(define-module (utils)) (define-public debug-print (lambda* (#:key (output-port (current-output-port)) . msgs) (let loop ([remaining msgs]) (cond [(null? remaining) (display "")] [else (display (simple-format #f "~a\n" (car remaining)) output-port) (loop (cdr remaining))]))))
