summaryrefslogtreecommitdiffstats
path: root/tests/017
diff options
context:
space:
mode:
Diffstat (limited to 'tests/017')
-rw-r--r--tests/017/glob-carray.tl2
-rw-r--r--tests/017/glob-zarray.tl2
-rw-r--r--tests/017/realpath.tl8
3 files changed, 6 insertions, 6 deletions
diff --git a/tests/017/glob-carray.tl b/tests/017/glob-carray.tl
index 99660576..7913701b 100644
--- a/tests/017/glob-carray.tl
+++ b/tests/017/glob-carray.tl
@@ -12,7 +12,7 @@
(nil int)
(pathv (carray str))
(nil (array 4 cptr)))))
- ((:cygnal :cygwin)
+ ((:cygnal :cygwin :android)
(deffi-type glob-t (struct glob-t
(pathc size-t)
(nil size-t)
diff --git a/tests/017/glob-zarray.tl b/tests/017/glob-zarray.tl
index b095e45e..e3f6d08b 100644
--- a/tests/017/glob-zarray.tl
+++ b/tests/017/glob-zarray.tl
@@ -12,7 +12,7 @@
(nil int)
(pathv (ptr-out (zarray str)))
(nil (array 4 cptr)))))
- ((:cygnal :cygwin)
+ ((:cygnal :cygwin :android)
(deffi-type glob-t (struct glob-t
(pathc size-t)
(nil size-t)
diff --git a/tests/017/realpath.tl b/tests/017/realpath.tl
index d920825f..5471a1c8 100644
--- a/tests/017/realpath.tl
+++ b/tests/017/realpath.tl
@@ -1,12 +1,12 @@
(load "../common")
+(when (memq (os-symbol) '(:cygwin :solaris :android))
+ (put-string (file-get-string "tests/017/realpath.expected"))
+ (exit 0))
+
(with-dyn-lib (libc)
(deffi realpath-null "realpath" str-d (str str))
(deffi realpath-buf "realpath" str-d (str (ptr-in-d (zarray 8192 char)))))
-(when (memq (os-symbol) '(:cygwin :solaris))
- (put-string (file-get-string "tests/017/realpath.expected"))
- (exit 0))
-
(prinl (realpath-null "/usr/bin" nil))
(prinl (realpath-buf "/usr/bin" (copy "")))