fstat: turn into true alias.

We can get rid of fstat_wrap entirely and make
the lstat and fstat function bindings point to the same
function.

* parser.c (load_rcfile): Call stat_wrap instead of
fstat_wrap.

* sysif.c (stat_wrap): Static function becomes extern. Useless
forward declaration removed.
(fstat_wrap): Static function removed.
(sysif_init): Bind fstat and lstat to the same function
object.

* sysif.h (fstat_wrap): Declaration removed.
(stat_wrap): Declaration added.

1 files changed, 1 insertions, 1 deletions

diff --git a/parser.c b/parser.c
index 7c40b5d7..6f21f62e 100644
--- a/parser.c
+++ b/parser.c
@@ -798,7 +798,7 @@ static void load_rcfile(val name)
   open_txr_file(name, &lisp_p, &resolved_name, &stream);
 
   if (stream) {
-    if (!funcall1(path_private_to_me_p, fstat_wrap(stream))) {
+    if (!funcall1(path_private_to_me_p, stat_wrap(stream))) {
       format(std_output,
              lit("** possible security problem: ~a is writable to others\n"),
              name, nao);