Hi peeps !
I got a serious problem here :-)
..........................................................
main = withSocketsDo (
do
socket <- listenOn (PortNumber 9900)
print "Server online"
loop socket)
loop socket =
do
(handling, host, port) <- accept socket
forkIO (client handling)
loop socket
client handling = do
anfrage <- hGetLine handling -- HERE !
let anfrage2 = umwandlungder anfrage
ergebnis <- resultOrError (proofEngine anfrage2)
let endergebnis = teste ergebnis
hPutStr handling endergebnis
hClose handling
............................................................................
Iīm using hGetLine at the mom, but I need to use hGetChar for further
editing in this prog. Since I ainīt really into haskell, I mailed you.
This Prog is supposed to get a String of following form:
"STRING 3 a&b" or "STRING 5 a & b"
So, I suggest when reading the chars in loop, I need a Escape
Character...How would you solve this ?
Thx, Tobe
--
Best regards,
Tobe mailto:[EMAIL PROTECTED]
_______________________________________________
Haskell mailing list
Haskell@haskell.org
http://www.haskell.org/mailman/listinfo/haskell
