ghc/tests/io/should_run/io034.hs

   1 import Directory
   2
   3 main = do
   4   p <- getPermissions "."
   5   print p
   6   p <- getPermissions "io034.hs"
   7   print p
   8   p <- getPermissions "io034.bin"
   9   print p