Read n bytes

[Sam Phillips]

Hi, 

I'm slightly new to guile/scheme.  I've been using it heavily for about
the past month.  

Currently I'm trying find (or write) a routine that will read n bytes
from a port.  My current failed attempt is

(define (read-num-chars port len)
    (let ((ret ""))
        (do ((i len (- len 1)))
            ((eq? 0 i) ret)
            (set! ret (string-append ret (list->string (list (read-char 
port)))))
        )
    )
)

I'm sure there's an easier way to do this, but with my current knowledge
of scheme I can't uncover it.

TIA
Sam

-- 
Sam Phillips <address@hidden>                http://www.dasbistro.com
Reno                                                              Nevada