mirror of
https://github.com/Stichting-MINIX-Research-Foundation/pkgsrc-ng.git
synced 2025-09-08 20:07:50 -04:00
59 lines
1.5 KiB
Plaintext
59 lines
1.5 KiB
Plaintext
$NetBSD: patch-ah,v 1.5 2013/04/21 15:39:59 joerg Exp $
|
||
|
||
- use standard headers
|
||
- don't declare own errno
|
||
- don't rely on "unix" being defined, as it isn't
|
||
|
||
--- src/fileio.c.orig 1995-06-23 10:25:18.000000000 +0000
|
||
+++ src/fileio.c
|
||
@@ -116,10 +116,7 @@ the Free Software Foundation, 675 Mass A
|
||
#endif
|
||
|
||
#include <errno.h>
|
||
-
|
||
-#ifndef vax11c
|
||
-extern int errno;
|
||
-#endif
|
||
+#include <stdlib.h>
|
||
|
||
extern char *strerror ();
|
||
|
||
@@ -1788,10 +1785,7 @@ expand_and_dir_to_file (filename, defdir
|
||
return abspath;
|
||
}
|
||
|
||
-barf_or_query_if_file_exists (absname, querystring, interactive)
|
||
- Lisp_Object absname;
|
||
- unsigned char *querystring;
|
||
- int interactive;
|
||
+static void barf_or_query_if_file_exists (Lisp_Object absname, unsigned char *querystring, int interactive)
|
||
{
|
||
register Lisp_Object tem;
|
||
struct stat statbuf;
|
||
@@ -2604,8 +2598,6 @@ The value is an integer.")
|
||
return value;
|
||
}
|
||
|
||
-#ifdef unix
|
||
-
|
||
DEFUN ("unix-sync", Funix_sync, Sunix_sync, 0, 0, "",
|
||
"Tell Unix to finish all pending disk updates.")
|
||
()
|
||
@@ -2614,8 +2606,6 @@ DEFUN ("unix-sync", Funix_sync, Sunix_sy
|
||
return Qnil;
|
||
}
|
||
|
||
-#endif /* unix */
|
||
-
|
||
DEFUN ("file-newer-than-file-p", Ffile_newer_than_file_p, Sfile_newer_than_file_p, 2, 2, 0,
|
||
"Return t if file FILE1 is newer than file FILE2.\n\
|
||
If FILE1 does not exist, the answer is nil;\n\
|
||
@@ -4507,7 +4497,5 @@ This applies only to the operation `inhi
|
||
defsubr (&Sread_file_name_internal);
|
||
defsubr (&Sread_file_name);
|
||
|
||
-#ifdef unix
|
||
defsubr (&Sunix_sync);
|
||
-#endif
|
||
}
|