On Sat, 12 Oct 2002 20:18:11 +1000 "Allen Kamp" <[EMAIL PROTECTED]> wrote:
Hi Allen,
Do you have something like norton anti-virus running on the same machine? It
No I don't have NAV running. I tried retrieving this message on 3 different PCs with the same result. This suggests that the problem is with Rebol.
As an aside, I notice that in the Rebol POP code, there is this function:
read-message: func [
"Read a message from the POP server"
port n [integer!]
/local buf line
][
insert port/sub-port reform [
"RETR" system/words/pick port/locals/msg-nums port/state/index + n]
net-utils/confirm port/sub-port write-check
read-til-dot port buf: make string! 1024 ; guess at size
]
The buffer is created each time a message is read. Since the message size is already known within locals/sizes, presumably this could be sped up a little by allocating the exact amount of memory instead of 1024 each time.
read-til-dot: func [port buf][
while [(line: system/words/pick port/sub-port 1) <> "."] [
insert tail buf line
insert tail buf newline
]
buf
]
This function reads from the POP port until it retrieves only a ".". I was thinking of returning the buffer if the expected number of chars are retrieved as an additional check.
I'm gonna have to wait till I hit another message I can't download to test this out. I had another one like this last week, and I just deleted it from the pop server so I could download all the other messages. For reference, this troublesome message was 16674 octets long.
--
Graham Chiu
--
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the subject, without the quotes.
