Commit f5e5be8f authored by simonmar's avatar simonmar

[project @ 2000-08-24 10:27:44 by simonmar]

Add a test for Directory.getPermissions.
parent 48a3adaf
import Directory
main = do
p <- getPermissions "."
print p
p <- getPermissions "io034.hs"
print p
p <- getPermissions "io034.bin"
print p
Permissions{readable=True,writable=True,executable=False,searchable=True}
Permissions{readable=True,writable=True,executable=False,searchable=False}
Permissions{readable=True,writable=True,executable=True,searchable=False}
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment