~ chicken-core (chicken-5) 35bba6c191f6cb2b4e73501c2598d3978843f660


commit 35bba6c191f6cb2b4e73501c2598d3978843f660
Author:     Evan Hanson <evhan@foldling.org>
AuthorDate: Thu Jun 8 18:56:28 2017 +1200
Commit:     Evan Hanson <evhan@foldling.org>
CommitDate: Thu Jun 8 20:36:35 2017 +1200

    Don't try to use lstat in posixwin.scm (since there's no lstat on Windows)
    
    In the definition of "set_file_mtime" on Windows we need to use stat(2)
    instead, since there is no lstat(2) available on that platform. This is
    a minor difference from posixunix.scm.

diff --git a/posixwin.scm b/posixwin.scm
index 5872a481..9d4b381c 100644
--- a/posixwin.scm
+++ b/posixwin.scm
@@ -640,9 +640,9 @@ static int set_file_mtime(char *filename, C_word atime, C_word mtime)
   struct stat sb;
   struct _utimbuf tb;
 
-  /* Only lstat if needed */
+  /* Only stat if needed */
   if (atime == C_SCHEME_FALSE || mtime == C_SCHEME_FALSE) {
-    if (lstat(filename, &sb) == -1) return -1;
+    if (stat(filename, &sb) == -1) return -1;
   }
 
   if (atime == C_SCHEME_FALSE) {
Trap