[project @ 1996-07-25 21:02:03 by partain]
[nofib.git] / GHC_ONLY / io009 / Main.hs
1 import Directory (getDirectoryContents)
2 import QSort (sort)
3
4 main =
5 getDirectoryContents "." >>= \ names ->
6 print (sort names)