mirror of
https://git.FreeBSD.org/ports.git
synced 2024-12-24 04:33:24 +00:00
Update breakage caused by new visibility in -current of lchown(2)
in <sys/stat.h>.
This commit is contained in:
parent
aa47b8020c
commit
280179a272
Notes:
svn2git
2021-03-31 03:12:20 +00:00
svn path=/head/; revision=24472
@ -1,5 +1,5 @@
|
||||
--- slibu.c-- Tue Dec 2 00:46:38 1997
|
||||
+++ slibu.c Wed Apr 28 14:07:05 1999
|
||||
--- slibu.c.orig Mon Dec 1 19:16:38 1997
|
||||
+++ slibu.c Thu Jan 6 15:04:04 2000
|
||||
@@ -20,6 +20,10 @@
|
||||
#include <errno.h>
|
||||
#include <stdarg.h>
|
||||
@ -36,7 +36,32 @@
|
||||
|
||||
LISP laccess_problem(LISP lfname,LISP lacc)
|
||||
{char *fname = get_c_string(lfname);
|
||||
@@ -1554,7 +1560,7 @@
|
||||
@@ -1021,7 +1027,7 @@
|
||||
|
||||
#if defined(unix) || defined(WIN32)
|
||||
|
||||
-LISP lchmod(LISP path,LISP mode)
|
||||
+LISP l_chmod(LISP path,LISP mode)
|
||||
{if (chmod(get_c_string(path),get_c_long(mode)))
|
||||
return(err("chmod",llast_c_errmsg(-1)));
|
||||
else
|
||||
@@ -1029,6 +1035,15 @@
|
||||
|
||||
#endif
|
||||
|
||||
+#if defined(unix) || defined(WIN32)
|
||||
+
|
||||
+LISP l_lchmod(LISP path,LISP mode)
|
||||
+{if (lchmod(get_c_string(path),get_c_long(mode)))
|
||||
+ return(err("lchmod",llast_c_errmsg(-1)));
|
||||
+ else
|
||||
+ return(NIL);}
|
||||
+
|
||||
+#endif
|
||||
|
||||
#ifdef unix
|
||||
|
||||
@@ -1554,7 +1569,7 @@
|
||||
/* note: error cases can leak memory in this procedure. */
|
||||
{LISP init_name;
|
||||
void (*fcn)(void) = NULL;
|
||||
@ -45,7 +70,7 @@
|
||||
void *handle;
|
||||
#endif
|
||||
#if defined(hpux)
|
||||
@@ -1575,7 +1581,7 @@
|
||||
@@ -1575,7 +1590,7 @@
|
||||
{put_st("so-loading ");
|
||||
put_st(get_c_string(fname));
|
||||
put_st("\n");}
|
||||
@ -54,7 +79,17 @@
|
||||
#if !defined(__osf__)
|
||||
/* Observed bug: values of LD_LIBRARY_PATH established with putenv
|
||||
-after- a process has started are ignored. Work around follows. */
|
||||
@@ -2197,7 +2203,9 @@
|
||||
@@ -2163,7 +2178,8 @@
|
||||
opendir_gc_free,
|
||||
&j);
|
||||
set_print_hooks(tc_opendir,opendir_prin1);
|
||||
- init_subr_2("chmod",lchmod);
|
||||
+ init_subr_2("chmod",l_chmod);
|
||||
+ init_subr_2("lchmod",l_lchmod);
|
||||
#endif
|
||||
|
||||
gc_protect_sym(&sym_channels,"*channels*");
|
||||
@@ -2197,7 +2213,9 @@
|
||||
#if defined(__osf__)
|
||||
init_subr_1("setpwfile",lsetpwfile);
|
||||
#endif
|
||||
|
Loading…
Reference in New Issue
Block a user