[win32] support chown() (just a noop for now)

p4raw-id: //depot/win32/perl@570

diff --git a/dosish.h b/dosish.h
index 9abbc5e..319ba86 100644 (file)
--- a/dosish.h
+++ b/dosish.h
@@ -121,6 +121,7 @@
 #  define HAS_UTIME
 #  define HAS_KILL
 #  define HAS_WAIT
+#  define HAS_CHOWN
 /*
  * This provides a layer of functions and macros to ensure extensions will
  * get to use the same RTL functions as the core.

diff --git a/win32/win32.c b/win32/win32.c
index 9d819b5..17029d0 100644 (file)
--- a/win32/win32.c
+++ b/win32/win32.c
@@ -681,9 +681,12 @@ getlogin(void)
     return (char*)NULL;
 }
 
-/*
- * pretended kill
- */
+int
+chown(const char *path, uid_t owner, gid_t group)
+{
+    /* XXX noop */
+}
+
 int
 kill(int pid, int sig)
 {

diff --git a/win32/win32.h b/win32/win32.h
index 0eda0ed..58a0ff3 100644 (file)
--- a/win32/win32.h
+++ b/win32/win32.h
@@ -155,6 +155,7 @@ extern  int setgid(gid_t gid);
 extern  int    kill(int pid, int sig);
 extern  void   *sbrk(int need);
 extern char *  getlogin(void);
+extern int     chown(const char *p, uid_t o, gid_t g);
 
 #undef  Stat
 #define  Stat          win32_stat