getServicePortNumber is broken in ghc-2.08:

------------------------------------------------------------
import System(getArgs)
import BSD(getServicePortNumber)

main = do ~[portName] <- getArgs
          portNumber <- getServicePortNumber portName
          print portNumber
------------------------------------------------------------

Short transcript:

panne> a.out echo
1792
panne> a.out nntp
30464

But echo is port no. 7 and nntp 199...   :-(

-- 
Sven Panne                                        Tel.: +49/89/2178-2235
LMU, Institut fuer Informatik                     FAX : +49/89/2178-2211
LFE Programmier- und Modellierungssprachen              Oettingenstr. 67
mailto:[EMAIL PROTECTED]            D-80538 Muenchen
http://www.pms.informatik.uni-muenchen.de/mitarbeiter/panne

Reply via email to