Ticket #49132: patch-contrib-sb-posix-posix-tests.lisp.diff

File patch-contrib-sb-posix-posix-tests.lisp.diff, 443 bytes (added by aqua_dabbler@…, 8 years ago)

A patch for sb-posix issue

  • contrib/sb-posix/posix-tests.lisp

    old new  
    536536  nil)
    537537
    538538(deftest readdir.1
    539   (let ((dir (sb-posix:opendir "/")))
     539  (let ((dir (sb-posix:opendir "/"))
     540        (sb-alien::*default-c-string-external-format* :latin-1))
    540541    (unwind-protect
    541542       (block dir-loop
    542543         (loop for dirent = (sb-posix:readdir dir)