Changeset 14551

Timestamp:

Jan 3, 2011, 9:43:25 PM (14 years ago)

Author:

Gary Byers

Message:

No /tmp on Android.

File:

• trunk/source/level-1/linux-files.lisp (modified) (1 diff)

trunk/source/level-1/linux-files.lisp

@@ -1164 +1164 @@
        (ecase direction
          (:input
-          (with-cstrs ((template "/tmp/lisp-tempXXXXXX"))
+          (with-cstrs ((template #-android-target "/tmp/lisp-tempXXXXXX"
+                                 #+android-target "/data/local/tmp/lisp-tempXXXXXX"))
             (let* ((fd (#_mkstemp template)))
               (if (< fd 0)