[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: uniform-array-read!

From: Alan Bram
Subject: Re: uniform-array-read!
Date: Thu, 02 Feb 2006 16:22:58 -0800 (PST)


I've been following along on this topic only half-absentmindedly, so I
apologize if I missed something.  But, just thought it might be a
useful data point to know:

Both of the following variants seem to be working just fine for me:

| (define read-network-byte
|   (lambda (port)
|     (let ((v (make-uniform-vector 1 #\nul)))
|       (uniform-vector-read! v port)
|       (uniform-vector-ref v 0))))
| (define read-network-byte
|   (lambda (port)
|     (let ((v (make-uniform-array #\nul 1)))
|       (uniform-array-read! v port)
|       (uniform-vector-ref v 0))))

Guile version 1.6.7 on Debian Linux i386.

 - arb

reply via email to

[Prev in Thread] Current Thread [Next in Thread]