~ chicken-core (master) 2d3eb52cdcbdc300f06fe46350ae5ed57dda8b86

commit 2d3eb52cdcbdc300f06fe46350ae5ed57dda8b86
Author:     Felix Winkelmann <felix.winkelmann@bevuta.com>
AuthorDate: Wed Sep 16 12:24:39 2026 +0200
Commit:     Felix Winkelmann <felix.winkelmann@bevuta.com>
CommitDate: Wed Sep 16 12:24:39 2026 +0200

    fix source loc in when throwing error

diff --git a/posixunix.scm b/posixunix.scm
index da74f08a..885f2068 100644
--- a/posixunix.scm
+++ b/posixunix.scm
@@ -780,7 +780,7 @@ static int set_file_mtime(C_word filename, C_word atime, C_word mtime)
       (##sys#check-string old 'file-link)
       (##sys#check-string new 'file-link)
       (when (fx< (link old new) 0)
-      (posix-error #:file-error 'hard-link "could not create hard link" old new) ) ) ) )
+        (posix-error #:file-error 'file-link "could not create hard link" old new) ) ) ) )
 
 (define-inline (eagain/ewouldblock? e)
   (or (eq? e _ewouldblock)