I was creating a script for IRC when I noticed that the find command doesn't
seem to work right from reading the port and parsing the data but does when
reading from the console with the same functions. I am reading in a typical
message string into iput-buffer for example (Port is opening a port to irc):
ircparser: func [/local a b c][
a: parse/all copy input-buffer "!"
sendnick: pick a 1
b: pick a 2
print b
sendmsg: find b ":"
print sendmsg
c: parse copy input-buffer
senduser: pick c 2
sendcmd: pick c 3
sendchan: pick c 4
]
while [true][
wait port
input-buffer: copy first port
if find/part input-buffer ":" 1 [
input-buffer: remove head input-buffer
ircparser
]
_________________________________ Console Windows _______________
NOTICE AUTH :*** Looking up your hostname...
NOTICE AUTH :*** Found your hostname, cached
NOTICE AUTH :*** Checking Ident
NOTICE AUTH :*** No Ident response
none
** Script Error: find expected series argument of type: series port bitset.
** Where: sendmsg: find b ":"
print
________________________________________________________________
Anyone know what the problem is?
Seems to work ok if I recreate the issue from the console.