- Add dirname() test. Don't have time to create a real regression test

diff --git a/tests/testdirname b/tests/testdirname
new file mode 100644 (file)
index 0000000..0cad9d8
--- /dev/null
+++ b/tests/testdirname
@@ -0,0 +1,16 @@
+<?
+
+       function check_dirname($path)
+       {
+               print "dirname($path) == " . dirname($path) . "\n";
+       }
+       
+       check_dirname("/foo/");
+       check_dirname("/foo");
+       check_dirname("/foo/bar");
+       check_dirname("d:\\foo\\bar.inc");
+       check_dirname("/");
+       check_dirname(".../foo");
+       check_dirname("./foo");
+       check_dirname("foobar///");
+       check_dirname("c:\foo");
\ No newline at end of file