summaryrefslogtreecommitdiff
path: root/src/granger/test/test-os-access.lua
diff options
context:
space:
mode:
Diffstat (limited to 'src/granger/test/test-os-access.lua')
-rw-r--r--src/granger/test/test-os-access.lua17
1 files changed, 17 insertions, 0 deletions
diff --git a/src/granger/test/test-os-access.lua b/src/granger/test/test-os-access.lua
new file mode 100644
index 0000000..60740c4
--- /dev/null
+++ b/src/granger/test/test-os-access.lua
@@ -0,0 +1,17 @@
+--
+-- test-os-access.lua
+-- test case for os.access()
+-- Copyright (c) 2016 Jeff Kent <jeff@jkent.net>
+--
+
+print "os.access() test begin"
+
+if not os.is("windows") then
+ p = os.tmpname()
+ os.execute("touch " .. p .. "; chmod 400 " .. p)
+ assert(os.access(p, "r") == true)
+ assert(os.access(p, "w") == false)
+ os.execute("rm -f " .. p)
+end
+
+print "os.access() test end"