pkgsrc-ng/lang/tcl/patches/patch-unix_tclUnixFCmd.c
2013-09-26 17:14:40 +02:00

22 lines
515 B
C

$NetBSD: patch-unix_tclUnixFCmd.c,v 1.1 2012/08/21 21:31:47 marino Exp $
Carried over from TCL 8.4
--- unix/tclUnixFCmd.c.orig 2012-07-16 11:57:06.000000000 +0000
+++ unix/tclUnixFCmd.c
@@ -660,6 +660,14 @@ TclpDeleteFile(
*---------------------------------------------------------------------------
*/
+/* Reintroduced here for the benefit of scotty */
+int
+TclpCreateDirectory(path)
+ CONST char *path;
+{
+ return DoCreateDirectory(path);
+}
+
int
TclpObjCreateDirectory(
Tcl_Obj *pathPtr)