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