From 1067252f091ca438d19929523baaa0f8bf6a51cb Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Wed, 23 Sep 2015 06:41:47 -0700
Subject: statf becomes external.

* sysif.c (statf): Linkage changed to
external. Also, fixed wrong name being passed
down to stat_impl.

* sysif.h (statf): Declaration updated.
---
 sysif.c | 4 ++--
 sysif.h | 1 +
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/sysif.c b/sysif.c
index 68971468..6f6ce7c0 100644
--- a/sysif.c
+++ b/sysif.c
@@ -660,9 +660,9 @@ static val statl(val path)
   return stat_impl(path, w_lstat, lit("lstat"));
 }
 
-static val statf(val stream)
+val statf(val stream)
 {
-  return stat_impl(stream, w_fstat, lit("lstat"));
+  return stat_impl(stream, w_fstat, lit("fstat"));
 }
 
 #if HAVE_PIPE
diff --git a/sysif.h b/sysif.h
index 7b7e8d3f..22e87b89 100644
--- a/sysif.h
+++ b/sysif.h
@@ -34,4 +34,5 @@ extern val atime_s, mtime_s, ctime_s;
 
 val getenv_wrap(val name);
 val statp(val path);
+val statf(val path);
 void sysif_init(void);
-- 
cgit v1.2.3